-- Player Collects a Key as one entity (the Commander's laptop im this case)
haveAddedObjective = {}
function key_laptop_init(e)
haveAddedObjective[e] = 0
end

function key_laptop_main(e)
 if haveAddedObjective[e] == 0 then
		addObjective(e)
		haveAddedObjective[e] = 1
	end
 PlayerDist = GetPlayerDistance(e)
 if PlayerDist < 60 and g_PlayerHealth > 0 then
	SourceAngle = g_PlayerAngY
	while SourceAngle < 0.0 do
		SourceAngle = SourceAngle + 360.0
	end	
	while SourceAngle > 340.0 do
		SourceAngle = SourceAngle - 360.0
	end
		
    PlayerDX = (g_Entity[e]['x'] - g_PlayerPosX)
    PlayerDZ = (g_Entity[e]['z'] - g_PlayerPosZ)
	DestAngle = math.atan2( PlayerDZ , PlayerDX )
	-- Convert to degrees
	DestAngle = (DestAngle * 57.2957795) - 90.0
	
	Result = math.abs(math.abs(SourceAngle)-math.abs(DestAngle))
	if Result > 180 then
		Result = 0
	end	
	
	if Result < 20.0 then
	--[[
		SourceAngle = g_PlayerAngX
		while SourceAngle < 0.0 do
			SourceAngle = SourceAngle + 360.0
		end	
		while SourceAngle > 335.0 do
			SourceAngle = SourceAngle - 360.0
		end	
				
		DestAngle = math.atan2( PlayerDZ , PlayerDY )
		-- Convert to degrees
		DestAngle = (DestAngle * 57.2957795) - 90.0		
			
		Result = math.abs(math.abs(SourceAngle)-math.abs(DestAngle))
		if Result > 180 then
			Result = 0
		end		
		
		if Result < 25.0 then
		--]]
			Prompt ("Press E To pick up the Commander's Laptop")
	 
			if g_KeyPressE == 1 then
				PromptDuration("Collected the Commander's Laptop",2000)
				PlaySound(e,0)
				Collected(e)
				Destroy(e)
				haveAddedObjective[e] = 0
				ActivateIfUsed(e)
			end
   end
 end
end

for c = 1 , objectiveCount do
        angle = pointAtPlayer(radarObjectives[c]) + math.rad(g_PlayerAngY)
        dist = GetPlayerDistance(radarObjectives[c])
        if dist > 2576 then
            dist = 2576
        end
        x = 90 + (( math.sin(angle) * ( dist / 200.0 ) * 0.5625 ))
        y = 15 + ( math.cos(angle) * ( dist / 200.0 ) )
        SetSpritePosition ( radarObjectiveSprites[c] , x , y )
           
        if g_Entity[radarObjectives[c]]['health'] <= 0 then -- This is to remove the objectives sprites from radar,
           DeleteSprite ( radarObjectiveSprites[c] )        -- once the objectives has been destroyed.
        end                                                 -- perelect
         
    end

-- https://forum.game-guru.com/thread/214054?page=1#msg2535617
-- Radar using sprites

radarFoundEnemies = 0
enemyCount = 0
objectiveCount = 0

radarEnemies = {}
radarObjectives = {}

radarEnemySprites = {}
radarObjectiveSprites = {}
radarSprite = 0

radarImageBack = 0
radarImageRed = 0
radarImageGreen = 0
radarImageYellow = 0

aspectRatio = 0

waitForAllEntities = 1

function radar_init(e)
	radarImageBack		=	LoadImage ( "scriptbank\\radar\\radar-back.png" )
	radarImageRed 		= 	LoadImage ( "scriptbank\\radar\\radar-red.png" )
	radarImageGreen 	= 	LoadImage ( "scriptbank\\radar\\radar-green.png" )
	radarImageYellow 	= 	LoadImage ( "scriptbank\\radar\\radar-yellow.png" )
	
	radarSprite = CreateSprite ( radarImageBack )
		
	SetSpritePriority 	( radarSprite , 100 )

end

function radar_main(e)

	SetSpriteSize 		( radarSprite , 15 , -1 )	
	SetSpriteOffset 	( radarSprite , 7.5 , -1 )
	SetSpritePosition 	( radarSprite , 90 , 15 )	
	SetSpriteAngle		( radarSprite , -g_PlayerAngY )
	
	if waitForAllEntities == 1 then
		waitForAllEntities = 0
		return
	end
	
	if radarFoundEnemies == 0 then
		enemyCount = 0
		for c = 1, 3000 do
			if ai_soldier_state[c] ~= nil then
				if g_Entity[c] ~= nil then
					enemyCount = enemyCount + 1
					radarEnemies[enemyCount] = c	
					radarEnemySprites[enemyCount] = CreateSprite( radarImageRed )
					SetSpriteOffset ( radarEnemySprites[enemyCount] , 0.25 , -1 )
					SetSpriteSize ( radarEnemySprites[enemyCount] , 0.5 , -1 )
					SetSpritePosition ( radarEnemySprites[enemyCount] , 200 , 200 )
				end
			end
		end		
		radarFoundEnemies = 1		
	end
	
	newEntity = GetFirstEntitySpawn()
	if newEntity ~= 0 then
		if ai_soldier_state[newEntity] ~= nil then
			if g_Entity[newEntity] ~= nil then
				enemyCount = enemyCount + 1
				radarEnemies[enemyCount] = newEntity
				radarEnemySprites[enemyCount] = CreateSprite( radarImageRed )
				SetSpriteOffset ( radarEnemySprites[enemyCount] , 0.25 , -1 )
				SetSpriteSize ( radarEnemySprites[enemyCount] , 0.5 , -1 )
				SetSpritePosition ( radarEnemySprites[enemyCount] , 200 , 200 )
			end
		end	
	end
	
	for c = 1 , enemyCount do
		if g_Entity[radarEnemies[c]]['health'] > 0 then
			angle = pointAtPlayer(radarEnemies[c]) + math.rad(g_PlayerAngY)
			dist = GetPlayerDistance(radarEnemies[c])
			if dist > 2576 then
				dist = 2576
			end
			x = 90 + (( math.sin(angle) * ( dist / 200.0 ) * (GetDeviceHeight()/GetDeviceWidth()) ))
			y = 15 + ( math.cos(angle) * ( dist / 200.0 ) )
			SetSpritePosition ( radarEnemySprites[c] , x , y )
		else
			SetSpritePosition ( radarEnemySprites[c] , 200 , 200 )
		end
	end
	
	for c = 1 , objectiveCount do
		angle = pointAtPlayer(radarObjectives[c]) + math.rad(g_PlayerAngY)
		dist = GetPlayerDistance(radarObjectives[c])
		if dist > 2576 then
			dist = 2576
		end
		x = 90 + (( math.sin(angle) * ( dist / 200.0 ) * (GetDeviceHeight()/GetDeviceWidth()) ))
		y = 15 + ( math.cos(angle) * ( dist / 200.0 ) )
		SetSpritePosition ( radarObjectiveSprites[c] , x , y )
		if g_Entity[radarObjectives[c]]['health'] <= 0 then
          DeleteSprite ( radarObjectiveSprites[c] )
       end
	end	
	

end

function pointAtPlayer (i)
	x = g_PlayerPosX - g_Entity[i]['x'];
	z = g_PlayerPosZ - g_Entity[i]['z'];
	angle = math.atan2( z , x );
	
	angle = angle + (-90.0*0.0174533);
	
	return angle;
end

function addObjective (i)
	objectiveCount = objectiveCount + 1
	radarObjectives[objectiveCount] = i
	radarObjectiveSprites[objectiveCount] = CreateSprite( radarImageYellow )	
	SetSpriteSize ( radarObjectiveSprites[objectiveCount] , 0.5 , -1 )
	SetSpriteOffset ( radarObjectiveSprites[objectiveCount] , 0.25 , -1 )
	SetSpritePosition ( radarObjectiveSprites[objectiveCount] , 200 , 200 )
end

-- This removes the objective image from the radar
		if g_Entity[radarObjectives[c]]['health'] <= 0 or g_Entity[radarObjectives[c]]['collected'] == 1 then
		   DeleteSprite ( radarObjectiveSprites[c] )
		end

-- https://forum.game-guru.com/thread/214054?page=1#msg2535617
-- Radar using sprites by perelect

radarFoundEnemies = 0
enemyCount = 0
objectiveCount = 0

radarEnemies = {}
radarObjectives = {}

radarEnemySprites = {}
radarObjectiveSprites = {}
radarSprite = 0

radarImageBack = 0
radarImageRed = 0
radarImageGreen = 0
radarImageYellow = 0

aspectRatio = 0

waitForAllEntities = 1

function radar_init(e)
	radarImageBack		=	LoadImage ( "scriptbank\\radar\\radar-back.png" )
	radarImageRed 		= 	LoadImage ( "scriptbank\\radar\\radar-red.png" )
	radarImageGreen 	= 	LoadImage ( "scriptbank\\radar\\radar-green.png" )
	radarImageYellow 	= 	LoadImage ( "scriptbank\\radar\\radar-yellow.png" )
	
	radarSprite = CreateSprite ( radarImageBack )
		
	SetSpritePriority 	( radarSprite , 100 )

end

function radar_main(e)

	SetSpriteSize 		( radarSprite , 15 , -1 )	
	SetSpriteOffset 	( radarSprite , 7.5 , -1 )
	SetSpritePosition 	( radarSprite , 90 , 15 )	
	SetSpriteAngle		( radarSprite , -g_PlayerAngY )
	
	if waitForAllEntities == 1 then
		waitForAllEntities = 0
		return
	end
	
	if radarFoundEnemies == 0 then
		enemyCount = 0
		for c = 1, 3000 do
			if ai_soldier_state[c] ~= nil then
				if g_Entity[c] ~= nil then
					enemyCount = enemyCount + 1
					radarEnemies[enemyCount] = c	
					radarEnemySprites[enemyCount] = CreateSprite( radarImageRed )
					SetSpriteOffset ( radarEnemySprites[enemyCount] , 0.25 , -1 )
					SetSpriteSize ( radarEnemySprites[enemyCount] , 0.5 , -1 )
					SetSpritePosition ( radarEnemySprites[enemyCount] , 200 , 200 )
				end
			end
		end		
		radarFoundEnemies = 1		
	end
	
	newEntity = GetFirstEntitySpawn()
	if newEntity ~= 0 then
		if ai_soldier_state[newEntity] ~= nil then
			if g_Entity[newEntity] ~= nil then
				enemyCount = enemyCount + 1
				radarEnemies[enemyCount] = newEntity
				radarEnemySprites[enemyCount] = CreateSprite( radarImageRed )
				SetSpriteOffset ( radarEnemySprites[enemyCount] , 0.25 , -1 )
				SetSpriteSize ( radarEnemySprites[enemyCount] , 0.5 , -1 )
				SetSpritePosition ( radarEnemySprites[enemyCount] , 200 , 200 )
			end
		end	
	end
	
	for c = 1 , enemyCount do
		if g_Entity[radarEnemies[c]]['health'] > 0 then
			angle = pointAtPlayer(radarEnemies[c]) + math.rad(g_PlayerAngY)
			dist = GetPlayerDistance(radarEnemies[c])
			if dist > 2576 then
				dist = 2576
			end
			x = 90 + (( math.sin(angle) * ( dist / 200.0 ) * (GetDeviceHeight()/GetDeviceWidth()) ))
			y = 15 + ( math.cos(angle) * ( dist / 200.0 ) )
			SetSpritePosition ( radarEnemySprites[c] , x , y )
		else
			SetSpritePosition ( radarEnemySprites[c] , 200 , 200 )
		end
	end
	
	for c = 1 , objectiveCount do
		angle = pointAtPlayer(radarObjectives[c]) + math.rad(g_PlayerAngY)
		dist = GetPlayerDistance(radarObjectives[c])
		if dist > 2576 then
			dist = 2576
		end
		x = 90 + (( math.sin(angle) * ( dist / 200.0 ) * (GetDeviceHeight()/GetDeviceWidth()) ))
		y = 15 + ( math.cos(angle) * ( dist / 200.0 ) )
		SetSpritePosition ( radarObjectiveSprites[c] , x , y )
     if g_Entity[radarObjectives[c]]['health'] <= 0 or g_Entity[radarObjectives[c]]['collected'] == 1 then
           DeleteSprite ( radarObjectiveSprites[c] )
        end
       end
	end	

function pointAtPlayer (i)
	x = g_PlayerPosX - g_Entity[i]['x'];
	z = g_PlayerPosZ - g_Entity[i]['z'];
	angle = math.atan2( z , x );
	
	angle = angle + (-90.0*0.0174533);
	
	return angle;
end

function addObjective (i)
	objectiveCount = objectiveCount + 1
	radarObjectives[objectiveCount] = i
	radarObjectiveSprites[objectiveCount] = CreateSprite( radarImageYellow )	
	SetSpriteSize ( radarObjectiveSprites[objectiveCount] , 0.5 , -1 )
	SetSpriteOffset ( radarObjectiveSprites[objectiveCount] , 0.25 , -1 )
	SetSpritePosition ( radarObjectiveSprites[objectiveCount] , 200 , 200 )
end

-- LUA Script - precede every function and global member with lowercase name of script + '_main'
-- Detonate or sabotage any stuff and count
haveAddedObjective = {}
destroy_started = {}
EntityHealth = {}
KillCount = 0
local input = "b"
function timecharge_sd3_init(e)
 haveAddedObjective[e] = 0
 destroy_started[e]=0
 pressed = 0
 end

function timecharge_sd3_main(e)
 if haveAddedObjective[e] == 0 then
		addObjective(e)
		haveAddedObjective[e] = 1
	end
PlayerDist = GetPlayerDistance(e)
 
   if PlayerDist < 150 and destroy_started[e] == 0 then 
    Prompt ("Press B to sabotage")	 
     if g_InKey == "b" then
      pressed = 1
      destroy_started[e] = GetTimer(e)+3500
      PlaySound(e,0)
     end
   end
 
 if destroy_started[e]> 0 then
  Prompt("Success sabotaged, run!")
  if GetTimer(e)> destroy_started[e] then
   SetEntityHealth(e,0)
   KillCount = KillCount + 1
   destroy_started[e]=0
  end
 end

 if g_Entity[e]['health'] <= 0 then
   pressed = 0
   StopSound(e,0)
  end
end

-- LUA Script - precede every function and global member with lowercase name of script + '_main'
-- Player Collects Dossier
haveAddedObjective = {}
KillCount = 0
local input = "u"

function collect_dossier5b_init(e)
haveAddedObjective[e] = 0
end

function collect_dossier5b_main(e)
 if haveAddedObjective[e] == 0 then
		addObjective(e)
		haveAddedObjective[e] = 1
	end
 PlayerDist = GetPlayerDistance(e)
 if PlayerDist < 50 then
	SourceAngle = g_PlayerAngY
	while SourceAngle < 0.0 do
		SourceAngle = SourceAngle + 360.0
	end	
	while SourceAngle > 340.0 do
		SourceAngle = SourceAngle - 360.0
	end
		
    PlayerDX = (g_Entity[e]['x'] - g_PlayerPosX)
    PlayerDZ = (g_Entity[e]['z'] - g_PlayerPosZ)
	DestAngle = math.atan2( PlayerDZ , PlayerDX )
	-- Convert to degrees
	DestAngle = (DestAngle * 57.2957795) - 90.0
	
	Result = math.abs(math.abs(SourceAngle)-math.abs(DestAngle))
	if Result > 80 then
		Result = 0
	end	
	
	if Result < 20.0 then
	--[[
		SourceAngle = g_PlayerAngX
		while SourceAngle < 0.0 do
			SourceAngle = SourceAngle + 360.0
		end	
		while SourceAngle > 335.0 do
			SourceAngle = SourceAngle - 360.0
		end	
				
		DestAngle = math.atan2( PlayerDZ , PlayerDY )
		-- Convert to degrees
		DestAngle = (DestAngle * 57.2957795) - 90.0		
			
		Result = math.abs(math.abs(SourceAngle)-math.abs(DestAngle))
		if Result > 180 then
			Result = 0
		end		
		
		if Result < 25.0 then
		--]]
					PlayerDist = GetPlayerDistance(e)
		if PlayerDist < 50 and g_Entity[e]['collected'] == 0 then
			Prompt ("Press U To pick up this dossier")
	 
			if g_InKey == "u" then
				PromptDuration("** The dossier has been collected **",3000)
				KillCount = KillCount + 1
				PlaySound(e,0)
				Collected(e)
				ActivateIfUsed(e)
				CollisionOff(e)
			    Hide(e)
		if GetTimer(e) > GetTimer(e) + 2000 then
				Destroy(e)	
       end
   end
 end
end
end
end

 	
	newEntity = GetFirstEntitySpawn()
	if newEntity ~= 0 then
		if ai_soldier_state[newEntity] ~= nil then
			if g_Entity[newEntity] ~= nil then
				enemyCount = enemyCount + 1
				radarEnemies[enemyCount] = newEntity
				radarEnemySprites[enemyCount] = CreateSprite( radarImageRed )
				SetSpriteOffset ( radarEnemySprites[enemyCount] , 0.25 , -1 )
				SetSpriteSize ( radarEnemySprites[enemyCount] , 0.5 , -1 )
				SetSpritePosition ( radarEnemySprites[enemyCount] , 200 , 200 )
			end
		end	
	end

 -- https://forum.game-guru.com/thread/214054
-- radar_mod.lua
-- Original Radar script using sprites
-- Modified to include Friendly AI, Collectable Objectives and to also remove friendly and objective images from radar once completed or destroyed
-- Modified by perelect. 07/12/2015

radarFoundEnemies = 0
enemyCount = 0
objectiveCount = 0
friendlyCount = 0

radarEnemies = {}
radarObjectives = {}
radarFriendly = {}

radarEnemySprites = {}
radarObjectiveSprites = {}
radarFriendlySprites = {}
radarSprite = 0

radarImageBack = 0
radarImageRed = 0
radarImageGreen = 0
radarImageYellow = 0

aspectRatio = 0

waitForAllEntities = 1

function radar_mod_init(e)
	radarImageBack		=	LoadImage ( "scriptbank\\radar\\radar-back.png" )
	radarImageRed 		= 	LoadImage ( "scriptbank\\radar\\radar-red.png" )
	radarImageGreen 	= 	LoadImage ( "scriptbank\\radar\\radar-green.png" )
	radarImageYellow 	= 	LoadImage ( "scriptbank\\radar\\radar-yellow.png" )
	
	radarSprite = CreateSprite ( radarImageBack )
		
	SetSpritePriority 	( radarSprite , 100 )

end

function radar_mod_main(e)

	SetSpriteSize 		( radarSprite , 15 , -1 ) -- 0.15 comes from here	
	SetSpriteOffset 	( radarSprite , 7.5 , -1 ) -- change this value to suit your screen resolution width.ie: 1860wide is (0.15*1860/2)=140
	SetSpritePosition 	( radarSprite , 90 , 15 )	
	SetSpriteAngle		( radarSprite , -g_PlayerAngY )
	
	if waitForAllEntities == 1 then
		waitForAllEntities = 0
		return
	end
	
	
	if radarFoundEnemies == 0 then
		enemyCount = 0
		for c = 1, 3000 do
			if ai_soldier_state[c] ~= nil then
				if g_Entity[c] ~= nil then
					enemyCount = enemyCount + 1
					radarEnemies[enemyCount] = c	
					radarEnemySprites[enemyCount] = CreateSprite( radarImageRed )
					SetSpriteOffset ( radarEnemySprites[enemyCount] , 1 , 1 )
					SetSpriteSize ( radarEnemySprites[enemyCount] , 0.5 , -1 )
					SetSpritePosition ( radarEnemySprites[enemyCount] , 200 , 200 )
				end
			end
		end		
		radarFoundEnemies = 1		
	end
	
		newEntity = GetFirstEntitySpawn()
	if newEntity ~= 0 then
		if ai_soldier_state[newEntity] ~= nil then
			if g_Entity[newEntity] ~= nil then
				enemyCount = enemyCount + 1
				radarEnemies[enemyCount] = newEntity
				radarEnemySprites[enemyCount] = CreateSprite( radarImageRed )
				SetSpriteOffset ( radarEnemySprites[enemyCount] , 0.25 , -1 )
				SetSpriteSize ( radarEnemySprites[enemyCount] , 0.5 , -1 )
				SetSpritePosition ( radarEnemySprites[enemyCount] , 200 , 200 )
			end
		end	
	end
	
	for c = 1 , enemyCount do
		if g_Entity[radarEnemies[c]]['health'] > 0 then
			angle = pointAtPlayer(radarEnemies[c]) + math.rad(g_PlayerAngY)
			dist = GetPlayerDistance(radarEnemies[c])
			if dist > 2576 then
				dist = 2576
			end
			x = 90 + (( math.sin(angle) * ( dist / 200.0 ) * 0.5625 ))
			y = 15 + ( math.cos(angle) * ( dist / 200.0 ) )
			SetSpritePosition ( radarEnemySprites[c] , x , y )
		else
			SetSpritePosition ( radarEnemySprites[c] , 200 , 200 )
		end
	end
	-- This section is for Objectives
	for c = 1 , objectiveCount do
		angle = pointAtPlayer(radarObjectives[c]) + math.rad(g_PlayerAngY)
		dist = GetPlayerDistance(radarObjectives[c])
		if dist > 2576 then
			dist = 2576
		end
		x = 90 + (( math.sin(angle) * ( dist / 200.0 ) * 0.5625 ))
		y = 15 + ( math.cos(angle) * ( dist / 200.0 ) )
		SetSpritePosition ( radarObjectiveSprites[c] , x , y )
		-- This removes the objective image from the radar
		if g_Entity[radarObjectives[c]]['health'] <= 0 or g_Entity[radarObjectives[c]]['collected'] == 1 then
		   DeleteSprite ( radarObjectiveSprites[c] )
		end
	end	
	-- This section is for Friendly AI
	for c = 1 , friendlyCount do
		angle = pointAtPlayer(radarFriendly[c]) + math.rad(g_PlayerAngY)
		dist = GetPlayerDistance(radarFriendly[c])
		if dist > 2576 then
			dist = 2576
		end
		x = 90 + (( math.sin(angle) * ( dist / 200.0 ) * 0.5625 ))
		y = 15 + ( math.cos(angle) * ( dist / 200.0 ) )
		SetSpritePosition ( radarFriendlySprites[c] , x , y )
		-- This removes the friendly image from the radar
		if g_Entity[radarFriendly[c]]['health'] <= 0 then
		   DeleteSprite ( radarFriendlySprites[c] )
		end
	end	
end

function pointAtPlayer (i)
	x = g_PlayerPosX - g_Entity[i]['x'];
	z = g_PlayerPosZ - g_Entity[i]['z'];
	angle = math.atan2( z , x );
	
	angle = angle + (-90.0*0.0174533);
	
	return angle;
end
-- This section is for Objectives
function addObjective (i)
	objectiveCount = objectiveCount + 1
	radarObjectives[objectiveCount] = i
	radarObjectiveSprites[objectiveCount] = CreateSprite( radarImageYellow )
	SetSpriteOffset ( radarObjectiveSprites[objectiveCount] , 0.5 , -1 )
	SetSpriteSize ( radarObjectiveSprites[objectiveCount] , 0.25 , -1 )
	SetSpritePosition ( radarObjectiveSprites[objectiveCount] , 200 , 200 )
end
-- This section is for Friendly AI
function addFriendly (i)
	friendlyCount = friendlyCount + 1
	radarFriendly[friendlyCount] = i
	radarFriendlySprites[friendlyCount] = CreateSprite( radarImageGreen ) -- this set friendly to the green image
	SetSpriteOffset ( radarFriendlySprites[friendlyCount] , 0.5 , -1 )
	SetSpriteSize ( radarFriendlySprites[friendlyCount] , 0.25 , -1 )
	SetSpritePosition ( radarFriendlySprites[friendlyCount] , 200 , 200 )
end

-- https://forum.game-guru.com/thread/214054
-- radar_mod.lua
-- Original Radar script using sprites
-- Modified to include Friendly AI, Collectable Objectives and to also remove friendly and objective images from radar once completed or destroyed
-- Modified by perelect 07/12/2015, updated 16/12/2015, updated 21/12/2015

radarFoundEnemies = 0
enemyCount = 0
objectiveCount = 0
friendlyCount = 0

radarEnemies = {}
radarObjectives = {}
radarFriendly = {}

radarEnemySprites = {}
radarObjectiveSprites = {}
radarFriendlySprites = {}
radarSprite = 0

radarImageBack = 0
radarImageRed = 0
radarImageGreen = 0
radarImageYellow = 0

aspectRatio = 0

waitForAllEntities = 1

function radar_mod_init(e)
	radarImageBack		=	LoadImage ( "scriptbank\\radar\\radar-back.png" )
	radarImageRed 		= 	LoadImage ( "scriptbank\\radar\\radar-red.png" )
	radarImageGreen 	= 	LoadImage ( "scriptbank\\radar\\radar-green.png" )
	radarImageYellow 	= 	LoadImage ( "scriptbank\\radar\\radar-yellow.png" )
	
	radarSprite = CreateSprite ( radarImageBack )
		
	SetSpriteDepth 	( radarSprite , 100 )

end

function radar_mod_main(e)

	SetSpriteSize 		( radarSprite , 15 , -1 )	
	SetSpriteOffset 	( radarSprite , 7.5 , -1 )
	SetSpritePosition 	( radarSprite , 90 - 0.7 , 15 )	-- the - 0.7 is to align the radar with other sprites -- a fine tune for my system
	SetSpriteAngle		( radarSprite , -g_PlayerAngY )
	
	if waitForAllEntities == 1 then
		waitForAllEntities = 0
		return
	end
	
	
	if radarFoundEnemies == 0 then
		enemyCount = 0
		for c = 1, 3000 do
			if ai_soldier_state[c] ~= nil then
				if g_Entity[c] ~= nil then
					enemyCount = enemyCount + 1
					radarEnemies[enemyCount] = c	
					radarEnemySprites[enemyCount] = CreateSprite( radarImageRed )
					SetSpriteOffset ( radarEnemySprites[enemyCount] , 1 , 1 )
					SetSpriteSize ( radarEnemySprites[enemyCount] , 0.5 , -1 )
					SetSpritePosition ( radarEnemySprites[enemyCount] , 200 , 200 )
				end
			end
		end		
		radarFoundEnemies = 1		
	end
	
	newEntity = GetFirstEntitySpawn()
	if newEntity ~= 0 then
		if ai_soldier_state[newEntity] ~= nil then
			if g_Entity[newEntity] ~= nil then
				enemyCount = enemyCount + 1
				radarEnemies[enemyCount] = newEntity
				radarEnemySprites[enemyCount] = CreateSprite( radarImageRed )
				SetSpriteOffset ( radarEnemySprites[enemyCount] , 0.25 , -1 )
				SetSpriteSize ( radarEnemySprites[enemyCount] , 0.5 , -1 )
				SetSpritePosition ( radarEnemySprites[enemyCount] , 200 , 200 )
			end
		end	
	end
	
	for c = 1 , enemyCount do
		if g_Entity[radarEnemies[c]]['health'] > 0 then
			angle = pointAtPlayer(radarEnemies[c]) + math.rad(g_PlayerAngY)
			dist = GetPlayerDistance(radarEnemies[c])
			if dist > 2576 then
				dist = 2576
			end
			x = 90 + (( math.sin(angle) * ( dist / 200.0 ) * (GetDeviceHeight()/GetDeviceWidth()) ))
			y = 15 + ( math.cos(angle) * ( dist / 200.0 ) )
			SetSpritePosition ( radarEnemySprites[c] , x , y )
		else
			SetSpritePosition ( radarEnemySprites[c] , 200 , 200 )
		end
	end
	-- This section is for Objectives
	for c = 1 , objectiveCount do
		angle = pointAtPlayer(radarObjectives[c]) + math.rad(g_PlayerAngY)
		dist = GetPlayerDistance(radarObjectives[c])
		if dist > 2576 then
			dist = 2576
		end
		x = 90 + (( math.sin(angle) * ( dist / 200.0 ) * (GetDeviceHeight()/GetDeviceWidth()) ))
		y = 15 + ( math.cos(angle) * ( dist / 200.0 ) )
		SetSpritePosition ( radarObjectiveSprites[c] , x , y )
		-- This removes the objective image from the radar
		if g_Entity[radarObjectives[c]]['health'] <= 0 or g_Entity[radarObjectives[c]]['collected'] == 1 then
		   --DeleteSprite ( radarObjectiveSprites[c] )
		   SetSpritePosition ( radarObjectiveSprites[c] , 200 , 200 )
		end
      end	
	-- This section is for Friendly AI
	for c = 1 , friendlyCount do
		angle = pointAtPlayer(radarFriendly[c]) + math.rad(g_PlayerAngY)
		dist = GetPlayerDistance(radarFriendly[c])
		if dist > 2576 then
			dist = 2576
		end
		x = 90 + (( math.sin(angle) * ( dist / 200.0 ) * (GetDeviceHeight()/GetDeviceWidth()) ))
		y = 15 + ( math.cos(angle) * ( dist / 200.0 ) )
		SetSpritePosition ( radarFriendlySprites[c] , x , y )
		-- This removes the friendly image from the radar
		if g_Entity[radarFriendly[c]]['health'] <= 0 then
		   --DeleteSprite ( radarFriendlySprites[c] )
		   SetSpritePosition ( radarFriendlySprites[c], 200 , 200 )
		end
	end	
end

function pointAtPlayer (i)
	x = g_PlayerPosX - g_Entity[i]['x'];
	z = g_PlayerPosZ - g_Entity[i]['z'];
	angle = math.atan2( z , x );
	
	angle = angle + (-90.0*0.0174533);
	
	return angle;
end
-- This section is for Objectives
function addObjective (i)
	objectiveCount = objectiveCount + 1
	radarObjectives[objectiveCount] = i
	radarObjectiveSprites[objectiveCount] = CreateSprite( radarImageYellow )
	SetSpriteOffset ( radarObjectiveSprites[objectiveCount] , 1 , 1 )
	SetSpriteSize ( radarObjectiveSprites[objectiveCount] , 0.5 , -1 )
	SetSpritePosition ( radarObjectiveSprites[objectiveCount] , 200 , 200 )
end
-- This section is for Friendly AI
function addFriendly (i)
	friendlyCount = friendlyCount + 1
	radarFriendly[friendlyCount] = i
	radarFriendlySprites[friendlyCount] = CreateSprite( radarImageGreen ) -- this sets friendly to the green image
	SetSpriteOffset ( radarFriendlySprites[friendlyCount] , 1 , 1 )
	SetSpriteSize ( radarFriendlySprites[friendlyCount] , 0.5 , -1 )
	SetSpritePosition ( radarFriendlySprites[friendlyCount] , 200 , 200 )
end