皮帶輪梯形槽成組車削加工宏程序

​T0606MO3S800

G00X55Z5

#10=-8

 WHILE [#10GE-32]D03#1=2

#2=34/2#3=3

 WHILE [#1LE11]DO1

#4=11* TAN #2-#1* TAN #2#5-#10-3/2-#4

#6-#10 3/2 #4-#3#7=2*25-#1 0.1] WHILE [#5LE#6]D02 GOZ #5

G1X#7F0.2U5

 IF [#5EQ#6] GOTO 10

U5

 IF [#5EQ#6]G0TO10#5=#5 2

 IF [#5GT#6] THEN #5-#6END2

N10 IF [#1EQ11] GOTO 20#1=#1 2

 IF [#1GT11] THEN #1=11END1

N20GOX52

#10#10-12END3

GOX65

Z150

M30

T0606MO3S800

G00X55Z5

#10=- B 

 WHILE [#10GE-32]D03#1=2

#2=34/2#3=3

#4=12* TAN #2#5-#10-3/2-#4

#6-#10 3/2 #4-#3#7=2*[25-#1]

 GOX [50 2] Z #5

G1X[50-2*11] Z [#10-3/2]F0.2G1X52

 GOX [50 2] Z #6

G1X[50-2*11] Z [#10 3/2-3]F0.2G1X52

#3=3

#4=12* TAN #2#5=#10-3/2-#4

#6-#10 3/2 #4-#3#7=2*[25-#1]

 GOX [50 2] Z #5

G1X[50-2*11] Z [#10-3/2]F0.2G1X52

 GOX [50 2] Z #6

G1X[50-2*11] Z [#10 3/2-3]F0.2G1X52

#10-#10-12END3

GOX65

Z150

M30

 I

本站是提供個人知識琯理的網絡存儲空間，所有內容均由用戶發佈，不代表本站觀點。請注意甄別內容中的聯系方式、誘導購買等信息，謹防詐騙。如發現有害或侵權內容，請點擊一鍵擧報。