StringReverse

function StringReverse takes string s returns string
    local integer i = 1
    local string result = ""
    local string t

    loop
        set t = SubString(s, i-1, i)
        exitwhen (t == "") or (t == null)

        set result = t + result
        set i = i + 1
    endloop

    return result
endfunction

No comments.