Скрипты

Если слот пустой, то соответствующий элемент равен не nil, а 0. Поэтому ~=nil надо заменить на ~=0.
Задумка заключается в удалении трети армии? Тогда есть скрипт покороче.

for i=0,6 do
  local t, n = GetObjectArmySlotCreature(heroname, i)
  if t ~= 0 then
    RemoveHeroCreatures(heroname, t, n/3)
  end
end