Grimrock

Code: Select all

-------------------------------------------------------
-- Pit Immunity Script
-------------------------------------------------------
-- This script should be placed in a script entity 
-- called 'pitImmunity'.
--
-- To make the party immune to pit damage you just 
-- need call 'pitImmunity.enabled = true' in another
-- script. To disable it, call pitImmunity.enabled=false.
--
-- For this to work, you will need to hook 
-- onMove and onDamage into your party script.
-------------------------------------------------------

enabled = true;
ignoreDamageCount = 0;

function getEnabledChampionCount()
	local enabledChamps = 0;

	for i=1,4 do
		local champ = party:getChampion(i);
		
		if ( champ:getEnabled() ) then
			enabledChamps = enabledChamps + 1;
		end
	end
	
	return enabledChamps;		
end


function onMove(self, party, direction)
	if ( enabled ~= true ) then
		return;
	end

	local dx, dy = getForward(direction);
	local x, y = party.x + dx, party.y + dy;
	
	for e in entitiesAt(party.level, x, y) do
		if ( e.class == "Pit" ) then
			ignoreDamageCount = getEnabledChampionCount();		
		end
	end
end

function onDamage(self, champion, damAmount, damType)
	if ( enabled ~= true ) then
		return false;
	end
	
	if ( ignoreDamageCount > 0 and damType == 'physical' ) then
		ignoreDamageCount = ignoreDamageCount - 1;
		return false;
	end
end

Code: Select all

cloneObject{
	name = "party",
	baseObject = "party",
	onMove = function(party, direction)
		pitImmunity:onMove(party,direction);
	end,
	onDamage = function(champion, damAmount, damType)
		return pitImmunity:onDamage(champion, damAmount, damType);
	end
}

Code: Select all

armed = true

function setTrap(set)
	if set then
		armed = true
	 else armed = false	
	end
end

function trap(t)
	if armed and t.x ~= nil then
		damageTile(t.level, t.x, t.y, 0, 64 , "poison", 1)
		local screamer = math.random(3)
		party:getChampion(screamer):playDamageSound()
		party:getChampion(screamer+1):playDamageSound()
	end
end