数控车高级宏程序逻辑运用的题目

veroinca

进来看看，学习了                           

杜磊8825

随便看看，还没学呢……

浪子献青

GOX52Z-13
! B4 Y( r5 W8 B' d  d+ EMODIN O123 Q1
G0Z-13
Z-23
" s- T2 n5 }2 O0 UZ-33
$ T: N) ?9 K, XZ-43
* y& h! u$ }* qZ-53
MODOUT
O123
G91
) c& j, J" W2 I  Z: E1 ^G73X-8Z-13D1.5L3E0.05F0.15
2 m! R" Q" P7 j4 V) aG90
RTS
   

OKUMA OSP U10 系统的L

jiangssli

浪子献青 发表于 2012-1-10 10:06
GOX52Z-13
4 j  l# t% H. o  P7 Z7 p1 QMODIN O123 Q1
G0Z-13

0 e% J/ v. H! `( V& g( U) X& k噢噢噢!!请你解释下程序怎么运行计算的吧!!

HC小丁

jiangssli 发表于 2011-5-18 13:31
1 U3 y: R$ u* H" H- _我把程序上传吧,除了老邓哥哥以外...居然没有一个人看得出这个题目的真正含义!!!!!

M3S500T101#1=13#200 ...

; X& X( \* A$ [" {1 T我见过的位判断不是这样的！也没这么长，好像是直接从高位往低位用余数还是什么（也有一年多了，当时用手机看见还收藏到uc浏览器了，可惜格机很多次。。。。）判断对应的数字车对应的槽，当时看明白后才觉得宏还有这样的用法！时间久了没遇到类似的东西就忘了，现在也找不到当时看见的那个帖子了........{:soso_e105:}

jiangssli

汉川机床 发表于 2012-1-10 20:19
我见过的位判断不是这样的！也没这么长，好像是直接从高位往低位用余数还是什么（也有一年多了，当时用手 ...

3 Y) T+ L! ~4 i3 ]+ [& d" I从高位到地位判断中间的处理过程要么是系统自己已经有这样的功能,要么就得用宏程序做一个这样的计算和处理的功能!!所以这个程序也不算长!

HC小丁

jiangssli 发表于 2012-1-11 09:41
1 p& |, N- c3 I: B. {从高位到地位判断中间的处理过程要么是系统自己已经有这样的功能,要么就得用宏程序做一个这样的计算和处理 ...

3 S& ?$ |, e  K$ D7 l  [1 T9 ?是不长，也不难
  {5 ]6 v; z, q6 |" v{:soso_e181:}

jiangssli

旧地重游,物是人非

小木0829

正在学习宏程序

南方祥云

楼主的意思很简单嘛，就是想用#200指定某个数就程序就加工这几个槽嘛，既然想要程序简单，又方便那为什么要限定一个#200数来迷惑大家呢，我的想法很简单，就是直接指定5个变量代表加工5个刀槽，需要做几个槽就将这几个变量改成1就好了，程序既简单又明了，写的人和用的人都能一目了然。程序如下：

3 T' X' `, x1 G+ l8 h5 C, g9 \& ~#1=0         （指定刀槽加工，1为打开，加工槽1，其他任意数关闭，安全措施，避免意外加工）
#2=0         （指定刀槽加工，1为打开，加工槽2，其他任意数关闭，安全措施，避免意外加工）   
#3=0         （指定刀槽加工，1为打开，加工槽3，其他任意数关闭，安全措施，避免意外加工）
+ m4 E2 p1 b' h4 s1 S, _* f#4=0         （指定刀槽加工，1为打开，加工槽4，其他任意数关闭，安全措施，避免意外加工）
7 E% o- R: Q' m/ p8 h#5=0         （指定刀槽加工，1为打开，加工槽5，其他任意数关闭，安全措施，避免意外加工）
G90 G54 G0X0Y0     （回归原点）
1 x5 M( `( I4 p5 F; x* g0 |  ~$ H9 vN10 IF[#1EQ1]GOTO100        （跳转，当刀槽#1=1时进行加工槽1）
. `0 o. O8 v$ o* SN20 IF[#2EQ1]GOTO200        （跳转，当刀槽#2=1时进行加工槽2）
# B. W4 r9 G6 R4 K) x; k5 b' fN30 IF[#3EQ1]GOTO300        （跳转，当刀槽#3=1时进行加工槽3）
0 s) K) n" y+ `" ^0 O8 RN40 IF[#4EQ1]GOTO400        （跳转，当刀槽#4=1时进行加工槽4）
N50 IF[#5EQ1]GOTO500        （跳转，当刀槽#5=1时进行加工槽5）
GO999                       （刀槽加工后跳转到999号程序）
N100 G00 X-50. Y-26.0       （第1个槽坐标定位，Y轴刀槽安全避空1mm）
     G01Y-30.0 F30          （切槽，单边槽深3mm）
     G01Y-26.0 F100         （退刀）
6 X/ ~# @# ?% c9 u/ X; [3 f2 S     #1=#1+1                （变量增值）
     GO10                   （跳转）
! m4 }  Z! n9 C7 W4 q1 BN200 G00 X-40. Y-26.0       （第2个槽坐标定位，Y轴刀槽安全避空1mm）
     G01Y-30.0 F30         
4 O4 u) W7 C% E. e     G01Y-26.0 F100  
     #2=#2+1
4 J: U; x5 M$ \. }0 G     GO20
N300 G00 X-30. Y-26.0       （第3个槽坐标定位，Y轴刀槽安全避空1mm）
     G01Y-30.0 F30         
) t; K3 Q/ I9 u- X& B; C1 D6 Y. E! o     G01Y-26.0 F100  
1 K" x2 @2 s( d  Z, d8 L2 {" p+ r     #3=#3+1
+ {# |- ^: Y/ d8 O     GO30
N400 G00 X-20. Y-26.0       （第4个槽坐标定位，Y轴刀槽安全避空1mm）
     G01Y-30.0 F30         
) G; m2 i. g$ c4 j     G01Y-26.0 F100  
1 Z8 Z" ^+ U0 P7 ^7 {! `. Y     #4=#4+1
1 N! R) I& |, i7 x" L& q     GO40
" H6 B0 R( C  F- N5 U! a% `N500 G00 X-10. Y-26.0       （第5个槽坐标定位，Y轴刀槽安全避空1mm）
) @# o9 E( u4 s' R: Q0 R0 h7 H     G01Y-30.0 F30         
* Y4 g: {3 K; F     G01Y-26.0 F100  
+ t" R7 i. |0 e: o6 z5 X9 \6 c     #5=#5+1
" |* d; d/ a" d5 v6 C0 f     GO50
% L/ j' E, ]/ `2 y5 BN999 G00  X0 Y0
7 x. n7 N( B: t. B0 W4 p9 [     M30