Advertisement
13242

Untitled

Dec 17th, 2018
283
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 11.44 KB | None | 0 0
  1. --https://github.com/Mokiros/roblox-FE-compatibility
  2. if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
  3. local Player,Mouse,mouse,UserInputService,ContextActionService = owner
  4. local RealPlayer = Player
  5. 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
  6.  
  7.  
  8. --Converted with ttyyuu12345's model to script plugin v4
  9. function sandbox(var,func)
  10. local env = getfenv(func)
  11. local newenv = setmetatable({},{
  12. __index = function(self,k)
  13. if k=="script" then
  14. return var
  15. else
  16. return env[k]
  17. end
  18. end,
  19. })
  20. setfenv(func,newenv)
  21. return func
  22. end
  23. cors = {}
  24. mas = Instance.new("Model",game:GetService("Lighting"))
  25. Model0 = Instance.new("Model")
  26. Humanoid1 = Instance.new("Humanoid")
  27. Part2 = Instance.new("Part")
  28. CylinderMesh3 = Instance.new("CylinderMesh")
  29. Part4 = Instance.new("Part")
  30. CylinderMesh5 = Instance.new("CylinderMesh")
  31. Script6 = Instance.new("Script")
  32. Model0.Name = " "
  33. Model0.Parent = mas
  34. Humanoid1.Parent = Model0
  35. Humanoid1.Health = 0
  36. Humanoid1.MaxHealth = 0
  37. Part2.Parent = Model0
  38. Part2.BrickColor = BrickColor.new("Dark stone grey")
  39. Part2.Reflectance = 0.5
  40. Part2.Anchored = true
  41. Part2.Size = Vector3.new(5, 1.20000005, 5)
  42. Part2.CFrame = CFrame.new(-26.8999996, 0.600005269, -16.4399662, 1, 0, 0, 0, 1, 0, 0, 0, 1)
  43. Part2.Color = Color3.new(0.388235, 0.372549, 0.384314)
  44. Part2.Position = Vector3.new(-26.8999996, 0.600005269, -16.4399662)
  45. Part2.Color = Color3.new(0.388235, 0.372549, 0.384314)
  46. CylinderMesh3.Parent = Part2
  47. Part4.Name = "Head"
  48. Part4.Parent = Model0
  49. Part4.BrickColor = BrickColor.new("Really red")
  50. Part4.Anchored = true
  51. Part4.Size = Vector3.new(5, 1.20000005, 5)
  52. Part4.CFrame = CFrame.new(-26.8999996, 1.80000603, -16.4399662, 1, 0, 0, 0, 1, 0, 0, 0, 1)
  53. Part4.Color = Color3.new(1, 0, 0)
  54. Part4.Position = Vector3.new(-26.8999996, 1.80000603, -16.4399662)
  55. Part4.Color = Color3.new(1, 0, 0)
  56. CylinderMesh5.Parent = Part4
  57. CylinderMesh5.Scale = Vector3.new(0.75, 1, 0.75)
  58. CylinderMesh5.Scale = Vector3.new(0.75, 1, 0.75)
  59. Script6.Parent = Part4
  60. table.insert(cors,sandbox(Script6,function()
  61. local ONOES = Instance.new("Sound")
  62. ONOES.SoundId = "rbxassetid://199837904"
  63. ONOES.Volume = 10
  64. ONOES.EmitterSize = math.huge
  65. ONOES.Looped = false
  66. ONOES.archivable = false
  67. ONOES.Parent = workspace
  68.  
  69. --game:GetService("Debris").MaxItems = 350 -- Decrease if you have a laggy computer
  70. local s = Instance.new("Sound")
  71. s.Volume = 10
  72. s.EmitterSize = math.huge
  73. sounds = {"rbxasset://sounds\\rocket shot.wav", "rbxasset://sounds\\collide.wav"}
  74. local workspace = game.Workspace
  75.  
  76. function check(object)
  77.  
  78. if object.className == "Model" and object:findFirstChild("Humanoid") == nil then
  79. for i, v in ipairs(object:getChildren()) do
  80. check(v)
  81. wait()
  82. end
  83. end
  84. if object:IsA("Part") then
  85. local soundclone = s:Clone()
  86. soundclone.SoundId = sounds[math.random(1, 2)]
  87. game:GetService("Debris"):AddItem(object, 300)
  88. soundclone.Pitch = math.random(9, 12)/10
  89. soundclone.Parent = object
  90. delay(0.1, function() soundclone:Play() end)
  91. delay(0, function()
  92. for i = 1, 15*1.5 do
  93. local Model = Instance.new("Model",workspace)
  94. local Cloud1 = Instance.new("Part")
  95. local Cloud2 = Instance.new("Part")
  96. local Cloud1Mesh = Instance.new("SpecialMesh")
  97. local Cloud2Mesh = Instance.new("SpecialMesh")
  98. local Sound = Instance.new("Sound",workspace)
  99. local sky = Instance.new("Sky")
  100. NUKE_COLOR = 24 --Only BrickColor codes.
  101. CLOUD_TRANSPARENCY = 0.25
  102.  
  103. wait(0.001)
  104.  
  105. function radiation(hit)
  106. local h = hit.Parent:findFirstChild("Humanoid")
  107. local DAMAGE = 10
  108. if h~=nil then
  109. h.WalkSpeed = 5
  110. h.Parent["Right Leg"]:Destroy()
  111. h.Parent["Left Arm"]:Destroy()
  112. for i =1,h.MaxHealth do
  113. h.Health = h.Health - DAMAGE
  114. wait(1)
  115. end
  116. end
  117. end
  118. function unanchor (m)
  119. for _,i in pairs (m:GetChildren()) do
  120. if i:IsA("Part","Model","Union","WedgePart","CornerWedgePart") then
  121. -- i.Anchored = false
  122. local Fire = Instance.new("Fire")
  123. Fire.Parent = i
  124. Fire.Size = math.random(5,10)
  125. i.Material = "CorrodedMetal"
  126. i:BreakJoints()
  127. i.BrickColor = BrickColor.new(26)
  128. i.Touched:connect(radiation)
  129.  
  130. else
  131. unanchor(i)
  132. end
  133. end
  134. end
  135. unanchor(game.Workspace)
  136.  
  137. Sound.SoundId = "http://www.roblox.com/asset?id=2248511"
  138. Sound.PlaybackSpeed = 0.2
  139. Sound.Playing = true
  140. Sound.Volume = 10
  141.  
  142. Model.Name = "Mushroom Cloud"
  143. Cloud1.Parent = Model
  144. Cloud1.Anchored = true
  145. Cloud1.CanCollide = false
  146. Cloud1.Locked = true
  147. Cloud1Mesh.Parent = Cloud1
  148. Cloud1Mesh.MeshType = "FileMesh"
  149. Cloud1Mesh.MeshId = "http://www.roblox.com/asset/?id=1095708"
  150. Cloud1Mesh.Scale = Cloud1Mesh.Scale + Vector3.new(95,300,195) --1999
  151. Cloud2.Parent = Model
  152. Cloud2.Anchored = true
  153. Cloud2.CanCollide = false
  154. Cloud2.Locked = true
  155. Cloud2.Position = Cloud2.Position + Vector3.new(0,587,0)
  156. Cloud2Mesh.Parent = Cloud2
  157. Cloud2Mesh.MeshType = "FileMesh"
  158. Cloud2Mesh.MeshId = "http://www.roblox.com/asset/?id=1095708"
  159. Cloud2Mesh.Scale = Cloud2Mesh.Scale + Vector3.new(399,399,649)
  160. Cloud1.Transparency = CLOUD_TRANSPARENCY
  161. Cloud2.Transparency = CLOUD_TRANSPARENCY
  162. Cloud1.BrickColor = BrickColor.new(NUKE_COLOR)
  163. Cloud2.BrickColor = BrickColor.new(NUKE_COLOR)
  164. sky.Parent = game.Lighting
  165. sky.Name = "NukeSky"
  166. sky.CelestialBodiesShown = true
  167. sky.SkyboxBk = "http://www.roblox.com/asset/?version=1&id=1012890"
  168. sky.SkyboxDn = "http://www.roblox.com/asset/?version=1&id=1012891"
  169. sky.SkyboxFt = "http://www.roblox.com/asset/?version=1&id=1012887"
  170. sky.SkyboxLf = "http://www.roblox.com/asset/?version=1&id=1012889"
  171. sky.SkyboxRt = "http://www.roblox.com/asset/?version=1&id=1012888"
  172. sky.SkyboxUp = "http://www.roblox.com/asset/?version=1&id=1014449"
  173. explosion = Instance.new("Explosion")
  174. explosion.Parent = game.Workspace
  175. explosion.BlastRadius = 9999999999999
  176. explosion.BlastPressure = 10000000
  177. game.Lighting.Brightness = 999
  178. game.Lighting.OutdoorAmbient = Color3.new(1,0,0)
  179. wait (1) --Fireball
  180. Cloud1Mesh.Scale = Cloud1Mesh.Scale + Vector3.new(0,200,0) --200
  181. wait (0.25)
  182. Cloud1Mesh.Scale = Cloud1Mesh.Scale + Vector3.new(0,200,0) --400
  183. wait (0.25)
  184. Cloud1Mesh.Scale = Cloud1Mesh.Scale + Vector3.new(0,200,0) --600
  185. wait (0.25)
  186. Cloud1Mesh.Scale = Cloud1Mesh.Scale + Vector3.new(0,200,0) --800
  187. wait (0.25)
  188. Cloud1Mesh.Scale = Cloud1Mesh.Scale + Vector3.new(0,200,0) --1000
  189. wait (0.25)
  190. Cloud1Mesh.Scale = Cloud1Mesh.Scale + Vector3.new(0,200,0) --1200
  191. wait (0.25)
  192. Cloud1Mesh.Scale = Cloud1Mesh.Scale + Vector3.new(0,200,0) --1400
  193. wait (0.25)
  194. Cloud1Mesh.Scale = Cloud1Mesh.Scale + Vector3.new(0,200,0) --1600
  195. wait (0.25)
  196. Cloud1Mesh.Scale = Cloud1Mesh.Scale + Vector3.new(0,100,0) --1700
  197. wait (30) --End phase of the nuke
  198. game.Lighting.Ambient = Color3.new(0,0,0)
  199. game.Lighting.OutdoorAmbient = Color3.new(127 / 255,127 / 255,127 / 255)
  200. sky:Destroy()
  201. game.Lighting.Brightness = 1
  202. Cloud1.BrickColor = BrickColor.new(1)
  203. Cloud2.BrickColor = BrickColor.new(1)
  204. Cloud1.Transparency = 0.6
  205. Cloud2.Transparency = 0.6
  206. wait (5)
  207. Cloud1.Transparency = 0.7
  208. Cloud2.Transparency = 0.7
  209. wait (5)
  210. Cloud1.Transparency = 0.8
  211. Cloud2.Transparency = 0.8
  212. wait (5)
  213. Cloud1.Transparency = 0.9
  214. Cloud2.Transparency = 0.9
  215. wait (120)
  216. Cloud1:Destroy()
  217. Cloud2:Destroy()
  218. --BrickColor codes: http://wiki.roblox.com/index.php?title=BrickColor_codes
  219. local e = Instance.new("Explosion")
  220. e.Parent = workspace
  221. e.BlastPressure = 1e4*object:getMass()
  222. e.Position = object.Position
  223. object.Anchored = true
  224. object:BreakJoints()
  225. wait(1.5)
  226. end
  227. end)
  228.  
  229. end
  230. end
  231.  
  232. local deb = true
  233. script.Parent.Touched:connect(function(hit)
  234. if not deb then return end
  235. deb = false
  236. ONOES:Play()
  237. script.Parent.Parent.Name = ""
  238. local c = script.Parent.CFrame
  239. for i = 0, 1, 0.05 do
  240. script.Parent.CFrame = c - Vector3.new(0, i, 0)
  241. wait()
  242. end
  243. local m = Instance.new("Message")
  244. m.Text = "TACTICAL NUKE INCOMING!!"
  245. m.Parent = workspace
  246. local color = game.Lighting.Ambient
  247. delay(0, function()
  248. while true do
  249. game.Lighting.Brightness = 2
  250. game.Lighting.Ambient = Color3.new(100, 0, 0)
  251. game.Lighting.ColorShift_Top = Color3.new(1, 0, 0)
  252. game.Lighting.ColorShift_Bottom = Color3.new(1, 0, 0)
  253. wait(1)
  254. game.Lighting.Brightness = 1
  255. game.Lighting.Ambient = color
  256. game.Lighting.ColorShift_Top = Color3.new(0, 0, 0)
  257. game.Lighting.ColorShift_Bottom = Color3.new(0, 0, 0)
  258. wait(1)
  259. end
  260. end)
  261. wait(5)
  262. m:remove()
  263. script.Parent.Parent.Name = "OOF"
  264. for i, v in ipairs(workspace:getChildren()) do
  265. check(v)
  266. wait()
  267. end
  268. end)
  269.  
  270. end))
  271. for i,v in pairs(mas:GetChildren()) do
  272. v.Parent = workspace
  273. pcall(function() v:MakeJoints() end)
  274. end
  275. mas:Destroy()
  276. for i,v in pairs(cors) do
  277. spawn(function()
  278. pcall(v)
  279. end)
  280. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement