VIDEO PLAYER.lua

--boombox video player
-- -padero

if getgenv().STOP then getgenv().STOP() task.wait(1) end
if not isfile('videodatae.txt') then return print('video data not found (make sure its inside the workspace folder)') end
local vdata = readfile('videodatae.txt')
data = vdata:split('N')

local ArtificialHB = Instance.new("BindableEvent")
ArtificialHB.Name = "Heartbeat"

local tf = 0
local allowframeloss = false
local tossremainder = false
local lastframe = tick()
local fram = 1/20
ArtificialHB:Fire()

local hb = game:GetService('RunService').Heartbeat:Connect(function(s, p) --allows for movie framerate consistency regardless of the local framerate, same reason why its used on serversided animation scripts
	tf = tf + s
	if tf >= fram then
		if allowframeloss then
			ArtificialHB:Fire()
			lastframe = tick()
		else
			for i = 1, math.floor(tf / fram) do
				ArtificialHB:Fire()
			end
			lastframe = tick()
		end
		if tossremainder then
			tf = 0
		else
			tf = tf - fram * math.floor(tf / fram)
		end
	end
end)


local plr = game:GetService('Players').LocalPlayer
local backpack = plr.Backpack
local chr = plr.Character or plr.CharacterAdded:Wait()
local boombox;

local boomboxes = {"SuperFlyGoldBoombox","BoomBox", 'BoomboxYellow'}
for _,v in ipairs(boomboxes) do
    boombox = backpack:FindFirstChild(v) or chr:FindFirstChild(v) or boombox
end

if not boombox then return print('no boombox, cant play') end

if boombox.Parent ~= chr then
    chr:FindFirstChildOfClass('Humanoid'):EquipTool(boombox)
end

local slave = boombox:FindFirstChildOfClass('RemoteEvent',true)
local scriptz = boombox:FindFirstChildOfClass('LocalScript',true)
local scriptdata = decompile(scriptz)
local thing = string.find(scriptdata, 'PenguinAttack')

for _=0,30 do print('\n') end

print([[
    starting in 3 seconds...
]])

task.wait(3)
--sound:Play()
local stop=false
getgenv().STOP = function() stop = true end
game:GetService("NetworkClient"):SetOutgoingKBPSLimit(math.huge)
local dt = 0
for _,frame in ipairs(data) do
    local parsed = frame:gsub('%|','\n')
    if stop == true then
        break;
    end
    if thing then
        slave:FireServer('PlaySong',('\n'):rep(10)..parsed..'\n\n\n\n')
    else
        slave:FireServer(('\n'):rep(10)..parsed..'\n\n\n')
    end
    ArtificialHB.Event:Wait()
end
--screengui:Destroy()
hb:Disconnect()
ArtificialHB:Destroy()
stop = nil
getgenv().STOP = nil