4141currentglobal
4242true setglobal
4343/setpacking where {pop currentpacking true setpacking} if
44- 4 dict
44+ 5 dict
4545dup /raiseerror dup /uk.co.terryburton.bwipp findresource put
4646dup /processoptions dup /uk.co.terryburton.bwipp findresource put
47+ dup /render dup /uk.co.terryburton.bwipp findresource put
4748dup /renlinear dup /uk.co.terryburton.bwipp findresource put
4849dup /interleaved2of5 dup /uk.co.terryburton.bwipp findresource put
4950begin
5960 /text1size 10.0 def
6061 /text1xoffset 0.0 def
6162 /text1yoffset -3.5 def
62- /height 0.5 def
63+ /height -1.0 def
64+ /propspec false def
65+ /physspec false def
66+ /mag 1.0 def
67+ /xdim -1.0 def
68+ /ast (default) def
69+ /xnom -1.0 def
70+ /xmin -1.0 def
71+ /xmax -1.0 def
72+ /hnom -1.0 def
73+ /modunit 1 def
6374 /showborder true def
6475 /borderwidth 4.0 def
6576 /borderleft 10.0 def
@@ -121,6 +132,12 @@ begin
121132 /text exch def
122133 } ifelse
123134
135+ %
136+ % Apply AST spec overrides and resolve physical specification
137+ %
138+ /itf14 ast /apply_ast //render exec not { //raiseerror exec } if
139+ /resolve_physspec //render exec
140+
124141 %
125142 % Get the result of encoding with interleaved2of5
126143 %
@@ -130,8 +147,17 @@ begin
130147 options (borderright) borderright put
131148 options (bordertop) bordertop put
132149 options (borderbottom) borderbottom put
150+ height -1.0 eq propspec not and { /height 0.5 def } if
133151 options (height) height put
134152 options (text1yoffset) text1yoffset put
153+ options (propspec) propspec put
154+ options (physspec) physspec put
155+ options (xdim) xdim put
156+ options (xnom) xnom put
157+ options (xmin) xmin put
158+ options (xmax) xmax put
159+ options (hnom) hnom put
160+ options (modunit) modunit put
135161
136162 /uk.co.terryburton.bwipp._dontdraw true def
137163 barcode options //interleaved2of5 exec /args exch def
0 commit comments