Files
gen1recomp/tests/drivers/game3_stitchfield_flash.lua
bryanthaboi dee935a4ea CLOSES #2430
2026-09-23 11:58:32 -04:00

104 lines
3.7 KiB
Lua

local U = require("tests.drivers.util")
local DIR = os.getenv("POKEPORT_SHOT_DIR") or "/tmp/game3_stitchfield_flash"
local ROCK_TUNNEL = "FR_ROCK_TUNNEL_1F"
-- pokefirered/include/constants/flags.h:1364 FLAG_BADGE01_GET
local FLAG_BADGE01_GET = 0x820
local failures = 0
local function result(ok, label)
print((ok and "PASS " or "FAIL ") .. label)
if not ok then failures = failures + 1 end
return ok
end
local function finish()
if failures == 0 then
print("PASS stitchfield_flash")
love.event.quit(0)
else
print("FAIL stitchfield_flash failures=" .. failures)
love.event.quit(1)
end
end
return function(game)
for _ = 1, 900 do
if game.phase == "boot" and game.boot then break end
U.wait(1)
end
game:_handleBootAction({ action = "new_game", name = "RED" })
U.wait(240)
local Runtime = require("src.core.game3.runtime")
local Map = require("src.core.game3.map")
local Space = require("src.core.game3.scripting.space")
local Flags = require("src.core.game3.scripting.flags")
local Party = require("src.core.game3.party")
local Player = require("src.core.game3.player")
local Field = require("src.core.game3.field")
local FieldMoves = require("src.core.game3.field_moves")
local FieldView = require("src.core.game3.field_view")
local Message = require("src.ui.game3.message")
local session = Runtime.getSession()
if not result(session ~= nil, "new game reached the game3 field") then return finish() end
session.party = {}
Party.giveMon(session, 25, 20)
Flags.setFlag(Space.store, Space.vm and Space.vm.ctx, FLAG_BADGE01_GET, true)
Map.load(nil, game, ROCK_TUNNEL, { x = 6, y = 7, facing = "down" })
Player.cellX, Player.cellY = 6, 7
Player.px, Player.py = 6 * 16, 7 * 16
Player.targetX, Player.targetY = 6, 7
if game.session then game.session.x, game.session.y = 6, 7 end
U.wait(120)
local mapDef = Map.currentDef()
result(mapDef ~= nil and tonumber(mapDef.cave) == 1, "Rock Tunnel 1F is a cave map")
print("[driver] on " .. tostring(Space.mapId) .. " flashLevel="
.. tostring(FieldView.getFlashLevel and FieldView.getFlashLevel()))
U.shot(game, DIR .. "/stitchfield_flash_01_dark_cave.png")
-- pokefirered/src/fldeff_flash.c:164 SetUpFieldMove_Flash
local ctx = {
party = session.party,
mon = session.party[1],
store = Space.store,
session = session,
facing = Player.facing,
mapType = mapDef and mapDef.mapType,
isCave = tonumber(mapDef and mapDef.cave) == 1,
}
local res = FieldMoves.fromMenu(FieldMoves.MOVES.FLASH, ctx)
if not result(res ~= nil and res.ok == true and res.action == "flash",
"the party menu FLASH entry is usable here, text=" .. tostring(res and res.text)) then
return finish()
end
-- pokefirered/src/fldeff_flash.c:177 FieldCallback_Flash
Field.executeFieldMove(res)
result(res.text == nil, "FLASH carries no field text")
result(Field.locked == true, "the field is locked for the show-mon animation")
U.wait(6)
result(Message.isOpen() == false, "no message box while the animation runs")
U.shot(game, DIR .. "/stitchfield_flash_02_show_mon.png")
for _ = 1, 300 do
if not Field.locked then break end
U.wait(1)
end
result(Field.locked == false, "the animation finished and released the field")
-- pokefirered/data/scripts/flash.inc:1 EventScript_FldEffFlash
result(Message.isOpen() == false, "and no message followed it")
result(Flags.getFlag(Space.store, Space.vm and Space.vm.ctx, FieldMoves.SYS_FLAGS.FLASH_ACTIVE) == true,
"FLAG_SYS_FLASH_ACTIVE is set")
print("[driver] after the animation flashLevel="
.. tostring(FieldView.getFlashLevel and FieldView.getFlashLevel()))
U.shot(game, DIR .. "/stitchfield_flash_03_lit_cave.png")
finish()
end