9base

revived minimalist port of Plan 9 userland to Unix
git clone git://git.suckless.org/9base
Log | Files | Refs | README | LICENSE

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