forked from ground/ground
16 lines
290 B
Plaintext
16 lines
290 B
Plaintext
# A cool list
|
|
setlist &favWords "hello" "there" "general"
|
|
listappend &favWords "kenobi"
|
|
println $favWords
|
|
|
|
set &count 0
|
|
set &passedThrough true
|
|
|
|
@jmpbck
|
|
getlistat &favWords $count &tmp
|
|
println $tmp
|
|
add $count 1 &count
|
|
getlistsize &favWords &tmp2
|
|
inequal $count $tmp2 &tmp3
|
|
if $tmp3 %jmpbck
|