function winzone_no_weapons_init(e)
end

function winzone_no_weapons_main(e)
 if g_Entity[e]['plrinzone']==1 then
  if g_PlayerPosY - 65 <= g_Entity[e]['y'] and g_PlayerPosY >= g_Entity[e]['y'] + 25 then
	RemovePlayerWeapons(e)
        JumpToLevelIfUsed(e)
 end
 end
end

g_KillCount = 0
function winzone_no_weapons_init(e)
end

function winzone_no_weapons__main(e)
 if g_Entity[e]['plrinzone']==1 then
  if g_PlayerPosY - 65 <= g_Entity[e]['y'] and g_PlayerPosY >= g_Entity[e]['y'] + 25 then
		if g_KillCount == 1 then       
        g_KillCount = 0
				RemovePlayerWeapons(e)
				JumpToLevelIfUsed(e)
    end    
	end
 end
end

-- LUA Script - precede every function and global member with lowercase name of script
 
-- globals for AI enemies
ai_newdest_time = {}
ai_cover_on = {}
--g_KillCount = 0
-- init when level first runs
function ai_soldier_missiondoor_init(e)
 ai_soldier_state[e] = "patrol";
 ai_soldier_pathindex[e] = -1;
 ai_start_x[e] = nil
 ai_starting_heath[e] = nil
 ai_ran_to_cover[e] = 0
 ModulateSpeed(e,1.0)
 ai_old_health[e] = 0
 CharacterControlStand(e)
 ai_returning_home[e] = 0
 ai_newdest_time[e] = -1
 ai_cover_on[e] = 0
 ai_alerted_spoken[e] = 0
 SetCharacterSoundSet(e)
end
 
