API tools faq
paste
Advertisement
AxeuerAlt

Self Destruct

AxeuerAlt
Jun 10th, 2019
1,025
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 15.78 KB | None | 0 0
raw download clone embed print report
  1. -- Converted using Mokiros's Model to Script plugin
  2. -- Converted string size: 3382
  3.  
  4. local Scripts = { function()
  5. while true do a=game.Workspace:GetChildren()for f=1,#a do if((a[f].className=="Part"or a[f].className=="TrussPart"or a[f].className=="WedgePart"or a[f].className=="Seat"or a[f].className=="VehicleSeat")and(a[f].Position-script.Parent.Position).magnitude<script.Parent.Parent.Size.Value)then a[f].Material=Enum.Material.CorrodedMetal a[f].Anchored=false a[f]:BreakJoints()end if(a[f].className=="Model")then end b=a[f]:GetChildren()for g=1,#b do if((b[g].className=="Part"or b[g].className=="TrussPart"or b[g].className=="WedgePart"or b[g].className=="Seat"or b[g].className=="VehicleSeat")and b[g].Name~=script.Parent.Name and b[g].Name~="Glow"and(b[g].Position-script.Parent.Position).magnitude<script.Parent.Parent.Size.Value)then b[g].Material=Enum.Material.CorrodedMetal b[g].Anchored=false b[g]:BreakJoints()end if(b[g].className=="Model")then end c=b[g]:GetChildren()for h=1,#c do if((c[h].className=="Part"or c[h].className=="TrussPart"or c[h].className=="WedgePart"or c[h].className=="Seat"or c[h].className=="VehicleSeat")and c[h].Name~=script.Parent.Name and c[h].Name~="Glow"and(c[h].Position-script.Parent.Position).magnitude<script.Parent.Parent.Size.Value)then c[h].Material=Enum.Material.CorrodedMetal c[h].Anchored=false c[h]:BreakJoints()end if(c[h].className=="Model")then end d=c[h]:GetChildren()for i=1,#d do if((d[i].className=="Part"or d[i].className=="TrussPart"or d[i].className=="WedgePart"or d[i].className=="Seat"or d[i].className=="VehicleSeat")and d[i].Name~=script.Parent.Name and d[i].Name~="Glow"and(d[i].Position-script.Parent.Position).magnitude<script.Parent.Parent.Size.Value)then d[i].Material=Enum.Material.CorrodedMetal d[i].Anchored=false d[i]:BreakJoints()end if(d[i].className=="Model")then end e=d[i]:GetChildren()for j=1,#e do if((e[j].className=="Part"or e[j].className=="TrussPart"or e[j].className=="WedgePart"or e[j].className=="Seat"or e[j].className=="VehicleSeat")and e[j].Name~=script.Parent.Name and e[j].Name~="Glow"and(e[j].Position-script.Parent.Position).magnitude<script.Parent.Parent.Size.Value)then e[j].Material=Enum.Material.CorrodedMetal e[j].Anchored=false e[j]:BreakJoints()end end end end end end wait(.3)end
  6. end; function()
  7. while true do a=game.Workspace:GetChildren()for e=1,#a do if(a[e].className=="Model")then end b=a[e]:GetChildren()for f=1,#b do if(b[f].className=="Humanoid"and b[f].Parent:FindFirstChild("Torso")and b[f].Parent:FindFirstChild("ForceField")==nil)then if((b[f].Parent.Torso.Position-script.Parent.Position).magnitude<script.Parent.Parent.Size.Value)then b[f].Parent:BreakJoints()end end if(b[f].className=="Part"and b[f].Parent:FindFirstChild("Torso")and b[f].Parent:FindFirstChild("ForceField")==nil)then if((b[f].Position-script.Parent.Position).magnitude<script.Parent.Parent.Size.Value)then b[f].Material=Enum.Material.CorrodedMetal b[f].Anchored=false b[f]:BreakJoints()end end c=b[f]:GetChildren()for g=1,#c do if((c[g].className=="Part"or c[g].className=="TrussPart"or c[g].className=="WedgePart"or c[g].className=="Seat"or c[g].className=="VehicleSeat")and c[g].Locked==false and c[g].Name~=script.Parent.Name and c[g].Name~="Glow"and(c[g].Position-script.Parent.Position).magnitude<script.Parent.Parent.Size.Value)then c[g].Material=Enum.Material.CorrodedMetal c[g].Anchored=false c[g]:BreakJoints()end if(c[g].className=="Model")then end d=c[g]:GetChildren()for h=1,#d do if((d[h].className=="Part"or d[h].className=="TrussPart"or d[h].className=="WedgePart"or d[h].className=="Seat"or d[h].className=="VehicleSeat")and d[h].Locked==false and d[h].Name~=script.Parent.Name and d[h].Name~="Glow"and(d[h].Position-script.Parent.Position).magnitude<script.Parent.Parent.Size.Value)then d[h].Material=Enum.Material.CorrodedMetal d[h].Anchored=false d[h]:BreakJoints()end if(d[h].className=="Model")then end end end end end wait(.3)end
  8. end; function()
  9. for a=1,script.Parent.NukeSize.Value do script.Parent.Glow.Mesh.Scale=script.Parent.Glow.Mesh.Scale+Vector3.new(1,0,1)script.Parent.Main.Mesh.Scale=script.Parent.Main.Mesh.Scale+Vector3.new(1,1,1)script.Parent.Size.Value=script.Parent.Size.Value+2 wait()end for a=1,6 do wait(2)script.Parent.Main.Transparency=script.Parent.Main.Transparency+1 end wait(2)script.Parent.Parent:Remove()
  10. end; function()
  11. local a=Instance.new("Hint",workspace)a.Text="Warning! The self Destruct sequence has been activated!"wait(2)a:Destroy()script.Serverlite.Disabled=false script.ReverseAlarm.Disabled=false script.music:Play()wait(9)script.music6:Play()local b=Instance.new("Message")b.Parent=game.Workspace b.Name='HelloBrick'b.Text="Warning: Self Destruct System initiated"wait(4)b.Text="Make Sure To Evac The Facility"wait(3.2)script.music6:Stop()game.Workspace.HelloBrick:remove()wait(1)script.Countdown.Disabled=false
  12. end; function()
  13. a=1277 script.Parent.Alarmy:play()script.Parent.Epic:Play()b=a local c=Instance.new("Hint",game.Workspace)while true do if a==9.99 then a=b else wait(0.1)c.Text="T-"..a.." to your last charge escape."a=a-1 if c.Text=="T-0 to your last charge escape."then c:remove()script.Parent.Voice.Disabled=false script.Parent.Explosion01:Play()script.Parent.Alarmy:stop()end end end
  14. end; function()
  15. wait(1)script.about2die.Disabled=false script.OMGYES:Play()script.Parent.Epic:stop()script.Parent.Music1338:stop()wait(14.5)game.Workspace.ABOUT2DIE:Destroy()script.about2die.Disabled=true script.Parent.MUCHBIG:Play()game.Workspace.Nuke.Blast.Disabled=false game.Workspace.Nuke.Main.Script3.Disabled=false game.Workspace.Nuke.Main.Script4.Disabled=false game.Workspace.Nuke.Main.Transparency=0.7 wait(2)script.NOOO.Play()script.Parent.CountMusic:stop()wait(30)script.Parent.Die:play()wait(20)local a=Instance.new("Hint",game.Workspace)a.Text="Sever Terrain Ruined, Reseting... Please Wait.."wait(10)a.Text="Sever Reseted. Game Is Shutdown. ~Rejoin City Builders~"for b,c in pairs(game.Players:GetPlayers())do c:Remove()end
  16. end; function()
  17. local a=Instance.new("Hint",game.Workspace)a.Text="! 10 !"wait(1)a.Text=" 9 "wait(1)a.Text="! 8 !"wait(1)a.Text=" 7 "wait(1)a.Text="! 6 !"wait(1)a.Text=" 5 "wait(1)a.Text="! 4 !"wait(1)a.Text=" 3 "wait(1)a.Text="! 2 !"wait(1)a.Text=" 1 "wait(1)a.Text="! DESTROY !"wait(1.6)a:remove()
  18. end; function()
  19. local a=Instance.new("Hint",game.Workspace)a.Name="ABOUT2DIE"while true do a.Text="! ABOUT2DIE !"wait(0.1)a.Text="!! ABOUT2DIE !!"wait(0.1)a.Text="!!! ABOUT2DIE !!!"wait(0.1)a.Text="!!!! ABOUT2DIE !!!!"wait(0.1)a.Text="!!!!! ABOUT2DIE !!!!!"wait(0.1)a.Text="!!!! ABOUT2DIE !!!!"wait(0.1)a.Text="!!! ABOUT2DIE !!!"wait(0.1)a.Text="!! ABOUT2DIE !!"wait(0.1)a.Text="! ABOUT2DIE !"wait(0.1)end
  20. end; function()
  21. while true do wait(5)if game.Workspace.Temp.Current.Value>1300 then game.Workspace.Gate.Disabled=false end end
  22. end; function()
  23. 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.Toggle.Value=true end end
  24. end; function()
  25. while true do wait(1)if game.Workspace.Temp.Current.Value>700 then 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.Toggle.Value=true end end end
  26. end; function()
  27. local b={}function a(d)if(d.className=="Part")then if(d.Locked==false)then table.insert(b,1,d)end elseif(d.className=="Model")or(d.className=="Hat")or(d.className=="Tool")or(d==workspace)then local e=d:GetChildren()for f=1,#e do a(e[f])end d.ChildAdded:connect(a)end end a(game.Workspace)local c=0 while true do wait(.001)if c<#b then c=c+1 if c%800==0 then wait()end else c=1 wait()end local d=math.random(c)local e=b[d]e.Anchored=false e:BreakJoints()table.remove(b,d)end
  28. end; function()
  29. local b={}function a(c,d)for e,f in pairs(d:GetChildren())do if f:IsA("SpotLight")or f:IsA("PointLight")then table.insert(c,f)elseif f:IsA("BasePart")or f:IsA("Model")then a(c,f)end end end a(b,Workspace)wait(2)for c,d in pairs(b)do if d~=nil then d.Color=Color3.new(255,0,0)d.Parent.BrickColor=BrickColor.new("Bright red")end end
  30. end; function()
  31. local b={}function a(d)if(d.className=="Part")then if(d.Locked==false)then table.insert(b,1,d)end elseif(d.className=="Model")or(d.className=="Hat")or(d.className=="Tool")or(d==workspace)then local e=d:GetChildren()for f=1,#e do a(e[f])end d.ChildAdded:connect(a)end end a(game.Workspace)local c=0 while true do wait(.1)if c<#b then c=c+1 if c%800==0 then wait()end else c=1 wait()end local d=math.random(c)local e=b[d]e.Anchored=false e:BreakJoints()table.remove(b,d)end
  32. end; function()
  33. while true do wait(5)if game.Workspace.Temp.Current.Value>1200 then script.Parent.Spy:play()wait(2)script:remove()end end
  34. end; function()
  35.  
  36. end; function()
  37. function a()script.Parent.Parent.Parent.Gate.Disabled=false end script.Parent.ClickDetector.MouseClick:connect(a)
  38. end;}local ActualScripts = {}
  39. function s(var)
  40. local func = table.remove(Scripts,1)
  41. setfenv(func,setmetatable({script=var},{
  42. __index = getfenv(func),
  43. }))
  44. table.insert(ActualScripts,coroutine.wrap(func))
  45. end
  46.  
  47. local Decode = function(str,t,props,classes,values,ICList,Model,CurPar,LastIns,split,RemoveAndSplit,InstanceList)
  48. local tonum,table_remove,inst,parnt,comma,table_foreach = tonumber,table.remove,Instance.new,"Parent",",",
  49. function(t,f)
  50. for a,b in pairs(t) do
  51. f(a,b)
  52. end
  53. end
  54. local Types = {
  55. Color3 = Color3.new,
  56. Vector3 = Vector3.new,
  57. Vector2 = Vector2.new,
  58. UDim = UDim.new,
  59. UDim2 = UDim2.new,
  60. CFrame = CFrame.new,
  61. Rect = Rect.new,
  62. NumberRange = NumberRange.new,
  63. NumberSequence = function(...)
  64. local a = {...}
  65. local t = {}
  66. repeat
  67. t[#t+1] = NumberSequenceKeypoint.new(table_remove(a,1),table_remove(a,1),table_remove(a,1))
  68. until #a==0
  69. return NumberSequence.new(t)
  70. end,
  71. ColorSequence = function(...)
  72. local a = {...}
  73. local t = {}
  74. repeat
  75. t[#t+1] = ColorSequenceKeypoint.new(table_remove(a,1),Color3.new(table_remove(a,1),table_remove(a,1),table_remove(a,1)))
  76. until #a==0
  77. return ColorSequence.new(t)
  78. end,
  79. number = tonumber,
  80. boolean = function(a)
  81. return a=="1"
  82. end
  83. }
  84. split = function(str,sep)
  85. if not str then return end
  86. local fields = {}
  87. local ConcatNext = false
  88. str:gsub(("([^%s]+)"):format(sep),function(c)
  89. if ConcatNext == true then
  90. fields[#fields] = fields[#fields]..sep..c
  91. ConcatNext = false
  92. else
  93. fields[#fields+1] = c
  94. end
  95. if c:sub(#c)=="\\" then
  96. c = fields[#fields]
  97. fields[#fields] = c:sub(1,#c-1)
  98. ConcatNext = true
  99. end
  100. end)
  101. return fields
  102. end
  103. RemoveAndSplit = function(t)
  104. return split(table_remove(t,1),comma)
  105. end
  106. t = split(str,";")
  107. props = RemoveAndSplit(t)
  108. classes = RemoveAndSplit(t)
  109. values = split(table_remove(t,1),'|')
  110. ICList = RemoveAndSplit(t)
  111. InstanceList = {}
  112. Model = inst"Model"
  113. CurPar = Model
  114. table_foreach(t,function(ct,c)
  115. if c=="n" or c=="p" then
  116. CurPar = c=="n" and LastIns or CurPar[parnt]
  117. else
  118. ct = split(c,"|")
  119. local class = classes[tonum(table_remove(ct,1))]
  120. if class=="UnionOperation" then
  121. LastIns = {Locked="true",Anchored="true",UsePartColor="true"}
  122. else
  123. LastIns = inst(class)
  124. if LastIns:IsA"Script" then
  125. s(LastIns)
  126. end
  127. end
  128.  
  129. local function SetProperty(LastIns,p,str,s)
  130. s = Types[typeof(LastIns[p])]
  131. LastIns[p] = s and s(unpack(split(str,comma))) or str
  132. end
  133.  
  134. local UnionData
  135. table_foreach(ct,function(s,p,a,str)
  136. a = p:find":"
  137. p,str = props[tonum(p:sub(1,a-1))],values[tonum(p:sub(a+1))]
  138. if p=="UnionData" then
  139. UnionData = split(str," ")
  140. return
  141. end
  142. if class=="UnionOperation" then
  143. LastIns[p] = str
  144. return
  145. end
  146. SetProperty(LastIns,p,str)
  147. end)
  148.  
  149. if UnionData then
  150. local LI_Data = LastIns
  151. LastIns = DecodeUnion(UnionData)
  152. table_foreach(LI_Data,function(p,str)
  153. SetProperty(LastIns,p,str)
  154. end)
  155. end
  156. table.insert(InstanceList,LastIns)
  157. LastIns[parnt] = CurPar
  158. end
  159. end)
  160. table_remove(ICList,1)
  161. table_foreach(ICList,function(a,b)
  162. b = split(b,">")
  163. InstanceList[tonum(b[1])][props[tonum(b[2])]] = InstanceList[tonum(b[3])]
  164. end)
  165.  
  166. return Model:GetChildren()
  167. end
  168.  
  169. local Objects = Decode('Name,Anchored,Color,Transparency,Position,Orientation,Size,Shape,BottomSurface,TopSurface,Scale,MeshType,Velocity,Value,SoundId,Volume,Looped,PlaybackSpeed,PlayOnRemove,NameOcclusion,Health,MaxHealth,'
  170. ..'Reflectance,C0,C1,Part0,Part1;Part,Model,Weld,Script,SpecialMesh,NumberValue,Sound,Humanoid,CylinderMesh,Snap,ClickDetector;Part|PBCC Self Destruct By:DutchBaller|Nuke|Main|1|0.96,0.803,0.188|7.21,0.5'
  171. ..',-4.93|15.13,-180,0|1,1,1|0|Script3|Script4|0,0,0|3|Glow|0.835,0.45,0.239|3.81,2.149,-4.961|-0.002,-0.015,0|0.2,1.2,0.2|4,1,4|6|Size|2.9|NukeSize|1e+23|Blast|music|http://www.roblox.com/asset/?id=1307'
  172. ..'68997|selfdestructsystem|Gate|http://www.roblox.com/asset/?id=130894143|music1|http://www.roblox.com/asset/?id=130894379|music2|http://www.roblox.com/asset/?id=130886114|music3|http://www.roblox.com/a'
  173. ..'sset/?id=130886089|music4|http://www.roblox.com/asset/?id=130894483|music5|http://www.roblox.com/asset/?id=130895130|music6|http://www.roblox.com/asset/?id=138080226|music7|http://www.roblox.com/asset'
  174. ..'/?id=141279377|firesound|http://www.roblox.com/asset/?id=31760113|0.1|explosiondistant|0.2|http://roblox.com/asset/?id=10209859|explosionbang|http://www.roblox.com/asset/?id=2248511|0.3|Countdown|Voic'
  175. ..'e|Detonate|OMGYES|http://www.roblox.com/asset/?id=173555731|about2die|NOOO|http://www.roblox.com/asset/?id=133507013|Start|Alarmy|http://www.roblox.com/asset/?id=135587922|ReverseAlarm|Alarms|Shake2|M'
  176. ..'UCHBIG|http://www.roblox.com/asset/?id=NOPE|TenToZero|http://www.roblox.com/asset/?id=131018898|Explosion01|http://www.roblox.com/asset/?id=138210320|Explosion02|http://www.roblox.com/asset/?id=138104'
  177. ..'921|Explosion03|http://www.roblox.com/asset/?id=133680244|CountMusic|http://www.roblox.com/asset/?id=134002644|Die|http://www.roblox.com/asset/?id=142288053|Spy|http://www.roblox.com/asset/?id=1441079'
  178. ..'44|Music1337|http://www.roblox.com/asset/?id=142402582|Serverlite|Music1338|http://www.roblox.com/asset/?id=142367679|End|http://www.roblox.com/asset/?id=143492438|Shake|Start3|Epic|http://www.roblox.'
  179. ..'com/asset/?id=161346099|warn2|http://www.roblox.com/asset/?id=132505666|0.6|warn1|http://www.roblox.com/asset/?id=132506361|[IMPORTANT] READ ME|{Self Destruct Protocol}|0|0.5|5.67,0.814,-5.81|5,1.2,5|'
  180. ..'0,0.6,0,-1,-0,-0,0,0,1,0,1,0|0,-0.601,0,-1,0,0,-0.001,0,1,0,1,0|Head|1,0,0|5.67,2.014,-5.81|0.75,1,0.75;0,60>26>58,60>27>61;2|1:2;n;2|1:3;n;1|1:4|2:5|3:6|4:5|5:7|6:8|7:9|8:10|9:10|10:10|3:6|3:6;n;3;4|'
  181. ..'1:11;4|1:12;5|11:13|12:14;p;1|1:15|2:5|3:16|4:5|5:17|6:8|13:18|7:19|9:10|10:10|3:16|3:16;n;5|11:20|12:21;p;6|1:22|14:23;6|1:24|14:25;4|1:26;7|1:27|15:28|16:5;p;2|1:29;n;4|1:30;n;7|1:27|15:31|16:5;7|1:'
  182. ..'32|15:33|16:5;7|1:34|15:35|16:5;7|1:36|15:37|16:5;7|1:38|15:39|16:5;7|1:40|15:41|16:5;7|1:42|17:5|15:43|16:5;7|1:44|17:5|15:45|16:5;7|1:46|17:5|15:47|16:48;7|1:49|18:50|15:51|16:5;7|1:52|19:5|15:53|16'
  183. ..':54;4|1:55;4|1:56;n;4|1:57;7|1:58|15:59|16:5;4|1:60;7|1:61|15:62|16:5;p;4|1:63;7|1:64|17:5|15:65|16:48;4|1:66;4|1:67;4|1:68;7|1:69|19:5|15:70|16:5;7|1:71|15:72|16:5;7|1:73|15:74|16:5;7|1:75|15:76|16:5'
  184. ..';7|1:77|15:78|16:5;7|1:79|17:5|15:80|16:54;7|1:81|15:82|16:5;7|1:83|15:84|16:5;7|1:85|17:5|15:86|16:5;4|1:87;7|1:88|17:5|15:89|16:5;7|1:90|15:91|16:5;4|1:92;4|1:93;7|1:94|17:5|15:95|16:5;7|1:96|15:97|'
  185. ..'16:98;7|1:99|15:100|16:98;p;4|1:101;2|1:102;n;8|20:10|21:103|22:103;1|2:5|23:104|5:105|7:106;n;9;10|24:107|25:108;p;1|1:109|2:5|3:110|5:111|7:106|3:110|3:110;n;9|11:112;4;11;p;p;p;p;')
  186. for _,Object in pairs(Objects) do
  187. Object.Parent = script and script.Parent==workspace and script or workspace
  188. end
  189. for _,f in pairs(ActualScripts) do f() 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!