1 .de CO \" Set type color; no value => reset
2 .ie '\\$1'' .ds oC \\*(pC
5 .ds oC \\$1 \\$2 \\$3 \\$4
9 .de BC \" Set background color; no value => reset
10 .ie '\\$1'' .ds oB \\*(pB
13 .ds oB \\$1 \\$2 \\$3 \\$4
20 .de IN \" Include picture $1 with ul corner at ($2,$3)
23 \\X'picfile \\$1 \\n(xc \\n(yc'\c
25 .de CW \" clear window ($1,$2) is ul ($3,$4) is lr, uses bg color
30 \\X'clrwin \\n(x0 \\n(y0 \\n(x1 \\n(y1
32 .de BW \" window border ($1,$2) is ul ($3,$4) is lr, uses fg color
37 \\X'border \\n(x0 \\n(y0 \\n(x1 \\n(y1
39 .de SL \" start slide, args are optional title
47 \\$1 \\$2 \\$3 \\$4 \\$5 \\$6 \\$7 \\$8 \\$9
52 .de PS \" Start pic picture
53 . \" $1 is height, $2 is width, both in inches
58 .de PE \" End pic picture
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
74 .de IE \" End ideal picture
76 .if \\n(ID .if t .sp .6
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