使用一連串IF-GOTO的經驗

羅蓋仙

+ |2 i( e  m* p0 x: G( [
: j1 ]' U7 K+ w: \+ }( W# m$ I使用者如果需要使用一連串的IF-GOTO，我想說明一些事項與特性

形式1：
. e8 U6 C6 Q* d. i5 z#100=选兵(陸.海.空)
. [5 T- M: \! n$ H+ B7 _IF[#100 EQ 陸 ] GO1
IF[#100 EQ 海 ] GO2
GO3(鼻用說.當然是空軍)
' f$ M0 S: S2 h* ]: x& A(或不用GOTO3省略它.可以的話在GOTO2後面直接就做，屬於空軍加工部分)
因為EQ是很確定.鐵定的東西..使用者可安排快捷性(調整順序)
+ |% T$ Q, Z+ t% K4 i
' y1 |6 I; v! L- |) D如果怕#100有錯誤.如輸入天兵..可在#100輸入後...與GOTO之間進行防呆
也可不防呆，加工會鑽錯，誰叫使用者故意去測試玩弄MACRO，沒防呆功能用戶最好空跑一下，確定好再做
' g1 R. i' Q- r) _
: C+ [  O( A: }$ w還有一種防呆寫法：
, z8 ?9 A" }( x$ T#100=選兵(陸.海.空)
IF[#100 EQ 陸 ] GO1
7 h+ h5 _, K" a4 O. b4 ZIF[#100 EQ 海 ] GO2
" E" y& I& o  FIF[#100 EQ 空 ] GO3
#3000=1.(如果流到這裡表示#100投入有誤)
N1....
) H' x, S2 I# k% e' S
N2....
0 `* o. n' s8 j4 K
" c' e, S! A) a! XN3....

M99
+ ^/ T5 Z- S% n' a
1 \: I; e) |2 F$ B. T
! T. w* Z/ ^- D2 {  f形式2：
2 z: G9 N* I3 Y% h  ^/ F#100=領國家的薪水(人民，老師，軍警，政官(民意.立法))
. }$ d  ?7 B7 |IF[#100 EQ 0万] GO1
IF[#100 GT 5万] GO2
IF[#100 LT 5万] GO3
GO4(可省略條件式[#100 EQ5万])老師
( W$ q! ?6 n) d* F; c/ h..........
N1 人民

7 A3 h& I+ w8 UN2 政官

0 d& O: m$ ]. P4 s, M! P' VN3 軍警

9 x1 L% K" |; k) ?) KN4 老師
1 _- V! S- r8 ^3 K# {, Q/ ]: N
M99

3 k; \1 Y+ I- \* E2 n※注意1與3可能會有衝突，有前後順序性的
9 Y/ A; p6 F0 P1 g6 V( O% [形式2是以新台币計價的
$ x  N" j) `/ a) N7 C
7 P5 Y4 G/ t3 Q+ R
另外一個IF-THEN的例子：
, X7 [$ y7 N2 |假設#100=已用四則運算，算好的結果

& b1 ]/ |' ]$ j2 b- @: `; t2 m' F6 jIF[#100 EQ 2.5万] TH#30=10.
1 d  y4 \7 p0 f) K) k0 p5 {IF[#100 EQ 0万] TH#30=10.
  `6 R1 S/ t) }6 s$ m4 t% F# V# uIF[#100 GT 2.5万] TH#30=20.
IF[#100 LT 2.5万] TH#30=15.
N1 G1 X#30 Y#25.......開始加工
! ^& b5 U$ Q8 o  ]6 M9 ?3 j( @
上述2與4性質雷同可能會有衝突，不能這樣寫，可改寫成，A法：
2 @0 M4 _3 o$ t; ?3 h
IF[#100 EQ 2.5] TH#30=10.
IF[#100 EQ 0.] TH#30=10.
IF[#100 EQ 0.]GO1或IF[#30 EQ 10.]GO1(讀到2先跳開)
( w/ G- C, N( o; nIF[#100 GT 2.5] TH#30=20.
2 r: N8 H& ?' z  aIF[#100 LT 2.5] TH#30=15.
0 I% ?7 t/ U8 ]# T6 e3 i6 YN1 G1 X#30 Y#25.......開始加工

! b9 b, v2 L! v% m7 |4 X& i) Q或改寫成，B法：使用或閘(OR)
#30=10.
& @/ _+ P% h7 b4 @, y) N; d% RIF[[#100 EQ 0.]OR[#100 EQ 2.5]]GO1(判斷好就先跳開)
; G' M# V3 ]/ x4 w5 ~3 A, cIF[#100 GT 2.5] TH#30=20.
4 ?$ k: {: e3 ~, ]% O: K( F  z* ~: GIF[#100 LT 2.5] TH#30=15.
N1 G1 X#30 Y#25.......開始加工
' n3 O2 o# s) y* R. [8 m2 q
0 i. O9 f4 Y/ K) [還有一種不使用TH的寫成，如下：
( t. R9 |6 g" |2 L30=10.
IF[[#100 EQ 0.]OR[#100 EQ 2.5]]GO1
! ]7 l; b1 A0 [7 X$ [  [8 Q#30=20.
; @( Z* B) b' l) i( m- `IF[#100 GT 2.5] G01
  i9 g% W0 I* Y$ M+ R#30=15.
IF[#100 LT 2.5] GO1<---此條件式可以省略
N1 G1 X#30 Y#25.......開始加工
" L* d' I9 r- F7 J6 ^. C4 V
5 _0 I* R; K: J* g" t#30會一直有數值去覆蓋它
9 Q7 E7 I* ]! q2 m' Y" V) s3 ]3 X

9 |( R( P3 A; m; {& W形式3：理髮
#100=2兵(1.)、一兵(1.5)、上兵(2.)、下士(2.5)、中士(3.0)
IF[ #100 LE 3. ] GOTO理15分頭
5 B9 ^* A% U: j( PIF[ #100 LE2.5] GOTO理12分頭
& O" }+ ^" q8 }) SIF[ #100 LE 2. ] GOTO理9分頭
IF[ #100 LE1.5] GOTO理6分頭
IF[ #100 LE 1. ] GOTO理豬頭
  W* u2 }) W- _2 y
※順序可顛倒，這不會有衝突，如阿兵哥人多可考慮置於首，考慮快捷性
% [. L7 \$ y: a
另外的一種B式
IF[ #100 GE 3. ] GO
- J% ^& J3 k! E3 ]8 k4 A+ a3 Y# JIF[ #100 GE 2.5] GO
IF[ #100 GE 2. ] GO
; }5 m( g1 G& G' H. V6 MIF[ #100 GE 1.5] GO
# O" o1 q* w5 [: o; jIF[ #100 GE 1. ] GO
順序不可顛倒喔！不然少將會理成狗頭
此例不能安排、佈置快捷性
- G4 c6 T. }( F8 {5 T# h! J% S
1 H# L! R9 Q5 m% H% f, u  p+ Y7 M; ~
A式：有點像把數值逼到牆角比，自不量力可直接看出
B式：像在自由空間比，如果順序調換
有錢人也可以去小吃店吃牛肉麵
高學歷也可撿回收物當職業

2 E1 k, m( q, h' t! v  E* I再說一下B：順序不能上下倒立，只能轉身如
* K9 s4 r' Z; D. R+ AIF[ 3. LE #100 ] GO
...
$ J: F6 p9 Z# D0 s; o...
5 r  I' |" s$ A! R" ~. sIF[ 1. LE #100 ] GO

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

! a& k" [+ ?" G' J0 C' H( X( @
以上為個人的經驗

羅蓋仙

形式3的例子有錯誤，小弟越看越奇怪，抱歉
3 q$ h7 V6 r4 U: R8 m黑字例子改成這樣(A式)
IF[ #100 GE 3. ] GO理15分頭
' _) [3 G, ^8 ^; g& gIF[ #100 GE 2.5] GO理12分頭
% X* u4 F; N6 D2 mIF[ #100 GE 2. ] GO理9分頭
IF[ #100 GE 1.5] GO理6分頭
IF[ #100 GE 1. ] GO理3分頭

4 e/ }. y$ G) }紫字例子改成這樣(B式)
! ?+ @( u& p/ n4 f5 B$ T- ^! Y# [IF[ #100 LE 1. ] GO理15分頭
IF[ #100 LE1.5] GO理12分頭
IF[ #100 LE 2. ] GO理9分頭
IF[ #100 LE2.5] GO理6分頭
IF[ #100 LE 3. ] GO理3分頭

魏飞6

小手一抖，金币拿走，谢谢分享
. i9 [: C/ _# H 精细族  赚钱窍门

请谈

谢谢分享xxfx

r157889593

看得 好纠结

Kinki

看不懂啊宏程序

147362638

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

454913758

攒钱哪！速度

queede

看不懂是什么

edsfwr324

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