mirror of
https://github.com/bryanthaboi/gen1recomp
synced 2026-09-26 13:33:27 -04:00
bryanthaboi
63 lines
1.9 KiB
Lua
63 lines
1.9 KiB
Lua
local U = require("tests.drivers.util")
|
|
|
|
-- ../pokecrystal/maps/GoldenrodCity.asm:34
|
|
local NAMES = {
|
|
"ENGINE_DAILY_MOVE_TUTOR",
|
|
"ENGINE_BUENAS_PASSWORD",
|
|
"ENGINE_INDIGO_PLATEAU_RIVAL_FIGHT",
|
|
"ENGINE_KURT_MAKING_BALLS",
|
|
"ENGINE_ALL_FRUIT_TREES",
|
|
}
|
|
|
|
return function(game)
|
|
local fails = 0
|
|
local function say(line) print("[1963] " .. line) end
|
|
local function ok(cond, line)
|
|
if not cond then fails = fails + 1 end
|
|
say((cond and "PASS " or "FAIL ") .. line)
|
|
end
|
|
|
|
U.wait(60)
|
|
local world, save = game.world, game.save
|
|
if not (world and world.map and save) then
|
|
say("FAIL the crystal world did not boot")
|
|
love.event.quit(1)
|
|
return
|
|
end
|
|
|
|
world:warpToMapId("GOLDENROD_CITY", 17, 10, "down")
|
|
U.wait(30)
|
|
ok(world.map and world.map.def and world.map.def.id == "GOLDENROD_CITY",
|
|
"standing outside the Game Corner")
|
|
|
|
save.engineFlags = save.engineFlags or {}
|
|
local ids = {}
|
|
for _, name in ipairs(NAMES) do
|
|
local id = world:engineFlagId(name, nil)
|
|
ids[name] = id
|
|
say(name .. " = " .. tostring(id))
|
|
if id then save.engineFlags[id] = true end
|
|
end
|
|
ok(ids.ENGINE_DAILY_MOVE_TUTOR == 94,
|
|
"ENGINE_DAILY_MOVE_TUTOR resolves to Crystal's 94 (got "
|
|
.. tostring(ids.ENGINE_DAILY_MOVE_TUTOR) .. ")")
|
|
|
|
save.dailyReset = { remaining = 0, day = save.dailyReset
|
|
and save.dailyReset.day or 0 }
|
|
world:checkTimeEvents()
|
|
U.wait(5)
|
|
|
|
for _, name in ipairs(NAMES) do
|
|
local id = ids[name]
|
|
ok(id == nil or save.engineFlags[id] == nil,
|
|
name .. " is clear after the rollover")
|
|
end
|
|
|
|
U.shot(game, (os.getenv("POKEPORT_SHOT_DIR") or "/tmp/pokeport-shots")
|
|
.. "/crystal_move_tutor_bug1963.png")
|
|
say("on a Wednesday or Saturday after the Elite Four the tutor "
|
|
.. "must be standing here again")
|
|
say(fails == 0 and "all claims passed" or (fails .. " claims failed"))
|
|
love.event.quit(fails == 0 and 0 or 1)
|
|
end
|