Advertisement
supreim

Untitled

Jan 29th, 2016
101
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 36.60 KB | None | 0 0
  1. wt = 0.05 s = script it = Instance.new v3 = Vector3.new c3 = Color3.new ud = UDim2.new cf = CFrame.new ca = CFrame.Angles pi = math.pi rd = math.rad
  2. bc = BrickColor.new ab = math.abs de = math.deg ts = tostring tn = tonumber ti = table.insert tr = table.remove
  3. cr = coroutine.resume cc = coroutine.create
  4. asset = "http://www.roblox.com/asset/?id="
  5. sr = string.reverse sl = string.lower su = string.upper
  6. Serv = {} Serv.p = game:GetService(sr("sreyalP")) Serv.l = game:GetService(sr("gnithgiL"))
  7. Serv.is = game:GetService(sr("ecivreStresnI")) if game:findFirstChild(sr("revreSkrowteN")) then Serv.ns = game:GetService(sr("revreSkrowteN")) else NetworkServer = nil end
  8. Serv.sg = game:GetService(sr("iuGretratS")) Serv.sp = game:GetService(sr("kcaPretratS")) Serv.d = game:GetService(sr("sirbeD"))
  9. Decs = {}
  10. Decs.Crack = "49173398" Decs.Cloud = "1095708" Decs.Spike = "1033714" Decs.Rock = "1290033" Decs.Crown = "1323306"
  11. function ft(tablez,item) if not tablez or not item then return nil end for i=1,#tablez do if tablez == item then return i end end return nil end
  12. function re(par,obj) if type(par) ~= "userdata" or type(obj) ~= "string" then return nil end if par:findFirstChild(obj) then par[obj]:Remove() end end
  13. function pa(pa,sh,x,y,z,c,a,tr,re,bc2) local fp = nil if sh ~= "Wedge" and sh ~= "CornerWedge" then fp = it("Part",pa) fp.Shape = sh fp.formFactor = "Custom" elseif sh == "Wedge" then fp = it("WedgePart",pa) fp.formFactor = "Custom"
  14. elseif sh == "CornerWedge" then fp = it("CornerWedgePart",pa) end fp.Size = v3(x,y,z) fp.CanCollide = c fp.Anchored = false fp.BrickColor = bc(bc2) fp.Transparency = tr fp.Reflectance = re fp.BottomSurface = 0
  15. fp.TopSurface = 0 fp.CFrame = t.CFrame + Vector3.new(0,50,0) fp.Velocity = Vector3.new(0,10,0) fp:BreakJoints() return fp end
  16. function clearit(tab) for xx=1,#tab do tab[xx]:Remove() end end
  17. function weld(pa,p0,p1,x,y,z,a,b,c) local fw = it("Weld",pa) fw.Part0 = p0 fw.Part1 = p1 fw.C0 = cf(x,y,z) *ca(a,b,c) return fw end
  18. function spm(ty,pa,ss) local sp = it("SpecialMesh",pa) sp.MeshType = ty sp.Scale = Vector3.new(ss,ss,ss) end function mbm(pa,sx,sy,sz) local bm = Instance.new("BlockMesh",pa) bm.Scale = Vector3.new(sx,sy,sz) end
  19. function ra(mn,mx,dc) local tms = 1 if dc == nil then dc = 0 end if type(dc) == "number" and dc > 5 then dc = 5 end for zx=1,dc do tms = tms*10 end return math.random(mn*tms,mx*tms)/tms end
  20. p = Serv.p.supreim -- quickhack101
  21. bp = p.Backpack
  22. pg = p.PlayerGui
  23. c = p.Character
  24. he = c.Head
  25. t = c.Torso
  26. hu = c.Humanoid
  27. mou = nil
  28. re(c,"Hand")
  29. s = 2
  30.  
  31. --tool var
  32. Equip = false
  33. HTrans = 0
  34. HRef = 0
  35. HCol = "a"
  36. LaserCol = "Really black"
  37. LaserCol2 = "Really red"
  38. LaserCol3 = "Really black"
  39. Posing = "Follow"
  40. Facing = "Owner"
  41. Anim = {}
  42. Anim.a = "None"
  43. Anim.b = "None"
  44. Anim.Welding = 0
  45. local fingwide = 1.5*s
  46. local finghei = 2.8
  47. local tiphei = 2.55
  48. handoffset = v3(5,18,-8)*s
  49. bgx,bgy,bgz = -90,0,0
  50. w = {}
  51. Button = false
  52. --
  53. BlastMesh = it("FileMesh")
  54. BlastMesh.MeshId = "http://www.roblox.com/asset/?id=20329976"
  55. RingMesh = it("FileMesh")
  56. RingMesh.MeshId = "http://www.roblox.com/asset/?id=3270017"
  57. RockMesh = it("FileMesh")
  58. DiamondMesh = it("FileMesh")
  59. DiamondMesh.MeshId = "http://www.roblox.com/Asset/?id=9756362"
  60.  
  61. m = Instance.new("Model",c) m.Name = "Hand"
  62. Palm = pa(m,"Block",6*s,7*s,fingwide*2,true,false,HTrans,HRef,HCol) mbm(Palm,1,1,0.6)
  63. local x,y,z = Palm.Size.x,Palm.Size.y,Palm.Size.z
  64. bPoint1 = pa(m,"Block",0,0,0,false,false,HTrans,HRef,HCol)
  65. Point1 = weld(bPoint1,Palm,bPoint1,-x/2+(fingwide/2),y/2,0,0,0,0)
  66. pPoint1 = pa(m,"Block",fingwide,finghei*s,fingwide,true,false,HTrans,HRef,HCol) mbm(pPoint1,0.9,1,0.9)
  67. wPoint1 = weld(pPoint1,bPoint1,pPoint1,0,pPoint1.Size.y/2,0,0,0,0)
  68. bPoint2 = pa(m,"Block",0,0,0,false,false,HTrans,HRef,HCol)
  69. Point2 = weld(bPoint2,pPoint1,bPoint2,0,pPoint1.Size.y/2,0,0,0,0)
  70. pPoint2 = pa(m,"Block",fingwide,finghei*s,fingwide,true,false,HTrans,HRef,HCol) mbm(pPoint2,0.9,1,0.9)
  71. wPoint2 = weld(pPoint2,bPoint2,pPoint2,0,pPoint1.Size.y/2,0,0,0,0)
  72. bPoint3 = pa(m,"Block",0,0,0,false,false,HTrans,HRef,HCol)
  73. Point3 = weld(bPoint3,pPoint2,bPoint3,0,pPoint2.Size.y/2,0,0,0,0)
  74. pPoint3 = pa(m,"Block",fingwide,tiphei*s,fingwide,true,false,HTrans,HRef,HCol) mbm(pPoint3,0.9,1,0.9)
  75. wPoint3 = weld(pPoint3,bPoint3,pPoint3,0,pPoint3.Size.y/2,0,0,0,0)
  76. bMid1 = pa(m,"Block",0,0,0,false,false,HTrans,HRef,HCol)
  77. Mid1 = weld(bMid1,Palm,bMid1,-x/2+((fingwide/2)+((fingwide)*1)),y/2,0,0,0,0)
  78. pMid1 = pa(m,"Block",fingwide,(finghei*1.1)*s,fingwide,true,false,HTrans,HRef,HCol) mbm(pMid1,0.9,1,0.9)
  79. wMid1 = weld(pMid1,bMid1,pMid1,0,pMid1.Size.y/2,0,0,0,0)
  80. bMid2 = pa(m,"Block",0,0,0,false,false,HTrans,HRef,HCol)
  81. Mid2 = weld(bMid2,pMid1,bMid2,0,pMid1.Size.y/2,0,0,0,0)
  82. pMid2 = pa(m,"Block",fingwide,(finghei*1.1)*s,fingwide,true,false,HTrans,HRef,HCol) mbm(pMid2,0.9,1,0.9)
  83. wMid2 = weld(pMid2,bMid2,pMid2,0,pMid1.Size.y/2,0,0,0,0)
  84. bMid3 = pa(m,"Block",0,0,0,false,false,HTrans,HRef,HCol)
  85. Mid3 = weld(bMid3,pMid2,bMid3,0,pMid2.Size.y/2,0,0,0,0)
  86. pMid3 = pa(m,"Block",fingwide,(tiphei*1.1)*s,fingwide,true,false,HTrans,HRef,HCol) mbm(pMid3,0.9,1,0.9)
  87. wMid3 = weld(pMid3,bMid3,pMid3,0,pMid3.Size.y/2,0,0,0,0)
  88. bRing1 = pa(m,"Block",0,0,0,false,false,HTrans,HRef,HCol)
  89. Ring1 = weld(bRing1,Palm,bRing1,-x/2+((fingwide/2)+((fingwide)*2)),y/2,0,0,0,0)
  90. pRing1 = pa(m,"Block",fingwide,(finghei*0.98)*s,fingwide,true,false,HTrans,HRef,HCol) mbm(pRing1,0.9,1,0.9)
  91. wRing1 = weld(pRing1,bRing1,pRing1,0,pRing1.Size.y/2,0,0,0,0)
  92. bRing2 = pa(m,"Block",0,0,0,false,false,HTrans,HRef,HCol)
  93. Ring2 = weld(bRing2,pRing1,bRing2,0,pRing1.Size.y/2,0,0,0,0)
  94. pRing2 = pa(m,"Block",fingwide,(finghei*0.98)*s,fingwide,true,false,HTrans,HRef,HCol) mbm(pRing2,0.9,1,0.9)
  95. wRing2 = weld(pRing2,bRing2,pRing2,0,pRing1.Size.y/2,0,0,0,0)
  96. bRing3 = pa(m,"Block",0,0,0,false,false,HTrans,HRef,HCol)
  97. Ring3 = weld(bRing3,pRing2,bRing3,0,pRing2.Size.y/2,0,0,0,0)
  98. pRing3 = pa(m,"Block",fingwide,(tiphei*0.98)*s,fingwide,true,false,HTrans,HRef,HCol) mbm(pRing3,0.9,1,0.9)
  99. wRing3 = weld(pRing3,bRing3,pRing3,0,pRing3.Size.y/2,0,0,0,0)
  100. bPinkie1 = pa(m,"Block",0,0,0,false,false,HTrans,HRef,HCol)
  101. Pinkie1 = weld(bPinkie1,Palm,bPinkie1,-x/2+((fingwide/2)+((fingwide)*3)),y/2,0,0,0,0)
  102. pPinkie1 = pa(m,"Block",fingwide,(finghei*0.8)*s,fingwide,true,false,HTrans,HRef,HCol) mbm(pPinkie1,0.9,1,0.9)
  103. wPinkie1 = weld(pPinkie1,bPinkie1,pPinkie1,0,pPinkie1.Size.y/2,0,0,0,0)
  104. bPinkie2 = pa(m,"Block",0,0,0,false,false,HTrans,HRef,HCol)
  105. Pinkie2 = weld(bPinkie2,pPinkie1,bPinkie2,0,pPinkie1.Size.y/2,0,0,0,0)
  106. pPinkie2 = pa(m,"Block",fingwide,(finghei*0.8)*s,fingwide,true,false,HTrans,HRef,HCol) mbm(pPinkie2,0.9,1,0.9)
  107. wPinkie2 = weld(pPinkie2,bPinkie2,pPinkie2,0,pPinkie1.Size.y/2,0,0,0,0)
  108. bPinkie3 = pa(m,"Block",0,0,0,false,false,HTrans,HRef,HCol)
  109. Pinkie3 = weld(bPinkie3,pPinkie2,bPinkie3,0,pPinkie2.Size.y/2,0,0,0,0)
  110. pPinkie3 = pa(m,"Block",fingwide,(tiphei*0.8)*s,fingwide,true,false,HTrans,HRef,HCol) mbm(pPinkie3,0.9,1,0.9)
  111. wPinkie3 = weld(pPinkie3,bPinkie3,pPinkie3,0,pPinkie3.Size.y/2,0,0,0,0)
  112. bThumb1 = pa(m,"Block",0,0,0,false,false,HTrans,HRef,HCol)
  113. Thumb1 = weld(bThumb1,Palm,bThumb1,-x/2+(fingwide/7),-y*0.1,-fingwide*0.25,0,0,0)
  114. pThumb1 = pa(m,"Block",fingwide*1.4,(finghei*1)*s,fingwide*1.4,true,false,HTrans,HRef,HCol) mbm(pThumb1,0.9,1,0.9)
  115. wThumb1 = weld(pThumb1,bThumb1,pThumb1,0,pThumb1.Size.y/2,0,0,0,0)
  116. bThumb2 = pa(m,"Block",0,0,0,false,false,HTrans,HRef,HCol)
  117. Thumb2 = weld(bThumb2,pThumb1,bThumb2,0,pThumb1.Size.y/2,0,0,0,0)
  118. pThumb2 = pa(m,"Block",fingwide*1.3,(finghei*1)*s,fingwide*1.3,true,false,HTrans,HRef,HCol) mbm(pThumb2,0.9,1,0.9)
  119. wThumb2 = weld(pThumb2,bThumb2,pThumb2,0,pThumb1.Size.y/2,0,0,0,0)
  120. bThumb3 = pa(m,"Block",0,0,0,false,false,HTrans,HRef,HCol)
  121. Thumb3 = weld(bThumb3,pThumb2,bThumb3,0,pThumb2.Size.y/2,0,0,0,0)
  122. pThumb3 = pa(m,"Block",fingwide*1.25,(tiphei*1)*s,fingwide*1.25,true,false,HTrans,HRef,HCol) mbm(pThumb3,0.9,1,0.9)
  123. wThumb3 = weld(pThumb3,bThumb3,pThumb3,0,pThumb3.Size.y/2,0,0,0,0)
  124.  
  125. w["a1"] = Pinkie1
  126. w["a2"] = Pinkie2
  127. w["a3"] = Pinkie3
  128. w["b1"] = Ring1
  129. w["b2"] = Ring2
  130. w["b3"] = Ring3
  131. w["c1"] = Mid1
  132. w["c2"] = Mid2
  133. w["c3"] = Mid3
  134. w["d1"] = Point1
  135. w["d2"] = Point2
  136. w["d3"] = Point3
  137. w["e1"] = Thumb1
  138. w["e2"] = Thumb2
  139. w["e3"] = Thumb3
  140. w.e1.C1 = ca(0,rd(35),rd(-20))
  141. w.e2.C1 = ca(rd(20),0,0)
  142. w.e3.C1 = ca(rd(20),0,0)
  143. w.d1.C1 = ca(0,0,rd(-3))
  144. w.c1.C1 = ca(0,0,rd(-1))
  145. w.b1.C1 = ca(0,0,rd(1))
  146. w.a1.C1 = ca(0,0,rd(3))
  147. function c1(wexx,smmx,xx,yy,zz)
  148. coroutine.resume(coroutine.create(function()
  149. local xx2,yy2,zz2 = wexx.C1:toEulerAnglesXYZ()
  150. local aa,bb,cc = wexx.C0.x,wexx.C0.y,wexx.C0.z
  151. local twa = smmx/wt
  152. Anim.Welding = Anim.Welding + 1
  153. for i=0,twa,1 do wexx.C0 = cf(aa,bb,cc)
  154. wexx.C1 = ca(xx2-(((xx2-rd(xx))/twa)*i),yy2-(((yy2-rd(yy))/twa)*i),zz2-(((zz2-rd(zz))/twa)*i))
  155. wait()
  156. end
  157. Anim.Welding = Anim.Welding - 1
  158. end))
  159. end
  160. function CloseFing(fingz,spee) if spee == nil then spee = 1 end c1(w[fingz.. "1"],spee,80,0,0) c1(w[fingz.. "2"],spee,110,0,0) c1(w[fingz.. "3"],spee,30,0,0) end
  161. function OpenFing(fingz,spee) if spee == nil then spee = 1 end c1(w[fingz.. "1"],spee,2,0,0) c1(w[fingz.. "2"],spee,2,0,0) c1(w[fingz.. "3"],spee,2,0,0) end
  162. function HandSign(form,spee) form = form:lower() if spee == nil then spee = 1 end
  163. if form == "f" then
  164. CloseFing("d",spee) CloseFing("a",spee) CloseFing("b",spee)
  165. c1(w["c1"],spee,0,0,0) c1(w["c2"],spee,0,0,0) c1(w["c3"],spee,0,0,0)
  166. c1(w["e1"],spee,70,40,-90) c1(w["e2"],spee,50,0,0) c1(w["e3"],spee,50,0,0)
  167. elseif form == "fist" then
  168. CloseFing("d",spee) CloseFing("a",spee) CloseFing("b",spee) CloseFing("c",spee)
  169. c1(w["e1"],spee,70,40,-90) c1(w["e2"],spee,50,0,0) c1(w["e3"],spee,50,0,0)
  170. elseif form == "pointer" then
  171. CloseFing("a",spee) CloseFing("b",spee) CloseFing("c",spee)
  172. c1(w["d1"],spee,5,0,0) c1(w["d2"],spee,5,0,0) c1(w["d3"],spee,5,0,0)
  173. c1(w["e1"],spee,70,40,-90) c1(w["e2"],spee,50,0,0) c1(w["e3"],spee,50,0,0)
  174. elseif form == "v" then
  175. CloseFing("a",spee) CloseFing("b",spee)
  176. c1(w["c1"],spee,1,0,15) c1(w["c2"],spee,1,0,0) c1(w["c3"],spee,1,0,0)
  177. c1(w["d1"],spee,1,0,-15) c1(w["d2"],spee,1,0,0) c1(w["d3"],spee,1,0,0)
  178. c1(w["e1"],spee,70,40,-90) c1(w["e2"],spee,50,0,0) c1(w["e3"],spee,50,0,0)
  179. elseif form == "free" or form == "five" then
  180. OpenFing("a",spee) OpenFing("b",spee) OpenFing("c",spee) OpenFing("d",spee)
  181. c1(w["e1"],spee,0,35,-20) c1(w["e2"],spee,20,0,0) c1(w["e3"],spee,20,0,0)
  182. elseif form == "ride" then
  183. c1(w["a1"],spee,60,0,0) c1(w["a2"],spee,-30,0,0) c1(w["a3"],spee,-30,0,0)
  184. c1(w["b1"],spee,30,0,0) c1(w["b2"],spee,65,0,0) c1(w["b3"],spee,60,0,0)
  185. c1(w["c1"],spee,30,0,0) c1(w["c2"],spee,65,0,0) c1(w["c3"],spee,60,0,0)
  186. c1(w["d1"],spee,30,0,0) c1(w["d2"],spee,65,0,0) c1(w["d3"],spee,60,0,0)
  187. c1(w["e1"],spee,-70,185,0) c1(w["e2"],spee,30,0,0) c1(w["e3"],spee,30,0,0)
  188. elseif form == "gun" then
  189. CloseFing("a",spee) CloseFing("b",spee)
  190. c1(w["c1"],spee,0,0,1) c1(w["c2"],spee,0,0,0) c1(w["c3"],spee,0,0,0)
  191. c1(w["d1"],spee,0,0,-1) c1(w["d2"],spee,0,0,0) c1(w["d3"],spee,0,0,0)
  192. c1(w["e1"],spee,-60,90,0) c1(w["e2"],spee,20,0,0) c1(w["e3"],spee,-20,0,0)
  193. elseif form == "wide" then
  194. c1(w["a1"],spee,-3,0,45) c1(w["a2"],spee,-3,0,0) c1(w["a3"],spee,-3,0,0)
  195. c1(w["b1"],spee,-3,0,15) c1(w["b2"],spee,-3,0,0) c1(w["b3"],spee,-3,0,0)
  196. c1(w["c1"],spee,-3,0,-15) c1(w["c2"],spee,-3,0,0) c1(w["c3"],spee,-3,0,0)
  197. c1(w["d1"],spee,-3,0,-45) c1(w["d2"],spee,-3,0,0) c1(w["d3"],spee,-3,0,0)
  198. c1(w["e1"],spee,-70,90,0) c1(w["e2"],spee,10,0,0) c1(w["e3"],spee,-10,0,0)
  199. elseif form == "wide2" then
  200. c1(w["a1"],spee,-18,0,45) c1(w["a2"],spee,36,0,0) c1(w["a3"],spee,30,0,0)
  201. c1(w["b1"],spee,-18,0,15) c1(w["b2"],spee,36,0,0) c1(w["b3"],spee,30,0,0)
  202. c1(w["c1"],spee,-18,0,-15) c1(w["c2"],spee,36,0,0) c1(w["c3"],spee,30,0,0)
  203. c1(w["d1"],spee,-18,0,-45) c1(w["d2"],spee,36,0,0) c1(w["d3"],spee,30,0,0)
  204. c1(w["e1"],spee,-50,90,-10) c1(w["e2"],spee,5,0,-30) c1(w["e3"],spee,-10,0,-40)
  205. elseif form == "grab2" then
  206. c1(w["a1"],spee,-70,-65,0) c1(w["a2"],spee,40,0,0) c1(w["a3"],spee,20,0,0)
  207. c1(w["b1"],spee,-70,-20,0) c1(w["b2"],spee,40,0,0) c1(w["b3"],spee,20,0,0)
  208. c1(w["c1"],spee,-70,20,-0) c1(w["c2"],spee,40,0,0) c1(w["c3"],spee,20,0,0)
  209. c1(w["d1"],spee,-70,65,-0) c1(w["d2"],spee,40,0,0) c1(w["d3"],spee,20,0,0)
  210. c1(w["e1"],spee,-70,150,0) c1(w["e2"],spee,30,0,0) c1(w["e3"],spee,30,0,0)
  211. elseif form == "grab3" then
  212. c1(w["a1"],spee,-30,-40,30) c1(w["a2"],spee,50,0,0) c1(w["a3"],spee,35,0,0)
  213. c1(w["b1"],spee,-30,-15,12) c1(w["b2"],spee,50,0,0) c1(w["b3"],spee,35,0,0)
  214. c1(w["c1"],spee,-30,15,-12) c1(w["c2"],spee,50,0,0) c1(w["c3"],spee,35,0,0)
  215. c1(w["d1"],spee,-30,40,-30) c1(w["d2"],spee,50,0,0) c1(w["d3"],spee,35,0,0)
  216. c1(w["e1"],spee,-55,205,0) c1(w["e2"],spee,30,0,0) c1(w["e3"],spee,30,0,0)
  217. end
  218. end
  219. function ColFings(iscol)
  220. pPinkie1.CanCollide = iscol
  221. pPinkie2.CanCollide = iscol
  222. pPinkie3.CanCollide = iscol
  223. pRing1.CanCollide = iscol
  224. pRing2.CanCollide = iscol
  225. pRing3.CanCollide = iscol
  226. pMid1.CanCollide = iscol
  227. pMid2.CanCollide = iscol
  228. pMid3.CanCollide = iscol
  229. pPoint1.CanCollide = iscol
  230. pPoint2.CanCollide = iscol
  231. pPoint3.CanCollide = iscol
  232. pThumb1.CanCollide = iscol
  233. pThumb2.CanCollide = iscol
  234. pThumb3.CanCollide = iscol
  235. end
  236. function ray(Pos, Dir)
  237. return Workspace:FindPartOnRay(Ray.new(Pos, Dir.unit *999), c)
  238. end
  239. function Earthsplosion(pos,siz,dmg,rndmg,forc,eos) local colz22 = "Really red" if eos == nil or eos == "earth" then eos = "earth" else colz22 = "Really black" eos = "sand" end
  240. coroutine.resume(coroutine.create(function()
  241. if eos == "earth" then local cr = pa(m,"Block",((14*siz)/10)*s,0,((14*siz)/10)*s,false,false,1,0,"") cr.Anchored = true cr.CFrame = pos *ca(rd(0),rd(ra(-360,360)),rd(0)) cr.CFrame = cr.CFrame + v3(ra(-siz*10,siz*10)/22,0,ra(-siz*10,siz*10)/22)
  242. local de = it("Decal",cr) de.Face = "Top" de.Texture = asset .. Decs.Crack Serv.d:AddItem(cr,25) end
  243. for i=1,4 do
  244. coroutine.resume(coroutine.create(function()
  245. local sw = pa(m,"Block",(siz/3)*s,(siz*1.3)*s,(siz/3)*s,true,true,0,0,colz22) sw.Anchored = true sw.CFrame = pos *cf(ra(-3*s,3*s),0,ra(-3*s,3*s)) *ca(rd(ra(-27,27)),rd(ra(-360,360)),rd(ra(-27,27))) local swm = it("SpecialMesh",sw) if eos == "earth" then swm.MeshType = "FileMesh"
  246. swm.MeshId = asset .. Decs.Spike else swm.MeshType = "Sphere" end if eos == "earth" then swm.Scale = v3(sw.Size.x/1.3,sw.Size.y*1.2,sw.Size.z/1.3)
  247. else swm.Scale = v3(sw.Size.x/10,sw.Size.y/37,sw.Size.z/10) end sw.CFrame = sw.CFrame + v3(ra(-0.3*siz*s,0.3*siz*s,7),0,ra(-0.3*siz*s,0.3*siz*s)) sw.CFrame = sw.CFrame * cf(0,-sw.Size.y/1.4,0)
  248. Dustplosion(cf(pos.p+v3(0,2*s,0)),18*s,{"Really red","Really black","Really red"},1)
  249. if eos == "earth" then
  250. for x=1,8 do
  251. sw.CFrame = sw.CFrame *cf(0,sw.Size.y/8,0) wait() end wait(ra(1,5))
  252. for x=1,20 do
  253. sw.CFrame = sw.CFrame *cf(0,-sw.Size.y/20,0) wait()
  254. end sw:Remove()
  255. else
  256. for x=1,25 do
  257. sw.CFrame = sw.CFrame *cf(0,sw.Size.y/25,0) sw.Transparency = x/25 - 0.1 swm.Scale = swm.Scale + v3(0.025,0.025,0.025) wait() end
  258. end sw:Remove()
  259. end)) end
  260. wait(0.3)
  261. DmgHumanoidsNear(pos.p,dmg,rndmg,5.5*s*(siz/4),forc)
  262. end))
  263. end
  264.  
  265. function Dustplosion(onb,scale,col,cls) coroutine.resume(coroutine.create(function()
  266. for x=1,cls do coroutine.resume(coroutine.create(function()
  267. local sw = pa(m,"Block",1*s,0,1*s,false,false,0.2,0,col[ra(1,#col)]) sw.Anchored = true sw.CFrame = onb *ca(rd(ra(-35,35)),rd(ra(-360,360)),rd(ra(-35,35))) local swm = it("SpecialMesh",sw) swm.MeshType = "FileMesh"
  268. swm.MeshId = asset .. Decs.Cloud sw.CFrame = sw.CFrame + v3(ra(-scale,scale)/8,ra(-scale,scale)/8,ra(-scale,scale)/8)
  269. for i=1,scale,0.25 do
  270. swm.Scale = v3(i*1.5,i*1,i*1.5) sw.Transparency = ((i/scale)/2) + 0.45
  271. wait()
  272. end
  273. sw:Remove()
  274. end)) end
  275. end)) end
  276. function ShockWave(onb,scale,col) coroutine.resume(coroutine.create(function() local sw = pa(m,"Block",1*s,0,1*s,false,false,0.2,0,col) sw.Anchored = true sw.CFrame = onb *ca(rd(90),0,0) local swm = it("SpecialMesh",sw) swm.MeshType = "FileMesh" swm.MeshId = RingMesh.MeshId
  277. for i=1,scale,0.75 do swm.Scale = v3(i*1.5,i*1.5,i*1.5) sw.Transparency = (i/scale) + 0 wait() end sw:Remove() end)) end
  278. function BlastWave(onb,scale,ymes,col) coroutine.resume(coroutine.create(function()
  279. local sw = pa(m,"Block",1*s,0,1*s,false,false,0.2,0,col) sw.Anchored = true sw.CFrame = onb *ca(rd(0),0,0) local swm = it("SpecialMesh",sw) swm.MeshType = "FileMesh"
  280. swm.MeshId = BlastMesh.MeshId
  281. for i=1,scale,scale/11 do
  282. swm.Scale = v3(i*1.25,i*ymes,i*1.25) sw.CFrame = sw.CFrame *ca(0,rd(720*(i/scale)),0) sw.Transparency = (i/scale) + 0
  283. wait()
  284. end
  285. sw:Remove()
  286. end))
  287. end
  288. function Explode(onb,scale,col) local Torm = m coroutine.resume(coroutine.create(function() local e1 = Instance.new("Part") e1.Anchored = true e1.formFactor = "Custom" e1.CanCollide = false e1.Size = Vector3.new(1,1,1) e1.BrickColor = BrickColor.new(col)
  289. e1.Transparency = 0.6 e1.TopSurface = 0 e1.BottomSurface = 0 e1.Parent = Torm e1.CFrame = onb local e1m = Instance.new("SpecialMesh")
  290. e1m.MeshType = "Sphere" e1m.Parent = e1 local r1 = Instance.new("Part") r1.Anchored = true r1.formFactor = "Custom" r1.CanCollide = false r1.Size = Vector3.new(1,1,1) r1.BrickColor = BrickColor.new(col) r1.Transparency = 0.6 r1.TopSurface = 0 r1.BottomSurface = 0 r1.Parent = Torm r1.CFrame = e1.CFrame *CFrame.Angles(math.rad(180),0,0) local r1m = Instance.new("SpecialMesh") r1m.MeshType = "FileMesh"
  291. r1m.Scale = Vector3.new(3,3,3) r1m.Parent = r1 r1m.MeshId = RingMesh.MeshId local r2 = Instance.new("Part") r2.Anchored = true r2.formFactor = "Custom" r2.CanCollide = false r2.Size = Vector3.new(1,1,1) r2.BrickColor = BrickColor.new(col) r2.Transparency = 0.6 r2.TopSurface = 0 r2.BottomSurface = 0 r2.Parent = Torm r2.CFrame = e1.CFrame *CFrame.Angles(0,math.rad(180),0) local r2m = Instance.new("SpecialMesh") r2m.MeshType = "FileMesh"
  292. r2m.Parent = r2 r2m.Scale = Vector3.new(3,3,3) r2m.MeshId = RingMesh.MeshId local bla = Instance.new("Part") bla.Anchored = true
  293. bla.formFactor = "Custom" bla.CanCollide = false bla.Size = Vector3.new(1,1,1) bla.BrickColor = BrickColor.new(col) bla.Transparency = 0.6 bla.TopSurface = 0 bla.BottomSurface = 0 bla.Parent = Torm bla.CFrame = onb local blam = Instance.new("SpecialMesh")
  294. blam.MeshType = "FileMesh" blam.Parent = bla blam.Scale = Vector3.new(5,5,5) blam.MeshId = BlastMesh.MeshId for i=1,30 do local pluscal = scale/38 e1m.Scale = e1m.Scale + Vector3.new(pluscal,pluscal,pluscal)
  295. r1m.Scale = r1m.Scale + Vector3.new(pluscal,pluscal,pluscal) r2m.Scale = r1m.Scale + Vector3.new(pluscal,pluscal,pluscal)
  296. blam.Scale = blam.Scale + Vector3.new(pluscal,pluscal/2,pluscal) bla.CFrame = bla.CFrame * CFrame.Angles(0,math.rad(12),0) r1.CFrame = r1.CFrame * CFrame.Angles(math.rad(6),0,0) r2.CFrame = r2.CFrame * CFrame.Angles(0,math.rad(6),0) wait() end for i=1,30 do local pluscal = scale/38 e1m.Scale = e1m.Scale + Vector3.new(pluscal,pluscal,pluscal) r1m.Scale = r1m.Scale + Vector3.new(pluscal,pluscal,pluscal) r2m.Scale = r1m.Scale + Vector3.new(pluscal,pluscal,pluscal)
  297. blam.Scale = blam.Scale + Vector3.new(pluscal/3,pluscal/3,pluscal/3) bla.CFrame = bla.CFrame * CFrame.Angles(0,math.rad(12),0) r1.CFrame = r1.CFrame * CFrame.Angles(math.rad(6),0,0) r2.CFrame = r2.CFrame * CFrame.Angles(0,math.rad(6),0) bla.Transparency = bla.Transparency + 0.1 e1.Transparency = e1.Transparency + 0.1 r1.Transparency = r1.Transparency + 0.1 r2.Transparency = r2.Transparency + 0.1 wait() end e1:Remove() r1:Remove() r2:Remove() end)) end
  298.  
  299. function Hurtsplosion(pos,dmg,rndmg,siz,forc)
  300. coroutine.resume(coroutine.create(function() local boomcol = {"Really red","Really black","Really red"}
  301. for i=1,3 do
  302. coroutine.resume(coroutine.create(function()
  303. local plos = pa(m,"Block",1*s*siz,1.5*s*siz,0.7*s*siz,false,false,0.3,0,boomcol) spm("Sphere",plos,1) plos.Anchored = true
  304. plos.CFrame = cf(pos + v3(0,0,0)) * ca(rd(ra(-360,360)),rd(ra(-360,360)),rd(ra(-360,360)))
  305. plos.Mesh.Scale = v3(0.1,0.1,0.1)
  306. for i=0.3,1,0.03 do local plc = plos.CFrame
  307. plos.Mesh.Scale = v3(i*6,i*6,i*6) plos.Transparency = i plos.CFrame = plc * ca(rd(3),rd(3),0)
  308. wait()
  309. end
  310. plos:Remove()
  311. end))
  312. end
  313. end))
  314. wait(0.1)
  315. DmgHumanoidsNear(pos,dmg,rndmg,5.5*s*siz,forc)
  316. end
  317.  
  318. function DmgHumanoidsNear(pos,dmg,rndmg,mag,forc)
  319. local function kidive(ob)
  320. for i,v in pairs(ob:children()) do
  321. if v:IsA("BasePart") and v.Parent.Parent:findFirstChild("Humanoid") == nil and v.Parent:findFirstChild("Humanoid") == nil and (v.Position - pos).magnitude < mag*1.3 and v.Anchored == false and v:GetMass() < 150 then
  322. v:BreakJoints() v.Velocity = cf(pos,v.Position).lookVector*forc
  323. end
  324. if v:IsA("Humanoid") and v ~= hu and v.Parent:findFirstChild("Torso") then
  325. if (pos - v.Parent.Torso.Position).magnitude < mag then local tdmg = dmg*ra(1,rndmg)
  326. if v.Parent:findFirstChild("Hh") == nil then local hh= Instance.new("NumberValue",v.Parent) hh.Name = "Hh"
  327. hh.Value = v.Health - tdmg else v.Parent.Hh.Value = v.Health - (tdmg*3.5) end
  328. v.Health = v.Parent.Hh.Value if v.Parent.Hh.Value < 1 then v.Parent:BreakJoints() end
  329. end
  330. end
  331. if v:IsA("Model") or v:IsA("Workspace") then kidive(v) end end end
  332. kidive(workspace)
  333. end
  334. function Fire(bullet,typez,siz,dmg,rndmg,forc)
  335. if typez == 1 then
  336. bullet.Anchored = true
  337. local bullethit = false
  338. local tyms = 0
  339. repeat
  340. tyms = tyms + 2
  341. local bhit,bpos = ray(bullet.Position,bullet.Position - (bullet.CFrame *cf(0,0,-1)).p)
  342. if bpos ~= nil and (bpos - bullet.Position).magnitude < 7 then bullethit = true else bullet.CFrame = bullet.CFrame *cf(0,0,-1*s) *ca(rd(-0.0025),rd(0),0) end
  343. if tyms%32 == 0 then wait() end
  344. until bullethit or bullet.Position.y < -300 or tyms > 800
  345. bullet.CFrame = bullet.CFrame *cf(0,0,8) bullet:Remove()
  346. if bullet.Position.y < -300 then
  347. else
  348. Hurtsplosion(bullet.Position,dmg,rndmg,siz,forc)
  349. end
  350. elseif typez == 2 then
  351. bullet.Anchored = true
  352. local bullethit = false
  353. local tyms = 0
  354. local ming = 0.001
  355. repeat
  356. if tyms > 70 and (ming == 0.001 or ming == -2.5) then ming = -2.5
  357. local bpos = (bullet.CFrame *cf(0,0,-300)).p if (bpos - v3(Palm.Position.x,bpos.y,Palm.Position.z)).magnitude < 25*s then ming = 0 end
  358. end
  359. tyms = tyms + 2
  360. local bhit,bpos = ray(bullet.Position,bullet.Position - (bullet.CFrame *cf(0,0,-1)).p)
  361. if bpos ~= nil and (bpos - bullet.Position).magnitude < 7 then bullethit = true else bullet.CFrame = bullet.CFrame *cf(0,0,-0.5) *ca(rd(ming),rd(0),0) end
  362. if tyms%16 == 0 then wait() end
  363. until bullethit or bullet.Position.y < -300 or tyms > 500
  364. bullet.CFrame = bullet.CFrame *cf(0,0,8) bullet:Remove()
  365. if bullet.Position.y < -300 then
  366. else
  367. Hurtsplosion(bullet.Position,dmg,rndmg,siz,forc)
  368. end
  369. elseif typez == 3 then
  370. end
  371. end
  372. function ShortifiedAnim(theanim)
  373. if theanim == "Beam" then
  374. local crom = pa(m,"Block",0,0,0,true,true,0.5,0,LaserCol3) local cromm = it("SpecialMesh",crom) cromm.MeshType = "FileMesh" cromm.MeshId = asset .. Decs.Crown
  375. cromm.Scale = v3(15*s,5*s,15*s) crom.Anchored = true --local cromw = weld(crom,Palm,crom,0,Palm.Size.y/3.6,-Palm.Size.z*1.8,rd(-90),0,0)
  376. dias = {} loldiv = 360/8 for x=0,360,loldiv do
  377. local dia = pa(m,"Block",0,0,0,false,false,0,0,LaserCol2) dia.Anchored = true local diam = it("SpecialMesh",dia) diam.MeshType = "FileMesh" diam.MeshId = DiamondMesh.MeshId
  378. diam.Scale = v3(3*s,9*s,3*s) table.insert(dias,dia)
  379. end Button = true coroutine.resume(coroutine.create(function() local tardz = 0 repeat wait() tardz = tardz+ 15
  380. crom.CFrame = Palm.CFrame *ca(rd(-90),0,0) *cf(0,5.5*s,2*s) *ca(0,rd(tardz),0)
  381. for rofl=1,#dias do dias[rofl].CFrame = crom.CFrame *ca(0,rd(rofl*loldiv),0) *cf(0,-19*s,0) *ca(rd(25),0,0) *cf(0,32*s,0) end
  382. until not Button for x2=0.5,1,0.05 do wait() crom.Transparency = x2 end end))
  383. coroutine.resume(coroutine.create(function() for xk=1,0.5,-0.02 do wait() for i=1,#dias do dias.Transparency =xk end end end))
  384. wait(1) local beamoffset = v3(0,0,0)
  385. local b1 = pa(m,"Ball",10*s,10*s,10*s,false,false,0.1,0,LaserCol) b1.Anchored = true
  386. local b2 = pa(m,"Block",10*s,1,10*s,false,false,0.1,0,LaserCol) b2.Anchored = true local b2m = it("CylinderMesh",b2)
  387. local b3 = pa(m,"Ball",10*s,10*s,10*s,false,false,0.1,0,LaserCol) b3.Anchored = true
  388. local bpos = nil local bhit = nil local ts = 0
  389. repeat beamoffset = v3(ra(-2*s,2*s),ra(-2*s,2*s),ra(-2*s,2*s)) ts = ts + 1
  390. bhit,bpos = ray(Palm.Position,Palm.Position - (Palm.CFrame *cf(0,0,1)).p)
  391. if bhit == nil or (Palm.Position - bpos).magnitude > 1500 then break end
  392. b1.CFrame = Palm.CFrame *cf(0,3*s,-11*s)
  393. b3.CFrame = cf(bpos) local lenz = (b1.Position - b3.Position).magnitude
  394. b2.CFrame = cf(b1.Position,b3.Position) *ca(rd(90),0,0) *cf(0,-lenz/2,0) b2m.Scale = v3(1,lenz,1)
  395. b1.CFrame = b1.CFrame + beamoffset b2.CFrame = b2.CFrame + beamoffset b3.CFrame = b3.CFrame + beamoffset
  396. if ts%10 == 0 then DmgHumanoidsNear(b3.Position,3,10,(14*s)+2,100) Explode(b3.CFrame*cf(0,b3.Size.y/3,0),25*s,LaserCol2) end
  397. wait() until not Button or ts > 600
  398. coroutine.resume(coroutine.create(function() for xk=0.1,1.1,0.08 do wait() b1.Transparency = xk b2.Transparency = xk b3.Transparency = xk end b1:Remove() b2:Remove() b3:Remove() end))
  399. coroutine.resume(coroutine.create(function() for xk=0.5,1.1,0.02 do wait() for i=1,#dias do dias.Transparency =xk end end end))
  400. wait(1) clearit(dias) crom:Remove()
  401. end
  402. end
  403. PalmLev = it("BodyPosition",Palm)
  404. PalmFace = it("BodyGyro",Palm) PalmFace.maxTorque = v3(0,0,0)
  405. coroutine.resume(coroutine.create(function()
  406. PalmLev.position = (t.CFrame *cf(handoffset)).p
  407. local yspi = 0
  408. while true do yspi = yspi + 8
  409. if Anim.a == "Gun" or Anim.a == "Ride" or Anim.a == "Pound" then
  410. Facing = "Mouse" bgx = -90 bgy = 90 bgz = 0
  411. elseif Anim.a == "Fu" or Anim.a == "Fist" or Anim.a == "GroundGrip" then
  412. Facing = "Mouse" bgx = -90 bgy = 0 bgz = 0
  413. elseif Anim.a == "Splat" or Anim.a == "Beam" then
  414. Facing = "Mouse" bgx = 0 bgy = 0 bgz = 0
  415. elseif Anim.a == "None" then
  416. Facing = "Owner" bgx = -90 bgy = 0 bgz = 0 Posing = "Follow"
  417. elseif Anim.a == "Shower" then
  418. Facing = "None" bgx = 0 bgy = 0 bgz = 0 Posing = "TopOwner"
  419. end
  420. if Posing == "Follow" then
  421. PalmLev.maxForce = v3(1/0,1/0,1/0) PalmLev.position = (t.CFrame *cf(handoffset) *cf(0,0,0)).p
  422. elseif Posing == "TopOwner" then
  423. PalmLev.maxForce = v3(1/0,1/0,1/0) PalmLev.position = (t.CFrame *cf(0,12*s,0)).p
  424. end
  425. if Facing == "Owner" then
  426. PalmFace.maxTorque = v3(1/0,1/0,1/0) PalmFace.cframe = cf(Palm.Position,he.Position) *ca(rd(bgx),rd(bgy),rd(bgz))
  427. elseif Facing == "Mouse" and mou ~= nil and Equip then
  428. if Anim.a == "Gun" or Anim.a == "Beam" or Anim.a == "Ride" or Anim.a == "GroundGrip" or Anim.a == "Fu" or Anim.a == "Pound" or Anim.a == "Splat" or Anim.a == "Fist" then
  429. if Anim.b == "None" or Anim.a == "Beam" or Anim.a == "Ride" then
  430. PalmFace.cframe = cf(Palm.Position,mou.Hit.p) *ca(rd(bgx),rd(bgy),rd(bgz)) wait(0.05)
  431. end end end
  432. wait(0.05)
  433. end
  434. end))
  435. function FireFinger(lasercol,ffingz,targ,typez,siz,dmg,rndmg,forc) coroutine.resume(coroutine.create(function()
  436. local laser = pa(m,"Block",fingwide*1.3,fingwide*1.3,fingwide*2.5,true,false,0,0,lasercol) spm("Sphere",laser,1+(siz/5.5)) laser.Name = "Projectile"
  437. local lw = weld(laser,ffingz,laser,0,ffingz.Size.y/0.8 +(siz/2.5),0,rd(90),0,0)
  438. for i=1,0.4,-0.05 do laser.Transparency = i wait() end
  439. BlastWave(ffingz.CFrame*cf(0,ffingz.Size.y*1.3,0)*ca(0,0,0),ffingz.Size.x*1.6,1.8,LaserCol2)
  440. lw:Remove() laser.CFrame = cf(laser.Position,targ)
  441. Fire(laser,typez,siz,dmg,rndmg,forc)
  442. end))
  443. end
  444. GrabWeld = it("Weld",m)
  445. Palm.Touched:connect(function(touch)
  446. if Anim.a == "Ride" and GrabWeld.Part1 == nil and touch.Parent:findFirstChild("Torso") and touch.Parent:findFirstChild("Humanoid") then
  447. local tor = touch.Parent.Torso touch.Parent.Humanoid.PlatformStand = true
  448. GrabWeld.Part0 = Palm GrabWeld.Part1 = tor GrabWeld.C0 = cf(-3*s,4.5*s,-Palm.Size.x/2) GrabWeld.C1 = ca(0,rd(90),rd(-90)) *ca(0,rd(0),0)
  449. end
  450. end)
  451. re(bp,"Hand")
  452. hb = it("HopperBin",bp) hb.Name = "Hand"
  453. hb.Selected:connect(function(mouse) mou = mouse Equip = true
  454. mouse.KeyDown:connect(function(k) k = k:lower()
  455. if Anim.a == "Ride" and k == "f" then FireFinger(LaserCol,pPinkie3,mouse.Hit.p,1,2.25,1,18,30) end
  456. if Anim.b ~= "None" or Anim.Welding ~= 0 then return end
  457. if Anim.a == "None" then
  458. if k == "f" then -- on anim on
  459. Anim.a = "Gun" HandSign("Gun",0.7)
  460. elseif k == "p" then
  461. Anim.a = "Fu" HandSign("f",1)
  462. elseif k == "g" then
  463. Anim.a = "Fist" HandSign("fist",1)
  464. elseif k == "c" then
  465. Anim.a = "Splat" HandSign("wide",1)
  466. elseif k == "r" then
  467. Anim.a = "Ride" HandSign("ride",1) Posing = "None"
  468. elseif k == "v" then
  469. Anim.a = "Shower" HandSign("grab2",1) PalmFace.cframe = cf(0,0,0) *ca(0,0,0)
  470. elseif k == "b" then
  471. Anim.a = "Pound" HandSign("fist",1)
  472. elseif k == "x" then
  473. Anim.a = "GroundGrip" HandSign("grab2",1)
  474. elseif k == "z" then
  475. Anim.a = "Beam" HandSign("wide2",1)
  476. end
  477. else
  478. if k == "f" and Anim.a == "Gun" then -- on anim off
  479. Anim.a = "None" HandSign("five",0.8)
  480. elseif k == "p" and Anim.a == "Fu" then
  481. Anim.a = "None" HandSign("five",0.8)
  482. elseif k == "g" and Anim.a == "Fist" then
  483. Anim.a = "None" HandSign("five",0.8)
  484. elseif k == "c" and Anim.a == "Splat" then
  485. Anim.a = "None" HandSign("five",0.8)
  486. elseif k == "r" and Anim.a == "Ride" then
  487. Anim.a = "None" HandSign("five",0.8) GrabWeld.Part0 = nil Anim.b = "None" Posing = "Follow" Facing = "Owner"
  488. if GrabWeld.Part1 ~= nil and GrabWeld.Part1.Parent:findFirstChild("Humanoid") ~= nil then GrabWeld.Part1.Parent.Humanoid.PlatformStand = false end GrabWeld.Part1 = nil
  489. elseif k == "v" and Anim.a == "Shower" then
  490. Anim.a = "None" HandSign("five",0.8) Posing = "Follow" Facing = "Owner"
  491. elseif k == "b" and Anim.a == "Pound" then
  492. Anim.a = "None" HandSign("five",0.8)
  493. elseif k == "x" and Anim.a == "GroundGrip" then
  494. Anim.a = "None" HandSign("five",0.8)
  495. elseif k == "z" and Anim.a == "Beam" then
  496. Anim.a = "None" HandSign("five",0.8)
  497. end
  498. end
  499. end)
  500. mouse.Button1Down:connect(function()
  501. if Anim.a == "None" or Anim.b ~= "None" then return end
  502. if Anim.a == "Gun" then
  503. Anim.b = "Gun" FireFinger(LaserCol,pPoint3,mouse.Hit.p,1,2.25,1,10,60) FireFinger(LaserCol,pMid3,mouse.Hit.p,1,2.25) wait(1) Anim.b = "None"
  504. elseif Anim.a == "Fu" then
  505. Anim.b = "Fu" FireFinger(LaserCol,pMid3,mouse.Hit.p,1,3.65,2,14,95) wait(0.25) Anim.b = "None"
  506. elseif Anim.a == "Fist" then
  507. local bhit,bpos = ray(Palm.Position,Palm.Position - (Palm.CFrame *cf(0,-1,0)).p)
  508. if bhit == nil or (Palm.Position - bpos).magnitude > 500 then return end
  509. Anim.b = "Fist" Posing = "None" PalmFace.cframe = cf(Palm.Position,bpos) *ca(rd(-90),0,0)
  510. PalmLev.position = (Palm.CFrame *cf(0,-15*s,0)).p
  511. wait(0.45)
  512. PalmLev.position = bpos + ((Palm.CFrame *cf(0,1*s,0)).p - Palm.Position)
  513. local tz = 0 repeat wait() BlastWave(Palm.CFrame*ca(rd(180),0,0),8*s,3.5,HCol) tz = tz + wait() until (PalmLev.position - Palm.Position).magnitude < 8*s or tz > 1
  514. Explode(Palm.CFrame *cf(0,6*s,0) *ca(rd(180),0,0),15*s,ts(bhit.BrickColor))
  515. DmgHumanoidsNear((Palm.CFrame *cf(0,8,0)).p,3,10,(12*s)+2,105)
  516. if not bhit.Anchored then PalmLev.position = (Palm.CFrame *cf(0,12*s,0)).p wait(0.5) end
  517. wait(1) Posing = "Follow" Anim.b = "None"
  518. elseif Anim.a == "Splat" then
  519. if mouse.Target == nil and (Palm.Position - mouse.Hit.p).magnitude > 500 then return end local bpos = mouse.Hit.p
  520. Anim.b = "Splat" Posing = "None"
  521. local ya,yb,yc = PalmFace.cframe:toEulerAnglesXYZ() PalmFace.cframe = cf(0,0,0) *ca(0,yb,0) *ca(rd(-90),0,0) PalmLev.position = bpos + v3(0,10*s,0)
  522. local tz = 0 repeat wait() tz = tz + wait() until (PalmLev.position - Palm.Position).magnitude < 5*s or tz > 1.3
  523. for i=-90,0,5 do
  524. PalmLev.position = PalmLev.position + v3(0,2*s,0) PalmFace.cframe = cf(0,0,0) *ca(0,yb,0) *ca(rd(i),0,0)
  525. wait()
  526. end wait(0.2)
  527. for i=0,-100,-10 do
  528. local lewd = i
  529. if lewd < -50 then lewd = -95 end
  530. PalmLev.position = PalmLev.position - v3(0,4.7*s,0) PalmFace.cframe = cf(0,0,0) *ca(0,yb,0) *ca(rd(lewd),0,0)
  531. wait()
  532. end wait(0.2)
  533. local cr = pa(m,"Block",16*s,0,16*s,false,false,1,0,"") cr.Anchored = true cr.CFrame = cf(bpos) *ca(0,rd(ra(-360,360)),0)
  534. local de = it("Decal",cr) de.Face = "Top" de.Texture = asset .. Decs.Crack Serv.d:AddItem(cr,16)
  535. DmgHumanoidsNear((Palm.CFrame *cf(0,0,-1)).p,3,20,(15*s)+2,110)
  536. ShockWave(Palm.CFrame *ca(rd(90),0,0),25*s,LaserCol)
  537. wait(1) Posing = "Follow" Anim.b = "None"
  538. elseif Anim.a == "Ride" and Button == false then
  539. Posing = "None" Anim.b = "Ride"
  540. Button = true
  541. repeat PalmLev.position = (Palm.CFrame *cf(0,10,0)).p wait() until Button == false
  542. Anim.b = "None"
  543. elseif Anim.a == "Shower" and Button == false then
  544. Anim.b = "Shower" Button = true
  545. repeat
  546. local targz = Palm.Position + v3(0,20*s,0)
  547. if ra(1,12) == 1 then FireFinger(LaserCol,pPinkie3,targz,2,4,1,18,55) end
  548. if ra(1,13) == 1 then FireFinger(LaserCol,pRing3,targz,2,4,1,18,60) end
  549. if ra(1,12) == 1 then FireFinger(LaserCol,pMid3,targz,2,4,1,18,65) end
  550. if ra(1,13) == 1 then FireFinger(LaserCol,pPoint3,targz,2,4,1,18,70) end
  551. if ra(1,12) == 1 then FireFinger(LaserCol,pThumb3,targz,2,4,1,18,80) end
  552. PalmFace.cframe = PalmFace.cframe *ca(0,rd(10),0)
  553. wait()
  554. until Button == false
  555. Anim.b = "None"
  556. elseif Anim.a == "Pound" and Anim.b == "None" then Posing = "None" Anim.b = "Pound"
  557. local bhit,bpos = ray(Palm.Position,Palm.Position - (Palm.CFrame *cf(0,-1,0)).p)
  558. if bhit == nil or (Palm.Position - bpos).magnitude > 500 then return end
  559. PalmLev.position = bpos + v3(0,15*s,0)
  560. local ya,yb,yc = PalmFace.cframe:toEulerAnglesXYZ() PalmFace.cframe = ca(ya,yb,yc)
  561. local tz = 0 repeat wait() tz = tz + wait() until (PalmLev.position - Palm.Position).magnitude < 5*s or tz > 1.3 wait(0.1)
  562. for i=-90,-10,10 do
  563. PalmFace.cframe = ca(ya,yb,yc) *ca(0,0,rd(i+90)) PalmLev.position = PalmLev.position + v3(0,2.5*s,0)
  564. wait() end wait(0.25) local realcf = cf(v3(he.Position.x,0,he.Position.z),v3(Palm.Position.x,0,Palm.Position.z))
  565. for i=-10,-90,-10 do
  566. PalmFace.cframe = ca(ya,yb,yc) *ca(0,0,rd(i+90)) PalmLev.position = PalmLev.position - v3(0,4*s,0)
  567. wait() end PalmFace.cframe = realcf *ca(rd(-90),rd(90),0) wait(0.25)
  568. local cr = pa(m,"Block",22*s,0,22*s,false,false,1,0,"") cr.Anchored = true cr.CFrame = cf(bpos) *ca(0,rd(ra(-360,360)),0)
  569. local de = it("Decal",cr) de.Face = "Top" de.Texture = asset .. Decs.Crack Serv.d:AddItem(cr,16)
  570. Dustplosion(Palm.CFrame *cf(2*s,0,0) *ca(rd(90),0,rd(90)),30*s,{"Really red","Really black","Really red"},3)
  571. ShockWave(Palm.CFrame *cf(2*s,0,0) *ca(rd(90),0,rd(90)),20*s,ts(bhit.BrickColor))
  572. DmgHumanoidsNear((Palm.CFrame *cf(0,1,0)).p,1,20,(15*s)+2,90) wait(0.2)
  573. local palmcf = cf(bpos) local earthsplos = ra(5,8) palmcf = Palm.CFrame *ca(0,rd(90),0) *ca(rd(-90),0,rd(0))
  574. for i=1,earthsplos do Earthsplosion(palmcf *cf(0,-2*s,((i*7)+7)*s),10,1,20,75) wait(0.1) end
  575. Earthsplosion(palmcf *cf(0,-2*s,(((earthsplos+1)*7)+7)*s),16,2,25,75)
  576. wait(1) Posing = "Follow" wait(0.25) Anim.b = "None"
  577. elseif Anim.a == "GroundGrip" then Posing = "None" Anim.b = "GroundGrip"
  578. local bhit,bpos = ray(Palm.Position,Palm.Position - (Palm.CFrame *cf(0,-1,0)).p)
  579. if bhit == nil or (Palm.Position - bpos).magnitude > 500 then return end
  580. PalmLev.position = bpos + v3(0,27*s,0) ColFings(false)
  581. local tz = 0 repeat wait() tz = tz + wait() until (PalmLev.position - Palm.Position).magnitude < 8*s or tz > 1.3 wait(0.1)
  582. local thepos = (Palm.CFrame *cf(0,-0.1*s,0)).p - Palm.Position
  583. PalmFace.cframe = cf(Palm.Position,bpos + thepos) *ca(rd(-90),0,0)
  584. for i=27,1,-3 do PalmLev.position = bpos + v3(0,i*s,0) wait(0.07) end HandSign("grab3",0.4) wait(0.55)
  585. local ro = pa(m,"Ball",0,0,0,false,false,0,0,"Earth green") ro.Name = "Rock" local row = it("SpecialMesh",ro) row.MeshType = "FileMesh" row.MeshId = asset .. Decs.Rock
  586. local rowe = weld(ro,Palm,ro,0,Palm.Size.y,-Palm.Size.z*1.2,0,0,0) row.Scale = v3(9*s,10*s,9*s)
  587. coroutine.resume(coroutine.create(function() for xz=1,70,7 do PalmLev.position = bpos + v3(0,xz*s,0) wait(0.06) end end))
  588. wait(0.25) Dustplosion(cf(bpos),30*s,{"Really red","Really black","Really red"},3) local lolra = ra(-360,360)
  589. Earthsplosion(cf(bpos),25,1,20,125,"sand") for yyy=0,360,60 do coroutine.resume(coroutine.create(function()
  590. for zzz=1,4 do
  591. Earthsplosion(cf(bpos) *ca(0,rd(yyy+lolra),0) *cf(0,0,zzz*15*s),10,1,20,75) wait(0.14)
  592. end wait(0.25) Earthsplosion(cf(bpos) *ca(0,rd(yyy+lolra),0) *cf(0,0,5*18*s),25,1,20,120) end)) end
  593. wait(0.3) HandSign("grab2",0.5) wait(0.75) Serv.d:AddItem(ro,20) rowe:Remove() ro.CanCollide = true local rocf = ro.CFrame ro.Size=v3(14*s,14*s,14*s) ro.CFrame = rocf wait(0.75) ColFings(true) Posing = "Follow" Anim.b = "None"
  594. elseif Anim.a == "Beam" and not Button and Anim.b == "None" then Anim.b = "Beam"
  595. ShortifiedAnim("Beam") wait(0.5) Anim.b = "None"
  596. end
  597. end)
  598. mouse.Button1Up:connect(function()
  599. Button = false
  600. end)
  601. mouse.Move:connect(function()
  602. end)
  603.  
  604. end)
  605. hb.Deselected:connect(function(mouse)
  606. Equip = false
  607. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement