1
0

tmac.twb 1.8 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596
  1. .de CO \" Set type color; no value => reset
  2. .ie '\\$1'' .ds oC \\*(pC
  3. .el \{\
  4. .ds pC \\*(oC
  5. .ds oC \\$1 \\$2 \\$3 \\$4
  6. ...\}
  7. \\X'color \\*(oC'\c
  8. ..
  9. .de BC \" Set background color; no value => reset
  10. .ie '\\$1'' .ds oB \\*(pB
  11. .el \{\
  12. .ds pB \\*(oB
  13. .ds oB \\$1 \\$2 \\$3 \\$4
  14. ...\}
  15. \\X'bgcolor \\*(oB'\c
  16. ..
  17. .de CL
  18. \\X'clear'\c
  19. ..
  20. .de IN \" Include picture $1 with ul corner at ($2,$3)
  21. .nr xc \\$2i
  22. .nr yc \\$3i
  23. \\X'picfile \\$1 \\n(xc \\n(yc'\c
  24. ..
  25. .de CW \" clear window ($1,$2) is ul ($3,$4) is lr, uses bg color
  26. .nr x0 \\$1i
  27. .nr y0 \\$2i
  28. .nr x1 \\$3i
  29. .nr x2 \\$4i
  30. \\X'clrwin \\n(x0 \\n(y0 \\n(x1 \\n(y1
  31. ..
  32. .de BW \" window border ($1,$2) is ul ($3,$4) is lr, uses fg color
  33. .nr x0 \\$1i
  34. .nr y0 \\$2i
  35. .nr x1 \\$3i
  36. .nr x2 \\$4i
  37. \\X'border \\n(x0 \\n(y0 \\n(x1 \\n(y1
  38. ..
  39. .de SL \" start slide, args are optional title
  40. .bp
  41. .ce 0
  42. .ft B
  43. .nf
  44. .if !'\\$1'' \{\
  45. .ps 36p
  46. .vs 36p
  47. \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
  48. ...\}
  49. .ps 30p
  50. .vs 30p
  51. ..
  52. .de PS \" Start pic picture
  53. . \" $1 is height, $2 is width, both in inches
  54. .sp .3
  55. .in (\\n(.lu-\\$2)/2u
  56. .ne \\$1
  57. ..
  58. .de PE \" End pic picture
  59. .in
  60. .sp .6
  61. ..
  62. .de IS \" Start ideal picture
  63. . \" $1 is width, $2 is height, both in inches
  64. . \" in ideal, however, we see two IS's for each picture,
  65. . \" and only the second one has the goods
  66. .nr ID 0
  67. .ie !'\\$1'' \{\
  68. .sp .3
  69. .nr ID 1
  70. .in (\\n(.lu-\\$1)/2u
  71. .ne \\$2
  72. ...\}
  73. ..
  74. .de IE \" End ideal picture
  75. .if \\n(ID .in
  76. .if \\n(ID .if t .sp .6
  77. ..
  78. .ds oC 255 255 255 255 \" type color
  79. .ds oB 0 0 0 0 \" background color
  80. .pl 4.8i \" page length
  81. .po .1i \" left margin
  82. .ll 6.2i \" line length
  83. .ta 0.5i +0.5i +0.5i +0.5i +0.5i +0.5i +0.5i +0.5i +0.5i +0.5i +0.5i
  84. .nf
  85. .ps 30p
  86. .vs 30p
  87. .fp 1 R Lucida
  88. .fp 2 I LucidaI
  89. .fp 3 B LucidaB
  90. .fp 4 BI LucidaBI
  91. .fp 5 S LucidaS
  92. .fp 6 SB LucidaSB
  93. .fp 7 SI LucidaSI
  94. .fp 8 SK LucidaSBI
  95. .fp 9 CW LucidaCW
  96. .ft B