API tools faq
paste
Advertisement
AxeuerAlt

OverSeer Tools

AxeuerAlt
Jun 11th, 2019
226
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 22.00 KB | None | 0 0
raw download clone embed print report
  1. -- Converted using Mokiros's Model to Script plugin
  2. -- Converted string size: 2177
  3.  
  4. local Scripts = { function()
  5. a=script.Parent b=game:service("RunService")c=game:GetService("Debris")d={"RightSlash","LeftSlash","OverHeadSwing","LeftSwingFast","RightSwingFast"}e=5 f=20 g=50 h=e i=a.Handle a.Taunting.Value=false local r=Instance.new("Sound")r.SoundId="rbxasset://sounds\\swordslash.wav"r.Parent=i r.Volume=.7 local s=Instance.new("Sound")s.SoundId="http://www.roblox.com/asset/?id=28257433"s.Parent=i s.Volume=1 function j(t,u)while true do local v=t:FindFirstChild(u)if v~=nil then return v end wait()end end j(a,"Taunting")j(a,"RunAnim")k=j(i,"Sparkles")function l(t)if t.Parent~=nil then local u=t.Parent:findFirstChild("Humanoid")local v=a.Parent if v~=nil then local w=game.Players:playerFromCharacter(v)if w~=nil then local x=v:findFirstChild("Humanoid")if u~=nil then if x~=nil and u~=x then local y=v:FindFirstChild("Right Arm")if y~=nil then local z=y:FindFirstChild("RightGrip")if z~=nil and(z.Part0==i or z.Part1==i)then k.Enabled=true m(u,w)u:TakeDamage(h)wait(.3)k.Enabled=false end end end end end end if t.Name=="Handle"then k.Enabled=true wait(.3)k.Enabled=false end end end function m(t,u)for w,x in ipairs(t:GetChildren())do if x.Name=="creator"then x:remove()end end local v=Instance.new("ObjectValue")v.Value=u v.Name="creator"v.Parent=t c:AddItem(v,1)end a.Enabled=true function n()if a.Enabled and not a.Taunting.Value then a.Enabled=false local t=a.Parent local u=t.Humanoid if u==nil then print("Humanoid not found")return end r:play()o=d[math.random(1,#d)]while o==a.RunAnim.Value do o=d[math.random(1,#d)]end a.RunAnim.Value=o if o=="OverHeadSwing"then h=g else h=f end wait(.75)h=e a.Enabled=true end end function p()s:play()k.Enabled=false end a.Activated:connect(n)a.Equipped:connect(p)q=i.Touched:connect(l)
  6. end; function()
  7. local m=script.Parent a=CFrame.new(.15,-2,0)*CFrame.Angles(0,math.pi/2,0)b=a c=true d=false function e(n,o)while true do local p=n:FindFirstChild(o)if p~=nil then return p end wait()end end e(m,"Handle")function f(n)if not c then return end c=false n.Icon="rbxasset://textures\\GunWaitCursor.png"wait(.75)n.Icon="rbxasset://textures\\GunCursor.png"c=true end function g()b=a end function h()b=a*CFrame.Angles(math.pi/4,.4,0)end function i(n)delay(0,function()local o=tick()local p=o+n while tick()<p do m.Grip=b*CFrame.Angles(math.pi*2*((tick()-o)/n),0,0)wait()end m.Grip=b end)end function j(n)local o=lastequipped if n==nil then print("Mouse not found")return end n.Icon="rbxasset://textures\\GunCursor.png"n.Button1Down:connect(function()f(n)end)e(m,"Taunting")e(m,"Taunt")n.KeyDown:connect(function(p)p=string.lower(p)if p=="l"or p=="t"or p=="g"then local q=m.Parent:FindFirstChild("Humanoid")if q~=nil then m.Taunting.Value=true q.WalkSpeed=0 k=q:LoadAnimation(m.Taunt)k:Play()wait(1)h()m.Grip=b wait(1.4)g()m.Grip=b wait(1)q.WalkSpeed=16 m.Taunting.Value=false end end end)end m.Equipped:connect(j)e(m,"RunAnim")m.RunAnim.Changed:connect(function()local n=m.Parent:FindFirstChild("Humanoid")local o=m.Parent:FindFirstChild("Torso")local p=m:FindFirstChild(m.RunAnim.Value)if p and o and n then l=n:LoadAnimation(p)if l and n.Health>0 then l:Play()if m.RunAnim.Value=="RightSlash"or m.RunAnim.Value=="LeftSlash"or m.RunAnim.Value=="OverHeadSwing"then i(.5)end if m.RunAnim.Value=="OverHeadSwing"then wait(.25)h()wait(.5)g()m.Grip=b elseif m.RunAnim.Value=="OverHeadSwingFast"then wait(.125)h()wait(.25)g()m.Grip=b end end end end)
  8. end; function()
  9. a=1 b=3 c=nil d=0.75 e=45 f=0 g=0 h={}local k=1 function i(l)if c==nil then k=1 local m=Instance.new("Model")local n=script.Parent:GetChildren()for o=1,#n do if n[o].className=="Part"then h[k]=n[o].Transparency local p=n[o]:clone()p.Parent=m k=k+1 end end wait()if c==nil then local o=script:FindFirstChild("Weld2")if o~=nil then local p=o:clone()p.Disabled=false p.Parent=m m.Name=script.Parent.Name m.Parent=script.Parent.Parent c=m local q=c:FindFirstChild("Handle")if q~=nil then if a==1 then local r=c.Parent:FindFirstChild("Torso")if r~=nil then if b==1 then local s=Instance.new("Weld")s.Part0=r s.Parent=s.Part0 s.Part1=q s.C1=CFrame.new(d*-1,0.25+f,-0.75+g*-1)*CFrame.fromEulerAnglesXYZ(math.rad(e*-1),(math.pi/2),0)elseif b==2 then local s=Instance.new("Weld")s.Part0=r s.Parent=s.Part0 s.Part1=q s.C1=CFrame.new(d,0.25+f,-0.75+g*-1)*CFrame.fromEulerAnglesXYZ(math.rad(e*-1),(math.pi/2)*-1,0)elseif b==3 then local s=Instance.new("Weld")s.Part0=r s.Parent=s.Part0 s.Part1=q s.C1=CFrame.new(d*-1,-0.1+f,0.2+g*-1)*CFrame.fromEulerAnglesXYZ(math.rad(e),(math.pi/2),-1.5)elseif b==4 then local s=Instance.new("Weld")s.Part0=r s.Parent=s.Part0 s.Part1=q s.C1=CFrame.new(d,0.25+f,-0.75+g*-1)*CFrame.fromEulerAnglesXYZ(math.rad(e),(math.pi/2+e)*-1.1,1)end end elseif a==2 then local r=c.Parent:FindFirstChild("Torso")if r~=nil then if b==1 then local s=Instance.new("Weld")s.Part0=r s.Parent=s.Part0 s.Part1=q s.C1=CFrame.new(d*-1,0.25+f,-0.5+g*-1)*CFrame.fromEulerAnglesXYZ(math.rad(e*-1),math.pi/2,0)elseif b==2 then local s=Instance.new("Weld")s.Part0=r s.Parent=s.Part0 s.Part1=q s.C1=CFrame.new(d,0.25+f,-0.5+g*-1)*CFrame.fromEulerAnglesXYZ(math.rad(e*-1),math.pi/2*-1,0)elseif b==3 then local s=Instance.new("Weld")s.Part0=r s.Parent=s.Part0 s.Part1=q s.C1=CFrame.new(d*-1,0.25+f,-0.5+g*-1)*CFrame.fromEulerAnglesXYZ(math.rad(e),math.pi/2,0)elseif b==4 then local s=Instance.new("Weld")s.Part0=r s.Parent=s.Part0 s.Part1=q s.C1=CFrame.new(d,0.25+f,-0.5+g*-1)*CFrame.fromEulerAnglesXYZ(math.rad(e),math.pi/2*-1,0)end end elseif a==3 then local r=c.Parent:FindFirstChild("Left Leg")local s=c.Parent:FindFirstChild("Right Leg")if r~=nil and s~=nil then if b==1 then local t=Instance.new("Weld")t.Part0=s t.Parent=t.Part0 t.Part1=q t.C1=CFrame.new(d*-1,0+f,-0.25+g*-1)*CFrame.fromEulerAnglesXYZ(math.pi/2,0,0)elseif b==2 then local t=Instance.new("Weld")t.Part0=r t.Parent=t.Part0 t.Part1=q t.C1=CFrame.new(d,0+f,-0.25+g*-1)*CFrame.fromEulerAnglesXYZ(math.pi/2,0,0)elseif b==3 then local t=Instance.new("Weld")t.Part0=torso t.Parent=t.Part0 t.Part1=q t.C1=CFrame.new(d*-1,0+f,0.25+g)*CFrame.fromEulerAnglesXYZ(math.pi/2,math.pi/2,0)elseif b==4 then local t=Instance.new("Weld")t.Part0=torso t.Parent=t.Part0 t.Part1=q t.C1=CFrame.new(d,0+f,0.25+g)*CFrame.fromEulerAnglesXYZ(math.pi/2,math.pi/2*-1,0)end end elseif a==4 then local r=c.Parent:FindFirstChild("Left Leg")local s=c.Parent:FindFirstChild("Right Leg")local t=c.Parent:FindFirstChild("Torso")if r~=nil and s~=nil and t~=nil then if b==1 then local u=Instance.new("Weld")u.Part0=s u.Parent=u.Part0 u.Part1=q u.C1=CFrame.new(d*-1,0.15+f,-0.25+g*-1)*CFrame.fromEulerAnglesXYZ(math.pi,0,0)elseif b==2 then local u=Instance.new("Weld")u.Part0=r u.Parent=u.Part0 u.Part1=q u.C1=CFrame.new(d,0.15+f,-0.25+g*-1)*CFrame.fromEulerAnglesXYZ(math.pi,0,0)elseif b==3 then local u=Instance.new("Weld")u.Part0=t u.Parent=u.Part0 u.Part1=q u.C1=CFrame.new(d*-1,0+f,0.25+g)*CFrame.fromEulerAnglesXYZ(math.pi,math.pi/2,0)elseif b==4 then local u=Instance.new("Weld")u.Part0=t u.Parent=u.Part0 u.Part1=q u.C1=CFrame.new(d,0+f,0.25+g)*CFrame.fromEulerAnglesXYZ(math.pi,math.pi/2*-1,0)end end end end end end end if c~=nil then k=1 local m=c:GetChildren()for n=1,#m do if m[n].className=="Part"then m[n].Transparency=1 end end end end function j(l)if c~=nil then k=1 local m=c:GetChildren()for n=1,#m do if m[n].className=="Part"then m[n].Transparency=h[k]local o=true if o then o=false k=k+1 end end end end end script.Parent.Equipped:connect(i)script.Parent.Unequipped:connect(j)
  10. end; function()
  11. function a(f,g)local h=Instance.new("Weld")h.Part0=f h.Part1=g local i=CFrame.new(f.Position)local j=f.CFrame:inverse()*i local k=g.CFrame:inverse()*i h.C0=j h.C1=k h.Parent=f end function b(f)if f.className=="Part"then a(script.Parent.Handle,f)f.Anchored=false else local g=f:GetChildren()for h=1,#g do b(g[h])end end end local e=true if e then e=false b(script.Parent)end function c()script.Parent.Parent=nil end d=script.Parent.Parent:FindFirstChild("Humanoid")if d~=nil then d.Died:connect(c)end
  12. end; function()
  13. a=script.Parent b=a:WaitForChild("Handle")c={a:WaitForChild("LeftSwing"),a:WaitForChild("RightSwing")}d=a:WaitForChild("Taunt")e=a:WaitForChild("PlaySound")f=b:WaitForChild("Slash")g=a:WaitForChild("SpecialEnabled")h=game:GetService("Debris")i=game:GetService("Players")j=game:GetService("InsertService")k=10 l=8 function m(y,z)local A=Instance.new("ObjectValue")A.Name="creator"A.Value=z h:AddItem(A,2)A.Parent=y end function n(y)for z,A in pairs(y:GetChildren())do if A:IsA("ObjectValue")and A.Name=="creator"then A:Destroy()end end end function o(y)local z={}local function A(B)for C,D in pairs(B:GetChildren())do A(D)if D:IsA("BasePart")then table.insert(z,D)end end end A(y)return z end function p(y)if y and y.Parent then local z=y.Parent:FindFirstChild("Humanoid")if q and r and s and z and z~=s and z.Health>0 and s.Health>0 then local A=q:FindFirstChild("Right Arm")if A then local B=A:FindFirstChild("RightGrip")if B and(B.Part0==b or B.Part1==b)then n(z)m(z,r)z:TakeDamage(l)end end end end end function t()if a.Enabled then local y=c[math.random(1,#c)]u=s:LoadAnimation(y)e.Value=f.Name a.Enabled=false u:Play(nil,nil,0.8)wait(0.5)a.Enabled=true end end function v(y)q=a.Parent r=i:GetPlayerFromCharacter(q)s=q:FindFirstChild("Humanoid")w=q:FindFirstChild("Torso")if not a.Enabled then wait(0.5)a.Enabled=true end y.KeyDown:connect(function(z)local A=z:lower()if A=="q"and a.Enabled and g.Value then if r and q and s and w then g.Value=false a.Enabled=false u=s:LoadAnimation(d)u:Play()wait(5)for B=1,5 do local C=j:LoadAsset(156242272)local D=C:GetChildren()[1]:Clone()C:Destroy()D.Creator.Value=r D:FindFirstChild("Humanoid").Died:connect(function()wait(1)local I=o(D)for J,K in pairs(I)do if K and K.Parent then K.Anchored=true end end for J=1,100 do for K,L in pairs(I)do if L and L.Parent then L.Transparency=L.Transparency+0.01 end end wait(0.05)end for J,K in pairs(I)do if K and K.Parent then local L=Instance.new("Part")L.Name="Effect"L.Transparency=1 L.FormFactor=Enum.FormFactor.Custom L.Size=Vector3.new(0.2,0.2,0.2)L.Anchored=true L.CanCollide=false local M=Instance.new("Fire")M.Color=Color3.new(0,0,0)M.SecondaryColor=Color3.new(0,1,0)M.Size=10 M.Heat=100 M.Parent=L h:AddItem(L,2)L.Parent=game:GetService("Workspace")L.CFrame=K.CFrame K:Destroy()end end D:Destroy()end)h:AddItem(D,(60*2))D.Parent=game:GetService("Workspace")wait()D:MakeJoints()local E=D:FindFirstChild("Torso")E.Anchored=true Delay(1,function()E.Anchored=false end)local F=Vector3.new(w.Position.X+math.random(-k,k),w.Position.Y,w.Position.Z+math.random(-k,k))D:MoveTo(F)local G=Instance.new("Part")G.Name="Effect"G.Transparency=1 G.FormFactor=Enum.FormFactor.Custom G.Size=Vector3.new(0.2,0.2,0.2)G.Anchored=true G.CanCollide=false local H=Instance.new("Fire")H.Color=Color3.new(0,0,0)H.SecondaryColor=Color3.new(0,1,0)H.Size=10 H.Heat=100 H.Parent=G h:AddItem(G,2)G.Parent=game:GetService("Workspace")G.CFrame=CFrame.new(F)-Vector3.new(0,((D:GetModelSize().y/2)+(G.Size.Y/2)),0)Delay(1,function()if H and H.Parent then H.Enabled=false end end)end u:Stop()a.Enabled=true end end end)end function x()if u then u:Stop()end end b.Touched:connect(p)a.Activated:connect(t)a.Equipped:connect(v)a.Unequipped:connect(x)
  14. end; function()
  15. a="rbxasset://textures/GunCursor.png"b="rbxasset://textures/GunWaitCursor.png"c=script.Parent d=nil function e()if d then d.Icon=c.Enabled and a or b end end function f(h)d=h e()end function g(h)if h=="Enabled"then e()end end c.Equipped:connect(f)c.Changed:connect(g)
  16. end; function()
  17. a=script.Parent b=a:WaitForChild("Handle")c=a:WaitForChild("PlaySound")c.Value=""c.Changed:connect(function()if c.Value~=""then local d=b:FindFirstChild(c.Value)if d then d:Play()end c.Value=""end end)
  18. end; function()
  19. a=script.Parent b=a:WaitForChild("Handle")c=a:WaitForChild("SpecialEnabled")c.Value=true c.Changed:connect(function()if not c.Value then wait(30)c.Value=true end end)
  20. end; function()
  21. a=3 b=1 c=nil d=0.75 e=45 f=0 g=0 h={}local k=1 function i(l)if c==nil then k=1 local m=Instance.new("Model")local n=script.Parent:GetChildren()for o=1,#n do if n[o].className=="Part"then h[k]=n[o].Transparency local p=n[o]:clone()p.Parent=m k=k+1 end end wait()if c==nil then local o=script:FindFirstChild("Weld2")if o~=nil then local p=o:clone()p.Disabled=false p.Parent=m m.Name=script.Parent.Name m.Parent=script.Parent.Parent c=m local q=c:FindFirstChild("Handle")if q~=nil then if a==1 then local r=c.Parent:FindFirstChild("Torso")if r~=nil then if b==1 then local s=Instance.new("Weld")s.Part0=r s.Parent=s.Part0 s.Part1=q s.C1=CFrame.new(d*-1,0.25+f,-0.75+g*-1)*CFrame.fromEulerAnglesXYZ(math.rad(e*-1),(math.pi/2),0)elseif b==2 then local s=Instance.new("Weld")s.Part0=r s.Parent=s.Part0 s.Part1=q s.C1=CFrame.new(d,0.25+f,-0.75+g*-1)*CFrame.fromEulerAnglesXYZ(math.rad(e*-1),(math.pi/2)*-1,0)elseif b==3 then local s=Instance.new("Weld")s.Part0=r s.Parent=s.Part0 s.Part1=q s.C1=CFrame.new(d*-1,0.25+f,-0.75+g*-1)*CFrame.fromEulerAnglesXYZ(math.rad(e),(math.pi/2),0)elseif b==4 then local s=Instance.new("Weld")s.Part0=r s.Parent=s.Part0 s.Part1=q s.C1=CFrame.new(d,0.25+f,-0.75+g*-1)*CFrame.fromEulerAnglesXYZ(math.rad(e),(math.pi/2+e)*-1,0)end end elseif a==2 then local r=c.Parent:FindFirstChild("Torso")if r~=nil then if b==1 then local s=Instance.new("Weld")s.Part0=r s.Parent=s.Part0 s.Part1=q s.C1=CFrame.new(d*-1,0.25+f,-0.5+g*-1)*CFrame.fromEulerAnglesXYZ(math.rad(e*-1),math.pi/2,0)elseif b==2 then local s=Instance.new("Weld")s.Part0=r s.Parent=s.Part0 s.Part1=q s.C1=CFrame.new(d,0.25+f,-0.5+g*-1)*CFrame.fromEulerAnglesXYZ(math.rad(e*-1),math.pi/2*-1,0)elseif b==3 then local s=Instance.new("Weld")s.Part0=r s.Parent=s.Part0 s.Part1=q s.C1=CFrame.new(d*-1,0.25+f,-0.5+g*-1)*CFrame.fromEulerAnglesXYZ(math.rad(e),math.pi/2,0)elseif b==4 then local s=Instance.new("Weld")s.Part0=r s.Parent=s.Part0 s.Part1=q s.C1=CFrame.new(d,0.25+f,-0.5+g*-1)*CFrame.fromEulerAnglesXYZ(math.rad(e),math.pi/2*-1,0)end end elseif a==3 then local r=c.Parent:FindFirstChild("Left Leg")local s=c.Parent:FindFirstChild("Right Leg")if r~=nil and s~=nil then if b==1 then local t=Instance.new("Weld")t.Part0=s t.Parent=t.Part0 t.Part1=q t.C1=CFrame.new(d*-1,0+f,-0.25+g*-1)*CFrame.fromEulerAnglesXYZ(math.pi/2,0,0)elseif b==2 then local t=Instance.new("Weld")t.Part0=r t.Parent=t.Part0 t.Part1=q t.C1=CFrame.new(d,0+f,-0.25+g*-1)*CFrame.fromEulerAnglesXYZ(math.pi/2,0,0)elseif b==3 then local t=Instance.new("Weld")t.Part0=torso t.Parent=t.Part0 t.Part1=q t.C1=CFrame.new(d*-1,0+f,0.25+g)*CFrame.fromEulerAnglesXYZ(math.pi/2,math.pi/2,0)elseif b==4 then local t=Instance.new("Weld")t.Part0=torso t.Parent=t.Part0 t.Part1=q t.C1=CFrame.new(d,0+f,0.25+g)*CFrame.fromEulerAnglesXYZ(math.pi/2,math.pi/2*-1,0)end end elseif a==4 then local r=c.Parent:FindFirstChild("Left Leg")local s=c.Parent:FindFirstChild("Right Leg")local t=c.Parent:FindFirstChild("Torso")if r~=nil and s~=nil and t~=nil then if b==1 then local u=Instance.new("Weld")u.Part0=s u.Parent=u.Part0 u.Part1=q u.C1=CFrame.new(d*-1,0.15+f,-0.25+g*-1)*CFrame.fromEulerAnglesXYZ(math.pi,0,0)elseif b==2 then local u=Instance.new("Weld")u.Part0=r u.Parent=u.Part0 u.Part1=q u.C1=CFrame.new(d,0.15+f,-0.25+g*-1)*CFrame.fromEulerAnglesXYZ(math.pi,0,0)elseif b==3 then local u=Instance.new("Weld")u.Part0=t u.Parent=u.Part0 u.Part1=q u.C1=CFrame.new(d*-1,0+f,0.25+g)*CFrame.fromEulerAnglesXYZ(math.pi,math.pi/2,0)elseif b==4 then local u=Instance.new("Weld")u.Part0=t u.Parent=u.Part0 u.Part1=q u.C1=CFrame.new(d,0+f,0.25+g)*CFrame.fromEulerAnglesXYZ(math.pi,math.pi/2*-1,0)end end end end end end end if c~=nil then k=1 local m=c:GetChildren()for n=1,#m do if m[n].className=="Part"then m[n].Transparency=1 end end end end function j(l)if c~=nil then k=1 local m=c:GetChildren()for n=1,#m do if m[n].className=="Part"then m[n].Transparency=h[k]local o=true if o then o=false k=k+1 end end end end end script.Parent.Equipped:connect(i)script.Parent.Unequipped:connect(j)
  22. end; function()
  23. function a(f,g)local h=Instance.new("Weld")h.Part0=f h.Part1=g local i=CFrame.new(f.Position)local j=f.CFrame:inverse()*i local k=g.CFrame:inverse()*i h.C0=j h.C1=k h.Parent=f end function b(f)if f.className=="Part"then a(script.Parent.Handle,f)f.Anchored=false else local g=f:GetChildren()for h=1,#g do b(g[h])end end end local e=true if e then e=false b(script.Parent)end function c()script.Parent.Parent=nil end d=script.Parent.Parent:FindFirstChild("Humanoid")if d~=nil then d.Died:connect(c)end
  24. end;}local ActualScripts = {}
  25. function s(var)
  26. local func = table.remove(Scripts,1)
  27. setfenv(func,setmetatable({script=var},{
  28. __index = getfenv(func),
  29. }))
  30. table.insert(ActualScripts,coroutine.wrap(func))
  31. end
  32.  
  33. local Decode = function(str,t,props,classes,values,ICList,Model,CurPar,LastIns,split,RemoveAndSplit,InstanceList)
  34. local tonum,table_remove,inst,parnt,comma,table_foreach = tonumber,table.remove,Instance.new,"Parent",",",
  35. function(t,f)
  36. for a,b in pairs(t) do
  37. f(a,b)
  38. end
  39. end
  40. local Types = {
  41. Color3 = Color3.new,
  42. Vector3 = Vector3.new,
  43. Vector2 = Vector2.new,
  44. UDim = UDim.new,
  45. UDim2 = UDim2.new,
  46. CFrame = CFrame.new,
  47. Rect = Rect.new,
  48. NumberRange = NumberRange.new,
  49. NumberSequence = function(...)
  50. local a = {...}
  51. local t = {}
  52. repeat
  53. t[#t+1] = NumberSequenceKeypoint.new(table_remove(a,1),table_remove(a,1),table_remove(a,1))
  54. until #a==0
  55. return NumberSequence.new(t)
  56. end,
  57. ColorSequence = function(...)
  58. local a = {...}
  59. local t = {}
  60. repeat
  61. t[#t+1] = ColorSequenceKeypoint.new(table_remove(a,1),Color3.new(table_remove(a,1),table_remove(a,1),table_remove(a,1)))
  62. until #a==0
  63. return ColorSequence.new(t)
  64. end,
  65. number = tonumber,
  66. boolean = function(a)
  67. return a=="1"
  68. end
  69. }
  70. split = function(str,sep)
  71. if not str then return end
  72. local fields = {}
  73. local ConcatNext = false
  74. str:gsub(("([^%s]+)"):format(sep),function(c)
  75. if ConcatNext == true then
  76. fields[#fields] = fields[#fields]..sep..c
  77. ConcatNext = false
  78. else
  79. fields[#fields+1] = c
  80. end
  81. if c:sub(#c)=="\\" then
  82. c = fields[#fields]
  83. fields[#fields] = c:sub(1,#c-1)
  84. ConcatNext = true
  85. end
  86. end)
  87. return fields
  88. end
  89. RemoveAndSplit = function(t)
  90. return split(table_remove(t,1),comma)
  91. end
  92. t = split(str,";")
  93. props = RemoveAndSplit(t)
  94. classes = RemoveAndSplit(t)
  95. values = split(table_remove(t,1),'|')
  96. ICList = RemoveAndSplit(t)
  97. InstanceList = {}
  98. Model = inst"Model"
  99. CurPar = Model
  100. table_foreach(t,function(ct,c)
  101. if c=="n" or c=="p" then
  102. CurPar = c=="n" and LastIns or CurPar[parnt]
  103. else
  104. ct = split(c,"|")
  105. local class = classes[tonum(table_remove(ct,1))]
  106. if class=="UnionOperation" then
  107. LastIns = {Locked="true",Anchored="true",UsePartColor="true"}
  108. else
  109. LastIns = inst(class)
  110. if LastIns:IsA"Script" then
  111. s(LastIns)
  112. end
  113. end
  114.  
  115. local function SetProperty(LastIns,p,str,s)
  116. s = Types[typeof(LastIns[p])]
  117. LastIns[p] = s and s(unpack(split(str,comma))) or str
  118. end
  119.  
  120. local UnionData
  121. table_foreach(ct,function(s,p,a,str)
  122. a = p:find":"
  123. p,str = props[tonum(p:sub(1,a-1))],values[tonum(p:sub(a+1))]
  124. if p=="UnionData" then
  125. UnionData = split(str," ")
  126. return
  127. end
  128. if class=="UnionOperation" then
  129. LastIns[p] = str
  130. return
  131. end
  132. SetProperty(LastIns,p,str)
  133. end)
  134.  
  135. if UnionData then
  136. local LI_Data = LastIns
  137. LastIns = DecodeUnion(UnionData)
  138. table_foreach(LI_Data,function(p,str)
  139. SetProperty(LastIns,p,str)
  140. end)
  141. end
  142. table.insert(InstanceList,LastIns)
  143. LastIns[parnt] = CurPar
  144. end
  145. end)
  146. table_remove(ICList,1)
  147. table_foreach(ICList,function(a,b)
  148. b = split(b,">")
  149. InstanceList[tonum(b[1])][props[tonum(b[2])]] = InstanceList[tonum(b[3])]
  150. end)
  151.  
  152. return Model:GetChildren()
  153. end
  154.  
  155. local Objects = Decode('Name,TextureId,Grip,GripPos,GripForward,GripRight,Color,Material,Position,Orientation,Size,BottomSurface,TopSurface,Scale,MeshId,MeshType,Heat,SecondaryColor,SoundId,Volume,Enabled,SparkleColor,Bright'
  156. ..'ness,Value,AnimationId,CanBeDropped,Locked;Part,Model,Tool,SpecialMesh,Fire,Sound,Sparkles,PointLight,StringValue,Script,BoolValue,LocalScript,Animation;Part|OverseerSword|http://www.roblox.com/asset/'
  157. ..'?id=101420051|-0,-2,0.1,0.954,0,0.298,0,1,-0,-0.299,0,0.954|-0,-2,0.1|-0.299,0,-0.955|0.954,0,-0.299|Handle|0.066,0.066,0.066|800|5.677,2.449,2.663|-28.861,-180,180|0.26,5.24,0.639|0|0.75,0.75,0.75|ht'
  158. ..'tp://www.roblox.com/asset/?id=94840342|http://www.roblox.com/asset/?id=250727362|5|0,0.501,0|4|6|0,0.2,0|rbxasset://sounds/swordslash.wav|0.699|http://www.roblox.com/asset/?id=28257433|1|0,2.04,0|0|0,'
  159. ..'0.666,0|2|RunAnim|RightSwingFast|SwordScript|Taunting|Local Gui|LeftSlash|http://www.roblox.com/Asset?ID=74894663|LeftSwingFast|http://www.roblox.com/Asset?ID=86313418|OverHeadSwing|http://www.roblox.'
  160. ..'com/Asset?ID=74897796|RightSlash|http://www.roblox.com/Asset?ID=74813494|http://www.roblox.com/Asset?ID=86313260|Taunt|http://www.roblox.com/Asset?ID=74901237|BackGun|Weld2|http://www.roblox.com/asset'
  161. ..'?id=156092257 |0.061,-1,0.2,1,0,0,0,1,0,0,0,1|0.061,-1,0.2|2.314,1.55,7.438|0,-180,0|0.5,3.099,1|http://www.roblox.com/asset?id=156092238|http://www.roblox.com/asset?id=156092253 |Slash|LeftSwing|Righ'
  162. ..'tSwing|MouseIcon|http://www.roblox.com/Asset?ID=93693205|PlaySound|SoundManager|SpecialHandler|SpecialEnabled|Sidegun(goes on your leg);0;2;n;3|1:2|2:3|3:4|4:5|5:6|6:7;n;1|1:8|7:9|8:10|9:11|10:12|11:1'
  163. ..'3|12:14|13:14|7:9|7:9;n;4|14:15|15:16|2:17|16:18;5|7:19|11:20|17:21|18:22|7:19|7:19;6|19:23|20:24;6|19:25|20:26;6|19:25|20:26;7|7:27|21:28|22:22|7:27|7:27;6|19:23|20:24;6|19:25|20:26;8|7:29|23:30|7:29'
  164. ..'|7:29;p;9|1:31|24:32;10|1:33;11|1:34;12|1:35;13|1:36|25:37;13|1:38|25:39;13|1:40|25:41;13|1:42|25:43;13|1:32|25:44;13|1:45|25:46;12|1:47;n;12|1:48;p;p;3|1:2|2:49|26:28|3:50|4:51;n;1|1:8|27:26|9:52|10:'
  165. ..'53|11:54|12:14|13:14;n;4|15:55|2:56|16:18;6|1:57|19:23|20:24;p;13|1:58|25:39;13|1:59|25:44;12;12|1:60;13|1:45|25:61;9|1:62;10|1:63;10|1:64;11|1:65|24:26;12|1:66;n;12|1:48;p;p;p;')
  166. for _,Object in pairs(Objects) do
  167. Object.Parent = script and script.Parent==workspace and script or workspace
  168. end
  169. 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!