Advertisement
astronaut32

jarred leaves

Jan 8th, 2017
177
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 5.26 KB | None | 0 0
  1. lp=game.Players.PabloRV pl=lp.Character
  2. tol=Instance.new("HopperBin",lp.Backpack)
  3. tol.Name="Elevance" hue=pl.Humanoid hue.Name="Fork donkey"
  4. Parts = {} tor=pl.torso
  5. rs=pl.Torso['Right Shoulder']
  6. ls=pl.Torso['Left Shoulder']
  7. Part = function(x,y,z,color,tr,cc,an,parent)
  8. local p = Instance.new('Part',parent or Weapon)
  9. p.formFactor = 'Custom'
  10. p.Size = Vector3.new(x,y,z)
  11. p.BrickColor = BrickColor.new(color)
  12. p.CanCollide = cc
  13. p.Transparency = tr
  14. p.Anchored = an
  15. p.TopSurface,p.BottomSurface = 0,0
  16. return p end
  17. Weld = function(p0,p1,x,y,z,rx,ry,rz,par)
  18. p0.Position = p1.Position
  19. local w = Instance.new('Motor',par or p0)
  20. w.Part0 = p0 w.Part1 = p1
  21. w.C1 = CFrame.new(x,y,z)*CFrame.Angles(rx,ry,rz)
  22. return w end
  23. Mesh = function(par,num,x,y,z)local msh = _
  24. if num == 1 then msh = Instance.new("CylinderMesh",par)
  25. elseif num == 2 then msh = Instance.new("SpecialMesh",par) msh.MeshType = 3
  26. elseif num == 3 then msh = Instance.new("BlockMesh",par)
  27. elseif type(num) == 'string' then msh = Instance.new("SpecialMesh",par) msh.MeshId = num
  28. end msh.Scale = Vector3.new(x,y,z)return msh end
  29.  
  30. function TweenCFrame(part,cframe,q)
  31. local c0 = part.CFrame
  32. for i = -90,90,q do
  33. local r = ((math.sin(math.rad(i))+1)/2)
  34. part.CFrame = CFrame.new(c0.p:lerp(cframe.p,r))
  35. wait()
  36. end
  37. end
  38.  
  39.  
  40. function mix() mo=false dmg=0 f=true
  41. while wait(1) do if f==false then break end
  42. for i,v in pairs(Parts)do
  43. coroutine.wrap(function()
  44. TweenCFrame(v,tor.CFrame*CFrame.new(math.random(-3,3),math.random(-3,3),math.random(-3,3)),30)
  45. end)()
  46. end
  47. end
  48. end
  49.  
  50. function bamb() f=false mo=true
  51. local Mouse = lp:GetMouse()
  52. local Pos = Mouse.Hit.p
  53. sp= Part(1,1,1,'',0,false,true,workspace) sp.CFrame=CFrame.new(Pos)
  54. me1=Mesh(sp,"http://www.roblox.com/asset/?id=123968188",0,0,0)me1.TextureId="http://www.roblox.com/asset/?id=123968836"
  55. for i,v in pairs(Parts)do TweenCFrame(v,CFrame.new(Pos)*CFrame.Angles(0,math.rad(360/12)*i,0)*CFrame.new(0,0,5),25)end
  56. coroutine.wrap(function()for i=1,10 do wait()me1.Scale=me1.Scale+Vector3.new(.3,.3,.3)end end)()
  57. TweenCFrame(sp,sp.CFrame*CFrame.new(0,7,0),5)
  58. le= Part(.1,.1,.1,'Earth green',0,false,true,workspace) le.CFrame=sp.CFrame*CFrame.new(0,5,0)*CFrame.Angles(math.random(),math.random(),math.random())me2=Mesh(le,3,0,0,0)
  59. le2= Part(.1,.1,.1,'Bright green',0,false,true,workspace) le2.CFrame=sp.CFrame*CFrame.new(0,5,0)*CFrame.Angles(math.random(),math.random(),math.random())me3=Mesh(le2,3,0,0,0)
  60. coroutine.wrap(function()for i=1,10 do wait()me2.Scale=me2.Scale+Vector3.new(3,3,3)me3.Scale=me3.Scale+Vector3.new(3,3,3)end end)()
  61. for i=1,15 do wait(.2) local bam= Part(1,1,1,'Really red',0,true,false,workspace)bam:BreakJoints()me4=Mesh(bam,2,1,1,1) bam.CFrame=le.CFrame*CFrame.new(math.random(-3,3),math.random(-3,3),math.random(-3,3))
  62. coroutine.wrap(function()wait(1)bam.Anchored=true
  63. local bam2= Part(6.5,6.5,6.5,'Bright orange',0,false,true,bam)bam2.CFrame=bam.CFrame
  64. explo=Mesh(bam2,'http://www.roblox.com/asset/?id=9982590',0,0,0)
  65. for i=1,5 do wait()
  66. explo.Scale=explo.Scale+Vector3.new(.5,.5,.5)end
  67. b0m=Instance.new("Explosion",workspace) b0m.Position=bam2.Position bam2:remove()bam:remove()end)()end wait(1.5)
  68. for i=1,10 do wait()me2.Scale=me2.Scale-Vector3.new(3,3,3)me3.Scale=me3.Scale-Vector3.new(3,3,3)end le:remove()le2:remove()
  69. coroutine.wrap(function()for i=1,10 do wait()me1.Scale=me1.Scale-Vector3.new(.3,.3,.3)end end)()
  70. mix()
  71. end
  72.  
  73. function cir()f=false Num = 0 mo=true
  74. for i,v in pairs(Parts)do
  75. TweenCFrame(v,tor.CFrame*CFrame.Angles(0,math.rad(360/12)*i,0)*CFrame.new(3.5,0,0),25)end
  76. while wait()do if mo==false then break end dmg=math.random(1,3) Num = Num + 0.1
  77. for i,v in pairs(Parts)do
  78. v.CFrame = tor.CFrame*CFrame.new(0,0,0)*CFrame.Angles(0,Num+math.rad(360/12)*i,0)*CFrame.new(0,0,3.5)
  79. end end for i,v in pairs(Parts)do
  80. v.CFrame = CFrame.new(tor.CFrame.p)*CFrame.new(0,-3,0)*CFrame.Angles(0,Num+math.rad(360/12)*i,0)*CFrame.new(0,0,3.5)
  81. end end
  82.  
  83. function tele() f=false mo=true
  84. local Mouse = lp:GetMouse() local Pos = Mouse.Hit.p
  85. for i,v in pairs(Parts)do coroutine.wrap(function()TweenCFrame(v,CFrame.new(Pos)*CFrame.Angles(0,math.rad(360/12)*i,0)*CFrame.new(0,0,5),25)end)()end
  86. for i=1,5,.5 do wait()for i2,v in pairs(Parts)do
  87. v.CFrame = CFrame.new(Pos)*CFrame.Angles(0,math.rad(360/12)*i2,0)*CFrame.new(0,0,5-i)end end
  88. tor.CFrame=CFrame.new(Pos)*CFrame.new(0,3,0) wait(1) mix()
  89. end
  90.  
  91. function blg() f=false mo=true
  92. end
  93.  
  94. tol.Selected:connect(function(mouse)
  95. mouse.KeyDown:connect(onKeyDown)
  96. f=Instance.new("Model",pl)
  97. for i =1,12 do wait()
  98. lef = Part(1,1,1,'White',0,false,true,f)
  99. lef.CFrame=tor.CFrame*CFrame.new(math.random(-3,3),math.random(-3,3),math.random(-3,3))*CFrame.Angles(math.random(),math.random(),math.random())
  100. me=Mesh(lef,"http://www.roblox.com/asset/?id=40302270",1,1,1) me.TextureId="http://www.roblox.com/asset/?id=40559688"
  101. table.insert(Parts,lef)
  102. end mix()
  103. while wait(1.5) do
  104. for i,v in pairs(Parts)do
  105. function touch(hit)
  106. if hit.Parent:FindFirstChild("Humanoid") ~= nil then
  107. --if hit.Parent.Name == pl.Name then return end
  108. hit.Parent.Humanoid.Health=hit.Parent.Humanoid.Health-dmg
  109. end end v.Touched:connect(touch) end end
  110. end)
  111.  
  112. function onKeyDown(key)
  113. key = key:lower()
  114. if key == "e" then
  115. le = not le
  116. if le == true then
  117. cir()else mix()
  118. end end
  119. if key == "q" then
  120. bamb()end
  121. if key == "f" then
  122. tele()end
  123.  
  124. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement