User`s guide

4-139
Printer, Plotter, and Spooler Subsystem Programming
Primary Page Width (–z 0) or Secondary Page Length (–z1), in pels
wJ = %G_Q%Pq%?%GWu%{3}%<%t%?%gq%{1}%=%t%{2400}%e%gq%{2}%=%t%{2400
}%e%gq%{3}%=%t%{1999}%e%gq%{4}%=%t%{2330}%e%{2025}%;%e%?%gq%{1}%=
%t%{1012}%e%gq%{2}%=%t%{1012}%e%gq%{3}%=%t%{1087}%e%gq%{4}%=%t%{1
149}%e%gq%{5}%=%t%{1763}%e%{1928}%;%;%d
%G_Q PUSH: (PAPER SIZE override for input paper source)
%Pq POP –> Internal Variable q
%? <IF>
%GWu PUSH: (Calculate value for paper source based on _
O and _u.)
%{3} PUSH: (Integer Constant 3)
%< PUSH: (pop2 < pop1 ?)
%t <THEN>
%? <IF>
%gq PUSH: (Internal Variable q)
%{1} PUSH: (Integer Constant 1)
%= PUSH: (pop2 = pop1 ?)
%t <THEN>
%{2400} PUSH: (Integer Constant 2400)
%e <ELSE>
%gq PUSH: (Internal Variable q)
%{2} PUSH: (Integer Constant 2)
%= PUSH: (pop2 = pop1 ?)
%t <THEN>
%{2400} PUSH: (Integer Constant 2400)
%e <ELSE>
%gq PUSH: (Internal Variable q)
%{3} PUSH: (Integer Constant 3)
%= PUSH: (pop2 = pop1 ?)
%t <THEN>
%{1999} PUSH: (Integer Constant 1999)
%e <ELSE>
%gq PUSH: (Internal Variable q)
%{4} PUSH: (Integer Constant 4)
%= PUSH: (pop2 = pop1 ?)
%t <THEN>
%{2330} PUSH: (Integer Constant 2330)
%e <ELSE>
%{2025} PUSH: (Integer Constant 2025)
%; <END>
%e <ELSE>
%? <IF>
%gq PUSH: (Internal Variable q)
%{1} PUSH: (Integer Constant 1)
%= PUSH: (pop2 = pop1 ?)
%t <THEN>
%{1012} PUSH: (Integer Constant 1012)
%e <ELSE>
%gq PUSH: (Internal Variable q)
%{2} PUSH: (Integer Constant 2)
%= PUSH: (pop2 = pop1 ?)
%t <THEN>
%{1012} PUSH: (Integer Constant 1012)
%e <ELSE>
%gq PUSH: (Internal Variable q)
%{3} PUSH: (Integer Constant 3)
%= PUSH: (pop2 = pop1 ?)
%t <THEN>
%{1087} PUSH: (Integer Constant 1087)
%e <ELSE>
%gq PUSH: (Internal Variable q)
%{4} PUSH: (Integer Constant 4)
%= PUSH: (pop2 = pop1 ?)