API tools faq
paste
carlosname

Untitled

carlosname
Oct 1st, 2019
143
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 42.89 KB | None | 0 0
raw download clone embed print report diff
  1. --https://github.com/Mokiros/roblox-FE-compatibility
  2. if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
  3. local Player,game,owner = owner,game
  4. local RealPlayer = Player
  5. do
  6. print("FE Compatibility code V2 by Mokiros")
  7. local RealPlayer = RealPlayer
  8. script.Parent = RealPlayer.Character
  9.  
  10. --Fake event to make stuff like Mouse.KeyDown work
  11. local Disconnect_Function = function(this)
  12. this[1].Functions[this[2]] = nil
  13. end
  14. local Disconnect_Metatable = {__index={disconnect=Disconnect_Function,Disconnect=Disconnect_Function}}
  15. local FakeEvent_Metatable = {__index={
  16. Connect = function(this,f)
  17. local i = tostring(math.random(0,10000))
  18. while this.Functions[i] do
  19. i = tostring(math.random(0,10000))
  20. end
  21. this.Functions[i] = f
  22. return setmetatable({this,i},Disconnect_Metatable)
  23. end
  24. }}
  25. FakeEvent_Metatable.__index.connect = FakeEvent_Metatable.__index.Connect
  26. local function fakeEvent()
  27. return setmetatable({Functions={}},FakeEvent_Metatable)
  28. end
  29.  
  30. --Creating fake input objects with fake variables
  31. local FakeMouse = {Hit=CFrame.new(),KeyUp=fakeEvent(),KeyDown=fakeEvent(),Button1Up=fakeEvent(),Button1Down=fakeEvent(),Button2Up=fakeEvent(),Button2Down=fakeEvent()}
  32. FakeMouse.keyUp = FakeMouse.KeyUp
  33. FakeMouse.keyDown = FakeMouse.KeyDown
  34. local UIS = {InputBegan=fakeEvent(),InputEnded=fakeEvent()}
  35. local CAS = {Actions={},BindAction=function(self,name,fun,touch,...)
  36. CAS.Actions[name] = fun and {Name=name,Function=fun,Keys={...}} or nil
  37. end}
  38. --Merged 2 functions into one by checking amount of arguments
  39. CAS.UnbindAction = CAS.BindAction
  40.  
  41. --This function will trigger the events that have been :Connect()'ed
  42. local function TriggerEvent(self,ev,...)
  43. for _,f in pairs(self[ev].Functions) do
  44. f(...)
  45. end
  46. end
  47. FakeMouse.TriggerEvent = TriggerEvent
  48. UIS.TriggerEvent = TriggerEvent
  49.  
  50. --Client communication
  51. local Event = Instance.new("RemoteEvent")
  52. Event.Name = "UserInput_Event"
  53. Event.OnServerEvent:Connect(function(plr,io)
  54. if plr~=RealPlayer then return end
  55. FakeMouse.Target = io.Target
  56. FakeMouse.Hit = io.Hit
  57. if not io.isMouse then
  58. local b = io.UserInputState == Enum.UserInputState.Begin
  59. if io.UserInputType == Enum.UserInputType.MouseButton1 then
  60. return FakeMouse:TriggerEvent(b and "Button1Down" or "Button1Up")
  61. end
  62. if io.UserInputType == Enum.UserInputType.MouseButton2 then
  63. return FakeMouse:TriggerEvent(b and "Button2Down" or "Button2Up")
  64. end
  65. for _,t in pairs(CAS.Actions) do
  66. for _,k in pairs(t.Keys) do
  67. if k==io.KeyCode then
  68. t.Function(t.Name,io.UserInputState,io)
  69. end
  70. end
  71. end
  72. FakeMouse:TriggerEvent(b and "KeyDown" or "KeyUp",io.KeyCode.Name:lower())
  73. UIS:TriggerEvent(b and "InputBegan" or "InputEnded",io,false)
  74. end
  75. end)
  76. Event.Parent = NLS([==[local Event = script:WaitForChild("UserInput_Event")
  77. local Mouse = owner:GetMouse()
  78. local UIS = game:GetService("UserInputService")
  79. local input = function(io,RobloxHandled)
  80. if RobloxHandled then return end
  81. --Since InputObject is a client-side instance, we create and pass table instead
  82. Event:FireServer({KeyCode=io.KeyCode,UserInputType=io.UserInputType,UserInputState=io.UserInputState,Hit=Mouse.Hit,Target=Mouse.Target})
  83. end
  84. UIS.InputBegan:Connect(input)
  85. UIS.InputEnded:Connect(input)
  86. local h,t
  87. --Give the server mouse data every second frame, but only if the values changed
  88. --If player is not moving their mouse, client won't fire events
  89. local HB = game:GetService("RunService").Heartbeat
  90. while true do
  91. if h~=Mouse.Hit or t~=Mouse.Target then
  92. h,t=Mouse.Hit,Mouse.Target
  93. Event:FireServer({isMouse=true,Target=t,Hit=h})
  94. end
  95. --Wait 2 frames
  96. for i=1,2 do
  97. HB:Wait()
  98. end
  99. end]==],script)
  100.  
  101. ----Sandboxed game object that allows the usage of client-side methods and services
  102. --Real game object
  103. local RealGame = game
  104.  
  105. --Metatable for fake service
  106. local FakeService_Metatable = {
  107. __index = function(self,k)
  108. local s = rawget(self,"_RealService")
  109. if s then
  110. return typeof(s[k])=="function"
  111. and function(_,...)return s[k](s,...)end or s[k]
  112. end
  113. end,
  114. __newindex = function(self,k,v)
  115. local s = rawget(self,"_RealService")
  116. if s then s[k]=v end
  117. end
  118. }
  119. local function FakeService(t,RealService)
  120. t._RealService = typeof(RealService)=="string" and RealGame:GetService(RealService) or RealService
  121. return setmetatable(t,FakeService_Metatable)
  122. end
  123.  
  124. --Fake game object
  125. local FakeGame = {
  126. GetService = function(self,s)
  127. return rawget(self,s) or RealGame:GetService(s)
  128. end,
  129. Players = FakeService({
  130. LocalPlayer = FakeService({GetMouse=function(self)return FakeMouse end},Player)
  131. },"Players"),
  132. UserInputService = FakeService(UIS,"UserInputService"),
  133. ContextActionService = FakeService(CAS,"ContextActionService"),
  134. RunService = FakeService({
  135. _btrs = {},
  136. RenderStepped = RealGame:GetService("RunService").Heartbeat,
  137. BindToRenderStep = function(self,name,_,fun)
  138. self._btrs[name] = self.Heartbeat:Connect(fun)
  139. end,
  140. UnbindFromRenderStep = function(self,name)
  141. self._btrs[name]:Disconnect()
  142. end,
  143. },"RunService")
  144. }
  145. rawset(FakeGame.Players,"localPlayer",FakeGame.Players.LocalPlayer)
  146. FakeGame.service = FakeGame.GetService
  147. FakeService(FakeGame,game)
  148. --Changing owner to fake player object to support owner:GetMouse()
  149. game,owner = FakeGame,FakeGame.Players.LocalPlayer
  150. end
  151.  
  152.  
  153. -- Go to line 23 and change it to your name. LOCAL SCRIPT!!!!!
  154.  
  155.  
  156. 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
  157. bc = BrickColor.new ab = math.abs de = math.deg ts = tostring tn = tonumber ti = table.insert tr = table.remove
  158. cr = coroutine.resume cc = coroutine.create
  159. asset = "http://www.roblox.com/asset/?id="
  160. sr = string.reverse sl = string.lower su = string.upper
  161. Serv = {} Serv.p = game:GetService(sr("sreyalP")) Serv.l = game:GetService(sr("gnithgiL"))
  162. Serv.is = game:GetService(sr("ecivreStresnI")) if game:findFirstChild(sr("revreSkrowteN")) then Serv.ns = game:GetService(sr("revreSkrowteN")) else NetworkServer = nil end
  163. Serv.sg = game:GetService(sr("iuGretratS")) Serv.sp = game:GetService(sr("kcaPretratS")) Serv.d = game:GetService(sr("sirbeD"))
  164. Decs = {}
  165. Decs.Crack = "49173398" Decs.Cloud = "1095708" Decs.Spike = "1033714" Decs.Rock = "1290033" Decs.Crown = "1323306"
  166. 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
  167. 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
  168. 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"
  169. 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
  170. fp.TopSurface = 0 fp.CFrame = t.CFrame + Vector3.new(0,50,0) fp.Velocity = Vector3.new(0,10,0) fp:BreakJoints() return fp end
  171. function clearit(tab) for xx=1,#tab do tab[xx]:Remove() end end
  172. 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
  173. 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
  174. 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
  175. p = Serv.p.Dark_Eccentric
  176. bp = p.Backpack
  177. pg = p.PlayerGui
  178. c = p.Character
  179. he = c.Head
  180. t = c.Torso
  181. hu = c.Humanoid
  182. mou = nil
  183. re(c,"Hand")
  184. s = 2
  185.  
  186. --tool var
  187. Equip = false
  188. HTrans = 0
  189. HRef = 0
  190. HCol = "a"
  191. LaserCol = "Really black"
  192. LaserCol2 = "Really red"
  193. LaserCol3 = "Really black"
  194. Posing = "Follow"
  195. Facing = "Owner"
  196. Anim = {}
  197. Anim.a = "None"
  198. Anim.b = "None"
  199. Anim.Welding = 0
  200. local fingwide = 1.5*s
  201. local finghei = 2.8
  202. local tiphei = 2.55
  203. handoffset = v3(5,18,-8)*s
  204. bgx,bgy,bgz = -90,0,0
  205. w = {}
  206. Button = false
  207. --
  208. BlastMesh = it("FileMesh")
  209. BlastMesh.MeshId = "http://www.roblox.com/asset/?id=20329976"
  210. RingMesh = it("FileMesh")
  211. RingMesh.MeshId = "http://www.roblox.com/asset/?id=3270017"
  212. RockMesh = it("FileMesh")
  213. DiamondMesh = it("FileMesh")
  214. DiamondMesh.MeshId = "http://www.roblox.com/Asset/?id=9756362"
  215.  
  216. m = Instance.new("Model",c) m.Name = "Hand"
  217. Palm = pa(m,"Block",6*s,7*s,fingwide*2,true,false,HTrans,HRef,HCol) mbm(Palm,1,1,0.6)
  218. local x,y,z = Palm.Size.x,Palm.Size.y,Palm.Size.z
  219. bPoint1 = pa(m,"Block",0,0,0,false,false,HTrans,HRef,HCol)
  220. Point1 = weld(bPoint1,Palm,bPoint1,-x/2+(fingwide/2),y/2,0,0,0,0)
  221. pPoint1 = pa(m,"Block",fingwide,finghei*s,fingwide,true,false,HTrans,HRef,HCol) mbm(pPoint1,0.9,1,0.9)
  222. wPoint1 = weld(pPoint1,bPoint1,pPoint1,0,pPoint1.Size.y/2,0,0,0,0)
  223. bPoint2 = pa(m,"Block",0,0,0,false,false,HTrans,HRef,HCol)
  224. Point2 = weld(bPoint2,pPoint1,bPoint2,0,pPoint1.Size.y/2,0,0,0,0)
  225. pPoint2 = pa(m,"Block",fingwide,finghei*s,fingwide,true,false,HTrans,HRef,HCol) mbm(pPoint2,0.9,1,0.9)
  226. wPoint2 = weld(pPoint2,bPoint2,pPoint2,0,pPoint1.Size.y/2,0,0,0,0)
  227. bPoint3 = pa(m,"Block",0,0,0,false,false,HTrans,HRef,HCol)
  228. Point3 = weld(bPoint3,pPoint2,bPoint3,0,pPoint2.Size.y/2,0,0,0,0)
  229. pPoint3 = pa(m,"Block",fingwide,tiphei*s,fingwide,true,false,HTrans,HRef,HCol) mbm(pPoint3,0.9,1,0.9)
  230. wPoint3 = weld(pPoint3,bPoint3,pPoint3,0,pPoint3.Size.y/2,0,0,0,0)
  231. bMid1 = pa(m,"Block",0,0,0,false,false,HTrans,HRef,HCol)
  232. Mid1 = weld(bMid1,Palm,bMid1,-x/2+((fingwide/2)+((fingwide)*1)),y/2,0,0,0,0)
  233. pMid1 = pa(m,"Block",fingwide,(finghei*1.1)*s,fingwide,true,false,HTrans,HRef,HCol) mbm(pMid1,0.9,1,0.9)
  234. wMid1 = weld(pMid1,bMid1,pMid1,0,pMid1.Size.y/2,0,0,0,0)
  235. bMid2 = pa(m,"Block",0,0,0,false,false,HTrans,HRef,HCol)
  236. Mid2 = weld(bMid2,pMid1,bMid2,0,pMid1.Size.y/2,0,0,0,0)
  237. pMid2 = pa(m,"Block",fingwide,(finghei*1.1)*s,fingwide,true,false,HTrans,HRef,HCol) mbm(pMid2,0.9,1,0.9)
  238. wMid2 = weld(pMid2,bMid2,pMid2,0,pMid1.Size.y/2,0,0,0,0)
  239. bMid3 = pa(m,"Block",0,0,0,false,false,HTrans,HRef,HCol)
  240. Mid3 = weld(bMid3,pMid2,bMid3,0,pMid2.Size.y/2,0,0,0,0)
  241. pMid3 = pa(m,"Block",fingwide,(tiphei*1.1)*s,fingwide,true,false,HTrans,HRef,HCol) mbm(pMid3,0.9,1,0.9)
  242. wMid3 = weld(pMid3,bMid3,pMid3,0,pMid3.Size.y/2,0,0,0,0)
  243. bRing1 = pa(m,"Block",0,0,0,false,false,HTrans,HRef,HCol)
  244. Ring1 = weld(bRing1,Palm,bRing1,-x/2+((fingwide/2)+((fingwide)*2)),y/2,0,0,0,0)
  245. pRing1 = pa(m,"Block",fingwide,(finghei*0.98)*s,fingwide,true,false,HTrans,HRef,HCol) mbm(pRing1,0.9,1,0.9)
  246. wRing1 = weld(pRing1,bRing1,pRing1,0,pRing1.Size.y/2,0,0,0,0)
  247. bRing2 = pa(m,"Block",0,0,0,false,false,HTrans,HRef,HCol)
  248. Ring2 = weld(bRing2,pRing1,bRing2,0,pRing1.Size.y/2,0,0,0,0)
  249. pRing2 = pa(m,"Block",fingwide,(finghei*0.98)*s,fingwide,true,false,HTrans,HRef,HCol) mbm(pRing2,0.9,1,0.9)
  250. wRing2 = weld(pRing2,bRing2,pRing2,0,pRing1.Size.y/2,0,0,0,0)
  251. bRing3 = pa(m,"Block",0,0,0,false,false,HTrans,HRef,HCol)
  252. Ring3 = weld(bRing3,pRing2,bRing3,0,pRing2.Size.y/2,0,0,0,0)
  253. pRing3 = pa(m,"Block",fingwide,(tiphei*0.98)*s,fingwide,true,false,HTrans,HRef,HCol) mbm(pRing3,0.9,1,0.9)
  254. wRing3 = weld(pRing3,bRing3,pRing3,0,pRing3.Size.y/2,0,0,0,0)
  255. bPinkie1 = pa(m,"Block",0,0,0,false,false,HTrans,HRef,HCol)
  256. Pinkie1 = weld(bPinkie1,Palm,bPinkie1,-x/2+((fingwide/2)+((fingwide)*3)),y/2,0,0,0,0)
  257. pPinkie1 = pa(m,"Block",fingwide,(finghei*0.8)*s,fingwide,true,false,HTrans,HRef,HCol) mbm(pPinkie1,0.9,1,0.9)
  258. wPinkie1 = weld(pPinkie1,bPinkie1,pPinkie1,0,pPinkie1.Size.y/2,0,0,0,0)
  259. bPinkie2 = pa(m,"Block",0,0,0,false,false,HTrans,HRef,HCol)
  260. Pinkie2 = weld(bPinkie2,pPinkie1,bPinkie2,0,pPinkie1.Size.y/2,0,0,0,0)
  261. pPinkie2 = pa(m,"Block",fingwide,(finghei*0.8)*s,fingwide,true,false,HTrans,HRef,HCol) mbm(pPinkie2,0.9,1,0.9)
  262. wPinkie2 = weld(pPinkie2,bPinkie2,pPinkie2,0,pPinkie1.Size.y/2,0,0,0,0)
  263. bPinkie3 = pa(m,"Block",0,0,0,false,false,HTrans,HRef,HCol)
  264. Pinkie3 = weld(bPinkie3,pPinkie2,bPinkie3,0,pPinkie2.Size.y/2,0,0,0,0)
  265. pPinkie3 = pa(m,"Block",fingwide,(tiphei*0.8)*s,fingwide,true,false,HTrans,HRef,HCol) mbm(pPinkie3,0.9,1,0.9)
  266. wPinkie3 = weld(pPinkie3,bPinkie3,pPinkie3,0,pPinkie3.Size.y/2,0,0,0,0)
  267. bThumb1 = pa(m,"Block",0,0,0,false,false,HTrans,HRef,HCol)
  268. Thumb1 = weld(bThumb1,Palm,bThumb1,-x/2+(fingwide/7),-y*0.1,-fingwide*0.25,0,0,0)
  269. 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)
  270. wThumb1 = weld(pThumb1,bThumb1,pThumb1,0,pThumb1.Size.y/2,0,0,0,0)
  271. bThumb2 = pa(m,"Block",0,0,0,false,false,HTrans,HRef,HCol)
  272. Thumb2 = weld(bThumb2,pThumb1,bThumb2,0,pThumb1.Size.y/2,0,0,0,0)
  273. 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)
  274. wThumb2 = weld(pThumb2,bThumb2,pThumb2,0,pThumb1.Size.y/2,0,0,0,0)
  275. bThumb3 = pa(m,"Block",0,0,0,false,false,HTrans,HRef,HCol)
  276. Thumb3 = weld(bThumb3,pThumb2,bThumb3,0,pThumb2.Size.y/2,0,0,0,0)
  277. 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)
  278. wThumb3 = weld(pThumb3,bThumb3,pThumb3,0,pThumb3.Size.y/2,0,0,0,0)
  279.  
  280. w["a1"] = Pinkie1
  281. w["a2"] = Pinkie2
  282. w["a3"] = Pinkie3
  283. w["b1"] = Ring1
  284. w["b2"] = Ring2
  285. w["b3"] = Ring3
  286. w["c1"] = Mid1
  287. w["c2"] = Mid2
  288. w["c3"] = Mid3
  289. w["d1"] = Point1
  290. w["d2"] = Point2
  291. w["d3"] = Point3
  292. w["e1"] = Thumb1
  293. w["e2"] = Thumb2
  294. w["e3"] = Thumb3
  295. w.e1.C1 = ca(0,rd(35),rd(-20))
  296. w.e2.C1 = ca(rd(20),0,0)
  297. w.e3.C1 = ca(rd(20),0,0)
  298. w.d1.C1 = ca(0,0,rd(-3))
  299. w.c1.C1 = ca(0,0,rd(-1))
  300. w.b1.C1 = ca(0,0,rd(1))
  301. w.a1.C1 = ca(0,0,rd(3))
  302. function c1(wexx,smmx,xx,yy,zz)
  303. coroutine.resume(coroutine.create(function()
  304. local xx2,yy2,zz2 = wexx.C1:toEulerAnglesXYZ()
  305. local aa,bb,cc = wexx.C0.x,wexx.C0.y,wexx.C0.z
  306. local twa = smmx/wt
  307. Anim.Welding = Anim.Welding + 1
  308. for i=0,twa,1 do wexx.C0 = cf(aa,bb,cc)
  309. wexx.C1 = ca(xx2-(((xx2-rd(xx))/twa)*i),yy2-(((yy2-rd(yy))/twa)*i),zz2-(((zz2-rd(zz))/twa)*i))
  310. wait()
  311. end
  312. Anim.Welding = Anim.Welding - 1
  313. end))
  314. end
  315. 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
  316. 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
  317. function HandSign(form,spee) form = form:lower() if spee == nil then spee = 1 end
  318. if form == "f" then
  319. CloseFing("d",spee) CloseFing("a",spee) CloseFing("b",spee)
  320. c1(w["c1"],spee,0,0,0) c1(w["c2"],spee,0,0,0) c1(w["c3"],spee,0,0,0)
  321. c1(w["e1"],spee,70,40,-90) c1(w["e2"],spee,50,0,0) c1(w["e3"],spee,50,0,0)
  322. elseif form == "fist" then
  323. CloseFing("d",spee) CloseFing("a",spee) CloseFing("b",spee) CloseFing("c",spee)
  324. c1(w["e1"],spee,70,40,-90) c1(w["e2"],spee,50,0,0) c1(w["e3"],spee,50,0,0)
  325. elseif form == "pointer" then
  326. CloseFing("a",spee) CloseFing("b",spee) CloseFing("c",spee)
  327. c1(w["d1"],spee,5,0,0) c1(w["d2"],spee,5,0,0) c1(w["d3"],spee,5,0,0)
  328. c1(w["e1"],spee,70,40,-90) c1(w["e2"],spee,50,0,0) c1(w["e3"],spee,50,0,0)
  329. elseif form == "v" then
  330. CloseFing("a",spee) CloseFing("b",spee)
  331. c1(w["c1"],spee,1,0,15) c1(w["c2"],spee,1,0,0) c1(w["c3"],spee,1,0,0)
  332. c1(w["d1"],spee,1,0,-15) c1(w["d2"],spee,1,0,0) c1(w["d3"],spee,1,0,0)
  333. c1(w["e1"],spee,70,40,-90) c1(w["e2"],spee,50,0,0) c1(w["e3"],spee,50,0,0)
  334. elseif form == "free" or form == "five" then
  335. OpenFing("a",spee) OpenFing("b",spee) OpenFing("c",spee) OpenFing("d",spee)
  336. c1(w["e1"],spee,0,35,-20) c1(w["e2"],spee,20,0,0) c1(w["e3"],spee,20,0,0)
  337. elseif form == "ride" then
  338. c1(w["a1"],spee,60,0,0) c1(w["a2"],spee,-30,0,0) c1(w["a3"],spee,-30,0,0)
  339. c1(w["b1"],spee,30,0,0) c1(w["b2"],spee,65,0,0) c1(w["b3"],spee,60,0,0)
  340. c1(w["c1"],spee,30,0,0) c1(w["c2"],spee,65,0,0) c1(w["c3"],spee,60,0,0)
  341. c1(w["d1"],spee,30,0,0) c1(w["d2"],spee,65,0,0) c1(w["d3"],spee,60,0,0)
  342. c1(w["e1"],spee,-70,185,0) c1(w["e2"],spee,30,0,0) c1(w["e3"],spee,30,0,0)
  343. elseif form == "gun" then
  344. CloseFing("a",spee) CloseFing("b",spee)
  345. c1(w["c1"],spee,0,0,1) c1(w["c2"],spee,0,0,0) c1(w["c3"],spee,0,0,0)
  346. c1(w["d1"],spee,0,0,-1) c1(w["d2"],spee,0,0,0) c1(w["d3"],spee,0,0,0)
  347. c1(w["e1"],spee,-60,90,0) c1(w["e2"],spee,20,0,0) c1(w["e3"],spee,-20,0,0)
  348. elseif form == "wide" then
  349. c1(w["a1"],spee,-3,0,45) c1(w["a2"],spee,-3,0,0) c1(w["a3"],spee,-3,0,0)
  350. c1(w["b1"],spee,-3,0,15) c1(w["b2"],spee,-3,0,0) c1(w["b3"],spee,-3,0,0)
  351. c1(w["c1"],spee,-3,0,-15) c1(w["c2"],spee,-3,0,0) c1(w["c3"],spee,-3,0,0)
  352. c1(w["d1"],spee,-3,0,-45) c1(w["d2"],spee,-3,0,0) c1(w["d3"],spee,-3,0,0)
  353. c1(w["e1"],spee,-70,90,0) c1(w["e2"],spee,10,0,0) c1(w["e3"],spee,-10,0,0)
  354. elseif form == "wide2" then
  355. c1(w["a1"],spee,-18,0,45) c1(w["a2"],spee,36,0,0) c1(w["a3"],spee,30,0,0)
  356. c1(w["b1"],spee,-18,0,15) c1(w["b2"],spee,36,0,0) c1(w["b3"],spee,30,0,0)
  357. c1(w["c1"],spee,-18,0,-15) c1(w["c2"],spee,36,0,0) c1(w["c3"],spee,30,0,0)
  358. c1(w["d1"],spee,-18,0,-45) c1(w["d2"],spee,36,0,0) c1(w["d3"],spee,30,0,0)
  359. c1(w["e1"],spee,-50,90,-10) c1(w["e2"],spee,5,0,-30) c1(w["e3"],spee,-10,0,-40)
  360. elseif form == "grab2" then
  361. c1(w["a1"],spee,-70,-65,0) c1(w["a2"],spee,40,0,0) c1(w["a3"],spee,20,0,0)
  362. c1(w["b1"],spee,-70,-20,0) c1(w["b2"],spee,40,0,0) c1(w["b3"],spee,20,0,0)
  363. c1(w["c1"],spee,-70,20,-0) c1(w["c2"],spee,40,0,0) c1(w["c3"],spee,20,0,0)
  364. c1(w["d1"],spee,-70,65,-0) c1(w["d2"],spee,40,0,0) c1(w["d3"],spee,20,0,0)
  365. c1(w["e1"],spee,-70,150,0) c1(w["e2"],spee,30,0,0) c1(w["e3"],spee,30,0,0)
  366. elseif form == "grab3" then
  367. c1(w["a1"],spee,-30,-40,30) c1(w["a2"],spee,50,0,0) c1(w["a3"],spee,35,0,0)
  368. c1(w["b1"],spee,-30,-15,12) c1(w["b2"],spee,50,0,0) c1(w["b3"],spee,35,0,0)
  369. c1(w["c1"],spee,-30,15,-12) c1(w["c2"],spee,50,0,0) c1(w["c3"],spee,35,0,0)
  370. c1(w["d1"],spee,-30,40,-30) c1(w["d2"],spee,50,0,0) c1(w["d3"],spee,35,0,0)
  371. c1(w["e1"],spee,-55,205,0) c1(w["e2"],spee,30,0,0) c1(w["e3"],spee,30,0,0)
  372. end
  373. end
  374. function ColFings(iscol)
  375. pPinkie1.CanCollide = iscol
  376. pPinkie2.CanCollide = iscol
  377. pPinkie3.CanCollide = iscol
  378. pRing1.CanCollide = iscol
  379. pRing2.CanCollide = iscol
  380. pRing3.CanCollide = iscol
  381. pMid1.CanCollide = iscol
  382. pMid2.CanCollide = iscol
  383. pMid3.CanCollide = iscol
  384. pPoint1.CanCollide = iscol
  385. pPoint2.CanCollide = iscol
  386. pPoint3.CanCollide = iscol
  387. pThumb1.CanCollide = iscol
  388. pThumb2.CanCollide = iscol
  389. pThumb3.CanCollide = iscol
  390. end
  391. function ray(Pos, Dir)
  392. return Workspace:FindPartOnRay(Ray.new(Pos, Dir.unit *999), c)
  393. end
  394. 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
  395. coroutine.resume(coroutine.create(function()
  396. 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)
  397. local de = it("Decal",cr) de.Face = "Top" de.Texture = asset .. Decs.Crack Serv.d:AddItem(cr,25) end
  398. for i=1,4 do
  399. coroutine.resume(coroutine.create(function()
  400. 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"
  401. 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)
  402. 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)
  403. Dustplosion(cf(pos.p+v3(0,2*s,0)),18*s,{"Really red","Really black","Really red"},1)
  404. if eos == "earth" then
  405. for x=1,8 do
  406. sw.CFrame = sw.CFrame *cf(0,sw.Size.y/8,0) wait() end wait(ra(1,5))
  407. for x=1,20 do
  408. sw.CFrame = sw.CFrame *cf(0,-sw.Size.y/20,0) wait()
  409. end sw:Remove()
  410. else
  411. for x=1,25 do
  412. 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
  413. end sw:Remove()
  414. end)) end
  415. wait(0.3)
  416. DmgHumanoidsNear(pos.p,dmg,rndmg,5.5*s*(siz/4),forc)
  417. end))
  418. end
  419.  
  420. function Dustplosion(onb,scale,col,cls) coroutine.resume(coroutine.create(function()
  421. for x=1,cls do coroutine.resume(coroutine.create(function()
  422. 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"
  423. swm.MeshId = asset .. Decs.Cloud sw.CFrame = sw.CFrame + v3(ra(-scale,scale)/8,ra(-scale,scale)/8,ra(-scale,scale)/8)
  424. for i=1,scale,0.25 do
  425. swm.Scale = v3(i*1.5,i*1,i*1.5) sw.Transparency = ((i/scale)/2) + 0.45
  426. wait()
  427. end
  428. sw:Remove()
  429. end)) end
  430. end)) end
  431. 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
  432. 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
  433. function BlastWave(onb,scale,ymes,col) coroutine.resume(coroutine.create(function()
  434. 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"
  435. swm.MeshId = BlastMesh.MeshId
  436. for i=1,scale,scale/11 do
  437. 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
  438. wait()
  439. end
  440. sw:Remove()
  441. end))
  442. end
  443. 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)
  444. e1.Transparency = 0.6 e1.TopSurface = 0 e1.BottomSurface = 0 e1.Parent = Torm e1.CFrame = onb local e1m = Instance.new("SpecialMesh")
  445. 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"
  446. 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"
  447. r2m.Parent = r2 r2m.Scale = Vector3.new(3,3,3) r2m.MeshId = RingMesh.MeshId local bla = Instance.new("Part") bla.Anchored = true
  448. 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")
  449. 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)
  450. r1m.Scale = r1m.Scale + Vector3.new(pluscal,pluscal,pluscal) r2m.Scale = r1m.Scale + Vector3.new(pluscal,pluscal,pluscal)
  451. 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)
  452. 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
  453.  
  454. function Hurtsplosion(pos,dmg,rndmg,siz,forc)
  455. coroutine.resume(coroutine.create(function() local boomcol = {"Really red","Really black","Really red"}
  456. for i=1,3 do
  457. coroutine.resume(coroutine.create(function()
  458. 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
  459. plos.CFrame = cf(pos + v3(0,0,0)) * ca(rd(ra(-360,360)),rd(ra(-360,360)),rd(ra(-360,360)))
  460. plos.Mesh.Scale = v3(0.1,0.1,0.1)
  461. for i=0.3,1,0.03 do local plc = plos.CFrame
  462. plos.Mesh.Scale = v3(i*6,i*6,i*6) plos.Transparency = i plos.CFrame = plc * ca(rd(3),rd(3),0)
  463. wait()
  464. end
  465. plos:Remove()
  466. end))
  467. end
  468. end))
  469. wait(0.1)
  470. DmgHumanoidsNear(pos,dmg,rndmg,5.5*s*siz,forc)
  471. end
  472.  
  473. function DmgHumanoidsNear(pos,dmg,rndmg,mag,forc)
  474. local function kidive(ob)
  475. for i,v in pairs(ob:children()) do
  476. 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
  477. v:BreakJoints() v.Velocity = cf(pos,v.Position).lookVector*forc
  478. end
  479. if v:IsA("Humanoid") and v ~= hu and v.Parent:findFirstChild("Torso") then
  480. if (pos - v.Parent.Torso.Position).magnitude < mag then local tdmg = dmg*ra(1,rndmg)
  481. if v.Parent:findFirstChild("Hh") == nil then local hh= Instance.new("NumberValue",v.Parent) hh.Name = "Hh"
  482. hh.Value = v.Health - tdmg else v.Parent.Hh.Value = v.Health - (tdmg*3.5) end
  483. v.Health = v.Parent.Hh.Value if v.Parent.Hh.Value < 1 then v.Parent:BreakJoints() end
  484. end
  485. end
  486. if v:IsA("Model") or v:IsA("Workspace") then kidive(v) end end end
  487. kidive(workspace)
  488. end
  489. function Fire(bullet,typez,siz,dmg,rndmg,forc)
  490. if typez == 1 then
  491. bullet.Anchored = true
  492. local bullethit = false
  493. local tyms = 0
  494. repeat
  495. tyms = tyms + 2
  496. local bhit,bpos = ray(bullet.Position,bullet.Position - (bullet.CFrame *cf(0,0,-1)).p)
  497. 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
  498. if tyms%32 == 0 then wait() end
  499. until bullethit or bullet.Position.y < -300 or tyms > 800
  500. bullet.CFrame = bullet.CFrame *cf(0,0,8) bullet:Remove()
  501. if bullet.Position.y < -300 then
  502. else
  503. Hurtsplosion(bullet.Position,dmg,rndmg,siz,forc)
  504. end
  505. elseif typez == 2 then
  506. bullet.Anchored = true
  507. local bullethit = false
  508. local tyms = 0
  509. local ming = 0.001
  510. repeat
  511. if tyms > 70 and (ming == 0.001 or ming == -2.5) then ming = -2.5
  512. 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
  513. end
  514. tyms = tyms + 2
  515. local bhit,bpos = ray(bullet.Position,bullet.Position - (bullet.CFrame *cf(0,0,-1)).p)
  516. 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
  517. if tyms%16 == 0 then wait() end
  518. until bullethit or bullet.Position.y < -300 or tyms > 500
  519. bullet.CFrame = bullet.CFrame *cf(0,0,8) bullet:Remove()
  520. if bullet.Position.y < -300 then
  521. else
  522. Hurtsplosion(bullet.Position,dmg,rndmg,siz,forc)
  523. end
  524. elseif typez == 3 then
  525. end
  526. end
  527. function ShortifiedAnim(theanim)
  528. if theanim == "Beam" then
  529. 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
  530. 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)
  531. dias = {} loldiv = 360/8 for x=0,360,loldiv do
  532. 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
  533. diam.Scale = v3(3*s,9*s,3*s) table.insert(dias,dia)
  534. end Button = true coroutine.resume(coroutine.create(function() local tardz = 0 repeat wait() tardz = tardz+ 15
  535. crom.CFrame = Palm.CFrame *ca(rd(-90),0,0) *cf(0,5.5*s,2*s) *ca(0,rd(tardz),0)
  536. 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
  537. until not Button for x2=0.5,1,0.05 do wait() crom.Transparency = x2 end end))
  538. 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))
  539. wait(1) local beamoffset = v3(0,0,0)
  540. local b1 = pa(m,"Ball",10*s,10*s,10*s,false,false,0.1,0,LaserCol) b1.Anchored = true
  541. local b2 = pa(m,"Block",10*s,1,10*s,false,false,0.1,0,LaserCol) b2.Anchored = true local b2m = it("CylinderMesh",b2)
  542. local b3 = pa(m,"Ball",10*s,10*s,10*s,false,false,0.1,0,LaserCol) b3.Anchored = true
  543. local bpos = nil local bhit = nil local ts = 0
  544. repeat beamoffset = v3(ra(-2*s,2*s),ra(-2*s,2*s),ra(-2*s,2*s)) ts = ts + 1
  545. bhit,bpos = ray(Palm.Position,Palm.Position - (Palm.CFrame *cf(0,0,1)).p)
  546. if bhit == nil or (Palm.Position - bpos).magnitude > 1500 then break end
  547. b1.CFrame = Palm.CFrame *cf(0,3*s,-11*s)
  548. b3.CFrame = cf(bpos) local lenz = (b1.Position - b3.Position).magnitude
  549. b2.CFrame = cf(b1.Position,b3.Position) *ca(rd(90),0,0) *cf(0,-lenz/2,0) b2m.Scale = v3(1,lenz,1)
  550. b1.CFrame = b1.CFrame + beamoffset b2.CFrame = b2.CFrame + beamoffset b3.CFrame = b3.CFrame + beamoffset
  551. 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
  552. wait() until not Button or ts > 600
  553. 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))
  554. 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))
  555. wait(1) clearit(dias) crom:Remove()
  556. end
  557. end
  558. PalmLev = it("BodyPosition",Palm)
  559. PalmFace = it("BodyGyro",Palm) PalmFace.maxTorque = v3(0,0,0)
  560. coroutine.resume(coroutine.create(function()
  561. PalmLev.position = (t.CFrame *cf(handoffset)).p
  562. local yspi = 0
  563. while true do yspi = yspi + 8
  564. if Anim.a == "Gun" or Anim.a == "Ride" or Anim.a == "Pound" then
  565. Facing = "Mouse" bgx = -90 bgy = 90 bgz = 0
  566. elseif Anim.a == "Fu" or Anim.a == "Fist" or Anim.a == "GroundGrip" then
  567. Facing = "Mouse" bgx = -90 bgy = 0 bgz = 0
  568. elseif Anim.a == "Splat" or Anim.a == "Beam" then
  569. Facing = "Mouse" bgx = 0 bgy = 0 bgz = 0
  570. elseif Anim.a == "None" then
  571. Facing = "Owner" bgx = -90 bgy = 0 bgz = 0 Posing = "Follow"
  572. elseif Anim.a == "Shower" then
  573. Facing = "None" bgx = 0 bgy = 0 bgz = 0 Posing = "TopOwner"
  574. end
  575. if Posing == "Follow" then
  576. PalmLev.maxForce = v3(1/0,1/0,1/0) PalmLev.position = (t.CFrame *cf(handoffset) *cf(0,0,0)).p
  577. elseif Posing == "TopOwner" then
  578. PalmLev.maxForce = v3(1/0,1/0,1/0) PalmLev.position = (t.CFrame *cf(0,12*s,0)).p
  579. end
  580. if Facing == "Owner" then
  581. PalmFace.maxTorque = v3(1/0,1/0,1/0) PalmFace.cframe = cf(Palm.Position,he.Position) *ca(rd(bgx),rd(bgy),rd(bgz))
  582. elseif Facing == "Mouse" and mou ~= nil and Equip then
  583. 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
  584. if Anim.b == "None" or Anim.a == "Beam" or Anim.a == "Ride" then
  585. PalmFace.cframe = cf(Palm.Position,mou.Hit.p) *ca(rd(bgx),rd(bgy),rd(bgz)) wait(0.05)
  586. end end end
  587. wait(0.05)
  588. end
  589. end))
  590. function FireFinger(lasercol,ffingz,targ,typez,siz,dmg,rndmg,forc) coroutine.resume(coroutine.create(function()
  591. 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"
  592. local lw = weld(laser,ffingz,laser,0,ffingz.Size.y/0.8 +(siz/2.5),0,rd(90),0,0)
  593. for i=1,0.4,-0.05 do laser.Transparency = i wait() end
  594. BlastWave(ffingz.CFrame*cf(0,ffingz.Size.y*1.3,0)*ca(0,0,0),ffingz.Size.x*1.6,1.8,LaserCol2)
  595. lw:Remove() laser.CFrame = cf(laser.Position,targ)
  596. Fire(laser,typez,siz,dmg,rndmg,forc)
  597. end))
  598. end
  599. GrabWeld = it("Weld",m)
  600. Palm.Touched:connect(function(touch)
  601. if Anim.a == "Ride" and GrabWeld.Part1 == nil and touch.Parent:findFirstChild("Torso") and touch.Parent:findFirstChild("Humanoid") then
  602. local tor = touch.Parent.Torso touch.Parent.Humanoid.PlatformStand = true
  603. 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)
  604. end
  605. end)
  606. re(bp,"Hand")
  607. hb = it("HopperBin",bp) hb.Name = "Hand"
  608. hb.Selected:connect(function(mouse) mou = mouse Equip = true
  609. mouse.KeyDown:connect(function(k) k = k:lower()
  610. if Anim.a == "Ride" and k == "f" then FireFinger(LaserCol,pPinkie3,mouse.Hit.p,1,2.25,1,18,30) end
  611. if Anim.b ~= "None" or Anim.Welding ~= 0 then return end
  612. if Anim.a == "None" then
  613. if k == "f" then -- on anim on
  614. Anim.a = "Gun" HandSign("Gun",0.7)
  615. elseif k == "p" then
  616. Anim.a = "Fu" HandSign("f",1)
  617. elseif k == "g" then
  618. Anim.a = "Fist" HandSign("fist",1)
  619. elseif k == "c" then
  620. Anim.a = "Splat" HandSign("wide",1)
  621. elseif k == "r" then
  622. Anim.a = "Ride" HandSign("ride",1) Posing = "None"
  623. elseif k == "v" then
  624. Anim.a = "Shower" HandSign("grab2",1) PalmFace.cframe = cf(0,0,0) *ca(0,0,0)
  625. elseif k == "b" then
  626. Anim.a = "Pound" HandSign("fist",1)
  627. elseif k == "x" then
  628. Anim.a = "GroundGrip" HandSign("grab2",1)
  629. elseif k == "z" then
  630. Anim.a = "Beam" HandSign("wide2",1)
  631. end
  632. else
  633. if k == "f" and Anim.a == "Gun" then -- on anim off
  634. Anim.a = "None" HandSign("five",0.8)
  635. elseif k == "p" and Anim.a == "Fu" then
  636. Anim.a = "None" HandSign("five",0.8)
  637. elseif k == "g" and Anim.a == "Fist" then
  638. Anim.a = "None" HandSign("five",0.8)
  639. elseif k == "c" and Anim.a == "Splat" then
  640. Anim.a = "None" HandSign("five",0.8)
  641. elseif k == "r" and Anim.a == "Ride" then
  642. Anim.a = "None" HandSign("five",0.8) GrabWeld.Part0 = nil Anim.b = "None" Posing = "Follow" Facing = "Owner"
  643. if GrabWeld.Part1 ~= nil and GrabWeld.Part1.Parent:findFirstChild("Humanoid") ~= nil then GrabWeld.Part1.Parent.Humanoid.PlatformStand = false end GrabWeld.Part1 = nil
  644. elseif k == "v" and Anim.a == "Shower" then
  645. Anim.a = "None" HandSign("five",0.8) Posing = "Follow" Facing = "Owner"
  646. elseif k == "b" and Anim.a == "Pound" then
  647. Anim.a = "None" HandSign("five",0.8)
  648. elseif k == "x" and Anim.a == "GroundGrip" then
  649. Anim.a = "None" HandSign("five",0.8)
  650. elseif k == "z" and Anim.a == "Beam" then
  651. Anim.a = "None" HandSign("five",0.8)
  652. end
  653. end
  654. end)
  655. mouse.Button1Down:connect(function()
  656. if Anim.a == "None" or Anim.b ~= "None" then return end
  657. if Anim.a == "Gun" then
  658. 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"
  659. elseif Anim.a == "Fu" then
  660. Anim.b = "Fu" FireFinger(LaserCol,pMid3,mouse.Hit.p,1,3.65,2,14,95) wait(0.25) Anim.b = "None"
  661. elseif Anim.a == "Fist" then
  662. local bhit,bpos = ray(Palm.Position,Palm.Position - (Palm.CFrame *cf(0,-1,0)).p)
  663. if bhit == nil or (Palm.Position - bpos).magnitude > 500 then return end
  664. Anim.b = "Fist" Posing = "None" PalmFace.cframe = cf(Palm.Position,bpos) *ca(rd(-90),0,0)
  665. PalmLev.position = (Palm.CFrame *cf(0,-15*s,0)).p
  666. wait(0.45)
  667. PalmLev.position = bpos + ((Palm.CFrame *cf(0,1*s,0)).p - Palm.Position)
  668. 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
  669. Explode(Palm.CFrame *cf(0,6*s,0) *ca(rd(180),0,0),15*s,ts(bhit.BrickColor))
  670. DmgHumanoidsNear((Palm.CFrame *cf(0,8,0)).p,3,10,(12*s)+2,105)
  671. if not bhit.Anchored then PalmLev.position = (Palm.CFrame *cf(0,12*s,0)).p wait(0.5) end
  672. wait(1) Posing = "Follow" Anim.b = "None"
  673. elseif Anim.a == "Splat" then
  674. if mouse.Target == nil and (Palm.Position - mouse.Hit.p).magnitude > 500 then return end local bpos = mouse.Hit.p
  675. Anim.b = "Splat" Posing = "None"
  676. 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)
  677. local tz = 0 repeat wait() tz = tz + wait() until (PalmLev.position - Palm.Position).magnitude < 5*s or tz > 1.3
  678. for i=-90,0,5 do
  679. PalmLev.position = PalmLev.position + v3(0,2*s,0) PalmFace.cframe = cf(0,0,0) *ca(0,yb,0) *ca(rd(i),0,0)
  680. wait()
  681. end wait(0.2)
  682. for i=0,-100,-10 do
  683. local lewd = i
  684. if lewd < -50 then lewd = -95 end
  685. 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)
  686. wait()
  687. end wait(0.2)
  688. 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)
  689. local de = it("Decal",cr) de.Face = "Top" de.Texture = asset .. Decs.Crack Serv.d:AddItem(cr,16)
  690. DmgHumanoidsNear((Palm.CFrame *cf(0,0,-1)).p,3,20,(15*s)+2,110)
  691. ShockWave(Palm.CFrame *ca(rd(90),0,0),25*s,LaserCol)
  692. wait(1) Posing = "Follow" Anim.b = "None"
  693. elseif Anim.a == "Ride" and Button == false then
  694. Posing = "None" Anim.b = "Ride"
  695. Button = true
  696. repeat PalmLev.position = (Palm.CFrame *cf(0,10,0)).p wait() until Button == false
  697. Anim.b = "None"
  698. elseif Anim.a == "Shower" and Button == false then
  699. Anim.b = "Shower" Button = true
  700. repeat
  701. local targz = Palm.Position + v3(0,20*s,0)
  702. if ra(1,12) == 1 then FireFinger(LaserCol,pPinkie3,targz,2,4,1,18,55) end
  703. if ra(1,13) == 1 then FireFinger(LaserCol,pRing3,targz,2,4,1,18,60) end
  704. if ra(1,12) == 1 then FireFinger(LaserCol,pMid3,targz,2,4,1,18,65) end
  705. if ra(1,13) == 1 then FireFinger(LaserCol,pPoint3,targz,2,4,1,18,70) end
  706. if ra(1,12) == 1 then FireFinger(LaserCol,pThumb3,targz,2,4,1,18,80) end
  707. PalmFace.cframe = PalmFace.cframe *ca(0,rd(10),0)
  708. wait()
  709. until Button == false
  710. Anim.b = "None"
  711. elseif Anim.a == "Pound" and Anim.b == "None" then Posing = "None" Anim.b = "Pound"
  712. local bhit,bpos = ray(Palm.Position,Palm.Position - (Palm.CFrame *cf(0,-1,0)).p)
  713. if bhit == nil or (Palm.Position - bpos).magnitude > 500 then return end
  714. PalmLev.position = bpos + v3(0,15*s,0)
  715. local ya,yb,yc = PalmFace.cframe:toEulerAnglesXYZ() PalmFace.cframe = ca(ya,yb,yc)
  716. local tz = 0 repeat wait() tz = tz + wait() until (PalmLev.position - Palm.Position).magnitude < 5*s or tz > 1.3 wait(0.1)
  717. for i=-90,-10,10 do
  718. PalmFace.cframe = ca(ya,yb,yc) *ca(0,0,rd(i+90)) PalmLev.position = PalmLev.position + v3(0,2.5*s,0)
  719. wait() end wait(0.25) local realcf = cf(v3(he.Position.x,0,he.Position.z),v3(Palm.Position.x,0,Palm.Position.z))
  720. for i=-10,-90,-10 do
  721. PalmFace.cframe = ca(ya,yb,yc) *ca(0,0,rd(i+90)) PalmLev.position = PalmLev.position - v3(0,4*s,0)
  722. wait() end PalmFace.cframe = realcf *ca(rd(-90),rd(90),0) wait(0.25)
  723. 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)
  724. local de = it("Decal",cr) de.Face = "Top" de.Texture = asset .. Decs.Crack Serv.d:AddItem(cr,16)
  725. Dustplosion(Palm.CFrame *cf(2*s,0,0) *ca(rd(90),0,rd(90)),30*s,{"Really red","Really black","Really red"},3)
  726. ShockWave(Palm.CFrame *cf(2*s,0,0) *ca(rd(90),0,rd(90)),20*s,ts(bhit.BrickColor))
  727. DmgHumanoidsNear((Palm.CFrame *cf(0,1,0)).p,1,20,(15*s)+2,90) wait(0.2)
  728. local palmcf = cf(bpos) local earthsplos = ra(5,8) palmcf = Palm.CFrame *ca(0,rd(90),0) *ca(rd(-90),0,rd(0))
  729. for i=1,earthsplos do Earthsplosion(palmcf *cf(0,-2*s,((i*7)+7)*s),10,1,20,75) wait(0.1) end
  730. Earthsplosion(palmcf *cf(0,-2*s,(((earthsplos+1)*7)+7)*s),16,2,25,75)
  731. wait(1) Posing = "Follow" wait(0.25) Anim.b = "None"
  732. elseif Anim.a == "GroundGrip" then Posing = "None" Anim.b = "GroundGrip"
  733. local bhit,bpos = ray(Palm.Position,Palm.Position - (Palm.CFrame *cf(0,-1,0)).p)
  734. if bhit == nil or (Palm.Position - bpos).magnitude > 500 then return end
  735. PalmLev.position = bpos + v3(0,27*s,0) ColFings(false)
  736. local tz = 0 repeat wait() tz = tz + wait() until (PalmLev.position - Palm.Position).magnitude < 8*s or tz > 1.3 wait(0.1)
  737. local thepos = (Palm.CFrame *cf(0,-0.1*s,0)).p - Palm.Position
  738. PalmFace.cframe = cf(Palm.Position,bpos + thepos) *ca(rd(-90),0,0)
  739. 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)
  740. 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
  741. 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)
  742. coroutine.resume(coroutine.create(function() for xz=1,70,7 do PalmLev.position = bpos + v3(0,xz*s,0) wait(0.06) end end))
  743. wait(0.25) Dustplosion(cf(bpos),30*s,{"Really red","Really black","Really red"},3) local lolra = ra(-360,360)
  744. Earthsplosion(cf(bpos),25,1,20,125,"sand") for yyy=0,360,60 do coroutine.resume(coroutine.create(function()
  745. for zzz=1,4 do
  746. Earthsplosion(cf(bpos) *ca(0,rd(yyy+lolra),0) *cf(0,0,zzz*15*s),10,1,20,75) wait(0.14)
  747. 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
  748. 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"
  749. elseif Anim.a == "Beam" and not Button and Anim.b == "None" then Anim.b = "Beam"
  750. ShortifiedAnim("Beam") wait(0.5) Anim.b = "None"
  751. end
  752. end)
  753. mouse.Button1Up:connect(function()
  754. Button = false
  755. end)
  756. mouse.Move:connect(function()
  757. end)
  758.  
  759. end)
  760. hb.Deselected:connect(function(mouse)
  761. Equip = false
  762. end)
Advertisement
Add Comment
Please, Sign In to add comment
Public Pastes
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!