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

dq-lb

5 [* ~% z% z. Q! u, Y  |产品需在fanuc，北一大偎立式加工中心上完成。由于大量的不同尺寸的产品外形基本一致，现考虑采用模块化宏编程，通过所加工产品的形状，手工编一主程序进行组合调用即可。
4 O. Y  B3 W" o. v: ^% E; K* s) H& }1 q
    用于fanuc系统的程序目前已编制完成，但由于本人不熟悉北一大偎的宏编程格式，同时P200M说明中的“子程序功能、用户任务、调度功能”我也一时看不懂相关内容，故请各位帮帮忙，将附件的节选程序改为北一大偎的格式(已将WHILE改为了IF，但IF THEN无法解决)。
   
    另外的问题是call 调用子程序时，每个子程序中均含VC1~VC50的变量，会相互影响吗？
6 N9 `# l2 Y& L6 Q6 U( D6 G
  R7 V( L' m- I/ W#28=1
#1=16.56
' L8 V( P) K; [( P9 E. _#4=5
) d9 [$ F0 c, {! [. `" [* ^: ?#5=4
% ]& b0 @( y  |. l#26=20
#6=16.65
#25=5
#27=150
#11=40
8 P3 _  \( p5 f/ J7 U#10=1
#9=0
#12=[90+#2]/2
) k' ]9 P# T8 d#13=[90-#12]*2
#15=#4/TAN[#12]
IF [#28 EQ 1] THEN #29=-#27-5
IF [#28 EQ 1] THEN #30=-#27+#11
IF [#28 EQ 0] THEN #29=#27+5
/ r6 i$ w6 R, S8 `) dIF [#28 EQ 0] THEN #30=#27-#11

- _+ |* u" z7 n% Y8 @4 z" wS2800 M3
1 U% t5 ]. M' B8 LG54 G90 G0 X#29 Y0. Z200.
G43 Z[#1+30.] H3
0 N* Y2 _  k6 Z4 |#17=-#6-#15 +#26/2-#5
$ r- W0 C8 t6 d3 C#18=#1-#25
2 P" Q) i% z- z/ v# L" jY[#17-1.]
! U8 Z, d5 d5 s6 Z7 U8 hG0 Z#18 F1200 M8
N50
X#30
#9=#9+#10
+ E3 I& L' W! H1 r5 jIF [#13 LE #9] GOTO60
2 {3 c0 k+ v0 F) k8 r#17=-#6-#15 +#26/2-#5+[#4+#5]*SIN[#9]
#18=#1-#25- [#4+#5]*[1-COS[#9]]
Y#17 Z#18
5 x$ q1 k) i, j& F( U$ Q  F( pX#29
#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]]
9 c7 O+ O5 ^; I; W" I0 aY#17 Z#18
2 c& ~$ A" x7 aGOTO50
. S, g& l9 m/ F. {4 Z/ f7 ^N60
#9=#13
#17=-#6-#15 +#26/2-#5+[#4+#5]*SIN[#9]
4 Z" {& N; C0 s#18=#1-#25- [#4+#5]*[1-COS[#9]]
/ [; x2 a' {$ }% g) gY#17 Z#18
X#29
' d+ J3 j8 O/ O8 X: gX#30
7 ?; I2 s) q5 H1 x! sG0 G49 Z200. M9
& R+ l+ o! m, Q, _/ w, l

jiangssli

咱们的版主wmj820303肯定可以给你解决..不过好像澳柯玛系统不支持IF[]THEN格式,也不知道我有没有记错!

dq-lb

就是不支持，但不知怎样转换为OUKMA支持的写法

dq-lb

wmj820303兄，请进来帮忙讲解下啊！

jiangssli

呵呵,最近他在开发软件..估计短时间内是没有空了

jh136232927

wawawawawa

wslaoa

呵呵 我也没用过大偎的机床，不过你可以试试将Fanuc的IF~Then 语句改写成IF~Go语句，问题不就解决了吗？

wanghao85163181

学习中 谢谢