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

-- init when level first runs
function ai_passivewalk_init(e)
    CharacterControlUnarmed(e)
    ai_soldier_state[e] = "patrol"
    ai_soldier_pathindex[e] = -1
    LoopAnimation(e)
    ModulateSpeed(e,1.0)
    SetAnimationSpeed(e,1.0)
    SetCharacterSoundSet(e)
end

function ai_passivewalk_main(e)
    PlayerDist = GetPlayerDistance(e)

    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
                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
            if ai_soldier_pathindex[e] == -1 then
                ai_soldier_pathindex[e] = 0
            end
        end
    end
    if PlayerDist < 200 then
        LookAtPlayer(e)
    end 
end

function waypoints_main(e)

 EntObjNo = g_Entity[e]['obj']

 if ai_soldier_state[e] == "patrol" then
  if ai_soldier_pathindex[e] == -1 then
   ai_soldier_pathindex[e] = -2
   CharacterControlArmed(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)
	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

end