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

dq-lb

: f( l9 @2 c# l: ^
* E  c& S: n, q: j8 Z% R/ }產品需在fanuc，北一大偎立式加工中心上完成。由于大量的不同尺寸的產品外形基本一致，現考慮采用模塊化宏編程，通過所加工產品的形狀，手工編一主程序進行組合調用即可。
# Y1 j; x* G4 c7 o7 w$ L
. X1 J1 L# s' X% P1 j7 K- H3 v9 y    用于fanuc系統的程序目前已編制完成，但由于本人不熟悉北一大偎的宏編程格式，同時P200M說明中的“子程序功能、用戶任務、調度功能”我也一時看不懂相關內容，故請各位幫幫忙，將附件的節選程序改為北一大偎的格式(已將WHILE改為了IF，但IF THEN無法解決)。
   
    另外的問題是call 調用子程序時，每個子程序中均含VC1~VC50的變量，會相互影響嗎？

#28=1
#1=16.56
#4=5
#5=4
#26=20
3 k8 Q- G2 @4 G. o! }4 n& C#6=16.65
# u- `0 M, v7 C1 ]#25=5
) ^, P4 @$ X6 b; x  N# }- W#27=150
, a7 O5 g4 y8 P8 N& z#11=40
#10=1
#9=0
#12=[90+#2]/2
#13=[90-#12]*2
#15=#4/TAN[#12]
IF [#28 EQ 1] THEN #29=-#27-5
IF [#28 EQ 1] THEN #30=-#27+#11
! ^3 C; y! o7 o2 X9 ^IF [#28 EQ 0] THEN #29=#27+5
IF [#28 EQ 0] THEN #30=#27-#11
1 Q6 q9 X8 z: f- ]8 }% {/ C
S2800 M3
* F3 ]9 H- v  bG54 G90 G0 X#29 Y0. Z200.
G43 Z[#1+30.] H3
#17=-#6-#15 +#26/2-#5
: q7 q6 t; W0 _, h. _#18=#1-#25
Y[#17-1.]
G0 Z#18 F1200 M8
N50
2 w+ s1 d- N7 ?  i% s+ XX#30
" V8 c( H7 O: h/ g3 ~#9=#9+#10
; e  K, c% i5 ^% H- Y7 d/ {+ `IF [#13 LE #9] GOTO60
, X- U- J( b! o# u) o+ x9 G#17=-#6-#15 +#26/2-#5+[#4+#5]*SIN[#9]
#18=#1-#25- [#4+#5]*[1-COS[#9]]
0 Q; o1 y2 J6 ^Y#17 Z#18
; i% }. c/ k5 i" }+ W  NX#29
9 V+ ?6 I* h+ n! R1 h7 T3 a#9=#9+#10
IF [#13 LE #9] GOTO60
#17=-#6-#15 +#26/2-#5+[#4+#5]*SIN[#9]
#18=#1-#25-[#4+#5]*[1-COS[#9]]
  q0 [& ^6 \5 z! Q  MY#17 Z#18
% |- k3 J6 V  u, G+ R9 n1 wGOTO50
) D2 _' V, a. M1 i9 |) PN60
, s+ a& J. I$ l) i  {( N5 O#9=#13
#17=-#6-#15 +#26/2-#5+[#4+#5]*SIN[#9]
#18=#1-#25- [#4+#5]*[1-COS[#9]]
3 F5 t! g0 e9 I* NY#17 Z#18
% _; I2 Y* d% _X#29
2 i) w" U8 j$ _3 T) y, G; WX#30
8 ^3 e5 ]. @3 g9 G) mG0 G49 Z200. M9
  n3 k# j4 k/ P: j* Q  s" `

登錄/注冊后可看大圖

登錄/注冊后可看大圖

jiangssli

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

dq-lb

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

dq-lb

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

jiangssli

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

jh136232927

wawawawawa

wslaoa

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

wanghao85163181

學習中 謝謝