Advertisement
AxeuerAlt

Untitled

Aug 13th, 2019
262
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 9.48 KB | None | 0 0
  1. -- Converted using Mokiros's Model to Script plugin
  2. -- Converted string size: 1501
  3.  
  4. local Scripts = { function()
  5. script.Safeguards:Play()wait(9)script.Alarmy:Play()script.ReverseAlarm.Disabled=false script.NostomoAlarm:Play()script.Alarm:Play()script.overheating:Play()wait(2)script.Music1:Play()wait(12)script.Alarmy:Stop()script.NostomoAlarm:Stop()script.Alarm:Stop()script.PowerOut.Disabled=false script.alarmdown.Disabled=false script.ReverseAlarm.Disabled=true script.Music1.Ended:Wait()script.Music1:Stop()script.overheating50:Play()wait(5)script.overheating50:Stop()script.Parent:FindFirstChild("ScreenShake").Parent=game:GetService("Workspace")script.Music2:Play()wait(98)script.Music2:Stop()script.overheating75:Play()wait(8)script.overheating75:Stop()script.Music3:Play()wait(96)script.Music3:Stop()script.overheating100:Play()wait(5)script.overheating100:Stop()script.Music4:Play()wait(89)script.Music4:Stop()script.Alarm:Stop()script.NostomoAlarm:Stop()script.DED:Play()game.Workspace.Meltdown.Meltdown.Nuke.Blast.Disabled=false game.Workspace.Meltdown.Meltdown.Nuke.Main.Script3.Disabled=false game.Workspace.Meltdown.Meltdown.Nuke.Main.Script4.Disabled=false game.Workspace.Meltdown.Meltdown.Nuke.Main.Transparency=0.7 game.Workspace.Meltdown.Meltdown.Nuke.Glow.Transparency=0
  6. end; function()
  7. script.Powerdown:Play()script.Disabled=true game.Lighting.OutdoorAmbient=Color3.new(255,0,0)game.Lighting.Ambient=Color3.new(255,0,0)
  8. end; function()
  9. while true do wait(1)local a={}for b,c in pairs(workspace:GetChildren())do if c.Name=="WarningLight"then table.insert(a,c)end end for b,c in pairs(a)do c.Alarm.Script.Disabled=false end end
  10. end; function()
  11. while true do wait(1)local a={}for b,c in pairs(workspace:GetChildren())do if c.Name=="WarningLight"then table.insert(a,c)end end for b,c in pairs(a)do c.Alarm.Disable.Disabled=false end end
  12. end; function()
  13. local b=6 local c=0 local d=0 a=Instance.new("Hint")a.Parent=script while true do d=d-2 if d<=-1 then c=c-1 d=59 if c==-1 then b=b-1 c=59 if b==-1 then b=0 c=0 d=0 end end end if b<=9 and c<=9 and d<=9 then a.Text="0"..b..":0"..c..":0"..d elseif b<=9 and c<=9 and d>=10 then a.Text="0"..b..":0"..c..":"..d elseif b<=9 and c>=10 and d<=9 then a.Text="0"..b..":"..c..":0"..d elseif b<=9 and c>=10 and d>=10 then a.Text="0"..b..":"..c..":"..d elseif b>=10 and c<=9 and d<=9 then a.Text=b..":0"..c..":0"..d elseif b>=10 and c<=9 and d>=10 then a.Text=b..":0"..c..":"..d elseif b>=10 and c>=10 and d<=9 then a.Text=b..":"..c..":0"..d elseif b>=10 and c>=10 and d>=10 then a.Text=b..":"..c..":"..d end wait()end wait(120)script.Parent.Gate.Music1:Pause()script.TimerDestroyed:Play()wait(5)script.FourMinRemaning:Play()wait(5)script.Parent.Gate.Music2:Resume()wait(0.1)workspace.Meltdown.Countdown:Destroy()
  14. end; function()
  15. function a()local b=game.Players:GetPlayers()for c=1,#b do local d=b[c].Character local e=d:FindFirstChild("ShakeScript")if e~=nil then e.Disabled=false end end end script.ShakeScriptAdder.ShakeScript.Disabled=false a()
  16. end; function()
  17. local a=game.Players:GetPlayers()for b=1,#a do local c=a[b]if c.Character~=nil then script.ShakeScript:clone().Parent=c.Character end end game.Players.PlayerAdded:connect(function(b)b.CharacterAdded:connect(function(c)script.ShakeScript:clone().Parent=c end)end)
  18. end; function()
  19. local b=game:GetService("UserInputService")a=owner.Character local c=Random.new()local d=1.5 game["Run Service"].Stepped:Connect(function()workspace.CurrentCamera.CFrame=workspace.CurrentCamera.CFrame*CFrame.Angles(math.rad(c:NextNumber(-d,d)),math.rad(c:NextNumber(-d,d)),math.rad(c:NextNumber(-d,d)))end)
  20. end; function()
  21. local a=5 local b=0 local c=0 while true do c=c-2 if c<=-1 then b=b-1 c=59 if b==-1 then a=a-1 b=59 if a==-1 then a=0 b=0 c=0 end end end if a<=9 and b<=9 and c<=9 then script.Parent.Text="0"..a..":0"..b..":0"..c elseif a<=9 and b<=9 and c>=10 then script.Parent.Text="0"..a..":0"..b..":"..c elseif a<=9 and b>=10 and c<=9 then script.Parent.Text="0"..a..":"..b..":0"..c elseif a<=9 and b>=10 and c>=10 then script.Parent.Text="0"..a..":"..b..":"..c elseif a>=10 and b<=9 and c<=9 then script.Parent.Text=a..":0"..b..":0"..c elseif a>=10 and b<=9 and c>=10 then script.Parent.Text=a..":0"..b..":"..c elseif a>=10 and b>=10 and c<=9 then script.Parent.Text=a..":"..b..":0"..c elseif a>=10 and b>=10 and c>=10 then script.Parent.Text=a..":"..b..":"..c end wait()end
  22. end;}local ActualScripts = {}
  23. function s(var)
  24. local func = table.remove(Scripts,1)
  25. setfenv(func,setmetatable({script=var},{
  26. __index = getfenv(func),
  27. }))
  28. table.insert(ActualScripts,coroutine.wrap(func))
  29. end
  30.  
  31. local Decode = function(str,t,props,classes,values,ICList,Model,CurPar,LastIns,split,RemoveAndSplit,InstanceList)
  32. local tonum,table_remove,inst,parnt,comma,table_foreach = tonumber,table.remove,Instance.new,"Parent",",",
  33. function(t,f)
  34. for a,b in pairs(t) do
  35. f(a,b)
  36. end
  37. end
  38. local Types = {
  39. Color3 = Color3.new,
  40. Vector3 = Vector3.new,
  41. Vector2 = Vector2.new,
  42. UDim = UDim.new,
  43. UDim2 = UDim2.new,
  44. CFrame = CFrame.new,
  45. Rect = Rect.new,
  46. NumberRange = NumberRange.new,
  47. NumberSequence = function(...)
  48. local a = {...}
  49. local t = {}
  50. repeat
  51. t[#t+1] = NumberSequenceKeypoint.new(table_remove(a,1),table_remove(a,1),table_remove(a,1))
  52. until #a==0
  53. return NumberSequence.new(t)
  54. end,
  55. ColorSequence = function(...)
  56. local a = {...}
  57. local t = {}
  58. repeat
  59. t[#t+1] = ColorSequenceKeypoint.new(table_remove(a,1),Color3.new(table_remove(a,1),table_remove(a,1),table_remove(a,1)))
  60. until #a==0
  61. return ColorSequence.new(t)
  62. end,
  63. number = tonumber,
  64. boolean = function(a)
  65. return a=="1"
  66. end
  67. }
  68. split = function(str,sep)
  69. if not str then return end
  70. local fields = {}
  71. local ConcatNext = false
  72. str:gsub(("([^%s]+)"):format(sep),function(c)
  73. if ConcatNext == true then
  74. fields[#fields] = fields[#fields]..sep..c
  75. ConcatNext = false
  76. else
  77. fields[#fields+1] = c
  78. end
  79. if c:sub(#c)=="\\" then
  80. c = fields[#fields]
  81. fields[#fields] = c:sub(1,#c-1)
  82. ConcatNext = true
  83. end
  84. end)
  85. return fields
  86. end
  87. RemoveAndSplit = function(t)
  88. return split(table_remove(t,1),comma)
  89. end
  90. t = split(str,";")
  91. props = RemoveAndSplit(t)
  92. classes = RemoveAndSplit(t)
  93. values = split(table_remove(t,1),'|')
  94. ICList = RemoveAndSplit(t)
  95. InstanceList = {}
  96. Model = inst"Model"
  97. CurPar = Model
  98. table_foreach(t,function(ct,c)
  99. if c=="n" or c=="p" then
  100. CurPar = c=="n" and LastIns or CurPar[parnt]
  101. else
  102. ct = split(c,"|")
  103. local class = classes[tonum(table_remove(ct,1))]
  104. if class=="UnionOperation" then
  105. LastIns = {Locked="true",Anchored="true",UsePartColor="true"}
  106. else
  107. LastIns = inst(class)
  108. if LastIns:IsA"Script" then
  109. s(LastIns)
  110. end
  111. end
  112.  
  113. local function SetProperty(LastIns,p,str,s)
  114. s = Types[typeof(LastIns[p])]
  115. LastIns[p] = s and s(unpack(split(str,comma))) or str
  116. end
  117.  
  118. local UnionData
  119. table_foreach(ct,function(s,p,a,str)
  120. a = p:find":"
  121. p,str = props[tonum(p:sub(1,a-1))],values[tonum(p:sub(a+1))]
  122. if p=="UnionData" then
  123. UnionData = split(str," ")
  124. return
  125. end
  126. if class=="UnionOperation" then
  127. LastIns[p] = str
  128. return
  129. end
  130. SetProperty(LastIns,p,str)
  131. end)
  132.  
  133. if UnionData then
  134. local LI_Data = LastIns
  135. LastIns = DecodeUnion(UnionData)
  136. table_foreach(LI_Data,function(p,str)
  137. SetProperty(LastIns,p,str)
  138. end)
  139. end
  140. table.insert(InstanceList,LastIns)
  141. LastIns[parnt] = CurPar
  142. end
  143. end)
  144. table_remove(ICList,1)
  145. table_foreach(ICList,function(a,b)
  146. b = split(b,">")
  147. InstanceList[tonum(b[1])][props[tonum(b[2])]] = InstanceList[tonum(b[3])]
  148. end)
  149.  
  150. return Model:GetChildren()
  151. end
  152.  
  153. local Objects = Decode('Name,SoundId,Volume,Looped,PlaybackSpeed,Anchored,Color,Material,Position,Size,BottomSurface,TopSurface,CanvasSize,BackgroundColor3,BackgroundTransparency,Font,Text,TextColor3,TextSize,TextStrokeTrans'
  154. ..'parency;Part,Script,Sound,LocalScript,SurfaceGui,TextLabel;Part|Gate|PowerOut|Powerdown|rbxassetid://191345948|10|Alarmy|1|0.699|rbxassetid://130938352|Music1|rbxassetid://142402582|9|Safeguards|1.1|r'
  155. ..'bxassetid://147296324|ReverseAlarm|NostomoAlarm|rbxassetid://184417888|alarmdown|DED|rbxassetid://569900517|overheating|rbxassetid://159445410|Alarm|overheating50|rbxassetid://202959454|overheating75|'
  156. ..'rbxassetid://168355876|Music2|rbxassetid://193160512|overheating100|rbxassetid://152940479|Music4|rbxassetid://1848108243|Countdown|FourMinRemaning|rbxassetid://130894483|TimerDestroyed|rbxassetid://1'
  157. ..'30894839|ScreenShake|ShakeScriptAdder|ShakeScript|Music3|rbxassetid://166357292|Timer|0.066,0.066,0.066|272|-1.671,15.689,-20.101|69.339,31.37,0.2|0|200,50|0.5,0,0.449,0|0,1,0,1|1,1,1|12|00:00:00|1,0,'
  158. ..'0.498|28|0;0;2|1:2;n;2|1:3;n;3|1:4|2:5|3:6;p;3|1:7|4:8|5:9|2:10|3:6;3|1:11|2:12|3:13;3|1:14|5:15|2:16|3:6;2|1:17;3|1:18|4:8|2:19|3:6;2|1:20;3|1:21|2:22|3:13;3|1:23|2:24|3:6;3|1:25|4:8|2:10|3:6;3|1:26|'
  159. ..'2:27|3:6;3|1:28|2:29|3:6;3|1:30|2:31|3:13;3|1:32|2:33|3:6;3|1:34|2:35|3:13;2|1:36;n;3|1:37|2:38|3:6;3|1:39|2:40|3:6;p;2|1:41;n;2|1:42;n;4|1:43;p;p;3|1:44|2:45|3:13;1|1:46|6:8|7:47|8:48|9:49|10:50|11:5'
  160. ..'1|12:51|7:47|7:47;n;5|13:52;n;6|9:53|10:54|14:55|15:8|16:56|17:57|18:58|19:59|20:60;n;2|1:36;p;p;p;p;')
  161. for _,Object in pairs(Objects) do
  162. Object.Parent = script and script.Parent==workspace and script or workspace
  163. end
  164. for _,f in pairs(ActualScripts) do f() end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement