Multi-Team Vehicle Script v1.3 for Phasor v2+

--[[ ### Multi-Team Vehicle Script v1.3 ###]]--
--[[ ###   by H® Shaft for Phasor v2+   ###]]--

-- Allows you to enter the enemy's vehicle during FREE-for-All (FFA) games, not compatible with team games
-- Good to use with my Taxi script http://pastebin.com/00FcbiVs
--Version: 1.3 7/14/2014 -- added onplayerjoin, and ondamagelookup edits

function GetRequiredVersion()
    return 200
end

function OnScriptLoad(process, game, persistent)
    if game == "PC" or game == true then
        GAME = "PC"
        gametype_base = 0x671340
    else
        GAME = "CE"
        gametype_base = 0x5F5498
    end
    if readbyte(gametype_base + 0x34) == 1 then
        compatible = false
    else
        compatible = true
    end
end

function OnPlayerSpawn(player, m_objectId)
    if compatible then writebyte(getplayer(player) + 0x20, 0) end
end

function OnPlayerJoin(player)
    if getplayer(player) then
        if compatible then writebyte(getplayer(player) + 0x20, 0) end
    end
end

function OnDamageLookup(receiver_id, causer_id, tagid)
    if compatible then
        if causer_id and receiver_id then
            local c_player = objectidtoplayer(causer_id)
            local r_player = objectidtoplayer(receiver_id)
            if r_player and c_player and c_player ~= r_player then
                if getteam(c_player) == getteam(r_player) then
                    local count = r_player
                    while(getteam(c_player) == count) do
                        count = count + 1
                    end
                    writebyte(getplayer(r_player) + 0x20, count)
                    mtv = registertimer(100, "multiteamtimer", r_player)
                end
            end
        end
    end
end

function multiteamtimer(id, count, player)
    if compatible then
        writebyte(getplayer(player) + 0x20, 0)
    end
    return false
end

function OnGameEnd(stage)
    if stage == 1 then
        if mtv then
            mtv = nil
        end
    end
end

--[[ Created by H® Shaft & AelitePrime
Thanks 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
]]