function AddArchangelsSpecialization()
if GetObjectDwellingCreatures('AdvMapTown-12119', CREATURE_ANGEL) ~= -1 then
local add = 1
if grail_built == 1 then
add = add + 3
end
SetObjectDwellingCreatures('AdvMapTown-12119', CREATURE_ANGEL, GetObjectDwellingCreatures('AdvMapTown-12119', CREATURE_ANGEL) + add)
end
end

function NewDay();
if GetDate(DAY_OF_WEEK) == 1 then
AddArchangelsSpecialization()
end
end

Trigger(NEW_DAY_TRIGGER, 'NewDay')

grail_built = 0

function WaitForBuildGrail()
while GetTownBuildingLevel('AdvMapTown-12119', ID_14) == 0 do
sleep(10)
end
grail_built = 1
end

startThread(WaitForBuildGrail)