mirror of
https://github.com/bryanthaboi/gen1recomp.git
synced 2026-08-12 08:21:02 +02:00
bryanthaboi
75 lines
2.8 KiB
Lua
75 lines
2.8 KiB
Lua
-- Parity: Cerulean TM28 Rocket HideObject fade (#170).
|
|
--
|
|
-- pokered CeruleanCityRocketText .Success → PrintText (ReceivedTM28 +
|
|
-- IBetterGetMoving) → farcall CeruleanHideRocket:
|
|
-- GBFadeOutToBlack → Show GUARD1 / Hide GUARD2 / Hide ROCKET →
|
|
-- GBFadeInFromBlack.
|
|
--
|
|
-- Self-contained; run via `luajit tests/parity_cerulean_rocket.lua`.
|
|
package.path = "./?.lua;./?/init.lua;" .. package.path
|
|
if not _G.love then _G.love = require("tests.love_stub") end
|
|
local S = require("tests.harness").suite("parity cerulean rocket")
|
|
local check, eq = S.check, S.eq
|
|
|
|
local story5 = dofile("data/scripts/story5.lua")
|
|
local rows = story5.CERULEAN_CITY.talk.TEXT_CERULEANCITY_ROCKET
|
|
check(rows ~= nil, "Cerulean Rocket talk script exists")
|
|
|
|
local function find(verb, arg)
|
|
for i, row in ipairs(rows) do
|
|
if row[1] == verb and (arg == nil or row[2] == arg) then
|
|
return i, row
|
|
end
|
|
end
|
|
end
|
|
|
|
local iMoving = find("show_text", "_CeruleanCityRocketIBetterGetMovingText")
|
|
local iFadeOut = find("fade", "out")
|
|
local iGuard1 = find("show_object", "CERULEAN_CITY")
|
|
local iGuard2 = find("hide_object", "CERULEAN_CITY")
|
|
local iRocket, rocketRow
|
|
for i, row in ipairs(rows) do
|
|
if row[1] == "hide_object" and row[3] == "CERULEANCITY_ROCKET" then
|
|
iRocket, rocketRow = i, row
|
|
break
|
|
end
|
|
end
|
|
local iFadeIn = find("fade", "in")
|
|
|
|
check(iMoving, "prints IBetterGetMovingText before hide")
|
|
check(iFadeOut and iFadeOut == iMoving + 1,
|
|
"GBFadeOutToBlack follows IBetterGetMovingText")
|
|
check(iGuard1 and rows[iGuard1][3] == "CERULEANCITY_GUARD1"
|
|
and iGuard1 > iFadeOut,
|
|
"ShowObject GUARD1 runs under the black fade")
|
|
check(iGuard2 and rows[iGuard2][3] == "CERULEANCITY_GUARD2"
|
|
and iGuard2 > iGuard1,
|
|
"HideObject GUARD2 follows GUARD1 (pokered CeruleanHideRocket order)")
|
|
check(iRocket and iRocket > iGuard2 and iRocket < iFadeIn,
|
|
"HideObject ROCKET runs while screen is black")
|
|
eq(rocketRow[2], "CERULEAN_CITY", "Rocket hide targets CERULEAN_CITY")
|
|
check(iFadeIn and iFadeIn == iRocket + 1,
|
|
"GBFadeInFromBlack follows the three object toggles")
|
|
|
|
-- loss must not land on a hide/show row
|
|
local iBattleJump
|
|
for _, row in ipairs(rows) do
|
|
if row[1] == "jump_if_false" then iBattleJump = row break end
|
|
end
|
|
check(iBattleJump and iBattleJump[2] == "end",
|
|
"battle loss jumps to end (not into CeruleanHideRocket)")
|
|
|
|
-- GOT_TM28 re-entry jumps at the fade (idempotent HideRocket)
|
|
local iGotJump
|
|
for _, row in ipairs(rows) do
|
|
if row[1] == "jump_if_true" then iGotJump = row break end
|
|
end
|
|
check(iGotJump and iGotJump[2] == iFadeOut,
|
|
"EVENT_GOT_TM28 jumps to CeruleanHideRocket fade-out")
|
|
|
|
local ScriptRunner = require("src.script.ScriptRunner")
|
|
local problems = ScriptRunner.validate(rows)
|
|
eq(#problems, 0, "Rocket script validates: " .. table.concat(problems, "; "))
|
|
|
|
S.finish()
|