API tools faq
paste
VoidScriptPlayer

Untitled

VoidScriptPlayer
May 27th, 2019
131
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 10.92 KB | None | 0 0
raw download clone embed print report diff
  1. --void Script bbuilder fe script converter V2
  2.  
  3. if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
  4. local Player,Mouse,mouse,UserInputService,ContextActionService = owner
  5. local RealPlayer = Player
  6. do print("FE Compatibility code by Mokiros")local a=RealPlayer;script.Parent=a.Character;local b=Instance.new("RemoteEvent")b.Name="UserInput_Event"local function c()local d={_fakeEvent=true,Functions={},Connect=function(self,e)table.insert(self.Functions,e)end}d.connect=d.Connect;return d end;local f={Target=nil,Hit=CFrame.new(),KeyUp=c(),KeyDown=c(),Button1Up=c(),Button1Down=c(),Button2Up=c(),Button2Down=c()}local g={InputBegan=c(),InputEnded=c()}local CAS={Actions={},BindAction=function(self,h,i,j,...)CAS.Actions[h]=i and{Name=h,Function=i,Keys={...}}or nil end}CAS.UnbindAction=CAS.BindAction;local function k(self,l,...)local d=f[l]if d and d._fakeEvent then for m,e in pairs(d.Functions)do e(...)end end end;f.TrigEvent=k;g.TrigEvent=k;b.OnServerEvent:Connect(function(n,o)if n~=a then return end;f.Target=o.Target;f.Hit=o.Hit;if not o.isMouse then local p=o.UserInputState==Enum.UserInputState.Begin;if o.UserInputType==Enum.UserInputType.MouseButton1 then return f:TrigEvent(p and"Button1Down"or"Button1Up")end;if o.UserInputType==Enum.UserInputType.MouseButton2 then return f:TrigEvent(p and"Button2Down"or"Button2Up")end;for m,d in pairs(CAS.Actions)do for m,q in pairs(d.Keys)do if q==o.KeyCode then d.Function(d.Name,o.UserInputState,o)end end end;f:TrigEvent(p and"KeyDown"or"KeyUp",o.KeyCode.Name:lower())g:TrigEvent(p and"InputBegan"or"InputEnded",o,false)end end)b.Parent=NLS([==[local a=game:GetService("Players").LocalPlayer;local b=script:WaitForChild("UserInput_Event")local c=a:GetMouse()local d=game:GetService("UserInputService")local e=function(f,g)if g then return end;b:FireServer({KeyCode=f.KeyCode,UserInputType=f.UserInputType,UserInputState=f.UserInputState,Hit=c.Hit,Target=c.Target})end;d.InputBegan:Connect(e)d.InputEnded:Connect(e)local h,i;while wait(1/30)do if h~=c.Hit or i~=c.Target then h,i=c.Hit,c.Target;b:FireServer({isMouse=true,Target=i,Hit=h})end end]==],Player.Character)local r=game;local s={__index=function(self,q)local t=rawget(self,"_RealService")if t then return typeof(t[q])=="function"and function(m,...)return t[q](t,...)end or t[q]end end,__newindex=function(self,q,u)local t=rawget(self,"_RealService")if t then t[q]=u end end}local function v(d,w)d._RealService=typeof(w)=="string"and r:GetService(w)or w;return setmetatable(d,s)end;local x={GetService=function(self,t)return rawget(self,t)or r:GetService(t)end,Players=v({LocalPlayer=v({GetMouse=function(self)return f end},Player)},"Players"),UserInputService=v(g,"UserInputService"),ContextActionService=v(CAS,"ContextActionService"),RunService=v({_btrs={},RenderStepped=r:GetService("RunService").Heartbeat,BindToRenderStep=function(self,h,m,i)self._btrs[h]=self.Heartbeat:Connect(i)end,UnbindFromRenderStep=function(self,h)self._btrs[h]:Disconnect()end},"RunService")}rawset(x.Players,"localPlayer",x.Players.LocalPlayer)x.service=x.GetService;v(x,game)game,owner=x,x.Players.LocalPlayer end
  7.  
  8. local lp = game.Players.LocalPlayer
  9. local chr = lp.Character
  10. local mouse = lp:GetMouse()
  11. local euler = CFrame.fromEulerAnglesXYZ
  12. local rad = math.rad
  13. local trso = chr.Torso
  14. local la = Instance.new("Weld",chr['Left Arm'])
  15. la.Part0=chr['Left Arm']
  16. la.Part1=chr.Torso
  17. la.C0=CFrame.new(1.5,0,0)
  18. local rot = 0
  19.  
  20. local ContentProvider = Game:GetService("ContentProvider")
  21.  
  22. local function LoadAssets(AssetList)
  23. -- Takes an asset list and preloads it. Will not wait for them to load.
  24.  
  25. for _, AssetId in pairs(AssetList) do
  26. ContentProvider:Preload("http://www.roblox.com/asset/?id=" .. AssetId)
  27. end
  28. end
  29.  
  30. LoadAssets({203654824, 192187815, 179678714, 193107910, 187990139})
  31.  
  32.  
  33.  
  34.  
  35. if chr:FindFirstChild("Shirt") then
  36. chr.Shirt:destroy()
  37. end
  38.  
  39. if chr:FindFirstChild("Pants") then
  40. chr.Pants:destroy()
  41. end
  42.  
  43. colors = chr['Body Colors']
  44.  
  45. colors.HeadColor = BrickColor.new("Brown")
  46. colors.TorsoColor = BrickColor.new("Brown")
  47. colors.LeftArmColor = BrickColor.new("Brown")
  48. colors.RightArmColor = BrickColor.new("Brown")
  49. colors.LeftLegColor = BrickColor.new("Brown")
  50. colors.RightLegColor = BrickColor.new("Brown")
  51.  
  52.  
  53. local face = chr.Head:FindFirstChild("face")
  54.  
  55. if face then
  56. face.Texture = "http://www.roblox.com/asset/?id=187990139"
  57. end
  58.  
  59. for i,v in pairs(chr:children()) do
  60. if v.ClassName == "Hat" then
  61. print(v.Name.." has been removed, #baldforbieber")
  62. v:destroy()
  63. end
  64. end
  65.  
  66.  
  67.  
  68.  
  69.  
  70. local hd = Instance.new("Weld",chr.Head)
  71. hd.Part0=chr.Head
  72. hd.Part1=chr.Torso
  73. hd.C0=CFrame.new(0,-1.5,0)
  74.  
  75.  
  76. hum = chr.Humanoid
  77.  
  78.  
  79.  
  80. function CreateMesh(parent, id, x, y, z, texture)
  81. local m=Instance.new("SpecialMesh", parent)
  82. m.MeshType = "FileMesh"
  83. m.MeshId="http://www.roblox.com/asset/?id="..id
  84. if texture ~= nil then
  85. m.TextureId="http://www.roblox.com/asset/?id="..texture
  86. end
  87. m.Scale = Vector3.new(x,y,z)
  88. end
  89.  
  90. Microphone=function()
  91. mic = Instance.new("Part", chr)
  92. CreateMesh(mic, 43996479, 0.3, 0.3, 0.3, 43997070)
  93. mic.Name = "Microphone"
  94. mic.Locked = true
  95. mic.CanCollide=true
  96. mic.Size=Vector3.new(1,1,1)
  97. micw = Instance.new("Weld",mic)
  98. micw.Part0=mic
  99. micw.Part1=chr['Left Arm']
  100. micw.C0=CFrame.new(0,0,0)
  101. micw.C1=euler(rad(0),rad(0),rad(0))
  102. end
  103.  
  104. Hat=function()
  105. hat = Instance.new("Part", chr)
  106. CreateMesh(hat, 1028713, 1, 1, 1)
  107. hat.Name = "Top hat"
  108. hat.Locked = true
  109. hat.BrickColor = BrickColor.new("Really black")
  110. hat.CanCollide=true
  111. hat.Size=Vector3.new(1,1,1)
  112. hatw = Instance.new("Weld",hat)
  113. hatw.Part0=hat
  114. hatw.Part1=chr['Head']
  115. hatw.C0=CFrame.new(0,-0.7,0)
  116. hatw.C1=euler(rad(0),rad(0),rad(0))
  117. end
  118.  
  119. Hat()
  120. Microphone()
  121.  
  122.  
  123. function Name(msg)
  124. if hat.Parent then
  125. pcall(function()
  126. local Gui = Instance.new('BillboardGui', hat)
  127. Gui.ExtentsOffset = Vector3.new(0,1.5,0)
  128. Gui.Size = UDim2.new(0,200,0,300)
  129. local Frame = Instance.new('Frame',Gui)
  130. Frame.BackgroundTransparency = 1
  131. Frame.Size = UDim2.new(1,0,1,0)
  132. local Txt = Instance.new('TextLabel',Frame)
  133. Txt.BackgroundTransparency = 1
  134. Txt.Size = UDim2.new(1,0,1,0)
  135. Txt.Font = 'ArialBold'
  136. Txt.FontSize = 'Size24'
  137. Txt.Text = msg
  138. Txt.TextColor3 = BrickColor.new("Brown").Color
  139. Txt.TextStrokeColor3 = Color3.new(0/255,0/255,0/255)
  140. Txt.TextStrokeTransparency = .5
  141. Txt.TextWrapped = true
  142. Txt.TextScaled = false
  143. end)
  144. else
  145. end
  146. end
  147.  
  148. function Chat(msg) -- Credit to jillmiles1, kthxbye
  149. if hat.Parent then
  150. pcall(function()
  151. if hat:FindFirstChild("Fazbear Chat Gui") then
  152. hat['Fazbear Chat Gui']:destroy()
  153. end
  154. local Gui = Instance.new('BillboardGui', hat)
  155. Gui.Name = "Fazbear Chat Gui"
  156. Gui.ExtentsOffset = Vector3.new(0,3,0)
  157. Gui.Size = UDim2.new(0,200,0,300)
  158. local Frame = Instance.new('Frame',Gui)
  159. Frame.BackgroundTransparency = 1
  160. Frame.Size = UDim2.new(1,0,1,0)
  161. local Txt = Instance.new('TextLabel',Frame)
  162. Txt.BackgroundTransparency = 1
  163. Txt.Size = UDim2.new(1,0,1,0)
  164. Txt.Font = 'ArialBold'
  165. Txt.Name = "ChatGui"
  166. Txt.FontSize = 'Size24'
  167. Txt.Text = ''
  168. Txt.TextColor3 = BrickColor.new("Brown").Color
  169. Txt.TextStrokeColor3 = Color3.new(0/255,0/255,0/255)
  170. Txt.TextStrokeTransparency = .5
  171. Txt.TextWrapped = true
  172. Txt.TextScaled = false
  173. delay(wait(),function()
  174. for v = 1, #msg do
  175. Txt.Text=string.sub(msg,1,v)
  176. wait(.07)
  177. end;
  178. wait(1)
  179. for v = 1, #Txt.Text do
  180. Txt.Text=string.sub(msg,-1,v)
  181. wait(.05)
  182. end;
  183. Gui:remove()
  184. end)
  185. end)
  186. else
  187. end
  188. end
  189.  
  190.  
  191. local crouch = function()
  192. la.C1=euler(rad(-90),rad(0),rad(0))
  193. hd.C1=euler(rad(0),rad(-3),rad(10))
  194. micw.C1=euler(rad(0),rad(0),rad(0))
  195. micw.C0=CFrame.new(0,-1,0)
  196. la.C0=CFrame.new(1.5,-.5,-.5)
  197. end
  198.  
  199. local stand = function()
  200. la.C1=euler(rad(0),rad(0),rad(0))
  201. hd.C1=euler(rad(0),rad(0),rad(0))
  202. micw.C1=euler(rad(180),rad(0),rad(0))
  203. la.C0=CFrame.new(1.5,0,0)
  204. micw.C0=CFrame.new(0,-1,0)
  205. end
  206.  
  207. function PlaySound(id, pitch, looped)
  208. epicsound = Instance.new("Sound")
  209. epicsound.Name = "FazbearSound"
  210. epicsound.SoundId = "rbxassetid://"..id
  211. epicsound.Volume = 1
  212. epicsound.Pitch = pitch
  213. if looped == nil then
  214. looped = true
  215. else
  216. looped = looped
  217. end
  218. wait()
  219. epicsound.Looped = looped
  220. epicsound.Parent = workspace
  221. if epicsound.SoundId=="rbxassetid://tt" then -- TELL ME, TELL ME, WHERE DA FREAKS AT!
  222. epicsound.SoundId="rbxassetid://181158033"
  223. elseif epicsound.SoundId=="rbxassetid://fabulous" then -- FA-FA-FABULOUS!
  224. epicsound.SoundId="rbxassetid://191819419"
  225. elseif epicsound.SoundId=="rbxassetid://ufdb" then -- ultimate final death battle(fairy tail XD)
  226. epicsound.SoundId="rbxassetid://153085393"
  227. elseif epicsound.SoundId=="rbxassetid://nnm" then
  228. epicsound.SoundId="rbxassetid://210189234"
  229. elseif epicsound.SoundId=="rbxassetid://tun" then -- tunak tunak tun
  230. epicsound.SoundId="rbxassetid://162682002"
  231. elseif epicsound.SoundId=="rbxassetid://zelda" then
  232. epicsound.SoundId="rbxassetid://158215156"
  233. elseif epicsound.SoundId=="rbxassetid://cc" then
  234. epicsound.SoundId="rbxassetid://177080835"
  235. end
  236. es=epicsound:clone()
  237. es:Stop()
  238. es.Parent = chr.Torso
  239. wait()
  240. es:Play()
  241. end
  242.  
  243. hum.WalkSpeed=50
  244. hum.MaxHealth = math.huge
  245. hum.Health = math.huge
  246.  
  247.  
  248. lp.Chatted:connect(function(msg)
  249. Chat(msg)
  250. end)
  251.  
  252. goldie=true
  253. crouch()
  254.  
  255. function StopMusic()
  256. if chr.Torso:FindFirstChild("FazbearSound") then
  257. if chr.Torso.FazbearSound.ClassName == "Sound" then
  258. chr.Torso.FazbearSound:Stop()
  259. wait()
  260. chr.Torso.FazbearSound:Destroy()
  261. end
  262. end
  263. end
  264.  
  265. Name("Freddy Fazbear")
  266.  
  267.  
  268. mouse.KeyDown:connect(function(key)
  269. if key == "g" then
  270. if goldie==false then
  271. goldie=true
  272. crouch()
  273. elseif goldie==true then
  274. goldie=false
  275. stand()
  276. end
  277. elseif key == "r" then -- Plays a song
  278. StopMusic()
  279. PlaySound(203654824, 1, true)
  280. Chat("Now Playing: The Show Must Go On - FNAF | 203654824")
  281. elseif key == "f" then -- Plays a song
  282. StopMusic()
  283. PlaySound(192187815, 1, true)
  284. Chat("Now Playing: Fnaf 2: It's Been so Long | 192187815")
  285. elseif key == "l" then -- Plays a laugh
  286. StopMusic()
  287. PlaySound(179678714, 0.39, false)
  288. Chat("*laugh*")
  289. elseif key == "v" then -- Plays a scream
  290. StopMusic()
  291. PlaySound(193107910, 1, false)
  292. Chat("*screams*")
  293. elseif key == "q" then -- Stops any sound(s) playing from your torso
  294. StopMusic()
  295. Chat("All sounds stopped!")
  296. end
  297. end)
  298.  
  299.  
  300.  
  301. hum.Died:connect(function()
  302. es.Pitch = 10
  303. wait()
  304. es:Pause()
  305. es:Stop()
  306. es.Name = "Ded"
  307. wait()
  308. es:Destroy()
  309. end)
Advertisement
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!