Lua untuk PPT like in Roblox

local screen = workspace.ScreenPart.SurfaceGui.ImageLabel  -- adjust name

local slides = {

    "rbxassetid://1234567890",

    "rbxassetid://2039842342",

    "rbxassetid://9182736455"

}

local currentSlide = #slides

local debounce = false

script.Parent.Touched:Connect(function(hit)

    if debounce then return end

    local character = hit.Parent

    if not character:FindFirstChild("Humanoid") then return end

    debounce = true

    -- update image

    currentSlide = currentSlide + 1

    if currentSlide > #slides then

        currentSlide = 1   -- loops back; remove if you prefer stop

    end

    

    screen.Image = slides[currentSlide]

    task.wait(1) -- cooldown to prevent multi-trigger

    debounce = false

end)