v2+ Multi Team Vehicle 1.3

LUA 439

V2+ Multi Team Vehicle 1.3 By xdedeone on 26th February 2019 05:44:26 PM

--[[ ### 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
]]

Recent Pastes

Zombies One 057[...]

V2+ Commands[...]

MAC address code[...]

V1+ 3 Weapons 2.0

V1+ Death Kill[...]

V1+ Afk Detect 1.0

V1+ Killing Spree[...]

V1+ Tea bag Loving[...]

V1+ Blank Script[...]

V1+ Stock Pile 1.0

Raw Paste

--[[ ### 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
]]