
6.GUIDANCE WINDOW FOR DATA ITEM SAMPLE PROGRAM B-63343EN/02
- 242 -
G240 P0 C11 /* SET COLOR
ENDIF /*
G243 X24 Y4 ('3') /* P3
/* /*
IF [#9200 GE 115 && #9200 LE 118] THEN /*
G240 P[CSRFRT] C[CSRBAK] L1 /* SET COLOR
ELSE /*
G240 P0 C11 /* SET COLOR
ENDIF /*
G243 X27 Y7 ('4') /* P4
/* /*
IF [#9200 EQ 119 || #9200 EQ 120] THEN /*
G240 P[CSRFRT] C[CSRBAK] L1 /* SET COLOR
ELSE /*
G240 P0 C11 /* SET COLOR
ENDIF /*
G243 X31 Y7 ('E') /* END
/* /*
IF [#9200 EQ 13] THEN /*
G240 P[CSRFRT] C[CSRBAK] L1 /* SET COLOR
ELSE /*
G240 P0 C11 /* SET COLOR
ENDIF /*
G243 X5 Y11 ('PT') /* PITCH
/* /*
#8509=0 /* MD0056
GOTO999;
/*
/* TRAPEZOIDAL GROOVE INNER
/*
N2000 W_CXPOS = 0 ; /* offset x pos
W_CYPOS = 0 ; /* offset y pos
CUNT = 0 ; /* counter clear
ASET = 0 ; /* init angle
G240 P7 C4 ; /* set color
/* window title
G243 X1 Y0 ('GROOVE TR (INNER)') ;
G244 P0 ; /* set solid line
G240 P10 ; /* set color
/* work figure
G242 X[-248+W_CXPOS] Y[104+W_CYPOS] ;
G01 X[-56+W_CXPOS] Y[104+W_CYPOS] ;
G01 X[-56+W_CXPOS] Y[176+W_CYPOS] ;
G01 X[-104+W_CXPOS] Y[176+W_CYPOS] ;
G01 X[-120+W_CXPOS] Y[128+W_CYPOS] ;
G01 X[-184+W_CXPOS] Y[128+W_CYPOS] ;
G01 X[-200+W_CXPOS] Y[176+W_CYPOS] ;
G01 X[-248+W_CXPOS] Y[176+W_CYPOS] ;
G01 X[-248+W_CXPOS] Y[104+W_CYPOS] ;
G206 P0 X[-240+W_CXPOS] Y[110+W_CYPOS] ;
G242 X[-296+W_CXPOS] Y[48+16+W_CYPOS] ;
G01 X[-224+W_CXPOS] Y[48+16+W_CYPOS] ;
G01 X[-224+W_CXPOS] Y[64+16+W_CYPOS] ;
G01 X[-232+W_CXPOS] Y[64+16+W_CYPOS] ;
G01 X[-236+W_CXPOS] Y[56+16+W_CYPOS] ;
G01 X[-252+W_CXPOS] Y[56+16+W_CYPOS] ;
G01 X[-256+W_CXPOS] Y[64+16+W_CYPOS] ;
G01 X[-264+W_CXPOS] Y[64+16+W_CYPOS] ;
G01 X[-268+W_CXPOS] Y[56+16+W_CYPOS] ;
G01 X[-284+W_CXPOS] Y[56+16+W_CYPOS] ;
G01 X[-288+W_CXPOS] Y[64+16+W_CYPOS] ;
G01 X[-296+W_CXPOS] Y[64+16+W_CYPOS] ;
G01 X[-296+W_CXPOS] Y[48+16+W_CYPOS] ;
G206 P0 X[-294+W_CXPOS] Y[60+16+W_CYPOS] ;
G240 P4 ; /* set color
G242 X[-72+W_CXPOS] Y[176+W_CYPOS] ;
G01 X[-104+W_CXPOS] Y[176+W_CYPOS] ;