Grimrock

Code: Select all

lastx = 0
lasty = 0
lastf = 0
lastl = 0
lastS = nil

-- This must be called by the onGui handler
function onClick(g)
	-- check if party moved. Use this way to handle also changing facing by mouse look
	if (party.x ~= lastx) or (party.y ~= lasty) or (party.facing ~= lastf) or (party.level ~= lastl) then 
		local dx, dy = getForward(party.facing)
		local Sx = grimq.from(entitiesAt(party.level, party.x + dx, party.y + dy))
			:where("class", "Crystal")
			:first()
			
		if (Sx == nil) then
			lastS = nil
		else 
			lastS = Sx.id
		end
	end

	if (lastS == nil) then
		return;
	end
	
	local S = findEntity(lastS)
	
	if (S == nil) then
	    return; 
	end

	if (g.button(lastS, 0, 0, g.width, g.height)) then
		local pX = g.mouseX / g.width
		local pY = g.mouseY / g.height
		
		if (pX < 0.33 or pX > 0.66) then
			return
		end

		local item = getMouseItem()
		
		if (item == nil) then
			if (pY > 0.75) then
				local pickup = grimq.from(entitiesAt(party.level, party.x, party.y))
				:where(grimq.isItem)
				:where(function(f) return f.facing == party.facing; end)
				:first()
				
				if (pickup ~= nil) then
					local mi = grimq.copyItem(pickup)
					pickup:destroy()
					setMouseItem(mi)
					return
				end
			end
			party:heal()
		else
			activateShrine(S, item)
		end
	end
end

function activateShrine(S, item)
        -- placeholder
	hudPrint("used item " .. item.name .. " over shrine " .. S.name)
end