9base

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

chars.me (1474B)


      1 .nr _0 \n(c.
      2 .\"	@(#)chars.me	2.2	8/29/80
      3 .\" This version has had comments stripped; an unstripped version is available.
      4 .if n \
      5 \{\
      6 .	ds #[ \f1
      7 .	ds #] \fP
      8 .	ds #h 0
      9 .	ds #v 0.8m
     10 .	ds #f 0.3m
     11 .\}
     12 .if t \
     13 \{\
     14 .	ds #[ \&
     15 .	ds #] \&
     16 .	ds #h ((1u-(\\\\n(.fu%2u))*0.13m)
     17 .	ds #v 0.6m
     18 .	ds #f 0
     19 .\}
     20 .ds ' \k_\h'-(\\n(.wu*8/10-\*(#h)'\*(#[\(aa\h'|\\n_u'\*(#]
     21 .ds ` \k_\h'-(\\n(.wu*7/10-\*(#h)'\*(#[\(ga\h'|\\n_u'\*(#]
     22 .ds : \k_\h'-(\\n(.wu*8/10-\*(#h+0.1m+\*(#f)'\v'-\*(#v'\*(#[\z.\h'0.2m+\*(#f'.\h'|\\n_u'\v'\*(#v'\*(#]
     23 .ds ^ \k_\h'-(\\n(.wu-\*(#h-0.05m)'\*(#[^\h'|\\n_u'\*(#]
     24 .ds ~ \k_\h'-(\\n(.wu-\*(#h-0.05m)'\*(#[~\h'|\\n_u'\*(#]
     25 .ds , \k_\h'-(\\n(.wu)'\*(#[,\h'|\\n_u'\*(#]
     26 .ds v \k_\h'-(\\n(.wu*9/10-\*(#h)'\v'-\*(#v'\*(#[\s-4v\s0\v'\*(#v'\h'|\\n_u'\*(#]
     27 .ds o \k_\h'-(\\n(.wu+\w'\(de'u-\*(#h)/2u'\v'-0.4n'\*(#[\z\(de\v'0.4n'\h'|\\n_u'\*(#]
     28 .ds qe \*(#[\v'0.5m'\z\(em\v'-0.65m'\z\(em\v'-0.65m'\z\(em\v'0.8m'\h'0.3m'|\h'-0.3m'\*(#]
     29 .ds qa \*(#[\h'-0.24m'\z\e\h'0.48m'\z\(sl\h'-0.24m'\v'-0.15m'\(em\v'0.15m'\*(#]
     30 .if t \
     31 \{\
     32 .	ds qe \s-2\v'0.45m'\z\(em\v'-0.625m'\z\(em\v'-0.625m'\(em\v'0.8m'\s0\h'-0.1m'\v'-0.05m'\(br\v'0.05m'\h'0.1m'
     33 .	ds qa \z\e\h'0.35m'\z\(sl\h'-0.33m'\v'-0.3m'\s-4\(em\s0\v'0.3m'\h'0.15m'
     34 .\}
     35 .if \n($T \
     36 \{\
     37 .	ds ' \*(#[\h'-1'\(aa\*(#]
     38 .	ds ` \*(#[\h'-1'\(ga\*(#]
     39 .	ds : \&
     40 .	ds ^ \*(#[\h'-1'^\*(#]
     41 .	ds ~ \*(#[\h'-1'~\*(#]
     42 .	ds , \*(#[\h'-1',\*(#]
     43 .	ds v \&
     44 .	ds o \&
     45 .	ds qe EXISTS
     46 .	ds qa FORALL
     47 .\}
     48 .rm #[
     49 .rm #]
     50 .rm #h
     51 .rm #v
     52 .rm #f
     53 .nr c. \n(_0