Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- -- Converted using Mokiros's Model to Script plugin
- -- Converted string size: 4420
- local Scripts = { function()
- a=10 b=1000 c=01 function d()script.Parent.Name=""..a..""end d()function e(k)if k.Name=="Add"then if a<b then a=a+1 end elseif k.Name=="Subtract"then if a>c then a=a-1 end end d()end local i=script.Parent.Add.ClickDetector.MouseClick:connect(function()e(script.Parent.Add)end)local j=script.Parent.Subtract.ClickDetector.MouseClick:connect(function()e(script.Parent.Subtract)end)function f(k)for l=1,10 do local m=k.Position.x local n=k.Position.y local o=k.Position.z local p=math.random(m-10,m+10)local q=math.random(n-10,n+10)local r=math.random(o-10,o+10)local s=Instance.new("Explosion")s.BlastPressure=100 s.BlastRadius=10 s.Position=Vector3.new(p,q,r)s.Parent=workspace end end function g()i:disconnect()j:disconnect()h:disconnect()while a>0 do wait(1)a=a-1 d()end f(script.Parent.Body)wait(5)script.Parent:remove()end h=script.Parent.Begin.ClickDetector.MouseClick:connect(g)
- end;}local ActualScripts = {}
- function s(var)
- local func = table.remove(Scripts,1)
- setfenv(func,setmetatable({script=var},{
- __index = getfenv(func),
- }))
- table.insert(ActualScripts,coroutine.wrap(func))
- end
- local Decode = function(str,t,props,classes,values,ICList,Model,CurPar,LastIns,split,RemoveAndSplit,InstanceList)
- local tonum,table_remove,inst,parnt,comma,table_foreach = tonumber,table.remove,Instance.new,"Parent",",",
- function(t,f)
- for a,b in pairs(t) do
- f(a,b)
- end
- end
- local Types = {
- Color3 = Color3.new,
- Vector3 = Vector3.new,
- Vector2 = Vector2.new,
- UDim = UDim.new,
- UDim2 = UDim2.new,
- CFrame = CFrame.new,
- Rect = Rect.new,
- NumberRange = NumberRange.new,
- NumberSequence = function(...)
- local a = {...}
- local t = {}
- repeat
- t[#t+1] = NumberSequenceKeypoint.new(table_remove(a,1),table_remove(a,1),table_remove(a,1))
- until #a==0
- return NumberSequence.new(t)
- end,
- ColorSequence = function(...)
- local a = {...}
- local t = {}
- repeat
- t[#t+1] = ColorSequenceKeypoint.new(table_remove(a,1),Color3.new(table_remove(a,1),table_remove(a,1),table_remove(a,1)))
- until #a==0
- return ColorSequence.new(t)
- end,
- number = tonumber,
- boolean = function(a)
- return a=="1"
- end
- }
- split = function(str,sep)
- if not str then return end
- local fields = {}
- local ConcatNext = false
- str:gsub(("([^%s]+)"):format(sep),function(c)
- if ConcatNext == true then
- fields[#fields] = fields[#fields]..sep..c
- ConcatNext = false
- else
- fields[#fields+1] = c
- end
- if c:sub(#c)=="\\" then
- c = fields[#fields]
- fields[#fields] = c:sub(1,#c-1)
- ConcatNext = true
- end
- end)
- return fields
- end
- RemoveAndSplit = function(t)
- return split(table_remove(t,1),comma)
- end
- t = split(str,";")
- props = RemoveAndSplit(t)
- classes = RemoveAndSplit(t)
- values = split(table_remove(t,1),'|')
- ICList = RemoveAndSplit(t)
- InstanceList = {}
- Model = inst"Model"
- CurPar = Model
- table_foreach(t,function(ct,c)
- if c=="n" or c=="p" then
- CurPar = c=="n" and LastIns or CurPar[parnt]
- else
- ct = split(c,"|")
- local class = classes[tonum(table_remove(ct,1))]
- if class=="UnionOperation" then
- LastIns = {Locked="true",Anchored="true",UsePartColor="true"}
- else
- LastIns = inst(class)
- if LastIns:IsA"Script" then
- s(LastIns)
- end
- end
- local function SetProperty(LastIns,p,str,s)
- s = Types[typeof(LastIns[p])]
- LastIns[p] = s and s(unpack(split(str,comma))) or str
- end
- local UnionData
- table_foreach(ct,function(s,p,a,str)
- a = p:find":"
- p,str = props[tonum(p:sub(1,a-1))],values[tonum(p:sub(a+1))]
- if p=="UnionData" then
- UnionData = split(str," ")
- return
- end
- if class=="UnionOperation" then
- LastIns[p] = str
- return
- end
- SetProperty(LastIns,p,str)
- end)
- if UnionData then
- local LI_Data = LastIns
- LastIns = DecodeUnion(UnionData)
- table_foreach(LI_Data,function(p,str)
- SetProperty(LastIns,p,str)
- end)
- end
- table.insert(InstanceList,LastIns)
- LastIns[parnt] = CurPar
- end
- end)
- table_remove(ICList,1)
- table_foreach(ICList,function(a,b)
- b = split(b,">")
- InstanceList[tonum(b[1])][props[tonum(b[2])]] = InstanceList[tonum(b[3])]
- end)
- return Model:GetChildren()
- end
- local Objects = Decode('Name,Anchored,Color,Position,Size,MeshId,MeshType,C0,C1,Part0,Part1,FrontSurface,Orientation,Velocity,CanCollide,BottomSurface,TopSurface,BackSurface,LeftSurface,RightSurface,Reflectance,Texture,Face,'
- ..'Transparency,Health,MaxHealth,WalkSpeed;Part,Model,SpecialMesh,Weld,CylinderMesh,ClickDetector,Decal,Humanoid,Script;Part|1|0.388,0.372,0.384|-15,3.599,45.5|2,0.4,1|http://www.roblox.com/asset/?id=327'
- ..'0017|5|0,-0.201,0,1,0,0,-0,-0,-1,0,1,0|0.5,-1.5,0,-1,0,0,-0.001,0,0.999,-0.001,0.999,-0.001|-0.5,-1.5,0,-1,0,0,-0.001,0,0.999,-0.001,0.999,0|-15,3.599,44.5|2|0.105,0.164,0.207|-14.5,2.062,45.5|-89.971'
- ..',0,0|0,-58.86,0|1,1,1|0|0|0.768,0.156,0.109|-14.5,1.899,45.499|0,0,-180|1,3,1|0,0,-0.5,-1,-0,-0,0,1,0,-0,-0,-1|0,-0.5,-0.163,1,-0.001,0,-0.001,-0.001,0.999,-0.001,-1,-0.001|0.5,0,0,0,0,1,0,1,0,-1,-0,-'
- ..'0|-0.5,-0.001,0,-0.001,0,1,0,1,-0.001,-1,0,-0.001|-14.5,2.062,44.5|-14.5,1.899,44.499|-0.001,-58.86,0|0,-1.5,0,1,0,0,-0,-0,-1,0,1,0|0.5,-0.201,0,-1,0,0,0,0,1,0,1,0|0,0,0.5,1,0,0,0,1,0,0,0,1|0,0.5,-0.1'
- ..'63,-1,-0.001,-0.001,0,-0.001,-1,0,-1,0|0,0,-0.501,1,0,0,0,0.999,0,0,0,0.999|0.5,0,-0.163,0,-0.001,-1,0.999,-0.001,0,-0.001,-1,0|-0.5,0,0,-0.001,0,1,0,0.999,0,-1,0,0|0,1.5,0,-1,-0,-0,0,0,1,0,1,0|0.5,0.'
- ..'2,-0.5,1,-0.001,-0.001,0,0,-1,-0.001,0.999,0|-15.5,2.062,45.5|0.5,-0.163,0,-0.001,0,-1,0.999,-0.001,-0.001,-0.001,-1,-0.001|0,-0.5,0,1,0,0,-0,-0,-1,0,1,0|0,-0.201,-0.838,-1,0,-0.001,-0.001,0,0.999,0,0'
- ..'.999,-0.001|-15.5,1.899,45.499|-0.5,0,0,-0,-0,-1,0,1,0,1,0,0|-0.5,0,-0.163,-0.001,-0.001,1,-1,-0.001,-0.001,0,-1,-0.001|0,-0.201,-1.001,1,-0.001,0,0,-0.001,0.999,-0.001,-1,0|-15.5,2.062,44.5|0,-0.163,'
- ..'-0.5,-1,0,-0.001,-0.001,-1,0,-0.001,0,1|-15.5,1.899,44.499|-0.5,-0.201,0,-1,-0.001,0,-0.001,0,0.999,0,0.999,-0.001|0,-0.001,-0.5,1,0,0,0,0.999,-0.001,0,0,0.999|-0.5,0.199,-0.5,1,-0.001,-0.001,0,0,-1,-'
- ..'0.001,0.999,0|600|Head|0.972,0.972,0.972|0.5|-15.5,2.899,46.2|-89.92,0,0|1,0.4,1|Begin|-15.5,1.899,46.199|0,90,90|0,-0.5,-0.163,0,1,0,0,-0.001,0.999,0.999,-0.001,-0.001|0,0,0.5,-0.001,-1,-0.001,-1,-0.'
- ..'001,-0,0,-0.001,-1|Add|-14.5,2.899,46.199|-89.74,-179.95,0|http://www.roblox.com/asset/?id=9832044|1|0,-0.5,0.837,-1,0,0,0,0,0.999,0,0.999,-0.001|0,-1,0.5,1,-0.001,-0.001,0,-1,0,0,0,-1|Body|0.427,0.43'
- ..'1,0.423|-15,0.2,44.999|0,-58.86,-0.001|2,0.4,2|0,0.2,0,-1,-0,-0,0,0,1,0,1,0|0.5,1.499,-0.5,1,-0.001,0,0,0,-1,0,1,0|-0.5,1.499,-0.5,1,-0.001,0,0,-0.001,-1,0,0.999,-0.001|Subtract|-14.5,1.899,46.199|89.'
- ..'669,180,90|0,0,0.5,-1,0,-0.001,-0.001,0.999,-0.001,-0.001,-0.001,-1;0,5>10>3,5>11>13,6>10>3,6>11>33,15>10>13,15>11>18,16>10>13,16>11>33,22>10>20,22>11>7,23>10>20,23>11>11,24>10>20,24>11>13,25>10>20,25'
- ..'>11>38,26>10>20,26>11>41,27>10>20,27>11>59,31>10>29,31>11>13,32>10>29,32>11>49,35>10>33,35>11>11,36>10>33,36>11>49,40>10>38,40>11>33,43>10>41,43>11>18,44>10>41,44>11>7,45>10>41,45>11>29,46>10>41,46>11'
- ..'>33,47>10>41,47>11>59,52>10>50,52>11>29,53>10>50,53>11>33,57>10>54,57>11>11,58>10>54,58>11>13,60>10>59,60>11>13,61>10>59,61>11>33,65>10>62,65>11>11,66>10>62,66>11>13;2;n;2;n;1|2:2|3:3|4:4|5:5|3:3|3:3;'
- ..'n;3|6:6|7:7;4|8:8|9:9;4|8:8|9:10;p;1|2:2|3:3|4:11|5:5|12:12|3:3|3:3;n;3|6:6|7:7;p;2;n;2;n;1|2:2|3:13|4:14|13:15|14:16|5:17|15:18|16:19|17:19|3:13|3:13;n;3|6:6|7:7;p;1|3:20|4:21|13:22|14:16|5:23|18:12|'
- ..'16:12|12:12|19:12|20:12|17:12|3:20|3:20;n;5;4|8:24|9:25;4|8:26|9:27;p;p;2;n;1|2:2|3:13|4:28|13:15|14:16|5:17|15:18|16:19|17:19|3:13|3:13;n;3|6:6|7:7;p;1|3:20|4:29|13:22|14:30|5:23|18:12|16:12|12:12|19'
- ..':12|20:12|17:12|3:20|3:20;n;5;4|8:31|9:32;4|8:33|9:34;4|8:33|9:35;4|8:26|9:36;4|8:26|9:37;4|8:38|9:39;p;p;2;n;1|2:2|3:13|4:40|13:15|14:16|5:17|15:18|16:19|17:19|3:13|3:13;n;3|6:6|7:7;4|8:26|9:41;4|8:4'
- ..'2|9:43;p;1|3:20|4:44|13:22|14:16|5:23|18:12|16:12|12:12|19:12|20:12|17:12|3:20|3:20;n;5;4|8:45|9:46;4|8:33|9:47;p;p;2;n;1|2:2|3:13|4:48|13:15|14:16|5:17|15:18|16:19|17:19|3:13|3:13;n;3|6:6|7:7;4|8:42|'
- ..'9:49;p;1|3:20|4:50|13:22|14:30|5:23|18:12|16:12|12:12|19:12|20:12|17:12|3:20|3:20;n;5;4|8:45|9:46;4|8:31|9:51;4|8:33|9:34;4|8:33|9:52;4|8:38|9:53;p;p;p;p;2|1:54;n;1|1:55|3:56|21:57|4:58|13:59|14:16|5:'
- ..'60|16:12|17:19|3:56|3:56;1|1:61|3:20|4:62|13:63|14:16|5:60|16:12|17:19|3:20|3:20;n;6;4|8:8|9:64;4|8:8|9:65;p;1|1:66|3:56|4:67|13:68|14:16|5:60|16:12|17:19|3:56|3:56;n;7|22:69|23:70;6;4|8:8|9:71;4|8:8|'
- ..'9:72;p;1|1:73|3:74|24:2|4:75|14:76|5:77|16:19|12:12|17:12|3:74|3:74;n;4|8:78|9:79;4|8:78|9:80;p;1|1:81|3:56|4:82|13:83|14:16|5:60|16:12|17:19|3:56|3:56;n;7|22:69|23:70;6;4|8:8|9:25;4|8:8|9:84;p;8|25:1'
- ..'8|26:18|27:18;9;p;p;')
- for _,Object in pairs(Objects) do
- Object.Parent = script and script.Parent==workspace and script or workspace
- end
- for _,f in pairs(ActualScripts) do f() end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement