mirror of
https://github.com/bryanthaboi/gen1recomp
synced 2026-09-26 13:33:27 -04:00
bryanthaboi
96 lines
2.7 KiB
Lua
96 lines
2.7 KiB
Lua
package.path = "./?.lua;./?/init.lua;" .. package.path
|
|
|
|
local T = require("tests.harness")
|
|
local check, eq = T.check, T.eq
|
|
love = love or require("tests.love_stub")
|
|
|
|
require("src.core.Logger").warn = function() end
|
|
|
|
local Chrome = require("src.ui.gen2.Chrome")
|
|
local Font = require("src.render.Font")
|
|
local Theme = require("src.ui.Theme")
|
|
local TextBox = require("src.render.TextBox")
|
|
|
|
local ARROW = Theme.moreArrow or 0xEE
|
|
local CREAM = { 231, 227, 231 }
|
|
|
|
local function newGame(gen, paper)
|
|
return {
|
|
save = { player = {}, options = { textSpeed = "FAST" }, generation = gen },
|
|
data = { text = {} },
|
|
input = {
|
|
wasPressed = function() return false end,
|
|
isDown = function() return false end,
|
|
},
|
|
textboxPaper = paper and function() return paper end or nil,
|
|
}
|
|
end
|
|
|
|
local events
|
|
local realDraw, realFill = Font.drawCode, Chrome.paletteFill
|
|
Font.drawCode = function(code, x, y)
|
|
events[#events + 1] = { kind = "glyph", code = code, x = x, y = y }
|
|
end
|
|
Chrome.paletteFill = function(x, y, w, h, palette)
|
|
events[#events + 1] = { kind = "fill", x = x, y = y, w = w, h = h,
|
|
palette = palette }
|
|
end
|
|
|
|
local function frame(box, blink)
|
|
box.blink = blink
|
|
events = {}
|
|
box:draw()
|
|
local fill, arrow
|
|
for i, e in ipairs(events) do
|
|
if e.kind == "fill" and e.x == 144 and e.y == 136 then fill = i end
|
|
if e.kind == "glyph" and e.code == ARROW then arrow = i end
|
|
end
|
|
return fill, arrow
|
|
end
|
|
|
|
local function box(gen, paper)
|
|
local b = TextBox.new(newGame(gen, paper), "A")
|
|
b.waiting = true
|
|
b.shown = {}
|
|
return b
|
|
end
|
|
|
|
-- ../pokecrystal/home/text.asm:630
|
|
do
|
|
local gold = box(2)
|
|
local fill, arrow = frame(gold, 0)
|
|
check(arrow, "gold arrow draws on the on phase")
|
|
check(fill, "and the (18,17) border cell is painted paper first")
|
|
check(fill and arrow and fill < arrow, "paper goes under the arrow, not over it")
|
|
local e = fill and events[fill]
|
|
check(e and e.w == 8 and e.h == 8, "one whole 8x8 tile")
|
|
check(e and e.palette == Chrome.DEFAULT_BOX_PALETTE,
|
|
"through the box's own palette")
|
|
end
|
|
|
|
-- ../pokecrystal/home/joypad.asm:458
|
|
do
|
|
local gold = box(2)
|
|
local fill, arrow = frame(gold, 16)
|
|
eq(arrow, nil, "gold arrow is off from frame 16")
|
|
eq(fill, nil, "and the border tile is left alone on the off phase")
|
|
end
|
|
|
|
do
|
|
local gear = box(2, CREAM)
|
|
local fill = frame(gear, 0)
|
|
local e = fill and events[fill]
|
|
check(e and e.palette and e.palette[1] == CREAM,
|
|
"a pushed textbox on the Pokegear's cream paper fills the cell cream")
|
|
end
|
|
|
|
do
|
|
local red = box(1)
|
|
local fill, arrow = frame(red, 0)
|
|
check(arrow, "gen1 arrow still draws")
|
|
eq(fill, nil, "and gen1 never paints the cell (its arrow sits on the interior)")
|
|
end
|
|
|
|
Font.drawCode, Chrome.paletteFill = realDraw, realFill
|
|
T.finish()
|