机械社区

 找回密码
 注册会员

QQ登录

只需一步,快速开始

搜索
查看: 4278|回复: 10

自己写了一个梯形外螺纹的宏程序,请大侠们指教

[复制链接]
发表于 2014-9-20 18:59:11 | 显示全部楼层 |阅读模式
M03 S400 T0101
6 w! [' A( I, A/ N#1=(刀尖宽)        
( M7 W) B$ y" H5 i. J#2=(螺纹大径); P9 E) _9 C; u/ {* y3 ^( [
#3=(螺纹小径)
* [1 \3 o, T# ~$ y# F#4=(进刀量)
6 n2 f/ x6 F: S; D1 G#5=(螺纹底宽)
$ G* o% o" i9 h  t# m& W; R6 [#6=(进刀点)
, l' @) w6 B- X/ Z& R#7=#2-#3
. Q( D) l! _8 `- v1 r#11=(螺纹终点)+ H( X$ n. e$ D" V0 H
#12=(螺距)
$ G& y6 \3 `, {#13=(螺纹角度的一半)* F4 Q1 s( F! {
G0X[#2+10]
* F, x& ^& W+ U' q. C- `Z#6
) M  W/ V  v( q; y& \$ UWHILE[#7GT0]DO1; G% c1 ?, i5 |$ `4 \" r) g+ S
G0X[#2+2]2 [5 d' C/ _/ |9 q/ u3 t; {
Z#6) ~8 v5 d) u# }) a; l
X[#7+#3]
0 N" V2 T4 P4 d. B9 r/ \, H# d, g' FG32Z#11F#12+ U% f9 ~9 ~7 U
G0X[#2+2]! A" u' i- [9 \0 H& J
Z#6
0 q. r- o4 `6 X- O% n+ l8 d0 a, V#9=#68 y6 s1 F$ G* B9 k+ S8 n4 f
#8=[#7/2*TAN#13*2+#5]
* t9 n% s/ M: C9 U#10=#8
: S; O& W" s  V" [& V3 e" F#10=#10-#17 B( I8 \& m5 o+ N# a9 k8 g
WHILE[#10GT#1]DO2
9 ?  j6 S3 b& o8 d' ^#9=#9+0.9#1
- [5 X* K2 ?/ ^& WG0X[#2+2]
% |' Q+ n( q4 dZ#9
9 G) p7 ~0 a4 _0 L7 w; {X[#7+#3]1 ?9 k7 O* I  k9 X3 e
G32Z#11F#12  R2 L. U& C% I
G0X[#2+2]! S/ P- H* I7 K
Z#9% `! C: o) m! z/ e& [+ Z
#10=#10-0.9#1
1 T! p  S: x4 J- E# wEND2$ v3 r& j8 J" B& p5 t6 x
G0Z[#8-#1+#6]7 G& z* f! d/ u/ ]$ \* u" d
X[#3+#7]
( Z2 y9 U; t0 H7 u" ^' e) u: |; s0 CG32Z#11F#12& K  Q) l3 c" ~
#7=#7-#40 g; w- W  P% O& l5 o
#6=[#4/2*TAN#13+#6]
. @4 k/ ^- x" |/ [6 J2 z) AEND1; ^, U; B4 ^2 `; p' v" j& S
G0X[#2+50]
. n9 d( J8 U' ?: U! Y! g5 |Z100
5 C. }# V0 d7 L4 W: _+ d) M3 eM30
8 \& R* T# _' @$ t* Z+ W
+ X( X) C' s9 p3 }# a

评分

参与人数 1威望 +1 收起 理由
80.后青年 + 1 热心助人,专业精湛,希望高手的指点啊

查看全部评分

回复

使用道具 举报

发表于 2014-9-20 21:04:47 | 显示全部楼层
顶下楼主,菜鸟看不懂啊,再注释一下就好了!
0 h0 F. x. E& X$ a( j8 }- Cdo1 do2是在哪里呢?
回复 支持 反对

使用道具 举报

 楼主| 发表于 2014-9-21 23:51:02 | 显示全部楼层
duanyz 发表于 2014-9-20 21:04
: a1 M3 k1 `3 H1 j2 W9 x顶下楼主,菜鸟看不懂啊,再注释一下就好了!
  l& M' k9 p# a+ L. E0 Vdo1 do2是在哪里呢?

, Z7 h8 u7 F' S/ {' r2 r. L, ~do1和do2不是跳转,你说的可能是GOTO.

点评

那o1、o2是子程序吗? 你也给点注释啊!你看大家看了都没什么热情。  详情 回复 发表于 2014-9-22 14:13
回复 支持 反对

使用道具 举报

发表于 2014-9-22 14:13:47 | 显示全部楼层
lbgwll 发表于 2014-9-21 23:51
0 {0 x3 {/ ?" L/ O/ N5 ~do1和do2不是跳转,你说的可能是GOTO.
) W4 Q( d, F  {0 E' w8 J( a, @
那o1、o2是子程序吗?
; g/ G$ h/ N# E/ F+ b" h3 V' l( [: [) W5 Q4 g
你也给点注释啊!你看大家看了都没什么热情。+ f; X3 U- ^- P, t4 }

/ D( D6 {, `% r: W/ Y0 S
回复 支持 反对

使用道具 举报

 楼主| 发表于 2014-9-22 21:32:01 | 显示全部楼层
duanyz 发表于 2014-9-22 14:13
4 c6 l' Y4 W  e5 r8 O那o1、o2是子程序吗?3 l1 K/ k- [7 w
- \$ Z7 }6 `0 p- T& ?" E7 o
你也给点注释啊!你看大家看了都没什么热情。

& X# J7 h# h3 f% l; ~/ A你是做数控的吗$ i* S3 V1 ^0 P" z  v! F. X" a

" p! T+ k' D4 Q: E4 I) T0 J

点评

这个很重要吗?你发程序出来的初衷是什么呢?  发表于 2014-9-22 22:47
回复 支持 反对

使用道具 举报

 楼主| 发表于 2014-9-23 19:16:00 | 显示全部楼层

梯形外螺纹宏程序

lbgwll 发表于 2014-9-22 21:32 0 g& J) L( ^5 E0 Z1 D8 h
你是做数控的吗

5 j8 d+ l/ T. v5 Q; {2 G2 Y' K只是随便问一下,
. a" A, u( f' v$ L3 ?7 _如果真的对你有用的话可以帮你解释一下
回复 支持 反对

使用道具 举报

发表于 2014-9-25 21:46:53 | 显示全部楼层
lbgwll 发表于 2014-9-23 19:16
& ^/ f2 ?/ F. b% q只是随便问一下,
* y% g/ D- t3 `6 a. J! `5 ?( A如果真的对你有用的话可以帮你解释一下
: h9 d3 B7 ~) Q
程序好坏试了才知道只有掌握要领才会进步3 i& ]  v. [! }9 }7 A, y. Q* m
回复 支持 反对

使用道具 举报

发表于 2014-9-27 05:27:19 来自手机 | 显示全部楼层
你上机试过吗?好像有点小问题也。低径最后一刀没有吧,x分刀也有点问题。控制方式不太好。
回复 支持 反对

使用道具 举报

发表于 2014-9-27 05:28:37 来自手机 | 显示全部楼层
有有需要我可以发一个给你

点评

:兄弟直接贴出来吧,让我们也学习下  详情 回复 发表于 2014-9-27 13:21
回复 支持 反对

使用道具 举报

发表于 2014-9-27 13:21:17 来自手机 | 显示全部楼层
nchyl520 发表于 2014-9-27 05:28; K0 H$ f6 r% `5 \; M+ W
有有需要我可以发一个给你

1 L: r. F5 V% n# `2 d:兄弟直接贴出来吧,让我们也学习下
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册会员

本版积分规则

小黑屋|手机版|Archiver|机械社区 ( 京ICP备10217105号-1,京ICP证050210号,浙公网安备33038202004372号 )

GMT+8, 2025-1-11 03:52 , Processed in 0.061674 second(s), 20 queries , Gzip On.

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表