使用一連串IF-GOTO的經驗

羅蓋仙

" \# l* H! ~& Y% o; j4 r; e
  A  N: ^( z2 J/ g9 U( l- m2 C使用者如果需要使用一連串的IF-GOTO，我想說明一些事項與特性

形式1：
0 ^3 x( O9 k$ {# w#100=选兵(陸.海.空)
# w& w6 D$ r6 C# ?- W/ {+ b4 @IF[#100 EQ 陸 ] GO1
' y: [% s9 s: S9 M7 M0 ?IF[#100 EQ 海 ] GO2
GO3(鼻用說.當然是空軍)
- F% ]' e/ u  k# p5 t7 |(或不用GOTO3省略它.可以的話在GOTO2後面直接就做，屬於空軍加工部分)
因為EQ是很確定.鐵定的東西..使用者可安排快捷性(調整順序)
3 {* f  ]% ~$ b" X' L" e6 O
/ v5 N: d/ v% ~" k5 K( [8 ^如果怕#100有錯誤.如輸入天兵..可在#100輸入後...與GOTO之間進行防呆
也可不防呆，加工會鑽錯，誰叫使用者故意去測試玩弄MACRO，沒防呆功能用戶最好空跑一下，確定好再做

還有一種防呆寫法：
. c' h; m; z! D8 N/ D  _#100=選兵(陸.海.空)
IF[#100 EQ 陸 ] GO1
IF[#100 EQ 海 ] GO2
IF[#100 EQ 空 ] GO3
) P: M: T  U4 j# e7 @; `#3000=1.(如果流到這裡表示#100投入有誤)
& n) Y& r% Y' J! R: r9 eN1....
$ e+ M! R8 _% c9 U6 \# A
; V- R& L' x5 o. `6 T$ KN2....

N3....
) Q) t: i  t; B8 C7 J! r8 r) l
M99
. `7 G% L8 O. Q9 L
; p; n4 R: L* |
形式2：
#100=領國家的薪水(人民，老師，軍警，政官(民意.立法))
) Y6 E) A! c2 y7 bIF[#100 EQ 0万] GO1
9 g* h2 }$ v$ D0 e0 }' n3 ]$ HIF[#100 GT 5万] GO2
IF[#100 LT 5万] GO3
  h" O, M3 S' N: {, U" wGO4(可省略條件式[#100 EQ5万])老師
# t" q7 [8 A) i1 q5 l..........
N1 人民
9 a9 `& y% l6 c& f. x4 K
) I, Q4 ]8 I( N# i3 a0 zN2 政官

" r. x! ?  s( h- zN3 軍警

) |# s" ^4 `/ ^. P) A" Y1 yN4 老師
- u, m' D/ P' p+ e7 x# L
M99

/ _; h& \, T+ K2 `※注意1與3可能會有衝突，有前後順序性的
, F- T: X3 a0 M, [( u/ @% A% c1 Q形式2是以新台币計價的


- P/ |$ ^4 |' ^: F另外一個IF-THEN的例子：
假設#100=已用四則運算，算好的結果
0 r6 Q+ q" G- J0 i4 w5 ^" {
' E# h) {+ M# L+ {1 d$ {IF[#100 EQ 2.5万] TH#30=10.
- o+ z$ ?; k4 V9 ?IF[#100 EQ 0万] TH#30=10.
) S4 A4 Y6 C" h9 o& S* I: y0 OIF[#100 GT 2.5万] TH#30=20.
IF[#100 LT 2.5万] TH#30=15.
- b' }- I* L2 a" |N1 G1 X#30 Y#25.......開始加工

上述2與4性質雷同可能會有衝突，不能這樣寫，可改寫成，A法：

IF[#100 EQ 2.5] TH#30=10.
- x! o$ T9 w0 w1 J; OIF[#100 EQ 0.] TH#30=10.
IF[#100 EQ 0.]GO1或IF[#30 EQ 10.]GO1(讀到2先跳開)
IF[#100 GT 2.5] TH#30=20.
IF[#100 LT 2.5] TH#30=15.
N1 G1 X#30 Y#25.......開始加工

或改寫成，B法：使用或閘(OR)
- ?1 q& V0 T) s9 u' e/ e% z% g#30=10.
! a, M7 h+ X% |) pIF[[#100 EQ 0.]OR[#100 EQ 2.5]]GO1(判斷好就先跳開)
IF[#100 GT 2.5] TH#30=20.
IF[#100 LT 2.5] TH#30=15.
( t/ P, n  E1 D/ x2 ZN1 G1 X#30 Y#25.......開始加工
- p- m4 Y3 m+ L6 u/ y
還有一種不使用TH的寫成，如下：
) h8 E3 I* h4 }) Q6 ]/ t' s0 u1 ?30=10.
IF[[#100 EQ 0.]OR[#100 EQ 2.5]]GO1
0 W) }1 z& V$ }: u7 y: B$ A) [6 ?#30=20.
IF[#100 GT 2.5] G01
#30=15.
IF[#100 LT 2.5] GO1<---此條件式可以省略
N1 G1 X#30 Y#25.......開始加工

6 t1 z4 t# h2 H. h4 D#30會一直有數值去覆蓋它
+ T& ~" }% J) `1 O9 B

