-- Inspired from TelyX, A§H»Wizard, H»Kennan & AelitePrime 's work --
						-- For the skull weapon --


	skull = {}
	frag_count = 0
	plasma_count = 0
	max_health = 0.1


function GetRequiredVersion() return 200 end

function OnScriptLoad(processid, game, persistent) end

function OnNewGame(map)
	LoadTags()
end

function OnPlayerSpawn(player)
	writefloat(getobject(getplayerobjectid(player)) + 0xE0, max_health)
end

function OnPlayerSpawnEnd(player, m_objectId)
	local hash = gethash(player)
	skull[hash] = skull[hash] or {}
	local m_object = getobject(m_objectId)
	if m_object then
		writebyte(m_object + 0x31E, frag_count)
		writebyte(m_object + 0x31F, plasma_count)
	end
	for i = 0,3 do
		local m_object = getobject(m_objectId)
		if m_object then
			local weapID = readdword(m_object + 0x2F8 + i*4)
			local weap = getobject(weapID)
			if weap then
				destroyobject(weapID)
			end
		end
	end
	skull[hash].objId = createobject(oddball_tag_id, 0, 1, false, 0, 0, 0)
	assignweapon(player, skull[hash].objId)
end

function OnObjectCreationAttempt(mapId, parentId, player)
	return checkObject(mapId)
end

function OnObjectInteraction(player, objId, mapId)
	if mapId == fragnade_tag_id or plasmanade_tag_id or oddball_tag_id then
			return false
	end
	return true
end


function OnDamageLookup(receiving, causing, mapId, tagdata)
	if mapId == global_fallingId then
		return false
	elseif mapId == oddball_melee_tag_id then
		writefloat(tagdata, 0x1D0, 500)
		writefloat(tagdata, 0x1D4, 500)
		writefloat(tagdata, 0x1D8, 500)
	end
	if causing then
		local c_object = getobject(causing)
    	if c_object then
    		local causer = objectaddrtoplayer(c_object)
    		if causer then
				if isinvehicle(causer) then
					local m_vehicleId = getplayervehicleid(causer)
					if m_vehicleId then
						local m_vehicle = getobject(m_vehicleId)
						local driver = getdriverplayer(m_vehicle)
						if driver == causer then
							return false
						end
					end
				end
			end
		end
	end
end

function OnPlayerKill(killer, victim, mode)
	if mode == 2 then
		local victim_kills = readword (getplayer(victim), 0x9C)
		victim_kills = victim_kills + 1
		--guardianed = getplayer(victim)
		writeword(getplayer(victim) + 0x9C, victim_kills)
		privatesay(getplayer(victim), "Damned guardians, here earn your frag")
	end
	local m_player = getplayer(victim)
	if m_player == nil then
		return
	end
	local m_object = getobject(readdword(m_player +  0x34))
	if m_object then
		for i = 0,3 do
			local weapID = readdword(m_object + 0x2F8 + i*4)
			if weapID then
				local weap = getobject(weapID)
				if weap then
					destroyobject(weapID)
				end
			end
		end
	end
end

function OnClientUpdate(player)
	local hash = gethash(player)
	local m_player = getplayer(player)
	if m_player == nil then
		return
	end
	local m_objectId = getplayerobjectid(player)
	if m_objectId == nil then
		return
	end
	local m_object = getobject(m_objectId)
	if m_object then
		local shooting = readbit(m_object + 0x209, 4)
		local nading2 = readbit(m_object + 0x209, 2)
		local nading = readbit(m_object + 0x209, 3)
		if shooting == true or nading == true then
			weapID = skull[hash].objId
			if m_player then
				if weapID then
					if getobject(weapID) then
						assignweapon(player, weapID)
					end
				end
			end
		end
	end
end

function checkObject(mapId)
	if mapId == "nil" then
		return false
	end
	return oddball_tag_id
end

