
2.USER PROGRAMS FOR DISPLAYING GUIDANCE DRAWING FOR GUIDANCE CUTTING SAMPLE PROGRAM B-63343EN/02
- 170 -
G310 R975 Q128 L1 /* LIMIT:effective
ELSE
G310 R975 Q0 L1 /* LIMIT :: ineffective
ENDIF
/*
/* SEND TO P.M.C
/*
N500 G310 R961 Q[LINE_CUT] ; /*
G310 R962 Q[WORK_COS] L4 ; /*
G310 R966 Q[WORK_SIN] L4 ; /*
G310 R970 Q[VERT_LEN] L4 ; /*
G310 R974 Q[RMV_DIR] ; /*
G310 R979 Q[SET_FLAG] ; /*
/*
N900 M98 P1099 /*FOR DISPLAY HANDLE
/*
N1000 M99 ;
/*
/*
/**********************************************
/* SET UNIT_F8 *
/**********************************************
/*
O1107 W_1004 = 0
/*
N15 IF [[P0 AND 4] EQ 4]GOTO 30;
IF [[P1004 AND 128] EQ 128]THEN
IF [[P1004 AND 1] EQ 0 && W_1004 EQ 0]THEN
W_UNIT1 = 7.3
GOTO 100
ENDIF;
IF [[P1004 AND 1] EQ 1 && W_1004 EQ 0]THEN
W_UNIT1 = 7.2
GOTO 100
ENDIF;
IF [[P1004 AND 1] EQ 0 && W_1004 EQ 1]THEN
W_UNIT1 = 7.3
GOTO 100
ENDIF;
ELSE ;
IF [[P1004 AND 1] EQ 0 && W_1004 EQ 0]THEN
W_UNIT1 = 7.3
GOTO 100
ENDIF;
IF [[P1004 AND 1] EQ 1 && W_1004 EQ 0]THEN
W_UNIT1 = 7.2
GOTO 100
ENDIF;
IF [[P1004 AND 1] EQ 0 && W_1004 EQ 1]THEN
W_UNIT1 = 7.4
GOTO 100
ENDIF;
ENDIF;
/*
/*
N30 IF [[P1004 AND 128] EQ 128]THEN
IF [[P1004 AND 1] EQ 0 && W_1004 EQ 0]THEN
W_UNIT1 = 7.4
GOTO 100
ENDIF;
IF [[P1004 AND 1] EQ 1 && W_1004 EQ 0]THEN
W_UNIT1 = 7.3
GOTO 100
ENDIF;
IF [[P1004 AND 1] EQ 0 && W_1004 EQ 1]THEN
W_UNIT1 = 7.4
GOTO 100