-- logic will patrol closest waypoint path, then shoot at player if they
-- get too close, and will run away for cover if their health is low
function ai_soldier_missiondoor_main(e)
 
 -- Death Animation
 if ai_soldier_state[e] ~= "deathanim" then
  
 -- Detect player distance (note: possible optimization here)
 PlayerDX = g_Entity[e]['x'] - g_PlayerPosX;
 PlayerDY = g_Entity[e]['y'] - g_PlayerPosY;
 PlayerDZ = g_Entity[e]['z'] - g_PlayerPosZ;
 PlayerDist = math.sqrt(math.abs(PlayerDX*PlayerDX)+math.abs(PlayerDY*PlayerDY)+math.abs(PlayerDZ*PlayerDZ));
  
 -- Entity Object Number
 EntObjNo = g_Entity[e]['obj'];
 
 -- Handle health
 if ai_starting_heath[e] == nil then
    ai_starting_heath[e] = g_Entity[e]['health']
 end
   
 -- Store starting point so we can return there if player moves far away
 if ai_start_x[e] == nil then
    ai_start_x[e] = g_Entity[e]['x']
    ai_start_z[e] = g_Entity[e]['z']
    AISetEntityControl(EntObjNo,AI_MANUAL);
 end
  
 -- Patrol Mode
 if ai_soldier_state[e] == "patrol" then
  
  -- Try and find a close path to patrol, just check once for it
  if ai_soldier_pathindex[e] == -1 then
   ai_soldier_pathindex[e] = -2
   CharacterControlArmed(e)
   -- find initial waypoint path to follow
   PathIndex = -1;
   pClosest = 99999;
   for pa = 1, AIGetTotalPaths(), 1 do
    for po = 1 , AIGetPathCountPoints(pa), 1 do
     pDX = g_Entity[e]['x'] - AIPathGetPointX(pa,po);
     pDZ = g_Entity[e]['z'] - AIPathGetPointZ(pa,po);
     pDist = math.sqrt(math.abs(pDX*pDX)+math.abs(pDZ*pDZ));
     if pDist < pClosest and pDist < 200 then
      pClosest = pDist;
      PathIndex = pa;
     end
    end -- po
   end -- pa
   -- follow found path
   if PathIndex > -1 then
    ai_soldier_pathindex[e] = PathIndex;
    ai_path_point_index[e] = 2
    ModulateSpeed(e,1.0)
    SetCharacterToWalk(e)
    ai_path_point_direction[e] = 1
    ai_path_point_max[e] = AIGetPathCountPoints(ai_soldier_pathindex[e])
   end  
  end
   
  -- Force character as unarmed
  CharacterControlUnarmed(e)
   
  -- If set to head home, lets go there
  if ai_returning_home[e] == 1 then
    tDistX = g_Entity[e]['x'] - ai_start_x[e];
    tDistZ = g_Entity[e]['z'] - ai_start_z[e];
    DistToStart = math.sqrt(math.abs(tDistX*tDistX)+math.abs(tDistZ*tDistZ))
    if DistToStart < 200 or GetTimer(e) > ai_combat_state_delay[e] then
        ai_soldier_pathindex[e] = -1
        SetCharacterToWalk(e)
        CharacterControlUnarmed(e)
        AIEntityStop(EntObjNo);
        ModulateSpeed(e,1.0)
        ai_returning_home[e] = 0
        ai_soldier_state[e] = "alerted"
        ai_alerted_mode[e] = 0
    else
        AIEntityGoToPosition(EntObjNo,ai_start_x[e],ai_start_z[e])
    end
     
  -- If we have a path then lets patrol it
  elseif ai_soldier_pathindex[e] > -1 then
 
    ai_patrol_x[e] = AIPathGetPointX(ai_soldier_pathindex[e],ai_path_point_index[e])
    ai_patrol_z[e] = AIPathGetPointZ(ai_soldier_pathindex[e],ai_path_point_index[e])
    AIEntityGoToPosition(EntObjNo,ai_patrol_x[e],ai_patrol_z[e])
    tDistX = g_Entity[e]['x'] - ai_patrol_x[e]
    tDistZ = g_Entity[e]['z'] - ai_patrol_z[e]
    DistFromPath = math.sqrt(math.abs(tDistX*tDistX)+math.abs(tDistZ*tDistZ))   
     
    if DistFromPath < 50 then
        if ai_path_point_direction[e] == 1 then
            ai_path_point_index[e] = ai_path_point_index[e] + 1
            if ( ai_path_point_index[e] > ai_path_point_max[e] ) then
                ai_path_point_index[e] = ai_path_point_max[e] -1
                ai_path_point_direction[e] = 0
            end
        else
            ai_path_point_index[e] = ai_path_point_index[e] - 1
            if ( ai_path_point_index[e] < 1 ) then
                ai_path_point_index[e] = 2
                ai_path_point_direction[e] = 1
            end    
        end
    end
  else
    CharacterControlFidget(e)
  end
   
  ai_soldier_AggroCheck(e)
  ai_soldier_AlertAggroCheck(e)
   
  -- Alerted, perhaps player is near or gunshots can be heard?
  if PlayerDist < AIGetEntityViewRange(EntObjNo) / 3 or AIGetEntityHeardSound(EntObjNo) == 1 then
    ai_soldier_state[e] = "alerted"
    ai_alerted_mode[e] = 0
    ai_alert_x = g_Entity[e]['x']
    ai_alert_z = g_Entity[e]['z']
    ai_alert_counter = 10
    ai_alert_entity = e
  end
   
 end
  
  -- alerted mode
 if ai_soldier_state[e] == "alerted" then
  
    LookAtPlayer(e) 
  
    -- alert taken out
    if g_Entity[e]['plrvisible'] == 1 then
        ai_soldier_state[e] = "combat";
        PlayCombatMusic(8000,500)
        ai_combat_mode[e] = 0
        -- Add this enemy as a point of aggro, alerting anyone near to join the fight
        ai_aggro_entity = e
        ai_aggro_x = g_Entity[e]['x']
        ai_aggro_z = g_Entity[e]['z']
        AISetEntityControl(EntObjNo,AI_MANUAL)
        AIEntityStop(EntObjNo)
        CharacterControlArmed(e)
        SetCharacterToRun(e)
    else   
       if ai_alerted_mode[e] == 0 then   
        tSpeed = math.random(100,130) / 100.0
        ModulateSpeed(e,tSpeed)   
        angle = math.random(360)
        ai_dest_x[e] = g_PlayerPosX + (math.sin(angle) * 150)
        ai_dest_z[e] = g_PlayerPosZ + (math.cos(angle) * 150)     
        AIEntityGoToPosition(EntObjNo,ai_dest_x[e],ai_dest_z[e]) 
        ai_alerted_state_delay[e] = math.random(0,1)
        ai_alerted_old_time[e] = os.clock()
        CharacterControlArmed(e)
        ai_alerted_mode[e] = 1
        if ai_alerted_spoken[e] == 0 then
            PlayCharacterSound(e,"onAlert")
            ai_alerted_spoken[e] = 1
        end
 
        -- Target the player, run in to attack
        elseif ai_alerted_mode[e] == 1 then
        LookAtPlayer(e)     
         if os.clock() - ai_alerted_old_time[e] > ai_alerted_state_delay[e] then
            ai_alerted_state_delay[e] = 2
            ai_alerted_mode[e] = 2  
            AIEntityGoToPosition(EntObjNo,ai_dest_x[e],ai_dest_z[e]) 
         end
          
        elseif ai_alerted_mode[e] == 2 then
             if os.clock() - ai_alerted_old_time[e] > ai_alerted_state_delay[e] then    
                AIEntityStop(EntObjNo)
                ai_alerted_mode[e] = 0
                ai_soldier_state[e] = "patrol";
                ai_soldier_AggroCheck(e)
             end       
        end
         
        if g_Entity[e]['plrvisible'] == 1 then
            ai_soldier_state[e] = "combat";
            PlayCombatMusic(8000,500)
            ai_combat_mode[e] = 0
            -- Add this enemy as a point of aggro, alerting anyone near to join the fight
            ai_aggro_entity = e
            ai_aggro_x = g_Entity[e]['x']
            ai_aggro_z = g_Entity[e]['z']
            AISetEntityControl(EntObjNo,AI_MANUAL)
            AIEntityStop(EntObjNo)
            CharacterControlArmed(e)
            SetCharacterToRun(e)
        end
     end
 end
 
 -- Combat mode
 if ai_soldier_state[e] == "combat" then
 
  -- Look at player
  LookAtPlayer(e)
 
  -- If we are the soldier with aggro then update our position so if we run near to others, we can alert them to the fight
  if ai_aggro_entity ~= null then
        if ai_aggro_entity == e then
            ai_aggro_x = g_Entity[e]['x']
            ai_aggro_z = g_Entity[e]['z']
        end
  end
     
  -- Kick off combat by choosing a destination to head for around the player
  if ai_combat_mode[e] == 0 then
     
    tSpeed = math.random(100,130) / 100.0
    ModulateSpeed(e,tSpeed)
 
    -- instead of a point around player, choose a strafe point between player and enemy 
    --angle = math.random(360)
    --ai_dest_x[e] = g_PlayerPosX + (math.sin(angle) * 200)
    --ai_dest_z[e] = g_PlayerPosZ - (math.cos(angle) * 200)
    dx = g_Entity[e]['x'] - g_PlayerPosX
    dz = g_Entity[e]['z'] - g_PlayerPosZ
    angle = math.random(360)
    ai_dest_x[e] = (g_PlayerPosX + (dx/2)) + (math.sin(angle) * 100)
    ai_dest_z[e] = (g_PlayerPosZ + (dz/2)) - (math.cos(angle) * 100)
     
    -- Check if we can get to the new position without going around something
    if ( AICouldSee ( EntObjNo , ai_dest_x[e] , g_Entity[e]['y'] , ai_dest_z[e] ) == 0 )  then
        ai_dest_x[e] = g_PlayerPosX;
        ai_dest_z[e] = g_PlayerPosZ;
    end
     
    if PlayerDist < AI_CLOSEST_TO_PLAYER then
        ai_dest_x[e] = g_Entity[e]['x']
        ai_dest_z[e] = g_Entity[e]['z']     
    end
     
     
    -- FORCE ENEMY ONTO STOP FOR TEST - STAY PUT!
    --ai_dest_x[e] = g_Entity[e]['x']
    --ai_dest_z[e] = g_Entity[e]['z']       
         
         
    StartTimer(e)
     
    CharacterControlArmed(e)
    ai_combat_mode[e] = 1
     
    ai_cover_on[e] = AIEntityMoveToCover(EntObjNo,g_PlayerPosX,g_PlayerPosZ)
    if ai_cover_on[e] == 0 then
        AIEntityGoToPosition(EntObjNo,ai_dest_x[e],ai_dest_z[e])
        ai_combat_state_delay[e] = math.random(50,100)
    else
        ai_combat_state_delay[e] = math.random(1000,2000)
    end
 
  -- Target the player, wait a short time then run in to attack
  elseif ai_combat_mode[e] == 1 then
   
    if GetTimer(e) > ai_combat_state_delay[e] then
        ai_combat_state_delay[e] = math.random(500,1000)
        StartTimer(e)
        ai_combat_mode[e] = 2
    end
    if g_Entity[e]['plrvisible'] == 1 then
        RotateToPlayer(e)
        FireWeapon(e)   
    end
     
  -- Run to destination for a small amount of time
  elseif ai_combat_mode[e] == 2 then  
   
    if g_Entity[e]['plrvisible'] == 1 then
        FireWeapon(e)
    end
 
    if (GetTimer(e) > ai_combat_state_delay[e]) or PlayerDist <= AI_CLOSEST_TO_PLAYER then
        ai_combat_mode[e] = 3
    end
 
  -- Target the player
  elseif ai_combat_mode[e] == 3 then
   
    CharacterControlArmed(e)
    ai_combat_mode[e] = 4
    if ai_cover_on[e] == 1 then
        ai_combat_state_delay[e] = math.random(500,1500)
    else
        ai_combat_state_delay[e] = math.random(50,100)
    end
    StartTimer(e)
 
  -- Shoot the player if we can, if not head off to find him
  elseif ai_combat_mode[e] == 4 then
     
    if g_Entity[e]['plrvisible'] == 1 then
        FireWeapon(e)
    end
   
    if ai_cover_on[e] == 1 then
        CharacterControlDucked(e)   
    end
                
    -- Once our shooting time has ended, lets go back to mode 0 and start over
    -- If we cannot see the player, wait a short time before hunting him down
    if GetTimer(e) > ai_combat_state_delay[e] then
        CharacterControlStand(e)
        if g_Entity[e]['plrvisible'] == 0 then
            ai_combat_mode[e] = 7
            ai_cover_on[e] = 0
            ai_combat_state_delay[e] = math.random(1000,2000)
            StartTimer(e)
            AIEntityGoToPosition(EntObjNo,g_PlayerPosX,g_PlayerPosZ)
        else       
            ai_combat_mode[e] = 0
        end
    end
     
    ai_old_health[e] = g_Entity[e]['health']                
    
   -- In cover, we wait a while, shoot if we can see the player, before venturing out again
   elseif ai_combat_mode[e] == 5 then
    CharacterControlArmed(e)
     
    if g_Entity[e]['plrvisible'] == 1 then
        FireWeapon(e)   
    end
     
    if GetTimer(e) > ai_combat_old_time[e] then 
        ModulateSpeed(e,1.0)
        --AIEntityStop(EntObjNo)
        ai_combat_mode[e] = 0
    end
       
  -- Out of the range of the player, heading back to start point for a while, once there going back to Patrol mode
  elseif ai_combat_mode[e] == 6 then
    ai_returning_home[e] = 1
    SetCharacterToWalk(e)
    CharacterControlUnarmed(e)  
    AIEntityGoToPosition(EntObjNo,ai_start_x[e],ai_start_z[e])
    ai_soldier_state[e] = "patrol"
    ai_combat_state_delay[e] = 3000
    StartTimer(e)
    tSpeed = math.random(100,130) / 100.0
    ModulateSpeed(e,tSpeed) 
    return
   
  -- Unable to see the player to shoot, so heading after him
  elseif ai_combat_mode[e] == 7 then
   
    if g_Entity[e]['plrvisible'] == 1 then
        FireWeapon(e)   
    end
     
    AIEntityGoToPosition(EntObjNo,g_PlayerPosX,g_PlayerPosZ)
   
    if ( g_Entity[e]['plrvisible'] == 1 or PlayerDist <= AI_CLOSEST_TO_PLAYER ) and GetTimer(e) > ai_combat_state_delay[e] then
        ai_combat_mode[e] = 0
    end
     
  elseif ai_combat_mode[e] == 8 then
 
    ai_combat_mode[e] = 9
    AIEntityStop(EntObjNo)
     
  elseif ai_combat_mode[e] == 9 then
 
    ai_combat_mode[e] = 10
     
    -- Pick left or right strafe
    if ( math.random(0,1) == 0 ) then
        SetCharacterToStrafeLeft(e)
    else
        SetCharacterToStrafeRight(e)
    end    
     
    ai_combat_old_time[e] = os.clock()  
 
  elseif ai_combat_mode[e] == 10 then
 
    -- We can see the player, lets shoot him!
    if g_Entity[e]['plrvisible'] == 1 then
        FireWeapon(e)
    end
 
    if os.clock() - ai_combat_old_time[e] > ai_combat_state_delay[e] then
        ai_combat_state_delay[e] = math.random(1,3)
        ai_combat_mode[e] = 4
        ai_old_health[e] = g_Entity[e]['health']
    end
     
    elseif ai_combat_mode[e] == 11 then
     
    if g_Entity[e]['plrvisible'] == 1 then
        if os.clock() - ai_combat_old_time[e] > ai_combat_state_delay[e] then
            CharacterControlStand(e)
            ai_combat_old_time[e] = os.clock()
            ai_combat_state_delay[e] = 1            
            ai_combat_mode[e] = 12
        end
    end
     
    if ai_combat_mode[e] == 12 then
   
        if g_Entity[e]['plrvisible'] == 1 then
            FireWeapon(e)   
        end
 
        if os.clock() - ai_combat_old_time[e] > ai_combat_state_delay[e] then
            ai_combat_mode[e] = 4
        end
         
     
    end
        
  end  
   
  -- If health is below 30, run and hide, then head to mode 5
  if g_Entity[e]['health'] < 30  and ai_combat_mode[e] ~= 4 and ai_ran_to_cover[e] == 0 then
    ModulateSpeed(e,1.3)
    ai_ran_to_cover[e] = 1
    AISetEntityControl(EntObjNo,AI_MANUAL);
    a=AIEntityMoveToCover(EntObjNo,g_PlayerPosX,g_PlayerPosZ);
    ai_combat_old_time[e] = 3000
    StartTimer(e)
    ai_combat_mode[e] = 5
  end  
   
  -- When player out of range, return to patrol
  if PlayerDist > AIGetEntityViewRange(EntObjNo)*1.5 then
    ai_combat_mode[e] = 6       
  end
 
 end
  
 if string.find(string.lower(g_Entity[e]['limbhit']), "head") ~= nil then
  ai_soldier_state[e] = "deathanim"
  PlayCharacterSound(e,"onDeath")
  StartTimer(e)
  CharacterControlLimbo(e)
   
  --g_KillCount = g_KillCount + 1
  --Prompt(g_KillCount)
   
  BulletRayDX = g_Entity[e]['x'] - g_PlayerPosX;
  BulletRayDY = g_Entity[e]['y'] - g_PlayerPosY;
  BulletRayDZ = g_Entity[e]['z'] - g_PlayerPosZ;
  BulletAngle = (math.atan2(BulletRayDX,BulletRayDZ)/6.28)*360
  BulletAngle = BulletAngle + g_Entity[e]['angley']
  if BulletAngle < 0 then
   BulletAngle = BulletAngle + 360
  end
  if BulletAngle >= 360 then
   BulletAngle = BulletAngle - 360
  end
  if BulletAngle >= 360 then
   BulletAngle = BulletAngle - 360
  end
  --Prompt ( BulletAngle )
  if BulletAngle >= 360-45 or BulletAngle <= 0+45 then
   SetAnimationFrames(5031,5050) 
   SetAnimationFrame(e,5031)
  end
  if BulletAngle >= 180-45 and BulletAngle <= 180+45 then
   SetAnimationFrames(4972,5002) 
   SetAnimationFrame(e,4972)
  end
  if BulletAngle >= 90-45 and BulletAngle <= 90+45 then
   -- side hit animations not aligned for this technique (yet)
   SetAnimationFrames(4972,5002) 
   SetAnimationFrame(e,4972)
  end
  if BulletAngle >= 270-45 and BulletAngle <= 270+45 then
   -- side hit animations not aligned for this technique (yet)
   SetAnimationFrames(4972,5002) 
   SetAnimationFrame(e,4972)
  end
  PlayAnimation(e)
  ModulateSpeed(e,1.0)
  SetAnimationSpeed(e,1.5)
 end
 
 else --DeathAnim Else
 
  -- wait until death anim mostly over, then switch to ragdoll
  if GetTimer(e)>200 then
   SetEntityHealth(e,0)
   BulletRayDX = g_Entity[e]['x'] - g_PlayerPosX;
   BulletRayDY = g_Entity[e]['y'] - g_PlayerPosY;
   BulletRayDZ = g_Entity[e]['z'] - g_PlayerPosZ;
   SetEntityRagdollForce(e,g_Entity[e]['limbhitindex'],BulletRayDX,BulletRayDY,BulletRayDZ,750)
   ResetLimbHit(e)
  end
   
 end --DeathAnim Endif
  
 -- Debug prompt 
 --if ai_soldier_state[e] ~= nil and ai_combat_mode[e] ~= nil and g_Entity[e]['angley'] ~= nil then
 -- Prompt( ai_soldier_state[e] .. " mode=" .. ai_combat_mode[e] .. " angley=" .. g_Entity[e]['angley'] )
 --else
 -- Prompt( "angley=" .. g_Entity[e]['angley'] ) 
 --end
  
