/*ʽt1t2,t1t2滻
37.6115=cos(t1)*40
8.4672=cos(t2)*40
XΪֱֵ*/

/*FANUCͬϵ
֧֣
FANUC 0iFANUC 0 i MateFANUC 18i
GSK 980TDbKND 1000
ɭMITSUBISH...*/

t1<t2ʱ
#1=t1/*˴t1滻*/
WHILE[#1LEt2] DO1/*˴t2滻*/
#2=SIN[#1]*30
#3=COS[#1]*40
#4=#3*SIN[30]+#2*COS[30]+20
#5=#3*COS[30]-#2*SIN[30]-50
G01X[2*#4]Z[#5]
#1=#1+1
END1

t1>t2ʱ
#1=t1/*˴t1滻*/
WHILE[#1GEt2] DO1/*˴t2滻*/
#2=SIN[#1]*30
#3=COS[#1]*40
#4=#3*SIN[30]+#2*COS[30]+20
#5=#3*COS[30]-#2*SIN[30]-50
G01X[2*#4]Z[#5]
#1=#1-1
END1


/*ϵͳ֧ͺšע⵱гǺt1t2Ҫתɻ
t1=t1*PI/180;*/

t1<t2ʱ
#1=t1/*˴t1滻*/
WHILE #1LEt2/*˴t2滻*/
#2=SIN[#1]*30
#3=COS[#1]*40
#4=#3*SIN[0.523599]+#2*COS[0.523599]+20
#5=#3*COS[0.523599]-#2*SIN[0.523599]-50
G01X[2*#4]Z[#5]
#1=#1+0.1
ENDW

t1>t2ʱ
#1=t1/*˴t1滻*/
WHILE #1GEt2/*˴t2滻*/
#2=SIN[#1]*30
#3=COS[#1]*40
#4=#3*SIN[0.523599]+#2*COS[0.523599]+20
#5=#3*COS[0.523599]-#2*SIN[0.523599]-50
G01X[2*#4]Z[#5]
#1=#1-0.1
ENDW


/*ϵͳ֧ͺ*/

t1<t2ʱ
R1=t1/*˴t1滻*/
CCCAM:
R2=SIN(R1)*30
R3=COS(R1)*40
R4=R3*SIN(30)+R2*COS(30)+20
R5=R3*COS(30)-R2*SIN(30)-50
G01X(2*R4)Z(R5)
R1=R1+1
IF R1<=t2 GOTOB CCCAM/*˴t2滻*/

t1>t2ʱ
R1=t1/*˴t1滻*/
CCCAM:
R2=SIN(R1)*30
R3=COS(R1)*40
R4=R3*SIN(30)+R2*COS(30)+20
R5=R3*COS(30)-R2*SIN(30)-50
G01X(2*R4)Z(R5)
R1=R1-1
IF R1>=t2 GOTOB CCCAM/*˴t2滻*/
