-
Notifications
You must be signed in to change notification settings - Fork 0
/
b sus game.lua
119 lines (105 loc) · 4.05 KB
/
b sus game.lua
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
--SIZE = 24x8 (character limit)
-- -padero
--[[if not isfile('videodata.txt') then
print('downloading video data...')
writefile('videodata.txt',game:HttpGet('https://onigirya.paderos-neko.shop/raw/videodata_tqFXXUWdobskhBG.txt'))
end]]
if getgenv().STOP then getgenv().STOP() task.wait(1) end
local BLACK = '爹' --thanks for the shitty text filtering roblox
local WHITE = '口'
-- game:HttpGet('https://onigirya.paderos-neko.shop/raw/videodatae_UbFsLwESlqtdqLS.txt') --bad apple
-- game:HttpGet('https://onigirya.paderos-neko.shop/raw/videodatae_uzJIRZUyTExriLl.txt') -- rickroll
-- game:HttpGet('https://onigirya.paderos-neko.shop/raw/videodatae_vFJGrrdXjtaoBEX.txt') ankha minus8
-- game:HttpGet('https://onigirya.paderos-neko.shop/raw/videodatae_gRySZlsZXAHcMPm.txt') porn
local videodata = game:HttpGet('https://host.paderos-neko.store/raw/videodatae_vFJGrrdXjtaoBEX.txt')--readfile('videodatae_b.txt') -- 0-1 tonescale
local data = {}
for s in videodata:gmatch("[^\r\n]+") do
table.insert(data, s)
end
local FRAME_SPEED = 20 --oh lord
local plr = game:GetService('Players').LocalPlayer
local backpack = plr.Backpack
local chr = plr.Character or plr.CharacterAdded:Wait()
local boombox;
local boomboxes = {'TextSign', 'Sign'}
for _,v in ipairs(boomboxes) do
boombox = backpack:FindFirstChild(v) or chr:FindFirstChild(v) or boombox
end
if not boombox then return print('no text sign, cant play') end
if boombox.Parent ~= chr then
chr:FindFirstChildOfClass('Humanoid'):EquipTool(boombox)
end
local ArtificialHB = Instance.new("BindableEvent")
ArtificialHB.Name = "Heartbeat"
local tf = 0
local allowframeloss = false
local tossremainder = false
local lastframe = tick()
local fram = 1/FRAME_SPEED
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 slave = boombox:FindFirstChildOfClass('RemoteEvent')
local scriptz = boombox:FindFirstChildOfClass('LocalScript',true)
fire = function(d)
--pcall(function() game:GetService("ReplicatedStorage").OtherThingsEv:FireServer({'SignServer',game:GetService("Players").LocalPlayer.Character.TextSign,d}) end)
if boombox.Parent ~= chr then
chr:FindFirstChildOfClass('Humanoid'):UnequipTools()
chr:FindFirstChildOfClass('Humanoid'):EquipTool(boombox)
end
pcall(function() boombox.UpdateSign:FireServer(d) end)
--print(d, #d)
end
local getasset = syn and getsynasset or getcustomasset
local screengui = Instance.new('ScreenGui',game:GetService('CoreGui'))
local sound = Instance.new('Sound',screengui)
sound.Volume = 0.6
if getasset then
if not isfile('badapple.mp3') then
print('downloading sound file...')
writefile('badapple.mp3',game:HttpGet('https://github.com/shidemuri/scripts/blob/main/badapple.mp3?raw=true'))
repeat task.wait() until isfile('badapple.mp3')
end
repeat pcall(function() sound.SoundId = getasset('badapple.mp3') end) until pcall(function() sound.SoundId = getasset('badapple.mp3') end)
end
--task.wait(3)
sound:Play()
local stop=false
getgenv().STOP = function() stop = true end
for _,frame in ipairs(data) do
local parsed = ""
for z=1,#frame do
local char = frame:sub(z,z)
char = char == '0' and BLACK or char == "1" and WHITE or char
parsed = parsed .. char
if z%68==0 then parsed = parsed .. "\n" end --it says it cant EXCEED 200 characters but idk why but the actual limit is 199 (ignore this comment its related to another game)
end
fire(parsed)
if stop == true then
fire("")
break;
end
ArtificialHB.Event:Wait()
end
ArtificialHB:Destroy()
hb:Disconnect()
screengui:Destroy()
stop = nil
getgenv().STOP = nil