end
 
function ai_soldier_AggroCheck(e)
  -- If there player is in range and we can see him, or we have been shot, move into combat mode
  if PlayerDist < AIGetEntityViewRange(EntObjNo) then
    if g_Entity[e]['plrvisible'] == 1 or g_Entity[e]['health'] < ai_starting_heath[e] then
        ai_soldier_state[e] = "combat";
        PlayCombatMusic(8000,500)
        ai_combat_mode[e] = 0
        PlayCharacterSound(e,"onAggro")
        -- Add this enemy as a point of aggro, alerting anyone near to join the fight
        ai_aggro_entity = e
        ai_aggro_x = g_Entity[e]['x']
        ai_aggro_z = g_Entity[e]['z']       
        ai_alert_x = g_Entity[e]['x']
        ai_alert_z = g_Entity[e]['z']
        AISetEntityControl(EntObjNo,AI_MANUAL)
        AIEntityStop(EntObjNo);   
        SetCharacterToRun(e)
    else
        -- We cant see the player, but perhaps we are near someone that can
        if ai_aggro_entity ~= nil then
            tDistX = g_Entity[e]['x'] - ai_aggro_x
            tDistZ = g_Entity[e]['z'] - ai_aggro_z        
            tDist = math.sqrt(math.abs(tDistX*tDistX)+math.abs(tDistZ*tDistZ))             
            if tDist < ai_aggro_range then
               ai_soldier_state[e] = "combat";
               PlayCombatMusic(8000,500)
               ai_combat_mode[e] = 0
               AISetEntityControl(EntObjNo,AI_MANUAL)
               AIEntityStop(EntObjNo);   
               SetCharacterToRun(e)
            end
       end
    end
  end
end
 
function ai_soldier_AlertAggroCheck(e)
    -- If there is an alert close by  
    if e == ai_alert_entity then
        ai_alert_counter = ai_alert_counter - 1
        if ai_alert_counter <= 0 then
            ai_alert_x = -10000
            ai_alert_z = -10000
            ai_alert_entity = 0  
        end
    end
    pDX = g_Entity[e]['x'] - ai_alert_x
    pDZ = g_Entity[e]['z'] - ai_alert_z;
    pDist = math.sqrt(math.abs(pDX*pDX)+math.abs(pDZ*pDZ));
    if pDist < 800 then
        ai_soldier_state[e] = "alerted"
        ai_alerted_mode[e] = 0      
    end 
end
 
function ai_soldier_missiondoor_exit(e)
    g_KillCount = g_KillCount + 1
 if ai_soldier_state[e] ~= "deathanim" then
  PlayCharacterSound(e,"onDeath")
   
 end
end

-- LUA Script - unarmed script for classic characters

