Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- -- Brock Script --
- -- Its a huge rock golem, lol its cool --
- -- Made by Immunidon [NOT THE SCRIPT] --
- -- Local Script --
- script.Parent=nil
- --- shortcuts
- v3 = Vector3.new
- cn = CFrame.new
- ca2 = CFrame.Angles
- mf = math.floor
- mran = math.random
- mrad = math.rad
- mdeg = math.deg
- ca = function(x,y,z) return ca2(mrad(x),mrad(y),mrad(z)) end
- mran2 = function(a,b) return mran(a1000,b1000)1000 end
- ud=UDim2.new
- bn = BrickColor.new
- c3 = Color3.new
- -----
- --Player='COOLBRAYDENNOOB'
- Players=gameservice'Players'
- Player=Players.LocalPlayer --[Player]
- PChar=Player.Character
- as,so={},{'metal','Block','Slash','Slash2','Hit','Kick'}
- as.corner='11294911'
- as.cone='1033714'
- as.ring=3270017
- as.Chakram='47260990'
- as.ring2='18430887'
- as.blast='20329976'
- as.missile='10207677'
- as.fire='2693346'
- as.boom='3264793'
- as.slash='10209645'
- as.abscond='2767090'
- as.firelaser='13775494'
- as.diamond='9756362'
- as.metal='rbxassetsoundsunsheath.wav'
- as.Block = 'rbxassetsoundsmetal.ogg'
- as.Slash = '10209645'
- as.Slash2 = '46760716'
- as.Hit='10209583'
- as.Kick='46153268'
- as.cast='2101137'
- as.rockhead= '21629626'
- as.rockheadt='21629620'
- for i,v in pairs(as) do
- if type(tonumber(vsub(1,3)))==number then
- as[i]=httpwww.roblox.comassetid=..v
- end
- end
- LastMade=nil
- iNew=function(tab)
- local v=Instance.new(tab[1])
- for Ind,Val in pairs(tab) do
- if Ind~=1 and Ind~=2 then
- v[Ind] = Val
- end
- end
- v.Parent=tab[2]==0 and LastMade or tab[2]
- LastMade=v
- return v
- end
- iPart=function(tab)
- local v=Instance.new(tab.type or 'Part')
- if tab.type~='CornerWedgePart' then v.formFactor='Custom' end
- v.TopSurface=0 v.BottomSurface=0
- if tab.sc then
- v.Size=v3(tab[2]tab.sc,tab[3]tab.sc,tab[4]tab.sc)
- else
- v.Size=v3(tab[2],tab[3],tab[4])
- end
- if tab.co then v.BrickColor=bn(tab.co) end
- if tab.tr then v.Transparency=tab.tr end
- if tab.rf then v.Reflectance=tab.rf end
- if tab.can then v.CanCollide=tab.can end
- if tab.cf then v.CFrame=tab.cf end
- if tab.an then v.Anchored=tab.an end
- if tab.na then v.Name=tab.na end
- if tab.ma then v.Material=tab.ma end
- v.Parent=tab[1]
- vBreakJoints()
- LastMade=v
- return v
- end
- function getoutline(x,z,i)
- return math.sqrt(x^2+z^2)+(i or 0.05),mdeg(math.atan2(x,z))
- end
- function v32(cf)
- local x,y,z=cftoEulerAnglesXYZ()
- return v3(mdeg(x),mdeg(y),mdeg(z))
- end
- WeldLib={}
- function GetWeld(weld,CO)
- if not WeldLib[weld] then
- local x0,y0,z0=weld.C0toEulerAnglesXYZ()
- local x1,y1,z1=weld.C1toEulerAnglesXYZ()
- WeldLib[weld]={[0]=v3(mdeg(x0),mdeg(y0),mdeg(z0)),[1]=v3(mdeg(x1),mdeg(y1),mdeg(z1))}
- end
- return weld['C'..CO].p,WeldLib[weld][CO]
- end
- function ClearWeld(weld)
- if WeldLib[weld] then WeldLib[weld]=nil end
- end
- function TweenNum(i,loops,i1,i2,smooth)
- smooth = smooth or 1
- local perc
- if smooth == 1 then perc = math.sin((math.pi2)loopsi) else perc = iloops end
- local ton
- if i1 i2 then
- ton = -math.abs(i1 - i2) perc
- else
- ton = math.abs(i1 - i2) perc
- end
- return i1+ton
- end
- function TweenV3(i,loops,v1,v2,smooth)
- smooth = smooth or 1
- local perc
- if smooth == 1 then perc = math.sin((math.pi2)loopsi) else perc = iloops end
- local tox2,toy2,toz2 = 0,0,0
- if v1.x v2.x then
- tox2 = -math.abs(v1.x - v2.x) perc
- else
- tox2 = math.abs(v1.x - v2.x) perc
- end
- if v1.y v2.y then
- toy2 = -math.abs(v1.y - v2.y) perc
- else
- toy2 = math.abs(v1.y - v2.y) perc
- end
- if v1.z v2.z then
- toz2 = -math.abs(v1.z - v2.z) perc
- else
- toz2 = math.abs(v1.z - v2.z) perc
- end
- return v3(v1.x + tox2,v1.y + toy2,v1.z + toz2)
- end
- function TweenCF(i,loops,origpos,origangle,nextpos,nextangle,smooth)
- smooth = smooth or 1
- local perc
- if smooth == 1 then perc = math.sin((math.pi2)loopsi) else perc = iloops end
- local tox,toy,toz = 0,0,0
- if origangle.x nextangle.x then tox = -math.abs(origangle.x - nextangle.x) perc
- else tox = math.abs(origangle.x - nextangle.x) perc end
- if origangle.y nextangle.y then toy = -math.abs(origangle.y - nextangle.y) perc
- else toy = math.abs(origangle.y - nextangle.y) perc end
- if origangle.z nextangle.z then toz = -math.abs(origangle.z - nextangle.z) perc
- else toz = math.abs(origangle.z - nextangle.z) perc end
- local tox2,toy2,toz2 = 0,0,0
- if origpos.x nextpos.x then
- tox2 = -math.abs(origpos.x - nextpos.x) perc
- else tox2 = math.abs(origpos.x - nextpos.x) perc end
- if origpos.y nextpos.y then
- toy2 = -math.abs(origpos.y - nextpos.y) perc
- else toy2 = math.abs(origpos.y - nextpos.y) perc end
- if origpos.z nextpos.z then
- toz2 = -math.abs(origpos.z - nextpos.z) perc
- else toz2 = math.abs(origpos.z - nextpos.z) perc end
- return cn(origpos.x + tox2,origpos.y + toy2,origpos.z + toz2)ca(origangle.x + tox,origangle.y + toy,origangle.z + toz)
- end
- function SetWeld(weld,CO,i, loops, origpos,origangle, nextpos,nextangle,smooth)
- loops=math.floor(loops)
- smooth = smooth or 1
- if not WeldLib[weld] then
- local x0,y0,z0=weld.C0toEulerAnglesXYZ()
- local x1,y1,z1=weld.C1toEulerAnglesXYZ()
- WeldLib[weld]={[0]=v3(mdeg(x0),mdeg(y0),mdeg(z0)),[1]=v3(mdeg(x1),mdeg(y1),mdeg(z1))}
- end
- local perc =smooth==1 and math.sin((math.pi2)loopsi) or iloops
- --print(weld.Part1)
- local tox,toy,toz = 0,0,0
- tox = origangle.x nextangle.x and -math.abs(origangle.x - nextangle.x) perc or math.abs(origangle.x - nextangle.x) perc
- toy = origangle.y nextangle.y and -math.abs(origangle.y - nextangle.y) perc or math.abs(origangle.y - nextangle.y) perc
- toz = origangle.z nextangle.z and -math.abs(origangle.z - nextangle.z) perc or math.abs(origangle.z - nextangle.z) perc
- local tox2,toy2,toz2 = 0,0,0
- tox2= origpos.x nextpos.x and -math.abs(origpos.x - nextpos.x) perc or math.abs(origpos.x - nextpos.x) perc
- toy2= origpos.y nextpos.y and -math.abs(origpos.y - nextpos.y) perc or math.abs(origpos.y - nextpos.y) perc
- toz2= origpos.z nextpos.z and -math.abs(origpos.z - nextpos.z) perc or math.abs(origpos.z - nextpos.z) perc
- WeldLib[weld][CO] = v3(origangle.x + tox,origangle.y + toy,origangle.z + toz)
- weld['C'..CO] = cn(origpos.x + tox2,origpos.y + toy2,origpos.z + toz2)ca(origangle.x + tox,origangle.y + toy,origangle.z + toz)
- end
- function se(Key,Text)
- local Values = {}
- for value in (Text..Key)gmatch((.-)..Key) do
- table.insert(Values,value)
- end
- local Values2={}
- for i,v in pairs(Values) do Values2[i]=Values[i]lower() end
- return Values,Values2
- end
- findplayer=function(nn)
- if not nn then return nil end
- local found
- for i,v in pairs(PlayersGetPlayers()) do
- if string.find(v.Namelower(),nnlower()) and not found then found=v end
- end
- return found
- end
- LoopFunctions={}
- iLoopFunctions=-9000
- function DoLoop(times,func)
- iLoopFunctions=iLoopFunctions+1
- LoopFunctions[tonumber(iLoopFunctions)]={times,0,func}
- end
- function MeshEffect(times,cf1,cf2,scale1,scale2,tr1,tr2,col,type)
- local cf2=cf2 or cf1
- local v=iPart{Char,0.2,0.2,0.2,co=col,cf=cf1,na='Mesh',an=true,ca=false,tr=tr1}
- local mesh=iNew{'SpecialMesh',v,Scale=scale1}
- if type=='Brick' or type=='Sphere' then
- mesh.MeshType=type
- else
- mesh.MeshId=type
- end
- local x1,y1,z1 = cf1toEulerAnglesXYZ()
- local x2,y2,z2 = cf2toEulerAnglesXYZ()
- local count=0
- DoLoop(times,function(i) count=count+1
- mesh.Scale=TweenV3(count,times,scale1,scale2,1)((type=='Brick' or type=='Sphere') and 5 or 1)
- v.Transparency=TweenNum(count,times,tr1,tr2,1)
- v.CFrame=TweenCF(count,times,cf1.p,v3(mdeg(x1),mdeg(y1),mdeg(z1)),cf2.p,v3(mdeg(x2),mdeg(y2),mdeg(z2)),1)
- if i==1 then vRemove() end end)
- end
- Dmgv={8,16}
- HitDebounce={}
- Damage=function(Hum,Mult,Sound)
- if not Hum or Hum.Parent==Char then return end
- if not Hum.ParentfindFirstChild'Torso' then return end
- local HName=Hum.Parent.Name
- if HitDebounce[HName] and HitDebounce[HName]tick() then return end
- HitDebounce[HName]=tick()+0.2
- local Mult=Mult or 1
- local Dealt=mran(Dmgv[1],Dmgv[2])Mult
- local col=''
- if Hum.ParentfindFirstChild'Block' and Hum.Parent.Block.Value0 then
- Hum.Parent.Block.Value=Hum.Parent.Block.Value-1
- col='Bright blue'
- else
- Hum.Health=Hum.Health-Dealt
- col='Bright red'
- end
- if Sound then so[col=='Bright blue' and 'Block' or 'Hit']Play() end
- local DoH=iNew{'Model',Char,Name=col=='Bright blue' and 'Block' or Dealt}
- iNew{'Humanoid',DoH,MaxHealth=10,Health=10,Name=''}
- local Doh=iPart{DoH,0.6,0.2,0.6,co=col,an=true} Doh.Name='Head' iNew{'CylinderMesh',Doh}
- local dofs=Hum.Parent.Torso.CFramecn(mran2(-1.5,1.5),2.5,mran2(-1,1)) Doh.CFrame=dofs
- DoLoop(40,function(i) Doh.CFrame=dofscn(0,i2,0) Doh.Transparency=i-0.5 if i==1 then DoHRemove() end end)
- end
- AOEFind = function(pos,ra,f,f2) -- range get
- local p0,p1=pos-v3(ra2,ra2,ra2),pos+v3(ra2,ra2,ra2)
- pcall(function()
- for i,v in pairs(workspaceFindPartsInRegion3(Region3.new(p0,p1),nil,100)) do
- local Hum=v.ParentfindFirstChild'Humanoid'
- if v.Name=='Torso' and Hum and Hum.Health0 and v.Parent~=Char then
- pcall(function() f(Hum,v) end)
- elseif f2 and not Hum then
- pcall(function() f2(v) end)
- end
- end
- end)
- end
- function FindSurface(part, position)
- local obj = part.CFramepointToObjectSpace(position)
- local siz = part.Size2
- for i,v in pairs(Enum.NormalIdGetEnumItems()) do
- local vec = Vector3.FromNormalId(v)
- local wvec = part.CFramevectorToWorldSpace(vec)
- local vz = (obj)(sizvec)
- 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
- return wvec,vec
- end
- end
- if part.className == WedgePart then
- return part.CFramevectorToWorldSpace(Vector3.new(0,0.707,-0.707)), Vector3.new(0,0.707,-0.707)
- end
- end
- function FaceBG(pos)
- BG.maxTorque=v3(1,1,1)0
- BG.cframe=cn(Torso.Position,v3(pos.x,Torso.Position.y,pos.z))cn(0,0,-1)
- end
- ray = function(Pos, Dir,tab,length) -- ray cast
- return workspaceFindPartOnRay(Ray.new(Pos, Dir.unit (length or 999)),tab)
- end
- function Projectile(ofs,speed,part,adj,fhit,fnohit)
- part.CFrame=ofsadj
- local stop=false
- DoLoop(50,function(x)
- local i=x
- if not stop then
- local hit,pos=ray(ofs.p,ofs.p-ofscn(0,0,-1).p,Char,speed+1)
- if hit then
- --Hit
- if fhit then i=1 stop=true
- ----
- local cof=FindSurface(hit,pos)
- --iPart{workspace,2,2,0.2,cf=cn(pos,pos+cof),an=true,co='Black'}
- ----
- local x,y,z=ofstoEulerAnglesXYZ()
- ofs=cn(pos)ca(mdeg(x),mdeg(y),mdeg(z))cn(0,0,-part.Size.y2)
- part.CFrame=ofsadj
- fhit(hit,pos) end
- else
- ofs=ofscn(0,0,speed)
- part.CFrame=ofsadj
- end
- if i==1 then
- if fnohit then fnohit(ofs.p) else partRemove() end
- end
- end
- end)
- end
- CC={'','Bright yellow','Flame reddish orange'}
- Scale=5
- Mat='Marble'
- SpawnPoint=PChar.Torso.CFramecn(0,1+Scale3,-20-Scale1.5)
- name='Golem '
- pcall(function() _G.OldMod00Remove() end)
- ---------------
- UNDYING=function()
- pcall(function() fUNDYINGdisconnect() end)
- pcall(function() local hum=Grabbing.Part1.Parent.Humanoid GrabbingRemove() Grabbing=nil hum.PlatformStand=false end)
- Torso.Anchored=true Torso.Transparency=1 Torso.CanCollide=false
- StandRemove() HeadRemove()
- local RespawnPos=cn(Torso.CFrame.p+v3(0,Scale5,0))ca(0,mran(-360,360),0)
- wait(4)
- Anim='Reviving'
- local oldChar=Char
- local oldRootLimbs=RootLimbs
- for i,v in pairs(oldRootLimbs) do v.Anchored=true end
- fMarble(Char,function(v) v.Anchored=true end)
- MakeAI(RespawnPos) Anim='Reviving'
- fMarble(Char,function(v) v.Transparency=1 end)
- for i,v in pairs(RootLimbs) do v.Transparency=1 end
- wait(0.1) Torso.Anchored=true
- local Reconstruct={}
- fMarble(oldChar,function(v)
- local x1,y1,z1=v.CFrametoEulerAnglesXYZ()
- local x2,y2,z2=Char[v.Parent.Name][v.Name].CFrametoEulerAnglesXYZ()
- 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)
- for i,v in pairs(oldRootLimbs) do
- local x1,y1,z1=v.CFrametoEulerAnglesXYZ()
- local x2,y2,z2=Char[v.Name].CFrametoEulerAnglesXYZ()
- Reconstruct[#Reconstruct+1]={v,Char[v.Name],v.Position,v3(mdeg(x1),mdeg(y1),mdeg(z1)),v3(mdeg(x2),mdeg(y2),mdeg(z2))} end
- local tweens=100
- for tween=1,tweens do
- 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(tweentweens),720(tweentweens),0) end
- wait()
- end
- oldCharRemove()
- fMarble(Char,function(v) v.Transparency=0 end)
- for i,v in pairs(RootLimbs) do v.Transparency=0 end
- Torso.Anchored=false wait()
- BG.maxTorque=v3(1,1,1)0 BG.cframe=Torso.CFrame
- ReturnAnim()
- wait(2)
- BG.maxTorque=nov3
- Anim,ArmAnim,LegAnim='None','None','None'
- end
- ------
- function MakeAI(SpawnPoint2)
- Char=iNew{'Model',workspace,Name=name,archivable=false} _G.OldMod00=Char
- Torso=iPart{Char,2,2,1,sc=Scale,co=CC[1],cf=SpawnPoint2,na='Torso'}
- pTorso=iPart{Char,2,2,1,sc=Scale,co=CC[1],cf=SpawnPoint2,na='pTorso'}
- Head=iPart{Char,1,1,1,sc=Scale,co=CC[1],na='Head'}
- pHead=iPart{Char,1,1,1,sc=Scale,co=CC[1],na='pHead'} iNew{'SpecialMesh',pHead,Scale=v3(1,1,1)Scale1.4,VertexColor=v3(1,1,1)1.65,MeshId=as.rockhead,TextureId=as.rockheadt}
- Stand=iPart{Char,1.5,2.9,1.1,sc=Scale,co=CC[1],na='Stand'}
- for i,n in pairs(so) do
- local v=iNew{'Sound',Torso,Volume=1,Pitch=1,Looped=false,Name=v,SoundId=as[n]}
- so[n]=v
- end
- LSho=iPart{Char,1,1.5,1,sc=Scale,co=CC[1],na='LSho'}
- LArm=iPart{Char,1,1.5,1,sc=Scale,co=CC[1],na='LArm'}
- RSho=iPart{Char,1,1.5,1,sc=Scale,co=CC[1],na='RSho'}
- RArm=iPart{Char,1,1.5,1,sc=Scale,co=CC[1],na='RArm'}
- LThi=iPart{Char,1,1.5,1,sc=Scale,co=CC[1],na='LThi'}
- LLeg=iPart{Char,1,1.5,1,sc=Scale,co=CC[1],na='LLeg'}
- RThi=iPart{Char,1,1.5,1,sc=Scale,co=CC[1],na='RThi'}
- RLeg=iPart{Char,1,1.5,1,sc=Scale,co=CC[1],na='RLeg'}
- nov3=v3(0,0,0)
- Marble={}
- MarbleSpeed=0.2
- MarbleMax=12
- for i,v in pairs({pTorso,LSho,RSho,LArm,RArm,LThi,RThi,LLeg,RLeg}) do
- v.Material=Mat
- local VS=v.Size
- local va=1.2
- --v.Size=v.Size1.5
- local vv=vClone()
- for x=-1,1,2 do
- for y=-1,1,2 do
- for z=-1,1,2 do
- local marb=vvClone() marb.Size=VSmran2(1.8,2.2) marb.Parent=v marb.Name=x..y..z
- local wmarb=iNew{'Weld',marb,Part0=v,Part1=marb,C0=cn(VS.x4xva,VS.y4y,VS.z4zva)ca(mran(-MarbleMax,MarbleMax),mran(-MarbleMax,MarbleMax),mran(-MarbleMax,MarbleMax))}
- Marble[#Marble+1]={wmarb,mran(-1,1),mran(-1,1),mran(-1,1)}
- end end end
- iNew{'BlockMesh',v,Scale=v3(1,1,1)1.5}
- v.Transparency=0 --.995
- end
- for i,v in pairs(Charchildren()) do if vIsA'BasePart' and v.Name~='Torso' then v.CFrame=Torso.CFrame end end
- Head.Transparency=0.99
- Head.CanCollide=false
- Neck=iNew{'Weld',Torso,Part0=Torso,Part1=Head,C0=cn(0,0,0)}
- pNeck=iNew{'Weld',Torso,Part0=pTorso,Part1=pHead,C0=cn(0,1.5Scale,0)}
- Hum=iNew{'Humanoid',Char}
- Torso.Transparency=1
- wTorso=iNew{'Weld',Torso,Part0=Torso,Part1=pTorso,C0=cn(0,-2.5Scale,0)ca(0,0,0)}
- oTorso=cn(0,0,0)
- Stand.Transparency=1
- wStand=iNew{'Weld',Torso,Part0=Torso,Part1=Stand,C0=cn(0,-2.5Scale,0)}
- wLSho=iNew{'Weld',LSho,Part0=pTorso,Part1=LSho,C0=cn(-1.5Scale,0.75Scale,0),C1=cn(0,0.25Scale,0)}
- wLArm=iNew{'Weld',LArm,Part0=LSho,Part1=LArm,C0=cn(0,-0.75Scale,0),C1=cn(0,0.75Scale,0)}
- wRSho=iNew{'Weld',RSho,Part0=pTorso,Part1=RSho,C0=cn(1.5Scale,0.75Scale,0),C1=cn(0,0.25Scale,0)}
- wRArm=iNew{'Weld',RArm,Part0=RSho,Part1=RArm,C0=cn(0,-0.75Scale,0),C1=cn(0,0.75Scale,0)}
- wLThi=iNew{'Weld',LThi,Part0=pTorso,Part1=LThi,C0=cn(-0.5Scale,-1Scale,0),C1=cn(0,0.75Scale,0)}
- wLLeg=iNew{'Weld',LLeg,Part0=LThi,Part1=LLeg,C0=cn(1,-0.75Scale,0),C1=cn(0,0.75Scale,0)}
- wRThi=iNew{'Weld',RThi,Part0=pTorso,Part1=RThi,C0=cn(0.5Scale,-1Scale,0),C1=cn(0,0.75Scale,0)}
- wRLeg=iNew{'Weld',RLeg,Part0=RThi,Part1=RLeg,C0=cn(0,-0.75Scale,0),C1=cn(0,0.75Scale,0)}
- wLSho.C0=cn(-1.5Scale,0.75Scale,0)ca(0,0,-135) --a,b
- wLArm.C0=cn(0,-0.75Scale,0)ca(0,0,0) --c,d
- wRSho.C0=cn(1.5Scale,0.75Scale,0)ca(0,0,135) --e,f
- wRArm.C0=cn(0,-0.75Scale,0)ca(0,0,0) --g,h
- ----
- wLThi.C0=cn(-0.5Scale,-1Scale,0)ca(0,0,-45) --i,j
- wLLeg.C0=cn(0,-0.75Scale,0)ca(0,0,0) --k,l
- wRThi.C0=cn(0.5Scale,-1Scale,0)ca(0,0,45) --m,n
- wRLeg.C0=cn(0,-0.75Scale,0)ca(0,0,0) --o,p
- BG=iNew{'BodyGyro',Torso,maxTorque=nov3}
- BP=iNew{'BodyPosition',Torso,maxForce=nov3}
- fUNDYING=Hum.Diedconnect(UNDYING)
- LimbNames={'LSho','RSho','LArm','RArm','RThi','LThi','RLeg','LLeg'}
- for i=1,8 do local v=LimbNames[i] LimbNames[v]=getfenv()[w..v] end
- RootLimbs={pHead,pTorso,LSho,RSho,LArm,RArm,RThi,LThi,RLeg,LLeg}
- Anim,LegAnim,ArmAnim='Sit','Sit','Sit'
- local a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p=GetPose()
- SetWeld(wLSho,0,1,1,a,b,v3(-1.5Scale,0.5Scale,0),v3(0,0,-10),1)
- SetWeld(wLArm,0,1,1,c,d,v3(0,-0.75Scale,0),v3(10,0,10),1)
- SetWeld(wRSho,0,1,1,e,f,v3(1.5Scale,0.5Scale,0),v3(0,0,10),1)
- SetWeld(wRArm,0,1,1,g,h,v3(0,-0.75Scale,0),v3(10,0,-10),1)
- SetWeld(wLThi,0,1,1,i,j,v3(-0.5Scale,-1Scale,0),v3(15,0,-5),1)
- SetWeld(wLLeg,0,1,1,k,l,v3(0,-0.75Scale,0),v3(-15,0,5),1)
- SetWeld(wRThi,0,1,1,m,n,v3(0.5Scale,-1Scale,0),v3(15,0,5),1)
- SetWeld(wRLeg,0,1,1,o,p,v3(0,-0.75Scale,0),v3(-15,0,-5),1)
- Oa,Ob,Oc,Od,Oe,Of,Og,Oh,Oi,Oj,Ok,Ol,Om,On,Oo,Op=GetPose()
- SetWeld(wLSho,0,1,1,nov3,nov3,a,b,1)
- SetWeld(wLArm,0,1,1,nov3,nov3,c,d,1)
- SetWeld(wRSho,0,1,1,nov3,nov3,e,f,1)
- SetWeld(wRArm,0,1,1,nov3,nov3,g,h,1)
- SetWeld(wLThi,0,1,1,nov3,nov3,i,j,1)
- SetWeld(wLLeg,0,1,1,nov3,nov3,k,l,1)
- SetWeld(wRThi,0,1,1,nov3,nov3,m,n,1)
- SetWeld(wRLeg,0,1,1,nov3,nov3,o,p,1)
- end
- function GetPose()
- local a,b=GetWeld(wLSho,0)
- local c,d=GetWeld(wLArm,0)
- local e,f=GetWeld(wRSho,0)
- local g,h=GetWeld(wRArm,0)
- local i,j=GetWeld(wLThi,0)
- local k,l=GetWeld(wLLeg,0)
- local m,n=GetWeld(wRThi,0)
- local o,p=GetWeld(wRLeg,0)
- local q,r=GetWeld(wTorso,0)
- return a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r
- end
- MakeAI(SpawnPoint)
- ASpeed=28
- coroutine.resume(coroutine.create(function()
- SetWeld(wLSho,0,1,1,nov3,nov3,wLSho.C0.p,v3(45,0,-10),1)
- SetWeld(wLArm,0,1,1,nov3,nov3,wLArm.C0.p,v3(45,0,10),1)
- SetWeld(wRSho,0,1,1,nov3,nov3,wRSho.C0.p,v3(45,0,10),1)
- SetWeld(wRArm,0,1,1,nov3,nov3,wRArm.C0.p,v3(45,0,-10),1)
- SetWeld(wLThi,0,1,1,nov3,nov3,v3(-0.5Scale,-0.6Scale,-0.5Scale),v3(125,0,-12),1)
- SetWeld(wLLeg,0,1,1,nov3,nov3,wLLeg.C0.p,v3(-70,0,12),1)
- SetWeld(wRThi,0,1,1,nov3,nov3,v3( 0.5Scale,-0.6Scale,-0.5Scale),v3(125,0,12),1)
- SetWeld(wRLeg,0,1,1,nov3,nov3,wRLeg.C0.p,v3(-70,0,-12),1)
- SetWeld(wTorso,0,1,1,oTorso,nov3,v3(0,-3Scale,0),nov3,1)
- wait(1)
- Anim='Standing'
- local a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p=GetPose()
- for x=1,ASpeed do
- SetWeld(wTorso,0,x,ASpeed,wTorso.C0.p,nov3,oTorso,nov3,1)
- SetWeld(wLSho,0,x,ASpeed,a,b,v3(-1.5Scale,0.5Scale,0),v3(0,0,-10),1)
- SetWeld(wLArm,0,x,ASpeed,c,d,v3(0,-0.75Scale,0),v3(10,0,10),1)
- SetWeld(wRSho,0,x,ASpeed,e,f,v3(1.5Scale,0.5Scale,0),v3(0,0,10),1)
- SetWeld(wRArm,0,x,ASpeed,g,h,v3(0,-0.75Scale,0),v3(10,0,-10),1)
- SetWeld(wLThi,0,x,ASpeed,i,j,v3(-0.5Scale,-1Scale,0),v3(15,0,-5),1)
- SetWeld(wLLeg,0,x,ASpeed,k,l,v3(0,-0.75Scale,0),v3(-15,0,5),1)
- SetWeld(wRThi,0,x,ASpeed,m,n,v3(0.5Scale,-1Scale,0),v3(15,0,5),1)
- SetWeld(wRLeg,0,x,ASpeed,o,p,v3(0,-0.75Scale,0),v3(-15,0,-5),1)
- wait()
- end
- ArmAnim='None'
- LegAnim='None'
- Anim='None'
- end))
- --Target=PChar
- function Stay(bool,cff)
- BG.maxTorque=bool and v3(1,1,1)0 or nov3 BG.cframe=cff or Torso.CFrame
- BP.maxForce=BG.maxTorque BP.position=Torso.Position
- end
- function fMarble(Ch,func)
- for i,v in pairs(Chchildren()) do
- for x=-1,1,2 do
- for y=-1,1,2 do
- for z=-1,1,2 do
- if vfindFirstChild(x..y..z) then func(v[x..y..z]) end
- end end end
- end
- end
- function ReturnAnim()
- local ne1,ne2=GetWeld(pNeck,0)
- local wt1,wt2=GetWeld(wTorso,0)
- local a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p=GetPose()
- for x=1,ASpeed do
- SetWeld(wLSho,0,x,ASpeed,a,b,Oa,Ob,1)
- SetWeld(wLArm,0,x,ASpeed,c,d,Oc,Od,1)
- SetWeld(wRSho,0,x,ASpeed,e,f,Oe,Of,1)
- SetWeld(wRArm,0,x,ASpeed,g,h,Og,Oh,1)
- SetWeld(wLThi,0,x,ASpeed,i,j,Oi,Oj,1)
- SetWeld(wLLeg,0,x,ASpeed,k,l,Ok,Ol,1)
- SetWeld(wRThi,0,x,ASpeed,m,n,Om,On,1)
- SetWeld(wRLeg,0,x,ASpeed,o,p,Oo,Op,1)
- SetWeld(wTorso,0,x,ASpeed,wt1,wt2,oTorso,nov3,1)
- SetWeld(pNeck,0,x,ASpeed,ne1,ne2,v3(0,1.5,0)Scale,nov3,1)
- wait()
- end
- end
- ChatConnection=Player.Chattedconnect(function(msg)
- coroutine.resume(coroutine.create(function()
- if not Char.Parent then return end
- local Sep,sep=se(';',msg)
- local p1,p2=findplayer(Sep[2]),findplayer(Sep[3])
- local cmd=sep[1]
- --print(Sep[1])
- --print(LimbNames[Sep[1]])
- Tt=(p1 and p1.Character and p1.CharacterfindFirstChild'Torso') and p1.Character.Torso or nil
- if cmd=='sit' and (Anim=='None' or Anim=='Follow') then
- Anim='Sitting'
- HumMoveTo(Torso.Position,Torso)
- LegAnim,ArmAnim='Sit','Sit'
- for x=1,ASpeed do
- SetWeld(wLSho,0,x,ASpeed,Oa,Ob,Oa,v3(45,0,-10),1)
- SetWeld(wLArm,0,x,ASpeed,Oc,Od,Oc,v3(45,0,10),1)
- SetWeld(wRSho,0,x,ASpeed,Oe,Of,Oe,v3(45,0,10),1)
- SetWeld(wRArm,0,x,ASpeed,Og,Oh,Og,v3(45,0,-10),1)
- SetWeld(wLThi,0,x,ASpeed,Oi,Oj,v3(-0.5Scale,-0.6Scale,-0.5Scale),v3(125,0,-12),1)
- SetWeld(wLLeg,0,x,ASpeed,Ok,Ol,Ok,v3(-70,0,12),1)
- SetWeld(wRThi,0,x,ASpeed,Om,On,v3( 0.5Scale,-0.6Scale,-0.5Scale),v3(125,0,12),1)
- SetWeld(wRLeg,0,x,ASpeed,Oo,Op,Oo,v3(-70,0,-12),1)
- SetWeld(wTorso,0,x,ASpeed,oTorso,nov3,v3(0,-3Scale,0),nov3,1)
- wait()
- end
- Anim='Sit'
- 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
- if Anim=='Sit' or Anim=='Form' or Anim=='Dance' or Anim=='Roll' then
- Anim='Returning'
- ReturnAnim()
- else
- Target=nil
- wait(0.2)
- HumMoveTo(Torso.Position,Torso)
- end
- LegAnim,ArmAnim,Anim='None','None','None'
- elseif cmd=='follow' and Tt and Anim=='None' then
- Anim='Follow'
- Target=p1.Character
- elseif cmd=='shoot' and Tt and RArm['1-11'].Transparency~=1 and ArmAnim=='None' then
- Target=p1.Character
- ArmAnim='Shoot'
- FaceBG(Tt.Position)
- wait(0.5)
- local cff=cn(pTorso.CFrame.p,v3(Tt.Position.x,pTorso.Position.y,Tt.Position.z))
- local ofs=cfftoObjectSpace(cn(cffcn(1.5Scale,0.5Scale,0).p,Tt.CFramecn(0,2,0).p)ca(90,0,0)cn(0,-0.25Scale,0))
- local x,y,z=ofstoEulerAnglesXYZ()
- local rot=v3(mdeg(x),mdeg(y),mdeg(z))
- for q=1,ASpeed do
- SetWeld(wRArm,0,q,ASpeed,Og,Oh,Og,nov3,1)
- SetWeld(wRSho,0,q,ASpeed,Oe,Of,ofs.p,rot,1)
- SetWeld(wRSho,1,q,ASpeed,v3(0,0.25Scale,0),nov3,nov3,nov3,1)
- wait()
- end
- for y=-1,1,2 do for x=-1,1,2 do for z=-1,1,2 do
- local new=RArm[x..y..z]Clone() new.Parent=RArm game.DebrisAddItem(new,8) new.Touchedconnect(function(hit) Damage(hit.ParentfindFirstChild'Humanoid') end)
- new.CFrame=RArm[x..y..z].CFramecn(0,-Scale1.5,0) new.CanCollide=true new.Velocity=cn(new.Position,Target.Torso.Position).lookVector((new.Position-Target.Torso.Position).magnitude2+90)
- RArm[x..y..z].Transparency=1 so.BlockPlay() wait(0.06)
- end end end
- RArm.Transparency=1
- delay(1,function()
- 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.CFramecn(Scalex2,Scale-3,Scalez2)
- iNew{'BodyPosition',new,maxForce=v3(1,1,1)0,position=RArm[x..y..z].Position} wait(0.14) end end end
- 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)
- end)
- for q=1,ASpeed do
- SetWeld(wRArm,0,q,ASpeed,Og,nov3,Og,Oh,1)
- SetWeld(wRSho,0,q,ASpeed,ofs.p,rot,Oe,Of,1)
- SetWeld(wRSho,1,q,ASpeed,nov3,nov3,v3(0,0.25Scale,0),nov3,1)
- wait()
- end
- BG.maxTorque=nov3
- ArmAnim='None'
- elseif cmd=='slam' and (Anim=='None' or Anim=='Follow') and Tt then
- Target=p1
- local lTt=Tt
- Anim='Follow'
- repeat HumMoveTo(Tt.Position+v3(0.5,0.5,0.5),Tt) wait(0.2) until lTt~=Tt or (Tt.Position-pTorso.Position).magnitude10+Scale5.5 or Anim~='Follow'
- if Anim~='Follow' then BG.maxTorque=nov3 return end
- if lTt~=Tt then return end
- Anim,LegAnim,ArmAnim='Slam','',''
- HumMoveTo(Torso.Position,Torso)
- FaceBG(Tt.Position)
- Stay(true,BG.cframe)
- local a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p=GetPose()
- ASpeed2=15
- for x=1,ASpeed2 do
- SetWeld(wLSho,0,x,ASpeed2,a,b,Oa,v3(180,0,0),1)
- SetWeld(wRSho,0,x,ASpeed2,e,f,Oe,v3(180,0,0),1)
- SetWeld(wTorso,0,x,ASpeed2,nov3,nov3,v3(0,3,0)Scale,nov3,1)
- wait()
- end
- for x=1,ASpeed2 do
- SetWeld(wTorso,0,x,ASpeed2,v3(0,3,0)Scale,nov3,v3(0,-3Scale+2.5,-6Scale),v3(-89,0,0),1)
- wait()
- end
- AOEFind(pTorso.Position,6.5Scale,function(Hum) Damage(Hum,3,true) Hum.Sit=true end)
- MeshEffect(35,Torso.CFramecn(0,-3.5Scale,-6Scale)ca(90,0,0),nil,v3(2,2,1)Scale,v3(12,12,5)Scale,0.2,1,'Really black',as.ring)
- wait(0.5)
- for x=1,ASpeed do
- SetWeld(wTorso,0,x,ASpeed,v3(0,-3Scale+2.5,-6Scale),v3(-90,0,0),nov3,nov3,1)
- SetWeld(wLSho,0,x,ASpeed,Oa,v3(180,0,0),Oa,Ob,1)
- SetWeld(wRSho,0,x,ASpeed,Oe,v3(180,0,0),Oe,Of,1)
- wait()
- end
- Stay(false)
- Anim,LegAnim,ArmAnim='None','None','None'
- elseif cmd=='boulder' and Anim=='None' then
- Target=p1.Character
- Anim,LegAnim,ArmAnim='','',''
- Stay(true)
- FaceBG(Tt.Position)
- for x=1,ASpeed do
- SetWeld(wLSho,0,x,ASpeed,Oa,Ob,Oa,v3(135,0,0),1)
- SetWeld(wLArm,0,x,ASpeed,Oc,Od,Oc,v3(0,0,0),1)
- SetWeld(wRSho,0,x,ASpeed,Oe,Of,Oe,v3(135,0,0),1)
- SetWeld(wRArm,0,x,ASpeed,Og,Oh,Og,v3(0,0,-10),1)
- SetWeld(wLThi,0,x,ASpeed,Oi,Oj,v3(-0.5,-0.5,0.25)Scale,v3(45,0,-15),1)
- SetWeld(wLLeg,0,x,ASpeed,Ok,Ol,Ok,v3(0,0,0),1)
- SetWeld(wRThi,0,x,ASpeed,Om,On,v3( 0.5,-0.5,0.25)Scale,v3(45,0,15),1)
- SetWeld(wRLeg,0,x,ASpeed,Oo,Op,Oo,v3(0,0,0),1)
- SetWeld(wTorso,0,x,ASpeed,oTorso,nov3,v3(0,-1.5,-1.5)Scale,v3(-90,0,0),1)
- wait()
- end
- wait(0.2)
- local boulder=iPart{Char,1,1,1,type='WedgePart'} boulder.Material=Mat
- local wm=iNew{'SpecialMesh',boulder,Scale=v3(4,3,4)Scale,MeshType='Wedge'}
- local wb=iNew{'Weld',boulder,Part0=RArm,Part1=boulder,C0=cn(-1.5Scale,-2.3Scale,0)ca(180,180,0)}
- local a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r=GetPose()
- for x=1,ASpeed2 do
- SetWeld(wLSho,0,x,ASpeed2,a,b,a,v3(225,0,0),1)
- SetWeld(wLArm,0,x,ASpeed2,c,d,c,v3(45,0,0),1)
- SetWeld(wRSho,0,x,ASpeed2,e,f,e,v3(225,0,0),1)
- SetWeld(wRArm,0,x,ASpeed2,g,h,g,v3(45,0,0),1)
- SetWeld(wLThi,0,x,ASpeed2,i,j,Oi,v3(0,0,-15),1)
- SetWeld(wLLeg,0,x,ASpeed2,k,l,k,v3(0,0,0),1)
- SetWeld(wRThi,0,x,ASpeed2,m,n,Om,v3(0,0,15),1)
- SetWeld(wRLeg,0,x,ASpeed2,o,p,o,v3(0,0,0),1)
- SetWeld(wTorso,0,x,ASpeed2,q,r,nov3,nov3,1)
- wait()
- end
- FaceBG(Tt.Position)
- for x=1,ASpeed2 do
- SetWeld(wLSho,0,x,math.floor(ASpeed2),a,v3(225,0,0),a,v3(90,0,0),1)
- SetWeld(wLArm,0,x,math.floor(ASpeed2),c,v3(45,0,0),c,v3(45,0,0),1)
- SetWeld(wRSho,0,x,math.floor(ASpeed2),e,v3(225,0,0),e,v3(90,0,0),1)
- SetWeld(wRArm,0,x,math.floor(ASpeed2),g,v3(45,0,0),g,v3(45,0,0),1)
- wait()
- end
- local bcf=boulder.CFrame
- wbRemove()
- wmRemove()
- boulder.Size=wm.Scale
- boulder.CFrame=cn(boulder.Position,Target.Torso.Position)cn(0,3,-1)ca(0,180,0)
- --boulder.Friction=0.1
- boulder.Elasticity=0
- boulder.Velocity=(boulder.CFrameca(0,180,0)).lookVector((boulder.Position-Target.Torso.Position).magnitude1+90)
- boulder.RotVelocity=nov3
- game.DebrisAddItem(boulder,8)
- Stay(false)
- ReturnAnim()
- Anim,LegAnim,ArmAnim='None','None','None'
- elseif cmd=='grab' and Tt and not Grabbing then
- Target=p1
- local lTt=Tt
- Anim='Follow'
- repeat HumMoveTo(Tt.Position+v3(0.5,0.5,0.5),Tt) wait(0.2) until lTt~=Tt or (Tt.Position-Stand.CFramecn(0,-Stand.Size.y2+1,-2.8Scale).p).magnitude10 or Anim~='Follow'
- if Anim~='Follow' then BG.maxTorque=nov3 return end
- if lTt~=Tt then return end
- pcall(function() Tt.Parent.Humanoid.PlatformStand=true end)
- HumMoveTo(Torso.Position,Torso)
- Anim,LegAnim,ArmAnim='Grab','',''
- FaceBG(Tt.Position)
- for x=1,ASpeed do
- SetWeld(wLSho,0,x,ASpeed,Oa,Ob,Oa,v3(-30,0,-30),1)
- SetWeld(wLArm,0,x,ASpeed,Oc,Od,Oc,v3(0,0,0),1)
- SetWeld(wRSho,0,x,ASpeed,Oe,Of,Oe,v3(145,0,-30),1)
- SetWeld(wRArm,0,x,ASpeed,Og,Oh,Og,v3(0,0,0),1)
- SetWeld(wLThi,0,x,ASpeed,Oi,Oj,v3(-0.5,-0.4,0.3)Scale,v3(70,0,0),1)
- SetWeld(wLLeg,0,x,ASpeed,Ok,Ol,Ok,v3(-20,0,0),1)
- SetWeld(wRThi,0,x,ASpeed,Om,On,v3(0.5,-0.5,-0.3)Scale,v3(135,0,0),1)
- SetWeld(wRLeg,0,x,ASpeed,Oo,Op,Oo,v3(-90,0,0),1)
- SetWeld(wTorso,0,x,ASpeed,oTorso,nov3,v3(0,-2,-1.5)Scale,v3(-90,0,0),1)
- wait()
- end
- local ofs=RArm.CFrametoObjectSpace(Tt.CFrame)
- Tt.Parent.Humanoid.PlatformStand=true
- Grabbing=iNew{'Weld',RArm,Part0=RArm,Part1=Tt,C0=ofs}
- local a,b=GetWeld(Grabbing,0)
- for x=1,ASpeed do
- SetWeld(Grabbing,0,x,ASpeed,a,b,v3(0,-0.75Scale-1,0),v3(-90,0,0),1)
- wait()
- end
- Stay(false)
- ReturnAnim()
- Anim,LegAnim,ArmAnim='None','None','None'
- elseif cmd=='dance' and (Anim=='None' or Anim=='Follow') then
- HumMoveTo(pTorso.Position,pTorso)
- Anim,ArmAnim,LegAnim='Dance','Dance','Dance'
- local ASpeed=math.floor(ASpeed2)
- repeat
- local a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r=GetPose()
- for x=1,ASpeed do
- if Anim~='Dance' then break end
- SetWeld(wLSho,0,x,ASpeed,a,b,v3(-1.2,0.5,-0.25)Scale,v3(35,0,30),1)
- SetWeld(wLArm,0,x,ASpeed,c,d,c,v3(25,0,0),1)
- SetWeld(wRSho,0,x,ASpeed,e,f,v3( 1.2,0.5,-0.25)Scale,v3(45,0,-30),1)
- SetWeld(wRArm,0,x,ASpeed,g,h,g,v3(25,0,0),1)
- SetWeld(wLThi,0,x,ASpeed,i,j,i,v3(0,0,0),1)
- SetWeld(wLLeg,0,x,ASpeed,k,l,k,v3(0,0,0),1)
- SetWeld(wRThi,0,x,ASpeed,m,n,m,v3(45,0,20),1)
- SetWeld(wRLeg,0,x,ASpeed,o,p,o,v3(-45,0,-20),1)
- wait()
- end
- local a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r=GetPose()
- for x=1,ASpeed do
- if Anim~='Dance' then break end
- SetWeld(wLSho,0,x,ASpeed,a,b,v3(-1.2,0.5,-0.25)Scale,v3(95,0,30),1)
- SetWeld(wLArm,0,x,ASpeed,c,d,c,v3(-10,0,0),1)
- SetWeld(wRSho,0,x,ASpeed,e,f,v3( 1.2,0.5,-0.25)Scale,v3(105,0,-30),1)
- SetWeld(wRArm,0,x,ASpeed,g,h,g,v3(-10,0,0),1)
- SetWeld(wLThi,0,x,ASpeed,i,j,i,v3(45,0,-20),1)
- SetWeld(wLLeg,0,x,ASpeed,k,l,k,v3(-45,0,20),1)
- SetWeld(wRThi,0,x,ASpeed,m,n,m,v3(0,0,0),1)
- SetWeld(wRLeg,0,x,ASpeed,o,p,o,v3(0,0,0),1)
- wait()
- end
- until Anim~='Dance'
- elseif cmd=='roll' and (Anim=='None' or Anim=='Follow') then
- Target=p1
- local lTt=Tt
- Anim,ArmAnim,LegAnim='Roll','',''
- local a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r=GetPose()
- local n1,n2=GetWeld(pNeck,0)
- for x=1,ASpeed do
- SetWeld(wLSho,0,x,ASpeed,a,b,v3(-1.5,0.5,0)Scale,v3(0,0,-45),1)
- SetWeld(wLArm,0,x,ASpeed,c,d,c,v3(0,0,90),1)
- SetWeld(wRSho,0,x,ASpeed,e,f,v3( 1.5,0.5,0)Scale,v3(0,0,45),1)
- SetWeld(wRArm,0,x,ASpeed,g,h,g,v3(0,0,-90),1)
- SetWeld(wLThi,0,x,ASpeed,i,j,v3(0,1, 0.5)Scale,v3(-30,0,0),1)
- SetWeld(wLLeg,0,x,ASpeed,k,l,k,v3(60,0,0),1)
- SetWeld(wRThi,0,x,ASpeed,m,n,v3(0,1,-0.5)Scale,v3(30,0,0),1)
- SetWeld(wRLeg,0,x,ASpeed,o,p,o,v3(-60,0,0),1)
- SetWeld(pNeck,0,x,ASpeed,n1,n2,v3(0,0,0),n2,1)
- SetWeld(wTorso,0,x,ASpeed,oTorso,nov3,v3(0,-2,0)Scale,nov3,1)
- wait()
- end
- tWS[2]=3
- repeat
- local cf=Torso.CFramecn(mran2(-1,1)Scale,-4Scale,0.5Scale)ca(90+mran(-20,20),mran(-30,30),0)
- MeshEffect(24,cf,cfcn(0,4Scale,0),v3(0.5,0.5,0.5)Scale,v3(mran2(1,4),mran2(3,5),mran2(1,3))Scale,0.1,1,'Really black','Brick')
- HumMoveTo(Tt.CFramecn(0,0,Scale).p,Tt) wTorso.C0=wTorso.C0ca(-20,0,0) wait(0.035) until lTt~=Tt or (Tt.Position-Stand.CFramecn(0,-Stand.Size.y2+1,-2.8Scale).p).magnitude6 or Anim~='Roll'
- tWS[2]=1
- ClearWeld(wTorso)
- if Anim~='Roll' then return end
- HumMoveTo(Torso.Position+v3(0,1,0),Torso)
- Torso.Anchored=true Torso.Velocity=nov3
- local cf=Stand.CFramecn(0,0,-1.5Scale)ca(-45,0,0) --iPart{Char,1,1,1,co='Black',cf=cf,an=true}
- MeshEffect(50,cf,nil,v3(3.5,3.5,2)Scale,v3(11,11,6)Scale,0.1,1,'White',as.ring)
- for i=1,16 do
- local cf=cfca(90,360(i16),0)ca(45,0,0)
- MeshEffect(40,cf,cfcn(0,10Scale,0),v3(0.2,2,0.2)Scale,v3(1,5,1)Scale,0.1,1,'','Sphere')
- end
- AOEFind(cf.p,6.5Scale,function(Hum,v) Damage(Hum,2,true) Hum.Sit=true v.Velocity=cn(pTorso.Position,v.Position).lookVector50 end)
- wait(0.2)
- Torso.Anchored=false
- ReturnAnim()
- HumMoveTo(Torso.Position,Torso)
- Anim,LegAnim,ArmAnim='None','None','None'
- elseif cmd=='beam' and (Anim=='None' or Anim=='Follow') then
- Anim='beam'
- local che =iPart{Char,1,1,1,sc=Scale,co=CC[1],ma=Mat} local chew=iNew{'Weld',che ,Part0=pTorso,Part1=che}
- local che2=iPart{che ,0.8Scale,0.2,0.8Scale,co='Really black'} local che2w=iNew{'Weld',che2,Part0=che,Part1=che2}
- local chem=iNew{'CylinderMesh',che} iNew{'CylinderMesh',che2}
- local chest,chex,i={},0,0
- 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
- local xx,yy,zz=chest[i][2].C0toEulerAnglesXYZ() chest[i][4]=v3(mdeg(xx),mdeg(yy),mdeg(zz))
- chest[i][5]=cn(0.45xScale,0,-0.5Scale)chest[i][3] chest[i][6]=chest[i][4]+v3(0,-105x,0) end end
- local len=1.75
- local dochest=function(v,chexx,adj)
- local p=vASpeed
- chex=adjp
- chem.Scale=v3(1,lenp,1)
- chew.C0=ca(chexx+chex,0,0)cn(0,len2pScale,0)
- che2w.C0=cn(0,len2pScale,0)
- 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
- end
- for v=1,ASpeed do if Tt then FaceBG(Tt.Position) end dochest(v,-90,-45) wait() end
- local beam=iPart{Char,0.7Scale,1,0.7Scale,co='New Yeller',an=true,tr=0.3} beamm=iNew{'CylinderMesh',beam}
- for i=1,ASpeed3 do
- local p=iASpeed3
- chex=90math.sin((math.pi2)(ASpeed3)i)
- chew.C0=ca(-135+chex,0,0)cn(0,len2Scale,0)
- local hit,pos=ray(che2.Position,che2.Position-che2.CFramecn(0,-1,0).p,Char)
- 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
- beam.CFrame=cn(p1,p2)cn(0,0,-mag2)ca(90,0,0) beamm.Scale=v3(1,mag+(Scale3),1)
- AOEFind(pos,Scale2,function(Hum) Damage(Hum,2.5) end)
- 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,cfcn(0,Scale2.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
- 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
- if Tt then FaceBG(Tt.Position) end
- wait()
- end
- DoLoop(12,function(i) beam.Transparency=0.3+i0.7 if i==1 then beamRemove() end end)
- for v=ASpeed,0,-1 do dochest(v,-90,45) wait() end
- Stay(false)
- cheRemove()
- Anim='None'
- ---------------------------------------------------------------------------=---WWWWWWWWWWWWWWWWWW
- elseif cmd=='box' and (Anim=='None' or Anim=='Follow') then
- Anim,ArmAnim='cart','cart'
- for x=1,ASpeed do
- SetWeld(wLSho,0,x,ASpeed,Oa,Ob,Oa,v3(90,0,10),1)
- SetWeld(wLArm,0,x,ASpeed,Oc,Od,Oc,v3(0,0,25),1)
- SetWeld(wRSho,0,x,ASpeed,Oe,Of,Oe,v3(90,0,-10),1)
- SetWeld(wRArm,0,x,ASpeed,Og,Oh,Og,v3(0,0,-25),1)
- wait()
- end
- Stay(true)
- local spawn=RArm.CFramecn(0,-0.75Scale-2,0)ca(-90,0,0)
- local des=iPart{Char,1,1,1,an=true,ma=Mat,cf=spawn,ca=false}
- for i=1,6,0.2 do des.Size=v3(i,i,i) des.CFrame=spawncn(0,0,-i2) wait() end
- local cart=iNew{'Model',workspace,Name='Cart'}
- local base=iPart{cart,4,1,5,ma=Mat,cf=des.CFrame} iNew{'BodyGyro',base}
- for x=-1,1,2 do
- local new=iPart{cart,0.5,4,5,ma=Mat,cf=base.CFrame} iNew{'Weld',new,Part0=base,Part1=new,C0=cn(1.75x,2.5,0)}
- 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.25x)}
- end
- for i=6,0.8,-0.2 do des.Size=v3(i,i,i) des.CFrame=spawncn(0,0,-i2) wait() end desRemove()
- Stay(false)
- ReturnAnim()
- Anim,ArmAnim='None','None'
- elseif cmd=='crush' and Grabbing and (Anim=='None' or Anim=='Follow') then
- Anim,ArmAnim='crush','crush'
- for x=1,ASpeed do
- SetWeld(wLSho,0,x,ASpeed,Oa,Ob,Oa,v3(80,0,-160),1)
- SetWeld(wLArm,0,x,ASpeed,Oc,Od,Oc,v3(0,0,80),1)
- SetWeld(wRSho,0,x,ASpeed,Oe,Of,Oe,v3(80,0,160),1)
- SetWeld(wRArm,0,x,ASpeed,Og,Oh,Og,v3(0,0,-80),1)
- wait()
- end
- local a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r=GetPose()
- wait(0.2)
- for x=1,ASpeed2 do
- SetWeld(wLSho,0,x,ASpeed2,a,b,Oa,v3(80,0,-14),1)
- SetWeld(wLArm,0,x,ASpeed2,c,d,Oc,v3(0,0,80),1)
- SetWeld(wRSho,0,x,ASpeed2,e,f,Oe,v3(80,0,14),1)
- SetWeld(wRArm,0,x,ASpeed2,g,h,Og,v3(0,0,-80),1)
- wait()
- end
- MeshEffect(35,Grabbing.Part1.CFrame,nil,v3(2,2,1)Scale,v3(7,7,3)Scale,0.3,1,'Really black',as.ring)
- local crushjo=60
- 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.C1ca(mran(-crushjo,crushjo),mran(-crushjo,crushjo),mran(-crushjo,crushjo)) end end)
- local hit=Grabbing.Part1
- GrabbingRemove() Grabbing=nil
- wait(2)
- pcall(function() hit.Parent.Humanoid.PlatformStand=false end)
- ReturnAnim()
- Anim,ArmAnim='None','None'
- elseif cmd=='eat' and Grabbing and (Anim=='None' or Anim=='Follow') then
- Anim,ArmAnim='Eat','Eat'
- for x=1,ASpeed2 do
- SetWeld(wRSho,0,x,ASpeed2,Oe,Of,Oe,v3(135,0,15),1)
- SetWeld(wRArm,0,x,ASpeed2,Og,Oh,Og,v3(45,-10,-100),1)
- wait()
- end
- wait(1)
- for x=1,40 do
- SetWeld(wRSho,0,1,1,Oe,Of,Oe,v3(135+mran(-3,3),0,15+mran(-3,3)),1)
- SetWeld(wRArm,0,1,1,Og,Oh,Og,v3(45,-10+mran(-12,12),-100+mran(-3,3)),1)
- wait(0.05)
- if x%2==0 then
- local cf=Grabbing.Part1.CFrameca(180,mran(-180,180),mran(-40,40))cn(0,1.5,0)
- MeshEffect(24,cf,cfcn(0,10,0),v3(0.2,2,0.2),v3(0.4,5,0.4),0.1,1,'Really red','Sphere')
- end
- end
- Grabbing.Part1BreakJoints()
- pcall(function() Grabbing.Part1.Parent.HeadRemove() end)
- GrabbingRemove() Grabbing=nil
- wait(2)
- ReturnAnim()
- Anim,ArmAnim='None','None'
- elseif cmd=='drop' and Grabbing then
- local hum=Grabbing.Part1.Parent.Humanoid GrabbingRemove() Grabbing=nil hum.PlatformStand=false
- elseif LimbNames[Sep[1]] and (Anim=='None' or Anim=='Form') then
- Anim,ArmAnim,LegAnim='Form','Form','Form'
- local v1,v2=GetWeld(LimbNames[Sep[1]],0)
- local sepx=se(',',Sep[2])
- for x=1,ASpeed2 do
- SetWeld(LimbNames[Sep[1]],0,x,ASpeed2,v1,v2,v1,v3(tonumber(sepx[1]),tonumber(sepx[2]),tonumber(sepx[3])),1)
- wait()
- end
- elseif cmd=='plode' then
- CharBreakJoints() wait()
- local Pressure=tonumber(sep[2]) or 50
- fMarble(Char,function(v) v.Velocity=cn(Torso.Position,v.Position).lookVectorPressure end)
- for i,v in pairs(RootLimbs) do v.Velocity=cn(Torso.Position,v.Position).lookVectorPressure end
- elseif cmd=='explode' then
- iNew{'Explosion',pTorso,Position=pTorso.Position,BlastRadius=Scale2}
- elseif cmd=='goto' then
- pcall(function()
- HumMoveTo(PlayerGetMouse().Hit.p,PlayerGetMouse().Target) end)
- elseif cmd=='newscale' and tonumber(sep[2]) then
- CharBreakJoints()
- Scale=tonumber(sep[2])
- if Scale0.5 then Scale=0.5 end
- if Scale=100 then Scale=100 end
- elseif cmd=='nobox' then
- for i,v in pairs(workspacechildren()) do if v.Name=='Cart' then vRemove() end end
- elseif cmd=='die' then
- CharBreakJoints()
- elseif cmd=='brick' then
- iPart{workspace,12,30,30,cf=Player.Character.Torso.CFramecn(0,10,-20),tr=0.5,an=true}
- elseif cmd=='test' then
- local pt=Player.Character.Torso.CFrame
- MeshEffect(35,ptcn(0,5,0)ca(90,0,0),nil,v3(2,2,1)Scale,v3(7,7,3)Scale,0.2,1,'Really black',as.ring)
- else
- end
- end))
- end)
- keys={}
- NewAnim={}
- PlayerGetMouse().KeyDownconnect(function(k)
- coroutine.resume(coroutine.create(function() keys[k]=true
- if (k=='q' or k=='e') and (Anim=='None' or Anim=='Laser') and (ArmAnim=='None' or ArmAnim=='Laser') and not NewAnim[k] then
- NewAnim[k]=true
- local w1,w2=k=='q' and wLSho or wRSho,k=='q' and wLArm or wRArm
- local x=k=='q' and -1 or 1
- local aa,bb=GetWeld(w1,0)
- local cc,dd=GetWeld(w2,0)
- local targ=w1.Part1.CFramecn(0,-333,0)
- local tips={}
- local co=0
- local sho1=iPart{Char,0.35,RArm.Size.yScale+0.15 ,0.35,sc=Scale,co=CC[1]} iNew{'Weld',sho1,Part0=k=='q' and LArm or RArm,Part1=sho1} iNew{'CylinderMesh',sho1}
- local sho2=iPart{Char,0.3,RArm.Size.yScale+0.16,0.3,sc=Scale,co='Really black'} iNew{'Weld',sho2,Part0=sho1,Part1=sho2} iNew{'CylinderMesh',sho2}
- 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}
- co=co+0.25
- local asd=tips[#tips]
- asd[2],asd[3]=GetWeld(asd[1],0)
- local cf=ca(0,360co,0)cn(0,asd[2].y1.8,-0.75Scale)ca(-20,0,0)
- asd[4]=cf.p
- local a,b,c=cftoEulerAnglesXYZ()
- asd[5]=v3(mdeg(a),mdeg(b),mdeg(c))
- end end
- for u=1,ASpeed2 do
- for i=1,4 do local asd=tips[i]
- SetWeld(asd[1],0,u,ASpeed2,asd[2],asd[3],asd[4],asd[5],1)
- end wait()
- end
- repeat Anim,ArmAnim,LaserOn='Laser','Laser',true wait()
- for i=1,4 do tips[i][1].C0=ca(0,15x,0)tips[i][1].C0 end
- targ=TweenV3(1,12,targ,PlayerGetMouse().Hit.p)
- w1.C0=pTorso.CFrametoObjectSpace(cn(pTorso.CFramecn(1.5Scalex,0.5Scale,0).p,targ))ca(90,0,0)
- w2.C0=cn(0,-0.75Scale,0)
- until not keys[k]
- 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
- local a,b=GetWeld(w1,0)
- local c,d=GetWeld(w2,0)
- for z=1,ASpeed2 do
- for i=1,4 do SetWeld(tips[i][1],0,z,ASpeed2,tips[i][6],tips[i][7],tips[i][2],tips[i][3],1) end
- SetWeld(w1,0,z,ASpeed2,a,b,aa,bb,1)
- SetWeld(w2,0,z,ASpeed2,c,d,cc,dd,1)
- wait()
- end
- sho1Remove() sho2Remove()
- NewAnim[k]=false
- Anim,ArmAnim,LaserOn='None','None',false
- end
- end)) end)
- PlayerGetMouse().KeyUpconnect(function(k) keys[k]=false end)
- PlayerGetMouse().Button1Downconnect(function()
- Button=true
- if keys.f and PlayerGetMouse().Target and Anim=='None' then
- HumMoveTo(PlayerGetMouse().Hit.p,PlayerGetMouse().Target)
- elseif (keys.q or keys.e) and LaserOn then
- local pick=keys.q and 'q' or 'e'
- repeat
- local ofs=(pick=='q' and LArm or RArm).CFrameca(90,0,0)
- if pick=='q' and keys.e then pick='e'
- elseif pick=='e' and keys.q then pick='q' end
- local part=iPart{Char,0.2,0.5,0.2,sc=Scale,co=CC[mran(2,3)],an=true,ma=Mat} iNew{'CylinderMesh',part}
- Projectile(ofs,2Scale,part,ca(-90,0,0),function(hit,pos)
- AOEFind(pos,Scale2,function(Hum,v) Damage(Hum) end)
- end,
- function(pos)
- for i=1,5 do local cf=cn(pos)ca(0,mran(-180,180),mran(-95,95)) MeshEffect(8,cf,cfcn(0,Scale2.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
- 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') partRemove() end)
- wait((keys.q and keys.e) and 0.2 or 0.4)
- until not Button or (not keys.q and not keys.e)
- elseif 'swag'=='sweg' then
- end
- end)
- PlayerGetMouse().Button1Upconnect(function()
- Button=false
- end)
- WalkAnim=0
- Walking=false
- WalkMulp=1
- WalkMax=16
- Hum.WalkSpeed=18
- tWS={1,1,1,1,1,1,1}
- Marbler=0
- local cou=0
- while Char.Parent do
- cou=cou+1
- --if cou%2==0 then print(cou) end
- if Hum.Health0 then
- if Torso.Velocity.y5 then Torso.Velocity=v3(Torso.Velocity.x,5,Torso.Velocity.z) end
- Walking=v3(Torso.Velocity.x,0,Torso.Velocity.z).magnitudeHum.WalkSpeed-2 and true or false
- if Walking and LegAnim=='None' then
- WalkAnim=WalkAnim+WalkMulp
- end
- if WalkAnim0 and not Walking then
- WalkAnim=WalkAnim-1
- elseif WalkAnim0 and not Walking then
- WalkAnim=WalkAnim+1
- end
- if math.abs(WalkAnim)=WalkMax then WalkMulp=WalkMulp-1 end
- local WalkAdj=26
- Neck.C0=Torso.CFrametoObjectSpace(pHead.CFrame)
- if ArmAnim=='None' then
- SetWeld(wLSho,0,WalkAnim,WalkMax,Oa,Ob,Oa,v3(-WalkAdj1.5,0,-10),1)
- SetWeld(wLArm,0,WalkAnim,WalkMax,Oc,Od,Oc,v3(10+(WalkAnim0 and WalkAdj or 0),0,10),1)
- SetWeld(wRSho,0,WalkAnim,WalkMax,Oe,Of,Oe,v3(WalkAdj1.5,0,10),1)
- SetWeld(wRArm,0,WalkAnim,WalkMax,Og,Oh,Og,v3(10+(WalkAnim0 and WalkAdj or 0),0,-10),1)
- end
- if LegAnim=='None' then
- SetWeld(wLThi,0,WalkAnim,WalkMax,Oi,Oj,Oi,v3(15+WalkAdj,0,-5),1)
- SetWeld(wLLeg,0,WalkAnim,WalkMax,Ok,Ol,Ok,v3(-15+(WalkAnim0 and -WalkAdj or 0),0,5),1)
- SetWeld(wRThi,0,WalkAnim,WalkMax,Om,On,Om,v3(15-WalkAdj,0,5),1)
- SetWeld(wRLeg,0,WalkAnim,WalkMax,Oo,Op,Oo,v3(-15+(WalkAnim0 and WalkAdj or 0),0,-5),1)
- end
- --[[
- for i,v in pairs(Marble) do
- v[1].C0=v[1].C0ca(MarbleSpeedv[2],MarbleSpeedv[3],MarbleSpeedv[4])
- Marbler=Marbler+(MarbleSpeedv[2])
- if MarblerMarbleMax then
- v[2]=v[2]-1
- v[3]=v[3]-1
- v[4]=v[4]-1
- end
- end --]]
- if Anim=='Follow' and Target and TargetfindFirstChild'Torso' and not BG.maxTorque~=v3(1,1,1)0 then
- HumMoveTo(Target.Torso.CFramecn(2.5Scale,0,5Scale).p,Target.Torso)
- end
- if Grabbing and (not Grabbing.Part1 or not Grabbing.Part1.Parent or Grabbing.Part1.ParentfindFirstChild'Humanoid'==nil or Grabbing.Part1.Parent.Humanoid.Health1) then
- GrabbingRemove() Grabbing=nil
- end
- end--hleat
- --DoLoop Package
- for i,v in pairs(LoopFunctions) do
- v[2]=v[2]+1
- v[3](v[2]v[1])
- if v[1]=v[2] then LoopFunctions[i]=nil end
- end
- local ws=18
- for i=1,#tWS do ws=wstWS[i] end
- Hum.WalkSpeed=ws
- if Hum.MaxHealth~=800 then Hum.MaxHealth=800 Hum.Health=800 end
- Hum.Health=Hum.Health+0.1
- wait(0.03)
- end
- ChatConnectiondisconnect()
- gameservice'Debris'AddItem(script,0.5)
- script.Disabled=true
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement