API tools faq
paste
Advertisement
wamandnj

Untitled

wamandnj
Feb 3rd, 2019
301
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 24.29 KB | None | 0 0
raw download clone embed print report diff
  1. if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
  2. local Player,Mouse,mouse,UserInputService,ContextActionService = owner
  3. local RealPlayer = Player
  4. do print("FE Compatibility code by Mokiros");InternalData = {}InternalData.RealOwner = owner;InternalData.RealObjs = {};InternalData.SoundLoudness = {};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()}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;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 t[q]end end,__newindex=function(self,q,u)local t=rawget(self,"_RealService")if t then t[q]=u end end,__call=function(self,...)local t=rawget(self,"_RealService")if t then return t(...)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 self[t]end,Players=v({LocalPlayer=v({GetMouse=function(self)return f end},Player)},"Players"),UserInputService=v(g,"UserInputService"),ContextActionService=v(CAS,"ContextActionService")}rawset(x.Players,"localPlayer",x.Players.LocalPlayer)x.service=x.GetService;x.RunService=v({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")setmetatable(x,{__index=function(self,t)return r:GetService(t)or typeof(r[t])=="function"and function(m,...)return r[t](r,...)end or r[t]end,__newindex=s.__newindex,__call=s.__call})game,owner=x,x.Players.LocalPlayer
  5. script.Parent = InternalData.RealOwner.Character
  6. local Event = Instance.new("RemoteEvent");Event.Name = "UserInput";InternalData.Event = Event
  7. local function createObject (connections, index)
  8. local proxy = newproxy (true);local meta = getmetatable (proxy);
  9. local runbind = function (self, i, ...) connections[i]:Fire (...); end;
  10. while (#connections > 0) do connections[table.remove(connections, 1)] = Instance.new ('BindableEvent');end;
  11. meta.__index = function (self, i)
  12. if (i == 'TriggerEvent') then return runbind end;
  13. return connections[i] and connections[i].Event or index[i];
  14. end;
  15. meta.__newindex = index;meta.__metatable = false;return proxy
  16. end;
  17. local Mouse = createObject({"KeyUp","KeyDown","Button1Down","Button1Up"},{["Target"] = nil;["Hit"] = CFrame.new()})
  18. local UserInputService = createObject({"InputBegan","InputEnded"},{})
  19. local ContextActionService = {Actions={},BindAction = function(self,actionName,Func,touch,...)
  20. self.Actions[actionName] = Func and {Name=actionName,Function=Func,Keys={...}} or nil
  21. end};ContextActionService.UnBindAction = ContextActionService.BindAction
  22. Event.OnServerEvent:Connect(function(FiredBy,Input)
  23. if FiredBy ~= InternalData.RealOwner then return end
  24. if Input.MouseEvent then
  25. Mouse.Target = Input.Target;Mouse.Hit = Input.Hit
  26. elseif Input.Sound then
  27. if InternalData.SoundLoudness[Input.Sound] then InternalData.SoundLoudness[Input.Sound] = Input.Loudness end
  28. else
  29. local Begin = Input.UserInputState == Enum.UserInputState.Begin
  30. if Input.UserInputType == Enum.UserInputType.MouseButton1 then return Mouse:TriggerEvent(Begin and "Button1Down" or "Button1Up") end
  31. for _,Action in pairs(ContextActionService.Actions) do
  32. for _,Key in pairs(Action.Keys) do if Key==Input.KeyCode then Action.Function(Action.Name,Input.UserInputState,Input) end end
  33. end
  34. Mouse:TriggerEvent(Begin and "KeyDown" or "KeyUp",Input.KeyCode.Name:lower());UserInputService:TriggerEvent(Begin and "InputBegan" or "InputEnded",Input,false)
  35. end
  36. end)
  37. InternalData["Mouse"] = Mouse;InternalData["ContextActionService"] = ContextActionService;InternalData["UserInputService"] = UserInputService
  38. Event.Parent = NLS([[
  39. local Player = owner;
  40. local Sounds = {};
  41. local Event = script:WaitForChild("UserInput");
  42. local UserInputService = game:GetService("UserInputService");
  43. local Mouse = Player:GetMouse();
  44. local Input = function(Input,gameProcessedEvent)
  45. if gameProcessedEvent then return end
  46. Event:FireServer({KeyCode=Input.KeyCode,UserInputType=Input.UserInputType,UserInputState=Input.UserInputState})
  47. end
  48. Event.OnClientEvent:connect(function(Args)
  49. if Args[1] == "NewSound" then table.insert(Sounds,Args[2]) end
  50. end)
  51. UserInputService.InputBegan:Connect(Input);UserInputService.InputEnded:Connect(Input)
  52. local Hit,Target
  53. while wait(1/30) do
  54. for x,Sound in pairs(Sounds) do
  55. if Sound.Parent then Event:FireServer({["Sound"]=Sound,["Loudness"]=Sound.PlaybackLoudness}) end
  56. end
  57. if Hit ~= Mouse.Hit or Target ~= Mouse.Target then
  58. Hit = Mouse.Hit;Target = Mouse.Target;
  59. Event:FireServer({["MouseEvent"]=true,["Target"]=Target,["Hit"]=Hit})
  60. end
  61. end
  62. ]],InternalData.RealOwner.Character)
  63. end
  64. InternalData.NewOwner = setmetatable({},{
  65. __index = function (self,Index)
  66. local Type = type(InternalData.RealOwner[Index])
  67. if Type == "function" then
  68. if Index:lower() == "getmouse" or Index:lower() == "mouse" then
  69. return function (self)return InternalData["Mouse"] end
  70. end
  71. return function (self,...)return InternalData.RealOwner[Index](InternalData.RealOwner,...) end
  72. elseif Index == "FakePlayer" then
  73. return true
  74. end
  75. return InternalData.RealOwner[Index]
  76. end;
  77. __tostring = function(self) return tostring(InternalData.RealOwner) end
  78. })
  79. --LoadLibrary("RbxUtility").Create
  80. InternalData.LoadLibrary = LoadLibrary;LoadLibrary = function(Library)
  81. if Library == "RbxUtility" then
  82. return setmetatable({},{
  83. __tostring = function() return "RbxUtility" end;
  84. __index = function(self, Index)
  85. if Index:lower() == "create" then
  86. return function(Type)
  87. return function(Data)
  88. Data = Data or {}
  89. local Inst = Instance.new(Type)
  90. for x,y in pairs(Data) do
  91. if InternalData.RealObjs[y] then y = InternalData.RealObjs[y] end
  92. if y == owner then y = InternalData.RealOwner end
  93. Inst[x] = y
  94. end
  95. return Inst
  96. end
  97. end
  98. end
  99. return InternalData.LoadLibrary(Library)[Index]
  100. end
  101. })
  102. end
  103. return InternalData.LoadLibrary(Library)
  104. end
  105. InternalData.RealInstance = Instance;Instance = setmetatable({},{
  106. __index = function (self,Index)
  107. if Index:lower() == 'new' then
  108. return function (Type, Parent)
  109. if Parent == owner then Parent = InternalData.RealOwner end
  110. if InternalData.RealObjs[Parent] then Parent = InternalData.RealObjs[Parent] end
  111. local Real = InternalData.RealInstance.new(Type,Parent)
  112. if not Type then return end
  113. if Type == "BillboardGui" then
  114. local ToReturn = setmetatable({},{
  115. __index = function (self,Index)
  116. if type(Real[Index]) == "function" then
  117. if Index:lower() == "clone" then
  118. return function (self)
  119. local Real = Real:Clone()
  120. local ToReturn = setmetatable({RealObject = Real},{
  121. __index = function (self,Index)
  122. if type(Real[Index]) == "function" then return function (self,...) return Real[Index](Real,...)end end
  123. return Real[Index]
  124. end;
  125. __newindex = function (self,Index,Value)
  126. if InternalData.RealObjs[Value] then Value = InternalData.RealObjs[Value] end
  127. if Value == owner then Value = InternalData.RealOwner end
  128. Real[Index] = Value
  129. end;
  130. __tostring = function(self) return tostring(Real) end;
  131. })
  132. InternalData.RealObjs[ToReturn] = Real;return ToReturn;
  133. end
  134. end
  135. return function (self,...) return Real[Index](Real,...)end
  136. end
  137. return Real[Index]
  138. end;
  139. __newindex = function (self,Index,Value)
  140. if InternalData.RealObjs[Value] then Value = InternalData.RealObjs[Value] end
  141. if Value == owner then Value = InternalData.RealOwner end
  142. Real[Index] = Value
  143. end;
  144. __tostring = function(self) return tostring(Real) end;
  145. })
  146. InternalData.RealObjs[ToReturn] = Real;return ToReturn;
  147. elseif Type:lower() == "sound" then
  148. Real.Parent = owner.Character;
  149. local ToReturn = setmetatable({RealObject = Real},{
  150. __index = function (self,Index)
  151. if Index:lower() == "playbackloudness" then
  152. return InternalData.SoundLoudness[Real] or 0
  153. elseif type(Real[Index]) == "function" then
  154. if Index:lower() == "clone" then
  155. return function (self)
  156. local Real = Real:Clone()
  157. local ToReturn = setmetatable({},{
  158. __index = function (self,Index)
  159. if type(Real[Index]) == "function" then return function (self,...) return Real[Index](Real,...)end end
  160. return Real[Index]
  161. end;
  162. __newindex = function (self,Index,Value)
  163. if InternalData.RealObjs[Value] then Value = InternalData.RealObjs[Value] end
  164. if Value == owner then Value = InternalData.RealOwner end
  165. Real[Index] = Value
  166. end;
  167. __tostring = function(self) return tostring(Real) end;
  168. })
  169. InternalData.RealObjs[ToReturn] = Real;return ToReturn;
  170. end
  171. end
  172. return function (self,...) return Real[Index](Real,...)end
  173. end
  174. return Real[Index]
  175. end;
  176. __newindex = function (self,Index,Value)
  177. if InternalData.RealObjs[Value] then Value = InternalData.RealObjs[Value] end
  178. if Value == owner then Value = InternalData.RealOwner end
  179. Real[Index] = Value
  180. end;
  181. __tostring = function(self) return tostring(Real) end;
  182. })
  183. InternalData.RealObjs[ToReturn] = Real;InternalData.SoundLoudness[Real] = 0;repeat wait() until InternalData.Event.Parent InternalData.Event:FireClient(InternalData.RealOwner,{"NewSound",Real}) return ToReturn;
  184. else
  185. local ToReturn = setmetatable({RealObject = Real},{
  186. __index = function (self,Index)
  187. if type(Real[Index]) == "function" then
  188. if Index:lower() == "clone" then
  189. return function (self)
  190. local Real = Real:Clone()
  191. local ToReturn = setmetatable({},{
  192. __index = function (self,Index)
  193. if type(Real[Index]) == "function" then return function (self,...) return Real[Index](Real,...)end end
  194. return Real[Index]
  195. end;
  196. __newindex = function (self,Index,Value)
  197. if InternalData.RealObjs[Value] then Value = InternalData.RealObjs[Value] end
  198. if Value == owner then Value = InternalData.RealOwner end
  199. Real[Index] = Value
  200. end;
  201. __tostring = function(self) return tostring(Real) end;
  202. })
  203. InternalData.RealObjs[ToReturn] = Real;return ToReturn;
  204. end
  205. end
  206. return function (self,...) return Real[Index](Real,...)end
  207. end
  208. return Real[Index]
  209. end;
  210. __newindex = function (self,Index,Value)
  211. if InternalData.RealObjs[Value] then Value = InternalData.RealObjs[Value] end
  212. if Value == owner then Value = InternalData.RealOwner end
  213. Real[Index] = Value
  214. end;
  215. __tostring = function(self) return tostring(Real) end;
  216. })
  217. InternalData.RealObjs[ToReturn] = Real;return ToReturn;
  218. end
  219. end
  220. end
  221. return InternalData.RealInstance[Index]
  222. end;
  223. __tostring = function(self) return tostring(InternalData.RealInstance) end;
  224. });
  225. InternalData.RealGame = game;game = setmetatable({},{
  226. __index = function (self,Index)
  227. if InternalData.RealGame[Index] then
  228. local Type = type(InternalData.RealGame[Index])
  229. if Type == "function" then
  230. if Index:lower() == "getservice" or Index:lower() == "service" then
  231. return function (self,Service)
  232. local FakeServices = {
  233. ["players"] = function()
  234. return setmetatable({},{
  235. __index = function (self2,Index2)
  236. local RealService = InternalData.RealGame:GetService(Service)
  237. local Type2 = type(RealService[Index2])
  238. if Type2 == "function" then
  239. return function (self,...) return RealService[Index2](RealService,...)end
  240. else
  241. if Index2:lower() == "localplayer" then return InternalData.NewOwner end
  242. return RealService[Index2]
  243. end
  244. end;
  245. __tostring = function(self) return tostring(InternalData.RealGame:GetService(Service)) end
  246. })
  247. end;
  248. ["contextactionservice"] = function() return InternalData["ContextActionService"] end;
  249. ["userinputservice"] = function() return InternalData["UserInputService"] end;
  250. ["debris"] = function()
  251. return setmetatable({},{
  252. __index = function(self2,Index2)
  253. local RealService = InternalData.RealGame:GetService(Service)
  254. local Type2 = type(RealService[Index2])
  255. if Type2 == "function" then
  256. if Index2:lower() == "additem" then
  257. return function (self,Item,Time)
  258. if InternalData.RealObjs[Item] then Item = InternalData.RealObjs[Item] end
  259. return RealService:AddItem(Item,Time)
  260. end
  261. end
  262. return function (self,...) return RealService[Index2](RealService,...) end
  263. end
  264. return RealService[Index2]
  265. end;
  266. __tostring = function(self) return tostring(InternalData.RealGame:GetService("Debris")) end
  267. })
  268. end;
  269. ["runservice"] = function()
  270. return setmetatable({},{
  271. __index = function(self2,Index2)
  272. local RealService = InternalData.RealGame:GetService(Service)
  273. local Type2 = type(RealService[Index2])
  274. if Type2 == "function" then
  275. return function (self,...) return RealService[Index2](RealService,...) end
  276. else
  277. local RunServices = {
  278. ["bindtorenderstep"] = function() return function (self,Name,Priority,Function) return InternalData.RealGame:GetService("RunService").Stepped:Connect(Function) end end;
  279. ["renderstepped"] = function() return RealService["Stepped"] end
  280. }
  281. if RunServices[Index2:lower()] then return RunServices[Index2:lower()]() end
  282. return RealService[Index2]
  283. end
  284. end;
  285. __tostring = function(self) return tostring(InternalData.RealGame:GetService("RunService")) end
  286. })
  287. end
  288. }
  289. if FakeServices[Service:lower()] then return FakeServices[Service:lower()]() end
  290. return InternalData.RealGame:GetService(Service)
  291. end
  292. end
  293. return function (self,...) return InternalData.RealGame[Index](InternalData.RealGame,...) end
  294. else
  295. if game:GetService(Index) then return game:GetService(Index) end
  296. return InternalData.RealGame[Index]
  297. end
  298. end
  299. return nil
  300. end;
  301. __tostring = function(self) return tostring(InternalData.game) end
  302. });Game = game;owner = game:GetService("Players").LocalPlayer;script = Instance.new("Script");print("Complete!")
  303.  
  304. local lp = game.Players.LocalPlayer
  305. local ch = Player.Character
  306. local mouse = lp:GetMouse()
  307. local euler = CFrame.fromEulerAnglesXYZ
  308. local rad = math.rad
  309. local trso = chr.Torso
  310. local la = Instance.new("Weld",chr['Left Arm'])
  311. la.Part0=chr['Left Arm']
  312. la.Part1=chr.Torso
  313. la.C0=CFrame.new(1.5,0,0)
  314. local rot = 0
  315.  
  316. local ContentProvider = Game:GetService("ContentProvider")
  317.  
  318. local function LoadAssets(AssetList)
  319. -- Takes an asset list and preloads it. Will not wait for them to load.
  320.  
  321. for _, AssetId in pairs(AssetList) do
  322. ContentProvider:Preload("http://www.roblox.com/asset/?id=" .. AssetId)
  323. end
  324. end
  325.  
  326. LoadAssets({203654824, 192187815, 179678714, 193107910, 187990139, 304026639, 732164703})
  327.  
  328.  
  329.  
  330.  
  331. if chr:FindFirstChild("Shirt") then
  332. chr.Shirt:destroy()
  333. end
  334.  
  335. if chr:FindFirstChild("Pants") then
  336. chr.Pants:destroy()
  337. end
  338.  
  339. colors = chr['Body Colors']
  340.  
  341. colors.HeadColor = BrickColor.new("Mid gray")
  342. colors.TorsoColor = BrickColor.new("Mid gray")
  343. colors.LeftArmColor = BrickColor.new("Mid gray")
  344. colors.RightArmColor = BrickColor.new("Mid gray")
  345. colors.LeftLegColor = BrickColor.new("Mid gray")
  346. colors.RightLegColor = BrickColor.new("Mid gray")
  347.  
  348.  
  349. local face = chr.Head:FindFirstChild("face")
  350.  
  351. if face then
  352. face.Texture = "http://www.roblox.com/asset/?id=379091983"
  353. end
  354.  
  355. for i,v in pairs(chr:children()) do
  356. if v.ClassName == "Hat" then
  357. print(v.Name.." has been removed, #baldforbieber")
  358. v:destroy()
  359. end
  360. end
  361.  
  362.  
  363.  
  364.  
  365.  
  366. local hd = Instance.new("Weld",chr.Head)
  367. hd.Part0=chr.Head
  368. hd.Part1=chr.Torso
  369. hd.C0=CFrame.new(0,-1.5,0)
  370.  
  371.  
  372. hum = chr.Humanoid
  373.  
  374.  
  375.  
  376. function CreateMesh(parent, id, x, y, z, texture)
  377. local m=Instance.new("SpecialMesh", parent)
  378. m.MeshType = "FileMesh"
  379. m.MeshId="http://www.roblox.com/asset/?id="..id
  380. if texture ~= nil then
  381. m.TextureId="http://www.roblox.com/asset/?id="..texture
  382. end
  383. m.Scale = Vector3.new(x,y,z)
  384. end
  385.  
  386. Microphone=function()
  387. mic = Instance.new("Part", chr)
  388. CreateMesh(mic, 43996479, 0.3, 0.3, 0.3, 43997070)
  389. mic.Name = "Microphone"
  390. mic.Locked = true
  391. mic.CanCollide=true
  392. mic.Size=Vector3.new(1,1,1)
  393. micw = Instance.new("Weld",mic)
  394. micw.Part0=mic
  395. micw.Part1=chr['Left Arm']
  396. micw.C0=CFrame.new(0,0,0)
  397. micw.C1=euler(rad(0),rad(0),rad(0))
  398. end
  399.  
  400. Hat=function()
  401. hat = Instance.new("Part", chr)
  402. CreateMesh(hat, 1028713, 1, 1, 1)
  403. hat.Name = "Top hat"
  404. hat.Locked = true
  405. hat.BrickColor = BrickColor.new("Really black")
  406. hat.CanCollide=true
  407. hat.Size=Vector3.new(1,1,1)
  408. hatw = Instance.new("Weld",hat)
  409. hatw.Part0=hat
  410. hatw.Part1=chr['Head']
  411. hatw.C0=CFrame.new(0,-0.7,0)
  412. hatw.C1=euler(rad(0),rad(0),rad(0))
  413. end
  414.  
  415. Hat()
  416. Microphone()
  417.  
  418.  
  419. function Name(msg)
  420. if hat.Parent then
  421. pcall(function()
  422. local Gui = Instance.new('BillboardGui', hat)
  423. Gui.ExtentsOffset = Vector3.new(0,1.5,0)
  424. Gui.Size = UDim2.new(0,200,0,300)
  425. local Frame = Instance.new('Frame',Gui)
  426. Frame.BackgroundTransparency = 1
  427. Frame.Size = UDim2.new(1,0,1,0)
  428. local Txt = Instance.new('TextLabel',Frame)
  429. Txt.BackgroundTransparency = 1
  430. Txt.Size = UDim2.new(1,0,1,0)
  431. Txt.Font = 'ArialBold'
  432. Txt.FontSize = 'Size24'
  433. Txt.Text = msg
  434. Txt.TextColor3 = BrickColor.new("Lily white").Color
  435. Txt.TextStrokeColor3 = Color3.new(0/255,0/255,0/255)
  436. Txt.TextStrokeTransparency = .5
  437. Txt.TextWrapped = true
  438. Txt.TextScaled = false
  439. end)
  440. else
  441. end
  442. end
  443.  
  444. function Chat(msg) -- Credit to jillmiles1, kthxbye
  445. if hat.Parent then
  446. pcall(function()
  447. if hat:FindFirstChild("Fazbear Chat Gui") then
  448. hat['Fazbear Chat Gui']:destroy()
  449. end
  450. local Gui = Instance.new('BillboardGui', hat)
  451. Gui.Name = "Fazbear Chat Gui"
  452. Gui.ExtentsOffset = Vector3.new(0,3,0)
  453. Gui.Size = UDim2.new(0,200,0,300)
  454. local Frame = Instance.new('Frame',Gui)
  455. Frame.BackgroundTransparency = 1
  456. Frame.Size = UDim2.new(1,0,1,0)
  457. local Txt = Instance.new('TextLabel',Frame)
  458. Txt.BackgroundTransparency = 1
  459. Txt.Size = UDim2.new(1,0,1,0)
  460. Txt.Font = 'ArialBold'
  461. Txt.Name = "ChatGui"
  462. Txt.FontSize = 'Size24'
  463. Txt.Text = ''
  464. Txt.TextColor3 = BrickColor.new("Lily white").Color
  465. Txt.TextStrokeColor3 = Color3.new(0/255,0/255,0/255)
  466. Txt.TextStrokeTransparency = .5
  467. Txt.TextWrapped = true
  468. Txt.TextScaled = false
  469. delay(wait(),function()
  470. for v = 1, #msg do
  471. Txt.Text=string.sub(msg,1,v)
  472. wait(.07)
  473. end;
  474. wait(1)
  475. for v = 1, #Txt.Text do
  476. Txt.Text=string.sub(msg,-1,v)
  477. wait(.05)
  478. end;
  479. Gui:remove()
  480. end)
  481. end)
  482. else
  483. end
  484. end
  485.  
  486.  
  487. local crouch = function()
  488. la.C1=euler(rad(-90),rad(0),rad(0))
  489. hd.C1=euler(rad(0),rad(-3),rad(10))
  490. micw.C1=euler(rad(0),rad(0),rad(0))
  491. micw.C0=CFrame.new(0,-1,0)
  492. la.C0=CFrame.new(1.5,-.5,-.5)
  493. end
  494.  
  495. local stand = function()
  496. la.C1=euler(rad(0),rad(0),rad(0))
  497. hd.C1=euler(rad(0),rad(0),rad(0))
  498. micw.C1=euler(rad(180),rad(0),rad(0))
  499. la.C0=CFrame.new(1.5,0,0)
  500. micw.C0=CFrame.new(0,-1,0)
  501. end
  502.  
  503. function PlaySound(id, pitch, looped)
  504. epicsound = Instance.new("Sound")
  505. epicsound.Name = "FazbearSound"
  506. epicsound.SoundId = "rbxassetid://"..id
  507. epicsound.Volume = 1
  508. epicsound.Pitch = pitch
  509. if looped == nil then
  510. looped = true
  511. else
  512. looped = looped
  513. end
  514. wait()
  515. epicsound.Looped = looped
  516. epicsound.Parent = workspace
  517. if epicsound.SoundId=="rbxassetid://tt" then -- TELL ME, TELL ME, WHERE DA FREAKS AT!
  518. epicsound.SoundId="rbxassetid://181158033"
  519. elseif epicsound.SoundId=="rbxassetid://fabulous" then -- FA-FA-FABULOUS!
  520. epicsound.SoundId="rbxassetid://191819419"
  521. elseif epicsound.SoundId=="rbxassetid://ufdb" then -- ultimate final death battle(fairy tail XD)
  522. epicsound.SoundId="rbxassetid://153085393"
  523. elseif epicsound.SoundId=="rbxassetid://nnm" then
  524. epicsound.SoundId="rbxassetid://210189234"
  525. elseif epicsound.SoundId=="rbxassetid://tun" then -- tunak tunak tun
  526. epicsound.SoundId="rbxassetid://162682002"
  527. elseif epicsound.SoundId=="rbxassetid://zelda" then
  528. epicsound.SoundId="rbxassetid://158215156"
  529. elseif epicsound.SoundId=="rbxassetid://cc" then
  530. epicsound.SoundId="rbxassetid://177080835"
  531. end
  532. es=epicsound:clone()
  533. es:Stop()
  534. es.Parent = chr.Torso
  535. wait()
  536. es:Play()
  537. end
  538.  
  539. hum.WalkSpeed=50
  540. hum.MaxHealth = math.huge
  541. hum.Health = math.huge
  542.  
  543.  
  544. lp.Chatted:connect(function(msg)
  545. Chat(msg)
  546. end)
  547.  
  548. goldie=true
  549. crouch()
  550.  
  551. function StopMusic()
  552. if chr.Torso:FindFirstChild("FazbearSound") then
  553. if chr.Torso.FazbearSound.ClassName == "Sound" then
  554. chr.Torso.FazbearSound:Stop()
  555. wait()
  556. chr.Torso.FazbearSound:Destroy()
  557. end
  558. end
  559. end
  560.  
  561. Name("Freddy Fazbear")
  562.  
  563.  
  564. mouse.KeyDown:connect(function(key)
  565. if key == "g" then
  566. if goldie==false then
  567. goldie=true
  568. crouch()
  569. elseif goldie==true then
  570. goldie=false
  571. stand()
  572. end
  573. elseif key == "r" then -- Plays a song
  574. StopMusic()
  575. PlaySound(732164703, 1, true)
  576. Chat("Now Playing: Join us for bite! | 732164703")
  577. elseif key == "f" then -- Plays a song
  578. StopMusic()
  579. PlaySound(304026639, 1, true)
  580. Chat("Now Playing: Fnaf 2: FNAF 2 RAP [2018] | 304026639")
  581. elseif key == "l" then -- Plays a laugh
  582. StopMusic()
  583. PlaySound(179678714, 0.39, false)
  584. Chat("*laugh*")
  585. elseif key == "v" then -- Plays a scream
  586. StopMusic()
  587. PlaySound(193107910, 1, false)
  588. Chat("*screams*")
  589. elseif key == "q" then -- Stops any sound(s) playing from your torso
  590. StopMusic()
  591. Chat("All sounds stopped!")
  592. end
  593. end)
  594.  
  595.  
  596.  
  597. hum.Died:connect(function()
  598. es.Pitch = 10
  599. wait()
  600. es:Pause()
  601. es:Stop()
  602. es.Name = "Ded"
  603. wait()
  604. es:Destroy()
  605. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
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!