mirror of
https://github.com/bryanthaboi/gen1recomp
synced 2026-09-26 13:33:27 -04:00
bryanthaboi
101 lines
2.8 KiB
Lua
101 lines
2.8 KiB
Lua
-- home/window.asm:5-13, 26-35, 217-263; home/list_menu.asm:518-524
|
|
-- luajit tests/engine/list_arrow_blink_bug2061.lua
|
|
|
|
package.path = "./?.lua;./?/init.lua;" .. package.path
|
|
|
|
local T = require("tests.harness")
|
|
local check = T.check
|
|
love = love or require("tests.love_stub")
|
|
|
|
local realFont = package.loaded["src.render.Font"]
|
|
local calls = {}
|
|
package.loaded["src.render.Font"] = {
|
|
BORDER = { tl = 1, tr = 2, bl = 3, br = 4, h = 5, v = 6 },
|
|
draw = function(text, x, y) calls[#calls + 1] = { "draw", text, x, y } end,
|
|
drawCode = function(code, x, y) calls[#calls + 1] = { "code", code, x, y } end,
|
|
drawBox = function(tx, ty, tw, th) calls[#calls + 1] = { "box", tx, ty, tw, th } end,
|
|
width = function(text) return #tostring(text) * 8 end,
|
|
}
|
|
package.loaded["src.ui.ListMenu"] = nil
|
|
package.loaded["src.ui.Theme"] = nil
|
|
local ListMenu = require("src.ui.ListMenu")
|
|
local Theme = require("src.ui.Theme")
|
|
|
|
local held = nil
|
|
local input = {
|
|
wasPressed = function(_, b) return held == b end,
|
|
isDown = function() return false end,
|
|
}
|
|
|
|
local function newList(count)
|
|
local items = {}
|
|
for i = 1, count do
|
|
items[i] = { value = "ITEM_" .. i, label = "ITEM " .. i, count = i }
|
|
end
|
|
local list = ListMenu.new({ input = input }, "ITEMS", items,
|
|
{ kind = "bag", itemBox = true })
|
|
list.game = { input = input }
|
|
return list
|
|
end
|
|
|
|
local function arrowDrawn(list)
|
|
calls = {}
|
|
list:draw()
|
|
for _, c in ipairs(calls) do
|
|
if c[1] == "code" and c[2] == Theme.moreArrow
|
|
and c[3] == 144 and c[4] == 88 then
|
|
return true
|
|
end
|
|
end
|
|
return false
|
|
end
|
|
|
|
local function idle(list, frames)
|
|
held = nil
|
|
for _ = 1, frames do list:update(1 / 60) end
|
|
end
|
|
|
|
do
|
|
local list = newList(6)
|
|
check(arrowDrawn(list), "the arrow starts visible, as HandleMenuInput_ seeds it")
|
|
|
|
idle(list, 30)
|
|
check(not arrowDrawn(list), "half a second of idling blanks it to ' '")
|
|
|
|
idle(list, 30)
|
|
check(arrowDrawn(list), "and it comes back: the toggle is periodic")
|
|
|
|
idle(list, 30)
|
|
check(not arrowDrawn(list), "and off again on the next phase")
|
|
end
|
|
|
|
-- home/window.asm:29-35; home/list_menu.asm:518-524
|
|
do
|
|
local list = newList(6)
|
|
idle(list, 30)
|
|
check(not arrowDrawn(list), "off phase reached")
|
|
|
|
held = "down"
|
|
list:update(1 / 60)
|
|
check(list.index == 2, "the press moved the cursor")
|
|
check(arrowDrawn(list), "scrolling reprints the '▼' solid")
|
|
|
|
idle(list, 30)
|
|
check(not arrowDrawn(list), "then the idle blink resumes from that press")
|
|
end
|
|
|
|
-- home/list_menu.asm:371-372
|
|
do
|
|
local list = newList(2)
|
|
check(not arrowDrawn(list), "a short list has no '▼' at phase 0")
|
|
idle(list, 30)
|
|
check(not arrowDrawn(list), "nor at any other phase")
|
|
end
|
|
|
|
package.loaded["src.render.Font"] = realFont
|
|
package.loaded["src.ui.ListMenu"] = nil
|
|
package.loaded["src.ui.Theme"] = nil
|
|
require("src.ui.Screens").invalidate()
|
|
|
|
T.finish()
|