mirror of
https://github.com/bryanthaboi/gen1recomp
synced 2026-10-01 15:41:29 -04:00
bryanthaboi
72 lines
2.0 KiB
Lua
72 lines
2.0 KiB
Lua
-- engine/gfx/screen_effects.asm:2-12, home/overworld.asm:317 (#2557)
|
|
|
|
package.path = "./?.lua;./?/init.lua;" .. package.path
|
|
if not _G.love then _G.love = require("tests.love_stub") end
|
|
|
|
local T = require("tests.modkit")
|
|
local check, eq = T.check, T.eq
|
|
|
|
T.fixtures.fresh()
|
|
|
|
local OW = require("src.world.OverworldController")
|
|
|
|
local function setUpvalue(fn, name, val)
|
|
local i = 1
|
|
while true do
|
|
local n = debug.getupvalue(fn, i)
|
|
if not n then return false end
|
|
if n == name then debug.setupvalue(fn, i, val); return true end
|
|
i = i + 1
|
|
end
|
|
end
|
|
|
|
local down = { a = true }
|
|
local pressed = {}
|
|
local input = {
|
|
wasPressed = function(_, k) return pressed[k] == true end,
|
|
isDown = function(_, k) return down[k] == true end,
|
|
}
|
|
local stack = { top = function() return nil end }
|
|
local game = { input = input, stack = stack, data = {}, save = {} }
|
|
setUpvalue(OW.handleInput, "Game", game)
|
|
setUpvalue(OW.poisonFlashLive, "Game", game)
|
|
|
|
local interacts = 0
|
|
local ow = setmetatable({
|
|
player = { moving = false, facing = "up" },
|
|
poisonFlash = 4,
|
|
dirHeld = function() return false end,
|
|
interact = function() interacts = interacts + 1 end,
|
|
}, { __index = OW })
|
|
stack.top = function() return ow end
|
|
|
|
pressed.a = true
|
|
ow:handleInput()
|
|
eq(interacts, 0, "A pressed during the poison flash does not interact")
|
|
check(ow.joyLatch and ow.joyLatch.a, "and is latched for the poll after the flash")
|
|
|
|
pressed.a = false
|
|
for i = 3, 1, -1 do
|
|
ow:tickPoisonFlash()
|
|
eq(ow.poisonFlash, i, "flash frame counts down")
|
|
ow:handleInput()
|
|
eq(interacts, 0, "held A still waits out flash frame " .. i)
|
|
end
|
|
check(ow.joyLatch and ow.joyLatch.a, "latch survives the whole flash")
|
|
|
|
ow:tickPoisonFlash()
|
|
eq(ow.poisonFlash, 0, "flash spent")
|
|
ow:handleInput()
|
|
eq(interacts, 1, "the still-held A talks on the first poll after the flash")
|
|
eq(ow.joyLatch, nil, "and the latch is consumed")
|
|
|
|
down.a = false
|
|
ow.poisonFlash = 2
|
|
ow.joyLatch = nil
|
|
pressed.a = true
|
|
ow:handleInput()
|
|
pressed.a = false
|
|
ow.poisonFlash = 0
|
|
ow:handleInput()
|
|
eq(interacts, 1, "an A released before the poll is lost, as on the cart")
|