-- Classic Legacy Animframes:
--anim0         = 190,209 - spawn in and land
--anim1         = 210,232 - idle
--anim2         = 235,259 - walk
--anim3         = 260,279 - strafe to left
--anim4         = 280,299 - strafe to right
--anim5         = 300,318 - run
--anim6         = 319,355 - throw grenade
--anim11        = 0,19    - fall back on floor
--anim12        = 20,39   - fall back on wall
--anim13        = 493,522 - get up from lying on back
--anim14        = 40,59   - fall forward on floor
--anim15        = 60,79   - fall forward hit wall
--anim16        = 523,552 - get up from lying face down
--anim17        = 120,139 - hit from left
--anim18        = 140,159 - hit from left, slide down wall
--anim20        = 80,99   - hit from right
--anim21        = 100,119 - hit from right, slide down wall
--anim31        = 356,380 - crouch idle
--anim32        = 381,405 - crouch walk
--anim36        = 406,442 - crouch throw grenade
--anim40        = 443,462 - float idle
--anim41        = 463,492 - float move forward
--anim50        = 554,572 - spawn in and land (with pistol)
--anim51        = 573,597 - idle (with pistol)
--anim52        = 598,622 - walk (with pistol)
--anim53        = 623,642 - strafe left (with pistol)
--anim54        = 643,662 - strafe right (with pistol)
--anim55        = 663,681 - run (with pistol)
--anim56        = 682,731 - reload (with pistol)
--anim57        = 160,189 - climb ladder
--anim81        = 732,756 - crouch idle (with pistol)
--anim82        = 757,781 - crouch walk (with pistol)
--anim86        = 782,831 - crouch reload (with pistol)
--anim90        = 832,851 - float idle (with pistol)
--anim91        = 852,881 - float move (with pistol)

viewrange = {}

function ai_classiccharacter_unarmed_init(e)
 ai_soldier_state[e] = "patrol"
 ai_soldier_pathindex[e] = -1
 SetAnimationFrames(211,232) 
 LoopAnimation(e)
 ModulateSpeed(e,1.0)
 SetAnimationSpeed(e,0.7)
 ai_old_health[e] = -1
 SetCharacterSoundSet(e)
end

function ai_classiccharacter_unarmed_main(e)
 PlayerDist = GetPlayerDistance(e)
 EntObjNo = g_Entity[e]['obj']
 if viewrange[e]==nil then
  viewrange[e] = AIGetEntityViewRange(EntObjNo)
 end
 if ai_soldier_state[e] == "patrol" then
  if ai_soldier_pathindex[e] == -1 then
   ai_soldier_pathindex[e] = -2
   CharacterControlUnarmed(e)
   PathIndex = -1
   PathPointIndex = -1
   pClosest = 99999
   for pa = 1, AIGetTotalPaths(), 1 do
    for po = 1 , AIGetPathCountPoints(pa), 1 do
     pDX = g_Entity[e]['x'] - AIPathGetPointX(pa,po)
     pDZ = g_Entity[e]['z'] - AIPathGetPointZ(pa,po)
     pDist = math.sqrt(math.abs(pDX*pDX)+math.abs(pDZ*pDZ))
     if pDist < pClosest and pDist < 200 then
      pClosest = pDist
      PathIndex = pa
	  PathPointIndex = po
     end
    end -- po
   end -- pa
   if PathIndex > -1 then
    ai_soldier_pathindex[e] = PathIndex
	ai_path_point_index[e] = PathPointIndex
	ModulateSpeed(e,1.0)
	SetCharacterToWalk(e)
	ai_path_point_direction[e] = 1
	ai_path_point_max[e] = AIGetPathCountPoints(ai_soldier_pathindex[e])
   end   
  end
  if ai_soldier_pathindex[e] > -1 then 
   ai_patrol_x[e] = AIPathGetPointX(ai_soldier_pathindex[e],ai_path_point_index[e])
   ai_patrol_z[e] = AIPathGetPointZ(ai_soldier_pathindex[e],ai_path_point_index[e])
   AIEntityGoToPosition(EntObjNo,ai_patrol_x[e],ai_patrol_z[e])
   tDistX = g_Entity[e]['x'] - ai_patrol_x[e]
   tDistZ = g_Entity[e]['z'] - ai_patrol_z[e]
   DistFromPath = math.sqrt(math.abs(tDistX*tDistX)+math.abs(tDistZ*tDistZ))	
   if DistFromPath < 50 then
	if ai_path_point_direction[e] == 1 then
	 ai_path_point_index[e] = ai_path_point_index[e] + 1
	 if ( ai_path_point_index[e] > ai_path_point_max[e] ) then
	  ai_path_point_index[e] = ai_path_point_max[e] - 1
	  ai_path_point_direction[e] = 0
	 end
	else
	 ai_path_point_index[e] = ai_path_point_index[e] - 1
	 if ( ai_path_point_index[e] < 1 ) then
	  ai_path_point_index[e] = 2
	  ai_path_point_direction[e] = 1
	 end		
	end
   end
  end
 end
 if PlayerDist < viewrange[e] and g_PlayerHealth > 0 then
  if ai_soldier_state[e] ~= "stare" then
   AIEntityStop(EntObjNo)
   ai_soldier_state[e] = "stare"
   CharacterControlLimbo(e)
   SetAnimationFrames(210,232) 
   LoopAnimation(e)
  else
   RotateToPlayer(e)
  end
 else
  if ai_soldier_state[e] ~= "patrol" then
   ai_soldier_state[e] = "patrol"
   StopAnimation(e)
   CharacterControlUnarmed(e)
   SetCharacterToWalk(e)
   ModulateSpeed(e,1.0)
  end
 end
 if string.find(string.lower(g_Entity[e]['limbhit']), "head") ~= nil then
  SetEntityHealth(e,0) 
  ResetLimbHit(e)
 end
end

function ai_classiccharacter_unarmed_exit(e)
 PlayCharacterSound(e,"onDeath")
 CollisionOff(e)
end

viewrange = {}

function ai_classiccharacter_unarmed_init(e)
 ai_soldier_state[e] = "patrol"
 ai_soldier_pathindex[e] = -1
 SetAnimationFrames(211,232) 
 LoopAnimation(e)
 ModulateSpeed(e,1.0)
 SetAnimationSpeed(e,0.7)
 ai_old_health[e] = -1
 SetCharacterSoundSet(e)
end

function ai_classiccharacter_unarmed_main(e)
 PlayerDist = GetPlayerDistance(e)
 EntObjNo = g_Entity[e]['obj']
 if viewrange[e]==nil then
  viewrange[e] = AIGetEntityViewRange(EntObjNo)
 end
 if ai_soldier_state[e] == "patrol" then
  if ai_soldier_pathindex[e] == -1 then
   ai_soldier_pathindex[e] = -2
   CharacterControlUnarmed(e)
   PathIndex = -1
   PathPointIndex = -1
   pClosest = 99999
   for pa = 1, AIGetTotalPaths(), 1 do
    for po = 1 , AIGetPathCountPoints(pa), 1 do
     pDX = g_Entity[e]['x'] - AIPathGetPointX(pa,po)
     pDZ = g_Entity[e]['z'] - AIPathGetPointZ(pa,po)
     pDist = math.sqrt(math.abs(pDX*pDX)+math.abs(pDZ*pDZ))
     if pDist < pClosest and pDist < 200 then
      pClosest = pDist
      PathIndex = pa
	  PathPointIndex = po
     end
    end -- po
   end -- pa
   if PathIndex > -1 then
    ai_soldier_pathindex[e] = PathIndex
	ai_path_point_index[e] = PathPointIndex
	ModulateSpeed(e,1.0)
	SetCharacterToWalk(e)
	ai_path_point_direction[e] = 1
	ai_path_point_max[e] = AIGetPathCountPoints(ai_soldier_pathindex[e])
   end   
  end
  if ai_soldier_pathindex[e] > -1 then 
   ai_patrol_x[e] = AIPathGetPointX(ai_soldier_pathindex[e],ai_path_point_index[e])
   ai_patrol_z[e] = AIPathGetPointZ(ai_soldier_pathindex[e],ai_path_point_index[e])
   AIEntityGoToPosition(EntObjNo,ai_patrol_x[e],ai_patrol_z[e])
   tDistX = g_Entity[e]['x'] - ai_patrol_x[e]
   tDistZ = g_Entity[e]['z'] - ai_patrol_z[e]
   DistFromPath = math.sqrt(math.abs(tDistX*tDistX)+math.abs(tDistZ*tDistZ))	
   if DistFromPath < 50 then
	if ai_path_point_direction[e] == 1 then
	 ai_path_point_index[e] = ai_path_point_index[e] + 1
	 if ( ai_path_point_index[e] > ai_path_point_max[e] ) then
	  ai_path_point_index[e] = ai_path_point_max[e] - 1
	  ai_path_point_direction[e] = 0
	 end
	else
	 ai_path_point_index[e] = ai_path_point_index[e] - 1
	 if ( ai_path_point_index[e] < 1 ) then
	  ai_path_point_index[e] = 2
	  ai_path_point_direction[e] = 1
	 end		
	end
   end
  end
 end
 if PlayerDist < viewrange[e] and g_PlayerHealth > 0 then
  if ai_soldier_state[e] ~= "stare" then
   AIEntityStop(EntObjNo)
   ai_soldier_state[e] = "stare"
   CharacterControlLimbo(e)
   SetAnimationFrames(210,232) 
   LoopAnimation(e)
  else
   RotateToPlayer(e)
  end
 else
  if ai_soldier_state[e] ~= "patrol" then
   ai_soldier_state[e] = "patrol"
   StopAnimation(e)
   CharacterControlUnarmed(e)
   SetCharacterToWalk(e)
   ModulateSpeed(e,1.0)
  end
 end
 if string.find(string.lower(g_Entity[e]['limbhit']), "head") ~= nil then
  SetEntityHealth(e,0) 
  ResetLimbHit(e)
 end
