請使用或了解OUKMA 立式加工中心的朋友指導下宏程序（IF THEN在OUKMA中如何改寫）

dq-lb

產品需在fanuc，北一大偎立式加工中心上完成。由于大量的不同尺寸的產品外形基本一致，現考慮采用模塊化宏編程，通過所加工產品的形狀，手工編一主程序進行組合調用即可。

9 ^- p1 _. t& _0 m4 j4 ~    用于fanuc系統的程序目前已編制完成，但由于本人不熟悉北一大偎的宏編程格式，同時P200M說明中的“子程序功能、用戶任務、調度功能”我也一時看不懂相關內容，故請各位幫幫忙，將附件的節選程序改為北一大偎的格式(已將WHILE改為了IF，但IF THEN無法解決)。
! R1 B- q; c" r$ j4 W/ G   
    另外的問題是call 調用子程序時，每個子程序中均含VC1~VC50的變量，會相互影響嗎？
& ?) u0 O" |/ O& W5 b2 Y
#28=1
#1=16.56
  M! L4 w- f! ?$ ^: D7 }#4=5
#5=4
#26=20
#6=16.65
#25=5
#27=150
& e- H: f6 e% K! B& m#11=40
& z& _) X% N6 D2 j4 e#10=1
. u9 L7 ?! R( _  X( o% y#9=0
#12=[90+#2]/2
4 e6 b8 E  k1 c) Y6 m#13=[90-#12]*2
#15=#4/TAN[#12]
IF [#28 EQ 1] THEN #29=-#27-5
5 j& f) m9 P( K/ @( C8 QIF [#28 EQ 1] THEN #30=-#27+#11
3 E; ~& q# [0 c' v% m# cIF [#28 EQ 0] THEN #29=#27+5
, i- R; q0 I7 q6 W/ ]IF [#28 EQ 0] THEN #30=#27-#11

S2800 M3
) d. d1 u% p$ C) ?G54 G90 G0 X#29 Y0. Z200.
) f: d$ k- P8 z0 lG43 Z[#1+30.] H3
#17=-#6-#15 +#26/2-#5
#18=#1-#25
Y[#17-1.]
G0 Z#18 F1200 M8
- P6 l5 U8 D+ f; A9 ~: o! e. pN50
X#30
& x* e+ f7 R+ O+ K) S#9=#9+#10
1 w  N. K; o* i) ~2 K" SIF [#13 LE #9] GOTO60
) X5 ?+ F) R: w4 y8 b- c#17=-#6-#15 +#26/2-#5+[#4+#5]*SIN[#9]
#18=#1-#25- [#4+#5]*[1-COS[#9]]
. B) J: u9 U6 _( g& wY#17 Z#18
X#29
#9=#9+#10
1 v. M  d: M1 l# h1 KIF [#13 LE #9] GOTO60
#17=-#6-#15 +#26/2-#5+[#4+#5]*SIN[#9]
) d& `% F8 }  K* J  N5 l: d#18=#1-#25-[#4+#5]*[1-COS[#9]]
Y#17 Z#18
: |' R; W3 }' Z3 {GOTO50
N60
#9=#13
. d0 z3 r6 ~/ m! x  g) b#17=-#6-#15 +#26/2-#5+[#4+#5]*SIN[#9]
#18=#1-#25- [#4+#5]*[1-COS[#9]]
! L. d2 m5 h2 \& l- |Y#17 Z#18
$ }4 Y+ J1 C1 |( a( F- r# pX#29
X#30
G0 G49 Z200. M9

登錄/注冊后可看大圖

登錄/注冊后可看大圖

wanghao85163181

學習中 謝謝

wslaoa

呵呵 我也沒用過大偎的機床，不過你可以試試將Fanuc的IF~Then 語句改寫成IF~Go語句，問題不就解決了嗎？

jh136232927

wawawawawa

jiangssli

呵呵,最近他在開發軟件..估計短時間內是沒有空了

dq-lb

wmj820303兄，請進來幫忙講解下啊！

dq-lb

就是不支持，但不知怎樣轉換為OUKMA支持的寫法

jiangssli

咱們的版主wmj820303肯定可以給你解決..不過好像澳柯瑪系統不支持IF[]THEN格式,也不知道我有沒有記錯!