API tools faq
paste
Thefrozen106

FOR POPPIVI!!

Thefrozen106
Jun 21st, 2016
120
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 43.86 KB | None | 0 0
raw download clone embed print report
  1. --// Since you damned FMers are so enraptured by this script,
  2. --// I'll reupload it, fixed.
  3. --// Note, this was not made by me, but by RobroxMasterDX. (he's banned, btw)
  4. --// I take no credit for it. I had only just leaked it.
  5. --// Note, this was the old link: http://adf.ly/1GpxgN
  6.  
  7. script.Parent=nil
  8. --- shortcuts
  9. v3 = Vector3.new
  10. cn = CFrame.new
  11. ca2 = CFrame.Angles
  12. mf = math.floor
  13. mran = math.random
  14. mrad = math.rad
  15. mdeg = math.deg
  16. ca = function(x,y,z) return ca2(mrad(x),mrad(y),mrad(z)) end
  17. mran2 = function(a,b) return mran(a*1000,b*1000)/1000 end
  18. ud=UDim2.new
  19. bn = BrickColor.new
  20. c3 = Color3.new
  21. -----
  22. --"Player='popvipi'"
  23. --// I presume this is the section that made you idiots think I made it.
  24. Players=Game:GetService("Players")
  25. Player=Players.LocalPlayer --[Player]
  26. PChar=Player.Character
  27.  
  28. as,so={},{'metal','Block','Slash','Slash2','Hit','Kick'}
  29. as.corner='11294911'
  30. as.cone='1033714'
  31. as.ring="3270017"
  32. as.Chakram='47260990'
  33. as.ring2='18430887'
  34. as.blast='20329976'
  35. as.missile='10207677'
  36. as.fire='2693346'
  37. as.boom='3264793'
  38. as.slash='10209645'
  39. as.abscond='2767090'
  40. as.firelaser='13775494'
  41. as.diamond='9756362'
  42. as.metal='rbxasset://sounds\\unsheath.wav'
  43. as.Block = 'rbxasset://sounds\\metal.ogg'
  44. as.Slash = '10209645'
  45. as.Slash2 = '46760716'
  46. as.Hit='10209583'
  47. as.Kick='46153268'
  48. as.cast='2101137'
  49. as.rockhead= '21629626'
  50. as.rockheadt='21629620'
  51.  
  52.  
  53. for index, assetid in pairs(as) do
  54. if tonumber(assetid) then
  55. as[index] = "http://www.roblox.com/asset/?id="..assetid
  56. end
  57. end
  58.  
  59. local LastMade
  60. iNew=function(tab)
  61. local v=Instance.new(tab[1])
  62. for Ind,Val in pairs(tab) do
  63. if Ind~=1 and Ind~=2 then
  64. v[Ind] = Val
  65. end
  66. end
  67. v.Parent=tab[2]==0 and LastMade or tab[2]
  68. LastMade=v
  69. return v
  70. end
  71.  
  72. iPart=function(tab)
  73. local v=Instance.new(tab.type or 'Part')
  74. if tab.type~='CornerWedgePart' then v.formFactor='Custom' end
  75. v.TopSurface=0 v.BottomSurface=0
  76. if tab.sc then
  77. v.Size=v3(tab[2]*tab.sc,tab[3]*tab.sc,tab[4]*tab.sc)
  78. else
  79. v.Size=v3(tab[2],tab[3],tab[4])
  80. end
  81. if tab.co then v.BrickColor=bn(tab.co) end
  82. if tab.tr then v.Transparency=tab.tr end
  83. if tab.rf then v.Reflectance=tab.rf end
  84. if tab.can then v.CanCollide=tab.can end
  85. if tab.cf then v.CFrame=tab.cf end
  86. if tab.an then v.Anchored=tab.an end
  87. if tab.na then v.Name=tab.na end
  88. if tab.ma then v.Material=tab.ma end
  89. v.Parent=tab[1]
  90. v:BreakJoints()
  91. LastMade=v
  92. return v
  93. end
  94. function getoutline(x,z,i)
  95. return math.sqrt(x^2+z^2)+(i or 0.05),mdeg(math.atan2(x,z))
  96. end
  97. function v32(cf)
  98. local x,y,z=cf:toEulerAnglesXYZ()
  99. return v3(mdeg(x),mdeg(y),mdeg(z))
  100. end
  101. WeldLib={}
  102. function GetWeld(weld,CO)
  103. if not WeldLib[weld] then
  104. local x0,y0,z0=weld.C0:toEulerAnglesXYZ()
  105. local x1,y1,z1=weld.C1:toEulerAnglesXYZ()
  106. WeldLib[weld]={[0]=v3(mdeg(x0),mdeg(y0),mdeg(z0)),[1]=v3(mdeg(x1),mdeg(y1),mdeg(z1))}
  107. end
  108. return weld['C'..CO].p,WeldLib[weld][CO]
  109. end
  110. function ClearWeld(weld)
  111. if WeldLib[weld] then
  112. WeldLib[weld]=nil
  113. end
  114. end
  115. function TweenNum(i,loops,i1,i2,smooth)
  116. smooth = smooth or 1
  117. local perc
  118. if smooth == 1 then
  119. perc = math.sin((math.pi/2)/loops*i)
  120. else
  121. perc = i/loops
  122. end
  123. local ton
  124. if i1 > i2 then
  125. ton = -math.abs(i1 - i2) *perc
  126. else
  127. ton = math.abs(i1 - i2) *perc
  128. end
  129. return i1+ton
  130. end
  131. function TweenV3(i,loops,v1,v2,smooth)
  132. smooth = smooth or 1
  133. local perc
  134. if smooth == 1 then perc = math.sin((math.pi/2)/loops*i) else perc = i/loops end
  135. local tox2,toy2,toz2 = 0,0,0
  136. if v1.x > v2.x then
  137. tox2 = -math.abs(v1.x - v2.x) *perc
  138. else
  139. tox2 = math.abs(v1.x - v2.x) *perc
  140. end
  141. if v1.y > v2.y then
  142. toy2 = -math.abs(v1.y - v2.y) *perc
  143. else
  144. toy2 = math.abs(v1.y - v2.y) *perc
  145. end
  146. if v1.z > v2.z then
  147. toz2 = -math.abs(v1.z - v2.z) *perc
  148. else
  149. toz2 = math.abs(v1.z - v2.z) *perc
  150. end
  151. return v3(v1.x + tox2,v1.y + toy2,v1.z + toz2)
  152. end
  153. function TweenCF(i,loops,origpos,origangle,nextpos,nextangle,smooth)
  154. smooth = smooth or 1
  155. local perc
  156. if smooth == 1 then perc = math.sin((math.pi/2)/loops*i) else perc = i/loops end
  157. local tox,toy,toz = 0,0,0
  158. if origangle.x > nextangle.x then tox = -math.abs(origangle.x - nextangle.x) *perc
  159. else tox = math.abs(origangle.x - nextangle.x) *perc end
  160. if origangle.y > nextangle.y then toy = -math.abs(origangle.y - nextangle.y) *perc
  161. else toy = math.abs(origangle.y - nextangle.y) *perc end
  162. if origangle.z > nextangle.z then toz = -math.abs(origangle.z - nextangle.z) *perc
  163. else toz = math.abs(origangle.z - nextangle.z) *perc end
  164. local tox2,toy2,toz2 = 0,0,0
  165. if origpos.x > nextpos.x then
  166. tox2 = -math.abs(origpos.x - nextpos.x) *perc
  167. else tox2 = math.abs(origpos.x - nextpos.x) *perc end
  168. if origpos.y > nextpos.y then
  169. toy2 = -math.abs(origpos.y - nextpos.y) *perc
  170. else toy2 = math.abs(origpos.y - nextpos.y) *perc end
  171. if origpos.z > nextpos.z then
  172. toz2 = -math.abs(origpos.z - nextpos.z) *perc
  173. else toz2 = math.abs(origpos.z - nextpos.z) *perc end
  174. return cn(origpos.x + tox2,origpos.y + toy2,origpos.z + toz2)*ca(origangle.x + tox,origangle.y + toy,origangle.z + toz)
  175. end
  176. function SetWeld(weld,CO,i, loops, origpos,origangle, nextpos,nextangle,smooth)
  177. loops=math.floor(loops)
  178. smooth = smooth or 1
  179. if not WeldLib[weld] then
  180. local x0,y0,z0=weld.C0:toEulerAnglesXYZ()
  181. local x1,y1,z1=weld.C1:toEulerAnglesXYZ()
  182. WeldLib[weld]={[0]=v3(mdeg(x0),mdeg(y0),mdeg(z0)),[1]=v3(mdeg(x1),mdeg(y1),mdeg(z1))}
  183. end
  184. local perc =smooth==1 and math.sin((math.pi/2)/loops*i) or i/loops
  185. --print(weld.Part1)
  186. local tox,toy,toz = 0,0,0
  187. tox = origangle.x > nextangle.x and -math.abs(origangle.x - nextangle.x) *perc or math.abs(origangle.x - nextangle.x) *perc
  188. toy = origangle.y > nextangle.y and -math.abs(origangle.y - nextangle.y) *perc or math.abs(origangle.y - nextangle.y) *perc
  189. toz = origangle.z > nextangle.z and -math.abs(origangle.z - nextangle.z) *perc or math.abs(origangle.z - nextangle.z) *perc
  190. local tox2,toy2,toz2 = 0,0,0
  191. tox2= origpos.x > nextpos.x and -math.abs(origpos.x - nextpos.x) *perc or math.abs(origpos.x - nextpos.x) *perc
  192. toy2= origpos.y > nextpos.y and -math.abs(origpos.y - nextpos.y) *perc or math.abs(origpos.y - nextpos.y) *perc
  193. toz2= origpos.z > nextpos.z and -math.abs(origpos.z - nextpos.z) *perc or math.abs(origpos.z - nextpos.z) *perc
  194. WeldLib[weld][CO] = v3(origangle.x + tox,origangle.y + toy,origangle.z + toz)
  195. weld['C'..CO] = cn(origpos.x + tox2,origpos.y + toy2,origpos.z + toz2)*ca(origangle.x + tox,origangle.y + toy,origangle.z + toz)
  196. end
  197. function se(Key,Text)
  198. local Values = {}
  199. for value in (Text..Key):gmatch("(.-)"..Key) do
  200. table.insert(Values,value)
  201. end
  202. local Values2={}
  203. for i,v in pairs(Values) do Values2[i]=Values[i]:lower() end
  204. return Values,Values2
  205. end
  206. findplayer=function(nn)
  207. if not nn then return nil end
  208. local found
  209. for i,v in pairs(Players:GetPlayers()) do
  210. if string.find(v.Name:lower(),nn:lower()) and not found then
  211. found=v
  212. end
  213. end
  214. return found
  215. end
  216. LoopFunctions={}
  217. iLoopFunctions=-9000
  218. function DoLoop(times,func)
  219. iLoopFunctions=iLoopFunctions+1
  220. LoopFunctions[tonumber(iLoopFunctions)]={times,0,func}
  221. end
  222. function MeshEffect(times,cf1,cf2,scale1,scale2,tr1,tr2,col,type)
  223. local cf2=cf2 or cf1
  224. local v=iPart{Char,0.2,0.2,0.2,co=col,cf=cf1,na='Mesh',an=true,ca=false,tr=tr1}
  225. local mesh=iNew{'SpecialMesh',v,Scale=scale1}
  226. if type=='Brick' or type=='Sphere' then
  227. mesh.MeshType=type
  228. else
  229. mesh.MeshId=type
  230. end
  231. local x1,y1,z1 = cf1:toEulerAnglesXYZ()
  232. local x2,y2,z2 = cf2:toEulerAnglesXYZ()
  233. local count=0
  234. DoLoop(times,function(i) count=count+1
  235. mesh.Scale=TweenV3(count,times,scale1,scale2,1)*((type=='Brick' or type=='Sphere') and 5 or 1)
  236. v.Transparency=TweenNum(count,times,tr1,tr2,1)
  237. v.CFrame=TweenCF(count,times,cf1.p,v3(mdeg(x1),mdeg(y1),mdeg(z1)),cf2.p,v3(mdeg(x2),mdeg(y2),mdeg(z2)),1)
  238. if i==1 then v:Remove() end end)
  239. end
  240. Dmgv={8,16}
  241. HitDebounce={}
  242. Damage=function(Hum,Mult,Sound)
  243. if not Hum or Hum.Parent==Char then return end
  244. if not Hum.Parent:findFirstChild'Torso' then return end
  245. local HName=Hum.Parent.Name
  246. if HitDebounce[HName] and HitDebounce[HName]>tick() then return end
  247. HitDebounce[HName]=tick()+0.2
  248. local Mult=Mult or 1
  249. local Dealt=mran(Dmgv[1],Dmgv[2])*Mult
  250. local col=''
  251. if Hum.Parent:findFirstChild'Block' and Hum.Parent.Block.Value>0 then
  252. Hum.Parent.Block.Value=Hum.Parent.Block.Value-1
  253. col='Bright blue'
  254. else
  255. Hum.Health=Hum.Health-Dealt
  256. col='Bright red'
  257. end
  258. if Sound then so[col=='Bright blue' and 'Block' or 'Hit']:Play() end
  259. local DoH=iNew{'Model',Char,Name=col=='Bright blue' and 'Block' or Dealt}
  260. iNew{'Humanoid',DoH,MaxHealth=1/0,Health=1/0,Name=''}
  261. local Doh=iPart{DoH,0.6,0.2,0.6,co=col,an=true} Doh.Name='Head' iNew{'CylinderMesh',Doh}
  262. local dofs=Hum.Parent.Torso.CFrame*cn(mran2(-1.5,1.5),2.5,mran2(-1,1)) Doh.CFrame=dofs
  263. DoLoop(40,function(i) Doh.CFrame=dofs*cn(0,i*2,0) Doh.Transparency=i-0.5 if i==1 then DoH:Remove() end end)
  264. end
  265. AOEFind = function(pos,ra,f,f2) -- range get
  266. local p0,p1=pos-v3(ra/2,ra/2,ra/2),pos+v3(ra/2,ra/2,ra/2)
  267. pcall(function()
  268. for i,v in pairs(workspace:FindPartsInRegion3(Region3.new(p0,p1),nil,100)) do
  269. local Hum=v.Parent:findFirstChild'Humanoid'
  270. if v.Name=='Torso' and Hum and Hum.Health>0 and v.Parent~=Char then
  271. pcall(function() f(Hum,v) end)
  272. elseif f2 and not Hum then
  273. pcall(function() f2(v) end)
  274. end
  275. end
  276. end)
  277. end
  278. function FindSurface(part, position)
  279. local obj = part.CFrame:pointToObjectSpace(position)
  280. local siz = part.Size/2
  281. for i,v in pairs(Enum.NormalId:GetEnumItems()) do
  282. local vec = Vector3.FromNormalId(v)
  283. local wvec = part.CFrame:vectorToWorldSpace(vec)
  284. local vz = (obj)/(siz*vec)
  285. if (math.abs(vz.X-1) < 0.01 or math.abs(vz.Y-1) < 0.01 or math.abs(vz.Z-1) < 0.01) then
  286. return wvec,vec
  287. end
  288. end
  289. if part.className == "WedgePart" then
  290. return part.CFrame:vectorToWorldSpace(Vector3.new(0,0.707,-0.707)), Vector3.new(0,0.707,-0.707)
  291. end
  292. end
  293. function FaceBG(pos)
  294. BG.maxTorque=v3(1,1,1)/0
  295. BG.cframe=cn(Torso.Position,v3(pos.x,Torso.Position.y,pos.z))*cn(0,0,-1)
  296. end
  297. ray = function(Pos, Dir,tab,length) -- ray cast
  298. return workspace:FindPartOnRay(Ray.new(Pos, Dir.unit *(length or 999)),tab)
  299. end
  300. function Projectile(ofs,speed,part,adj,fhit,fnohit)
  301. part.CFrame=ofs*adj
  302. local stop=false
  303. DoLoop(50,function(x)
  304. local i=x
  305. if not stop then
  306. local hit,pos=ray(ofs.p,ofs.p-ofs*cn(0,0,-1).p,Char,speed+1)
  307. if hit then
  308. --Hit
  309. if fhit then i=1 stop=true
  310. ----
  311. local cof=FindSurface(hit,pos)
  312. --iPart{workspace,2,2,0.2,cf=cn(pos,pos+cof),an=true,co='Black'}
  313. ----
  314. local x,y,z=ofs:toEulerAnglesXYZ()
  315. ofs=cn(pos)*ca(mdeg(x),mdeg(y),mdeg(z))*cn(0,0,-part.Size.y/2)
  316. part.CFrame=ofs*adj
  317. fhit(hit,pos) end
  318. else
  319. ofs=ofs*cn(0,0,speed)
  320. part.CFrame=ofs*adj
  321. end
  322. if i==1 then
  323. if fnohit then fnohit(ofs.p) else part:Remove() end
  324. end
  325. end
  326. end)
  327. end
  328.  
  329. CC={'','Bright yellow','Flame reddish orange'}
  330. Scale=5
  331. Mat='Marble'
  332.  
  333. SpawnPoint = (PChar and PChar.Torso.CFrame or CFrame.new(0, 3, 0))*cn(0,1+Scale*3,-20-Scale*1.5)
  334. name='Brock'
  335. pcall(function() _G.OldMod00:Remove() end)
  336.  
  337. ---------------
  338. UNDYING=function()
  339. pcall(function() fUNDYING:disconnect() end)
  340. pcall(function() local hum=Grabbing.Part1.Parent.Humanoid Grabbing:Remove() Grabbing=nil hum.PlatformStand=false end)
  341. Torso.Anchored=true Torso.Transparency=1 Torso.CanCollide=false
  342. Stand:Remove() Head:Remove()
  343. local RespawnPos=cn(Torso.CFrame.p+v3(0,Scale*5,0))*ca(0,mran(-360,360),0)
  344. wait(4)
  345. Anim='Reviving'
  346. local oldChar=Char
  347. local oldRootLimbs=RootLimbs
  348. for i,v in pairs(oldRootLimbs) do v.Anchored=true end
  349. fMarble(Char,function(v) v.Anchored=true end)
  350. MakeAI(RespawnPos) Anim='Reviving'
  351. fMarble(Char,function(v) v.Transparency=1 end)
  352. for i,v in pairs(RootLimbs) do v.Transparency=1 end
  353. wait(0.1) Torso.Anchored=true
  354. local Reconstruct={}
  355. fMarble(oldChar,function(v)
  356. local x1,y1,z1=v.CFrame:toEulerAnglesXYZ()
  357. local x2,y2,z2=Char[v.Parent.Name][v.Name].CFrame:toEulerAnglesXYZ()
  358. Reconstruct[#Reconstruct+1]={v,Char[v.Parent.Name][v.Name],v.Position,v3(mdeg(x1),mdeg(y1),mdeg(z1)),v3(mdeg(x2),mdeg(y2),mdeg(z2))} end)
  359. for i,v in pairs(oldRootLimbs) do
  360. local x1,y1,z1=v.CFrame:toEulerAnglesXYZ()
  361. local x2,y2,z2=Char[v.Name].CFrame:toEulerAnglesXYZ()
  362. Reconstruct[#Reconstruct+1]={v,Char[v.Name],v.Position,v3(mdeg(x1),mdeg(y1),mdeg(z1)),v3(mdeg(x2),mdeg(y2),mdeg(z2))} end
  363. local tweens=100
  364. for tween=1,tweens do
  365. for i,v in pairs(Reconstruct) do v[1].CFrame=TweenCF(tween,tweens,v[3],v[4],v[2].Position,v[5],1)*ca(360*(tween/tweens),720*(tween/tweens),0) end
  366. wait()
  367. end
  368. oldChar:Remove()
  369. fMarble(Char,function(v) v.Transparency=0 end)
  370. for i,v in pairs(RootLimbs) do v.Transparency=0 end
  371. Torso.Anchored=false wait()
  372. BG.maxTorque=v3(1,1,1)/0 BG.cframe=Torso.CFrame
  373. ReturnAnim()
  374. wait(2)
  375. BG.maxTorque=nov3
  376. Anim,ArmAnim,LegAnim='None','None','None'
  377. end
  378. ------
  379.  
  380. function MakeAI(SpawnPoint2)
  381. Char=iNew{'Model',workspace,Name=name,archivable=false} _G.OldMod00=Char
  382. Torso=iPart{Char,2,2,1,sc=Scale,co=CC[1],cf=SpawnPoint2,na='Torso'}
  383. pTorso=iPart{Char,2,2,1,sc=Scale,co=CC[1],cf=SpawnPoint2,na='pTorso'}
  384. Head=iPart{Char,1,1,1,sc=Scale,co=CC[1],na='Head'}
  385. pHead=iPart{Char,1,1,1,sc=Scale,co=CC[1],na='pHead'} iNew{'SpecialMesh',pHead,Scale=v3(1,1,1)*Scale/1.4,VertexColor=v3(1,1,1)/1.65,MeshId=as.rockhead,TextureId=as.rockheadt}
  386. Stand=iPart{Char,1.5,2.9,1.1,sc=Scale,co=CC[1],na='Stand'}
  387.  
  388. for i,n in pairs(so) do
  389. local v=iNew{'Sound',Torso,Volume=1,Pitch=1,Looped=false,Name=v,SoundId=as[n]}
  390. so[n]=v
  391. end
  392.  
  393.  
  394. LSho=iPart{Char,1,1.5,1,sc=Scale,co=CC[1],na='LSho'}
  395. LArm=iPart{Char,1,1.5,1,sc=Scale,co=CC[1],na='LArm'}
  396.  
  397. RSho=iPart{Char,1,1.5,1,sc=Scale,co=CC[1],na='RSho'}
  398. RArm=iPart{Char,1,1.5,1,sc=Scale,co=CC[1],na='RArm'}
  399.  
  400. LThi=iPart{Char,1,1.5,1,sc=Scale,co=CC[1],na='LThi'}
  401. LLeg=iPart{Char,1,1.5,1,sc=Scale,co=CC[1],na='LLeg'}
  402.  
  403. RThi=iPart{Char,1,1.5,1,sc=Scale,co=CC[1],na='RThi'}
  404. RLeg=iPart{Char,1,1.5,1,sc=Scale,co=CC[1],na='RLeg'}
  405.  
  406.  
  407.  
  408. nov3=v3(0,0,0)
  409. Marble={}
  410. MarbleSpeed=0.2
  411. MarbleMax=12
  412. for i,v in pairs({pTorso,LSho,RSho,LArm,RArm,LThi,RThi,LLeg,RLeg}) do
  413. v.Material=Mat
  414. local VS=v.Size
  415. local va=1.2
  416. --v.Size=v.Size/1.5
  417. local vv=v:Clone()
  418. for x=-1,1,2 do
  419. for y=-1,1,2 do
  420. for z=-1,1,2 do
  421. local marb=vv:Clone() marb.Size=VS/mran2(1.8,2.2) marb.Parent=v marb.Name=x..y..z
  422. local wmarb=iNew{'Weld',marb,Part0=v,Part1=marb,C0=cn(VS.x/4*x/va,VS.y/4*y,VS.z/4*z/va)*ca(mran(-MarbleMax,MarbleMax),mran(-MarbleMax,MarbleMax),mran(-MarbleMax,MarbleMax))}
  423. Marble[#Marble+1]={wmarb,mran(-1,1),mran(-1,1),mran(-1,1)}
  424. end end end
  425. iNew{'BlockMesh',v,Scale=v3(1,1,1)/1.5}
  426. v.Transparency=0 --.995
  427. end
  428.  
  429. for i,v in pairs(Char:children()) do if v:IsA'BasePart' and v.Name~='Torso' then v.CFrame=Torso.CFrame end end
  430.  
  431. Head.Transparency=0.99
  432. Head.CanCollide=false
  433. Neck=iNew{'Weld',Torso,Part0=Torso,Part1=Head,C0=cn(0,0,0)}
  434. pNeck=iNew{'Weld',Torso,Part0=pTorso,Part1=pHead,C0=cn(0,1.5*Scale,0)}
  435. Hum=iNew{'Humanoid',Char}
  436.  
  437.  
  438. Torso.Transparency=1
  439. wTorso=iNew{'Weld',Torso,Part0=Torso,Part1=pTorso,C0=cn(0,-2.5*Scale,0)*ca(0,0,0)}
  440. oTorso=cn(0,0,0)
  441.  
  442. Stand.Transparency=1
  443. wStand=iNew{'Weld',Torso,Part0=Torso,Part1=Stand,C0=cn(0,-2.5*Scale,0)}
  444.  
  445. wLSho=iNew{'Weld',LSho,Part0=pTorso,Part1=LSho,C0=cn(-1.5*Scale,0.75*Scale,0),C1=cn(0,0.25*Scale,0)}
  446. wLArm=iNew{'Weld',LArm,Part0=LSho,Part1=LArm,C0=cn(0,-0.75*Scale,0),C1=cn(0,0.75*Scale,0)}
  447.  
  448. wRSho=iNew{'Weld',RSho,Part0=pTorso,Part1=RSho,C0=cn(1.5*Scale,0.75*Scale,0),C1=cn(0,0.25*Scale,0)}
  449. wRArm=iNew{'Weld',RArm,Part0=RSho,Part1=RArm,C0=cn(0,-0.75*Scale,0),C1=cn(0,0.75*Scale,0)}
  450.  
  451. wLThi=iNew{'Weld',LThi,Part0=pTorso,Part1=LThi,C0=cn(-0.5*Scale,-1*Scale,0),C1=cn(0,0.75*Scale,0)}
  452. wLLeg=iNew{'Weld',LLeg,Part0=LThi,Part1=LLeg,C0=cn(1,-0.75*Scale,0),C1=cn(0,0.75*Scale,0)}
  453.  
  454. wRThi=iNew{'Weld',RThi,Part0=pTorso,Part1=RThi,C0=cn(0.5*Scale,-1*Scale,0),C1=cn(0,0.75*Scale,0)}
  455. wRLeg=iNew{'Weld',RLeg,Part0=RThi,Part1=RLeg,C0=cn(0,-0.75*Scale,0),C1=cn(0,0.75*Scale,0)}
  456.  
  457. wLSho.C0=cn(-1.5*Scale,0.75*Scale,0)*ca(0,0,-135) --a,b
  458. wLArm.C0=cn(0,-0.75*Scale,0)*ca(0,0,0) --c,d
  459. wRSho.C0=cn(1.5*Scale,0.75*Scale,0)*ca(0,0,135) --e,f
  460. wRArm.C0=cn(0,-0.75*Scale,0)*ca(0,0,0) --g,h
  461. ----
  462. wLThi.C0=cn(-0.5*Scale,-1*Scale,0)*ca(0,0,-45) --i,j
  463. wLLeg.C0=cn(0,-0.75*Scale,0)*ca(0,0,0) --k,l
  464. wRThi.C0=cn(0.5*Scale,-1*Scale,0)*ca(0,0,45) --m,n
  465. wRLeg.C0=cn(0,-0.75*Scale,0)*ca(0,0,0) --o,p
  466.  
  467. BG=iNew{'BodyGyro',Torso,maxTorque=nov3}
  468. BP=iNew{'BodyPosition',Torso,maxForce=nov3}
  469. fUNDYING=Hum.Died:connect(UNDYING)
  470. LimbNames={'LSho','RSho','LArm','RArm','RThi','LThi','RLeg','LLeg'}
  471. for i=1,8 do local v=LimbNames[i] LimbNames[v]=getfenv()["w"..v] end
  472. RootLimbs={pHead,pTorso,LSho,RSho,LArm,RArm,RThi,LThi,RLeg,LLeg}
  473. Anim,LegAnim,ArmAnim='Sit','Sit','Sit'
  474. local a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p=GetPose()
  475. SetWeld(wLSho,0,1,1,a,b,v3(-1.5*Scale,0.5*Scale,0),v3(0,0,-10),1)
  476. SetWeld(wLArm,0,1,1,c,d,v3(0,-0.75*Scale,0),v3(10,0,10),1)
  477. SetWeld(wRSho,0,1,1,e,f,v3(1.5*Scale,0.5*Scale,0),v3(0,0,10),1)
  478. SetWeld(wRArm,0,1,1,g,h,v3(0,-0.75*Scale,0),v3(10,0,-10),1)
  479. SetWeld(wLThi,0,1,1,i,j,v3(-0.5*Scale,-1*Scale,0),v3(15,0,-5),1)
  480. SetWeld(wLLeg,0,1,1,k,l,v3(0,-0.75*Scale,0),v3(-15,0,5),1)
  481. SetWeld(wRThi,0,1,1,m,n,v3(0.5*Scale,-1*Scale,0),v3(15,0,5),1)
  482. SetWeld(wRLeg,0,1,1,o,p,v3(0,-0.75*Scale,0),v3(-15,0,-5),1)
  483. Oa,Ob,Oc,Od,Oe,Of,Og,Oh,Oi,Oj,Ok,Ol,Om,On,Oo,Op=GetPose()
  484. SetWeld(wLSho,0,1,1,nov3,nov3,a,b,1)
  485. SetWeld(wLArm,0,1,1,nov3,nov3,c,d,1)
  486. SetWeld(wRSho,0,1,1,nov3,nov3,e,f,1)
  487. SetWeld(wRArm,0,1,1,nov3,nov3,g,h,1)
  488. SetWeld(wLThi,0,1,1,nov3,nov3,i,j,1)
  489. SetWeld(wLLeg,0,1,1,nov3,nov3,k,l,1)
  490. SetWeld(wRThi,0,1,1,nov3,nov3,m,n,1)
  491. SetWeld(wRLeg,0,1,1,nov3,nov3,o,p,1)
  492. end
  493.  
  494. function GetPose()
  495. local a,b=GetWeld(wLSho,0)
  496. local c,d=GetWeld(wLArm,0)
  497. local e,f=GetWeld(wRSho,0)
  498. local g,h=GetWeld(wRArm,0)
  499. local i,j=GetWeld(wLThi,0)
  500. local k,l=GetWeld(wLLeg,0)
  501. local m,n=GetWeld(wRThi,0)
  502. local o,p=GetWeld(wRLeg,0)
  503. local q,r=GetWeld(wTorso,0)
  504. return a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r
  505. end
  506.  
  507. MakeAI(SpawnPoint)
  508.  
  509. ASpeed=28
  510. coroutine.resume(coroutine.create(function()
  511. SetWeld(wLSho,0,1,1,nov3,nov3,wLSho.C0.p,v3(45,0,-10),1)
  512. SetWeld(wLArm,0,1,1,nov3,nov3,wLArm.C0.p,v3(45,0,10),1)
  513. SetWeld(wRSho,0,1,1,nov3,nov3,wRSho.C0.p,v3(45,0,10),1)
  514. SetWeld(wRArm,0,1,1,nov3,nov3,wRArm.C0.p,v3(45,0,-10),1)
  515. SetWeld(wLThi,0,1,1,nov3,nov3,v3(-0.5*Scale,-0.6*Scale,-0.5*Scale),v3(125,0,-12),1)
  516. SetWeld(wLLeg,0,1,1,nov3,nov3,wLLeg.C0.p,v3(-70,0,12),1)
  517. SetWeld(wRThi,0,1,1,nov3,nov3,v3( 0.5*Scale,-0.6*Scale,-0.5*Scale),v3(125,0,12),1)
  518. SetWeld(wRLeg,0,1,1,nov3,nov3,wRLeg.C0.p,v3(-70,0,-12),1)
  519. SetWeld(wTorso,0,1,1,oTorso,nov3,v3(0,-3*Scale,0),nov3,1)
  520. wait(1)
  521. Anim='Standing'
  522. local a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p=GetPose()
  523. for x=1,ASpeed do
  524. SetWeld(wTorso,0,x,ASpeed,wTorso.C0.p,nov3,oTorso,nov3,1)
  525. SetWeld(wLSho,0,x,ASpeed,a,b,v3(-1.5*Scale,0.5*Scale,0),v3(0,0,-10),1)
  526. SetWeld(wLArm,0,x,ASpeed,c,d,v3(0,-0.75*Scale,0),v3(10,0,10),1)
  527. SetWeld(wRSho,0,x,ASpeed,e,f,v3(1.5*Scale,0.5*Scale,0),v3(0,0,10),1)
  528. SetWeld(wRArm,0,x,ASpeed,g,h,v3(0,-0.75*Scale,0),v3(10,0,-10),1)
  529. SetWeld(wLThi,0,x,ASpeed,i,j,v3(-0.5*Scale,-1*Scale,0),v3(15,0,-5),1)
  530. SetWeld(wLLeg,0,x,ASpeed,k,l,v3(0,-0.75*Scale,0),v3(-15,0,5),1)
  531. SetWeld(wRThi,0,x,ASpeed,m,n,v3(0.5*Scale,-1*Scale,0),v3(15,0,5),1)
  532. SetWeld(wRLeg,0,x,ASpeed,o,p,v3(0,-0.75*Scale,0),v3(-15,0,-5),1)
  533. wait()
  534. end
  535. ArmAnim='None'
  536. LegAnim='None'
  537. Anim='None'
  538. end))
  539. --Target=PChar
  540. function Stay(bool,cff)
  541. BG.maxTorque=bool and v3(1,1,1)/0 or nov3 BG.cframe=cff or Torso.CFrame
  542. BP.maxForce=BG.maxTorque BP.position=Torso.Position
  543. end
  544. function fMarble(Ch,func)
  545. for i,v in pairs(Ch:children()) do
  546. for x=-1,1,2 do
  547. for y=-1,1,2 do
  548. for z=-1,1,2 do
  549. if v:findFirstChild(x..y..z) then func(v[x..y..z]) end
  550. end end end
  551. end
  552. end
  553. function ReturnAnim()
  554. local ne1,ne2=GetWeld(pNeck,0)
  555. local wt1,wt2=GetWeld(wTorso,0)
  556. local a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p=GetPose()
  557. for x=1,ASpeed do
  558. SetWeld(wLSho,0,x,ASpeed,a,b,Oa,Ob,1)
  559. SetWeld(wLArm,0,x,ASpeed,c,d,Oc,Od,1)
  560. SetWeld(wRSho,0,x,ASpeed,e,f,Oe,Of,1)
  561. SetWeld(wRArm,0,x,ASpeed,g,h,Og,Oh,1)
  562. SetWeld(wLThi,0,x,ASpeed,i,j,Oi,Oj,1)
  563. SetWeld(wLLeg,0,x,ASpeed,k,l,Ok,Ol,1)
  564. SetWeld(wRThi,0,x,ASpeed,m,n,Om,On,1)
  565. SetWeld(wRLeg,0,x,ASpeed,o,p,Oo,Op,1)
  566. SetWeld(wTorso,0,x,ASpeed,wt1,wt2,oTorso,nov3,1)
  567. SetWeld(pNeck,0,x,ASpeed,ne1,ne2,v3(0,1.5,0)*Scale,nov3,1)
  568. wait()
  569. end
  570. end
  571.  
  572. ChatConnection=Player.Chatted:connect(function(msg)
  573. coroutine.resume(coroutine.create(function()
  574. if not Char.Parent then return end
  575. local Sep,sep=se(';',msg)
  576. local p1,p2=findplayer(Sep[2]),findplayer(Sep[3])
  577. local cmd=sep[1]
  578. --print(Sep[1])
  579. --print(LimbNames[Sep[1]])
  580. Tt=(p1 and p1.Character and p1.Character:findFirstChild'Torso') and p1.Character.Torso or nil
  581. if cmd=='sit' and (Anim=='None' or Anim=='Follow') then
  582. Anim='Sitting'
  583. Hum:MoveTo(Torso.Position,Torso)
  584. LegAnim,ArmAnim='Sit','Sit'
  585. for x=1,ASpeed do
  586. SetWeld(wLSho,0,x,ASpeed,Oa,Ob,Oa,v3(45,0,-10),1)
  587. SetWeld(wLArm,0,x,ASpeed,Oc,Od,Oc,v3(45,0,10),1)
  588. SetWeld(wRSho,0,x,ASpeed,Oe,Of,Oe,v3(45,0,10),1)
  589. SetWeld(wRArm,0,x,ASpeed,Og,Oh,Og,v3(45,0,-10),1)
  590. SetWeld(wLThi,0,x,ASpeed,Oi,Oj,v3(-0.5*Scale,-0.6*Scale,-0.5*Scale),v3(125,0,-12),1)
  591. SetWeld(wLLeg,0,x,ASpeed,Ok,Ol,Ok,v3(-70,0,12),1)
  592. SetWeld(wRThi,0,x,ASpeed,Om,On,v3( 0.5*Scale,-0.6*Scale,-0.5*Scale),v3(125,0,12),1)
  593. SetWeld(wRLeg,0,x,ASpeed,Oo,Op,Oo,v3(-70,0,-12),1)
  594. SetWeld(wTorso,0,x,ASpeed,oTorso,nov3,v3(0,-3*Scale,0),nov3,1)
  595. wait()
  596. end
  597. Anim='Sit'
  598. elseif (cmd=='stand' or cmd=='stop') and (Anim=='Roll' or Anim=='Sit' or Anim=='Follow' or Anim=='Form' or Anim=='Dance' or Anim=='Grab') then
  599. if Anim=='Sit' or Anim=='Form' or Anim=='Dance' or Anim=='Roll' then
  600. Anim='Returning'
  601. ReturnAnim()
  602. else
  603. Target=nil
  604. wait(0.2)
  605. Hum:MoveTo(Torso.Position,Torso)
  606. end
  607. LegAnim,ArmAnim,Anim='None','None','None'
  608. elseif cmd=='follow' and Tt and Anim=='None' then
  609. Anim='Follow'
  610. Target=p1.Character
  611. elseif cmd=='shoot' and Tt and RArm['1-11'].Transparency~=1 and ArmAnim=='None' then
  612. Target=p1.Character
  613. ArmAnim='Shoot'
  614. FaceBG(Tt.Position)
  615. wait(0.1)
  616. local cff=cn(pTorso.CFrame.p,v3(Tt.Position.x,pTorso.Position.y,Tt.Position.z))
  617. local ofs=cff:toObjectSpace(cn(cff*cn(1.5*Scale,0.5*Scale,0).p,Tt.CFrame*cn(0,2,0).p)*ca(90,0,0)*cn(0,-0.25*Scale,0))
  618. local x,y,z=ofs:toEulerAnglesXYZ()
  619. local rot=v3(mdeg(x),mdeg(y),mdeg(z))
  620. for q=1,ASpeed do
  621. SetWeld(wRArm,0,q,ASpeed,Og,Oh,Og,nov3,1)
  622. SetWeld(wRSho,0,q,ASpeed,Oe,Of,ofs.p,rot,1)
  623. SetWeld(wRSho,1,q,ASpeed,v3(0,0.25*Scale,0),nov3,nov3,nov3,1)
  624. wait()
  625. end
  626. for y=-1,1,2 do for x=-1,1,2 do for z=-1,1,2 do
  627. local new=RArm[x..y..z]:Clone() new.Parent=RArm game.Debris:AddItem(new,8) new.Touched:connect(function(hit) Damage(hit.Parent:findFirstChild'Humanoid') end)
  628. new.CFrame=RArm[x..y..z].CFrame*cn(0,-Scale*1.5,0) new.CanCollide=true new.Velocity=cn(new.Position,Target.Torso.Position).lookVector*((new.Position-Target.Torso.Position).magnitude*20+900)
  629. RArm[x..y..z].Transparency=1 so.Block:Play() wait(0.06)
  630. end end end
  631. RArm.Transparency=1
  632. delay(1,function()
  633. for x=-1,1,2 do for y=-1,1,2 do for z=-1,1,2 do local new=RArm[x..y..z]:Clone() new.Transparency=0 new.CanCollide=false new.Name='f'..new.Name new.Parent=RArm new.CFrame=RArm.CFrame*cn(Scale*x*2,Scale*-3,Scale*z*2)
  634. iNew{'BodyPosition',new,maxForce=v3(1,1,1)/0,position=RArm[x..y..z].Position} wait(0.14) end end end
  635. DoLoop(35,function(i) for x=-1,1,2 do for y=-1,1,2 do for z=-1,1,2 do RArm['f'..x..y..z].BodyPosition.position=RArm[x..y..z].Position if i==1 then RArm['f'..x..y..z]:Remove() RArm[x..y..z].Transparency=0 RArm.Transparency=0 end end end end end)
  636. end)
  637. for q=1,ASpeed do
  638. SetWeld(wRArm,0,q,ASpeed,Og,nov3,Og,Oh,1)
  639. SetWeld(wRSho,0,q,ASpeed,ofs.p,rot,Oe,Of,1)
  640. SetWeld(wRSho,1,q,ASpeed,nov3,nov3,v3(0,0.25*Scale,0),nov3,1)
  641. wait()
  642. end
  643. BG.maxTorque=nov3
  644. ArmAnim='None'
  645. elseif cmd=='slam' and (Anim=='None' or Anim=='Follow') and Tt then
  646. Target=p1
  647. local lTt=Tt
  648. Anim='Follow'
  649. repeat Hum:MoveTo(Tt.Position+v3(0.5,0.5,0.5),Tt) wait(0.2) until lTt~=Tt or (Tt.Position-pTorso.Position).magnitude<10+Scale*5.5 or Anim~='Follow'
  650. if Anim~='Follow' then BG.maxTorque=nov3 return end
  651. if lTt~=Tt then return end
  652. Anim,LegAnim,ArmAnim='Slam','',''
  653. Hum:MoveTo(Torso.Position,Torso)
  654. FaceBG(Tt.Position)
  655. Stay(true,BG.cframe)
  656. local a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p=GetPose()
  657. ASpeed2=15
  658. for x=1,ASpeed2 do
  659. SetWeld(wLSho,0,x,ASpeed2,a,b,Oa,v3(180,0,0),1)
  660. SetWeld(wRSho,0,x,ASpeed2,e,f,Oe,v3(180,0,0),1)
  661. SetWeld(wTorso,0,x,ASpeed2,nov3,nov3,v3(0,3,0)*Scale,nov3,1)
  662. wait()
  663. end
  664. for x=1,ASpeed2 do
  665. SetWeld(wTorso,0,x,ASpeed2,v3(0,3,0)*Scale,nov3,v3(0,-3*Scale+2.5,-6*Scale),v3(-89,0,0),1)
  666. wait()
  667. end
  668. AOEFind(pTorso.Position,6.5*Scale,function(Hum) Damage(Hum,3,true) Hum.Sit=true end)
  669. MeshEffect(35,Torso.CFrame*cn(0,-3.5*Scale,-6*Scale)*ca(90,0,0),nil,v3(2,2,1)*Scale,v3(12,12,5)*Scale,0.2,1,'Light stone grey',as.ring)
  670. wait(0.5)
  671. for x=1,ASpeed do
  672. SetWeld(wTorso,0,x,ASpeed,v3(0,-3*Scale+2.5,-6*Scale),v3(-90,0,0),nov3,nov3,1)
  673. SetWeld(wLSho,0,x,ASpeed,Oa,v3(180,0,0),Oa,Ob,1)
  674. SetWeld(wRSho,0,x,ASpeed,Oe,v3(180,0,0),Oe,Of,1)
  675. wait()
  676. end
  677. Stay(false)
  678. Anim,LegAnim,ArmAnim='None','None','None'
  679. elseif cmd=='boulder' and Anim=='None' then
  680. Target=p1.Character
  681. Anim,LegAnim,ArmAnim='','',''
  682. Stay(true)
  683. FaceBG(Tt.Position)
  684. for x=1,ASpeed do
  685. SetWeld(wLSho,0,x,ASpeed,Oa,Ob,Oa,v3(135,0,0),1)
  686. SetWeld(wLArm,0,x,ASpeed,Oc,Od,Oc,v3(0,0,0),1)
  687. SetWeld(wRSho,0,x,ASpeed,Oe,Of,Oe,v3(135,0,0),1)
  688. SetWeld(wRArm,0,x,ASpeed,Og,Oh,Og,v3(0,0,-10),1)
  689. SetWeld(wLThi,0,x,ASpeed,Oi,Oj,v3(-0.5,-0.5,0.25)*Scale,v3(45,0,-15),1)
  690. SetWeld(wLLeg,0,x,ASpeed,Ok,Ol,Ok,v3(0,0,0),1)
  691. SetWeld(wRThi,0,x,ASpeed,Om,On,v3( 0.5,-0.5,0.25)*Scale,v3(45,0,15),1)
  692. SetWeld(wRLeg,0,x,ASpeed,Oo,Op,Oo,v3(0,0,0),1)
  693. SetWeld(wTorso,0,x,ASpeed,oTorso,nov3,v3(0,-1.5,-1.5)*Scale,v3(-90,0,0),1)
  694. wait()
  695. end
  696. wait(0.2)
  697. local boulder=iPart{Char,1,1,1,type='WedgePart'} boulder.Material=Mat
  698. local wm=iNew{'SpecialMesh',boulder,Scale=v3(4,3,4)*Scale,MeshType='Wedge'}
  699. local wb=iNew{'Weld',boulder,Part0=RArm,Part1=boulder,C0=cn(-1.5*Scale,-2.3*Scale,0)*ca(180,180,0)}
  700. local a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r=GetPose()
  701. for x=1,ASpeed*2 do
  702. SetWeld(wLSho,0,x,ASpeed*2,a,b,a,v3(225,0,0),1)
  703. SetWeld(wLArm,0,x,ASpeed*2,c,d,c,v3(45,0,0),1)
  704. SetWeld(wRSho,0,x,ASpeed*2,e,f,e,v3(225,0,0),1)
  705. SetWeld(wRArm,0,x,ASpeed*2,g,h,g,v3(45,0,0),1)
  706. SetWeld(wLThi,0,x,ASpeed*2,i,j,Oi,v3(0,0,-15),1)
  707. SetWeld(wLLeg,0,x,ASpeed*2,k,l,k,v3(0,0,0),1)
  708. SetWeld(wRThi,0,x,ASpeed*2,m,n,Om,v3(0,0,15),1)
  709. SetWeld(wRLeg,0,x,ASpeed*2,o,p,o,v3(0,0,0),1)
  710. SetWeld(wTorso,0,x,ASpeed*2,q,r,nov3,nov3,1)
  711. wait()
  712. end
  713. FaceBG(Tt.Position)
  714. for x=1,ASpeed/2 do
  715. SetWeld(wLSho,0,x,math.floor(ASpeed/2),a,v3(225,0,0),a,v3(90,0,0),1)
  716. SetWeld(wLArm,0,x,math.floor(ASpeed/2),c,v3(45,0,0),c,v3(45,0,0),1)
  717. SetWeld(wRSho,0,x,math.floor(ASpeed/2),e,v3(225,0,0),e,v3(90,0,0),1)
  718. SetWeld(wRArm,0,x,math.floor(ASpeed/2),g,v3(45,0,0),g,v3(45,0,0),1)
  719. wait()
  720. end
  721. local bcf=boulder.CFrame
  722. wb:Remove()
  723. wm:Remove()
  724. boulder.Size=wm.Scale
  725. boulder.CFrame=cn(boulder.Position,Target.Torso.Position)*cn(0,3,-1)*ca(0,180,0)
  726. --boulder.Friction=0.1
  727. boulder.Elasticity=0
  728. boulder.Velocity=(boulder.CFrame*ca(0,180,0)).lookVector*((boulder.Position-Target.Torso.Position).magnitude*1+90)
  729. boulder.RotVelocity=nov3
  730. game.Debris:AddItem(boulder,8)
  731. Stay(false)
  732. ReturnAnim()
  733. Anim,LegAnim,ArmAnim='None','None','None'
  734. elseif cmd=='grab' and Tt and not Grabbing then
  735. Target=p1
  736. local lTt=Tt
  737. Anim='Follow'
  738. repeat Hum:MoveTo(Tt.Position+v3(0.5,0.5,0.5),Tt) wait(0.2) until lTt~=Tt or (Tt.Position-Stand.CFrame*cn(0,-Stand.Size.y/2+1,-2.8*Scale).p).magnitude<10 or Anim~='Follow'
  739. if Anim~='Follow' then BG.maxTorque=nov3 return end
  740. if lTt~=Tt then return end
  741. pcall(function() Tt.Parent.Humanoid.PlatformStand=true end)
  742. Hum:MoveTo(Torso.Position,Torso)
  743. Anim,LegAnim,ArmAnim='Grab','',''
  744. FaceBG(Tt.Position)
  745. for x=1,ASpeed do
  746. SetWeld(wLSho,0,x,ASpeed,Oa,Ob,Oa,v3(-30,0,-30),1)
  747. SetWeld(wLArm,0,x,ASpeed,Oc,Od,Oc,v3(0,0,0),1)
  748. SetWeld(wRSho,0,x,ASpeed,Oe,Of,Oe,v3(145,0,-30),1)
  749. SetWeld(wRArm,0,x,ASpeed,Og,Oh,Og,v3(0,0,0),1)
  750. SetWeld(wLThi,0,x,ASpeed,Oi,Oj,v3(-0.5,-0.4,0.3)*Scale,v3(70,0,0),1)
  751. SetWeld(wLLeg,0,x,ASpeed,Ok,Ol,Ok,v3(-20,0,0),1)
  752. SetWeld(wRThi,0,x,ASpeed,Om,On,v3(0.5,-0.5,-0.3)*Scale,v3(135,0,0),1)
  753. SetWeld(wRLeg,0,x,ASpeed,Oo,Op,Oo,v3(-90,0,0),1)
  754. SetWeld(wTorso,0,x,ASpeed,oTorso,nov3,v3(0,-2,-1.5)*Scale,v3(-90,0,0),1)
  755. wait()
  756. end
  757. local ofs=RArm.CFrame:toObjectSpace(Tt.CFrame)
  758. Tt.Parent.Humanoid.PlatformStand=true
  759. Grabbing=iNew{'Weld',RArm,Part0=RArm,Part1=Tt,C0=ofs}
  760. local a,b=GetWeld(Grabbing,0)
  761. for x=1,ASpeed do
  762. SetWeld(Grabbing,0,x,ASpeed,a,b,v3(0,-0.75*Scale-1,0),v3(-90,0,0),1)
  763. wait()
  764. end
  765. Stay(false)
  766. ReturnAnim()
  767. Anim,LegAnim,ArmAnim='None','None','None'
  768. elseif cmd=='dance' and (Anim=='None' or Anim=='Follow') then
  769. Hum:MoveTo(pTorso.Position,pTorso)
  770. Anim,ArmAnim,LegAnim='Dance','Dance','Dance'
  771. local ASpeed=math.floor(ASpeed/2)
  772. repeat
  773. local a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r=GetPose()
  774. for x=1,ASpeed do
  775. if Anim~='Dance' then break end
  776. SetWeld(wLSho,0,x,ASpeed,a,b,v3(-1.2,0.5,-0.25)*Scale,v3(35,0,30),1)
  777. SetWeld(wLArm,0,x,ASpeed,c,d,c,v3(25,0,0),1)
  778. SetWeld(wRSho,0,x,ASpeed,e,f,v3( 1.2,0.5,-0.25)*Scale,v3(45,0,-30),1)
  779. SetWeld(wRArm,0,x,ASpeed,g,h,g,v3(25,0,0),1)
  780. SetWeld(wLThi,0,x,ASpeed,i,j,i,v3(0,0,0),1)
  781. SetWeld(wLLeg,0,x,ASpeed,k,l,k,v3(0,0,0),1)
  782. SetWeld(wRThi,0,x,ASpeed,m,n,m,v3(45,0,20),1)
  783. SetWeld(wRLeg,0,x,ASpeed,o,p,o,v3(-45,0,-20),1)
  784. wait()
  785. end
  786. local a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r=GetPose()
  787. for x=1,ASpeed do
  788. if Anim~='Dance' then break end
  789. SetWeld(wLSho,0,x,ASpeed,a,b,v3(-1.2,0.5,-0.25)*Scale,v3(95,0,30),1)
  790. SetWeld(wLArm,0,x,ASpeed,c,d,c,v3(-10,0,0),1)
  791. SetWeld(wRSho,0,x,ASpeed,e,f,v3( 1.2,0.5,-0.25)*Scale,v3(105,0,-30),1)
  792. SetWeld(wRArm,0,x,ASpeed,g,h,g,v3(-10,0,0),1)
  793. SetWeld(wLThi,0,x,ASpeed,i,j,i,v3(45,0,-20),1)
  794. SetWeld(wLLeg,0,x,ASpeed,k,l,k,v3(-45,0,20),1)
  795. SetWeld(wRThi,0,x,ASpeed,m,n,m,v3(0,0,0),1)
  796. SetWeld(wRLeg,0,x,ASpeed,o,p,o,v3(0,0,0),1)
  797. wait()
  798. end
  799. until Anim~='Dance'
  800. elseif cmd=='roll' and (Anim=='None' or Anim=='Follow') then
  801. Target=p1
  802. local lTt=Tt
  803. Anim,ArmAnim,LegAnim='Roll','',''
  804. local a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r=GetPose()
  805. local n1,n2=GetWeld(pNeck,0)
  806. for x=1,ASpeed do
  807. SetWeld(wLSho,0,x,ASpeed,a,b,v3(-1.5,0.5,0)*Scale,v3(0,0,-45),1)
  808. SetWeld(wLArm,0,x,ASpeed,c,d,c,v3(0,0,90),1)
  809. SetWeld(wRSho,0,x,ASpeed,e,f,v3( 1.5,0.5,0)*Scale,v3(0,0,45),1)
  810. SetWeld(wRArm,0,x,ASpeed,g,h,g,v3(0,0,-90),1)
  811. SetWeld(wLThi,0,x,ASpeed,i,j,v3(0,1, 0.5)*Scale,v3(-30,0,0),1)
  812. SetWeld(wLLeg,0,x,ASpeed,k,l,k,v3(60,0,0),1)
  813. SetWeld(wRThi,0,x,ASpeed,m,n,v3(0,1,-0.5)*Scale,v3(30,0,0),1)
  814. SetWeld(wRLeg,0,x,ASpeed,o,p,o,v3(-60,0,0),1)
  815. SetWeld(pNeck,0,x,ASpeed,n1,n2,v3(0,0,0),n2,1)
  816. SetWeld(wTorso,0,x,ASpeed,oTorso,nov3,v3(0,-2,0)*Scale,nov3,1)
  817. wait()
  818. end
  819. tWS[2]=3
  820. repeat
  821. local cf=Torso.CFrame*cn(mran2(-1,1)*Scale,-4*Scale,0.5*Scale)*ca(90+mran(-20,20),mran(-30,30),0)
  822. MeshEffect(24,cf,cf*cn(0,4*Scale,0),v3(0.5,0.5,0.5)*Scale,v3(mran2(1,4),mran2(3,5),mran2(1,3))*Scale,0.1,1,'Dark stone grey','Brick')
  823. Hum:MoveTo(Tt.CFrame*cn(0,0,Scale).p,Tt) wTorso.C0=wTorso.C0*ca(-20,0,0) wait(0.035) until lTt~=Tt or (Tt.Position-Stand.CFrame*cn(0,-Stand.Size.y/2+1,-2.8*Scale).p).magnitude<6 or Anim~='Roll'
  824. tWS[2]=1
  825. ClearWeld(wTorso)
  826. if Anim~='Roll' then return end
  827. Hum:MoveTo(Torso.Position+v3(0,1,0),Torso)
  828. Torso.Anchored=true Torso.Velocity=nov3
  829. local cf=Stand.CFrame*cn(0,0,-1.5*Scale)*ca(-45,0,0) --iPart{Char,1,1,1,co='Black',cf=cf,an=true}
  830. MeshEffect(50,cf,nil,v3(3.5,3.5,2)*Scale,v3(11,11,6)*Scale,0.1,1,'White',as.ring)
  831. for i=1,16 do
  832. local cf=cf*ca(90,360*(i/16),0)*ca(45,0,0)
  833. MeshEffect(40,cf,cf*cn(0,10*Scale,0),v3(0.2,2,0.2)*Scale,v3(1,5,1)*Scale,0.1,1,'','Sphere')
  834. end
  835. AOEFind(cf.p,6.5*Scale,function(Hum,v) Damage(Hum,2,true) Hum.Sit=true v.Velocity=cn(pTorso.Position,v.Position).lookVector*50 end)
  836. wait(0.2)
  837. Torso.Anchored=false
  838. ReturnAnim()
  839. Hum:MoveTo(Torso.Position,Torso)
  840. Anim,LegAnim,ArmAnim='None','None','None'
  841. elseif cmd=='beam' and (Anim=='None' or Anim=='Follow') then
  842. Anim='beam'
  843. local che =iPart{Char,1,1,1,sc=Scale,co=CC[1],ma=Mat} local chew=iNew{'Weld',che ,Part0=pTorso,Part1=che}
  844. local che2=iPart{che ,0.8*Scale,0.2,0.8*Scale,co='Really black'} local che2w=iNew{'Weld',che2,Part0=che,Part1=che2}
  845. local chem=iNew{'CylinderMesh',che} iNew{'CylinderMesh',che2}
  846. local chest,chex,i={},0,0
  847. for x=-1,1,2 do for y=-1,1,2 do i=i+1 chest[i]={pTorso[x..y..'-1']} chest[i][2]=chest[i][1].Weld chest[i][3]=chest[i][2].C0
  848. local xx,yy,zz=chest[i][2].C0:toEulerAnglesXYZ() chest[i][4]=v3(mdeg(xx),mdeg(yy),mdeg(zz))
  849. chest[i][5]=cn(0.45*x*Scale,0,-0.5*Scale)*chest[i][3] chest[i][6]=chest[i][4]+v3(0,-105*x,0) end end
  850. local len=1.75
  851. local dochest=function(v,chexx,adj)
  852. local p=v/ASpeed
  853. chex=adj*p
  854. chem.Scale=v3(1,len*p,1)
  855. chew.C0=ca(chexx+chex,0,0)*cn(0,len/2*p*Scale,0)
  856. che2w.C0=cn(0,len/2*p*Scale,0)
  857. for i=1,4 do SetWeld(chest[i][2],0,v,ASpeed,chest[i][3],chest[i][4],chest[i][5],chest[i][6],1) end
  858. end
  859. for v=1,ASpeed do if Tt then FaceBG(Tt.Position) end dochest(v,-90,-45) wait() end
  860. local beam=iPart{Char,0.7*Scale,1,0.7*Scale,co='New Yeller',an=true,tr=0.3} beamm=iNew{'CylinderMesh',beam}
  861. for i=1,ASpeed*3 do
  862. local p=i/ASpeed*3
  863. chex=90*math.sin((math.pi/2)/(ASpeed*3)*i)
  864. chew.C0=ca(-135+chex,0,0)*cn(0,len/2*Scale,0)
  865. local hit,pos=ray(che2.Position,che2.Position-che2.CFrame*cn(0,-1,0).p,Char)
  866. local mag=(che2.Position-pos).magnitude local p1,p2=che2.Position+v3(mran2(-1,1),mran2(-1,1),mran2(-1,1))/3,pos+v3(mran2(-1,1),mran2(-1,1),mran2(-1,1))/3
  867. beam.CFrame=cn(p1,p2)*cn(0,0,-mag/2)*ca(90,0,0) beamm.Scale=v3(1,mag+(Scale/3),1)
  868. AOEFind(pos,Scale*2,function(Hum) Damage(Hum,2.5) end)
  869. if i%2==0 then for i=1,5 do local cf=cn(pos)*ca(0,mran(-180,180),mran(-95,95)) MeshEffect(8,cf,cf*cn(0,Scale*2.2,0),v3(0.1,0.4,0.1)*Scale,v3(0.4,3,0.4)*Scale,0.2,1,CC[mran(2,3)],as.cone) end
  870. MeshEffect(8,cn(pos),nil,v3(0.8,0.8,0.8)*Scale,v3(4,4,4)*Scale,0.2,1,CC[mran(2,3)],'Sphere') end
  871. if Tt then FaceBG(Tt.Position) end
  872. wait()
  873. end
  874. DoLoop(12,function(i) beam.Transparency=0.3+i*0.7 if i==1 then beam:Remove() end end)
  875. for v=ASpeed,0,-1 do dochest(v,-90,45) wait() end
  876. Stay(false)
  877. che:Remove()
  878. Anim='None'
  879. ---------------------------------------------------------------------------=---WWWWWWWWWWWWWWWWWW
  880. elseif cmd=='box' and (Anim=='None' or Anim=='Follow') then
  881. Anim,ArmAnim='cart','cart'
  882. for x=1,ASpeed do
  883. SetWeld(wLSho,0,x,ASpeed,Oa,Ob,Oa,v3(90,0,10),1)
  884. SetWeld(wLArm,0,x,ASpeed,Oc,Od,Oc,v3(0,0,25),1)
  885. SetWeld(wRSho,0,x,ASpeed,Oe,Of,Oe,v3(90,0,-10),1)
  886. SetWeld(wRArm,0,x,ASpeed,Og,Oh,Og,v3(0,0,-25),1)
  887. wait()
  888. end
  889. Stay(true)
  890. local spawn=RArm.CFrame*cn(0,-0.75*Scale-2,0)*ca(-90,0,0)
  891. local des=iPart{Char,1,1,1,an=true,ma=Mat,cf=spawn,ca=false}
  892. for i=1,6,0.2 do des.Size=v3(i,i,i) des.CFrame=spawn*cn(0,0,-i/2) wait() end
  893. local cart=iNew{'Model',workspace,Name='Cart'}
  894. local base=iPart{cart,4,1,5,ma=Mat,cf=des.CFrame} iNew{'BodyGyro',base}
  895. for x=-1,1,2 do
  896. local new=iPart{cart,0.5,4,5,ma=Mat,cf=base.CFrame} iNew{'Weld',new,Part0=base,Part1=new,C0=cn(1.75*x,2.5,0)}
  897. local new=iPart{cart,3.5,4,0.5,ma=Mat,cf=base.CFrame} iNew{'Weld',new,Part0=base,Part1=new,C0=cn(0,2.5,2.25*x)}
  898. end
  899. for i=6,0.8,-0.2 do des.Size=v3(i,i,i) des.CFrame=spawn*cn(0,0,-i/2) wait() end des:Remove()
  900. Stay(false)
  901. ReturnAnim()
  902. Anim,ArmAnim='None','None'
  903. elseif cmd=='crush' and Grabbing and (Anim=='None' or Anim=='Follow') then
  904. Anim,ArmAnim='crush','crush'
  905. for x=1,ASpeed do
  906. SetWeld(wLSho,0,x,ASpeed,Oa,Ob,Oa,v3(80,0,-160),1)
  907. SetWeld(wLArm,0,x,ASpeed,Oc,Od,Oc,v3(0,0,80),1)
  908. SetWeld(wRSho,0,x,ASpeed,Oe,Of,Oe,v3(80,0,160),1)
  909. SetWeld(wRArm,0,x,ASpeed,Og,Oh,Og,v3(0,0,-80),1)
  910. wait()
  911. end
  912. local a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r=GetPose()
  913. wait(0.2)
  914. for x=1,ASpeed/2 do
  915. SetWeld(wLSho,0,x,ASpeed/2,a,b,Oa,v3(80,0,-14),1)
  916. SetWeld(wLArm,0,x,ASpeed/2,c,d,Oc,v3(0,0,80),1)
  917. SetWeld(wRSho,0,x,ASpeed/2,e,f,Oe,v3(80,0,14),1)
  918. SetWeld(wRArm,0,x,ASpeed/2,g,h,Og,v3(0,0,-80),1)
  919. wait()
  920. end
  921. MeshEffect(35,Grabbing.Part1.CFrame,nil,v3(2,2,1)*Scale,v3(7,7,3)*Scale,0.3,1,'Light stone grey',as.ring)
  922. local crushjo=60
  923. pcall(function() for i,v in pairs({'Neck','Left Shoulder','Right Shoulder','Left Hip','Right Hip'}) do local w=Grabbing.Part1.Parent.Torso[v] w.C1=w.C1*ca(mran(-crushjo,crushjo),mran(-crushjo,crushjo),mran(-crushjo,crushjo)) end end)
  924. local hit=Grabbing.Part1
  925. Grabbing:Remove() Grabbing=nil
  926. wait(2)
  927. pcall(function() hit.Parent.Humanoid.PlatformStand=false end)
  928. ReturnAnim()
  929. Anim,ArmAnim='None','None'
  930. elseif cmd=='eat' and Grabbing and (Anim=='None' or Anim=='Follow') then
  931. Anim,ArmAnim='Eat','Eat'
  932. for x=1,ASpeed*2 do
  933. SetWeld(wRSho,0,x,ASpeed*2,Oe,Of,Oe,v3(135,0,15),1)
  934. SetWeld(wRArm,0,x,ASpeed*2,Og,Oh,Og,v3(45,-10,-100),1)
  935. wait()
  936. end
  937. wait(1)
  938. for x=1,40 do
  939. SetWeld(wRSho,0,1,1,Oe,Of,Oe,v3(135+mran(-3,3),0,15+mran(-3,3)),1)
  940. SetWeld(wRArm,0,1,1,Og,Oh,Og,v3(45,-10+mran(-12,12),-100+mran(-3,3)),1)
  941. wait(0.05)
  942. if x%2==0 then
  943. local cf=Grabbing.Part1.CFrame*ca(180,mran(-180,180),mran(-40,40))*cn(0,1.5,0)
  944. MeshEffect(24,cf,cf*cn(0,10,0),v3(0.2,2,0.2),v3(0.4,5,0.4),0.1,1,'Really red','Sphere')
  945. end
  946. end
  947. Grabbing.Part1:BreakJoints()
  948. pcall(function() Grabbing.Part1.Parent.Head:Remove() end)
  949. Grabbing:Remove() Grabbing=nil
  950. wait(2)
  951. ReturnAnim()
  952. Anim,ArmAnim='None','None'
  953. elseif cmd=='drop' and Grabbing then
  954. local hum=Grabbing.Part1.Parent.Humanoid Grabbing:Remove() Grabbing=nil hum.PlatformStand=false
  955. elseif LimbNames[Sep[1]] and (Anim=='None' or Anim=='Form') then
  956. Anim,ArmAnim,LegAnim='Form','Form','Form'
  957. local v1,v2=GetWeld(LimbNames[Sep[1]],0)
  958. local sepx=se(',',Sep[2])
  959. for x=1,ASpeed*2 do
  960. SetWeld(LimbNames[Sep[1]],0,x,ASpeed*2,v1,v2,v1,v3(tonumber(sepx[1]),tonumber(sepx[2]),tonumber(sepx[3])),1)
  961. wait()
  962. end
  963. elseif cmd=='plode' then
  964. Char:BreakJoints() wait()
  965. local Pressure=tonumber(sep[2]) or 50
  966. fMarble(Char,function(v) v.Velocity=cn(Torso.Position,v.Position).lookVector*Pressure end)
  967. for i,v in pairs(RootLimbs) do v.Velocity=cn(Torso.Position,v.Position).lookVector*Pressure end
  968. elseif cmd=='explode' then
  969. iNew{'Explosion',pTorso,Position=pTorso.Position,BlastRadius=Scale*20}
  970. elseif cmd=='goto' then
  971. pcall(function()
  972. Hum:MoveTo(Player:GetMouse().Hit.p,Player:GetMouse().Target) end)
  973. elseif cmd=='newscale' and tonumber(sep[2]) then
  974. Char:BreakJoints()
  975. Scale=tonumber(sep[2])
  976. if Scale<0.5 then Scale=0.5 end
  977. if Scale>=100 then Scale=100 end
  978. elseif cmd=='nobox' then
  979. for i,v in pairs(workspace:children()) do if v.Name=='Cart' then v:Remove() end end
  980. elseif cmd=='die' then
  981. Char:BreakJoints()
  982. elseif cmd=='brick' then
  983. iPart{workspace,12,30,30,cf=Player.Character.Torso.CFrame*cn(0,10,-20),tr=0.5,an=true}
  984. elseif cmd=='test' then
  985. local pt=Player.Character.Torso.CFrame
  986. MeshEffect(35,pt*cn(0,5,0)*ca(90,0,0),nil,v3(2,2,1)*Scale,v3(7,7,3)*Scale,0.2,1,'Light stone grey',as.ring)
  987. else
  988. end
  989. end))
  990. end)
  991. keys={}
  992. NewAnim={}
  993. Player:GetMouse().KeyDown:connect(function(k)
  994. coroutine.resume(coroutine.create(function() keys[k]=true
  995. if (k=='q' or k=='e') and (Anim=='None' or Anim=='Laser') and (ArmAnim=='None' or ArmAnim=='Laser') and not NewAnim[k] then
  996. NewAnim[k]=true
  997. local w1,w2=k=='q' and wLSho or wRSho,k=='q' and wLArm or wRArm
  998. local x=k=='q' and -1 or 1
  999. local aa,bb=GetWeld(w1,0)
  1000. local cc,dd=GetWeld(w2,0)
  1001. local targ=w1.Part1.CFrame*cn(0,-333,0)
  1002. local tips={}
  1003. local co=0
  1004. local sho1=iPart{Char,0.35,RArm.Size.y/Scale+0.15 ,0.35,sc=Scale,co=CC[1]} iNew{'Weld',sho1,Part0=k=='q' and LArm or RArm,Part1=sho1} iNew{'CylinderMesh',sho1}
  1005. local sho2=iPart{Char,0.3,RArm.Size.y/Scale+0.16,0.3,sc=Scale,co='Really black'} iNew{'Weld',sho2,Part0=sho1,Part1=sho2} iNew{'CylinderMesh',sho2}
  1006. for x=-1,1,2 do for z=-1,1,2 do tips[#tips+1]={(k=='q' and LArm or RArm)[x..'-1'..z].Weld}
  1007. co=co+0.25
  1008. local asd=tips[#tips]
  1009. asd[2],asd[3]=GetWeld(asd[1],0)
  1010. local cf=ca(0,360*co,0)*cn(0,asd[2].y*1.8,-0.75*Scale)*ca(-20,0,0)
  1011. asd[4]=cf.p
  1012. local a,b,c=cf:toEulerAnglesXYZ()
  1013. asd[5]=v3(mdeg(a),mdeg(b),mdeg(c))
  1014. end end
  1015. for u=1,ASpeed/2 do
  1016. for i=1,4 do local asd=tips[i]
  1017. SetWeld(asd[1],0,u,ASpeed/2,asd[2],asd[3],asd[4],asd[5],1)
  1018. end wait()
  1019. end
  1020. repeat Anim,ArmAnim,LaserOn='Laser','Laser',true wait()
  1021. for i=1,4 do tips[i][1].C0=ca(0,15*x,0)*tips[i][1].C0 end
  1022. targ=TweenV3(1,12,targ,Player:GetMouse().Hit.p)
  1023. w1.C0=pTorso.CFrame:toObjectSpace(cn(pTorso.CFrame*cn(1.5*Scale*x,0.5*Scale,0).p,targ))*ca(90,0,0)
  1024. w2.C0=cn(0,-0.75*Scale,0)
  1025. until not keys[k]
  1026. ClearWeld(w1) ClearWeld(w2) for i=1,4 do ClearWeld(tips[i][1]) tips[i][6],tips[i][7]=GetWeld(tips[i][1],0) end
  1027. local a,b=GetWeld(w1,0)
  1028. local c,d=GetWeld(w2,0)
  1029. for z=1,ASpeed/2 do
  1030. for i=1,4 do SetWeld(tips[i][1],0,z,ASpeed/2,tips[i][6],tips[i][7],tips[i][2],tips[i][3],1) end
  1031. SetWeld(w1,0,z,ASpeed/2,a,b,aa,bb,1)
  1032. SetWeld(w2,0,z,ASpeed/2,c,d,cc,dd,1)
  1033. wait()
  1034. end
  1035. sho1:Remove() sho2:Remove()
  1036. NewAnim[k]=false
  1037. Anim,ArmAnim,LaserOn='None','None',false
  1038. end
  1039. end)) end)
  1040. Player:GetMouse().KeyUp:connect(function(k) keys[k]=false end)
  1041. Player:GetMouse().Button1Down:connect(function()
  1042. Button=true
  1043. if keys.f and Player:GetMouse().Target and Anim=='None' then
  1044. Hum:MoveTo(Player:GetMouse().Hit.p,Player:GetMouse().Target)
  1045. elseif (keys.q or keys.e) and LaserOn then
  1046. local pick=keys.q and 'q' or 'e'
  1047. repeat
  1048. local ofs=(pick=='q' and LArm or RArm).CFrame*ca(90,0,0)
  1049. if pick=='q' and keys.e then pick='e'
  1050. elseif pick=='e' and keys.q then pick='q' end
  1051. local part=iPart{Char,0.2,0.5,0.2,sc=Scale,co=CC[mran(2,3)],an=true,ma=Mat} iNew{'CylinderMesh',part}
  1052. Projectile(ofs,2*Scale,part,ca(-90,0,0),function(hit,pos)
  1053. AOEFind(pos,Scale*2,function(Hum,v) Damage(Hum) end)
  1054. end,
  1055. function(pos)
  1056. for i=1,5 do local cf=cn(pos)*ca(0,mran(-180,180),mran(-95,95)) MeshEffect(8,cf,cf*cn(0,Scale*2.2,0),v3(0.07,0.3,0.07)*Scale,v3(0.4,3,0.4)*Scale,0.2,1,CC[mran(2,3)],as.cone) end
  1057. MeshEffect(8,cn(pos),nil,v3(0.1,0.1,0.1)*Scale,v3(3,3,3)*Scale,0.2,1,CC[mran(2,3)],'Sphere') part:Remove() end)
  1058. wait((keys.q and keys.e) and 0.2 or 0.4)
  1059. until not Button or (not keys.q and not keys.e)
  1060. elseif 'swag'=='sweg' then
  1061. end
  1062. end)
  1063. Player:GetMouse().Button1Up:connect(function()
  1064. Button=false
  1065. end)
  1066.  
  1067. WalkAnim=0
  1068. Walking=false
  1069. WalkMulp=1
  1070. WalkMax=16
  1071. Hum.WalkSpeed=18
  1072. tWS={1,1,1,1,1,1,1}
  1073.  
  1074. Marbler=0
  1075. local cou=0
  1076. while Char.Parent do
  1077. cou=cou+1
  1078. --if cou%2==0 then print(cou) end
  1079. if Hum.Health>0 then
  1080. if Torso.Velocity.y>5 then Torso.Velocity=v3(Torso.Velocity.x,5,Torso.Velocity.z) end
  1081. Walking=v3(Torso.Velocity.x,0,Torso.Velocity.z).magnitude>Hum.WalkSpeed-2 and true or false
  1082. if Walking and LegAnim=='None' then
  1083. WalkAnim=WalkAnim+WalkMulp
  1084. end
  1085. if WalkAnim>0 and not Walking then
  1086. WalkAnim=WalkAnim-1
  1087. elseif WalkAnim<0 and not Walking then
  1088. WalkAnim=WalkAnim+1
  1089. end
  1090. if math.abs(WalkAnim)>=WalkMax then WalkMulp=WalkMulp*-1 end
  1091. local WalkAdj=26
  1092. Neck.C0=Torso.CFrame:toObjectSpace(pHead.CFrame)
  1093. if ArmAnim=='None' then
  1094. SetWeld(wLSho,0,WalkAnim,WalkMax,Oa,Ob,Oa,v3(-WalkAdj*1.5,0,-10),1)
  1095. SetWeld(wLArm,0,WalkAnim,WalkMax,Oc,Od,Oc,v3(10+(WalkAnim>0 and WalkAdj or 0),0,10),1)
  1096. SetWeld(wRSho,0,WalkAnim,WalkMax,Oe,Of,Oe,v3(WalkAdj*1.5,0,10),1)
  1097. SetWeld(wRArm,0,WalkAnim,WalkMax,Og,Oh,Og,v3(10+(WalkAnim>0 and WalkAdj or 0),0,-10),1)
  1098. end
  1099. if LegAnim=='None' then
  1100. SetWeld(wLThi,0,WalkAnim,WalkMax,Oi,Oj,Oi,v3(15+WalkAdj,0,-5),1)
  1101. SetWeld(wLLeg,0,WalkAnim,WalkMax,Ok,Ol,Ok,v3(-15+(WalkAnim>0 and -WalkAdj or 0),0,5),1)
  1102. SetWeld(wRThi,0,WalkAnim,WalkMax,Om,On,Om,v3(15-WalkAdj,0,5),1)
  1103. SetWeld(wRLeg,0,WalkAnim,WalkMax,Oo,Op,Oo,v3(-15+(WalkAnim<0 and WalkAdj or 0),0,-5),1)
  1104. end
  1105. --[[
  1106. for i,v in pairs(Marble) do
  1107. v[1].C0=v[1].C0*ca(MarbleSpeed*v[2],MarbleSpeed*v[3],MarbleSpeed*v[4])
  1108. Marbler=Marbler+(MarbleSpeed*v[2])
  1109. if Marbler>MarbleMax then
  1110. v[2]=v[2]*-1
  1111. v[3]=v[3]*-1
  1112. v[4]=v[4]*-1
  1113. end
  1114. end --]]
  1115. if Anim=='Follow' and Target and Target:findFirstChild'Torso' and not BG.maxTorque~=v3(1,1,1)/0 then
  1116. Hum:MoveTo(Target.Torso.CFrame*cn(2.5*Scale,0,5*Scale).p,Target.Torso)
  1117. end
  1118. if Grabbing and (not Grabbing.Part1 or not Grabbing.Part1.Parent or Grabbing.Part1.Parent:findFirstChild'Humanoid'==nil or Grabbing.Part1.Parent.Humanoid.Health<1) then
  1119. Grabbing:Remove() Grabbing=nil
  1120. end
  1121. end--hleat
  1122. --DoLoop Package
  1123. for i,v in pairs(LoopFunctions) do
  1124. v[2]=v[2]+1
  1125. v[3](v[2]/v[1])
  1126. if v[1]<=v[2] then LoopFunctions[i]=nil end
  1127. end
  1128. local ws=18
  1129. for i=1,#tWS do ws=ws*tWS[i] end
  1130. Hum.WalkSpeed=ws
  1131. if Hum.MaxHealth~=8000 then Hum.MaxHealth=8000 Hum.Health=8000 end
  1132. Hum.Health=Hum.Health+0.1
  1133. wait(0.03)
  1134. end
  1135. ChatConnection:disconnect()
  1136. game:service'Debris':AddItem(script,0.5)
  1137. script.Disabled=true
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!