| ---
tmac.twb (1878B)
---
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 |