|
发表于 2013-5-15 18:03:34
|
显示全部楼层
用FlowControl
/ h" y, B" z" l6 n/ L% K# E. G
' T& ^2 y" z6 W" f5 h, P( p大概是这样控制的:0 ^6 `" Q" U2 V6 x! a
. |" o* n' r' K
if SP1.empty then( e8 V$ l* }; Y$ m2 d+ T
r:=1;3 j" n0 V" ^8 L- J' W0 b
elseif SP2.empty then
1 Z( A# I. ^, X r:=2;
9 L" K( \+ j/ p) R* d6 g' a6 X. z! ^elseif SP3.empty then5 l/ G( r9 a, Y
r:=3;
y- y5 b% `# d. \; ~, l H$ @' lelse" I1 K5 l' N8 l+ B8 k& R
r:=default_output;
( S: h- Y* F! yend;( \! }, {$ p2 H$ N
/ s0 p& \) q0 sreturn r; |
|