Grimrock

Code: Select all

-- Common hook for all monsters
fw.hooks.monsters.mod_name = {
   onMove = function(self,dir)
     fw.debugPrint("All monsters get this")
   end
} 
-- class specific hook
fw.hooks.snail.mod_name = {
   onMove = function(self,dir)
       fw.debugPrint("All snails get this")
   end
} 

-- entity specific hook
fw.hooks.snail_1.mod_name = {
   onMove = function(self,dir)
fw.debugPrint("Only snail_1 get this")
   end
} 

Code: Select all

activeWalls = {}

function activate()

	fw.hooks.party.illusion_walls = {
		onMove = function(self,dir)
			if dir ~= self.facing then return end
			for e in help.entitiesAtAhead(self) do
				if (e.name == 'dungeon_illusion_wall' and e.facing == help.getOppositeFacing(self)) then
					illusion_walls.doTheMagic(e)
				end
			end
			for e in help.entitiesAtSameTile(self) do
				if (e.name == 'dungeon_illusion_wall' and e.facing == e.facing) then
					illusion_walls.doTheMagic(e)
				end
			end			
			
		end
	}
	fw.debugPrint("illuson walls activated")
end

function doTheMagic(wall)
	wall:setDoorState('open')
					
	timer = findEntity("illusion_walls_timer")
	if (not timer) then
		timer = spawn("timer", wall.level, wall.x, wall.y, wall.facing, "illusion_walls_timer")
		timer:setTimerInterval(0.4)
		timer:addConnector('activate','illusion_walls','closeWalls')		
	end

	timer:activate()
	illusion_walls.activeWalls[wall.id] = wall

end

function closeWalls()
	for id,wall in pairs(illusion_walls.activeWalls) do
		wall:setDoorState('closed')
		illusion_walls.activeWalls[id] = nil
	end

end

Code: Select all

cloneObject{
	name = "dungeon_illusion_wall",
	baseObject = "dungeon_secret_door",
}

Code: Select all

cloneObject{
	name = "teleporter_rotator90",
	baseObject = "teleporter",
}
cloneObject{
	name = "teleporter_rotator180",
	baseObject = "teleporter",
}
cloneObject{
	name = "teleporter_rotator270",
	baseObject = "teleporter",
}

Code: Select all

function activate()

	fw.hooks.party.party_rotator = {
		onMove = function(self,dir)
			for e in help.entitiesAtDir(self,dir) do
				if e.name == 'teleporter_rotator90' then					
					e:setTeleportTarget(e.x, e.y, (self.facing + 1)%4)
					fw.debugPrint("Party rotated by 90")
				end
				if e.name == 'teleporter_rotator180' then					
					e:setTeleportTarget(e.x, e.y, (self.facing + 2)%4)
					fw.debugPrint("Party rotated by 180")
				end
				if e.name == 'teleporter_rotator270' then					
					e:setTeleportTarget(e.x, e.y, (self.facing + 3)%4)
					fw.debugPrint("Party rotated by 270")
				end
			end
			
		end
	}
	fw.debugPrint("Teleporter rotators activated")
end
party_rotators.activate()