Specifications
A-3Calculating Page Lenght Using Printer Colon File Escape Sequence
%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 ?)
%t <THEN>
%{1149} PUSH: (Integer Constant 1149)
%e <ELSE>
%gq PUSH: (Internal Variable q)
%{5} PUSH: (Integer Constant 5)
%= PUSH: (pop2 = pop1 ?)
%t <THEN>
%{1763} PUSH: (Integer Constant 1763)
%e <ELSE>
%{1928} PUSH: (Integer Constant 1928)
%; <END>
%; <END>
%d POP –> ASCII String –> OUTPUT