通常,一个脚本是逐行读取和执行的,但是有各种各样的控制
结构来影响执行流程。
"-'w,g if 命令允许在满足给定条件的情况下执行其他语句。
v(T;Y=& 例子:
)pS1yYLj if a < 0 then
0pWF\<IZ show "a is negative!"
Z^w}: { 建议在新的行中开始 then 部分,并使用一些缩进以提高清晰度。此外,还可以添加一
P| o_/BS 个在条件未满足时执行的 else 部分:
b{C3r3B8 if a < 0 then
MZGN,[~)6 show "a < 0 !!!"
pv.0!a/M else
3McBTa! show "Ok"
x: `]uOp 可以使用 begin 和 end 之间的块,而不是单个命令:
%C_RBd if a < 0 then
HG2i^y begin
h\k!X/ show "Problem: a < 0"
4}FuoQL b := 0
Kf<-PA end
T#.5F7$u else
$d4^e&s begin
}b-"[TDEF b := sqrt(a)
HL;y5o? show "Ok"
(c `t'e end
/lKgaq. 注意,begin 和 end 应该总是单独出现在一行中。此外,在“then”后面可以有一个命令,也可以没有任何命令,但不只是一个注释。
hKq#i8py 在下文中,我们将“statement”一词用于以下内容之一:
- 单一命令
- begin 和end之间的一组命令
- 控制结构
对于“for”语句,可以对给定范围的每个值解释一次以下语句。例子:
t{\FV@R for x := 1 to 10 do show x, ", ", sin(x):f6
~VZ)LQ'7 将使用不同的 x 值执行 show 命令。循环命令可以位于同一行(如上所述)或下一行(最好使用缩进以提高可读性,或者在 begin 和 end 之间可以有一个命令块)。
fZ2>%IxG} 后者的一个例子:
*~F\k):> y := 0
gdupG for j := 0 to 10 do
%t&n%dhJ begin
A2{u("^[6 x := sqrt(j)
+$KUy>
y := y + x
opQ%!["N show x:d3, ", ", y:d3
NPws^ end
MS,J+'2 还允许按以下方式指定值列表(以“|”分隔):
>t|u 8/P for x := 1 | 2 | 5 | 10 do
e&G!5kz! show x, " ", 10 * lg(x):f1
/
AFn8=9'^ 如果值的范围为空(例如,for j := 1 to 0),则根本不执行命令或块。
F6*n,[5( 使用“while”可以构造一个循环,在该循环中,只要满足某个条件,命令(或命令块)就会被一次又一次地解释。例子:
jTbJL j := 1
wu5]S)?* while j < 5 do
hr&&"d {s show j := j + 1
5Z]zul@+* 使用“repeat”语句,可以构造一个循环,其中一个命令块(这里不需要 begin 和 end)被一次又一次地解释,直到满足某个条件为止。
P9~7GFas| 例子:
q-%;~LF repeat
/3F4t
V j := rnd(5)
%./vh=5) show j:f3
gTE/g'3 until j < 1
xS%Z
H#IJ&w| 允许组合所有控制结构。例如,可以使用嵌套 for 循环来运行某些二维空间:
\|\Dc0p} for x := 1 to 10 do
99%oY for y := 0 to 1 step 0.1 do
D9
~jMcX show x:d4, " ", y:d4, " ", sin(x) * cos(y)
L~_3BX 另一个示例是将 if-then 语句作为 if-then-else 语句的 else 部分:
h}&WBN if x > 0 then
xSFY8 show "positive"
9ALE6 else if x < 0 then
E5D5 show "negative"
L>~wcoB else
1!,xB]v1Ri show "zero"
t]|WRQvy8 请注意,在数学表达式中可以使用类似的控制结构;这些控制结构不应与脚本命令的控制结构混淆。例如,请参见以下
函数定义:
!|hxr#q=4 set_a(n, x) := (for j := 1 to n do a[j] := x^j; a[n])
hu (h' 此外,还有 goto 语句,用于直接跳转到脚本中的某个位置。goto 之后,通常只有一些标签(比如变量名),或者括号中的表达式,可以从中计算标签。
软件将搜索一行以冒号开头,紧跟标签,不包含任何其他内容(甚至不包含空白字符或注释)。例子:
rQ -pD goto TEST
iaAVGgA9+ show "This is not shown.”
'_& Xemz :TEST
D_oGhQYY4 show "This is shown."
cn&\q.!fh 请注意,使用 goto 可以跳出任何其他控制结构,但不能跳转到其他控制结构里。
Wk$ 7<