function LoadTags()
	-- Equipment
	camouflage_tag_id = gettagid("eqip", "powerups\\active camouflage")
	healthpack_tag_id = gettagid("eqip", "powerups\\health pack")
	overshield_tag_id = gettagid("eqip", "powerups\\over shield")
	doublespeed_tag_id = gettagid("eqip", "powerups\\double speed")
	fullspec_tag_id = gettagid("eqip", "powerups\\full-spectrum vision")
	fragnade_tag_id = gettagid("eqip", "weapons\\frag grenade\\frag grenade")
	plasmanade_tag_id = gettagid("eqip", "weapons\\plasma grenade\\plasma grenade")
	rifleammo_tag_id = gettagid("eqip", "powerups\\assault rifle ammo\\assault rifle ammo")
	needlerammo_tag_id = gettagid("eqip", "powerups\\needler ammo\\needler ammo")
	pistolammo_tag_id = gettagid("eqip", "powerups\\pistol ammo\\pistol ammo")
	rocketammo_tag_id = gettagid("eqip", "powerups\\rocket launcher ammo\\rocket launcher ammo")
	shotgunammo_tag_id = gettagid("eqip", "powerups\\shotgun ammo\\shotgun ammo")
	sniperammo_tag_id = gettagid("eqip", "powerups\\sniper rifle ammo\\sniper rifle ammo")
	flameammo_tag_id = gettagid("eqip", "powerups\\flamethrower ammo\\flamethrower ammo")
	-- Weapons
	assaultrifle_tag_id = gettagid("weap", "weapons\\assault rifle\\assault rifle")
	oddball_tag_id = gettagid("weap", "weapons\\ball\\ball")
	flag_tag_id = gettagid("weap", "weapons\\flag\\flag")
	flamethrower_tag_id = gettagid("weap", "weapons\\flamethrower\\flamethrower")
	gravityrifle_tag_id = gettagid("weap", "weapons\\gravity rifle\\gravity rifle")
	needler_tag_id = gettagid("weap", "weapons\\needler\\mp_needler")
	pistol_tag_id = gettagid("weap", "weapons\\pistol\\pistol")
	plasmapistol_tag_id = gettagid("weap", "weapons\\plasma pistol\\plasma pistol")
	plasmarifle_tag_id = gettagid("weap", "weapons\\plasma rifle\\plasma rifle")
	plasmacannon_tag_id = gettagid("weap", "weapons\\plasma_cannon\\plasma_cannon")
	rocketlauncher_tag_id = gettagid("weap", "weapons\\rocket launcher\\rocket launcher")
	shotgun_tag_id = gettagid("weap", "weapons\\shotgun\\shotgun")
	sniper_tag_id = gettagid("weap", "weapons\\sniper rifle\\sniper rifle")
	-- Globals
	global_distanceId = gettagid("jpt!", "globals\\distance")
	global_fallingId = gettagid("jpt!", "globals\\falling")
	-- Others
	assaultrifle_melee_tag_id = gettagid("jpt!", "weapons\\assault rifle\\melee")
	flag_melee_tag_id = gettagid("jpt!", "weapons\\flag\\melee")
	flamethrower_melee_tag_id = gettagid("jpt!", "weapons\\flamethrower\\melee")
	needler_melee_tag_id = gettagid("jpt!", "weapons\\ball\\melee")
	pistol_melee_tag_id = gettagid("jpt!", "weapons\\pistol\\melee")
	plasmapistol_melee_tag_id = gettagid("jpt!", "weapons\\plasma pistol\\melee")
	plasmarifle_melee_tag_id = gettagid("jpt!", "weapons\\plasma rifle\\melee")
	plasmacannon_melee_tag_id = gettagid("jpt!", "weapons\\effects\\plasma_cannon_melee")
	rocketlauncher_melee_tag_id = gettagid("jpt!", "weapons\\rocket launcher\\melee")
	shotgun_melee_tag_id = gettagid("jpt!", "weapons\\shotgun\\melee")
	sniper_melee_tag_id = gettagid("jpt!", "weapons\\sniper rifle\\melee")
end