end
g_KillCount = g_KillCount + 1 
function ai_classiccharacter_unarmed_exit(e)
 PlayCharacterSound(e,"onDeath")
 CollisionOff(e)
end

--winzone check killed

g_KillCount = 0
function winzone_no_weapons_init(e)
end
 
function winzone_no_weapons__main(e)
 if g_Entity[e]['plrinzone']==1 then
  if g_PlayerPosY - 65 <= g_Entity[e]['y'] and g_PlayerPosY >= g_Entity[e]['y'] + 25 then
        if g_KillCount == 1 then      
        g_KillCount = 0
                RemovePlayerWeapons(e)
                JumpToLevelIfUsed(e)
    end   
    end
 end
end

local loot_fade_time = 15500 --time until loot will disappear if not picked up (set to 0 for it to stay always)
rerolls = 1 --if a loot doesnt drop then it will try again (higher number = more tries)
loot = {}
itemis = {}
drop_chance = {}
loot_type = {}
pressed = 0
loot_entity_number = {}
max_loot_items = 0
local count = 0
 
function loot_for_enemies_init_name(e,name)
itemis[e] = tostring(name)
loot[e] = 1 
Hide(e)
CollisionOff(e)
count = count + 1
max_loot_items = count
loot_entity_number[count] = e
 
--set chance to drop here (% based)
--lower number = less chance
--if all chances are low then there is a high chance of no item dropping at all
--if you don't set a drop chance for an item it will assume 100% (but it still might not drop if another item drops instead)
--& set the loot type here so script knows what action to take later
if itemis[e] == "QuasarGun (ammo)" then
drop_chance[e] = 40
loot_type[e] = "ammo"
elseif itemis[e] == "Typhoon (ammo)" then
drop_chance[e] = 70
loot_type[e] = "ammo"
elseif itemis[e] == "QuasarGun" then
drop_chance[e] = 15
loot_type[e] = "weapon"
elseif itemis[e] == "Medbox" then
drop_chance[e] = 30
loot_type[e] = "health"
elseif itemis[e] == "Key" then
drop_chance[e] = 1
loot_type[e] = "collect"
end
 
end
 
 
function loot_for_enemies_main(e)
if control_loaded == nil then 
  return
  control_loaded = 1 
end  
CollisionOff(e)
if loot[e] == 1 then
Hide(e)
StartTimer(e)
timer[e] = GetTimer(e) + loot_fade_time
else
Show(e)
--adjusts when prompt will appear on screen
if PlayerLooking(e,110,20) == 1 then
Prompt("Collect the "..itemis[e].."?")
if g_KeyPressE == 1 and pressed == 0 then
PromptDuration("Collected "..itemis[e],3000)
loot[e] = 1
PlaySoundIfSilent(e,0)
PlaySoundIfSilent(e,1)
pressed = 1
--what happens when player picks up the item (based on it's "type" defined earlier)
if loot_type[e] == "ammo" then
AddPlayerAmmo(e)
elseif loot_type[e] == "weapon" then
AddPlayerWeapon(e)
elseif loot_type[e] == "health" then
AddPlayerHealth(e)
elseif loot_type[e] == "collect" then
Collected(e)
end
end
end
--resets the loot so it can be dropped again later
if loot_fade_time > 0 and GetTimer(e) > timer[e] then
Hide(e)
loot[e] = 1 
end
end
 
if g_KeyPressE == 0 then
pressed = 0
end
 
end
 
 
 
function PlayerLooking(e,dis,v)
if g_Entity[e] ~= nil then
if dis == nil then
dis = 3000
end
if v == nil then
v = 0.5
end
if GetPlayerDistance(e) <= dis then
local destx = g_Entity[e]['x'] - g_PlayerPosX
local destz = g_Entity[e]['z'] - g_PlayerPosZ
local angle = math.atan2(destx,destz)
angle = angle * (180.0 / math.pi)
 
if angle <= 0 then
angle = 360 + angle
elseif angle > 360 then
angle = angle - 360
end
while g_PlayerAngY < 0 or g_PlayerAngY > 360 do
if g_PlayerAngY <= 0 then
g_PlayerAngY = 360 + g_PlayerAngY
elseif g_PlayerAngY > 360 then
g_PlayerAngY = g_PlayerAngY - 360
end
end
local L = angle - v
local R = angle + v
if L <= 0 then
L = 360 + L 
elseif L > 360 then
L = L - 360
end
if R <= 0 then
R = 360 + R
elseif R > 360 then
R = R - 360
end
 
if (L < R and math.abs(g_PlayerAngY) > L and math.abs(g_PlayerAngY) < R) then
return 1
elseif (L > R and (math.abs(g_PlayerAngY) > L or math.abs(g_PlayerAngY) < R)) then
return 1
else
return 0
end
else
return 0
end
end
end

if do_poison ~= nil then 
		if old_health[e] == nil or poison_ticks[e] == nil or poison_timer[e] == nil then 
			old_health[e] = g_Entity[e]['health']
			poison_ticks[e] = 0
			poison_timer[e] = os.time()
			return
		else 
			if g_Entity[e]['health'] < old_health[e] then 
				old_health[e] = g_Entity[e]['health']
				if do_poison == 1 then 
					poison_timer[e] = os.time()
					poison_ticks[e] = max_poison_ticks 
				end 
			end 
			if poison_ticks[e] > 0 then 
				if os.time() > poison_timer[e] + poison_interval then 
					SetEntityHealth(e,g_Entity[e]['health']-poison_damage)
					poison_timer[e] = os.time()
					poison_ticks[e] = poison_ticks[e] - 1 
				end 
			end 
		end 
		--PromptLocal(e,g_Entity[e]['health'])
	end 

-- LUA Script - precede every function and global member with lowercase name of script

-- globals for AI enemies
ai_newdest_time = {}
ai_cover_on = {}

-- init when level first runs
function ai_soldier_init(e)
 ai_soldier_state[e] = "patrol";
 ai_soldier_pathindex[e] = -1;
 ai_start_x[e] = nil
 ai_starting_heath[e] = nil
 ai_ran_to_cover[e] = 0
 ModulateSpeed(e,1.0)
 ai_old_health[e] = 0
 CharacterControlStand(e)
 ai_returning_home[e] = 0
 ai_newdest_time[e] = -1
 ai_cover_on[e] = 0
 ai_alerted_spoken[e] = 0
 SetCharacterSoundSet(e)
end

-- logic will patrol closest waypoint path, then shoot at player if they
-- get too close, and will run away for cover if their health is low
function ai_soldier_main(e)
	if do_poison ~= nil then 
		if old_health[e] == nil or poison_ticks[e] == nil or poison_timer[e] == nil then 
			old_health[e] = g_Entity[e]['health']
			poison_ticks[e] = 0
			poison_timer[e] = os.time()
			return
		else 
			if g_Entity[e]['health'] < old_health[e] then 
				old_health[e] = g_Entity[e]['health']
				if do_poison == 1 then 
					poison_timer[e] = os.time()
					poison_ticks[e] = max_poison_ticks 
				end 
			end 
			if poison_ticks[e] > 0 then 
				if os.time() > poison_timer[e] + poison_interval then 
					SetEntityHealth(e,g_Entity[e]['health']-poison_damage)
					poison_timer[e] = os.time()
					poison_ticks[e] = poison_ticks[e] - 1 
				end 
			end 
		end 
		--PromptLocal(e,g_Entity[e]['health'])
	end 
 -- Death Animation
 if ai_soldier_state[e] ~= "deathanim" then
 
 -- Detect player distance (note: possible optimization here)
 PlayerDX = g_Entity[e]['x'] - g_PlayerPosX;
 PlayerDY = g_Entity[e]['y'] - g_PlayerPosY;
 PlayerDZ = g_Entity[e]['z'] - g_PlayerPosZ;
 PlayerDist = math.sqrt(math.abs(PlayerDX*PlayerDX)+math.abs(PlayerDY*PlayerDY)+math.abs(PlayerDZ*PlayerDZ));
 
 -- Entity Object Number
 EntObjNo = g_Entity[e]['obj'];

 -- Handle health
 if ai_starting_heath[e] == nil then
	ai_starting_heath[e] = g_Entity[e]['health']
 end
  
 -- Store starting point so we can return there if player moves far away
 if ai_start_x[e] == nil then
	ai_start_x[e] = g_Entity[e]['x']
	ai_start_z[e] = g_Entity[e]['z']
	AISetEntityControl(EntObjNo,AI_MANUAL);
 end
 
 -- Patrol Mode
 if ai_soldier_state[e] == "patrol" then
 
  -- Try and find a close path to patrol, just check once for it
  if ai_soldier_pathindex[e] == -1 then
   ai_soldier_pathindex[e] = -2
   CharacterControlArmed(e)
   -- find initial waypoint path to follow
   PathIndex = -1;
   pClosest = 99999;
   for pa = 1, AIGetTotalPaths(), 1 do
    for po = 1 , AIGetPathCountPoints(pa), 1 do
     pDX = g_Entity[e]['x'] - AIPathGetPointX(pa,po);
     pDZ = g_Entity[e]['z'] - AIPathGetPointZ(pa,po);
     pDist = math.sqrt(math.abs(pDX*pDX)+math.abs(pDZ*pDZ));
     if pDist < pClosest and pDist < 200 then
      pClosest = pDist;
      PathIndex = pa;
     end
    end -- po
   end -- pa
   -- follow found path
   if PathIndex > -1 then
    ai_soldier_pathindex[e] = PathIndex;
	ai_path_point_index[e] = 2
	ModulateSpeed(e,1.0)
	SetCharacterToWalk(e)
	ai_path_point_direction[e] = 1
	ai_path_point_max[e] = AIGetPathCountPoints(ai_soldier_pathindex[e])
   end   
  end
  
  -- Force character as unarmed
  CharacterControlUnarmed(e)
  
  -- If set to head home, lets go there
  if ai_returning_home[e] == 1 then
    tDistX = g_Entity[e]['x'] - ai_start_x[e];
    tDistZ = g_Entity[e]['z'] - ai_start_z[e];
	DistToStart = math.sqrt(math.abs(tDistX*tDistX)+math.abs(tDistZ*tDistZ))
	if DistToStart < 200 or GetTimer(e) > ai_combat_state_delay[e] then
		ai_soldier_pathindex[e] = -1
		SetCharacterToWalk(e)
		CharacterControlUnarmed(e)
		AIEntityStop(EntObjNo);
		ModulateSpeed(e,1.0)
		ai_returning_home[e] = 0
		ai_soldier_state[e] = "alerted"
		ai_alerted_mode[e] = 0
	else
		AIEntityGoToPosition(EntObjNo,ai_start_x[e],ai_start_z[e])
	end
	
  -- If we have a path then lets patrol it
  elseif ai_soldier_pathindex[e] > -1 then 

	ai_patrol_x[e] = AIPathGetPointX(ai_soldier_pathindex[e],ai_path_point_index[e])
	ai_patrol_z[e] = AIPathGetPointZ(ai_soldier_pathindex[e],ai_path_point_index[e])
	AIEntityGoToPosition(EntObjNo,ai_patrol_x[e],ai_patrol_z[e])
    tDistX = g_Entity[e]['x'] - ai_patrol_x[e]
    tDistZ = g_Entity[e]['z'] - ai_patrol_z[e]
	DistFromPath = math.sqrt(math.abs(tDistX*tDistX)+math.abs(tDistZ*tDistZ))	
	
	if DistFromPath < 50 then
		if ai_path_point_direction[e] == 1 then
			ai_path_point_index[e] = ai_path_point_index[e] + 1
			if ( ai_path_point_index[e] > ai_path_point_max[e] ) then
				ai_path_point_index[e] = ai_path_point_max[e] -1
				ai_path_point_direction[e] = 0
			end
		else
			ai_path_point_index[e] = ai_path_point_index[e] - 1
			if ( ai_path_point_index[e] < 1 ) then
				ai_path_point_index[e] = 2
				ai_path_point_direction[e] = 1
			end		
		end
	end
  else
	CharacterControlFidget(e)
  end
  
  ai_soldier_AggroCheck(e)
  ai_soldier_AlertAggroCheck(e)
  
  -- Alerted, perhaps player is near or gunshots can be heard?
  if PlayerDist < AIGetEntityViewRange(EntObjNo) / 3 or AIGetEntityHeardSound(EntObjNo) == 1 then
	ai_soldier_state[e] = "alerted"
	ai_alerted_mode[e] = 0
	ai_alert_x = g_Entity[e]['x']
	ai_alert_z = g_Entity[e]['z']
	ai_alert_counter = 10
	ai_alert_entity = e
  end
  
 end
 
  -- alerted mode
 if ai_soldier_state[e] == "alerted" then
 
 	LookAtPlayer(e) 
 
	-- alert taken out
	if g_Entity[e]['plrvisible'] == 1 then 
		ai_soldier_state[e] = "combat";
		PlayCombatMusic(8000,500)
		ai_combat_mode[e] = 0
		-- Add this enemy as a point of aggro, alerting anyone near to join the fight
		ai_aggro_entity = e
		ai_aggro_x = g_Entity[e]['x']
		ai_aggro_z = g_Entity[e]['z']
		AISetEntityControl(EntObjNo,AI_MANUAL)
		AIEntityStop(EntObjNo)
		CharacterControlArmed(e)
		SetCharacterToRun(e)
	else	
	   if ai_alerted_mode[e] == 0 then	  
		tSpeed = math.random(100,130) / 100.0
		ModulateSpeed(e,tSpeed)   
		angle = math.random(360)
		ai_dest_x[e] = g_PlayerPosX + (math.sin(angle) * 150)
		ai_dest_z[e] = g_PlayerPosZ + (math.cos(angle) * 150)	  
		AIEntityGoToPosition(EntObjNo,ai_dest_x[e],ai_dest_z[e]) 
		ai_alerted_state_delay[e] = math.random(0,1)
		ai_alerted_old_time[e] = os.clock()
		CharacterControlArmed(e)
		ai_alerted_mode[e] = 1
		if ai_alerted_spoken[e] == 0 then
			PlayCharacterSound(e,"onAlert")
			ai_alerted_spoken[e] = 1
		end

		-- Target the player, run in to attack
		elseif ai_alerted_mode[e] == 1 then 
		LookAtPlayer(e) 	
		 if os.clock() - ai_alerted_old_time[e] > ai_alerted_state_delay[e] then
			ai_alerted_state_delay[e] = 2
			ai_alerted_mode[e] = 2	
			AIEntityGoToPosition(EntObjNo,ai_dest_x[e],ai_dest_z[e]) 
		 end
		 
		elseif ai_alerted_mode[e] == 2 then
			 if os.clock() - ai_alerted_old_time[e] > ai_alerted_state_delay[e] then		
				AIEntityStop(EntObjNo)
				ai_alerted_mode[e] = 0
				ai_soldier_state[e] = "patrol";
				ai_soldier_AggroCheck(e)
			 end		
		end
		
		if g_Entity[e]['plrvisible'] == 1 then
			ai_soldier_state[e] = "combat";
			PlayCombatMusic(8000,500)
			ai_combat_mode[e] = 0
			-- Add this enemy as a point of aggro, alerting anyone near to join the fight
			ai_aggro_entity = e
			ai_aggro_x = g_Entity[e]['x']
			ai_aggro_z = g_Entity[e]['z']
			AISetEntityControl(EntObjNo,AI_MANUAL)
			AIEntityStop(EntObjNo)
			CharacterControlArmed(e)
			SetCharacterToRun(e)
		end	
	 end
 end

 -- Combat mode
 if ai_soldier_state[e] == "combat" then

  -- Look at player
  LookAtPlayer(e)

  -- If we are the soldier with aggro then update our position so if we run near to others, we can alert them to the fight
  if ai_aggro_entity ~= null then
		if ai_aggro_entity == e then
			ai_aggro_x = g_Entity[e]['x']
			ai_aggro_z = g_Entity[e]['z']
		end
  end
	
  -- Kick off combat by choosing a destination to head for around the player
  if ai_combat_mode[e] == 0 then
    
	tSpeed = math.random(100,130) / 100.0
	ModulateSpeed(e,tSpeed)

    -- instead of a point around player, choose a strafe point between player and enemy	
	--angle = math.random(360)
	--ai_dest_x[e] = g_PlayerPosX + (math.sin(angle) * 200)
	--ai_dest_z[e] = g_PlayerPosZ - (math.cos(angle) * 200)
	dx = g_Entity[e]['x'] - g_PlayerPosX
	dz = g_Entity[e]['z'] - g_PlayerPosZ
	angle = math.random(360)
	ai_dest_x[e] = (g_PlayerPosX + (dx/2)) + (math.sin(angle) * 100)
	ai_dest_z[e] = (g_PlayerPosZ + (dz/2)) - (math.cos(angle) * 100)
	
	-- Check if we can get to the new position without going around something
	if ( AICouldSee ( EntObjNo , ai_dest_x[e] , g_Entity[e]['y'] , ai_dest_z[e] ) == 0 )  then
		ai_dest_x[e] = g_PlayerPosX;
		ai_dest_z[e] = g_PlayerPosZ;
	end
	
	if PlayerDist < AI_CLOSEST_TO_PLAYER then
		ai_dest_x[e] = g_Entity[e]['x']
		ai_dest_z[e] = g_Entity[e]['z']		
	end
	
	
	-- FORCE ENEMY ONTO STOP FOR TEST - STAY PUT!
	--ai_dest_x[e] = g_Entity[e]['x']
	--ai_dest_z[e] = g_Entity[e]['z']		
		
		
	StartTimer(e)
	
	CharacterControlArmed(e)
	ai_combat_mode[e] = 1
	
	ai_cover_on[e] = AIEntityMoveToCover(EntObjNo,g_PlayerPosX,g_PlayerPosZ)
	if ai_cover_on[e] == 0 then 
		AIEntityGoToPosition(EntObjNo,ai_dest_x[e],ai_dest_z[e])
		ai_combat_state_delay[e] = math.random(50,100)
	else
		ai_combat_state_delay[e] = math.random(1000,2000)
	end

  -- Target the player, wait a short time then run in to attack
  elseif ai_combat_mode[e] == 1 then 
  
	if GetTimer(e) > ai_combat_state_delay[e] then
		ai_combat_state_delay[e] = math.random(500,1000)
		StartTimer(e)
		ai_combat_mode[e] = 2
	end
	if g_Entity[e]['plrvisible'] == 1 then
		RotateToPlayer(e)
		FireWeapon(e)	
	end
	
  -- Run to destination for a small amount of time
  elseif ai_combat_mode[e] == 2 then   
  
	if g_Entity[e]['plrvisible'] == 1 then
		FireWeapon(e)
	end

	if (GetTimer(e) > ai_combat_state_delay[e]) or PlayerDist <= AI_CLOSEST_TO_PLAYER then
		ai_combat_mode[e] = 3
	end	

  -- Target the player
  elseif ai_combat_mode[e] == 3 then
  
	CharacterControlArmed(e)
	ai_combat_mode[e] = 4
	if ai_cover_on[e] == 1 then
		ai_combat_state_delay[e] = math.random(500,1500)
	else
		ai_combat_state_delay[e] = math.random(50,100)
	end
	StartTimer(e)

  -- Shoot the player if we can, if not head off to find him
  elseif ai_combat_mode[e] == 4 then
  	
	if g_Entity[e]['plrvisible'] == 1 then
		FireWeapon(e)
	end
  
	if ai_cover_on[e] == 1 then
		CharacterControlDucked(e)	
	end
			   
	-- Once our shooting time has ended, lets go back to mode 0 and start over
	-- If we cannot see the player, wait a short time before hunting him down
	if GetTimer(e) > ai_combat_state_delay[e] then
		CharacterControlStand(e)
		if g_Entity[e]['plrvisible'] == 0 then
			ai_combat_mode[e] = 7
			ai_cover_on[e] = 0
			ai_combat_state_delay[e] = math.random(1000,2000)
			StartTimer(e)
			AIEntityGoToPosition(EntObjNo,g_PlayerPosX,g_PlayerPosZ)
		else 		
			ai_combat_mode[e] = 0
		end
	end 
	
	ai_old_health[e] = g_Entity[e]['health']				
   
   -- In cover, we wait a while, shoot if we can see the player, before venturing out again
   elseif ai_combat_mode[e] == 5 then
	CharacterControlArmed(e)
	
	if g_Entity[e]['plrvisible'] == 1 then
		FireWeapon(e)	
	end
    
	if GetTimer(e) > ai_combat_old_time[e] then	
		ModulateSpeed(e,1.0)
		--AIEntityStop(EntObjNo)
		ai_combat_mode[e] = 0
	end
	  
  -- Out of the range of the player, heading back to start point for a while, once there going back to Patrol mode
  elseif ai_combat_mode[e] == 6 then
	ai_returning_home[e] = 1
	SetCharacterToWalk(e)
	CharacterControlUnarmed(e)	
	AIEntityGoToPosition(EntObjNo,ai_start_x[e],ai_start_z[e])
	ai_soldier_state[e] = "patrol"
	ai_combat_state_delay[e] = 3000
	StartTimer(e)
	tSpeed = math.random(100,130) / 100.0
	ModulateSpeed(e,tSpeed)	
	return
  
  -- Unable to see the player to shoot, so heading after him
  elseif ai_combat_mode[e] == 7 then
  
  	if g_Entity[e]['plrvisible'] == 1 then
		FireWeapon(e)	
	end	
	
	AIEntityGoToPosition(EntObjNo,g_PlayerPosX,g_PlayerPosZ)
  
	if ( g_Entity[e]['plrvisible'] == 1 or PlayerDist <= AI_CLOSEST_TO_PLAYER ) and GetTimer(e) > ai_combat_state_delay[e] then
		ai_combat_mode[e] = 0
	end
	
  elseif ai_combat_mode[e] == 8 then

	ai_combat_mode[e] = 9
	AIEntityStop(EntObjNo)
	
  elseif ai_combat_mode[e] == 9 then

	ai_combat_mode[e] = 10
  	
	-- Pick left or right strafe
	if ( math.random(0,1) == 0 ) then
		SetCharacterToStrafeLeft(e)
	else
		SetCharacterToStrafeRight(e)
	end		
	
	ai_combat_old_time[e] = os.clock()	

  elseif ai_combat_mode[e] == 10 then

	-- We can see the player, lets shoot him!
	if g_Entity[e]['plrvisible'] == 1 then
		FireWeapon(e)
	end

	if os.clock() - ai_combat_old_time[e] > ai_combat_state_delay[e] then
		ai_combat_state_delay[e] = math.random(1,3)
		ai_combat_mode[e] = 4
		ai_old_health[e] = g_Entity[e]['health']
	end
	
	elseif ai_combat_mode[e] == 11 then
	
	if g_Entity[e]['plrvisible'] == 1 then
		if os.clock() - ai_combat_old_time[e] > ai_combat_state_delay[e] then
			CharacterControlStand(e)
			ai_combat_old_time[e] = os.clock()
			ai_combat_state_delay[e] = 1			
			ai_combat_mode[e] = 12
		end
	end	
	
	if ai_combat_mode[e] == 12 then
  
		if g_Entity[e]['plrvisible'] == 1 then
			FireWeapon(e)	
		end

		if os.clock() - ai_combat_old_time[e] > ai_combat_state_delay[e] then
			ai_combat_mode[e] = 4
		end
       	
	
	end
       
  end   
  
  -- If health is below 30, run and hide, then head to mode 5
  if g_Entity[e]['health'] < 30  and ai_combat_mode[e] ~= 4 and ai_ran_to_cover[e] == 0 then
	ModulateSpeed(e,1.3)
	ai_ran_to_cover[e] = 1
	AISetEntityControl(EntObjNo,AI_MANUAL);
	a=AIEntityMoveToCover(EntObjNo,g_PlayerPosX,g_PlayerPosZ);
	ai_combat_old_time[e] = 3000
	StartTimer(e)
	ai_combat_mode[e] = 5
  end   
  
  -- When player out of range, return to patrol
  if PlayerDist > AIGetEntityViewRange(EntObjNo)*1.5 then
	ai_combat_mode[e] = 6		
  end

 end
 
 if string.find(string.lower(g_Entity[e]['limbhit']), "head") ~= nil then
  ai_soldier_state[e] = "deathanim"
  PlayCharacterSound(e,"onDeath")
  StartTimer(e)
  CharacterControlLimbo(e)
  BulletRayDX = g_Entity[e]['x'] - g_PlayerPosX;
  BulletRayDY = g_Entity[e]['y'] - g_PlayerPosY;
  BulletRayDZ = g_Entity[e]['z'] - g_PlayerPosZ;
  BulletAngle = (math.atan2(BulletRayDX,BulletRayDZ)/6.28)*360
  BulletAngle = BulletAngle + g_Entity[e]['angley']
  if BulletAngle < 0 then
   BulletAngle = BulletAngle + 360
  end
  if BulletAngle >= 360 then
   BulletAngle = BulletAngle - 360
  end
  if BulletAngle >= 360 then
   BulletAngle = BulletAngle - 360
  end
  --Prompt ( BulletAngle )
  if BulletAngle >= 360-45 or BulletAngle <= 0+45 then
   SetAnimationFrames(5031,5050) 
   SetAnimationFrame(e,5031)
  end
  if BulletAngle >= 180-45 and BulletAngle <= 180+45 then
   SetAnimationFrames(4972,5002) 
   SetAnimationFrame(e,4972)
  end
  if BulletAngle >= 90-45 and BulletAngle <= 90+45 then
   -- side hit animations not aligned for this technique (yet)
   SetAnimationFrames(4972,5002) 
   SetAnimationFrame(e,4972)
  end
  if BulletAngle >= 270-45 and BulletAngle <= 270+45 then
   -- side hit animations not aligned for this technique (yet)
   SetAnimationFrames(4972,5002) 
   SetAnimationFrame(e,4972)
  end
  PlayAnimation(e)
  ModulateSpeed(e,1.0)
  SetAnimationSpeed(e,1.5)
 end

 else --DeathAnim Else

  -- wait until death anim mostly over, then switch to ragdoll
  if GetTimer(e)>200 then
   SetEntityHealth(e,0)
   BulletRayDX = g_Entity[e]['x'] - g_PlayerPosX;
   BulletRayDY = g_Entity[e]['y'] - g_PlayerPosY;
   BulletRayDZ = g_Entity[e]['z'] - g_PlayerPosZ;
   SetEntityRagdollForce(e,g_Entity[e]['limbhitindex'],BulletRayDX,BulletRayDY,BulletRayDZ,750)
   ResetLimbHit(e)
  end
  
 end --DeathAnim Endif
 
 -- Debug prompt 
 --if ai_soldier_state[e] ~= nil and ai_combat_mode[e] ~= nil and g_Entity[e]['angley'] ~= nil then
 -- Prompt( ai_soldier_state[e] .. " mode=" .. ai_combat_mode[e] .. " angley=" .. g_Entity[e]['angley'] )
 --else
 -- Prompt( "angley=" .. g_Entity[e]['angley'] ) 
 --end
 
end

function ai_soldier_AggroCheck(e)
  -- If there player is in range and we can see him, or we have been shot, move into combat mode
  if PlayerDist < AIGetEntityViewRange(EntObjNo) then 
	if g_Entity[e]['plrvisible'] == 1 or g_Entity[e]['health'] < ai_starting_heath[e] then
		ai_soldier_state[e] = "combat";
		PlayCombatMusic(8000,500)
		ai_combat_mode[e] = 0
		PlayCharacterSound(e,"onAggro")
		-- Add this enemy as a point of aggro, alerting anyone near to join the fight
		ai_aggro_entity = e
		ai_aggro_x = g_Entity[e]['x']
		ai_aggro_z = g_Entity[e]['z']		
		ai_alert_x = g_Entity[e]['x']
		ai_alert_z = g_Entity[e]['z']
		AISetEntityControl(EntObjNo,AI_MANUAL)
		AIEntityStop(EntObjNo);   
		SetCharacterToRun(e)
	else
		-- We cant see the player, but perhaps we are near someone that can
		if ai_aggro_entity ~= nil then
			tDistX = g_Entity[e]['x'] - ai_aggro_x
			tDistZ = g_Entity[e]['z'] - ai_aggro_z		  
			tDist = math.sqrt(math.abs(tDistX*tDistX)+math.abs(tDistZ*tDistZ))			   
			if tDist < ai_aggro_range then
			   ai_soldier_state[e] = "combat";
			   PlayCombatMusic(8000,500)
			   ai_combat_mode[e] = 0
			   AISetEntityControl(EntObjNo,AI_MANUAL)
			   AIEntityStop(EntObjNo);   
			   SetCharacterToRun(e)
			end	
	   end
	end
  end
end

function ai_soldier_AlertAggroCheck(e)
	-- If there is an alert close by  
	if e == ai_alert_entity then
		ai_alert_counter = ai_alert_counter - 1
		if ai_alert_counter <= 0 then
			ai_alert_x = -10000
			ai_alert_z = -10000
			ai_alert_entity = 0  
		end
	end	
	pDX = g_Entity[e]['x'] - ai_alert_x
	pDZ = g_Entity[e]['z'] - ai_alert_z;
	pDist = math.sqrt(math.abs(pDX*pDX)+math.abs(pDZ*pDZ));
	if pDist < 800 then
		ai_soldier_state[e] = "alerted"
		ai_alerted_mode[e] = 0		
	end  
end

function ai_soldier_exit(e)
 if ai_soldier_state[e] ~= "deathanim" then
  PlayCharacterSound(e,"onDeath")
 end
end

--return_all_e_numbers_of_the_entities.lua

--here we go, a prompt script that will return all (e) numbers of the entities (upto 1999) 
----when the player is within 100 range of it
----just apply it to any entity (just 1, it will still give you the (e) for that object too) 
----and then walk around your map to find the numbers

--	
function prompte_main(e)
for a = 1, 1999 do
if g_Entity[a] ~= nil then
 PlayerDX = g_Entity[a]['x'] - g_PlayerPosX;  PlayerDY = g_Entity[a]['y'] - g_PlayerPosY; PlayerDZ = g_Entity[a]['z'] - g_PlayerPosZ;
 PlayerDist = math.sqrt(math.abs(PlayerDX*PlayerDX)+math.abs(PlayerDY*PlayerDY)+math.abs(PlayerDZ*PlayerDZ));
 if PlayerDist < 100 then
  Prompt("a")
--    Prompt(a)
 end
end
end
end

--prompte.lua

--here we go, a prompt script that will return all (e) numbers of the entities (upto 1999) 
----when the player is within 100 range of it
----just apply it to any entity (just 1, it will still give you the (e) for that object too) 
----and then walk around your map to find the numbers

--	
function prompte_main(e)
for a = 1, 1999 do
if g_Entity[a] ~= nil then
 PlayerDX = g_Entity[a]['x'] - g_PlayerPosX;  PlayerDY = g_Entity[a]['y'] - g_PlayerPosY; PlayerDZ = g_Entity[a]['z'] - g_PlayerPosZ;
 PlayerDist = math.sqrt(math.abs(PlayerDX*PlayerDX)+math.abs(PlayerDY*PlayerDY)+math.abs(PlayerDZ*PlayerDZ));
 if PlayerDist < 100 then
 Prompt(a)
 end
end
end
end

Prompt("Friendly Fire!")
		Destroy(e)