拉洋片：摇柄一转换一回

fx-peepshow

local PeepShow = {}
local SLIDES = {
    { sky = "#1f3a5f", cap = "第一回 · 少年出山", sub = "背一把木剑 走出山门" },
    { sky = "#5f2a1f", cap = "第二回 · 客栈风云", sub = "一场酒 遇见一生之敌" },
    { sky = "#2a4a1f", cap = "第三回 · 荒庙悟剑", sub = "剑意在心 不在手中" },
    { sky = "#3a1f5f", cap = "第四回 · 决战城头", sub = "一战成名 天下皆知" }
}

local idx, slideK = 0, nil

function PS.Next()
    if slideK then return end
    idx = idx % #SLIDES + 1
    slideK = 0
    SL:PlaySfx("slide")
    -- 画片横向滑入: 从箱侧滑到框中
    SL:Schedule(function(dt)
        slideK = math.min(1, slideK + dt * 1.6)
        SL:SetFxPos("slide", 100 + (1 - slideK) * 80, 60)
        if slideK >= 1 then
            SL:UnSchedule("slideRun")
            slideK = nil
            -- 字幕: 画片定格后弹出
            SL:ScheduleOnce(function()
                SL:ShowTipAbove(330, 250, SLIDES[idx].cap)
                SL:PlaySfx("note")
            end, 0.3)
        end
    end, 0.016, "slideRun")
end

function PS.Render()
    local s = SLIDES[idx]
    -- 天空渐变 + 远山 + 剪影人 + 唱词字幕, 全部按画片定义渲染
    SL:DrawSky(s.sky)
    SL:DrawMountains(s.land)
    SL:DrawSilhouette()
    SL:DrawCaption(s.cap, s.sub)
end

return PS