source the new sboxes macro from utils
This commit is contained in:
tavo-wasd
parent
0aa9a9631c
commit
2435c8e23d
3 changed files with 11 additions and 148 deletions
|
|
@ -1,147 +0,0 @@
|
||||||
.ig
|
|
||||||
|
|
||||||
sboxes.tmac
|
|
||||||
|
|
||||||
Copyright (C) 2021 Free Software Foundation, Inc.
|
|
||||||
Written by Deri James (deri@chuzzlewit.myzen.co.uk)
|
|
||||||
|
|
||||||
This file is part of groff.
|
|
||||||
|
|
||||||
groff is free software; you can redistribute it and/or modify it under
|
|
||||||
the terms of the GNU General Public License as published by the Free
|
|
||||||
Software Foundation, either version 3 of the License, or (at your
|
|
||||||
option) any later version.
|
|
||||||
|
|
||||||
groff is distributed in the hope that it will be useful, but WITHOUT ANY
|
|
||||||
WARRANTY; without even the implied warranty of MERCHANTABILITY or
|
|
||||||
FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
|
|
||||||
for more details.
|
|
||||||
|
|
||||||
You should have received a copy of the GNU General Public License
|
|
||||||
along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
||||||
..
|
|
||||||
.if !\n(.g \{\
|
|
||||||
. tm sboxes.tmac: macros require groff extensions; not loading
|
|
||||||
. nx
|
|
||||||
.\}
|
|
||||||
.
|
|
||||||
.if \n(.C \{\
|
|
||||||
. tm sboxes.tmac: macros do not work in compatibility mode; not loading
|
|
||||||
. nx
|
|
||||||
.\}
|
|
||||||
.
|
|
||||||
.\" Define a string for use in diagnostic messages.
|
|
||||||
.ds bx*name sboxes.tmac\"
|
|
||||||
.
|
|
||||||
.if !r GS \
|
|
||||||
. ab \*[bx*name]: ms macros must be loaded first; aborting
|
|
||||||
.
|
|
||||||
.if (\n[.x]\n[.y] < 123) \{\
|
|
||||||
. ds bx*msg \*[bx*name]: groff 1.23 or later is required,\"
|
|
||||||
. as bx*msg " but found groff \n[.x].\n[.y]; not loading\"
|
|
||||||
. tm \*[bx*msg]
|
|
||||||
. nx
|
|
||||||
.\}
|
|
||||||
.
|
|
||||||
.\" See if already loaded.
|
|
||||||
.if r GSBOX .nx
|
|
||||||
.
|
|
||||||
.\" GSBOX is defined if the package is loaded, and true if it will work.
|
|
||||||
.nr GSBOX 0
|
|
||||||
.if '\*[.T]'pdf' \
|
|
||||||
. nr GSBOX 1
|
|
||||||
.
|
|
||||||
.nr bx*stack 0
|
|
||||||
.
|
|
||||||
.de bx*error
|
|
||||||
. tm \*[bx*name]:\\n[.F]:\\n[.c]: error: \\$*
|
|
||||||
..
|
|
||||||
.
|
|
||||||
.\" Define dummy macro if we're not formatting for the pdf device.
|
|
||||||
.if !\n[GSBOX] \{\
|
|
||||||
. de pdfbackground
|
|
||||||
. .
|
|
||||||
.\}
|
|
||||||
.
|
|
||||||
.\" Link into ms macros to trap footnote growth
|
|
||||||
.am fn@print-sep
|
|
||||||
. nr bx*pb \\n[nl]u-2p
|
|
||||||
. nop \!x X pdf: background footnote \\n[bx*pb]z
|
|
||||||
. rr bx*pb
|
|
||||||
..
|
|
||||||
.\" Has PD been actioned?
|
|
||||||
.am par*start
|
|
||||||
. nr bx*PD \\n[PD]
|
|
||||||
..
|
|
||||||
.
|
|
||||||
.de BOXSTART
|
|
||||||
. fl
|
|
||||||
. nr bx*stack \\n[bx*stack]+1u
|
|
||||||
. nr bx*shad 0
|
|
||||||
. nr bx*outl 0
|
|
||||||
. nr bx*ind 1P
|
|
||||||
. ds bx*wt 0
|
|
||||||
. ds bx*type "\"
|
|
||||||
. while \\n[.$] \{\
|
|
||||||
. ie 'SHADED'\\$1' \{\
|
|
||||||
. nop \\M[\\$2]\c
|
|
||||||
. nr bx*shad 1
|
|
||||||
. as bx*type "fill\"
|
|
||||||
. shift 2
|
|
||||||
. \}
|
|
||||||
. el \{\
|
|
||||||
. ie 'OUTLINED'\\$1' \{\
|
|
||||||
. nop \\m[\\$2]\c
|
|
||||||
. nr bx*outl 1
|
|
||||||
. as bx*type "box\"
|
|
||||||
. shift 2
|
|
||||||
. \}
|
|
||||||
. el \{\
|
|
||||||
. ie 'WEIGHT'\\$1' \{\
|
|
||||||
. ds bx*wt \\$2
|
|
||||||
. shift 2
|
|
||||||
. \}
|
|
||||||
. el \{\
|
|
||||||
. ie 'INDENT'\\$1' \{\
|
|
||||||
. nr bx*ind \\$2
|
|
||||||
. shift 2
|
|
||||||
. \}
|
|
||||||
. el \{\
|
|
||||||
. bx*error ignoring unrecognized BOXSTART parameter '\\$1'
|
|
||||||
. shift
|
|
||||||
. \}
|
|
||||||
. \}
|
|
||||||
. \}
|
|
||||||
. \}
|
|
||||||
. \}
|
|
||||||
.
|
|
||||||
. if '\\*[bx*type]'' .ds bx*type "fill"
|
|
||||||
. nr bx*l \\n[\\n[.ev]:li]s+\\n[.o]s-\\n[bx*ind]u
|
|
||||||
. nr bx*r \\n[bx*l]u+\\n[.l]-\\n[\\n[.ev]:li]+(\\n[bx*ind]u*2u)
|
|
||||||
. nr bx*gap \\n[.v]-\\n[.ps]+\\*[bx*wt]
|
|
||||||
. nr bx*bot \\n[.p]u-\\n[FM]u+\\n[bx*ind]u+\\n[.ps]u
|
|
||||||
. nr bx*top \\n[HM]-\\n[bx*ind]u+\\n[bx*gap]u
|
|
||||||
. ne \\n[bx*ind]u+2v+\\*[bx*wt]
|
|
||||||
. sp -(2v-(\\n[bx*PD]u*2u))u
|
|
||||||
. pdfbackground \\*[bx*type] \\n[bx*l]z \\n[bx*top]z \
|
|
||||||
\\n[bx*r]z \\n[bx*bot]z \
|
|
||||||
\\*[bx*wt]
|
|
||||||
. sp (\\n[bx*ind]u-1v)u
|
|
||||||
. if (\\n[bx*shad]=1) .nop \\M[]\c
|
|
||||||
. if (\\n[bx*outl]=1) .nop \\m[]\c
|
|
||||||
. ds bx*ind\\n[bx*stack] \\n[bx*ind]
|
|
||||||
. rr bx*shad bx*outl bx*ind bx*bot bx*top bx*l bx*r
|
|
||||||
. rm wt type
|
|
||||||
. sp -(\\n[bx*gap]u)
|
|
||||||
. nr bx*PD 0
|
|
||||||
..
|
|
||||||
.de BOXSTOP
|
|
||||||
. sp \\*[bx*ind\\n[bx*stack]]u-\\n[.psr]u
|
|
||||||
. pdfbackground off
|
|
||||||
. nr bx*stack \\n[bx*stack]-1u
|
|
||||||
..
|
|
||||||
.\" Local Variables:
|
|
||||||
.\" mode: nroff
|
|
||||||
.\" fill-column: 72
|
|
||||||
.\" End:
|
|
||||||
.\" vim: set expandtab filetype=groff textwidth=72:
|
|
||||||
|
|
@ -1,3 +1,7 @@
|
||||||
|
.\" This one requires groff 1.23.0 or later
|
||||||
|
.\" It is used in the .CS/.CE custom macros
|
||||||
|
.mso sboxes.tmac
|
||||||
|
.
|
||||||
.\" These lines set link text and border colours
|
.\" These lines set link text and border colours
|
||||||
.ds PDFHREF.COLOUR #193be5
|
.ds PDFHREF.COLOUR #193be5
|
||||||
.defcolor pdf:href.colour rgb \*[PDFHREF.COLOUR]
|
.defcolor pdf:href.colour rgb \*[PDFHREF.COLOUR]
|
||||||
|
|
@ -32,3 +36,9 @@
|
||||||
.ft
|
.ft
|
||||||
.BOXSTOP
|
.BOXSTOP
|
||||||
..
|
..
|
||||||
|
.
|
||||||
|
.\" Easier headings
|
||||||
|
.de HE
|
||||||
|
.NH \\$2
|
||||||
|
.XN \\$1
|
||||||
|
..
|
||||||
|
|
|
||||||
|
|
@ -32,4 +32,4 @@ set completion-highlight-fg "#121212"
|
||||||
set completion-highlight-bg "#d3869b"
|
set completion-highlight-bg "#d3869b"
|
||||||
|
|
||||||
set recolor-lightcolor "#121212"
|
set recolor-lightcolor "#121212"
|
||||||
set recolor-darkcolor "#ffffff"
|
set recolor-darkcolor "#ebdbb2"
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue