M03S100T0101
#100=(x为起点);
#101=(z为起点)
#102=(螺距);
#103=(刀尖宽度);
#104=(前8层吃刀量,直径值)
#105=(大经);
#106=(z终点)
#119=0.366
#117=0.13395
#107=#102
#110=#100-#105
#111=[#107-#119*#102-#103]/2+#118*#117
IF[#102LT14]GOTO2
IF[#102GT44]GOTO3
#120=2[#102/2+1]+#110
#124=0.8
GOTO5
N2IF[#102LT6]GOTO3
IF[#102GT12]GOTO3
#120=2[#102/2+0.5]+#110
#124=0.6
GOTO5
N3GOTO200
N5#114=#107-#119*#102-2*#103
#131=[#114-#103]/2
#130=#114+1-2*#103
G00Z#101
X#100
WHILE[#110NE#120]DO1
IF[#118EQ#0]GOTO6
#114=0
#115=2
GOTO9
N6IF[#112GT7]GOTO7
#115=#104
GOTO9
N7IF[#112NE8]GOTO8
#115=3*#104/4
GOTO9
N8IF[#112NE28]GOTO9
#115=#104/2
N9#113=#117*#115
#110=#110+#115
IF[#110LE#12O]GOTO11
#110=#120
#113=[#120-#116]*#117
N11#111=#111-#113
G00Z#101
IF[#130LT0.6]GOTO14
G92U-#110Z#106F#107
#130=#130-2*#113
#123=#123+1
N14IF[#131LT0.3]GOTO13
G00W[#131+0.5]
G92U-#110Z#106F#107
G00Z#101
G00W-[#131+0.5]
N13IF[#114LT#124]GOTO12
G92U-#110Z#106F#107
#114=#114-2*#113
#131=#131-#113
G00Z#101
N12G00W#111
G92U-#110Z#106F#107
G00Z#101
G00W-#111
G92U-#110Z#106F#107
G00Z#101
#112=#112+1
#116=#110
END1
N200G00U200
M05
M30
扩展资料:
螺纹代号:单线螺纹:Tr40×6-6h-L;Tr:螺纹种类代号(梯形螺纹);40:公称直径;6:导程(对于单线螺纹而言,导程即为螺距);6h:内螺纹公差代号;L:旋合长度代号。
左旋螺纹需在尺寸规格之后加注“LH”,右旋则不注出。例如Tr36×12(6);Tr44×16(8)LH等。
各基本尺寸名称,代号及计算公式如下:
牙型角:α=30°
螺距P:由螺纹标准确定,牙顶间隙acP=1.5~5ac=0.25;P=6~12ac=0.5;P=14~44ac=1
外螺纹:大径d公称直径
内螺纹:大径D4=d+2ac;中径D2=d2;小径D1=d-P;牙高H4=h3;牙顶宽f=0.366P;牙槽底宽w=0.366P-0.536ac;
螺纹升角ψ:tgψ=P/πd2。
参考资料来源:百度百科-梯形螺纹
小径是多少?几个头的?刀前刃宽度是多少?什么数据都没有谁能帮你?这么难得问题才给20分?\x0d\x0a给你个你自己改改吧\x0d\x0aO0178(外螺纹的B类宏程序--系统GSK-988T-980TDB)\x0d\x0a\x0d\x0a(锯齿,蜗杆,梯形,普通螺纹通用)\x0d\x0aG99\x0d\x0aT0404M4S100\x0d\x0a#100=350(螺纹的大径)\x0d\x0a#101=320(螺纹的小径)\x0d\x0a#102=35(螺纹的螺距)\x0d\x0a#103=2(刀尖宽度-注意测量与修改)\x0d\x0a#104=5(槽底宽)\x0d\x0a#105=4(螺纹头数)\x0d\x0a#106=0.2(每一刀的深度)\x0d\x0a#107=15(左边螺纹的角度)\x0d\x0a#120=15(右边螺纹的角度)\x0d\x0a#108=20(螺纹的起始点)\x0d\x0a#109=220(螺纹的长度)\x0d\x0a#110=0(螺纹的起始点角度)\x0d\x0a#111=360000(定义机床小数0.0000=3600000或者0.000=360000--360度)\x0d\x0a#112=#111/#105\x0d\x0a#113=#100+10\x0d\x0aG0Z#108M8\x0d\x0aX#113\x0d\x0aN10\x0d\x0a#114=#108-[[#100-#101]/2*TAN[#107]]-[#104-#103]/2\x0d\x0a#115=#108+[[#100-#101]/2*TAN[#120]]+[#104-#103]/2\x0d\x0a\x0d\x0aN20G0Z#115\x0d\x0aX#100\x0d\x0aG32Z-#109F#102Q#110\x0d\x0aG0X#113\x0d\x0a#110=#110+#112\x0d\x0aIF[#110LT#111]GOTO20\x0d\x0aIF[#110EQ#111]THEN#110=0\x0d\x0a#115=#115-#103\x0d\x0aIF[#115GE#114]GOTO20\x0d\x0a\x0d\x0aN30G0Z#114\x0d\x0aX#100\x0d\x0aG32Z-#109F#102Q#110\x0d\x0aG0X#113\x0d\x0a#110=#110+#112\x0d\x0aIF[#110LT#111]GOTO30\x0d\x0aIF[#110EQ#111]THEN#110=0\x0d\x0a#100=#100-#106\x0d\x0aIF[#100GE#101]GOTO10\x0d\x0aG0X150M5\x0d\x0aZ10M9\x0d\x0aT0404\x0d\x0aG0X200Z10\x0d\x0aM30欢迎分享,转载请注明来源:内存溢出
评论列表(0条)