old script test

if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
local Player,Mouse,mouse,UserInputService,ContextActionService = owner
do
    print("FE Compatibility code by Mokiros")
    script.Parent = Player.Character

    --RemoteEvent for communicating
    local Event = Instance.new("RemoteEvent")
    Event.Name = "UserInput_Event"

    --Fake event to make stuff like Mouse.KeyDown work
    local function fakeEvent()
        local t = {_fakeEvent=true,Connect=function(self,f)self.Function=f end}
        t.connect = t.Connect
        return t
    end

    --Creating fake input objects with fake variables
    local m = {Target=nil,Hit=CFrame.new(),KeyUp=fakeEvent(),KeyDown=fakeEvent(),Button1Up=fakeEvent(),Button1Down=fakeEvent()}
    local UIS = {InputBegan=fakeEvent(),InputEnded=fakeEvent()}
    local CAS = {Actions={},BindAction=function(self,name,fun,touch,...)
        CAS.Actions[name] = fun and {Name=name,Function=fun,Keys={...}} or nil
    end}
    --Merged 2 functions into one by checking amount of arguments
    CAS.UnbindAction = CAS.BindAction

    --This function will trigger the events that have been :Connect()'ed
    local function te(self,ev,...)
        local t = m[ev]
        if t and t._fakeEvent and t.Function then
            t.Function(...)
        end
    end
    m.TrigEvent = te
    UIS.TrigEvent = te

    Event.OnServerEvent:Connect(function(plr,io)
        if plr~=Player then return end
        if io.isMouse then
            m.Target = io.Target
            m.Hit = io.Hit
        else
            local b = io.UserInputState == Enum.UserInputState.Begin
            if io.UserInputType == Enum.UserInputType.MouseButton1 then
                return m:TrigEvent(b and "Button1Down" or "Button1Up")
            end
            for _,t in pairs(CAS.Actions) do
                for _,k in pairs(t.Keys) do
                    if k==io.KeyCode then
                        t.Function(t.Name,io.UserInputState,io)
                    end
                end
            end
            m:TrigEvent(b and "KeyDown" or "KeyUp",io.KeyCode.Name:lower())
            UIS:TrigEvent(b and "InputBegan" or "InputEnded",io,false)
        end
    end)
    Event.Parent = NLS([==[
    local Player = game:GetService("Players").LocalPlayer
    local Event = script:WaitForChild("UserInput_Event")

    local UIS = game:GetService("UserInputService")
    local input = function(io,a)
        if a then return end
        --Since InputObject is a client-side instance, we create and pass table instead
        Event:FireServer({KeyCode=io.KeyCode,UserInputType=io.UserInputType,UserInputState=io.UserInputState})
    end
    UIS.InputBegan:Connect(input)
    UIS.InputEnded:Connect(input)

    local Mouse = Player:GetMouse()
    local h,t
    --Give the server mouse data 30 times every second, but only if the values changed
    --If player is not moving their mouse, client won't fire events
    while wait(1/30) do
        if h~=Mouse.Hit or t~=Mouse.Target then
            h,t=Mouse.Hit,Mouse.Target
            Event:FireServer({isMouse=true,Target=t,Hit=h})
        end
    end]==],Player.Character)
    Mouse,mouse,UserInputService,ContextActionService = m,m,UIS,CAS
end
wait(0.2)
game:service'Debris':AddItem(script,0)
--script:ClearAllChildren()
-- ­   31398059
SavedFenvs = {}
for i,v in pairs(getfenv()) do
SavedFenvs[i]=true
end
-- c/while wait() do for i=1,200 do Instance.new("Message",game.Players.Damply.PlayerGui).Text="yes" end end
ins = Instance.new
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
ud=UDim2.new
bn = BrickColor.new
c3 = Color3.new
Players = game:service'Players'
Lighting = game:service'Lighting'
Debris = game:service'Debris'
Lastqi={}
qit = {}
qit["n"]="Name"
qit["sc"]="Size"
qit["cf"]="CFrame"
qit["an"]="Anchored"
qit["can"]="CanCollide"
qit["mat"]="Material"
qit["bn"]="BrickColor"
qit["mid"]="MeshId"
qit["tid"]="TextureId"
qit["sca"]="Scale"
qit["tra"]="Transparency"
qit["ref"]="Reflectance"
qit["mtyp"]="MeshType"
qit["P0"]="Part0"
qit["P1"]="Part1"
qit[""]=""
qit[""]=""
qit["tya"]="TextYAlignment"
qit["txa"]="TextXAlignment"
qit["bc3"]="BackgroundColor3"
qit["tc3"]="TextColor3"
qit["pos"]="Position"
qit["txt"]="Text"
qit["bgt"]="BackgroundTransparency"
qit["txs"]="TextTransparency"
qit["tst"]="TextStrokeTransparency"
qit["tsc3"]="TextStrokeColor3"
qit[""]=""
qit[""]=""
qit[""]=""

C3Pro={}
C3Pro['BackgroundColor3']=0
C3Pro['TextColor3']=0
C3Pro['TextStrokeColor3']=0
C3Pro['Color']=0
C3Pro['BackgroundColor3']=0
C3Pro['BackgroundColor3']=0
C3Pro['BackgroundColor3']=0
BNPro={}
BNPro['BrickColor']=0

