HARUTEEE

fp.CanCollide=c


fp.Anchored=false


fp.BrickColor=bc(bc2)


fp.Transparency=tr


fp.Reflectance=re


fp.BottomSurface=0


fp.Name=""..pn --fp.FrontSurface="Hinge"


fp.TopSurface=0 fp.Velocity=v3(0,10,0) fp:BreakJoints() return fp end


function clearit(tab) for xx=1,#tab do tab[xx]:Remove'' end end


function weld(pa,p0,p1,x,y,z,a,b,c) local fw=it("Weld",pa) fw.Part0=p0 fw.Part1=p1 fw.C0=cf(x,y,z) *ca(a,b,c) return fw end


function spm(ty,pa,ss) local sp=it("SpecialMesh",pa) sp.MeshType=ty sp.Scale=v3(ss,ss,ss) end function mbm(pa,sx,sy,sz) local bm=it("BlockMesh",pa) bm.Scale=v(sx,sy,sz) end


function fd(pa,ob) if pa:findFirstChild(ob) then return pa[ob] else return nil end end


function ccn(pa,cl) for i,v in pairs(pa:children()) do if sf(v.className:lower(),cl:lower()) then v:Remove'' end end end


function stick(hit2,hit) local weld=it("Weld") weld.Part0=hit2 weld.Part1=hit local HitPos=hit2.Position local CJ=cf(HitPos)


local C0=hit2.CFrame:inverse() *CJ local C1=hit.CFrame:inverse() * CJ weld.C0=C0 weld.C1=C1 weld.Parent=hit2 end


function stick2(hit2,hit,tostick) local weld=it("Weld") weld.Part0=tostick weld.Part1=hit2 local HitPos=hit.Position local CJ=cf(HitPos) local C0=hit2.CFrame:inverse() *CJ local C1=hit.CFrame:inverse() * CJ weld.C0=C1 weld.C1=C0 weld.Parent=hit2 end


function invis(o) for i,v in pairs(o:children()) do if v:IsA("BasePart") then v.Transparency=1 end invis(v) end end


function newhats(p,o,o2) for i,v in pairs(p:children()) do if v:IsA("Hat") then local np=v.Handle:Clone'' np.Transparency=0 np.Mesh.Scale=np.Mesh.Scale*1.1 np.Parent=o np.CFrame=v.Handle.CFrame stick2(np,o2,o) end end end


function ray(Pos, Dir,xxz) local xxz2=c if xxz ~= nil then xxz2=nil end return workspace:FindPartOnRay(Ray.new(Pos, Dir.unit *999), xxz2) end


function findclass(prt,cls) clases=0 for i,v in pairs(prt:children()) do if v.className:lower() == cls:lower() then clases=clases + 1 end end return clases end


function getclass(prt,cls) for i,v in pairs(prt:children()) do if v.className:lower() == cls:lower() then return v end end return nil end


function fade(prt,incr) cw(function() for i=prt.Transparency,1,incr do prt.Transparency=i w() end prt:Remove'' end) end


function rtab(tabz,obj) for i=1,#tabz do if tabz[i] == obj then tr(tabz,i) break end end end


function RandomPlayer(spiz) local torz=spis local torses={} for i,v in pairs(Serv.kx:children()) do if v ~= Serv.kx.LocalPlayer and v.Character ~= nil and v.Character:findFirstChild("Torso") then ti(torses,v.Character.Torso) end end if #torses > 0 then torz=torses[rn(1,#torses)] end return torz end


function FDesDes(ob,str) for i,v in pairs(ob:children()) do if v.Name:lower() == str:lower() then return true end return FDesDes(v,str) end end


function RandomExplosionColor() colz={"New Yeller","Bright yellow","Neon orange","Deep orange","Really red","Bright red"} return colz[rn(1,#colz)] end


function findhum(anc) for i,vx in pairs(anc:children()) do if vx:IsA("Humanoid") then return vx end end return nil end


function Trail(ob,times,waitz,col,thickz,ofz) local oldpos=(ob.CFrame *ofz).