mirror of
https://github.com/bryanthaboi/gen1recomp.git
synced 2026-08-12 08:21:02 +02:00
bryanthaboi
bfba1f7bb7
* main menu scrollable when over 8 items * buggies * more buggies * Lorelei, Bruno, and Agatha now push their AfterBattle text right after a win
64 lines
2.5 KiB
Lua
64 lines
2.5 KiB
Lua
-- Parity test: Victory Road 3F hole at (23,15) dungeon-warps the player
|
|
-- to VICTORY_ROAD_2F (22,16).
|
|
--
|
|
-- scripts/VictoryRoad3F.asm VictoryRoad3FDefaultScript feeds
|
|
-- .SwitchOrHoleCoords into IsPlayerOnDungeonWarp with destination
|
|
-- VICTORY_ROAD_2F; data/maps/special_warps.asm DungeonWarpList entry
|
|
-- (VICTORY_ROAD_2F, 2) lands at DungeonWarpData (22, 16). The same cell
|
|
-- also drops a boulder (onBoulderMoved), but the player fall was missing
|
|
-- -- CAVERN $22 is walkable, so without onStep Red stood on the hole
|
|
-- (GitHub #86).
|
|
--
|
|
-- Self-contained; run via `luajit tests/parity_victory_road_hole.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 victory road hole")
|
|
local check, eq = S.check, S.eq
|
|
|
|
local M = dofile("data/scripts/story.lua")
|
|
local vr3 = M.VICTORY_ROAD_3F
|
|
check(vr3 ~= nil and vr3.onStep ~= nil, "VICTORY_ROAD_3F has an onStep hole trigger")
|
|
|
|
local function owRecording()
|
|
local warps = {}
|
|
return {
|
|
player = { facing = "right" },
|
|
startWarpTo = function(_, mapId, x, y, facing)
|
|
warps[#warps + 1] = { mapId = mapId, x = x, y = y, facing = facing }
|
|
end,
|
|
_warps = warps,
|
|
}, warps
|
|
end
|
|
|
|
-- Stepping onto the hole falls through to 2F at the dungeon-warp landing.
|
|
do
|
|
local ow, warps = owRecording()
|
|
local handled = vr3.onStep({}, ow, 23, 15)
|
|
check(handled, "stepping on (23,15) is consumed")
|
|
eq(#warps, 1, "exactly one dungeon warp fires")
|
|
eq(warps[1].mapId, "VICTORY_ROAD_2F", "destination is VICTORY_ROAD_2F")
|
|
eq(warps[1].x, 22, "lands at x=22")
|
|
eq(warps[1].y, 16, "lands at y=16")
|
|
eq(warps[1].facing, "right", "facing is preserved across the fall")
|
|
end
|
|
|
|
-- Any other cell is ignored (switch at 3,5 is boulder-only).
|
|
do
|
|
local ow, warps = owRecording()
|
|
eq(vr3.onStep({}, ow, 3, 5), false, "the switch cell does not dungeon-warp")
|
|
eq(vr3.onStep({}, ow, 22, 15), false, "a neighboring floor cell is ignored")
|
|
eq(#warps, 0, "no warp fires off the hole")
|
|
end
|
|
|
|
-- The hole collision tile stays walkable (fall, do not block).
|
|
local Data = require("src.core.Data")
|
|
if not (Data.maps and Data.maps.VICTORY_ROAD_3F) then Data:load() end
|
|
local MapLoader = require("src.world.MapLoader")
|
|
local map = MapLoader.load(Data, "VICTORY_ROAD_3F")
|
|
check(map:isWalkableCell(23, 15), "CAVERN hole tile at (23,15) is walkable")
|
|
eq(map:warpPadOrHoleAt(23, 15), "hole", "collision tile is the CAVERN hole ($22)")
|
|
check(map:warpAtCell(23, 15) == nil,
|
|
"the hole is a dungeon warp, not a map warp event")
|
|
|
|
S.finish()
|