
B-63343EN/02 SAMPLE PROGRAM 5.USER PROGRAMS FOR DISPLAYING GUIDANCE DRAWING AT FIGURE DATA INPUTTING
- 183 -
G206 P4 X-16 Y[192-32]
/* arrow on circle
/*N030 G242 X[32*COS[-45]+#10008] Y[32*SIN[-45]+#10009-32]
/* G01 X[[32-8]*COS[-45]-[0-3]*SIN[-45]+#10008] Y[[32-8]*SIN[-45]+[0-3]*COS[-45]+#10009-32]
/* G01 X[[32-8]*COS[-45]-[0+3]*SIN[-45]+#10008] Y[[32-8]*SIN[-45]+[0+3]*COS[-45]+#10009-32]
/* G01 X[32*COS[-45]+#10008] Y[32*SIN[-45]+#10009-32]
/* G206 P4 X[[32-5]*COS[-45]+#10008] Y[[32-5]*SIN[-45]+#10009-32]
/* center point
/*N020 G242 X[2+#10008] Y#10009
N020 G242 X[2-16] Y192
/* G03 X[2+#10008] Y#10009 I#10008 J#10009 Q4
G03 X[2-16] Y192 I-16 J192 Q4
/* G206 P4 X#10008 Y#10009
G206 P4 X-16 Y192
/* arrow on line
/*N030 G242 X[32*COS[-45]+#10008] Y[32*SIN[-45]+#10009]
N030 G242 X[32*COS[-45]-16] Y[32*SIN[-45]+192]
/* G01 X[[32-8]*COS[-45]-[0-3]*SIN[-45]+#10008] Y[[32-8]*SIN[-45]+[0-3]*COS[-45]+#10009]
G01 X[[32-8]*COS[-45]-[0-3]*SIN[-45]-16] Y[[32-8]*SIN[-45]+[0-3]*COS[-45]+192]
/* G01 X[[32-8]*COS[-45]-[0+3]*SIN[-45]+#10008] Y[[32-8]*SIN[-45]+[0+3]*COS[-45]+#10009]
G01 X[[32-8]*COS[-45]-[0+3]*SIN[-45]-16] Y[[32-8]*SIN[-45]+[0+3]*COS[-45]+192]
/* G01 X[32*COS[-45]+#10008] Y[32*SIN[-45]+#10009]
G01 X[32*COS[-45]-16] Y[32*SIN[-45]+192]
/* G206 P4 X[[32-5]*COS[-45]+#10008] Y[[32-5]*SIN[-45]+#10009]
G206 P4 X[[32-5]*COS[-45]-16] Y[[32-5]*SIN[-45]+192]
/* line
/*N040 G242 X[32*COS[-45]+#10008] Y[32*SIN[-45]+#10009] ;
N040 G242 X[32*COS[-45]-16] Y[32*SIN[-45]+192] ;
/* G01 X#10008 Y#10009 ;
G01 X-16 Y192 ;
N050 G240 P0 C11 ; /* color = black
G243 X36 Y6 ('(X,Z)') ;
G243 X36 Y2 ('(I,K)') ;
G243 X38 Y4 ('R') ;
N300
M99 P300
/*************************************************************
/* Copyright (C) 1997 by FANUC LTD. ALL rights reserved. *
/*************************************************************
/* GUIDANCE FOR CIRCLE CCW (USED IN SINGLE and BAR)
O1083
G244 P0 ; /* set solid line
G240 P4 ; /* set color blue
/* #10010=-16 /* ARC CENTER POINT X
/* #10011=160 /* ARC CENTER POINT Y
/* draw circle
/*N010 G242 X[32+#10010] Y#10011 ;
N010 G242 X[32-16] Y160 ;
/* G03 X#10010 Y[32+#10011] I#10010 J#10011 Q1 ;
G03 X-16 Y[32+160] I-16 J160 Q1 ;
/* END POINT MARK
N015 G242 X[-16-2] Y[160+32] ;
G03 X[-16-2] Y[160+32] I-16 J[160+32] Q4 ;
G206 P4 X-16 Y[160+32]
/* arrow on circle
/*N030 G242 X[32*COS[45]+#10010] Y[32*SIN[45]+32+#10011]
/* G01 X[[32-8]*COS[45]-[0-3]*SIN[45]+#10010] Y[[32-8]*SIN[45]+[0-3]*COS[45]+32+#10011]
/* G01 X[[32-8]*COS[45]-[0+3]*SIN[45]+#10010] Y[[32-8]*SIN[45]+[0+3]*COS[45]+32+#10011]
/* G01 X[32*COS[45]+#10010] Y[32*SIN[45]+32+#10011]
/* G206 P4 X[[32-5]*COS[45]+#10010] Y[[32-5]*SIN[45]+32+#10011]
/* center point
/*N020 G242 X[2+#10010] Y#10011
N020 G242 X[2-16] Y160
/* G03 X[2+#10010] Y#10011 I#10010 J#10011 Q4
G03 X[2-16] Y160 I-16 J160 Q4
/* G206 P4 X#10010 Y#10011
G206 P4 X-16 Y160