8 lines
162 B
Text
8 lines
162 B
Text
func$ reverse s$ .
|
|
a$[] = strchars s$
|
|
for i = 1 to len a$[] div 2
|
|
swap a$[i] a$[len a$[] - i + 1]
|
|
.
|
|
return strjoin a$[]
|
|
.
|
|
print reverse "hello"
|