使用一連串IF-GOTO的經驗

羅蓋仙

+ o) y% O# a  N6 c, G' K2 O
( d( L6 r+ ]4 f' [6 G. U使用者如果需要使用一連串的IF-GOTO，我想說明一些事項與特性
0 w* X" f0 X: c& z1 u, {7 U
  O' `0 M0 `) J+ J& A" _) K% w% I形式1：
#100=选兵(陸.海.空)
4 O5 ^7 _- r5 B' _, m- GIF[#100 EQ 陸 ] GO1
IF[#100 EQ 海 ] GO2
5 n6 Y( R1 Q* g' T9 mGO3(鼻用說.當然是空軍)
(或不用GOTO3省略它.可以的話在GOTO2後面直接就做，屬於空軍加工部分)
因為EQ是很確定.鐵定的東西..使用者可安排快捷性(調整順序)
! c  ?% b% O$ z! V& U
2 ]0 P5 V+ d: S如果怕#100有錯誤.如輸入天兵..可在#100輸入後...與GOTO之間進行防呆
% t/ {: S& R8 L3 P5 [4 x2 O8 Q也可不防呆，加工會鑽錯，誰叫使用者故意去測試玩弄MACRO，沒防呆功能用戶最好空跑一下，確定好再做

還有一種防呆寫法：
' C6 h/ d8 U4 X5 \  S. Q) A/ `: R( d#100=選兵(陸.海.空)
. D$ E) @$ B9 t1 W# P9 O# ]) hIF[#100 EQ 陸 ] GO1
, Q# y# o( ~9 H- m( `8 JIF[#100 EQ 海 ] GO2
. ^5 z6 d2 L$ k; O2 WIF[#100 EQ 空 ] GO3
$ U' e5 ]1 \! S  U5 C#3000=1.(如果流到這裡表示#100投入有誤)
N1....

N2....
2 k- l8 g. m8 Y( J$ k8 b( w+ R
/ U' _9 W1 `, j( n) q/ U* ON3....

M99


形式2：
#100=領國家的薪水(人民，老師，軍警，政官(民意.立法))
IF[#100 EQ 0万] GO1
9 F6 R" ^# v' F! ?1 P& aIF[#100 GT 5万] GO2
IF[#100 LT 5万] GO3
GO4(可省略條件式[#100 EQ5万])老師
5 l7 _" N* \5 ^# M..........
' A/ r- O( W/ f# J/ @N1 人民

) n6 f+ B1 y. M8 Z3 xN2 政官

N3 軍警
9 ^6 J4 D9 P! C+ C. U/ [4 K9 V3 L
N4 老師

& r. G2 I" \/ t# O( P3 SM99
; }4 J% _+ ~" M' U+ D
5 p0 \9 N# j; I6 x; A9 ]※注意1與3可能會有衝突，有前後順序性的
0 u1 k# y2 b8 S" o0 b8 p* r形式2是以新台币計價的
6 ~( |7 y4 i& l6 U' f

另外一個IF-THEN的例子：
假設#100=已用四則運算，算好的結果

% H) E! v9 C8 p- \! a2 y" VIF[#100 EQ 2.5万] TH#30=10.
8 F$ b4 n$ Z, Z  EIF[#100 EQ 0万] TH#30=10.
  m, O$ U# P+ rIF[#100 GT 2.5万] TH#30=20.
. m; @# Y. }0 z) X) ?- k, R+ i1 JIF[#100 LT 2.5万] TH#30=15.
N1 G1 X#30 Y#25.......開始加工

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

# L, A, Q3 Z) E$ RIF[#100 EQ 2.5] TH#30=10.
" E: C. M+ |  O9 U5 j) \, Q9 pIF[#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.
/ k% V  B3 v# W2 C7 VIF[#100 LT 2.5] TH#30=15.
: n% E/ N0 Y( {+ o, i/ S* RN1 G1 X#30 Y#25.......開始加工
% r  j$ _( e( U; b
& e6 O9 Y/ h# f或改寫成，B法：使用或閘(OR)
#30=10.
. U( s1 [( C3 w0 C. W3 L/ F" [% jIF[[#100 EQ 0.]OR[#100 EQ 2.5]]GO1(判斷好就先跳開)
0 o4 U; p6 B- c% B) ^IF[#100 GT 2.5] TH#30=20.
# H' i- x* k/ x5 l6 G/ ]5 xIF[#100 LT 2.5] TH#30=15.
N1 G1 X#30 Y#25.......開始加工

6 e' J. s/ I/ S1 Q7 `還有一種不使用TH的寫成，如下：
" t7 Q( c8 s. Y0 H) C, ]( \30=10.
" a' t) X2 l. T: XIF[[#100 EQ 0.]OR[#100 EQ 2.5]]GO1
#30=20.
IF[#100 GT 2.5] G01
" g) j; {7 ]% e& X0 z#30=15.
' }7 {# k: ~4 h6 ~) r, Z, BIF[#100 LT 2.5] GO1<---此條件式可以省略
* }# c3 l% s+ SN1 G1 X#30 Y#25.......開始加工

#30會一直有數值去覆蓋它


形式3：理髮
#100=2兵(1.)、一兵(1.5)、上兵(2.)、下士(2.5)、中士(3.0)
9 P1 m- h5 Z8 @6 @1 w6 wIF[ #100 LE 3. ] GOTO理15分頭
IF[ #100 LE2.5] GOTO理12分頭
' C2 p/ d7 ^7 }IF[ #100 LE 2. ] GOTO理9分頭
0 l% j8 J& G# [; |/ [: }' ^4 _9 sIF[ #100 LE1.5] GOTO理6分頭
IF[ #100 LE 1. ] GOTO理豬頭
( p% C- A! W4 b' I6 r4 P& [7 x
※順序可顛倒，這不會有衝突，如阿兵哥人多可考慮置於首，考慮快捷性

另外的一種B式
! w8 u5 N' }% m. z3 Y% T) o& pIF[ #100 GE 3. ] GO
IF[ #100 GE 2.5] GO
. Q1 q' X' T6 P$ i! b7 d$ zIF[ #100 GE 2. ] GO
IF[ #100 GE 1.5] GO
- j  x! _6 r; a. o& H+ F) I0 IIF[ #100 GE 1. ] GO
順序不可顛倒喔！不然少將會理成狗頭
此例不能安排、佈置快捷性

  q$ D1 l( y0 F4 F: K
A式：有點像把數值逼到牆角比，自不量力可直接看出
B式：像在自由空間比，如果順序調換
8 {1 f. g* m5 G9 N  N, S有錢人也可以去小吃店吃牛肉麵
* U9 a1 y& Y. c高學歷也可撿回收物當職業
/ J  z7 w5 B/ u. V9 _* b% q
5 q" K! y' v3 D. r% V$ {. p- j8 O再說一下B：順序不能上下倒立，只能轉身如
# r7 o* }% q- K9 Y0 K- }. n. f+ s& g, Y" yIF[ 3. LE #100 ] GO
9 x# s5 I' G- C8 G( ~4 ^...
! a9 f: W# G2 \; D9 ]...
IF[ 1. LE #100 ] GO

A.B兩者有一種共通的特性，領多少錢就做多少事
) I9 L2 H3 z7 y2 o1 u% J1 u如果順序顛倒，可能是使用者需要截長補短(抓長補短)的性質，有互補的作用


以上為個人的經驗

羅蓋仙

3 g& P! c1 w, u! \. T9 l. P: z  }
形式3的例子有錯誤，小弟越看越奇怪，抱歉
$ s2 g! X2 Z. m' n: z黑字例子改成這樣(A式)
1 N9 z3 |1 U: c+ s. G$ cIF[ #100 GE 3. ] GO理15分頭
6 U8 n& R1 e; S3 H/ b3 M% sIF[ #100 GE 2.5] GO理12分頭
IF[ #100 GE 2. ] GO理9分頭
IF[ #100 GE 1.5] GO理6分頭
$ q. @2 S$ o7 H# Z  \IF[ #100 GE 1. ] GO理3分頭

紫字例子改成這樣(B式)
IF[ #100 LE 1. ] GO理15分頭
0 v) c7 ?6 u8 G4 C. }- [0 eIF[ #100 LE1.5] GO理12分頭
% X1 Q2 N4 Y3 Q( D) d. X/ ^IF[ #100 LE 2. ] GO理9分頭
( _% \0 G3 a  ?! Q* c7 QIF[ #100 LE2.5] GO理6分頭
IF[ #100 LE 3. ] GO理3分頭

魏飞6

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

请谈

谢谢分享xxfx

r157889593

看得 好纠结

Kinki

看不懂啊宏程序

147362638

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

454913758

攒钱哪！速度

queede

看不懂是什么

edsfwr324

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