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

lukexc

O0033
' C4 V2 @. X9 y! x5 k#200=0
; ?# |/ ]' u2 n& L2 Z#10=-3
3 b. L: L$ A; o2 y+ j8 r#1=-10
#102=10000
G97M3S400
T0303
G0X52.Z2.
G99
4 R0 c& l# n1 |: k- I! ?% L. _
( V0 B: }0 M* WIF[#200EQ0]THEN#200=12345
WHILE[#102GE1]DO1
N1#30=#200/#102
: t4 \# x& i  g1 g6 q- @, ^' w3 c#100=FIX[#30]
#200=#200-#100*#102
4 o( v3 F* r, ]: E8 R6 j5 I#102=#102/10
IF[#100NE0]GOTO10
( a2 M% K- e  R' z& MEND1
& |; h2 i* r, Z7 j! [
IF[#102LT1]GOTO20
! v* z" f& R4 \. z6 l( s
N10#101=#100*#1-#3
& `+ K2 s5 l5 j: V8 ?) kG1Z#101F1.
+ r0 x. h. N& q+ g+ mX44.F0.05
7 N5 A3 S/ [$ V# `+ zG0X52.
GOTO1

. J- z$ i0 M! y- T) JN20G0Z100.
M5
$ w% O( Z' L# D' GM30
' w5 v% D' r/ t3 {! B4 O见笑了！哈哈！
& o7 a' _( e4 b! `/ m我这个程序容错性差，求改进！

* E3 P8 k$ F% J

jiangssli

2 d+ O  T! ~. h, l

lukexc 发表于 2011-11-16 21:39
O0033
#200=0
#10=-3

) ~* T5 H1 P! I2 s! X9 G4 H
的确是容错性差!!要是22555.这样的数据就会出错了!!呵呵!!
5 M5 B, U. @" d; q9 \5 f不过最近发现你进步不是一般的大..........
& p2 C& h% Q0 H4 h

lukexc

jiangssli 发表于 2011-11-17 17:25
的确是容错性差!!要是22555.这样的数据就会出错了!!呵呵!!
( e, X1 `  y/ u* _5 X4 i不过最近发现你进步不是一般的大.......... ...

哈哈，谢谢一生大师的夸奖！
最近我们厂没有好多活可做，所以就研究学习了宏！
, f- C- I# e1 d7 ?以后还请一生大师多多指教！呵呵！
- h0 }" @& H" b9 x' A8 E

wang413362569

IF[[#10AND1]EQ0]GOTO10
* m$ d$ l4 S) g0 R" b1 ?! L这个局子什么意思，知道AND的用法，但这个不明白，求指教

veroinca

进来看看高手的                           

jiangssli

wang413362569 发表于 2011-11-18 09:14
IF[[#10AND1]EQ0]GOTO10
这个局子什么意思，知道AND的用法，但这个不明白，求指教

这就是一句运算加判断的语句........

wang413362569

jiangssli 发表于 2011-11-19 18:28
这就是一句运算加判断的语句........

4 r$ m) f& [0 @" I* ~4 t如果是运算加判断应该有运算符号的例如IF[[#10＋1]EQ0]GOTO10，AND不是运算符号，高手解释下，谢了

lovesoho

好像楼主也掌握了那个分中程序的精要了
) ?' P$ }) P" q5 R' T% Ev加点的
* |: w8 \( T9 U# k
& C. ~$ x6 z( A$ z3 ^& Q

jiangssli

lovesoho 发表于 2011-11-20 00:25
# t: ?* `! D/ P# K. G好像楼主也掌握了那个分中程序的精要了
0 R8 |( q' c2 X& uv加点的

呵呵!谢谢夸奖,那个分中程序就是我转发的..所以我对于那个什么精要还是了解一部分的!!

wuyanqing

学习了！！！！！！！！！！！！！！！！！！！