mirror of
https://github.com/bryanthaboi/gen1recomp
synced 2026-09-26 13:33:27 -04:00
104 lines
3.7 KiB
Lua
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
|