SetRegionBlocked("Block1", true, 2);
SetRegionBlocked("Block2", true, 2);
SetObjectiveVisible("killall", nil);

function am()
	while 1 do
		local count = 0
		for i=36,43 do
			count = count + (HasArtefact("Muscip", i) or 0)
		end;
		if count < 8 then
			SetObjectiveState("obj", OBJECTIVE_ACTIVE);
		end;
		sleep(5);
	end;
end;

function killallactive()
	SetObjectiveVisible("killall", true);
	startThread (am);
end;

function winF()
	Win();
end;

function obj()
	local old = 0
	while 1 do
		local count = 0
		for i=36,43 do
			count = count + (HasArtefact("Muscip", i) or 0)
		end
		if count == 8 then
			print("Player 1 has all artifacts")
			SetObjectiveState("obj", OBJECTIVE_COMPLETED)
			QuestionBox(GetMapDataPath().."complete-game.txt", "killallactive", "winF");
			break
		end
		if count ~= old then
			print("Player 1 has "..count.."/8 artifacts")
			SetObjectiveProgress("obj", count)
			old = count
		end
		sleep(5)
	end
end

startThread (obj);

Использовать константы или нет - ваше дело.

Насчет непонятного выражения: всё на сайте разработчика языка lua.org, в том числе и приоритет операций. Я лишь использовал возможности, а десять лишних скобок погоды не сделают.

GetPlayerState(...) == 1 or 0

RedHeavenHeroЗначит так. GetPlayerState возвращает
1 - игрок участвует
2 - игрок победил
3 - игрок проиграл
4 - его не было сначала.
В мануале полно косяков.

		-- Player states
	--
	PLAYER_NOT_IN_GAME = 0
	PLAYER_ACTIVE = 1
	PLAYER_WON = 2
	PLAYER_LOST = 3

RedHeavenHeroGetPlayerState(i) == 1 or 0
Если функция вернула единицу (игрок жив), то "==" вернет 1 и эта 1 будет прибавлена к n, иначе вернет nil. Но nil прибавлять нельзя и операция "или" заменяет его на 0.

	n = n + (isCondition or 0)

	if (isCondition) then
    n = n + 1
end

	function am()
	local old = 8
	while 1 do
		local count = 0
		for i=36,43 do
			count = count + (HasArtefact("Muscip", i) or 0)
		end
		if count ~= old then
			if old == 8 then
				SetObjectiveState("obj", OBJECTIVE_ACTIVE)
			end
			if count == 8 then
				SetObjectiveState("obj", OBJECTIVE_COMPLETED)
			else
				SetObjectiveProgress('obj', count)
			end
			old = count
		end
		sleep(5)
	end
end

	function am()
	while 1 do
		local heroes = GetPlayerHeroes(PLAYER_1);
		local count = 0
		h = "Maahir";
		if HasArtefact(h, ARTIFACT_RING_OF_MAGI) then
			count = count + 1;
		end;
		if HasArtefact(h, ARTIFACT_CROWN_OF_MAGI) then
			count = count + 1;
		end;
		if HasArtefact(h, ARTIFACT_ROBE_OF_MAGI) then
			count = count + 1;
		end;
		if HasArtefact(h, ARTIFACT_STAFF_OF_MAGI) then
			count = count + 1;
		end;			
		if count < 4 then
			SetObjectiveState("obj1", OBJECTIVE_ACTIVE);
			startThread (objective_1);
		end;
	sleep(3);
	end;
end;

	function am()
	local old = 0
	while 1 do
		local count = 0
		for i=36,43 do
			count = count + (HasArtefact("Muscip", i) or 0)
		end;
		if count ~= old then
			if old < 8 then
				SetObjectiveState("obj", OBJECTIVE_ACTIVE);
				startThread(obj);
			end;
			old = count
		end;
		sleep(5);
	end;
end;

Warrior777А как насчёт этого?

	function am()
	local old = 0
	while 1 do
		local count = 0
		for i=36,43 do
			count = count + (HasArtefact("Muscip", i) or 0)
		end;
		if count ~= old then
			if old < 8 then
				SetObjectiveState("obj", OBJECTIVE_ACTIVE);
				startThread(obj);
			end;
			old = count
		end;
		sleep(5);
	end;
end;