9base

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

tmac.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 ..