Задание по захвату этого города должно было становиться выполненным, плюс главный герой получал заклинание "Берсерк". Сейчас проверил еще раз, все тщетно.

Добавлено через 17 минут
снова заменил название на ditana, иначе при поиске внутри карты по имени Town показывался каждый город

Добавлено через 21 час 26 минут
Удалось заставить скрипт выполниться следующим образом:

function necropolis()
while 1 do
if GetObjectOwner("ditana")==PLAYER_1 then
SetObjectiveState("zadanie4", OBJECTIVE_COMPLETED, 1);
TeachHeroSpell("Brem", 18);
* * break
* end;
sleep (2);
end;
end;

if GetDate(DAY)==5 then
MessageBox(path.."day5.txt");
SetObjectiveState("zadanie4", OBJECTIVE_ACTIVE, 1);
startThread(necropolis)
end;

Правда, почему он не хотел выполняться обычным образом, я так и не понял.