vn/data/while_test.vns

18 lines
247 B
Plaintext
Raw Permalink Normal View History

2024-01-20 11:18:57 +00:00
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