-- For vehicle collision off - inspired from Eliteprime, Wizard, Shaft and Bugs's works --
						-- Whith the great help of A§H»Wizard --

playerRunoverCounter = {}
playerIsHit = {}
survives = 3  -- Number of times +1 the player will die before surviving by runovers

function GetRequiredVersion()
	return 200
end


function OnScriptLoad(processid, game, persistent)end

function OnDamageLookup(receiving, causing, mapId, tagdata)
	if causing and receiving then
		local c_player = objectidtoplayer(causing)
		local r_player = objectidtoplayer(receiving)
		if c_player and r_player and isinvehicle(c_player) then
			if not isinvehicle(r_player) then
				local dmg = gettaginfo(mapId)
				if dmg == "globals\\vehicle_collision" then
					if not playerIsHit[r_player] then
						if not playerRunoverCounter[r_player] then playerRunoverCounter[r_player] = 0 end
						playerRunoverCounter[r_player] = playerRunoverCounter[r_player] + 1
						if playerRunoverCounter[r_player] >= survives then
							return false
						else
							playerIsHit[r_player] = true
							registertimer(1000, "Alrdycrashed", r_player)
						end
					end
				end
			end
		end
	end
	return true
end

function getplayervehicleid(player)
    local m_objectId = getplayerobjectid(player)
    if m_objectId then return readdword(getobject(m_objectId) + 0x11C) end
end


function Alrdycrashed(id, count, player)
	playerIsHit[player] = nil
	return false
end