TO 1TO100
make "a 0
make "b 1
label "c
if :b=101 then print :a stop
make "a :a+:B
make "b :b+1
go "c
END
這個貌似復雜了點。如果要逐個顯示加了多少把print :a 拉到 go “c 前面就行了。