找到第5孔

羅蓋仙

2 s* ?7 ~+ u1 u" @% t( w0 p
: K! G, S/ V( U, i  i* K' j例1：找到第5孔

0 T/ A: q9 [3 T; V& \  u' \, `#7=0.(迴圈計數器，從0開始正數....0.1.2.3....)
9 p0 u) W0 n) N#6=8.(共要鑽8孔)
5 f9 z; D7 o# }- Y, B. l; K#5=5.(找到第5孔)

解答：IF[#7EQ#5-1.]GOTO5...裡面條件式可改為[#7+1.EQ#5]
2 a1 Y0 V" j4 O+ L3 v3 \分析：#7=0.是實際的第1孔；#7=4.是實際的第5孔


% t1 D0 ?! c# Z7 e例2：找到第5孔
, d2 G' i2 V; O% v0 |3 N$ J#6=8.(共要鑽8孔)
#7=#6(#7開始倒數...8.7.6.5.4.3.2.1.)火箭發射的數法
' ^$ X1 N2 t5 o  ^6 `#5=5.(找到第5孔)
解答：如何從倒數的迴圈計數器找到第5孔？

destiny0512

还真不懂啊

笃之福良

好人一个啊

空气中的小鱼

回复 1# 羅蓋仙


! `4 @6 _0 k; f. a" i   
如例1，我们宏程序不像C语言定义数组必须要从0开始，不解为何不直接#7=1开始，1就表示第一个孔
如果要判断，是不是更加能够理解和方便呢，如：IF[#7 EQ #5]GO 5

: ~; _! B0 d4 \9 L) e/ }# n如例2，你已经赋值当前计算如上述所说，但是你说的要找第五孔是顺数第5孔还是倒数第5孔呢？我想应该是倒数第5孔吧。
4 D' \' _+ h5 e如果是顺数第5孔，IF[#7 EQ #5]GO 5，如果倒数第5孔（也就是顺数第3孔），是不是就是IF[#7 EQ #6-#5+1]GO 5
! f5 K* R: F( v, {6 G不知道是不是我理解的这个意思。。。。

羅蓋仙

# ?8 ?0 L, B# q/ S: z
2 a  s# D/ o4 _: x' q5 E& X回复 5# 空气中的小鱼

我剛剛下班，看到有人回復心裡真是高興！您的答案和我個人的筆記一樣
& d9 Q9 p6 [7 \; @- Z這是我發明的問題
  Z) I) t% l7 b9 j. ?
( V8 E9 L" h! U您的IF[#7 EQ #6-#5+1.]GO5和我的雷同，我是IF[#6+1.-#5 EQ #7]GO5
B法：IF[#6+1.-#7 EQ #5]GO5
C法：IF[#6+-#5 EQ #7-1.]GO5
+ `5 v- z. t/ J$ v4 L& |
這個問題問到國外來了，真是不好意思
8 A3 z/ g$ Z7 d- D: [
還有#7為什麼不從1開始，其實各有好處，假設下圖是孔

- [6 N  x. q% y) Y# i3 }。。。。。。
9 I6 ^9 x$ p  D0 k' m. B% w間距為#12=20mm，#7用正數(正向去數)有個性質：比較好使用「乘法公式」；還有比較容易得知現在是钻第幾孔
程序例1：
#7=0.
WH[#7 GT 6.]DO1
#30=#12*#7
) w! @0 Z1 D8 Z( ]G90 X#30
, V# e; u  U7 N, Q; W2 J6 v#7=#7+1.
7 l1 ]/ P, B% j( V* MEND1

程序例2：
#7=1.
1 O' x8 {2 B6 X3 S& \/ b/ bWH[#7 GE 6.]DO1
/ `: E; Y. ?9 u% o$ f#30=#12*[#7-1.]←有細節喔
  s  l" ?6 z2 w* C$ G+ O7 k& N, ~% sG90 X#30
- l  m. [8 X% F#7=#7+1.
END1
" y. M. U, b. w* k2 y6 `
#7用倒數(5.4.3.2.1)有個性質：可省略一計數初始值；但是比較不容易得知現在是钻第幾孔
0 }5 D* \' V8 Y2 |# y程序假設例：
←鼻用任何計數初始值，因為下面有GE1.或改成GT0.也行
WH[#7 GE 1.]DO1
( C6 C8 j/ v* m, N( ~G90 X#12
  ]- q  ?! f4 [6 P4 a#12=#12+#12
  M% Y9 t/ W& H#7=#7-1.
END1

4 f* z  E1 x; y. G5 S9 G$ N以上是小弟的淺見^^

空气中的小鱼

回复 6# 羅蓋仙
是的，初始等于0或者等于1，对有些用法确实各有好处，选择合适的就行了。

SELEN

不懂不懂