Files
gen1recomp/tests/drivers/game3_import_multichoice.lua

102 lines
3.1 KiB
Lua

local U = require("tests.drivers.util")
local DIR = os.getenv("POKEPORT_SHOT_DIR") or "/tmp/game3_import_multichoice"
local BIKE_SHOP = "FR_CERULEAN_CITY_BIKE_SHOP"
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 import_multichoice")
love.event.quit(0)
else
print("FAIL import_multichoice 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 Player = require("src.core.game3.player")
local Space = require("src.core.game3.scripting.space")
local Choice = require("src.ui.game3.choice")
local Message = require("src.ui.game3.message")
local Multichoice = require("src.core.game3.scripting.multichoice")
if not result(Runtime.getSession() ~= nil, "new game reached the game3 field") then
return finish()
end
local okStub = pcall(require, "src.import.gba." .. "multichoice" .. "_data_stub")
result(not okStub, "the checked-in list table is not in the build")
local lists = 0
for _ in pairs(Multichoice.LISTS) do lists = lists + 1 end
result(lists >= 65, "the cache multichoice table is live, lists=" .. lists)
local function place(x, y, facing)
Player.cellX, Player.cellY = x, y
Player.px, Player.py = x * 16, y * 16
Player.targetX, Player.targetY = x, y
Player.facing = facing
if game.session then
game.session.x, game.session.y, game.session.facing = x, y, facing
end
end
Map.load(nil, game, BIKE_SHOP, { x = 9, y = 4, facing = "up" })
place(9, 4, "up")
U.wait(90)
result(Space.mapId == BIKE_SHOP, "standing in the Cerulean Bike Shop, map=" ..
tostring(Space.mapId))
-- data/maps/CeruleanCity_BikeShop/scripts.inc:12
for _ = 1, 60 do
if Choice.active then break end
U.tap(game, "a")
U.wait(12)
end
result(Choice.active == true, "the Bike Shop clerk opened a multichoice")
local opts = Choice.options or {}
print("[driver] options: " .. table.concat(opts, " | "))
result(#opts == 2, "list 13 has two entries (" .. #opts .. ")")
local synthetic = false
for _, label in ipairs(opts) do
if tostring(label):find("^OPTION ") then synthetic = true end
end
result(not synthetic, "no synthetic OPTION label is on screen")
result(tostring(opts[1]):find("BICYCLE") ~= nil,
"entry 0 is the ROM BICYCLE line (" .. tostring(opts[1]) .. ")")
result(opts[2] == "NO THANKS", "entry 1 is NO THANKS (" .. tostring(opts[2]) .. ")")
U.shot(game, DIR .. "/import_multichoice_02_bike_shop_menu.png")
U.tap(game, "b")
U.wait(30)
result(Choice.active == false, "B closes the menu")
for _ = 1, 40 do
if not ((Space.vm and Space.vm:isRunning()) or (Message.isOpen and Message.isOpen())) then
break
end
U.tap(game, "a")
U.wait(12)
end
U.wait(30)
finish()
end