
6.GUIDANCE WINDOW FOR DATA ITEM SAMPLE PROGRAM B-63343EN/02
- 254 -
ENDIF /*
/* /*
N62 IF [[P3102 AND 2] EQ 2] THEN /*
#8509=7353 /* GERMAN
GOTO 80 /*
ENDIF /*
/* /*
N64 IF [[P3102 AND 4] EQ 4] THEN /*
#8509=7354 /* FRENCH
GOTO 80 /*
ENDIF /*
/* /*
N66 IF [[P3102 AND 16] EQ 16] THEN /*
#8509=7355 /* ITALIA
GOTO 80 /*
ENDIF /*
/*
N68 IF [[P3102 AND 64] EQ 64] THEN /*
#8509=7356 /* SPANISH
GOTO 80 /*
ENDIF /*
/* /*
N70 #8509=7351 /* ENGLISH
/* /*
N80 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 /*
/* MD0056 END /*
IF [#9200 EQ 7] THEN /*
G240 P[CSRFRT] C[CSRBAK] L1 /* SET COLOR
ELSE /*
G240 P0 C11 /* SET COLOR
ENDIF /*
G243 X34 Y6 ('D') /* DIAMETER
/* /*
IF [#9200 EQ 8] THEN /*
G240 P[CSRFRT] C[CSRBAK] L1 /* SET COLOR
ELSE /*
G240 P0 C11 /* SET COLOR
ENDIF /*
G243 X23 Y10 ('S') /* START
/* /*
IF [#9200 EQ 9] THEN /*
G240 P[CSRFRT] C[CSRBAK] L1 /* SET COLOR
ELSE /*
G240 P0 C11 /* SET COLOR
ENDIF /*
G243 X18 Y10 ('E') /* END
/*
IF [#9200 EQ 10] THEN /*
G240 P[CSRFRT] C[CSRBAK] L1 /* SET COLOR
ELSE /*
G240 P0 C11 /* SET COLOR
ENDIF /*
G243 X21 Y1 ('C') /* CLEARANCE
/*
IF [#9200 EQ 11] THEN /*
G240 P[CSRFRT] C[CSRBAK] L1 /* SET COLOR
ELSE /*
G240 P0 C11 /* SET COLOR
ENDIF /*
G243 X11 Y4 ('P') /* DWELL
M99