API tools faq
paste
Advertisement
Fissetty

Untitled

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