ttmac.jsdisp - plan9port - [fork] Plan 9 from user space
 (HTM) git clone git://src.adamsgaard.dk/plan9port
 (DIR) Log
 (DIR) Files
 (DIR) Refs
 (DIR) README
 (DIR) LICENSE
       ---
       ttmac.jsdisp (828B)
       ---
            1 .                \" DS - display.  If .DS C, center; L, left-adjust; I, indent.
            2 .de DS
            3 .KS
            4 .nf
            5 .\\$1D \\$2 \\$1
            6 .ft 1
            7 .ps \\n(PS
            8 .if \\n(VS>40 .vs \\n(VSu
            9 .if \\n(VS<=39 .vs \\n(VSp
           10 ..
           11 .de D
           12 .ID \\$1
           13 ..
           14 .de CD
           15 .XD
           16 .ce 1000
           17 ..
           18 .de ID
           19 .XD
           20 .if t .in +0.5i
           21 .if n .in +8
           22 .if \\n(.$ .if !"\\$1"I" .if !"\\$1"" .in \\n(OIu
           23 .if \\n(.$ .if !"\\$1"I" .if !"\\$1"" .in +\\$1n
           24 ..
           25 .de LD
           26 .XD
           27 ..
           28 .de XD
           29 .nf
           30 .nr OI \\n(.i
           31 .SP \\n(DVu
           32 .sp \\n(DVu
           33 ..
           34 .                \" BD - block display: save everything, then center it.
           35 .de BD
           36 .XD
           37 .nr BD 1
           38 .nf
           39 .in \\n(OIu
           40 .di DD
           41 ..
           42 .                \"DE - display end
           43 .de DE
           44 .ce 0
           45 .if \\n(BD>0 .DF
           46 .nr BD 0
           47 .in \\n(OIu
           48 .KE
           49 .SP \\n(DVu
           50 .sp \\n(DVu
           51 .fi
           52 ..
           53 .                \" DF - finish a block display to be recentered.
           54 .de DF
           55 .di
           56 .if \\n(dl>\\n(BD .nr BD \\n(dl
           57 .if \\n(BD<\\n(.l .in (\\n(.lu-\\n(BDu)/2u
           58 .nr EI \\n(.l-\\n(.i
           59 .ta \\n(EIuR
           60 .nf
           61 .DD
           62 .in \\n(OIu
           63 ..