added code for scouting, but commented out due to computer ai doing thing automatically

control.lua

@@ -30,7 +30,7 @@ function onInit()
     pendingChunks = global.pendingChunks
     natives = global.natives
     natives.squads = {}
-    natives.bases = {}
+    natives.scouts = {}
     
     -- game.map_settings.enemy_expansion.enabled = false
     
@@ -83,6 +83,7 @@ function onTick(event)
         
         unitGroupUtils.regroupSquads(natives)
         
+        -- ai.scouting(regionMap, surface, natives)
         ai.squadAttackPlayer(regionMap, surface, natives, game.players)
         
         if (mapRoutine ~= nil) and (coroutine.status(mapRoutine) ~= "dead") then
@@ -99,17 +100,24 @@ end
 
 function onDeath(event)
     local entity = event.entity
-    if (entity.force.name == "enemy") and (entity.type == "unit") then
+    if (entity.force.name == "enemy") then
+        if (entity.type == "unit") then
         local entityPosition = entity.position
-        -- drop death pheromone where unit died
-        pheromoneUtils.deathScent(regionMap, 
-                                  entityPosition.x,
-                                  entityPosition.y,
-                                  200)
+            -- drop death pheromone where unit died
+            pheromoneUtils.deathScent(regionMap, 
+                                      entityPosition.x,
+                                      entityPosition.y,
+                                      200)
             
-        local squad = unitGroupUtils.convertUnitGroupToSquad(natives, entity.unit_group)
+            local squad = unitGroupUtils.convertUnitGroupToSquad(natives, entity.unit_group)
             
-        ai.retreatUnits(entityPosition, squad, regionMap, surface, natives)
+            ai.retreatUnits(entityPosition, squad, regionMap, surface, natives)
+            
+            -- ai.removeScout(regionMap, surface, entity, natives)
+        elseif (entity.type == "unit-spawner") then
+            local entityPosition = entity.position
+            mapUtils.removeUnitSpawner(regionMap, entityPosition.x, entityPosition.y)
+        end
     end
 end
 
@@ -139,7 +147,7 @@ function onInitialTick(event)
     
     -- add processing handler into chunk map processing
     mapProcessor.install(pheromoneUtils.enemyBaseScent)
-    -- mapProcessor.install(ai.sendScouts)
+    mapProcessor.install(ai.sendScouts)
     mapProcessor.install(pheromoneUtils.processPheromone)
     
     -- used for debugging

libs/AI.lua

@@ -33,7 +33,7 @@ function ai.squadAttackPlayer(regionMap, surface, natives, players)
             end
             if (closestDistance < 60) then
                 local squadType = SQUAD_ATTACKING
-                if (math.random() < 0.10) then -- TODO add sliding scale based on number of members
+                if (math.random() < 0.10) then -- TODO add sliding scale based on number of members and evolution
                     squadType = SQUAD_SUICIDE
                 end
                 unitGroupUtils.setSquadCommand(squad,
@@ -120,9 +120,29 @@ function ai.retreatUnits(position, squad, regionMap, surface, natives)
     end
 end
 
-function ai.sendScouts(regionMap, surface, natives, chunk, neighbors, validNeighbors)
-    
-    return validNeighbors
+--[[ not used due to being unable to stop unit group formation by the computer ai
+function ai.removeScout(regionMap, surface, entity, natives)
+    for i=#natives.scouts, 1, -1 do
+        local scout = natives.scouts[i]
+        if (scout == entity) then
+            table.remove(natives.scouts, i)
+        end
+    end
 end
 
+function ai.sendScouts(regionMap, surface, natives, chunk, neighbors, validNeighbors)
+    if (#natives.scouts < 5) then -- TODO scaled with evolution factor
+        local enemy = surface.find_nearest_enemy({position={x=chunk.pX + constants.HALF_CHUNK_SIZE,
+                                                            y=chunk.pY + constants.HALF_CHUNK_SIZE},
+                                                  max_distance=16})
+        if (enemy ~= nil) and (enemy.type == "unit") then
+            natives.scouts[#natives.scouts+1] = enemy
+            enemy.set_command({type=defines.command.attack,
+                               target=game.players[1].character})
+            -- print("scounting")
+        end
+    end
+    return validNeighbors
+end
+]]--
 return ai

libs/MapUtils.lua

@@ -14,7 +14,12 @@ function mapUtils.getChunkByPosition(regionMap, x, y)
     return nil
 end
 
-
+function mapUtils.removeUnitSpawner(regionMap, x, y)
+    local bases = mapUtils.getChunkByPosition(regionMap, x, y)
+    if (bases ~= nil) then
+        bases.bG = mMax(0, bases.bG - 1)
+    end
+end
 
 --[[
     1 2 3