|
发表于 2013-5-15 18:03:34
|
显示全部楼层
用FlowControl
; Z. d: |* i4 Y
+ }, A+ X8 O& n% O* O _; w. R大概是这样控制的:* N. O7 [ z$ i, ?
+ n" A, f# b# K$ s
if SP1.empty then X8 c+ T) f2 e& F" _, |" U( j
r:=1;
( k2 o. q, U* G& l" H( W" \: zelseif SP2.empty then
% J$ v6 z0 o9 v" H7 K# e r:=2;
/ [6 S/ }5 O9 [6 K @" felseif SP3.empty then
* O. Z; e: V! p( }0 w# X5 W r:=3;
7 C) P, S3 T% I1 o, Gelse
- }4 W& A( E+ K7 j6 u1 m r:=default_output;8 o( I& G/ e7 q' `" O1 a3 a
end;
- y- ?- l, T$ D: A2 S' E
+ [0 N* x: _# Dreturn r; |
|