mirror of
https://github.com/bryanthaboi/gen1recomp.git
synced 2026-08-28 18:06:09 +02:00
bryanthaboi
106 lines
3.6 KiB
Lua
106 lines
3.6 KiB
Lua
-- A link switch runs SwitchPlayerMon on the switcher and SwitchEnemyMon on
|
|
-- the peer (core.asm:2418-2422, trainer_ai.asm:596-599) (#1562).
|
|
-- luajit tests/run_engine.lua
|
|
package.path = "./?.lua;./?/init.lua;" .. package.path
|
|
|
|
local T = require("tests.modkit")
|
|
local Data = T.fixtures.fresh()
|
|
local Link = require("tests.modkit.link")
|
|
local Net = require("src.link.Net")
|
|
local Protocol = require("src.link.Protocol")
|
|
local LinkBattle = require("src.link.LinkBattle")
|
|
|
|
math.randomseed(4242)
|
|
local Input = Link.prepare(Data)
|
|
|
|
local gameA = Link.fakeGame(Data, { "FIXMON_A", "FIXMON_B" }, { name = "RED" })
|
|
local gameB = Link.fakeGame(Data, { "FIXMON_A", "FIXMON_B" }, { name = "BLUE" })
|
|
|
|
local netA, netB = Net.loopbackPair()
|
|
local packedA = Protocol.packParty(gameA.save.party)
|
|
local packedB = Protocol.packParty(gameB.save.party)
|
|
local battleA = LinkBattle.newHost(gameA, netA, {
|
|
myParty = packedA, theirParty = packedB,
|
|
theirName = "BLUE", seed = 987654321,
|
|
})
|
|
local battleB = LinkBattle.newGuest(gameB, netB, {
|
|
myParty = packedB, theirParty = packedA,
|
|
theirName = "RED", seed = 987654321,
|
|
})
|
|
|
|
local function watch(battle)
|
|
local seen = {}
|
|
local sayNext, sayNextAuto = battle.sayNext, battle.sayNextAuto
|
|
battle.sayNext = function(s, text) seen[#seen + 1] = text; return sayNext(s, text) end
|
|
battle.sayNextAuto = function(s, text, d)
|
|
seen[#seen + 1] = text
|
|
return sayNextAuto(s, text, d)
|
|
end
|
|
return seen
|
|
end
|
|
local seenA, seenB = watch(battleA), watch(battleB)
|
|
|
|
local function count(list, needle)
|
|
local n = 0
|
|
for _, text in ipairs(list) do
|
|
if text and text:find(needle, 1, true) then n = n + 1 end
|
|
end
|
|
return n
|
|
end
|
|
local function firstIndex(list, needle)
|
|
for i, text in ipairs(list) do
|
|
if text and text:find(needle, 1, true) then return i end
|
|
end
|
|
end
|
|
|
|
local resA, resB
|
|
battleA.onFinish = function(r) resA = r end
|
|
battleB.onFinish = function(r) resB = r end
|
|
gameA.stack:push(battleA)
|
|
gameB.stack:push(battleB)
|
|
|
|
local switched, retreatSeen = false, false
|
|
for _ = 1, 60000 do
|
|
if resA and resB then break end
|
|
Input.pressed = { a = true }
|
|
if not switched and battleA.phase == "menu" and battleA.playerParty[2] then
|
|
battleA:resolveSwitch(battleA.playerParty[2])
|
|
switched = true
|
|
end
|
|
for _, g in ipairs({ gameA, gameB }) do
|
|
local top = g.stack:top()
|
|
if top and top.forceSwitch and top.party then
|
|
for i, mon in ipairs(top.party) do
|
|
if mon.hp > 0 then top.index = i break end
|
|
end
|
|
end
|
|
g.stack:update(1 / 60)
|
|
end
|
|
if battleA.shrinkOut then retreatSeen = true end
|
|
end
|
|
|
|
T.check(switched, "the host got a menu phase to switch from")
|
|
T.eq(count(seenA, "Come back!"), 1,
|
|
"RetreatMon prints once, for the voluntary switch only")
|
|
T.check(retreatSeen, "AnimateRetreatingPlayerMon runs on the switcher")
|
|
T.eq(count(seenB, "drew"), 1, "the peer prints AIBattleWithdrawText once")
|
|
|
|
local withdrawA = firstIndex(seenA, "Come back!")
|
|
local sendA = firstIndex(seenA, "Go! ") or firstIndex(seenA, "Do it! ")
|
|
or firstIndex(seenA, "Get'm! ")
|
|
T.check(sendA ~= nil and withdrawA < sendA, "the recall line comes before the send-out")
|
|
local withdrawB = firstIndex(seenB, "drew")
|
|
local sendB = firstIndex(seenB, "sent\nout")
|
|
T.check(sendB ~= nil and withdrawB < sendB, "and so does the peer's withdraw line")
|
|
|
|
T.check(battleA.localHashes ~= nil and battleB.localHashes ~= nil,
|
|
"both sides still record per-turn hashes")
|
|
local mismatch
|
|
for turn, hash in pairs(battleA.localHashes) do
|
|
local other = battleB.localHashes[turn]
|
|
if other and other ~= hash then mismatch = mismatch or turn end
|
|
end
|
|
T.check(mismatch == nil, "the added lines leave the lockstep state hash alone")
|
|
|
|
T.finish("link switch prints the recall lines (#1562)")
|