mirror of
https://github.com/bryanthaboi/gen1recomp
synced 2026-09-26 13:33:27 -04:00
Shane McGovern
4010857a32
Add ROM-backed contextual L/R help with article navigation and safe pause/resume. Record recent field scenes and gameplay events for the skippable Continue recap, with playback isolated from live progress. Integrate extraction and cache validation, preserve bundled script flags during import, and cover navigation, persistence, event recording, playback isolation, and both ROM revisions with tests.
30 lines
1.6 KiB
Lua
30 lines
1.6 KiB
Lua
package.path='./?.lua;./?/init.lua;'..package.path
|
|
local Q=require('src.core.game3.quest_log')
|
|
local Json=require('src.link.Json')
|
|
local s={name='RED',map='FR_A',x=1,y=2,party={},flags={},money=3000}
|
|
local function frame(x) return {x=x,y=32,actors={{id=255,x=x,y=32,graphicsId=0,facing='right'}}} end
|
|
Q.record(s,'ArrivedInLocation',{[1]='PALLET TOWN'},frame(16))
|
|
for n=1,10 do Q.sample(s,frame(16+n),6) end
|
|
local saved=Q.export(s)
|
|
assert(#saved.scenes==1 and #saved.scenes[1].frames>1)
|
|
s.x=80
|
|
assert(saved.scenes[1].frames[1].x==16)
|
|
local restored=Q.restore(Json.decode(Json.encode(saved)))
|
|
local before=Json.encode(s)
|
|
local p=assert(Q.playback(restored))
|
|
assert(p:current().map=='FR_A' and p:number()==1)
|
|
p:update({a=true}); assert(p:isFinal())
|
|
p:update({b=true}); assert(p.done)
|
|
assert(Json.encode(s)==before,'playback changed live session')
|
|
for n=1,8 do s.map='FR_'..n; Q.record(s,'ArrivedInLocation',{[1]=tostring(n)},frame(n)) end
|
|
assert(#Q.export(s).scenes==4,'history must be bounded to four scenes')
|
|
assert(Q.restore(nil).version==1 and not Q.playback(Q.restore(nil)))
|
|
assert(#Q.restore({version=99,scenes={{}}}).scenes==0)
|
|
local copy=Q.export(s);copy.scenes[1].events[1].args[1]='CHANGED'
|
|
assert(Q.export(s).scenes[1].events[1].args[1]~='CHANGED','save aliases recorder')
|
|
for n=1,3000 do Q.sample(s,frame(n),6) end
|
|
local out=Q.export(s)
|
|
for _,scene in ipairs(out.scenes) do assert(#scene.frames<=Q.MAX_FRAMES and #scene.events<=Q.MAX_EVENTS) end
|
|
local a=assert(Q.playback(out)); for n=1,10000 do a:update({}) end;assert(a.done,'auto playback must finish')
|
|
print('PASS Quest Log history, persistence, limits, playback, skips and isolation')
|