Master Server Version Changer v1 for Phasor v2

-- Master Server Version Changer v1 5-14-2014
-- for Halo PC/CE for Phasor V2
-- by H® Shaft, Oxide/Urbanyoung & Wizard

-- Changes to the new lobby that the server broadcasts to for Halo 1.10. Also allows you to change the server version via console using 'sv_change' command
-- You may need to add 'sv_change' to your access.ini file
-- Phasor Dedi should remain at version 1.09, and as of the date of this script, remove sv_version from init file, and/or defaults (if present)
-- This was a re-write of Oxides & Wizards script as the first versions had errors that prevented functioning as intended.

-- Usage:  in console use sv_change 10  to change to version 1.10, sv_change 9 to version 1.09, and so on.

default_version = "01.00.10.0621"

function GetRequiredVersion()
    return 200
end

function OnScriptLoad(processId, game, persistent)
    if not persistent then
        hprintf("You probably want to load this server persistently when the server starts.")
        hprintf("ie. put it into scripts/persistent and don't load from your init file.")
    end
    Game = game
    ver = {}
    local addr1 = nil
    local addr2 = nil
    if (game == "PC") then
        addr1 = 0x5c34b4
        addr2 = 0x5c3a08
        addr3 = 0x5df840
    elseif (game == "CE") then
        addr1 = 0x54d384
        addr2 = 0x54d720
        addr3 = 0x564b34
    end
    writestring(addr1, "s1.master.hosthpc.com")
    writestring(addr2, "s1.ms01.hosthpc.com")
    writestring(addr3, default_version)
    loadversions()
end

function OnServerCommand(admin, command)
    t = tokenizecmdstring(command)
    count = #t
    if t[1] == "sv_change" then
        Command_Version(admin, command, t[2], count)
        return false
    end
    return nil
end


function writestring(addr, str)
    local l = 0
    for i = 1, #str do
        local c = string.byte(str, i)
        writebyte(addr + i - 1, c)
        l = l + 1
    end
    writebyte(addr + l, 0)
end

function Command_Version(executor, command, version, count)
    if count == 1 then
        sendconsoletext(executor, "The current version is " .. tostring(Version))
    elseif count == 2 and tonumber(version) then
        if Game == "PC" then
            local bool = false
            local Version = "-"
            if version == "1.00" or version == "00" or version == "0" then
                Version = "01.00.00.0564"
                writestring(0x5DF840, ver[1])
            elseif version == "1.01" or version == "01" or version == "1" then
                Version = "01.00.01.0580"
                writestring(0x5DF840, ver[2])
            elseif version == "1.02" or version == "02" or version == "2" then
                Version = "01.00.02.0581"
                writestring(0x5DF840, ver[3])
            elseif version == "1.03" or version == "03" or version == "3" then
                Version = "01.00.03.0605"
                writestring(0x5DF840, ver[4])
            elseif version == "1.04" or version == "04" or version == "4" then
                Version = "01.00.04.0607"
                writestring(0x5DF840, ver[5])
            elseif version == "1.05" or version == "05" or version == "5" then
                Version = "01.00.05.0610"
                writestring(0x5DF840, ver[6])
            elseif version == "1.06" or version == "06" or version == "6" then
                Version = "01.00.06.0612"
                writestring(0x5DF840, ver[7])
            elseif version == "1.07" or version == "07" or version == "7" then
                Version = "01.00.07.0613"
                writestring(0x5DF840, ver[8])
            elseif version == "1.08" or version == "08" or version == "8" then
                Version = "01.00.08.0616"
                writestring(0x5DF840, ver[9])
            elseif version == "1.09" or version == "09" or version == "9" then
                Version = "01.00.09.0620"
                writestring(0x5DF840, ver[10])
            elseif version == "1.10" or version == "10" then
                Version = "01.00.10.0621"
                writestring(0x5DF840, ver[11])
            else
                bool = true
            end
            if not bool then
                sendconsoletext(executor, "Server version has been changed to " .. tostring(Version) .. "!")
            else
                sendconsoletext(executor, "That is an invalid server version.")
            end
        elseif tonumber(version) then
            local bool = true
            if version == "1.00" or version == "00" or version == "0" then
                Version = "01.00.00.0609"
                writestring(0x564B34, ver[1])
            elseif version == "1.01" or version == "01" or version == "1" then
                Version = "01.00.01.0580"
                writestring(0x564B34, ver[2])
            elseif version == "1.02" or version == "02" or version == "2" then
                Version = "01.00.02.0581"
                writestring(0x564B34, ver[3])
            elseif version == "1.07" or version == "07" or version == "7" then
                Version = "01.00.07.0613"
                writestring(0x564B34, ver[4])
            elseif version == "1.08" or version == "08" or version == "8" then
                Version = "01.00.08.0616"
                writestring(0x564B34, ver[5])
            elseif version == "1.09" or version == "09" or version == "9" then
                Version = "01.00.09.0620"
                writestring(0x564B34, ver[6])
            elseif version == "1.10" or version == "10" then
                Version = "01.00.10.0621"
                writestring(0x564B34, ver[7])
            else
                bool = true
            end
            if not bool then
                sendconsoletext(executor, "Server version has been changed to " .. tostring(Version) .. "!")
            else
                sendconsoletext(executor, "That is an invalid server version.")
            end
        end
    else
        sendconsoletext(executor, "Invalid Syntax: " .. command .. " {version}")
    end
end

function loadversions()
    if Game == "PC" then
        ver[1] = "01.00.00.0564"
        ver[2] = "01.00.01.0580"
        ver[3] = "01.00.02.0581"
        ver[4] = "01.00.03.0605"
        ver[5] = "01.00.04.0607"
        ver[6] = "01.00.05.0610"
        ver[7] = "01.00.06.0612"
        ver[8] = "01.00.07.0613"
        ver[9] = "01.00.08.0616"
        ver[10] = "01.00.09.0620"
        ver[11] = "01.00.10.0621"
    elseif Game == "CE" then
        ver[1] = "01.00.00.0609"
        ver[2] = "01.00.01.0580"
        ver[3] = "01.00.02.0581"
        ver[4] = "01.00.07.0613"
        ver[5] = "01.00.08.0616"
        ver[6] = "01.00.09.0620"
        ver[7] = "01.00.10.0621"
    end
end

-- Created by H® Shaft thank you to Oxide, AelitePrime, Nugget & Wizard.
-- Visit http://halorace.org/forum/index.php?topic=514.0 or
-- Visit http://pastebin.com/u/HR_Shaft for more phasor scripts