6.GUIDANCE WINDOW FOR DATA ITEM SAMPLE PROGRAM B-63343EN/02
- 232 -
GOTO 80 /*
ENDIF /*
/* /*
N70 #8509=7351 /* ENGLISH
/* /*
N80 IF [#22124 EQ 1]GOTO 1500 /* IF OUTER MD0056
IF [#22124 EQ 2]GOTO 2500 /* IF INNER
IF [#22124 EQ 3]GOTO 3500 /* IF FACE
/* MD0056 END
/*
GOTO999;
N100 #20498=#22124;
G240 P0 C11 ; /* set color
G202X1Y1I38J12P3; clear graphic in window.
IF [#22124 EQ 1]GOTO1000;
IF [#22124 EQ 2]GOTO2000;
IF [#22124 EQ 3]GOTO3000;
GOTO999;
N1000 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 (OUTER)') ;
G244 P0 ; /* set solid line
G240 P10 ; /* set color
/* work figure
G242 X[-248+W_CXPOS] Y[224+W_CYPOS] ;
G01 X[-56+W_CXPOS] Y[224+W_CYPOS] ;
G01 X[-56+W_CXPOS] Y[144+W_CYPOS] ;
G01 X[-104+W_CXPOS] Y[144+W_CYPOS] ;
G01 X[-120+W_CXPOS] Y[192+W_CYPOS] ;
G01 X[-184+W_CXPOS] Y[192+W_CYPOS] ;
G01 X[-200+W_CXPOS] Y[144+W_CYPOS] ;
G01 X[-248+W_CXPOS] Y[144+W_CYPOS] ;
G01 X[-248+W_CXPOS] Y[224+W_CYPOS] ;
G206 P0 X[-240+W_CXPOS] Y[200+W_CYPOS] ;
G242 X[-296+W_CXPOS] Y[88+16+W_CYPOS] ; /* 2 GROOVE
G01 X[-224+W_CXPOS] Y[88+16+W_CYPOS] ;
G01 X[-224+W_CXPOS] Y[72+16+W_CYPOS] ;
G01 X[-232+W_CXPOS] Y[72+16+W_CYPOS] ;
G01 X[-236+W_CXPOS] Y[80+16+W_CYPOS] ;
G01 X[-252+W_CXPOS] Y[80+16+W_CYPOS] ;
G01 X[-256+W_CXPOS] Y[72+16+W_CYPOS] ;
G01 X[-264+W_CXPOS] Y[72+16+W_CYPOS] ;
G01 X[-268+W_CXPOS] Y[80+16+W_CYPOS] ;
G01 X[-284+W_CXPOS] Y[80+16+W_CYPOS] ;
G01 X[-288+W_CXPOS] Y[72+16+W_CYPOS] ;
G01 X[-296+W_CXPOS] Y[72+16+W_CYPOS] ;
G01 X[-296+W_CXPOS] Y[88+16+W_CYPOS] ;
G206 P0 X[-290+W_CXPOS] Y[80+16+W_CYPOS] ;
G240 P4 ; /* set color
G242 X[-72+W_CXPOS] Y[144+W_CYPOS] ;
G01 X[-104+W_CXPOS] Y[144+W_CYPOS] ;
G01 X[-120+W_CXPOS] Y[192+W_CYPOS] ;
G01 X[-184+W_CXPOS] Y[192+W_CYPOS] ;
G01 X[-200+W_CXPOS] Y[144+W_CYPOS] ;
G01 X[-232+W_CXPOS] Y[144+W_CYPOS] ;
G240 P15 ; /* set color
/* z coord axis
G242 X[-304+W_CXPOS] Y[216+W_CYPOS] ;
G01 X[-24+W_CXPOS] Y[216+W_CYPOS] ;
G01 X[-28+W_CXPOS] Y[220+W_CYPOS] ;
G242 X[-24+W_CXPOS] Y[216+W_CYPOS] ;
G01 X[-28+W_CXPOS] Y[212+W_CYPOS] ;
/* x coord axis