home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fonts 1 / freshfonts1.bin / programs / amiga / tpp / tex / tppgarticle.tex < prev    next >
Text File  |  1993-10-09  |  1KB  |  46 lines
  1. % TPPGArticle.tex
  2. %
  3. %  © 1992 Martin Steppler
  4. %
  5.  
  6. %
  7. % adjustment of general parameters
  8. %
  9. \vsize 9.2truein \hsize 6.5truein % page layout
  10. \baselineskip=12pt \lineskiplimit=0pt \lineskip=0pt
  11. \smallskipamount=6pt plus 1pt minus 1pt
  12. \medskipamount=12pt plus 2pt minus 2pt
  13. \bigskipamount=18pt plus 3pt minus 3pt
  14. \parskip=6pt plus 1pt minus 1pt
  15. %\parindent=0pt
  16. \tolerance=10000
  17. \hbadness=5000
  18. %
  19. %   newpage macro
  20. %
  21. \def\newpage{\vfill\eject}
  22. %
  23. %   raggedcenter macro
  24. %
  25. \def\raggedcenter{\leftskip=0pt plus 4em \rightskip=\leftskip
  26.         \parfillskip=0pt \spaceskip=.3333em \xspaceskip=.5em
  27.         \pretolerance=9999 \tolerance=9999 \hbadness=10000
  28.         \hyphenpenalty=9999 \exhyphenpenalty=9999}
  29. %
  30. %   raggedleft macro
  31. %
  32. \def\raggedleft{\leftskip=0pt plus4em \spaceskip=.3333em \xspaceskip=.5em
  33.         \parfillskip=0pt \parindent=0pt}
  34. %
  35. %   date and today macros
  36. %
  37. \def\mynum#1{\ifnum #1<10 0\the#1\else \the#1\fi}
  38. \def\mymonth#1{\ifcase#1 \or Januar \or Februar \or M\"arz \or April
  39.    \or Mai \or Juni \or Juli \or August
  40.    \or September \or Oktober
  41.    \or November \or Dezember \fi}
  42. \def\datum{\mynum{\day}. \mymonth{\month}\mynum{\year}}
  43. \def\heute{\mynum{\day}.\ifcase\month\or
  44. 01\or 02\or 03\or 04\or 05\or 06\or 07\or 08\or 09\or 10\or 11\or 12\fi
  45. .\number\year}
  46.