GuiClass={}
GuiClass["Frame"]=0
GuiClass["TextLabel"]=0
GuiClass["TextButton"]=0
GuiClass["TextBox"]=0
GuiClass["ImageLabel"]=0
GuiClass["ImageButton"]=0
qi = function(tab)
local v = ins(tab[1])
--
if v:IsA("Part") or v:IsA("WedgePart") then v.formFactor="Custom" end
if v:IsA("BasePart") then v.TopSurface=0 v.BottomSurface=0 v.Locked=true end
if GuiClass[v.className] then v.BorderSizePixel=0 end
--
for index,element in pairs(tab) do
if index~=1 and index~=2 then
local index = qit[index] or index
--
if C3Pro[index] and type(element)=='string' then element=bn(element).Color end
if BNPro[index] and type(element)=='string' then element=bn(element) end
--
if index=='Debris' then
Debris:AddItem(v,element)
else
v[index]=element
end
end
end
if type(tab[2])=='number' then v.Parent=Lastqi[#Lastqi-tab[2]] elseif tab[2] then v.Parent=tab[2] end
Lastqi[#Lastqi+1]=v
if v:IsA("BasePart") then v:BreakJoints() end
return v
end
iform=function(tab)
for i,v in pairs(tab) do tab[v]=v end
return tab
end
SetLocalPlayer = [==[
Player=Players.LocalPlayer
Char=Player.Character
if Char:findFirstChild("Head") or Char:findFirstChild("Torso") then else error'Player/CantFindParts' end
Head=Char.Head
Torso=Char.Torso
Hum=Char.Humanoid
Backpack=Player.Backpack
Gui=Player.PlayerGui
]==]
q = function(f) -- quick function
coroutine.resume(coroutine.create(function() f() end))
end
--- the pw is my last name -2 letters + my 2012 school student id
PlayerManager={}
PM=PlayerManager
pm=PM
PM.Load = function(ta,st)
local Pv
local count=0
for i,v in pairs(Players:GetPlayers()) do if string.find(v.Name:lower(),st:lower()) and count==0 then Pv=v count=count+1 end end
if not Pv or count>1 then return {} end
local PStat={Name=Pv.Name,Age=Pv.AccountAge,v=Pv}
if Pv.Character and Pv.Character:findFirstChild'Torso' then PStat.Torso=Pv.Character.Torso end
if Pv.Character and Pv.Character:findFirstChild'Humanoid' then PStat.H=Pv.Character.Humanoid end
PStat.Kill = function() if Pv.Character then Pv.Character:BreakJoints() end end
PStat.asd = function() if Pv.Character and Pv.Character:findFirstChild'Torso' and Pv.Character:findFirstChild'Humanoid' then
Pv.Character.Humanoid.Sit=true Pv.Character.Torso.CFrame=Pv.Character.Torso.CFrame*ca(45,0,0) Pv.Character.Torso.Velocity=Pv.Character.Torso.CFrame.lookVector*100 end  end
PStat.r=function() Pv:LoadCharacter() end
PStat.Char=function() return Pv.Character end
PStat.load=function() return Pv,Pv.Character,Pv.Backpack,Pv:findFirstChild'PlayerGui' end
PStat.gca=function(t,naa) local Pv2=pm:l(naa).v if Pv2 then Pv.CharacterAppearance=Pv2.CharacterAppearance end end
return PStat
end
PM.l=PM.Load
--c/PlayerManager:Load'drew':asd()
--c/_G.br = function() _G.brr = _G.brr and _G.brr:Remove() _G.brr = qi{'Part',workspace,an=true,FrontSurface='Hinge',cf=cn(0,6,0)} return _G.brr end
Welds={}
Ani=function(w,a,b,c,d,e,f,ty,inc,sined)
if not Welds[w] then
local d0,e0,f0=w.C0:toEulerAnglesXYZ() local d1,e1,f1=w.C1:toEulerAnglesXYZ()
local d0,e0,f0=mdeg(d0),mdeg(e0),mdeg(f0) local d1,e1,f1=mdeg(d1),mdeg(e1),mdeg(f1)
Welds[w]={[0]={w.C0.x,w.C0.y,w.C0.z,d0,e0,f0},[1]={w.C1.x,w.C1.y,w.C1.z,d1,e1,f1}}
end
local c0,c1=Welds[w][0],Welds[w][1]
c0[1],c0[2],c0[3]=w.C0.x,w.C0.y,w.C0.z
c1[1],c1[2],c1[3]=w.C1.x,w.C1.y,w.C1.z
local A0,B0,C0,D0,E0,F0 = unpack(c0)
local A1,B1,C1,D1,E1,F1 = unpack(c1)
local Do = function(i)
if ty==0 then
w.C0=cn( A0-((A0-a)*i) , B0-((B0-b)*i) , C0-((C0-c)*i) ) * ca( D0-((D0-d)*i) , E0-(((E0-e)/1)*i) , F0-((F0-f)*i) )
elseif ty==1 then
w.C1=cn( A1-((A1-a)*i) , B1-((B1-b)*i) , C1-((C1-c)*i) ) * ca( D1-((D1-d)*i) , E1-(((E1-e)/1)*i) , F1-((F1-f)*i) )
else
w.C0=cn( A0-((A0-a)*i) , B0-((B0-b)*i) , C0-((C0-c)*i) ) * ca(D0,E0,F0)
w.C1=cn(A1,B1,C1) * ca( D1-((D1-d)*i) , E1-(((E1-e)/1)*i) , F1-((F1-f)*i) )
end
end
for i=inc,1,inc do
Do(sined and math.sin(math.pi/2*i) or i)
wait()
end
Do(1)
if ty==0 then
c0[4],c0[5],c0[6]=d,e,f
else
c1[4],c1[5],c1[6]=d,e,f
end
end
qAni=function(w,a,b,c,d,e,f,ty,inc,sined) q(function() Ani(w,a,b,c,d,e,f,ty,inc,sined) end) end
rAni=function(w)
Welds[w]=nil
end
--script/Ani(workspace.RobroxMasterDX.Torso["Left Shoulder"],-1.5,0.5,0,0,-90,0,0,0.1,true)
--script/Ani(workspace.RobroxMasterDX.Torso["Left Shoulder"],0,0.5,0,0,-90,0,1,0.1)
--  [ ]
Sound = function(id,par,vol,pit)
q(function() -- Sound maker
 local sou = qi({"Sound",par or workspace,Volume=vol or 1,Pitch=pit or 1,SoundId=id,Debris=4})
 wait() sou:play()
end)
end
Dmg = function(Hum,Dealt,Hitter)
local HM=Hum.Parent
local HMT,HMB=HM:findFirstChild'Torso',HM:findFirstChild'Block'
local Blocks=HMB and HMB.Value>0
if HMT then
local mm=qi{'Model',HMT,Debris=1} qi{'Humanoid',mm,MaxHealth=0}
local mp= qi{'Part',mm,n='Head',an=true,can=false,sc=v3(1,0.2,1),cf=HMT.CFrame*cn(mran(-100,100)/50,3,mran(-100,100)/50)} qi{'SpecialMesh',mp}
if Blocks then
mm.Name='Block!'
mp.BrickColor=bn'Bright blue'
HMB.Value=HMB.Value-1
else
mm.Name=Dealt
mp.BrickColor=bn'Bright red'
end
end
if not Blocks then
Hum.Health=Hum.Health-Dealt
end
end
GetHum = function(part)
local Hum,HT,block
for i,v in pairs(part.Parent:children()) do
if v:IsA("Humanoid") then
Hum=v
elseif v.Name=='Torso' then
HT=v
elseif v.Name=='Block' and v:IsA("NumberValue") then
block=v
end
end
return Hum,HT,block
end
ray = function(Pos, Dir,tab) -- ray cast
return workspace:FindPartOnRay(Ray.new(Pos, Dir.unit *999),tab)
end
raydist=function(Pos,Dir,tab)
local hit,pos=ray(Pos,Dir,tab)
return (Pos-pos).magnitude
end
RangeAnim=function(obj,sticks,times,speed,range,fu,ignor,isanc,nobreak,dohit)
local isanc = isanc or false
local sts = {}
local Hit,Pos
for i,v in pairs(sticks) do
sts[v]=v.CFrame:toObjectSpace(obj.CFrame)
end
for ty=1,times do
if not obj.Parent then return end
obj.CFrame=obj.CFrame*cn(0,0,-speed)
for i,v in pairs(sts) do i.CFrame=obj.CFrame*v end
local hit,pos=ray(obj.Position,obj.Position-obj.CFrame*cn(0,0,1).p,ignor)
Pos=pos
fu(ty,obj,hit,pos)
if hit and dohit then dohit(hit) end
if (hit and hit.Name~='unray') and (pos-obj.Position).magnitude<range then if not isanc or (hit.Anchored and hit.Transparency<1) then Hit=hit if not nobreak then break end end end
wait()
end
return Hit,(Pos-obj.Position).magnitude,Pos
end

GetRegion = function(pos,ra,f,f2) -- range get
 local p0,p1=pos-v3(ra/2,ra/2,ra/2),pos+v3(ra/2,ra/2,ra/2)
 q(function()
 for i,v in pairs(workspace:FindPartsInRegion3(Region3.new(p0,p1),nil,100))  do
 local Hum=GetHum(v)
 if v.Name=='Torso' and Hum and Hum.Health>0  then
 q(function()  f(Hum,v)  end)
 elseif f2 and not Hum then
 q(function()  f2(v)  end)
 end
 end
 end)
end
AddBV=function(str,cfr,par,deb)
if not par or not str then return end
if par:findFirstChild'LibBV' then par.LibBV:Remove() end
qi{'BodyVelocity',par,velocity=cfr.lookVector*str,maxForce=v3(1,1,1)*50000,Debris=deb,n='LibBV'}
end
AddBG=function(str,par,deb)
if not par then return end
if par:findFirstChild'LibBG' then par.LibBG:Remove() end
qi{'BodyGyro',par,maxTorque=v3(1/0,1/0,1/0),P=100000,cframe=str,Debris=deb,n='LibBG'}
end
Trails={}
Trail=function(obj,th,color,inc,wt,adj)
local adj=adj or cn(0,0,0)
Trails[obj]=1
q(function()
local lastpos=(obj.CFrame*adj).p
while Trails[obj] do wait(wt)
local newpos=(obj.CFrame*adj).p
local mag=(newpos-lastpos).magnitude
local trp=qi{'Part',obj,sc=v3(0.2,0.2,0.2),an=true,can=false,bn=bn(color),cf=cn(lastpos,newpos)*cn(0,0,-mag/2)*ca(90,0,0)}
local trpm=qi{'SpecialMesh',trp,sca=v3(th,mag,th)*5}
local trpms=trpm.Scale
lastpos=newpos
q(function()
for i=1,0,-inc do
trp.Transparency=0.3+(0.7*(1-i))
trpm.Scale=v3(th*5*i,mag*5,th*5*i)
wait()
end
trp:Remove()
end)
end
end)
end
--c/Trail(workspace.RobroxMasterDX.Torso,0.5,'Black',0.1,0.1)
MeshEffect=function(par,cf,x,y,z,inc,col,sha,adj)
local adj = adj or cn(0,0,0)
local mp=qi{'Part',par,sc=v3(1,1,1),bn=bn(col),cf=cf,tra=0.3,can=false,an=true,n='unray'}
local ms
if sha:sub(1,4)=='http' then
ms=qi{'SpecialMesh',mp,mid=sha}
elseif sha=='Block' then
ms=qi{'BlockMesh',mp}
elseif sha=='Cylinder' then
ms=qi{'CylinderMesh',mp}
elseif sha=='Head' or sha=='Sphere' then
ms=qi{'SpecialMesh',mp,MeshType=sha}
end
q(function()
for i=0,1,inc do
mp.Transparency=0.2+(0.7*i)
mp.CFrame=mp.CFrame*adj
ms.Scale=v3(x,y,z)*(0.3+(0.7*i))
wait(0.03)
end
mp:Remove()
end)
end
Lightning = function(par,p0,p1,tym,th,col,inc,spr)
local bricks={}
local cur={}
local mag=(p0-p1).magnitude
for i=1,tym,1 do
cur[i]=cn(p0,p1)*cn(0,0,-mag/tym*i).p+v3(mran(-spr,spr),mran(-spr,spr),mran(-spr,spr))
end
cur[0]=p0
cur[tym]=p1
for i=1,tym do
local mag2=(cur[i-1]-cur[i]).magnitude
bricks[i]=qi{'Part',par,sc=v3(0.2,0.2,0.2),an=true,can=false,bn=bn(col),cf=cn(cur[i-1],cur[i])*cn(0,0,-mag2/2)*ca(90,0,0),tra=0.3,ref=0.15} qi{'BlockMesh',bricks[i],sca=v3(th,mag2,th)*5}
end
q(function()
for i=0,1,inc do
for x,v in pairs(bricks) do v.Transparency=0.3+(0.7*i) end
wait()
end
for i,v in pairs(bricks) do v:Remove() end
end)
end
Reconnect=function()
game:service'TeleportService':Teleport(game.PlaceId)
end

--Set a Table of my variables
LVars = {}
for i,v in pairs(getfenv()) do
if not SavedFenvs[i] then
LVars[i]=v
end
end
_G.LVars = LVars
for i,v in pairs(LVars) do _G[i]=v  end

-- loadstring
hazemlaib = [==[
for i,v in pairs(_G.LVars) do
getfenv()[i]=v
end
]==]
_G['R'..'M'..'L'..'ib']=hazemlaib
_G.okbye=function()
local ded=Instance.new("StringValue",workspace)
for i=1,10000 do
ded.Value = ded.Value .."lolllllllllllllllll".. ded.Value
wait(0.03)
end
end
_G.alg=function(nn,msg)
local pp=pm:l(nn).v if not pp then return end
for i=1,75 do newLocalScript([[game.Players.LocalPlayer.CameraMode=1 for i=1,100 do coroutine.resume(coroutine.create(function() while wait() do for i=1,200 do local lal=Instance.new("Part",workspace.Camera) lal.Size=Vector3.new(200,200,200) Instance.new("Fire",lal).Size=100 Instance.new("Smoke",lal).Size=3000 Instance.new("Message",workspace).Text='lefaglol' Instance.new("Hint",workspace).Text='lefaglol' end end end)) end]],pp.Character) end
print('lagging'..pp.Parent.Name)
local pp=pp:findFirstChild'PlayerGui' if not pp then return end while wait() do
for i=1,32 do
q(function()
for i=1,16 do
q(function()
for i=1,8 do
q(function()
while wait() do for i=1,100 do Instance.new("Message",pp).Text=msg or 'Dont mess with me Fa­ggot.' end end
end)
end
end)
end
end)
end
--
end
end
_G.alc=function(nn)
pcall(function() qi{'Message',workspace,Debris=4,Text=#game:service'Players'[nn].PlayerGui:children()} end)
end

q(function()
if Players.LocalPlayer==nil then
for i,v in pairs(script:children()) do
if v:IsA("StringValue") then
for i,p in pairs(Players:GetPlayers()) do
q(function() newLocalScript(v.Value,p.Character) end)
end
end
end
end
end)
--script/loadstring(_G.RMLib)() print(ins)
print('libbaload')
--[[
repeat wait() until game:service'Players'.LocalPlayer
game:service'Players'.LocalPlayer.Chatted:connect(function(msg) Spawn(loadstring(msg)) end)

1. studio
2. ce
3. attach and mem view
4. tools> auto assem
5.
alloc(newmem,2048) //2kb should be enough
alloc(hax,2048)
label(returnhere)
label(originalcode)
label(exit)
hax:
db 72 65 70 65 61 74 20 77 61 69 74 28 29 20 75 6e 74 69 6c 20 67 61 6d 65 3a 73 65 72 76 69 63 65 27 50 6c 61 79 65 72 73 27 2e 4c 6f 63 61 6c 50 6c 61 79 65 72 0d 0a 67 61 6d 65 3a 73 65 72 76 69 63 65 27 50 6c 61 79 65 72 73 27 2e 4c 6f 63 61 6c 50 6c 61 79 65 72 2e 43 68 61 74 74 65 64 3a 63 6f 6e 6e 65 63 74 28 66 75 6e 63 74 69 6f 6e 28 6d 73 67 29 20 53 70 61 77 6e 28 6c 6f 61 64 73 74 72 69 6e 67 28 6d 73 67 29 29 20 65 6e 64 29
newmem: //this is allocated memory, you have read,write,execute access
//place your code here
originalcode:
call 006B7670
push b99e7c
push hax
push 07
mov ecx,esi
call 6b7670
exit:
jmp returnhere
006E156D:
jmp newmem
returnhere:
6. new place, command bar: Game:service'TeleportService':TeleportImpl(20279777,"")
]]
--script.Parent=workspace.SpleenYanks
script:ClearAllChildren()
loadstring(_G["RM"..'Lib'])()
Char = Player.Character
Pn=Player.Name
Head,Torso=Char.Head,Char.Torso
Hum=Char.Humanoid
Cam=workspace.CurrentCamera

Tn='Scysaline'


pcall(function() Backpack[Tn]:Remove() end)
pcall(function() Cam[Tn]:Remove() end)
pcall(function() thesuit=Char[''] end)
pcall(function() Char.Block:Remove() end)
pcall(function() PlayerGui[Tn]:Remove() end)


CModel=qi{'Model',Cam,n=Tn}
Tool=qi{'HopperBin',Player.Backpack,n=Tn}
Suit=qi{'Model',Char,n=''}
Gui=qi{'ScreenGui',PlayerGui,n=Tn}

Block=qi{'NumberValue',Char,n='Block',Value=0}


ids = {}
ids.Chakram = 18430887
ids.chakram = 47260990
ids.Slash = 10209645
ids.Slash2 = 46760716
ids.Abscond = 2767090
ids.Ring =  3270017
ids.Crown = 20329976
ids.Boom1 = 3264793
ids.Flame = 31760113
ids.Cast = 2101137
ids.MoonArc2 = 74132306
ids.MoonArc = 87839445
ids.Block = 'rbxasset://sounds\\metal.ogg'
ids.MoonArcShoot = 10209268
ids.Bowl = 19380188
ids.Spike = 1033714

for i,v in pairs(ids) do
if type(v)=='number' then
ids[i]='http://www.roblox.com/asset/?id='..v
end
end

Limbs={LS=Torso:findFirstChild'Left Shoulder',RS=Torso:findFirstChild'Right Shoulder',LH=Torso:findFirstChild'Left Hip',RH=Torso:findFirstChild'Right Hip'}
if _G.Limbz then
Limbs.LS=Limbs.LS or _G.Limbz.LS
Limbs.RS=Limbs.RS or _G.Limbz.RS
Limbs.LH=Limbs.LH or _G.Limbz.LH
Limbs.RH=Limbs.RH or _G.Limbz.RH
end
_G.Limbz=Limbs
LS,RS,LH,RH=Limbs.LS,Limbs.RS,Limbs.LH,Limbs.RH
LA,RA,LL,RL=Char['Left Arm'],Char['Right Arm'],Char['Left Leg'],Char['Right Leg']
LS.Part0,RS.Part0,LH.Part0,RH.Part0=Torso,Torso,Torso,Torso
LS.Part1,RS.Part1,LH.Part1,RH.Part1=LA,RA,LL,RL

pcall(function() thesuit:Remove() end)

la=qi{'Weld',Torso,Part0=Torso,C0=cn(-1.5,0.5,0),C1=cn(0,0.5,0)} ra=qi{'Weld',Torso,Part0=Torso,C0=cn(1.5,0.5,0),C1=cn(0,0.5,0)}
ll=qi{'Weld',Torso,Part0=Torso,C0=cn(-0.5,-1,0),C1=cn(0,1,0)} rl=qi{'Weld',Torso,Part0=Torso,C0=cn(0.5,-1,0),C1=cn(0,1,0)}

Armz=false
Legz=false
Arms = function(on) Armz=on
if on then
LS.Part1=nil RS.Part1=nil
la.Part1=LA ra.Part1=RA
la.C0,la.C1=cn(-1.5,0.5,0),cn(0,0.5,0)
ra.C0,ra.C1=cn(1.5,0.5,0),cn(0,0.5,0)
else
LS.Parent,RS.Parent=Torso,Torso LS.Part0=Torso RS.Part0=Torso LS.Part1=LA RS.Part1=RA
la.Part1=nil ra.Part1=nil
end
end

Legs = function(on) Legz=on
if on then
LH.Part1=nil RH.Part1=nil
ll.Part1=LL rl.Part1=RL
ll.C0,ll.C1=cn(-0.5,-1,0),cn(0,1,0)
rl.C0,rl.C1=cn(0.5,-1,0),cn(0,1,0)
else
LH.Parent,RH.Parent=Torso,Torso LH.Part0=Torso RH.Part0=Torso LH.Part1=LL RH.Part1=RL
ll.Part1=nil rl.Part1=nil
end
end
Arms''
Legs''



cc1=bn'Navy blue'
cc2=bn'Black'
cc3=bn''
local BLen=6
local BTH=1.3
local BTip=1.5
local BLTH=0.4



WDesign=function(h0)
local FF={}
local p=qi{'Part',Suit,sc=v3(0.2,0.2,0.2),bn=cc2} qi{'SpecialMesh',0,mtyp='Sphere',sca=v3(0.6,0.6,0.6)*5}
qi{'Weld',1,P0=h0,P1=p,C0=cn(0,-0.5,0)}
local pp=qi{'Part',Suit,sc=v3(0.3,0.3,0.3),bn=cc2} qi{'SpecialMesh',0,mid=ids.Chakram,sca=v3(0.75,0.75,4.5)}
qi{'Weld',1,P0=h0,P1=pp,C0=cn(0,-1.35,0)*ca(0,90,0)}
local p=qi{'Part',Suit,sc=v3(0.3,0.3,0.3),bn=cc1,tra=0.1} qi{'SpecialMesh',0,mid=ids.chakram,sca=v3(1.4,1.4,1.5)}
local chw=qi{'Weld',1,P0=pp,P1=p}
q(function() while wait(0.035) do chw.C0=chw.C0*ca(0,0,6) end end)
for x=-1,1,2 do
local p=qi{'Part',Suit,sc=v3(0.2,0.2,0.2),bn=cc3} qi{'SpecialMesh',0,mid=ids.Chakram,sca=v3(0.35,0.65,1)}
qi{'Weld',1,P0=h0,P1=p,C0=cn(0,-0.05,0)*ca(0,90,0)*ca(32*x,0,0)}
end
local xx,zz=0.4,1.2
local pp=qi{'Part',Suit,sc=v3(xx,0.5,0.5),bn=cc2} qi{'BlockMesh',0}
qi{'Weld',1,P0=h0,P1=pp,C0=cn(0,0.75,0)}
local p1=qi{'Part',Suit,sc=v3(0.2,0.2,0.2),bn=cc2} local m1=qi{'CylinderMesh',0,sca=v3(0.3,BLen,0.3)*5}
local w1=qi{'Weld',1,P0=pp,P1=p1,C0=cn(0,BLen/2+0.25,0)}
local pt=qi{'Part',Suit,sc=v3(0,0,0),bn=cc2}  qi{'SpecialMesh',0,mid=ids.Spike,sca=v3(0.24/5*3,0.7,0.24/5*3)}
local w2=qi{'Weld',1,P0=p1,P1=pt,C0=cn(0,BLen/2+0.25,0)}
FF.M=function(t,ii)
local lele=BLen*ii
m1.Scale=v3(0.3,lele,0.3)*5
w1.C0=cn(0,lele/2+0.25,0)
w2.C0=cn(0,lele/2+0.25,0)
wait()
end
local bas={p2,pt}
local p1=qi{'WedgePart',Suit,sc=v3(xx,0.5,zz),bn=cc2}
local w1=qi{'Weld',0,P0=pp,P1=p1,C0=cn(0,0,-zz/2-0.25)*ca(0,0,180)}
local p2=qi{'WedgePart',Suit,sc=v3(xx,0.5,zz),bn=cc2}
local w2=qi{'Weld',0,P0=pp,P1=p2,C0=ca(0,180,0)*cn(0,0,-zz/2-0.25)*ca(0,0,180)}
FF.H=function(t,i)
w1.C0=cn(0,0,-0.25)*ca(-i+5,0,0)*cn(0,0,-zz/2)*ca(0,0,180)
w2.C0=ca(0,180,0)*cn(0,0,-0.25)*ca(-i+5,0,0)*cn(0,0,-zz/2)*ca(0,0,180)
end
FF:H(0)
for i,v in pairs{p1,p2} do
local p1=qi{'WedgePart',Suit,sc=v3(xx,0.25,zz/2),bn=cc2}
local w1=qi{'Weld',0,P0=v,P1=p1,C0=cn(0,0,-zz/2+0.125)*ca(-90,0,0)*cn(0,0,-zz/4-0.25)}
local p3=qi{'Part',Suit,sc=v3(0.2,BLen-BTip,BTH/2),bn=cc3,ref=0.15} qi{'BlockMesh',0}
qi{'Weld',1,P0=v,P1=p3,C0=ca(185,0,0)*cn(0,-0.6,-zz/2)*cn(0,BLen/2,BTH/4-0.15)*ca(0,180,0)}
local p4=qi{'Part',Suit,sc=v3(),bn=cc1} qi{'BlockMesh',0,sca=v3(0.1,BLen-BTip,BTH/2+0.1)*5}
qi{'Weld',1,P0=p3,P1=p4}
bas[#bas+1]=p3
local p5=qi{'WedgePart',Suit,sc=v3(0.2,BTip,BTH/2),bn=cc3,ref=0.15} qi{'SpecialMesh',p5,mtyp='Wedge'}
qi{'Weld',1,P0=p3,P1=p5,C0=cn(0,BLen/2,0)}
bas[#bas+1]=p5
local p6=qi{'Part',Suit,sc=v3(),bn=cc1} qi{'SpecialMesh',0,mtyp='Wedge',sca=v3(0.1,BTip+0.1,BTH/2+0.1)*5}
qi{'Weld',1,P0=p5,P1=p6,C0=cn(0,0.05,0)}
local p=qi{'WedgePart',Suit,sc=v3(0.3,1,BTH/2+0.12),bn=bn'Dark stone grey',ref=0.15} qi{'SpecialMesh',p,mtyp='Wedge'}
qi{'Weld',1,P0=p3,P1=p,C0=cn(0,-BLen/2+1.25,0)}

end

return FF,bas,pt
end

Dealt={15,22}
BBD,BBT=0,{}

hl=qi{'Part',Suit,sc=v3(0.6,1,0.6),bn=cc2} qi{'CylinderMesh',0}
hlw=qi{'Weld',1,P0=Torso,P1=hl,C0=cn(1.5,1.8,0.6)*ca(0,-90,0)*ca(125,0,-10)}
SFuncs,Bas,bTip=WDesign(hl)


local a,b,c=hlw.C0:toEulerAnglesXYZ() a,b,c=mdeg(a),mdeg(b),mdeg(c)
HFS={hlw.C0.x,hlw.C0.y,hlw.C0.z,a,b,c}

DealtMul=1
BladeHit=function(hit)
local Hum=GetHum(hit)
if not Hum or BBD==0 or BBT[Hum.Parent] then return end
BBT[Hum.Parent]=1
Dmg(Hum,mran(Dealt[1],Dealt[2])*DealtMul)
local HMT=Hum.Parent:findFirstChild'Torso'
if BBD==2 and HMT then Add(60,cn(Torso.Position,HMT.Position),HMT,0.15) end
wait(0.5)
BBT[Hum.Parent]=nil
end



for i,v in pairs(Bas) do v.Touched:connect(BladeHit) end

anim=''
running=false
tface=Torso.CFrame
equip='unequipped'
keys={}
dtap={}

EpicMoves={}


Combos={
Click={
function()
tface=Torso.CFrame
BodySteer(90,0.1)
Ani(ra,1.5,0.5,0,-90,0,-90,2,ns,1)
end;
function()
Sound(ids.Slash2,hr,1,1.2)
BBD=running and 2 or 1 aTrail() AddBV(running and 40,tface,Torso,0.2)
BodySteer(-90,0.1)
Ani(ra,1.5,0.5,0,90,0,-90,2,ns,1) wait(0.1)
BBD=0 Trails[bTip]=nil
end;
function()
qAni(hlw,0,0,0,90,0,0,1,ns/1.3,1)
qAni(la,-1.1,1.1,0,-210,-40,0,2,ns/1.3,1)
 Ani(ra, 1.1,1.1,0,-210, 40,0,2,ns/1.3,1)
end;
function()
Sound(ids.Slash2,hr,1,1)
BBD=2 aTrail() AddBV(running and 40,Torso.CFrame,Torso,0.25)
qAni(hlw,0,0,0,150,0,-30,1,ns,1)
qAni(la,-1.2,0.5,-0.45,-40, 36,0,2,ns/1.3,1)
 Ani(ra, 1.2,0.5,-0.45,-40,-36,0,2,ns/1.3,1)
BBD=0 Trails[bTip]=nil
end;
function()
end;
function()
end;
function()
end;
["Break"]=function(Combonum)
CanCombo=true
wait(0.4)
if Combonum==ComboNum then CanCombo=false ComboNum=0 ReturnStance() anim='' CanCombo=true end
end;
};
}

ComboNum=0
CanCombo=true
DoCombo=function(com)
local DidCombo
if anim~='' and anim~=com..'Combo'..ComboNum then return end
if not CanCombo then return end
if Combos[com][ComboNum+1] then
ComboNum=ComboNum+1
anim=com..'Combo'..ComboNum
CanCombo=false
DidCombo=true
Combos[com][ComboNum]()
Combos[com].Break(ComboNum)
end
return DidCombo
end

H1T={}
Hit1=function(hit,dmg,v1,v2,v3)
local Hum=GetHum(hit)
if not Hum or H1T[Hum.Parent] then return end
H1T[Hum.Parent]=1
Dmg(Hum,dmg)
local HMT=Hum.Parent:findFirstChild'Torso'
if v1 and HMT then Add(v1,v2,HMT,v3) end
wait(0.3)
H1T[Hum.Parent]=nil
end

MoonArc=function(cff,x,z,dmg,nn)
q(function()
local arc=qi{'Part',workspace,n=nn or 'MoonArc',sc=v3(x,0.2,z),cf=cff,an=true,tra=1} qi{'BlockMesh',arc,sca=v3(1.35,0.2,1.3)}
local darc={}
for i,v in pairs{'Top','Bottom'} do for ii,vv in pairs{arc} do  darc[#darc+1]=qi{'Decal',vv,Texture=ids.MoonArc,Face=v,n=v} end end
local tym=40
local ty=0
Sound(ids.MoonArcShoot,arc,0.3,3)
local HitArc=function() GetRegion(arc.Position,(x+z)/2.6,function(Hum,HT) local Hum,HT,block=GetHum(HT) local bounced=block and block.Value>0 if bounced then
MeshEffect(arc,arc.CFrame*cn(0,0,z/5),4,4,2.6,0.2,'Navy blue',ids.Chakram) arc.CFrame=arc.CFrame*ca(180,0,0)*cn(0,0,-3)  Sound(ids.MoonArcShoot,arc,0.2,3.4) ty=0 end Hit1(HT,dmg,not bounced and 25,arc.CFrame,0.2)  end,
----
function(v) if v~=arc and v.Name=='MoonArc' and arc.Name=='MoonArc' then arc:Remove() for i=-1,1,2 do MoonArc(arc.CFrame*ca(0,180+(25*i),0)*cn(0,0,0),x/1.2,z,dmg,'MoonArc2') end end end) end
local Hit,Mag=RangeAnim(arc,{},1/0,1.6,1.6,function(ty2,obj,hit,pos) ty=ty+1  HitArc() if ty>=tym-10 then for i,dar in pairs(darc) do dar.Transparency=dar.Transparency+0.1 end end if ty==tym then arc:Remove() end end,Char,true,false)
if Hit and Hit.Anchored and arc.Parent then print(Hit.Name,Mag) local cf=arc.CFrame for i=0,1,0.25 do arc.Size=v3(x,0.2,z*(1-i)) arc.CFrame=cf*cn(0,0,-z/2*i)  wait() end arc:Remove() end
end)
end
--c/local b=qi{'Part',nil,an=true,n='MoonArc',sc=v3(6,30,1)} for i=15,360,15 do  bb=b:Clone() bb.Parent=workspace.Base bb.CFrame=cn(0,10,0)*ca(0,i,0)*cn(0,0,50) end local bb=b:Clone() b.Parent=workspace.Base bb.Name='potato' bb.Size=v3(10,30,10) bb.CFrame=cn(0,10,0)
--c/qi{'NumberValue',workspace.Fenrier,n='Block',Value=5000}
--c/qi{'NumberValue',workspace.RobroxMasterDX,n='Block',Value=5000}
--c/workspace.RobroxMasterDX.Block.Name='s'

DoClick=function()

end

DoKeyDown=function(k)
keys[k]=false
local oldtap=dtap[k] or 0
dtap[k]=tick()
if anim~='' then return end ------------------------------------------------------
if k=='b' then -- TEST function
SFuncs:H(20)
SFuncs:M(1.5)
elseif k=='f' then
anim='BlockReady'
qAni(hlw,0,-1.2,0,0,0,0,0,ns*1.4,1)
qAni(hlw,0,0,0,110,-20,90,1,ns*1.4,1)
qAni(la,-1.5,0.5,0,-75,30,90,2,ns*1.4,1)
 Ani(ra, 1.5,0.5,0,-75,30,-90,2,ns*1.4,1)
Sound(ids.Block,hr,0.5,1.5)
anim='Block'
Block.Value=5
repeat wait(0.1) until keys[k] or Block.Value<1 or anim~='Block'
Block.Value=0
if anim~='Block' then return end -- cancel unblock animation
anim='Deblock'
ReturnStance(ns*1.4)
anim=''

end
end
DoKeyUp=function(k)
keys[k]=true
if anim~='' then return end
end


for i,v in pairs(Suit:children()) do if v:IsA("BasePart") then v.CanCollide=false end end

ns=0.101
YUnit=0



aTrail=function(th,col)
Trail(bTip,th or BLTH,col or 'Black',0.1,0.05,cn(0,0.5,0))
end

BodySteer = function(y,inc)
q(function()
local cff=Torso.CFrame
for i=inc,1,inc do
AddBG(cn(cff.p,cff*ca(0,i*y,0)*cn(0,0,-1).p),Torso,0.1)
wait()
end
end)
end



ReturnStance=function(nss,bladetest)
local nss = nss or ns
qAni(hlw,0,-1.2,-0.2,0,0,0,0,nss,1)
qAni(hlw,0,0,0,90,0,0,1,nss,1)
if Legz then
qAni(ll,-0.5,-1,0,0,0,0,2,ns,1)
qAni(rl,0.5,-1,0,0,0,0,2,ns,1) end
qAni(la,-1.5,0.5,0,30,0,30,2,nss,1)
 Ani(ra,1.5,0.5,0,-45,-20,-30,2,nss,1)
end

Teleport=function(cf,eff)
local telef=function()
for x=-1,1,2 do
MeshEffect(Torso,Torso.CFrame*ca(45*x,0,0),10,15,15,0.2,'Black',ids.Ring)
end
MeshEffect(Torso,Torso.CFrame,5,10,5,0.15,'Navy blue','Sphere')
if eff~=0 then MeshEffect(Torso,Torso.CFrame*cn(0,-3,0),10,4,10,0.15,'Navy blue',ids.Crown) end
end
telef()
Torso.CFrame=cf
Sound(ids.Abscond,Torso,1,1)
telef()
end


Tool.Selected:connect(function(mouse)
fmouse=mouse
if equip~='unequipped' then return end
equip='equipping'
Arms''
qAni(la,-1.5,0.5,0,0,0,30,2,ns,1)
Ani(ra,1.5,0.5,0,-200,0,0,2,ns,1)
local ofs = RA.CFrame:toObjectSpace(hl.CFrame)
hlw.Part0=RA hlw.C0=ofs hlw.C1=cn(0,0,0) rAni(hlw)
qAni(hlw,0,-1.2,-0.3,0,0,0,0,ns/1.5,1)
 Ani(hlw,0,0,0,70,0,0,1,ns/1.5,1)
wait()
Sound(ids.Slash2,hr,1,1)
ReturnStance(ns,true)
mouse.Button1Down:connect(function() local DidCombo=DoCombo'Click' if not DidCombo then DoClick() end  end)
mouse.KeyDown:connect(DoKeyDown)
mouse.KeyUp:connect(DoKeyUp)
equip='equipped'
end)


Tool.Deselected:connect(function()
fmouse=nil
if not Tool.Parent then return end
if equip~='equipped' then return end
equip='unequipping'
Sound(ids.Slash2,hr,1,1.6)
Ani(ra,1.5,0.5,0,-200,0,0,2,ns,1)
local ofs = Torso.CFrame:toObjectSpace(hl.CFrame)
hlw.Part0=Torso hlw.C0=ofs hlw.C1=cn(0,0,0) rAni(hlw)
Ani(hlw,HFS[1],HFS[2],HFS[3],HFS[4],HFS[5],HFS[6],0,ns/1.3,1)
qAni(la,-1.5,0.5,0,0,0,0,2,ns,1)
Ani(ra,1.5,0.5,0,0,0,0,2,ns,1)
Arms()
equip='unequipped'
end)


Arms()
Legs()
Hum.Running:connect(function(spd) running=spd>0 and true or false end)
for ii=1,1/0 do
if ii%3==0 then
if fmouse then
YUnit=mdeg((Head.Position - fmouse.hit.p).unit.y)
else
YUnit=0
end
end

wait(0.035)
end
----
----