RosettaCodeData/Task/Reverse-a-string/Tosh/reverse-a-string.tosh

10 lines
187 B
Plaintext

when flag clicked
ask "Say something..." and wait
set i to (length of answer)
set inv to ""
repeat until i = 0
set inv to (join (inv) (letter (i) of answer))
change i by -1
end
say inv