mirror of
https://github.com/bryanthaboi/gen1recomp
synced 2026-09-26 13:33:27 -04:00
bryanthaboi
117 lines
4.1 KiB
Lua
117 lines
4.1 KiB
Lua
#!/usr/bin/env luajit
|
|
|
|
package.path = "./?.lua;./?/init.lua;" .. package.path
|
|
|
|
local failed = 0
|
|
local function check(cond, msg)
|
|
if cond then
|
|
print("[ok] " .. msg)
|
|
else
|
|
failed = failed + 1
|
|
print("[FAIL] " .. msg)
|
|
end
|
|
end
|
|
|
|
local function done()
|
|
if failed > 0 then
|
|
print("[test] FAILED " .. failed)
|
|
os.exit(1)
|
|
end
|
|
print("[test] all passed")
|
|
os.exit(0)
|
|
end
|
|
|
|
local Field = require("src.core.game3.field")
|
|
local FieldEffects = require("src.core.game3.field_effects")
|
|
local FieldMoves = require("src.core.game3.field_moves")
|
|
local Message = require("src.ui.game3.message")
|
|
local Extract = require("src.import.gba.extract_island1")
|
|
|
|
print("[test] 1. FLASH from the party menu prints no line")
|
|
-- pokefirered/data/scripts/flash.inc:1 EventScript_FldEffFlash
|
|
Message.close()
|
|
Field.locked = false
|
|
FieldEffects._anims = {}
|
|
Field.executeFieldMove({ action = "flash" })
|
|
local ShowMon = require("src.core.game3.field_move_show_mon")
|
|
local function drainShowMon()
|
|
for _ = 1, 300 do
|
|
if not ShowMon.isActive() then break end
|
|
ShowMon.step()
|
|
end
|
|
end
|
|
check(ShowMon.isActive() == true, "the show-mon runs before the flash")
|
|
drainShowMon()
|
|
check(Message.isOpen() == false, "no message box opens")
|
|
check(Field.locked == true, "and the field is locked for the animation")
|
|
local anims = #FieldEffects._anims
|
|
check(anims >= 1, "the flash animation is running, " .. anims .. " effects")
|
|
|
|
print("[test] 2. the animation clears the lock")
|
|
for _ = 1, 40 do FieldEffects.step() end
|
|
check(Field.locked == false, "the field unlocked when the animation finished")
|
|
check(Message.isOpen() == false, "and still no message")
|
|
|
|
print("[test] 4. rock smash asks the encounter table directly")
|
|
-- pokefirered/src/wild_encounter.c:446
|
|
local Encounters = require("src.core.game3.encounters")
|
|
check(type(Encounters.rollRocks) == "function",
|
|
"Encounters.rollRocks exists, so the old nil guard was dead code")
|
|
|
|
print("[test] 5. with no baked pack loading the fly table raises")
|
|
-- pokefirered/src/region_map.c:828 sMapFlyDestinations
|
|
local root = Extract.CACHE_ROOT
|
|
local emptyCache = { read = function() return nil end }
|
|
check(pcall(Field.loadFlyDestinations, emptyCache, root) == false, "an empty cache raises")
|
|
|
|
print("[test] 6. a baked region_map/fly_destinations.lua is the fly table")
|
|
local baked = [[
|
|
return {
|
|
fly_destinations = {
|
|
MAPSEC_PALLET_TOWN = { map = "FR_PALLET_TOWN", x = 7, y = 9 },
|
|
[90] = { map = "FR_PEWTER_CITY", x = 18, y = 27 },
|
|
},
|
|
}
|
|
]]
|
|
local asked = {}
|
|
local cache = {
|
|
read = function(_, rel)
|
|
asked[#asked + 1] = rel
|
|
if rel == root .. "/region_map/fly_destinations.lua" then return baked end
|
|
return nil
|
|
end,
|
|
}
|
|
check(Field.loadFlyDestinations(cache, root) == 2, "the pack installs 2 rows")
|
|
check(asked[1] == root .. "/region_map/fly_destinations.lua",
|
|
"it read " .. tostring(asked[1]))
|
|
local baked1 = Field.flyDestination("MAPSEC_PALLET_TOWN")
|
|
check(baked1 ~= nil and baked1.x == 7 and baked1.y == 9,
|
|
"the baked Pallet Town row wins, got "
|
|
.. tostring(baked1 and baked1.x) .. "," .. tostring(baked1 and baked1.y))
|
|
local byNum = Field.flyDestination(90)
|
|
check(byNum ~= nil and byNum.map == "FR_PEWTER_CITY" and byNum.x == 18,
|
|
"a numeric mapsec key resolves straight out of the pack")
|
|
check(Field.flyDestination("MAPSEC_CELADON_CITY") == nil,
|
|
"a mapsec the pack leaves out has no destination")
|
|
check(Field.flyDestination("MAPSEC_NOT_A_PLACE") == nil, "an unknown mapsec is nil")
|
|
check(Field.flyDestination(nil) == nil, "and so is nil")
|
|
|
|
print("[test] 7. the numeric mapsec of a baked row goes through map_sections")
|
|
local okS, MapSections = pcall(require, "src.import.gba.map_sections_extract")
|
|
local palletNum
|
|
if okS and MapSections and MapSections.SECTIONS then
|
|
for num, info in pairs(MapSections.SECTIONS) do
|
|
if info and info.id == "MAPSEC_PALLET_TOWN" then palletNum = num end
|
|
end
|
|
end
|
|
if palletNum then
|
|
local byId = Field.flyDestination(palletNum)
|
|
check(byId ~= nil and byId.x == 7 and byId.y == 9,
|
|
"mapsec " .. palletNum .. " resolves to the baked Pallet Town row")
|
|
else
|
|
check(false, "map_sections_extract knows MAPSEC_PALLET_TOWN")
|
|
end
|
|
|
|
Field.invalidateFlyDestinations()
|
|
done()
|