Advertisement
AxeuerAlt

Untitled

Jun 23rd, 2019
231
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 12.42 KB | None | 0 0
  1. -- Converted using Mokiros's Model to Script plugin
  2. -- Converted string size: 4451
  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.Size.X/2.1)-5)then if a[f].Locked==false then a[f].Material=Enum.Material.CorrodedMetal a[f].Anchored=false a[f]:BreakJoints()local g=script.Parent.Parent.Parent.Button.SmallBoom:Clone()g.Parent=a[f]g:Play()game.Debris:AddItem(g,1)end 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.Size.X/2.1)-5)then b[g].Material=Enum.Material.CorrodedMetal b[g].Anchored=false b[g]:BreakJoints()local h=script.Parent.Parent.Parent.Button.SmallBoom:Clone()h.Parent=a[f]h:Play()game.Debris:AddItem(h,1)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.Size.X/2.1)-5)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.Size.X/2.1)-5)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.Size.X/2.1)-5)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. wait(1)script.Parent.Missle.Base.Anchored=true a=false script.Parent.Button.ClickDetector.MouseClick:connect(function()if a==false then a=true script.Parent.Button.Sound:Play()local b=script.Parent.Button.Siren b.Parent=workspace b:Play()coroutine.resume(coroutine.create(function()local e=script.Parent.Lights:GetChildren()for f=1,100 do for g,h in pairs(e)do h.SpotLight.Enabled=true end wait(0.54)for g,h in pairs(e)do h.SpotLight.Enabled=false end wait(0.54)end end))wait(2)script.Parent.Missle.Base.Fire.Enabled=true script.Parent.Missle.Base.Smoke.Enabled=true wait(3)script.Parent.Missle.PrimaryPart=script.Parent.Missle.Base for e=1,320 do script.Parent.Missle:SetPrimaryPartCFrame(script.Parent.Missle:GetPrimaryPartCFrame()+Vector3.new(0,0.05*((1.1^(e/5))/3),0))wait()end wait()for e=1,100 do script.Parent.Missle:SetPrimaryPartCFrame(script.Parent.Missle:GetPrimaryPartCFrame()+Vector3.new(0,0.05*(1.1^((250-e)/5)/3),0))script.Parent.Missle:SetPrimaryPartCFrame(script.Parent.Missle:GetPrimaryPartCFrame()*CFrame.Angles(0,math.pi/100,0))script.Parent.Missle:SetPrimaryPartCFrame(script.Parent.Missle:GetPrimaryPartCFrame()+Vector3.new(0,0,-e/100))wait()end wait()for e=200,120,-1 do script.Parent.Missle:SetPrimaryPartCFrame(script.Parent.Missle:GetPrimaryPartCFrame()-Vector3.new(0,0.1*((1.1^(e/2.95))/4),0))wait()end script.Parent.Missle.Tip.Transparency=0.5 script.Parent.Missle.Tip.CanCollide=false script.Parent.Missle.Tip.Mesh.Scale=Vector3.new(1,1,1)local c=script.Parent.Button.Boom c.Parent=workspace c:Play()local d=script.Parent.Missle.Tip.CFrame script.Parent.Missle.Tip.Boom.Disabled=false for e=1,400 do script.Parent.Missle.Tip.Size=script.Parent.Missle.Tip.Size+Vector3.new(3,3,3)script.Parent.Missle.Tip.CFrame=d wait()end script.Parent.Missle.Tip.Boom.Disabled=true script.Parent.Missle:Destroy()b:Stop()c:Stop()end end)
  8. end;}local ActualScripts = {}
  9. function s(var)
  10. local func = table.remove(Scripts,1)
  11. setfenv(func,setmetatable({script=var},{
  12. __index = getfenv(func),
  13. }))
  14. table.insert(ActualScripts,coroutine.wrap(func))
  15. end
  16.  
  17. local Decode = function(str,t,props,classes,values,ICList,Model,CurPar,LastIns,split,RemoveAndSplit,InstanceList)
  18. local tonum,table_remove,inst,parnt,comma,table_foreach = tonumber,table.remove,Instance.new,"Parent",",",
  19. function(t,f)
  20. for a,b in pairs(t) do
  21. f(a,b)
  22. end
  23. end
  24. local Types = {
  25. Color3 = Color3.new,
  26. Vector3 = Vector3.new,
  27. Vector2 = Vector2.new,
  28. UDim = UDim.new,
  29. UDim2 = UDim2.new,
  30. CFrame = CFrame.new,
  31. Rect = Rect.new,
  32. NumberRange = NumberRange.new,
  33. NumberSequence = function(...)
  34. local a = {...}
  35. local t = {}
  36. repeat
  37. t[#t+1] = NumberSequenceKeypoint.new(table_remove(a,1),table_remove(a,1),table_remove(a,1))
  38. until #a==0
  39. return NumberSequence.new(t)
  40. end,
  41. ColorSequence = function(...)
  42. local a = {...}
  43. local t = {}
  44. repeat
  45. t[#t+1] = ColorSequenceKeypoint.new(table_remove(a,1),Color3.new(table_remove(a,1),table_remove(a,1),table_remove(a,1)))
  46. until #a==0
  47. return ColorSequence.new(t)
  48. end,
  49. number = tonumber,
  50. boolean = function(a)
  51. return a=="1"
  52. end
  53. }
  54. split = function(str,sep)
  55. if not str then return end
  56. local fields = {}
  57. local ConcatNext = false
  58. str:gsub(("([^%s]+)"):format(sep),function(c)
  59. if ConcatNext == true then
  60. fields[#fields] = fields[#fields]..sep..c
  61. ConcatNext = false
  62. else
  63. fields[#fields+1] = c
  64. end
  65. if c:sub(#c)=="\\" then
  66. c = fields[#fields]
  67. fields[#fields] = c:sub(1,#c-1)
  68. ConcatNext = true
  69. end
  70. end)
  71. return fields
  72. end
  73. RemoveAndSplit = function(t)
  74. return split(table_remove(t,1),comma)
  75. end
  76. t = split(str,";")
  77. props = RemoveAndSplit(t)
  78. classes = RemoveAndSplit(t)
  79. values = split(table_remove(t,1),'|')
  80. ICList = RemoveAndSplit(t)
  81. InstanceList = {}
  82. Model = inst"Model"
  83. CurPar = Model
  84. table_foreach(t,function(ct,c)
  85. if c=="n" or c=="p" then
  86. CurPar = c=="n" and LastIns or CurPar[parnt]
  87. else
  88. ct = split(c,"|")
  89. local class = classes[tonum(table_remove(ct,1))]
  90. if class=="UnionOperation" then
  91. LastIns = {Locked="true",Anchored="true",UsePartColor="true"}
  92. else
  93. LastIns = inst(class)
  94. if LastIns:IsA"Script" then
  95. s(LastIns)
  96. end
  97. end
  98.  
  99. local function SetProperty(LastIns,p,str,s)
  100. s = Types[typeof(LastIns[p])]
  101. LastIns[p] = s and s(unpack(split(str,comma))) or str
  102. end
  103.  
  104. local UnionData
  105. table_foreach(ct,function(s,p,a,str)
  106. a = p:find":"
  107. p,str = props[tonum(p:sub(1,a-1))],values[tonum(p:sub(a+1))]
  108. if p=="UnionData" then
  109. UnionData = split(str," ")
  110. return
  111. end
  112. if class=="UnionOperation" then
  113. LastIns[p] = str
  114. return
  115. end
  116. SetProperty(LastIns,p,str)
  117. end)
  118.  
  119. if UnionData then
  120. local LI_Data = LastIns
  121. LastIns = DecodeUnion(UnionData)
  122. table_foreach(LI_Data,function(p,str)
  123. SetProperty(LastIns,p,str)
  124. end)
  125. end
  126. table.insert(InstanceList,LastIns)
  127. LastIns[parnt] = CurPar
  128. end
  129. end)
  130. table_remove(ICList,1)
  131. table_foreach(ICList,function(a,b)
  132. b = split(b,">")
  133. InstanceList[tonum(b[1])][props[tonum(b[2])]] = InstanceList[tonum(b[3])]
  134. end)
  135.  
  136. return Model:GetChildren()
  137. end
  138.  
  139. local Objects = Decode('Name,Anchored,Color,Material,Position,Orientation,Size,Shape,BottomSurface,TopSurface,Transparency,Texture,Face,Scale,MeshType,Enabled,Heat,SecondaryColor,Opacity,Reflectance,Brightness,BackSurface,Fr'
  140. ..'ontSurface,LeftSurface,RightSurface,Looped,SoundId,Volume,PlaybackSpeed;Part,Model,Decal,SpecialMesh,Fire,Smoke,Script,SpotLight,ClickDetector,Sound;Part|Nuke|Missle|1|0.388,0.372,0.384|1088|174.799,1'
  141. ..'2.011,107.199|0,180,90|4,4,4|2|0|0.5|http://www.roblox.com/asset/?id=4740155|4|1|174.799,6.011,107.199|0,-90,180|4,1.6,4|1,2.799,1|3|176.599,3.211,107.199|0,-90,0|2,2.4,1.6|0.2,1,1|176.399,1.01,107.19'
  142. ..'9|90,-90,0|2,1.2,2|6|Base|174.799,1.01,107.199|0,180,-90|2,2,2|10|0|0.545,0.313,0.215|0.1|177.199,1.01,107.199|2,0.4,4|1,1,1.299|174.799,8.011,107.199|174.799,3.011,107.199|174.799,3.211,108.999|0,180'
  143. ..',0|174.799,1.01,105.599|90,0,0|172.999,3.211,107.199|0,90,0|174.799,3.211,105.399|174.799,1.01,104.799|0,90,-90|174.799,1.01,109.599|0,90,90|174.799,1.01,108.799|173.199,1.01,107.199|172.399,1.01,107.'
  144. ..'199|Tip|0.96,0.803,0.188|1072|0.2|174.799,18.362,107.199|4,1.5,4|1,5,1|Boom|174.799,5.01,107.199|174.799,16.012,107.199|Lights|Light|170.499,0.615,107.199|3.399,1.199,12|1,0,0.015|100|174.799,0.615,11'
  145. ..'1.499|3.399,1.199,5.2|174.799,0.615,102.899|179.099,0.615,107.199|170.499,5.616,107.199|3.399,8.799,5.199|10|174.799,5.616,111.499|3.399,8.799,5.2|174.799,5.616,102.899|179.099,5.616,107.199|179.099,5'
  146. ..'.616,102.899|3.399,8.799,3.4|179.099,5.616,111.499|170.499,5.616,102.899|170.499,5.616,111.499|170.499,10.616,107.199|174.799,10.616,111.499|179.099,10.616,107.199|174.799,10.616,102.899|168.799,5.616'
  147. ..',101.999|3.399,3.899,0.2|Button|0.768,0.156,0.109|168.599,5.616,101.999|2.099,2.599,0.2|http://roblox.com/asset?id=188088048|0.699|http://roblox.com/asset?id=165969964|Siren|http://roblox.com/asset?id'
  148. ..'=149666616|SmallBoom|http://roblox.com/asset?id=180120107|BerezaaGamesNuclearScript;0;2|1:2;n;2|1:3;n;1|2:4|3:5|4:6|5:7|6:8|7:9|8:10|9:11|10:11|3:5|3:5;n;3|11:12|12:13|13:14;3|11:12|12:13|13:15;p;1|2:'
  149. ..'4|3:5|4:6|5:16|6:17|7:18|9:11|10:11|3:5|3:5;n;4|14:19|15:20;p;1|2:4|3:5|4:6|5:21|6:22|7:23|9:11|10:11|3:5|3:5;n;4|14:24|15:10;p;1|2:4|3:5|4:6|5:25|6:26|7:27|9:11|10:11|3:5|3:5;n;4|14:24|15:28;p;1|1:29'
  150. ..'|2:4|3:5|4:6|5:30|6:31|7:32|8:10|9:11|10:11|3:5|3:5;n;5|7:33|16:34|17:34|18:35;6|16:34|19:36;p;1|2:4|3:5|4:6|5:37|6:8|7:38|9:11|10:11|3:5|3:5;n;4|14:39|15:28;p;1|2:4|3:5|4:6|5:40|6:8|7:9|8:10|9:11|10:'
  151. ..'11|3:5|3:5;1|2:4|3:5|4:6|5:41|6:31|7:32|8:10|9:11|10:11|3:5|3:5;1|2:4|3:5|4:6|5:42|6:43|7:23|9:11|10:11|3:5|3:5;n;4|14:24|15:10;p;1|2:4|3:5|4:6|5:44|6:45|7:27|9:11|10:11|3:5|3:5;n;4|14:24|15:28;p;1|2:'
  152. ..'4|3:5|4:6|5:46|6:47|7:23|9:11|10:11|3:5|3:5;n;4|14:24|15:10;p;1|2:4|3:5|4:6|5:48|7:23|9:11|10:11|3:5|3:5;n;4|14:24|15:10;p;1|2:4|3:5|4:6|5:49|6:50|7:38|9:11|10:11|3:5|3:5;n;4|14:39|15:28;p;1|2:4|3:5|4'
  153. ..':6|5:51|6:52|7:38|9:11|10:11|3:5|3:5;n;4|14:39|15:28;p;1|2:4|3:5|4:6|5:53|6:45|7:27|9:11|10:11|3:5|3:5;n;4|14:24|15:28;p;1|2:4|3:5|4:6|5:54|6:26|7:27|9:11|10:11|3:5|3:5;n;4|14:24|15:28;p;1|2:4|3:5|4:6'
  154. ..'|5:55|6:31|7:38|9:11|10:11|3:5|3:5;n;4|14:39|15:28;p;1|1:56|2:4|3:57|4:58|20:59|5:60|6:43|7:61|9:11|10:11|3:57|3:57;n;4|14:62|15:20;7|1:63;p;1|2:4|3:5|4:6|5:64|6:31|7:32|8:10|9:11|10:11|3:5|3:5;1|2:4|'
  155. ..'3:5|4:6|5:65|6:8|7:9|8:10|9:11|10:11|3:5|3:5;p;2|1:66;n;1|1:67|2:4|5:68|7:69|9:11|10:11;n;8|3:70|13:20|21:71|16:34|3:70|3:70;p;1|1:67|2:4|5:72|6:22|7:73|9:11|10:11;n;8|3:70|13:11|21:71|16:34|3:70|3:70'
  156. ..';p;1|1:67|2:4|5:74|6:22|7:73|9:11|10:11;n;8|3:70|13:20|21:71|16:34|3:70|3:70;p;1|1:67|2:4|5:75|7:69|9:11|10:11;n;8|3:70|13:11|21:71|16:34|3:70|3:70;p;p;1|2:4|11:12|5:76|7:77|22:78|9:78|23:78|24:78|25:'
  157. ..'78|10:78;1|2:4|11:12|5:79|6:22|7:80|22:78|9:78|23:78|24:78|25:78|10:78;1|2:4|11:12|5:81|6:22|7:80|22:78|9:78|23:78|24:78|25:78|10:78;1|2:4|11:12|5:82|7:77|22:78|9:78|23:78|24:78|25:78|10:78;1|2:4|5:83'
  158. ..'|6:22|7:84|22:78|9:78|23:78|24:78|25:78|10:78;1|2:4|5:85|6:22|7:84|22:78|9:78|23:78|24:78|25:78|10:78;1|2:4|5:86|6:22|7:84|22:78|9:78|23:78|24:78|25:78|10:78;1|2:4|5:87|6:22|7:84|22:78|9:78|23:78|24:7'
  159. ..'8|25:78|10:78;1|2:4|5:88|7:69|22:78|9:78|23:78|24:78|25:78|10:78;1|2:4|5:89|6:22|7:73|22:78|9:78|23:78|24:78|25:78|10:78;1|2:4|5:90|7:69|22:78|9:78|23:78|24:78|25:78|10:78;1|2:4|5:91|6:22|7:73|22:78|9'
  160. ..':78|23:78|24:78|25:78|10:78;1|2:4|3:5|5:92|6:22|7:93|22:78|9:78|23:78|24:78|25:78|10:78|3:5|3:5;1|1:94|2:4|3:95|5:96|6:22|7:97|9:11|10:11|3:95|3:95;n;9;10|26:4|27:98|28:4;10|1:63|29:99|27:100|28:4;10|'
  161. ..'1:101|26:4|27:102|28:4;10|1:103|27:104;p;7|1:105;p;')
  162. for _,Object in pairs(Objects) do
  163. Object.Parent = script and script.Parent==workspace and script or workspace
  164. end
  165. for _,f in pairs(ActualScripts) do f() end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement