mirror of
https://github.com/bryanthaboi/gen1recomp.git
synced 2026-08-12 08:21:02 +02:00
bryanthaboi
51 lines
2.0 KiB
Lua
51 lines
2.0 KiB
Lua
-- The Gold title screen, once per COLOR mode.
|
|
--
|
|
-- POKEPORT_GAME=gold POKEPORT_DRIVER=tests/drivers/gold_title_shots.lua love .
|
|
--
|
|
-- Two things about this screen only a human can check, and both of them are
|
|
-- what this driver puts on disk:
|
|
--
|
|
-- * Ho-Oh's placement. `depixel 12, 11` is OAM (x 88, y 96), and OAM is
|
|
-- biased by (-8, -16), so the bird's 64 pixels land on 48..112 -- dead
|
|
-- centre of the 160-wide screen. A shot where it sits right of centre
|
|
-- means the bias (or the y-then-x argument order) has been dropped again.
|
|
-- * Ho-Oh under DMG and CLASSIC. LoadTitleScreenPals writes rOBP0 =
|
|
-- %11111111 on a non-CGB screen, mapping all four of the pic's colours to
|
|
-- shade 3, so the bird is a solid BLACK silhouette there rather than the
|
|
-- shaded pose a straight 2bpp decode gives.
|
|
--
|
|
-- Writes to /tmp/gold-title (POKEPORT_SHOT_DIR to move it).
|
|
local U = require("tests.drivers.util")
|
|
|
|
local GbcPalette = require("src.render.GbcPalette")
|
|
local TitleState = require("src.ui.gen2.TitleState")
|
|
|
|
return function(game)
|
|
local out = os.getenv("POKEPORT_SHOT_DIR") or "/tmp/gold-title"
|
|
|
|
U.wait(10)
|
|
game:showTitle()
|
|
U.wait(20)
|
|
local title = game.stack:top()
|
|
assert(getmetatable(title) == TitleState,
|
|
"showTitle left " .. tostring(title) .. " on the stack")
|
|
assert(title.hoohX == 48 and title.hoohY == 56,
|
|
("Ho-Oh is at (%s, %s), expected (48, 56) -- stale cache?")
|
|
:format(tostring(title.hoohX), tostring(title.hoohY)))
|
|
|
|
local previous = GbcPalette.mode
|
|
for _, mode in ipairs(GbcPalette.MODES) do
|
|
GbcPalette.setMode(mode)
|
|
-- Land on the same wing-flap frame in every mode so the three shots
|
|
-- differ only in colour: the frameset runs on its own timer.
|
|
title.seqIndex, title.frame, title.seqLeft = 1, 1, 999
|
|
title.hoohPhase = 0
|
|
U.wait(2)
|
|
U.shot(game, ("%s/title-%s.png"):format(out, mode))
|
|
print(("[driver] %s"):format(GbcPalette.modeLabel(mode)))
|
|
end
|
|
GbcPalette.setMode(previous)
|
|
|
|
print("[driver] PASS gold title shots in " .. out)
|
|
end
|