GetExternalString

function GetExternalString takes integer index returns string
    local string name = GetPlayerName(Player(0))
    local string extstring
    local integer i

    set i = 3 - StringLength(I2S(index))
    set extstring = "TRIGSTR_"
    loop
        exitwhen i <= 0
        set extstring = extstring + "0"
        set i = i - 1
    endloop
    set extstring = extstring + I2S(index)
    call SetPlayerName(Player(0), extstring)
    set extstring = GetPlayerName(Player(0))

    call SetPlayerName(Player(0), name)
    return extstring
endfunction

No comments.