SVTCA[0]	/* SetFPVectorToAxis */

PUSHB[ ]
0 3 %d /* stemEnd */
WS[ ]	/* WriteStore */
CALL[ ] /* copy cvt to storage */

%@	/* add familyzone copy code */


PUSHB[ ] /* get oversampling */
1 
CALL[ ]

PUSHB[ ]	/* 7 values pushed */
57 64 2 1 %d 2 1	/* StemStart */
RCVT[ ]	/* ReadCVT */
WS[ ]	/* WriteStore */
WS[ ]	/* WriteStore */
RS[ ]	/* ReadStore */
EQ[ ]	/* Equal */
JROF[ ]	/* JumpRelativeOnFalse */
PUSHB[ ]	/* 2 values pushed */
46 1
RS[ ]	/* ReadStore */
PUSHB[ ]	/* 1 value pushed */
%d	/* StemEnd */
LT[ ]	/* LessThan */
JROF[ ]	/* JumpRelativeOnFalse */
PUSHB[ ]	/* 4 values pushed */
7 3 3 1
RS[ ]	/* ReadStore */
RCVT[ ]	/* ReadCVT */
WS[ ]	/* WriteStore */
RS[ ]	/* ReadStore */
PUSHB[ ]	/* 1 value pushed */
93
LT[ ]	/* LessThan */
JROF[ ]	/* JumpRelativeOnFalse */
PUSHB[ ]	/* 3 values pushed */
10 3 64
WS[ ]	/* WriteStore */
JMPR[ ]	/* Jump */
PUSHB[ ]	/* 2 values pushed */
3 3
RS[ ]	/* ReadStore */
PUSHB[ ]	/* 1 value pushed */
6
SUB[ ]	/* Subtract */
ROUND[01]	/* Round */
WS[ ]	/* WriteStore */
PUSHW[ ]	/* 1 value pushed */
-52
PUSHB[ ]	/* 4 values pushed */
1 1 1 1
RS[ ]	/* ReadStore */
PUSHB[ ]	/* 1 value pushed */
3
RS[ ]	/* ReadStore */
WCVTP[ ]	/* WriteCVTInPixels */
RS[ ]	/* ReadStore */
ADD[ ]	/* Add */
WS[ ]	/* WriteStore */
JMPR[ ]	/* Jump */
PUSHB[ ]	/* 1 value pushed */
44
JMPR[ ]	/* Jump */
PUSHB[ ]	/* 2 values pushed */
36 1
RS[ ]	/* ReadStore */
PUSHB[ ]	/* 1 value pushed */
%d	/* StemEnd */
LT[ ]	/* LessThan */
JROF[ ]	/* JumpRelativeOnFalse */
PUSHW[ ]	/* 1 value pushed */
-42
PUSHB[ ]	/* 8 values pushed */
1 1 1 1 4 4 4 1
RS[ ]	/* ReadStore */
RCVT[ ]	/* ReadCVT */
WS[ ]	/* WriteStore */
RS[ ]	/* ReadStore */
PUSHB[ ]	/* 1 value pushed */
2
RS[ ]	/* ReadStore */
MUL[ ]	/* Multiply */
ROUND[01]	/* Round */
PUSHB[ ]	/* 1 value pushed */
2
RS[ ]	/* ReadStore */
DIV[ ]	/* Divide */
WS[ ]	/* WriteStore */
RS[ ]	/* ReadStore */
PUSHB[ ]	/* 1 value pushed */
4
RS[ ]	/* ReadStore */
WCVTP[ ]	/* WriteCVTInPixels */
RS[ ]	/* ReadStore */
ADD[ ]	/* Add */
WS[ ]	/* WriteStore */
JMPR[ ]	/* Jump */
%@ /* Add zone rounding code */
/* Manually written */
MPPEM[ ]	/* MeasurePixelPerEm */
PUSHW[ ]
4096
MUL[ ]		/* convert ppm to FIXED */
NEG[ ]
PUSHW[ ]
15000
ADD[ ]		/* add 2.5 * 100 (* 64) */
PUSHW[ ]
6400
DIV[ ]		/* div by 100 */
PUSHB[ ]
10
SWAP[ ]
WS[ ]
PUSHB[ ]
0 10
RS[ ]
GT[ ]	/* minimal value is 0.5 */
IF[ ]
	PUSHB[ ]	/* 1 value pushed */
	0
ELSE[ ]
	PUSHB[ ]
	10
	RS[ ]
EIF[ ]
SCVTCI[ ]	/* SetCVTCutIn */
