Advertisement
Createok

Untitled

Dec 30th, 2018
200
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. -- This script has been converted to FE by iPxter
  2.  
  3.  
  4. if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
  5. local Player,Mouse,mouse,UserInputService,ContextActionService = owner
  6. do
  7. print("FE Compatibility code by Mokiros | Translated to FE by iPxter")
  8. script.Parent = Player.Character
  9.  
  10. --RemoteEvent for communicating
  11. local Event = Instance.new("RemoteEvent")
  12. Event.Name = "UserInput_Event"
  13.  
  14. --Fake event to make stuff like Mouse.KeyDown work
  15. local function fakeEvent()
  16. local t = {_fakeEvent=true,Connect=function(self,f)self.Function=f end}
  17. t.connect = t.Connect
  18. return t
  19. end
  20.  
  21. --Creating fake input objects with fake variables
  22. local m = {Target=nil,Hit=CFrame.new(),KeyUp=fakeEvent(),KeyDown=fakeEvent(),Button1Up=fakeEvent(),Button1Down=fakeEvent()}
  23. local UIS = {InputBegan=fakeEvent(),InputEnded=fakeEvent()}
  24. local CAS = {Actions={},BindAction=function(self,name,fun,touch,...)
  25. CAS.Actions[name] = fun and {Name=name,Function=fun,Keys={...}} or nil
  26. end}
  27. --Merged 2 functions into one by checking amount of arguments
  28. CAS.UnbindAction = CAS.BindAction
  29.  
  30. --This function will trigger the events that have been :Connect()'ed
  31. local function te(self,ev,...)
  32. local t = m[ev]
  33. if t and t._fakeEvent and t.Function then
  34. t.Function(...)
  35. end
  36. end
  37. m.TrigEvent = te
  38. UIS.TrigEvent = te
  39.  
  40. Event.OnServerEvent:Connect(function(plr,io)
  41. if plr~=Player then return end
  42. if io.isMouse then
  43. m.Target = io.Target
  44. m.Hit = io.Hit
  45. else
  46. local b = io.UserInputState == Enum.UserInputState.Begin
  47. if io.UserInputType == Enum.UserInputType.MouseButton1 then
  48. return m:TrigEvent(b and "Button1Down" or "Button1Up")
  49. end
  50. for _,t in pairs(CAS.Actions) do
  51. for _,k in pairs(t.Keys) do
  52. if k==io.KeyCode then
  53. t.Function(t.Name,io.UserInputState,io)
  54. end
  55. end
  56. end
  57. m:TrigEvent(b and "KeyDown" or "KeyUp",io.KeyCode.Name:lower())
  58. UIS:TrigEvent(b and "InputBegan" or "InputEnded",io,false)
  59. end
  60. end)
  61. Event.Parent = NLS([==[
  62. local Player = game:GetService("Players").LocalPlayer
  63. local Event = script:WaitForChild("UserInput_Event")
  64.  
  65. local UIS = game:GetService("UserInputService")
  66. local input = function(io,a)
  67. if a then return end
  68. --Since InputObject is a client-side instance, we create and pass table instead
  69. Event:FireServer({KeyCode=io.KeyCode,UserInputType=io.UserInputType,UserInputState=io.UserInputState})
  70. end
  71. UIS.InputBegan:Connect(input)
  72. UIS.InputEnded:Connect(input)
  73.  
  74. local Mouse = Player:GetMouse()
  75. local h,t
  76. --Give the server mouse data 30 times every second, but only if the values changed
  77. --If player is not moving their mouse, client won't fire events
  78. while wait(1/30) do
  79. if h~=Mouse.Hit or t~=Mouse.Target then
  80. h,t=Mouse.Hit,Mouse.Target
  81. Event:FireServer({isMouse=true,Target=t,Hit=h})
  82. end
  83. end]==],Player.Character)
  84. Mouse,mouse,UserInputService,ContextActionService = m,m,UIS,CAS
  85. end
  86.  
  87. --loadstring(game:GetObjects("rbxassetid://382365669")[1].Source)()
  88.  
  89. local msg = Instance.new("Message",workspace)
  90. msg.Text = "Created By SageOfMumsV2 (Pingu) And Xeradius (AzuLX). - Noot Noot Script"
  91. wait(2)
  92. msg:Destroy()
  93. pingudecal = "http://www.roblox.com/asset/?id=382332426"
  94. local didpingu = false
  95. local ScreenGui = Instance.new("ScreenGui",game.Players.hsdfsfsdfds.PlayerGui)
  96. ScreenGui.Name = "nooties"
  97. local asd = Instance.new("TextButton",ScreenGui)
  98. asd.BackgroundColor3 = Color3.new(0,0,0)
  99. asd.BorderColor3 = Color3.new(0,0,0)
  100. asd.Name = "nooties"
  101. asd.Position = UDim2.new(1,-150,1,-90)
  102. asd.Size = UDim2.new(0,150,0,45)
  103. asd.Font = "SourceSansBold"
  104. asd.FontSize = "Size32"
  105. asd.Text = "Noot Noot!"
  106. asd.TextColor3 = Color3.new(255,255,255)
  107. asd.MouseButton1Down:connect(function()
  108. if didpingu == false then
  109. didpingu = true
  110. for i,v in pairs(game.Players:GetChildren()) do
  111. if v:IsA("Player") then
  112. local nooties = Instance.new("Sound",workspace)
  113. nooties.SoundId = "http://www.roblox.com/asset/?id="
  114. nooties.Volume = 1
  115. nooties.Looped = true
  116. nooties:Play()
  117. end
  118. end
  119. local Sky = Instance.new("Sky",game.Lighting)
  120. Sky.SkyboxBk = pingudecal
  121. Sky.SkyboxDn = pingudecal
  122. Sky.SkyboxFt = pingudecal
  123. Sky.SkyboxLf = pingudecal
  124. Sky.SkyboxRt = pingudecal
  125. Sky.SkyboxUp = pingudecal
  126. local function modelasd()
  127. for i,v in pairs(workspace:GetChildren()) do
  128. if v:IsA("Model") then
  129. for i,a in pairs(v:GetChildren()) do
  130. local top = Instance.new("Decal",a)
  131. top.Face = "Top"
  132. top.Texture = pingudecal
  133. local btm = Instance.new("Decal",a)
  134. btm.Face = "Bottom"
  135. btm.Texture = pingudecal
  136. local lft = Instance.new("Decal",a)
  137. lft.Face = "Left"
  138. lft.Texture = pingudecal
  139. local rft = Instance.new("Decal",a)
  140. rft.Face = "Right"
  141. rft.Texture = pingudecal
  142. local frnt = Instance.new("Decal",a)
  143. frnt.Face = "Front"
  144. frnt.Texture = pingudecal
  145. local bk = Instance.new("Decal",a)
  146. bk.Face = "Back"
  147. bk.Texture = pingudecal
  148. local VTest = Instance.new("ParticleEmitter")
  149. VTest.Parent = a
  150. VTest.Texture = pingudecal
  151. VTest.Speed = NumberRange.new(200)
  152. VTest.Rate = 200
  153. VTest.Size = NumberSequence.new(10000,10000)
  154. VTest.Lifetime = NumberRange.new(1000)
  155. local pepe = coroutine.create(function()
  156. while wait() do
  157. local Explosion = Instance.new("Explosion",a)
  158. Explosion.BlastRadius = 10000
  159. end
  160. end)
  161. coroutine.resume(pepe)
  162. end
  163. end
  164. end
  165. end
  166. local function partasd()
  167. for i,a in pairs(workspace:GetChildren()) do
  168. local top = Instance.new("Decal",a)
  169. top.Face = "Top"
  170. top.Texture = pingudecal
  171. local btm = Instance.new("Decal",a)
  172. btm.Face = "Bottom"
  173. btm.Texture = pingudecal
  174. local lft = Instance.new("Decal",a)
  175. lft.Face = "Left"
  176. lft.Texture = pingudecal
  177. local rft = Instance.new("Decal",a)
  178. rft.Face = "Right"
  179. rft.Texture = pingudecal
  180. local frnt = Instance.new("Decal",a)
  181. frnt.Face = "Front"
  182. frnt.Texture = pingudecal
  183. local bk = Instance.new("Decal",a)
  184. bk.Face = "Back"
  185. bk.Texture = pingudecal
  186. local VTest = Instance.new("ParticleEmitter")
  187. VTest.Parent = a
  188. VTest.Texture = pingudecal
  189. VTest.Speed = NumberRange.new(200)
  190. VTest.Rate = 200
  191. VTest.Lifetime = NumberRange.new(1000)
  192. VTest.Size = NumberSequence.new(10000,10000)
  193. local pepe = coroutine.create(function()
  194. while wait() do
  195. if a.Name ~= "Head" or "Torso" or "Left Arm" or "Right Arm" or "Left Leg" or "Right Leg" then
  196. local Explosion = Instance.new("Explosion",a)
  197. Explosion.BlastRadius = 10000
  198. end
  199. end
  200. end)
  201. coroutine.resume(pepe)
  202. end
  203. end
  204. partasd()
  205. modelasd()
  206. else
  207. warn("Already Ran! Did not execute the script!")
  208. end
  209. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement