Auto-translated
local a = 0 should be changed to simply a = 0. However, it would be even better to avoid using the new day trigger altogether and write it like this:
function zoloto()
local week = GetDate(WEEK)
SetObjectDwellingCreatures('houseInferno', 16, 35*week);
SetObjectDwellingCreatures('houseInferno', 18, 34*week);
SetObjectDwellingCreatures('houseInferno', 20, 18*week);
SetObjectDwellingCreatures('houseInferno', 22, 10*week);
SetObjectDwellingCreatures('houseInferno', 24, 7*week);
SetObjectDwellingCreatures('houseInferno', 26, 4*week);
SetObjectDwellingCreatures('houseInferno', 28, 2*week);
end;
Trigger( OBJECT_CAPTURE_TRIGGER, 'houseInferno', "zoloto")