亚洲欧美日韩国产一区二区精品_亚洲国产精品一区二区动图_级婬片A片手机免费播放_亚洲国产成人Av毛片大全,男女爱爱好爽好疼视频免费,中文日韩AV在线,无码视频免费,欧美在线观看成人高清视频,在线播放免费人成毛片,成 人 网 站 在 线 视 频A片 ,亚洲AV成人精品一区二区三区

機械社區(qū)

標題: 車蝸桿的宏程序 [打印本頁]
作者: wangfuqiang1123    時間: 2011-4-24 08:54
標題: 車蝸桿的宏程序
. P# k) a1 H" M  Z6 p" C/ W8 J( n
CALL O2513 V1=12 V2=15 V3=40 V5=1 V8=1.3 V9=1.3 V10=80 V15=4 V20=20 V30=25.13 V25=6 V40=180 V41=82 V42=V20 V50=0101 V51=900$ [' K6 b% \' h; Y0 O* W* R5 T
' Z$ N1 ^8 W9 Y2 Y0 J
M30( N- o+ r' [- x
9 J/ f2 ^' U( p2 _5 M( M# u
O2513; ]! o3 K$ u4 p" b" b7 ~
(V1=齒寬 V2=齒高 V3=齒形角 V4=倒角圓弧夾角 V5=倒角半徑  V8=Z1預留量 V9= Z2預留量 V10=大徑)# f% M6 Y/ U$ R2 A$ }8 T* M
(V15=齒底過切量 V20=z~起點 V30=導程 V25=蝸桿~退刀角）" ^; s+ ~) x0 a/ Z( r
(V31=X~變 V32=Z~變量 V40=z~終點 V41=X~退刀 V42=Z~起點 V50=刀補刀號 V51=主軸轉速 )" U, C7 S: `2 m# }$ |
% a) `% o% q# ?8 W3 V' J6 L
V21=0
. K$ q- P8 V4 B* GT=V50
3 v1 Y* o/ Z& c4 nM01$ _" m. s) q! U( A. M
G97M03S=V51, `. j9 l) E! z# U
G0X=V41Z=-V42M83 O' ?: K8 h' G- u* n( m' D* p
N90) r* y: K! Q  d# b* m
V21=V21+0.5
: b% f  n0 J* F  F3 I. r5 D0 y! hV22=TAN[V3/2]*V21
6 p7 K, v/ B" h5 }4 g3 o) VV31=V10-V21*2
" q* z. b* g* uV32=V20+V22+V8- j7 K9 W( {. i
V33=V20+V1-V9-V22
" b" f0 i, [6 T: S& a7 f& BN913 P6 i/ S1 E, \( i
G0X=V31Z=-V32/ d+ T/ h% t% f3 u
G34Z=-V40F=V30
1 F& u- F; ^# R2 Q; JG0X=V41
, E( w' H0 x  T$ k: L) q# GZ=-V42
# N$ H+ k) [4 CV32=V32+0.5
8 {, a& }0 R* G' s3 RIF [ V32 LE V33 ] GOTO N91- l* r' `( O) {: U' o! [$ j( N
IF [ V21 LE [V2-0.5] ] GOTO N90& k2 b8 y; X3 P9 }1 Y" j* ~

* s1 r" ]6 f  O) jV11=0, s7 q' g5 P) b, [' f
V4=90-V3/2
" {! B2 b  E4 E! o: i1 b/ ^$ }T=V505 b$ |7 D( J$ _* c' E2 m: k8 ?9 B" _
M01
$ U) R, B, l, k* H* r' QG97M03S=V51
+ C% @9 w9 Q* KG0X=V41Z=-V42M8) s& p, }% P4 Z3 D' T
N1004 B  \+ U% V- G  W- x
V11=V11+2." O2 H1 n  Y6 a2 E5 D
V12=COS[V11]*V5& V/ ^" a/ [1 G! {/ G
V13=SIN[V11]*V5
; W8 `+ D2 Z1 k1 A! r, ?V31=V12*2+V10-V5*27 T0 t4 J1 t! t4 K! }
V32=V20+V13
3 N$ C# ]0 w/ S8 y' S6 W8 MG0X=V31Z=-V323 L; s" C; q+ v& M& P/ r. L" ^( q: J
G34Z=-V40L=V25F=V30
7 ^) }$ W' |7 X/ F2 t% I# hG0X=V41/ n" a' c" q/ x3 D0 @6 X5 K% [: q
Z=-V429 v5 K5 S, C& n  Y2 X2 q/ z7 w" [
IF [ V11 LE V4 ] GOTO N100& w" C4 t. U5 C" T9 j2 K3 I2 S4 t

