forked from ground/ground-old
20 lines
232 B
Plaintext
20 lines
232 B
Plaintext
fun !dingus -string
|
|
return "dingle"
|
|
endfun
|
|
|
|
fun !jumpy
|
|
set &x 0
|
|
@loop
|
|
equal $x 10 &cond
|
|
if $cond %endloop
|
|
add 1 $x &x
|
|
println $x
|
|
jump %loop
|
|
@endloop
|
|
endfun
|
|
|
|
call !dingus &e
|
|
println $e
|
|
|
|
call !jumpy &x
|