home *** CD-ROM | disk | FTP | other *** search
/ ftp.barnyard.co.uk / 2015.02.ftp.barnyard.co.uk.tar / ftp.barnyard.co.uk / cpm / walnut-creek-CDROM / CPM / LANGUAGS / PASCAL-P / PP319DOC.LBR / MASTER.MZN / MASTER.MAN
Text File  |  2000-06-30  |  3KB  |  84 lines
  1. #####
  2. .rem ## print with "runpcd rnf (master.man, lst)"               ##
  3. .rem ## By changing the arguments to $halfwidth= and $halfpage= ##
  4. .rem ## you can re-format this manual to the page size you need.##
  5. .rem ## Suggested values are:               halfwidth  halfpage ##
  6. .rem ##   8 1/2 x 11, 6 lpi, 80 char wide       34       33     ##
  7. .rem ##   8 1/2 x 11, 8 lpi, 96 char wide       42       44     ##
  8. .rem ##   (special) 144 lines, 132 char wide    60       72     ##
  9. .rem ## The last format may be generated on an EPSON RX80 by    ##
  10. .rem ## uncommenting the ".lines144 .subscr ...."  call below.  ##
  11. .macro subscr = .fmt 5 27 .x .fmt 5 83 .x .fmt 5 1
  12. .macro lines144 = .fmt 5 27 .x .fmt 5 51 .x .fmt 5 16 .x
  13. .macro condensed = .fmt 5 15 .x .fmt 5 27 .x .fmt 5 80 .x
  14. .rem UNCOMMENT the following line for the special format
  15. .rem .lines144 .subscr .condensed .fmt 5 13
  16. .rem Pagesize control
  17. .var $halfwidth
  18. .rem halfwidth for controlling page headers. defines rm
  19. $halfwidth=34;
  20. .var $halfpage
  21. .rem halfpage for controlling page height.
  22. $halfpage=33;
  23. .rem
  24. .bar .nonmp
  25. .rem page headings
  26. .var $chpag
  27. .macro inpag  = .sav .respag .s 3
  28. .macro outpag = .s 2 .res
  29. .macro lrpag  = .chttl .t .chpage .rt .mainame
  30. .macro ch *   = .nextch .page .respag .br # .br .s 4 .cha .b .chb .s 3
  31. .macro nextch = $$ch=$$ch+1; $chpag=0; $$hl=0;
  32. .macro cha    = .c Chapter $$ch .br
  33. .macro chb    = .c .ch1 .br
  34. .rem
  35. .rem page numbering with shift to appendices
  36. .macro chpaga = .if #$apndx Ch.# .x $$ch
  37. .macro chpagb = .if $apndx .fmt 1 $apndx+64
  38. .macro chpage = .chpaga .chpagb .x - .x $chpag=$chpag+1 $$page=$$page+1;
  39. .rem
  40. .rem Page headings for appendices
  41. .var $apndx
  42. .macro ahd *  = .nxta .page .respag .b 2 .axhda .b .axhdb .s 2
  43. .macro nxta   = $apndx=$apndx+1; $$hl=0; $chpag=0;
  44. .macro axhda  = .c Appendix .fmt 1 $apndx+64
  45. .macro axhdb  = .c .ahd1
  46. .rem
  47. .rem dotting macros
  48. .macro bdot   = .sav .p -2 1 5 .lm +5 .rm -5
  49. .macro dotit  = .pp _.# .x
  50. .macro edot   = .res .s 1
  51. .rem
  52. .rem handy macro for inserting notes
  53. .rem end .note with .res. The parameter is the header word.
  54. .macro note * = .b .sav .tp 5 .rm $$rm-10; .lm $$lm+10; .c .note1 .b
  55. .rem
  56. .rem manual name
  57. .macro mainame = Pascal-P#Manual#v3.1.9
  58. .rem
  59. .rem chapters begin with .macro chttl=???, then .ch
  60. .macro chttl  = #
  61. .p +0 1 5
  62. .right 3
  63. .rem
  64. .rm $halfwidth+$halfwidth;
  65. .tabs $halfwidth-3; $$rm;
  66. .sp 1
  67. .pagesize $halfpage+$halfpage-6 $$rm .lines $halfpage+$halfpage
  68. .rem
  69. .rem generate cover page
  70. .fig $halfpage-8
  71. .u
  72. .c Pascal-P and PCD System
  73. .b
  74. .c Referance##Manual .nou
  75. .b
  76. .c Version#3.1.9
  77. .b
  78. .c Last modified##(87/01/26)
  79. .rem
  80. .rem setup numbering system and do the whole thing.
  81. .savpag
  82. .macro frcpage = .top .inpag .lrpag .outpag .mid
  83. .include chapters.man
  84. █╘