mirror of
https://github.com/bryanthaboi/gen1recomp
synced 2026-09-26 13:33:27 -04:00
bryanthaboi
76 lines
2.3 KiB
Lua
76 lines
2.3 KiB
Lua
local U = require("tests.drivers.util")
|
|
|
|
-- ../pokecrystal/engine/rtc/timeset.asm:385
|
|
local SHOT_DIR = os.getenv("POKEPORT_SHOT_DIR") or "/tmp/pokeport-shots"
|
|
|
|
return function(game)
|
|
local fails = 0
|
|
local function say(line) print("[2138] " .. line) end
|
|
local function ok(cond, line)
|
|
if not cond then fails = fails + 1 end
|
|
say((cond and "PASS " or "FAIL ") .. line)
|
|
end
|
|
|
|
local function tap(button, frames)
|
|
game.input.pressQueue[#game.input.pressQueue + 1] = button
|
|
game.input.state[button] = true
|
|
U.wait(2)
|
|
game.input.state[button] = false
|
|
U.wait(frames or 4)
|
|
end
|
|
|
|
local function dayWheel()
|
|
local top = game.stack and game.stack:top()
|
|
if top and top.mode == "day" and top.pickerBox then return top end
|
|
return nil
|
|
end
|
|
|
|
U.wait(60)
|
|
local world = game.world
|
|
if not (world and world.map) then
|
|
say("FAIL the gen 2 world did not boot")
|
|
love.event.quit(1)
|
|
return
|
|
end
|
|
|
|
-- ../pokecrystal/maps/PlayersHouse1F.asm:395
|
|
world:warpToMapId("PLAYERS_HOUSE_1F", 9, 1, "down")
|
|
U.wait(30)
|
|
ok(world.map and world.map.id == "PLAYERS_HOUSE_1F", "standing at the top of the stairs")
|
|
for _ = 1, 3 do tap("down", 10) end
|
|
U.wait(30)
|
|
U.shot(game, SHOT_DIR .. "/2138_scene_start.png")
|
|
|
|
local wheel
|
|
for _ = 1, 120 do
|
|
wheel = dayWheel()
|
|
if wheel then break end
|
|
tap("a", 6)
|
|
end
|
|
if not wheel then
|
|
say("the Mom scene did not reach SetDayOfWeek; pushing the wheel directly")
|
|
world:setDayOfWeek(function() end)
|
|
U.wait(10)
|
|
wheel = dayWheel()
|
|
end
|
|
ok(wheel ~= nil, "the day-of-week wheel is up")
|
|
if wheel then
|
|
ok(wheel.isOpaque == false, "and it is an overlay, not an opaque page")
|
|
ok(not wheel:drawsWidescreen(), "with no widescreen surround of its own")
|
|
end
|
|
U.wait(10)
|
|
U.shot(game, SHOT_DIR .. "/2138_day_wheel.png")
|
|
say("eyeball 2138_day_wheel.png: the living room, Mom and the player stay "
|
|
.. "visible around the SUNDAY picker and the question box")
|
|
|
|
tap("a", 20)
|
|
U.shot(game, SHOT_DIR .. "/2138_confirm.png")
|
|
say("eyeball 2138_confirm.png: YES/NO box at (14,7), YES on row 8, NO on row 10")
|
|
tap("a", 30)
|
|
ok(dayWheel() == nil, "YES pops the wheel")
|
|
U.shot(game, SHOT_DIR .. "/2138_after.png")
|
|
|
|
say(fails == 0 and "all claims passed" or (fails .. " claims failed"))
|
|
love.event.quit(fails == 0 and 0 or 1)
|
|
end
|