 |
tmac.jsdisp - 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, … |
|
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 .. |
