mirror of
https://github.com/bryanthaboi/gen1recomp
synced 2026-09-26 13:33:27 -04:00
bryanthaboi
85 lines
2.9 KiB
Lua
85 lines
2.9 KiB
Lua
-- engine/menus/start_sub_menus.asm:97-104
|
|
-- engine/pokemon/status_screen.asm:82, home/pokemon.asm:186
|
|
-- POKEPORT_VERSION=red POKEPORT_TOUCH=0 SHOT_DIR=/tmp/bug2060 \
|
|
-- POKEPORT_DRIVER=tests/drivers/status_white_flash_2060_test.lua love .
|
|
return function(game)
|
|
local U = dofile("tests/drivers/util.lua")
|
|
local DIR = os.getenv("SHOT_DIR") or "/tmp/bug2060"
|
|
local SummaryMenu = require("src.ui.SummaryMenu")
|
|
|
|
local function top() return game.stack:top() end
|
|
local function bail(msg)
|
|
U.log("[2060] FAIL " .. msg .. "; top = "
|
|
.. tostring(top() and (top().screenId or "?")))
|
|
while true do coroutine.yield() end
|
|
end
|
|
|
|
local function cursorTo(menu, field, wanted)
|
|
for _ = 1, 40 do
|
|
if not menu or menu[field] == wanted then
|
|
return menu and menu[field] == wanted
|
|
end
|
|
U.tap(game, menu[field] < wanted and "down" or "up")
|
|
U.wait(3)
|
|
end
|
|
return menu and menu[field] == wanted
|
|
end
|
|
|
|
U.newGame(game)
|
|
U.wait(20)
|
|
U.teleport(game, "PALLET_TOWN", 10, 8, "down")
|
|
U.wait(10)
|
|
|
|
U.tap(game, "start")
|
|
U.wait(10)
|
|
local menu = top()
|
|
if not (menu and menu.screenId == "StartMenu") then bail("no start menu") end
|
|
local row
|
|
for i, it in ipairs(menu.items or {}) do
|
|
if it.label == "POKéMON" then row = i break end
|
|
end
|
|
if not (row and cursorTo(menu, "index", row)) then bail("no POKéMON row") end
|
|
U.tap(game, "a")
|
|
U.wait(10)
|
|
|
|
local party = top()
|
|
if not (party and party.screenId == "PartyMenu") then bail("no party menu") end
|
|
U.tap(game, "a")
|
|
U.wait(8)
|
|
local subRow
|
|
for i, it in ipairs(party.subItems or {}) do
|
|
if it.action == "stats" then subRow = i break end
|
|
end
|
|
if not (subRow and cursorTo(party, "subIndex", subRow)) then
|
|
bail("no STATS row")
|
|
end
|
|
U.shot(game, DIR .. "/00-stats-selected.png")
|
|
|
|
-- ---- opening: status_screen.asm:82 --------------------------------------
|
|
U.tap(game, "a")
|
|
for i = 1, 8 do U.shot(game, ("%s/10-open-%02d.png"):format(DIR, i)) end
|
|
local screen = top()
|
|
if not (getmetatable(screen) == SummaryMenu
|
|
or (screen and screen.screenId == "SummaryMenu")) then
|
|
bail("status screen never opened")
|
|
end
|
|
U.log("[2060] opened; whiteHold left = " .. tostring(screen.whiteHold))
|
|
U.wait(30)
|
|
U.shot(game, DIR .. "/11-open-settled.png")
|
|
|
|
-- ---- closing: status_screen.asm:431 + home/pokemon.asm:186 --------------
|
|
U.tap(game, "a")
|
|
U.wait(10)
|
|
U.log("[2060] page = " .. tostring(screen.page))
|
|
U.tap(game, "a")
|
|
local blink = top()
|
|
U.log("[2060] closing state frames = " .. tostring(blink and blink.frames)
|
|
.. ", isOpaque = " .. tostring(blink and blink.isOpaque))
|
|
for i = 1, 8 do U.shot(game, ("%s/20-close-%02d.png"):format(DIR, i)) end
|
|
U.wait(20)
|
|
U.shot(game, DIR .. "/21-close-settled.png")
|
|
U.log("[2060] back on " .. tostring(top() and (top().screenId or "?")))
|
|
U.log("[2060] shots in " .. DIR)
|
|
while true do coroutine.yield() end
|
|
end
|