18 lines
247 B
Plaintext
18 lines
247 B
Plaintext
|
proc main
|
||
|
|
call text_clear()
|
||
|
|
a = 5
|
||
|
|
call stack_sanity(0)
|
||
|
|
while a == 0 then
|
||
|
|
call text_append(a)
|
||
|
|
if a != 1 then
|
||
|
|
call text_append(", ")
|
||
|
|
end
|
||
|
|
wait
|
||
|
|
a = a - 1
|
||
|
|
end
|
||
|
|
|
||
|
|
$("Arthur", ArthurNormal) "Yo! It works!"
|
||
|
|
|
||
|
|
call proc_set("main")
|
||
|
|
|
||
|
|
end
|