[求助]請高手分析Fanuc B宏，我寫的圓弧螺紋程序，實際加工沒有成型

lukexc

$ i! {. m  r  {# E# w) D3 Y6 M5 L
8 c2 n. f) n6 N5 }9 S  R

1. O0368
   , S5 ]! E" u, q. N+ M1 _7 _& H" m& X
2. G54
   
3. G97M3S400
   - K- ^$ q9 b. M0 `5 _' y; ^: z& R
4. T0202
   
5. M8
   
6. G0X73.Z10.
   9 l; n" k3 P- M' D
7. G99
   + c$ f/ z6 ?- l
8. G1Z0.F10.
   ! k; h6 F0 d; e0 E; _: s
9. #1=90
     C) K6 ~0 y7 O0 Y- H
10. #102=1
    ( n& G3 [' M& Q3 n- s9 x
11. WHILE[#1LE120]DO1
    
12. N1#2=5*SIN#1
    
13. #3=5*COS#1
    
14. #100=[2*[31.34+#2]]
    
15. #101=#3
    + E: n7 d5 U) A; ]$ r6 g
16. G0X#100Z#101
    * [' {/ A% T6 G3 y
17. G32W-65.F10.
    
18. G0X73.
    : Q4 w2 D7 V; [2 X8 M
19. Z#101
    
20. #1=#1+#102
    
21. END1
    3 y0 r; L2 L$ X  V% K6 g
22. #1=-60
    & W6 i5 T8 Y3 \  \* l
23. #102=0.5
    
24. WHILE[#1GE-120]DO2
    1 P4 q% y3 U2 ~6 N) c2 i4 y! u2 Y
25. N2#2=5*SIN#1
    0 y( i- X1 g% o- [( _) ?
26. #3=5*COS#1
    
27. #100=[2*[40+#2]]
    6 l* ~1 z( m+ ?' v
28. #101=#3-5
    ) u, V1 }  i3 N; j! \
29. G0X#100Z#101
    
30. G32W-65.F10.
    - ]8 P% f- ]: O  [' V; L) a/ y
31. G0X73.
    2 c4 H) \1 }, L4 I5 ], Q
32. Z#101
    
33. #1=#1-#102
    
34. END2
    - r8 B$ p9 u) @# W' w6 P7 d
35. #1=60
    
36. #102=1
    ; z2 v3 p0 @' r. @3 E
37. WHILE[#1LE90]DO3
    - O0 o2 e% c: S9 H" H" Q' Z
38. N3#2=5*SIN#1
    
39. #3=5*COS#1
    
40. #100=[2*[31.34+#2]]
    4 ]9 b' ?9 F9 a1 q
41. #101=#3-10
    1 |% l4 t: I; d
42. G0X#100Z#101
    7 w2 e# _/ Z( I  r
43. G32W-65.F10.
    
44. G0X73.
    
45. Z#101
    
46. #1=#1+#102
    7 {, W0 V0 x( R. I- Z
47. END3
    1 p, _4 {, [8 p7 b- x/ V+ W
48. M5
    
49. M9
    
50. M30
    * C' J/ P- G$ j0 ?* S. C0 k

復制代碼

實際加工中，我用的60度手磨螺紋刀，但是加工沒有成型！求指教！
1 r& P% _5 L3 i

  ^+ M/ q- W2 T+ k, H% }

qinxin131400

我可以解決。。。這個很簡單的

lukexc

qinxin131400 發表于 2011-11-3 14:34
* Q, `8 n! w7 r% |5 y/ F( ]0 ?我可以解決。。。這個很簡單的

請指教……
7 R4 E1 n0 t: L' I' a5 h1 v期待你的答案……
: c/ Q; y5 i, g" Z) P

qinxin131400

lukexc 發表于 2011-11-3 19:23
請指教……
期待你的答案……

! F$ M3 K8 U3 A  p6 t( S$ }3 {) |1 E傳一個和你一樣的例題你可以參考一下
程序
' t- G& @5 Y! }3 O% ~2 b( {+ fO3
M3S8
T0101
G99
G0X70Z2M8
#1=3.5
N10#2=SQRT[3.5*3.5-#1*#1]
#3=4.585-#2
9 v5 C7 O+ r7 X; `2 vN20G0Z[-24.5+#3]
& T5 ^2 K# ^9 RG32X[29+#1*2]F24
. h  }8 F9 \  ~G32Z[-84.5+#3]F10
8 z4 ~9 L3 n1 w! N- Y8 NG32X[63+#1*2]F24
G0Z[-24.5-#3]
8 w' [% K* ~1 BG32X[29+#1*2]F24
8 n$ P. m: r5 n9 f1 r  aG32Z[-84.5-#3]F10
: y# c; Q. T& a; q5 f4 z' `( wG32X[63+#1*2]F24
#3=#3-1
IF[#3GE0]GOTO20
9 Q2 W0 J5 R0 K! s7 X8 K#1=#1-0.05
5 R* x; _" x8 nIF[#1GE1.4]GOTO10
+ G+ {% G1 d$ v' r0 H#4=0.6
4 i2 x% C/ N, m) D+ wN30#5=SQRT[1.5*1.5-#4*#4]
5 `: y# N: t0 s- l0 Z, E0 W- Z; Y#6=#5
N40G0Z[-24.5+#6]
8 r' V* P; y5 q$ ?. tG32X[33-#4*2]F24
G32Z[-84.5+#6]F10
G32X[67-#4*2]F24
( q% r- J/ w; ^) t/ a# X: o  Y8 IG0Z[-24.5-#6]
1 Z2 r% E" C! V' x" b. T* NG32X[33-#4*2]F24
+ j; T$ \1 u- e8 pG32Z[-84.5-#6]F10
  i2 I: G+ a: b) \5 o: OG32X[67-#4*2]F24
#6=#6-1
! A. t# @. \! A; m. n( ]IF[#6GE0]GOTO40
: d, _+ V. E( S' @+ x1 a. s- ?5 B# G#4=#4+0.05
  n1 \6 d8 X) H9 w6 ^IF[#4LE1.5]GOTO30
/ r: [( l( u* }; \G0X100
" ^8 s1 q: z6 }7 V4 K& q, [  b6 KZ100
8 e0 P8 T+ j5 V7 IM30

lukexc

qinxin131400 發表于 2011-11-3 19:45
傳一個和你一樣的例題你可以參考一下
程序
. E5 b& D$ _+ _. t% RO3

: X0 n. I) q- _謝謝，請問下你這是用什么刀車的？？？
那天有時間來研究哈你這個程序。
; q$ _2 K7 T9 j4 L

cralosfan

4樓師傅能用中文解釋下嗎  給我們菜鳥學習學習吧{:soso_e181:}

jiangssli

qinxin131400 發表于 2011-11-3 19:45
傳一個和你一樣的例題你可以參考一下
程序
O3

全國第三的高手終于出招了!!我們都來學習下!{:soso_e113:}

qinxin131400

jiangssli 發表于 2011-11-4 16:12
8 I+ T' `3 V" t5 I3 W7 ]1 G6 r全國第三的高手終于出招了!!我們都來學習下!

老蔣你看我笑話是吧。。

jiangssli

qinxin131400 發表于 2011-11-4 17:34
3 `' p; E( a2 b1 c3 x# P3 `老蔣你看我笑話是吧。。

( K$ g2 {$ Z+ x' i" z6 S我是實話實說而已!絕對額米有看你笑話的意思!

lukexc

原來是全國第三在指教，真是榮幸，還有一生有你捧場，真是三生有幸?。。?！