Grimrock

Code: Select all

-- a version of setDoorState that...actually works
function safeSetDoorState(gameObject,doorComponentName,state)
	local door = gameObject[doorComponentName]
	if state == "closed" then
		local closeSound, closeVelocity, lockSound = door:getCloseSound(), door:getCloseVelocity(), door:getLockSound()
		door:setCloseSound("silence") door:setCloseVelocity(-math.huge) door:setLockSound("silence")
		door.go.controller:close()
		frameutils.script.callNextFrame(safeSetDoorStateCleanup,{gameObject.id,doorComponentName,state,closeSound,closeVelocity,lockSound})
	elseif state == "open" then
		local openSound, openVelocity, lockSound = door:getOpenSound(), door:getOpenVelocity(), door:getLockSound()
		door:setOpenSound("silence") door:setOpenVelocity(math.huge) door:setLockSound("silence")
		door.go.controller:open()
		frameutils.script.callNextFrame(safeSetDoorStateCleanup,{gameObject.id,doorComponentName,state,openSound,openVelocity,lockSound})
	else
		Console.warn("invalid door state ("..state..") in safeSetDoorState for "..gameObject.id.."."..doorComponentName)
	end
end

function safeSetDoorStateCleanup(gameObjectId, doorComponentName, state, sound, velocity, lockSound)
	local door = findEntity(gameObjectId)[doorComponentName]
	door:setLockSound(lockSound)
	if state == "closed" then
		door:setCloseSound(sound) door:setCloseVelocity(velocity)
	elseif state == "open" then
		door:setOpenSound(sound) door:setOpenVelocity(velocity)
	else
		Console.warn("invalid door state ("..state..") in safeSetDoorStateCleanup for "..gameObjectId.."."..doorComponentName)
	end
end

Code: Select all

nextFrameFunctions = {}
function onFrame()
	for _,nff in ipairs(nextFrameFunctions) do
		local arg = nff.arg
		-- CANNOT be shortened to
		-- nff.hook(type(arg) == "table" and unpack(arg) or arg)
		-- due to and/or only evaluating to the first value in the table.
		if type(arg) == "table" then
			nff.hook(unpack(arg))
		else
			nff.hook(arg)
		end
	end
	nextFrameFunctions = {}
end

-- Call function func next frame with arguments in table args (or just args as
-- one argument, if it is not a table). They are called
-- in the same order that callNextFrame is called.
function callNextFrame(func,args)
	table.insert(nextFrameFunctions,{hook=func,arg=args})
end

Code: Select all

		{	-- This will trigger once every frame.
			class = "Timer",
			name = "frame_timer",
			timerInterval = 0.001,
			onActivate = function(self)
				frameutils.script.onFrame()
			end,
		},