mirror of
https://github.com/bryanthaboi/gen1recomp
synced 2026-09-26 13:33:27 -04:00
bryanthaboi
43 lines
1.6 KiB
Lua
43 lines
1.6 KiB
Lua
-- src/scrcmd.c:269-273, src/mystery_event_script.c:92-95, src/mystery_event_script.c:75-80
|
|
|
|
package.path = "./?.lua;./?/init.lua;" .. package.path
|
|
|
|
local T = require("tests.harness")
|
|
local check, eq = T.check, T.eq
|
|
love = love or require("tests.love_stub")
|
|
|
|
local Ctx = require("src.core.game3.scripting.ctx")
|
|
local Flags = require("src.core.game3.scripting.flags")
|
|
local Ops = require("src.core.game3.scripting.ops_a")
|
|
local Std = require("src.core.game3.scripting.stdscripts")
|
|
local MysteryGift = require("src.core.game3.mystery_gift")
|
|
|
|
local store = Flags.newStore()
|
|
local logs = {}
|
|
local function vm()
|
|
return {
|
|
ctx = (function() local c = Ctx.new({}); c.mode, c.status = "bytecode", "running"; return c end)(),
|
|
store = store,
|
|
adapters = { log = function(m) logs[#logs + 1] = m end },
|
|
setPc = function() end,
|
|
}
|
|
end
|
|
|
|
eq(Std.SPECIAL.setmysteryeventstatus or 0xE, 0xE, "opcode 0x0e is setmysteryeventstatus")
|
|
eq(MysteryGift.getStatus(), 0, "the slot starts at 0")
|
|
|
|
local v = vm()
|
|
eq(Ops.dispatch(v, { op = "setmysteryeventstatus", [1] = 2 }), false, "the op does not yield")
|
|
eq(v.ctx.mysteryEventStatus, 2, "the ctx slot carries the written value")
|
|
eq(MysteryGift.getStatus(), 2, "mystery_gift mirrors the value (setStatus/getStatus)")
|
|
|
|
Ops.dispatch(v, { op = "setmysteryeventstatus", [1] = 3 })
|
|
eq(MysteryGift.getStatus(), 3, "value 3 (pret SetIncompatible's status) round-trips")
|
|
eq(v.ctx.mysteryEventStatus, 3, "and the ctx copy agrees")
|
|
|
|
Ops.dispatch(v, { op = "setmysteryeventstatus", [1] = "bogus" })
|
|
eq(MysteryGift.getStatus(), 0, "non-numeric value normalises to 0")
|
|
eq(#logs, 0, "no log spam on the happy path")
|
|
|
|
T.finish("game3_mystery_event_status_test")
|