
6.GUIDANCE WINDOW FOR DATA ITEM SAMPLE PROGRAM B-63343EN/02
- 238 -
G240 P4 ; /* set color
/* start pos
G242 X[-88-3+W_CXPOS] Y[208+W_CYPOS] ;
G02 X[-88-3+W_CXPOS] Y[208+W_CYPOS] I[-88+W_CXPOS] J[208+W_CYPOS] Q4 ;
/* 1st pos
G242 X[-88-3+W_CXPOS] Y[184+W_CYPOS] ;
G02 X[-88-3+W_CXPOS] Y[184+W_CYPOS] I[-88+W_CXPOS] J[184+W_CYPOS] Q4 ;
/* 2nd pos
G242 X[-136-3+W_CXPOS] Y[168+W_CYPOS] ;
G02 X[-136-3+W_CXPOS] Y[168+W_CYPOS] I[-136+W_CXPOS] J[168+W_CYPOS] Q4 ;
/* 3rd pos
G242 X[-136-3+W_CXPOS] Y[120+W_CYPOS] ;
G02 X[-136-3+W_CXPOS] Y[120+W_CYPOS] I[-136+W_CXPOS] J[120+W_CYPOS] Q4 ;
/* 4th pos
G242 X[-88-3+W_CXPOS] Y[104+W_CYPOS] ;
G02 X[-88-3+W_CXPOS] Y[104+W_CYPOS] I[-88+W_CXPOS] J[104+W_CYPOS] Q4 ;
/* end pos
G242 X[-88-3+W_CXPOS] Y[80+W_CYPOS] ;
G02 X[-88-3+W_CXPOS] Y[80+W_CYPOS] I[-88+W_CXPOS] J[80+W_CYPOS] Q4 ;
GOTO 999 /* MD0056
/*
/* TRAPEZOIDAL GROOVE (FACE) DISPLAY CURSOR
/*
N3500 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 101 || #9200 EQ 102] THEN /*
G240 P[CSRFRT] C[CSRBAK] L1 /* SET COLOR
ELSE /*
G240 P0 C11 /* SET COLOR
ENDIF /*
G243 X30 Y2 ('S') /* START
/* /*
IF [#9200 GE 103 && #9200 LE 106] THEN /*
G240 P[CSRFRT] C[CSRBAK] L1 /* SET COLOR
ELSE /*
G240 P0 C11 /* SET COLOR
ENDIF /*
G243 X30 Y4 ('1') /* P1
/* /*
IF [#9200 GE 107 && #9200 LE 110] THEN /*
G240 P[CSRFRT] C[CSRBAK] L1 /* SET COLOR
ELSE /*
G240 P0 C11 /* SET COLOR
ENDIF /*
G243 X24 Y5 ('2') /* P2
/* /*
IF [#9200 GE 111 && #9200 LE 114] THEN /*
G240 P[CSRFRT] C[CSRBAK] L1 /* SET COLOR
ELSE /*
G240 P0 C11 /* SET COLOR
ENDIF /*
G243 X24 Y7 ('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 X30 Y8 ('4') /* P4
/* /*
IF [#9200 EQ 119 || #9200 EQ 120] THEN /*