8 v7 O, m7 |. z1 b形式3：理髮
/ V5 y, |* V8 r. ~#100=2兵(1.)、一兵(1.5)、上兵(2.)、下士(2.5)、中士(3.0)
IF[ #100 LE 3. ] GOTO理15分頭
IF[ #100 LE2.5] GOTO理12分頭
IF[ #100 LE 2. ] GOTO理9分頭
: `% N  j) n! GIF[ #100 LE1.5] GOTO理6分頭
IF[ #100 LE 1. ] GOTO理豬頭

& Z2 d. D2 l% ?; a$ S# }0 f' Y※順序可顛倒，這不會有衝突，如阿兵哥人多可考慮置於首，考慮快捷性

另外的一種B式
IF[ #100 GE 3. ] GO
IF[ #100 GE 2.5] GO
IF[ #100 GE 2. ] GO
7 S* W) _4 J% b* ~% m: Y! \IF[ #100 GE 1.5] GO
IF[ #100 GE 1. ] GO
$ Z: `, s$ u# |" o2 W3 D順序不可顛倒喔！不然少將會理成狗頭
( z4 s. z) Q; I* m# M此例不能安排、佈置快捷性


% B, ]: |" {6 B0 U. G' \' @. ~7 ^A式：有點像把數值逼到牆角比，自不量力可直接看出
B式：像在自由空間比，如果順序調換
2 I# w# H& u* |有錢人也可以去小吃店吃牛肉麵
' M! ]& L& U5 M& `) @$ ?高學歷也可撿回收物當職業
1 h3 C5 D( C1 }) Z' p, q* |$ `& _7 c
% V7 o1 }1 n9 w, r6 K+ W1 P# h+ q再說一下B：順序不能上下倒立，只能轉身如
/ x; a2 b% J1 D3 t% Z& ^7 a6 ?3 ^IF[ 3. LE #100 ] GO
...
# V6 s2 N+ Y  [- Z+ E  v$ I# J. D...
3 @' U9 B9 t) {7 HIF[ 1. LE #100 ] GO
1 i8 Y, T& c, A/ K
  J- q( z2 q& v; F8 WA.B兩者有一種共通的特性，領多少錢就做多少事
8 |3 c2 k+ o0 ~; t如果順序顛倒，可能是使用者需要截長補短(抓長補短)的性質，有互補的作用
+ l4 K  q. \3 d' w# A# a
6 O+ u( _8 b2 c9 W
; F8 \- J& ?( A9 @: v5 F2 \以上為個人的經驗

羅蓋仙

5 l3 D# O$ v2 q# |$ C
/ i3 z2 m# V% M9 t6 }3 }" ^形式3的例子有錯誤，小弟越看越奇怪，抱歉
9 J9 G+ b5 e" [+ |0 W7 z黑字例子改成這樣(A式)
IF[ #100 GE 3. ] GO理15分頭
IF[ #100 GE 2.5] GO理12分頭
; j- d2 I2 s+ P/ P4 OIF[ #100 GE 2. ] GO理9分頭
) b: \/ s9 h5 J0 A4 V3 A0 QIF[ #100 GE 1.5] GO理6分頭
2 \6 E3 N+ a' V& r/ F, P- k% WIF[ #100 GE 1. ] GO理3分頭

2 w4 k- x- j1 w2 o, h+ r8 X紫字例子改成這樣(B式)
- U2 A" t6 t$ J9 `8 i* QIF[ #100 LE 1. ] GO理15分頭
$ R# U, m2 V) |; r0 n; tIF[ #100 LE1.5] GO理12分頭
/ O. d' k% S5 n7 W* J* aIF[ #100 LE 2. ] GO理9分頭
IF[ #100 LE2.5] GO理6分頭
4 x- a+ `3 r  I  OIF[ #100 LE 3. ] GO理3分頭

魏飞6

小手一抖，金币拿走，谢谢分享
精细族  赚钱窍门

请谈

谢谢分享xxfx

r157889593

看得 好纠结

Kinki

看不懂啊宏程序

147362638

小手一抖，金币拿走，谢谢分享

454913758

攒钱哪！速度

queede

看不懂是什么

edsfwr324

這樣反而 有點難懂了   我資質不好