7 lines
131 B
Text
7 lines
131 B
Text
|
|
FUNCTION Reverse(sIn)
|
||
|
|
LOCAL sOut := "", i
|
||
|
|
FOR i := Len(sIn) TO 1 STEP -1
|
||
|
|
sOut += Substr(sIn, i, 1)
|
||
|
|
NEXT
|
||
|
|
RETURN sOut
|