
6.GUIDANCE WINDOW FOR DATA ITEM SAMPLE PROGRAM B-63343EN/02
- 206 -
IF [#9200 EQ 104] THEN /*
G240 P[CSRFRT] C[CSRBAK] L1 /* SET COLOR
ELSE /*
G240 P0 C11 /* SET COLOR
ENDIF /*
G243 X11 Y9 ('E') /* END
/* /*
IF [#9200 EQ 101 || #9200 EQ 102] THEN /*
G240 P[CSRFRT] C[CSRBAK] L1 /* SET COLOR
ELSE /*
G240 P0 C11 /* SET COLOR
ENDIF /*
G243 X29 Y9 ('S') /* START
/* /*
IF [#9200 EQ 105] THEN /*
G240 P[CSRFRT] C[CSRBAK] L1 /* SET COLOR
ELSE /*
G240 P0 C11 /* SET COLOR
ENDIF /*
G243 X31 Y5 ('D') /* DIAMETER
/* /*
#8509=0 /* MD0056
GOTO999;
/*
/* PT OUTER
/*
N1500 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 ('PIPE-T (OUTER) ') ;
G244 P0 ; /* set solid line
G240 P10 ; /* set color
/* work figure
G242 X[-296+W_CXPOS] Y[184+W_CYPOS] ;
G01 X[-96+W_CXPOS] Y[184+W_CYPOS] ;
G01 X[-96+W_CXPOS] Y[168+W_CYPOS] ;
G01 X[-112+W_CXPOS] Y[136+W_CYPOS] ;
G01 X[-128+W_CXPOS] Y[160+W_CYPOS] ;
G01 X[-144+W_CXPOS] Y[128+W_CYPOS] ;
G01 X[-160+W_CXPOS] Y[152+W_CYPOS] ;
G01 X[-176+W_CXPOS] Y[120+W_CYPOS] ;
G01 X[-192+W_CXPOS] Y[144+W_CYPOS] ;
G01 X[-208+W_CXPOS] Y[112+W_CYPOS] ;
G01 X[-224+W_CXPOS] Y[136+W_CYPOS] ;
G01 X[-240+W_CXPOS] Y[104+W_CYPOS] ;
G01 X[-296+W_CXPOS] Y[104+W_CYPOS] ;
G01 X[-296+W_CXPOS] Y[184+W_CYPOS] ;
G206 P0 X[-290+W_CXPOS] Y[180+W_CYPOS] ;
G240 P4 ; /* set color
G242 X[-96+W_CXPOS] Y[184+W_CYPOS] ;
G01 X[-96+W_CXPOS] Y[168+W_CYPOS] ;
G01 X[-112+W_CXPOS] Y[136+W_CYPOS] ;
G01 X[-128+W_CXPOS] Y[160+W_CYPOS] ;
G01 X[-144+W_CXPOS] Y[128+W_CYPOS] ;
G01 X[-160+W_CXPOS] Y[152+W_CYPOS] ;
G01 X[-176+W_CXPOS] Y[120+W_CYPOS] ;
G01 X[-192+W_CXPOS] Y[144+W_CYPOS] ;
G01 X[-208+W_CXPOS] Y[112+W_CYPOS] ;
G01 X[-224+W_CXPOS] Y[136+W_CYPOS] ;
G01 X[-240+W_CXPOS] Y[104+W_CYPOS] ;
G01 X[-296+W_CXPOS] Y[104+W_CYPOS] ;
G240 P15 ; /* set color
/* z coord axis
G242 X[-304+W_CXPOS] Y[216+W_CYPOS] ;