/ m2 g1 m! z* f! E8 N( B9 t' N+ kV21=0, q) v1 k- W9 K
T=V50
7 I! s0 {# ?7 W% eM01. m8 Q. j; V2 p4 o: N  B
G97M03S=V51/ [' k0 y& c/ ^" {: q' ]
V100=[V2-[V5-COS[V4]*V5]]
8 @2 e$ [% q6 |# N. v6 l0 yN200
& y0 i3 P; F. O& m% AV21=V21+0.1! X  a5 H) P6 d% r1 F( M: u6 `: i
V22=TAN[V3/2]*V21
: _  E: |9 ~. ~" {+ Y! IV31=[V10-2*V5+COS[V4]*V5*2]-V21*2$ S/ u) h6 o' U; |1 G/ t
V32=V20+V13+V22, ]) \) x  k) K9 `
G0X=V31Z=-V32) G: K& U" F* b8 n
G34Z=-V40L=25F=V30
& B* `3 B. S( _1 n0 L- kG0X=V41  M/ A0 H6 |' _7 q  c
Z=-V42! ^' Y  [2 X3 o
IF [ V21 LE V100 ] GOTO N200' k& g! A1 x$ b  b
1 a. G2 R% o& s/ m( R+ U
V35=0
( K# A2 L6 N9 GT=V50
' t  J( @" s# ^" w) vM019 C2 V- q# F: T/ D6 G, I
G97M03S=V51/ E7 z9 s' Z; I/ k: c# f3 i: f
N201/ f; E% f8 h0 |5 U9 c5 o' X  o1 O
V33=V32+V35
: f8 \8 b( j0 b7 LG0X=V31Z=-V33
- e! l3 L. r/ p: h/ x2 \G34Z=-V40L=V25F=V309 N6 ^  ^5 U3 K# j( A/ ~* X* ?
G0X=V414 a( z, t  M: k$ Z' G: A: ~; D
Z=-V42
, b& {, w' L9 ?! x! F' NV35=V35+0.15" X- O" I' [" \. J. p1 [2 c
IF [ V35 LE V15 ] GOTO N2011 n& L3 E; X& m% O9 X

* C$ r& m9 x; f! C' u5 U' s% lV11=08 p( @& Y1 T: w8 W4 g( R  @! h, J
V4=90-V3/2
2 i4 `* L: c4 b  z0 \3 d( u& xT=V50
- H4 `/ A& w+ U1 ^) ]# r9 fM01
, h5 m7 P# Q1 e+ b3 s8 ~G97M03S=V51
( P% {6 P$ P+ UG0X=V41Z=-V42M8
! W/ Y9 k! N7 p- r  U0 v) mN300
/ [" z% E4 s8 {: R3 W" f" i9 kV11=V11+1
: j4 C& G6 \; r  j3 I% z9 WV12=COS[V11]*V5* |! C2 W+ J; m
V13=SIN[V11]*V5
/ K7 q) X  ^+ U5 n) p2 B; N# L& EV31=V12*2+V10-V5*2  ~4 V# F) ~/ o% d( }- v
V32=V1+V20-V13
! o6 v$ s7 }5 o+ [G0X=V31Z=-V32+ n2 q; |) r8 G
G34Z=-V40L=V25F=V30* Z2 k3 K  [% n& I, ~8 O
G0X=V41
6 S( o- W, ~( }' {& RZ=-V42
  L6 j4 \& C: H& L+ yIF [ V11 LE V4 ] GOTO N300
9 j4 D9 t1 R, O7 u1 C$ Q$ m) m  T! {" i; W: }1 k( N" c3 v
V21=0
$ J) X0 K: U* F& e: f% R/ zT=V506 t2 [  H1 \$ v7 E$ K
M01/ B% L/ |# S+ Q6 M. E: k
G97M03S=V51
+ Z4 o9 |5 s6 n$ K  s0 kV100=[V2-[V5-COS[V4]*V5]]- U6 o* e! G' m/ s3 Y7 t
N400
' M5 p1 f8 p3 E/ wV21=V21+0.1, p* p4 S" S- }& L
V22=TAN[V3/2]*V21
- q0 i) }# z, A! ]6 A. zV31=[V10-2*V5+COS[V4]*V5*2]-V21*22 {9 Z$ W- n4 X
V31=[V10-2*V5+COS[V4]*V5*2]-V21*2
) R7 O% e1 |  Q! y* K* O# I) eV32=V1+V20-V13-V22( S. x, I* X" y
G0X=V31Z=-V32
0 {, B( `9 Q8 A  }& D+ G3 p1 lG34Z=-V40L=V25F=V30" y& a/ C7 k8 d  W% \
G0X=V41$ Z6 J+ Y. ?, K# Z! e- T
Z=-V42
; {; F/ i+ `5 L: B# Q1 QIF [ V21 LE V100 ] GOTO N400
0 H+ A' W( X9 S" `" x9 h) F" i: R7 T. c/ c$ s- `
V35=0; a$ i7 L* J) U, I$ \
T=V50: D9 [4 e4 D7 M+ x7 a" U% d; j" L
M013 |+ ]* I* J9 ~; y* K
G97M03S=V51
" v5 L0 `/ @  jN401
* \- \' s# s; n/ KV33=V32-V35: o* _( M6 z$ J& u# w
G0X=V31Z=-V33
1 l* ^! r) ^; k% }G34Z=-V40L=V25F=V30
( B9 W' t$ _% Q" B. w- `8 IG0X=V41
. ^, ?8 u8 [/ R0 N+ ?/ i' K( HZ=-V42
9 b  m( |5 N6 e1 [5 j5 m: J% QV35=V35+0.153 a/ [/ U; E" x+ g. v
IF [ V35 LE V15 ] GOTO N401
8 [1 m9 r2 p2 k( b' JG0X555.
+ e% A6 h- p" E% j+ NRTS$ w5 w+ x6 ^. _; P4 D
作者: wubaoxi0618    時間: 2011-4-24 16:40
你寫的真好 太全面了 ,，什么 都顧及到了 真是很好,！~,！~我就是沒看懂 頂你下吧 ~,！~！
作者: yyjj77    時間: 2011-4-25 10:39
不頂對不住樓主的勤奮!!!!!!!!!!!!!!
作者: yyjj77    時間: 2011-4-25 10:41
再頂,更希望樓主能發(fā)更多好帖!!!!!!!!!
作者: bzsSB    時間: 2011-4-25 19:12
不過圖紙 發(fā)出來 會 更 全面
作者: 秋水狂刀    時間: 2011-4-26 21:50
不知道數控車最大能加工多大模數的蝸桿啊
作者: rqsyk    時間: 2011-4-26 23:13
你寫的真好 太全面了 ,，什么 都顧及到了 真是很好,！~,！~我就是沒看懂 頂你下吧 ~,！~,！
作者: ssxko88    時間: 2011-4-26 23:45
想學，可惜只會入門的編程,！復雜的看不懂
作者: 劍舞狂沙    時間: 2011-4-27 18:32
這是什么系統(tǒng)的程序,？
作者: kx333    時間: 2011-4-27 19:33
書到用時方恨少，上學時PASCAL語言沒學好,，不然看這不是小菜一碟,。不地還是謝樓主
作者: chenhang1101    時間: 2011-4-27 22:41
wubaoxi0618 發(fā)表于 2011-4-24 16:40
3 `- b, `$ ]2 t  B4 V你寫的真好 太全面了 ，什么 都顧及到了 真是很好,！~,！~我就是沒看懂 頂你下吧 ~！~,！

4 t( ?8 i* q2 }+ c/ D首先頂個樓主,，看2樓這哥們兒也太強大了嘛，都沒看懂就說 “太全面了”,，呵呵,，
作者: 江帆    時間: 2011-4-27 22:56
頂。幸苦樓主了啊呀                    
作者: wubaoxi0618    時間: 2011-4-28 20:33
回復 chenhang1101 的帖子
- x+ [! l2 a; M8 h" I5 Q7 Z) f% w, h. r
哥們 我說的全面  是說她編的 程序占我的電腦全部屏幕  所以全面,！~,！~
作者: ymf381241440    時間: 2011-4-28 20:57
看不懂 能到后面解釋一下嗎？還是感的
作者: chenhui1021    時間: 2011-4-29 20:21
樓主是個高手,，這么全的宏程序很難見到了
作者: wangfuqiang1123    時間: 2011-5-1 21:44
程序還不是太完善~~我用它加工出蝸桿8個模數的改天發(fā)個零件給你們瞧瞧( E" ]. _/ G. g0 A9 d1 b3 z
不是用趕的  是用仿形車刀車的
作者: wangfuqiang1123    時間: 2011-5-1 21:47
這個還可以車t牙  大家好好研究一下  這只是個雛形~~~
作者: liming344    時間: 2011-5-2 14:35
頂下,，好東西~~~~~~~~~~~~~
作者: 學了兩年    時間: 2011-5-3 10:45
哎、,、,、、何必這樣擺自己了�,。,。“凑漳憔幊淘谥袊�50,、60年代的人怎么加工�,。。,�,！別人用普車就搖出來了！�,�,！磨個成型刀多少啊�,。,。�
作者: zy1367223    時間: 2011-5-9 13:56
宏程式用V來表達是奧克馬的吧
作者: 6704288848    時間: 2011-5-9 21:18
我也好想學習一下編宏程序,！雖然我沒有看懂,，但還是謝謝樓主！
作者: jiangssli    時間: 2011-5-11 16:47
澳柯瑪系統(tǒng)的???我看著V開頭的變量號特別扭!!!1
作者: 35070504    時間: 2011-5-11 18:48
好貼啊,，頂一下,，最好有圖紙和尺寸
作者: yyjj77    時間: 2011-5-11 19:09
萬分感謝分享!!!!!!!!!!!!!
作者: yfs123    時間: 2011-8-26 23:12
好東西呀,,,認真學習下,,,,樓主辛苦了
作者: 爽歪歪沙    時間: 2013-11-8 23:07
樓主考慮的很周到   
作者: zss123    時間: 2013-11-10 19:12
不知是什么系統(tǒng)的，不是法難克也不是西門子,，海德漢
作者: tianye373737    時間: 2013-11-12 18:13
頂下
作者: 刀鋒365    時間: 2013-11-12 19:38
有意思 研究下
作者: 刀鋒365    時間: 2013-12-5 20:16
這是啥系統(tǒng)的
作者: zyy6061715    時間: 2014-1-3 23:33
請樓主幫忙編一個發(fā)那科系統(tǒng),，用切刀加工蝸桿的程序吧，這個看不懂
作者: 青島劉lxl    時間: 2014-1-7 14:59
謝謝,，好東西



歡迎光臨 機械社區(qū) (http://giwivy.com.cn/) Powered by Discuz! X3.4