BizHawk/Assets/Lua/NDS/StylusInputDisplay.lua

-- Gives a cross hair UI for the stylus for DS games

local upColor = 'lime'
local downColor = 'red'
local dotColor = 'blue'

client.setwindowsize(client.getwindowsize()) -- assert a sane resolution

invert = false
-- FIXME: No idea how to get lua to detect inverted screens, set this to true if inverted screens are active
-- (typing "invert = true" without the quotes in the console works)

function Draw(x, y, maxX, maxY, isDown)
	color = upColor
	if isDown then
		color = downColor
	end

	gui.drawLine(0, y - 1, maxX, y - 1, color)
	gui.drawLine(0, y, maxX, y, color)
	gui.drawLine(0, y + 1, maxX, y + 1, color)
	
	gui.drawLine(x - 1, 0, x - 1, maxY, color)
	gui.drawLine(x, 0, x, maxY, color)
	gui.drawLine(x + 1, 0, x + 1, maxY, color)

	if isDown then
		gui.drawPixel(x - 1, y - 1, dotColor)
		gui.drawPixel(x, y - 1, dotColor)
		gui.drawPixel(x + 1, y - 1, dotColor)
		gui.drawPixel(x - 1, y, dotColor)
		gui.drawPixel(x, y, dotColor)
		gui.drawPixel(x + 1, y, dotColor)
		gui.drawPixel(x - 1, y + 1, dotColor)
		gui.drawPixel(x, y + 1, dotColor)
		gui.drawPixel(x + 1, y + 1, dotColor)
	end
end

while true do
	if emu.getsystemid() ~= "NDS" then
		console.log('This script is for Nintendo DS only')
		break
	end
	
	local btns = joypad.get()
	
	if movie.mode() == "PLAY" and emu.framecount() > 0 then
		btns = movie.getinput(emu.framecount() - 1)
	end

	local wsz = client.getwindowsize()
	local w = client.screenwidth() / wsz
	local xo = 0
	local yo = 0

	if w == 512 then -- horizontal
		if invert then
			xo = xo - 256
		else
			error("Non-inverted horizontal screens are unsupported")
		end
	else -- vertical
		if invert then
			yo = yo - 192
		else
			-- don't need to do anything here
		end
	end

	local x = btns['Touch X'] + xo
	local y = btns['Touch Y'] + yo
	local isDown = btns['Touch']

	pts = client.transformPoint(x, y)
	local tx = pts["x"];
	local ty = pts["y"];
	Draw(tx / wsz, ty / wsz, 10000, 10000, isDown)

	emu.yield()
end