numlimit.gml

来自「开放源码的编译器open watcom 1.6.0版的源代码」· GML 代码 · 共 28 行

..if '&format' eq '7x9' ..th ..do begin
.  ..sr numboxcol1=17
.  ..sr numboxcol2=22
..do end
..el ..do begin
.  ..sr numboxcol1=19
.  ..sr numboxcol2=27
..do end
.*
.dm numboxbeg begin
.  ..br
.  .if &e'&nobox eq 0 .do begin
.  .boxdef
.  .boxcol &numboxcol1.
.  .boxcol &numboxcol2.
.  .boxbeg
汳acro: :SF font=4.&*:eSF.沄alue
.  .do end
.  .el .do begin
.  .millust begin
Macro: &*       Value
.  .do end
.  .boxline
.dm numboxbeg end
.*
.dm numterm begin
.  .if &e'&nobox eq 0 .do begin