改寫的jiangssli大俠的梯牙程序…………

凌晨一點(diǎn) · 發(fā)表于 2012-1-25 01:02:56

本帖最后由凌晨一點(diǎn) 于 2012-1-25 01:02 編輯

辭舊迎新,，已經(jīng)在壇子里潛水一年,。平常沒條件上網(wǎng),。過年回家,，發(fā)此程序用以回報(bào)各位大俠的資料分享,。
回想這一年來,，從一普車操作工到學(xué)會(huì)用宏程序分層加工大螺距梯牙的日日夜夜,，倍感心酸。但同時(shí)也感到很欣慰,，畢竟自己的付出終有收獲,。在此特別感謝jiangssli大俠分享的程序！�,�,！
這個(gè)程序由[backcolor=transparent !important]jiangssli大俠的大螺距外梯牙程序改寫而來………………
$ D* y8 K% Q& \6 J4 Z; e, O) Z, }加工方式有所不同：1）本程式是內(nèi)梯牙螺紋加工程式。2）本程式加工方式并不是左右分刀加工，而是從右向左趕刀加工,。3）這個(gè)程式本是加工絲母(黃銅)內(nèi)梯牙的程式,，其中包括最后精車光刀，所以刀具應(yīng)為梯牙成形刀,。4）此程序) V0 d" {( V4 e' c1 ?2 I) y- b
并不完美,，有不足之處還請各位大俠多多指教。7 K+ u6 {/ b* Q! p
O8011 (絲母螺紋面加工）7 t3 @% l' v5 h2 c: T! r
T0101 M03 G99
6 l* P9 {2 {0 Q9 u7 @G65 P8015 C65 D40 F7 M0.25 Q0.071 R0.1 S0.1 T1.75 U0.5 V15 W1.2 K12
$ T: H  Z: k( Z. ^5 `6 N7 YG00 Z300
; R2 l8 s$ F) v) U9 y3 y" k5 Z  ^M05
3 c# E* _7 K/ t- t2 zM30. N; _% h4 G" A6 I2 P! |
×××××××××××××××××××××××××××××××××××××××××××
" m/ E* _: L5 S+ B  [O8015
1 ]+ o: p" Z7 Y- Q4 D5 F( k' ]3 K2 L#2=#7-#9
1 a  j; |& S% p% l3 I#4=#2-1- M$ A! h( ]4 M8 t
#5=#9/2+#21
$ w. K! Q4 B2 c! J#8=0.366*#9. Q$ z+ m, G4 y! ^7 [$ M
#10=#7+#21*23 h3 q) @7 ]4 n; i( O" _
#11=0
- P/ J$ a" x8 j2 H  B#110=#11# d* T/ P+ }- K9 Y0 ~  O( [
#12=#5
5 x  f' V% J2 L4 J- f' w3 B$ j+ A! cWHILE[#11NE1]DO11 _" u# X0 }' m5 L; T7 C
#12=#12-#13
, s7 r0 h- r/ T6 |3 b( Y$ m+ i#14=#10-#12*2
+ m% a, R0 X, I. ?$ @, [IF[#14GE#10-#18]THEN#14=#10-#18# Q( B' f9 f% }( b" D3 s0 O
#15=TAN[#22]*#12; R/ G, e3 _5 g" C
#16=[#8-#20]/2
* ^$ H/ V4 v5 V6 P" n& D% @#24=#15+#16! W0 n+ L  i0 N  h3 P! q9 E4 ?
#25=#20*#238 C1 P. D6 A. m8 X2 r+ }! P- P
#27=#6+#24
0 i: f( X; K/ V0 U9 b! X. X3 e#28=#6-#24
6 c4 r5 ^0 I. C7 g#101=#27-#19
4 E* n- `. _. W7 o#102=#28+#192 Y+ c' B5 m- H$ z# y' X
#29=#101
4 f7 n- x1 e* }7 ~' o" }#109=#14( A, V# j' k0 L$ R! m+ z
WHILE[#29GT#102]DO23 F1 V& s3 x, o! s8 I5 F4 x& S
G00 Z#29
; j* E3 c- D9 ^- lX#14
- m  Q% s# c! o) k' B& JG32 Z-#3 F#9) R* c  N7 H# z* {
G00 X#4
% t" L6 h4 z- g' y: d% I; c- v#29=#29-#25( i/ P/ i3 o1 c: a
IF[#29LT#102]THEN#29=#102
* r9 F' S6 `7 b3 h0 {IF[#29NE#102]GOTO1
( k( M& K- i" H( z1 N2 yG00 Z#29* o. C" P  m( b7 C
X#14
/ @! a# g" }- _G32 Z-#3 F#96 g& U' D$ M! d
G00 X#4
: f2 v8 M! `4 v( B% ~- s' l2 k#29=#102- Z# z" \4 |" ?  C: {
N1 END2# m& X3 H1 J' g# P2 A+ y9 W
IF[#14EQ#10-#18]THEN#11=1: ]4 H/ x' a. c6 z0 m
END1; H3 f& O; {% C4 |1 ~0 i2 h/ r
IF[#8EQ#20]GOTO2. W8 |+ V# Z' H( ~1 W
#12=#183 ^% Y* q* N! s$ @7 g# Y* A# c8 G
#103=0( k: `1 x5 M% d5 P6 a& o) m. y9 C
#104=1
) W4 P5 W* A3 v1 l" \' J) `5 MWHILE[#11NE2] DO1. t3 J2 M4 `+ @0 l1 R5 k: x* q. Q
#12=#12-#17& w# Q& g$ W" X$ B( ]
#15=TAN[#22]*#12
3 g/ J9 {3 A( P% B#24=#15+#16
; n* c. t6 o7 u; v#30=#6+#24+#174 Y2 V/ W3 }0 U0 d6 e6 g2 A- y/ z' k
#31=#6-#24-#17* F+ i  M/ ?: P: N: v0 F! Y. f1 U
#32=#10-#12*29 V3 W. D, v7 E. m: }( d! j
#105=#30
( f2 P+ q" b6 q; r5 v8 i! N#106=#31) F; W, @1 A& f
#109=#32
% X% k# G  i$ x: ?! TIF[#32GE#10]THEN#32=#10
9 x' Q9 ^& Z. z' x; G+ L( G3 j: UIF[#30GE#27]THEN#30=#277 [% S0 ~& |- _
IF[#31LE#28]THEN#31=#28% \, \& n9 ~2 e- f
G00 Z#30
6 b$ f2 p# [' d& v# LX#32
1 P8 G9 l; [$ K0 K; X2 N+ GG32 Z-#3 F#9; N( ^+ c" i: I$ K6 r2 I
G00 X#4$ c, [* g! l6 Z( f
Z#31
9 n2 L% U; K* aX#323 F8 @- B1 A3 b- ~" I
G32 Z-#3 F#9
7 Q1 y. F9 I1 e6 RG00 X#48 T1 g" ?2 a" Z& V# `
IF[#32EQ#10]THEN#103=2
+ b/ t% s1 N; s) cIF[#30EQ#27]THEN#104=2
3 d+ z, a* o7 t  SIF[#103EQ#104]THEN#11=2
0 V- v: @& ~3 R. Q0 REND16 Q3 K5 D3 B8 U3 _* X3 w# d& w
G00 Z#6: O* u  J+ v. _
M99. D; n; h" u  p  A/ I1 U

! J9 g( J( d+ P0 B6 Z2 N9 B( r* a, N8 |
) g7 x8 j& {! t! ]( ]6 K

yukunv6 · 發(fā)表于 2012-1-27 23:41:35

{:soso_e118:}{:soso_e118:}好像很復(fù)雜啊

風(fēng)隨意 · 發(fā)表于 2012-1-28 10:30:04

看不懂
{:soso_e118:}{:soso_e168:}

jiangssli · 發(fā)表于 2012-2-4 16:20:53

呵呵,樓主很有前途啊!!

小波bo · 發(fā)表于 2012-2-4 16:35:44

樓主前途無量啊。太強(qiáng)大了,。{:soso_e183:}

dero · 發(fā)表于 2012-2-4 18:48:20

能否發(fā)刀具軌跡出來看下

yblnm · 發(fā)表于 2012-2-4 23:21:41

看來樓主學(xué)東西很快呀,！一年就成高手了

凌晨一點(diǎn) · 發(fā)表于 2012-2-5 21:45:02

jiangssli 發(fā)表于 2012-2-4 16:20 2 d$ W `, @( l& n$ r
呵呵,樓主很有前途啊!!

呵呵，大俠過獎(jiǎng)了�,，F(xiàn)在感覺不知道下面的路怎么走了,。

凌晨一點(diǎn) · 發(fā)表于 2012-2-5 21:46:48

小波bo 發(fā)表于 2012-2-4 16:35 1 y; B* m4 d' [- Z* r
樓主前途無量啊。太強(qiáng)大了,。

呵呵,，改寫而已。原創(chuàng)才強(qiáng)大,，嘿嘿,。

jiangssli · 發(fā)表于 2012-2-6 07:53:20

凌晨一點(diǎn) 發(fā)表于 2012-2-5 21:46 ) z8 M2 n& g( l; v6 u! H! d
呵呵，改寫而已,。原創(chuàng)才強(qiáng)大,，嘿嘿。

這就是一個(gè)坎兒,你把這個(gè)坎邁過去了,你就真的能明白很多宏程序的東西了....
有沒有和我們一起合作的興趣呢??有興趣的話可以加我的QQ詳談一下...

		自動(dòng)登錄	找回密碼
密碼			注冊會(huì)員

改寫的jiangssli大俠的梯牙程序…………

評分

RE: 改寫的jiangssli大俠的梯牙程序…………

RE: 改寫的jiangssli大俠的梯牙程序…………

點(diǎn)評