freebsd-skq/contrib/groff/tmac/tmac.lj4
1996-09-07 16:18:32 +00:00

19 lines
434 B
Plaintext

.nr _C \n(.C
.cp 0
.ftr CW CR
.ftr C CR
.ftr CX CBI
.ftr H UR
.ftr HR UR
.ftr HB UB
.ftr HBI UBI
.ftr HI UI
.ftr HO UI
.ftr HX UBI
.\" This is designed so that \(ul, \(rn and \(br form corners.
.if !c\[br] .char \[br] \Z'\v'.25m'\D'R .04m -1m''
.if !c\[ru] .char \[ru] \Z'\v'-.02m'\D'R .54m .04m''\h'.5m'
.if !c\[rn] .char \[rn] \Z'\v'-.77m'\D'R .54m .04m''\h'.5m'
.if !c\[ul] .char \[ul] \Z'\v'.23m'\D'R .54m .04m''\h'.5m'
.cp \n(_C