B-63343EN/02 SAMPLE PROGRAM 6.GUIDANCE WINDOW FOR DATA ITEM
- 227 -
G01 X[-100+W_CXPOS] Y[104+W_CYPOS] ;
G01 X[-104+W_CXPOS] Y[108+W_CYPOS] ;
G242 X[-100+W_CXPOS] Y[104+W_CYPOS] ;
G01 X[-96+W_CXPOS] Y[108+W_CYPOS] ;
G242 X[-280+W_CXPOS] Y[72+W_CYPOS] ;
G01 X[-160+W_CXPOS] Y[72+W_CYPOS] ;
G242 X[-280+W_CXPOS] Y[80+W_CYPOS] ;
G01 X[-280+W_CXPOS] Y[64+W_CYPOS] ;
G242 X[-208+W_CXPOS] Y[80+W_CYPOS] ;
G01 X[-208+W_CXPOS] Y[64+W_CYPOS] ;
G242 X[-176+W_CXPOS] Y[80+W_CYPOS] ;
G01 X[-176+W_CXPOS] Y[64+W_CYPOS] ;
G242 X[-168+W_CXPOS] Y[80+W_CYPOS] ;
G01 X[-168+W_CXPOS] Y[64+W_CYPOS] ;
G242 X[-280+W_CXPOS] Y[72+W_CYPOS] ;
G01 X[-276+W_CXPOS] Y[76+W_CYPOS] ;
G242 X[-280+W_CXPOS] Y[72+W_CYPOS] ;
G01 X[-276+W_CXPOS] Y[68+W_CYPOS] ;
G242 X[-212+W_CXPOS] Y[76+W_CYPOS] ;
G01 X[-204+W_CXPOS] Y[68+W_CYPOS] ;
G242 X[-204+W_CXPOS] Y[76+W_CYPOS] ;
G01 X[-212+W_CXPOS] Y[68+W_CYPOS] ;
G242 X[-176+W_CXPOS] Y[72+W_CYPOS] ;
G01 X[-180+W_CXPOS] Y[76+W_CYPOS] ;
G242 X[-176+W_CXPOS] Y[72+W_CYPOS] ;
G01 X[-180+W_CXPOS] Y[68+W_CYPOS] ;
G242 X[-168+W_CXPOS] Y[72+W_CYPOS] ;
G01 X[-164+W_CXPOS] Y[76+W_CYPOS] ;
G242 X[-168+W_CXPOS] Y[72+W_CYPOS] ;
G01 X[-164+W_CXPOS] Y[68+W_CYPOS] ;
G240 P0 C11 ; /* set color
/* axis name
G243 X36 Y12 ('X') ;
G243 X37 Y2 ('Z') ;
G240 P4 ; /* set color
/* start pos
G242 X[-208-3+W_CXPOS] Y[168+W_CYPOS] ;
G02 X[-208-3+W_CXPOS] Y[168+W_CYPOS] I[-208+W_CXPOS] J[168+W_CYPOS] Q4 ;
/* end pos
G242 X[-176-3+W_CXPOS] Y[144+W_CYPOS] ;
G02 X[-176-3+W_CXPOS] Y[144+W_CYPOS] I[-176+W_CXPOS] J[144+W_CYPOS] Q4 ;
GOTO 999 /* MD0056
/* GROOVE (INNER) DISPLAY CURSOR
/* MD0056 START
N2500 IF [#9200 EQ 5 || #9200 EQ 6] THEN /* CUT START POINT
G240 P[CSRFRT] C[CSRBAK] L0 /* SET COLOR
G243 X1 Y12 P1001 /*
ELSE /*
G240 P0 C11 L0 /* SET COLOR
G243 X1 Y12 P1002 /*
ENDIF /*
/* /*
IF [#9200 EQ 15 || #9200 EQ 16] THEN /*
G240 P[CSRFRT] C[CSRBAK] L1 /* SET COLOR
ELSE /*
G240 P0 C11 /* SET COLOR
ENDIF /*
G243 X15 Y5 ('S') /* START
/* /*
IF [#9200 EQ 17] THEN /*
G240 P[CSRFRT] C[CSRBAK] L1 /* SET COLOR
ELSE /*
G240 P0 C11 /* SET COLOR
ENDIF /*
G243 X18 Y5 ('E') /* END
/* /*
IF [#9200 EQ 12] THEN /*