Files
ground_fork/tests/functions.grnd

42 lines
757 B
Plaintext
Raw Normal View History

2025-08-24 16:30:42 +10:00
fun -bool !jumpy
stdlnout "This is the jumpy function"
set &counter 0
jump %inloop
@jumpback
stdlnout "Yay I jumped!"
@inloop
add 1 $counter &counter
inequal 10 $counter &out
stdout "Condition is"
stdlnout $out
if $out %jumpback
stdlnout "Finished"
return true
2025-08-13 09:40:03 +10:00
endfun
!jumpy &tmp
2025-08-18 09:36:35 +10:00
2025-08-24 16:30:42 +10:00
stdlnout "I called a function"
2025-08-30 13:05:28 +10:00
# This function returns a list
fun -list !dingus
stdlnout "Testing lists in functions"
setlist *dingle "heheheha" "hahahahe" "hmmm"
return *dingle
endfun
call !dingus *outlist
getlistsize *outlist &size
set &counter 0
@loopstart
equal $size $counter &cond
if $cond %loopend
getlistat *outlist $counter &tmp
stdlnout $tmp
add 1 $counter &counter
jump %loopstart
@loopend
end 0