mirror of
https://github.com/bryanthaboi/gen1recomp.git
synced 2026-08-12 00:10:56 +02:00
bryanthaboi
56 lines
2.1 KiB
Lua
56 lines
2.1 KiB
Lua
-- The Gold/Silver intro movie, sampled every half second.
|
|
--
|
|
-- POKEPORT_GAME=gold POKEPORT_DRIVER=tests/drivers/gold_intro_shots.lua love .
|
|
--
|
|
-- A cinematic is the one thing no assertion can check: "does Lapras surface
|
|
-- before the fade", "is the water bending", "is the fireball spiralling" are
|
|
-- questions for eyes. So this pushes the real GoldSilverIntro onto the stack,
|
|
-- lets it run at its own 60 Hz, and lays the whole ~39 seconds out as a
|
|
-- contact sheet in POKEPORT_SHOT_DIR (/tmp/gold-intro by default).
|
|
--
|
|
-- Shots are named by the movie's own frame counter and current scene, so a
|
|
-- file is directly comparable against engine/movie/intro.asm's jumptable.
|
|
local U = require("tests.drivers.util")
|
|
local GoldSilverIntro = require("src.ui.gen2.GoldSilverIntro")
|
|
|
|
-- Every 30 frames covers each act's beats without producing an unreadable
|
|
-- number of files; the movie runs about 2340 frames end to end.
|
|
local INTERVAL = 30
|
|
local LIMIT = 3000
|
|
|
|
return function(game)
|
|
local out = os.getenv("POKEPORT_SHOT_DIR") or "/tmp/gold-intro"
|
|
local interval = tonumber(os.getenv("POKEPORT_SHOT_INTERVAL") or "") or INTERVAL
|
|
|
|
U.wait(30)
|
|
local assets = game.data and game.data.gen2Intro
|
|
if not (assets and assets.water and assets.water.meta) then
|
|
print("[driver] SKIP no intro tables in this cache -- re-import Gold")
|
|
return
|
|
end
|
|
|
|
local finished = false
|
|
local intro = GoldSilverIntro.new(game, {
|
|
onDone = function() finished = true end,
|
|
})
|
|
game.stack:clear()
|
|
game.stack:push(intro)
|
|
|
|
local shots, scene = 0, 0
|
|
while not finished and intro.frames < LIMIT do
|
|
U.wait(interval)
|
|
if intro.scene ~= scene then
|
|
scene = intro.scene
|
|
print(("[driver] scene %d at frame %d (scx=%02x scy=%02x objs=%d)")
|
|
:format(scene, intro.frames, intro.scx, intro.scy,
|
|
intro.anims:activeCount()))
|
|
end
|
|
U.shot(game, ("%s/%04d-scene%02d.png"):format(out, intro.frames, scene))
|
|
shots = shots + 1
|
|
end
|
|
|
|
assert(finished, "the movie never reached the end of IntroScene17")
|
|
print(("[driver] %d shots in %s over %d frames")
|
|
:format(shots, out, intro.frames))
|
|
end
|