使用一連串IF-GOTO的經驗

羅蓋仙

3 C* T, |5 ^1 V1 M1 F0 z使用者如果需要使用一連串的IF-GOTO，我想說明一些事項與特性

形式1：
+ k! m" r+ ~" Y  p* L- S#100=选兵(陸.海.空)
" k1 S1 P  w  Y  M, _3 s: ^IF[#100 EQ 陸 ] GO1
! O; O% m6 K0 P. v6 w7 S8 NIF[#100 EQ 海 ] GO2
! n) M7 u, Q0 u; F% [. n: r+ tGO3(鼻用說.當然是空軍)
( {% [0 R( m  j5 S) r, ?9 P) u, e, e(或不用GOTO3省略它.可以的話在GOTO2後面直接就做，屬於空軍加工部分)
因為EQ是很確定.鐵定的東西..使用者可安排快捷性(調整順序)
! g: G3 E/ I* X7 A  Y+ x
如果怕#100有錯誤.如輸入天兵..可在#100輸入後...與GOTO之間進行防呆
& r1 `: e$ I3 c6 ?8 c4 G也可不防呆，加工會鑽錯，誰叫使用者故意去測試玩弄MACRO，沒防呆功能用戶最好空跑一下，確定好再做
/ g, d2 ]3 f0 |5 R/ X
% ~; {, M0 ^& `+ N2 ?: v# g6 B3 G還有一種防呆寫法：
/ D+ W, }. K, O! k) Q) N2 L+ i#100=選兵(陸.海.空)
IF[#100 EQ 陸 ] GO1
- k( {" V. J5 A) A$ t& _6 @' fIF[#100 EQ 海 ] GO2
5 B! C0 B: w9 P( p, m: M& |, [IF[#100 EQ 空 ] GO3
#3000=1.(如果流到這裡表示#100投入有誤)
N1....

N2....

* I7 c3 j9 S8 V% {! eN3....

- @8 y9 N; P' U( rM99


+ t( m6 p5 P, \6 I7 @形式2：
( v4 D/ B% G2 F# x* Z: V#100=領國家的薪水(人民，老師，軍警，政官(民意.立法))
/ j1 K8 |8 y& p7 n: MIF[#100 EQ 0万] GO1
IF[#100 GT 5万] GO2
IF[#100 LT 5万] GO3
1 i0 c! r& Q& uGO4(可省略條件式[#100 EQ5万])老師
. E. k. y0 y6 Z; v) {..........
N1 人民

/ `4 w- _8 m8 V+ y9 K0 G2 D7 ~N2 政官

N3 軍警
0 H- O; s1 R5 k* q* a/ j
N4 老師

M99

※注意1與3可能會有衝突，有前後順序性的
1 x( O9 G; F' g' R1 b# C3 p/ p- m形式2是以新台币計價的

$ p  X) S. a+ q) [6 n
另外一個IF-THEN的例子：
假設#100=已用四則運算，算好的結果

IF[#100 EQ 2.5万] TH#30=10.
IF[#100 EQ 0万] TH#30=10.
IF[#100 GT 2.5万] TH#30=20.
' s6 `  S4 a" {7 M6 ~+ u" iIF[#100 LT 2.5万] TH#30=15.
N1 G1 X#30 Y#25.......開始加工
1 K! q% T% H" |0 f
% P: ], Z: z% T6 t# x上述2與4性質雷同可能會有衝突，不能這樣寫，可改寫成，A法：

* n8 l0 P8 c5 o0 V- OIF[#100 EQ 2.5] TH#30=10.
8 P6 r! O; x  C0 mIF[#100 EQ 0.] TH#30=10.
IF[#100 EQ 0.]GO1或IF[#30 EQ 10.]GO1(讀到2先跳開)
5 o$ t0 Z: s( U3 ], TIF[#100 GT 2.5] TH#30=20.
IF[#100 LT 2.5] TH#30=15.
" a3 {! F4 m2 `" i: e6 X3 XN1 G1 X#30 Y#25.......開始加工

* V; E/ t6 v* }8 T7 W或改寫成，B法：使用或閘(OR)
#30=10.
IF[[#100 EQ 0.]OR[#100 EQ 2.5]]GO1(判斷好就先跳開)
IF[#100 GT 2.5] TH#30=20.
2 b/ [) M; N: z5 I2 @IF[#100 LT 2.5] TH#30=15.
; `0 E) X1 F" c; F/ F5 f" S+ {N1 G1 X#30 Y#25.......開始加工

還有一種不使用TH的寫成，如下：
8 j; l: `' N; A* j30=10.
IF[[#100 EQ 0.]OR[#100 EQ 2.5]]GO1
#30=20.
IF[#100 GT 2.5] G01
" W  K6 ]% ?" N' j( l% w#30=15.
IF[#100 LT 2.5] GO1<---此條件式可以省略
N1 G1 X#30 Y#25.......開始加工
4 A, Z3 J: R2 a* O/ H( P
#30會一直有數值去覆蓋它
4 s8 h" L3 [" U

形式3：理髮
#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分頭
, P2 V- n- r6 t* hIF[ #100 LE1.5] GOTO理6分頭
1 ]) V0 N" v; Z' {4 {7 dIF[ #100 LE 1. ] GOTO理豬頭

※順序可顛倒，這不會有衝突，如阿兵哥人多可考慮置於首，考慮快捷性
  _* o/ ]  f. m  X) _1 X2 |- z3 A. v' B
另外的一種B式
, |( q0 w5 u; G  W" L  s+ O+ yIF[ #100 GE 3. ] GO
IF[ #100 GE 2.5] GO
IF[ #100 GE 2. ] GO
IF[ #100 GE 1.5] GO
+ }& ~$ f# P' F6 S/ bIF[ #100 GE 1. ] GO
順序不可顛倒喔！不然少將會理成狗頭
* x$ ]) b5 `8 O! W此例不能安排、佈置快捷性


A式：有點像把數值逼到牆角比，自不量力可直接看出
B式：像在自由空間比，如果順序調換
有錢人也可以去小吃店吃牛肉麵
高學歷也可撿回收物當職業

再說一下B：順序不能上下倒立，只能轉身如
3 {* B3 v' ?$ H  {4 g3 s& IIF[ 3. LE #100 ] GO
$ g+ v: ~) }7 j6 s6 ^) a...
' }' z& N+ |6 Q. @...
. P* r9 w7 d# VIF[ 1. LE #100 ] GO

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


' U; A6 D2 G  l3 h1 D4 J7 f  n( f以上為個人的經驗

羅蓋仙

形式3的例子有錯誤，小弟越看越奇怪，抱歉
黑字例子改成這樣(A式)
IF[ #100 GE 3. ] GO理15分頭
: i- `. C# j' R0 FIF[ #100 GE 2.5] GO理12分頭
5 _8 {% J) x. \+ m4 r5 p5 _# n! J# wIF[ #100 GE 2. ] GO理9分頭
IF[ #100 GE 1.5] GO理6分頭
IF[ #100 GE 1. ] GO理3分頭
7 u$ V+ Z% t) T
9 J. {- ]" d/ X, p紫字例子改成這樣(B式)
IF[ #100 LE 1. ] GO理15分頭
. v3 E! A5 g3 @, rIF[ #100 LE1.5] GO理12分頭
IF[ #100 LE 2. ] GO理9分頭
3 \% W/ D: @4 o& Q' G; y$ GIF[ #100 LE2.5] GO理6分頭
0 _# h: V0 V* B2 k8 r0 Y5 {3 BIF[ #100 LE 3. ] GO理3分頭

魏飞6

小手一抖，金币拿走，谢谢分享
4 }$ ?5 L0 R  }5 @0 \" |7 e 精细族  赚钱窍门

请谈

谢谢分享xxfx

r157889593

看得 好纠结

Kinki

看不懂啊宏程序

147362638

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

454913758

攒钱哪！速度

queede

看不懂是什么

edsfwr324

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