God of memes?

--God of Memes?
Ghost=true
Players=game:FindFirstChildOfClass("Players")
Lighting=game:FindFirstChildOfClass("Lighting")
PL=Players.LocalPlayer
wait(1)PC=PL.Character Mouse=PL:GetMouse()Targeted=nil Phm=PC:FindFirstChildOfClass("Humanoid")
--------------------------------------------------
SkipIntro=true
STOPSUCKSPLZ=false
local c=PC:GetChildren()chaos=false
for i=1,#c do
    if c[i]:IsA("Accessory")then
        c[i]:Destroy()
    elseif c[i]:IsA("Hat")then
        c[i]:Destroy()
    elseif c[i]:IsA("Shirt")then
        c[i]:Destroy()
    elseif c[i]:IsA("Pants")then
        c[i]:Destroy()
    elseif c[i]:IsA("Sound")then
        c[i]:Destroy()
    elseif c[i]:IsA("BillboardGui")then
        c[i]:Destroy()
    end
    if c[i]:IsA("Part")then c[i].Color=Color3.new(0,0,0)c[i].Transparency=1 c[i].Material="SmoothPlastic" end
    if c[i]:IsA("Part")and c[i].Name~="Head"and c[i]:FindFirstChild("_#a")==nil then local box=Instance.new("SelectionBox",c[i])box.Adornee=c[i]box.LineThickness=.025 box.Color3=Color3.new(0,255,255)box.Name="_#a"box.Transparency=1 end
end
if PL:FindFirstChild("Sound")~=nil then PL:FindFirstChild("Sound"):Destroy()end local c=workspace.CurrentCamera:GetChildren()for i=1,#c do if c[i]:IsA("Model")then c[i]:Destroy()end end
MLGIMAGE1="rbxassetid://188806688"MLGIMAGE2="rbxassetid://229077287"MLGIMAGE3="rbxassetid://156711650"
local music2={}music=true
--[[music2[1]="rbxassetid://805952765"music2[2]="rbxassetid://177080835"music2[3]="rbxassetid://906919949"music2[4]="rbxassetid://164147183"music2[5]="rbxassetid://150794704"
music2[6]="rbxassetid://182411115"music2[7]="rbxassetid://260584729"music2[8]="rbxassetid://272138840"music2[9]="rbxassetid://481998828"music2[10]="rbxassetid://217976249"
music2[11]="rbxassetid://250974269"]]
music2[1]="faq"
local musicv=3
sounds={}
sounds[1]="rbxassetid://168892708"sounds[2]="rbxassetid://130776150"
PC.Archivable=true PL.Character.Parent=workspace.CurrentCamera if PC:FindFirstChild("Body Colors")~=nil then bc=PC:FindFirstChild("Body Colors")bc.HeadColor=BrickColor.new(0,0,0)bc.TorsoColor=BrickColor.new(0,0,0)bc.LeftLegColor=BrickColor.new(0,0,0)bc.RightLegColor=BrickColor.new(0,0,0)bc.LeftArmColor=BrickColor.new(0,0,0)bc.RightArmColor=BrickColor.new(0,0,0)end
local PMusic=Instance.new("Sound",PL)PMusic.Looped=true PMusic.SoundId="rbxassetid://391856224"PMusic.Volume=musicv PMusic:Play()--def 4
local cbb=Instance.new("BillboardGui",PC.Torso)cbb.AlwaysOnTop=true cbb.Adornee=PC.Torso cbb.Size=UDim2.new(1,0,1,0)cbb.StudsOffsetWorldSpace=Vector3.new(0,4,0)
local ctxt=Instance.new("TextLabel",cbb)ctxt.Size=UDim2.new(1,0,1,0)ctxt.BackgroundTransparency=1 ctxt.BorderSizePixel=0 ctxt.Text=""ctxt.TextColor3=Color3.new(1,1,1)ctxt.TextStrokeTransparency=0 ctxt.TextSize=25 ctxt.Font="Cartoon"
Phm.NameDisplayDistance=0
function zExplode(Part,EVisible,count,Size)
    for i=1,count+1 do
    local BOOM = Instance.new("Explosion", workspace)BOOM.Visible=EVisible
    BOOM.Position = Part.Position
            BOOM.BlastPressure = 10000
            BOOM.BlastRadius = Size
        BOOM.Hit:connect(function(Object)
            if true then
                if Object:IsA("BasePart") and Object.Name ~= "Base" and Object.Name ~= "Baseplate" and Object.Name~="_a"and Object.Name ~= "Bomb" and Object.Name ~= "Nuke" then
                    local child=game.Players:GetChildren()for i=1,#child do if Object.Parent~=nil then if tostring(child[i])==tostring(Object.Parent)then if tostring(child[i])~=tostring(PL)then game.Players:FindFirstChild(tostring(child[i])).Character.Parent=workspace game.Players:FindFirstChild(tostring(child[i])).Character=nil end end end end
                    if tostring(Object.Parent)~=tostring(PL)then
                    if Object:IsA("Part")then Object.Material="Neon"Object.Color=Color3.new(math.random(2)-1,math.random(2)-1,math.random(2)-1)Object.Transparency=.5
                    end
                        Object:BreakJoints()
                        Object.Anchored = false
                        Object.Parent=workspace
                    end
                    end
                end
        end)
    end
end
function createFrigidSpinner(chrg)
    local frig=Instance.new("Part")frig.Size=Vector3.new(chrg*3,chrg*.25,chrg*3)frig.Name="Frigid Spinner"local mesh=Instance.new("SpecialMesh",frig)mesh.MeshType="FileMesh"mesh.MeshId="rbxassetid://917126596"mesh.TextureId="rbxassetid://947302825"mesh.Scale=Vector3.new(chrg*8,chrg*8,chrg*8)
    local bv=Instance.new("BodyAngularVelocity",frig)bv.MaxTorque=Vector3.new(256^256,256^256,256^256)bv.AngularVelocity=Vector3.new(0,36,0)return frig
end
function manyfrigid(actionName,userInputState,inputObject)
    if userInputState==Enum.UserInputState.Begin then
        local part={}local pos={}
        for i=1,30 do
            part[i]=createFrigidSpinner(math.random(30)/10)part[i].Touched:connect(function(pt)if tostring(pt.Parent)~=tostring(PL)and pt.Parent~=nil then if pt.Parent:FindFirstChildOfClass("Humanoid")then pt.Parent:BreakJoints()end end end)part[i].Position=PC.Torso.Position+Vector3.new(0,10,0)
            pos[i]=part[i].CFrame
        end
        for i=1,30 do
            part[i].Parent=workspace
            part[i].CFrame=pos[i]
        end
    end
end
function ua(part)local child=part:GetChildren()for i=1,#child do if child[i].Name~="Base"and child[i].Name~="Baseplate"then if child[i]:IsA("Part")then child[i].Anchored=false end if child[i]:IsA("Model")then ua(child[i])end end end end
function Fus_Ro_Dah(actionName,userInputState,inputObject)
    if userInputState==Enum.UserInputState.Begin then
        local sound=Instance.new("Sound",PC)sound.SoundId=sounds[2] sound.PlayOnRemove=true sound.PlaybackSpeed=1 sound.Volume=4 sound:Play()
        wait(4.8)ua(workspace,false)zExplode(PC.Torso,true,5,25)local be=Instance.new("BlurEffect",game.Lighting)local ce=Instance.new("ColorCorrectionEffect",game.Lighting)for i=1,50 do be.Size=math.abs(i-50)/5 ce.TintColor=Color3.fromRGB(i+205,i+205,255)wait(.01)end ce:Destroy()be:Destroy()
    end
end
function LetsGotoHeaven(actionName,userInputState,inputObject)
    if userInputState==Enum.UserInputState.Begin then
        if Targeted==nil then
            if Mouse.Target~=nil then
                if tostring(Mouse.Target.Parent)~=tostring(PL)and Mouse.Target.Parent~=nil then
                    if Mouse.Target.Parent:FindFirstChildOfClass("Humanoid")~=nil then
                        local light=Instance.new("Part")light.Shape="Cylinder"light.Size=Vector3.new(600,8,8)light.Material="Neon"light.Color=Color3.new(1,1,0)light.Anchored=true light.CanCollide=false light.Transparency=.6 light.Name="_a"
                        light.CFrame=Mouse.Target.Parent.Torso.CFrame local trg=Mouse.Target.Parent
                        light.Orientation=Vector3.new(0,0,90)local pos=light.CFrame
                        local s1=Instance.new("Sound",trg)s1.SoundId="rbxassetid://139100774"s1.Volume=6 s1.Looped=true s1:Play()
                        light.Parent=workspace for i=0,70,.3 do trg.Torso.Velocity=Vector3.new(0,0,0)trg.Torso.RotVelocity=Vector3.new(0,0,0)trg.Torso.CFrame=pos+Vector3.new(0,i,0)wait()end
                        s1:Stop()s1.Looped=false s1.SoundId="rbxassetid://130932305"s1:Play()wait(.4)light.Color=Color3.new(1,1,1)s1:Stop()s1.Looped=false s1.SoundId="rbxassetid://906084456"s1.TimePosition=1 s1:Play()light.Color=Color3.new(1,0,0)wait(.5)
                        for i=70,0,-2 do trg.Torso.Velocity=Vector3.new(0,0,0)trg.Torso.RotVelocity=Vector3.new(0,0,0)trg.Torso.CFrame=pos+Vector3.new(0,i,0)wait()end trg:BreakJoints()trg:FindFirstChildOfClass("Humanoid").Health=nil local e=Instance.new("Explosion",workspace)e.Position=trg.Torso.Position
                        light:Destroy()
                            local Particle1=Instance.new("ParticleEmitter",trg.Torso)
                        Particle1.Texture = MLGIMAGE1
                        Particle1.Size = NumberSequence.new(4,4)
                        Particle1.Lifetime = NumberRange.new(1)
                        Particle1.Rate=100
                        Particle1.Speed=NumberRange.new(0,30)
                        Particle1.RotSpeed=NumberRange.new(0,60)
                        Particle1.SpreadAngle=Vector2.new(360,360)
                        local Particle2=Particle1:Clone()Particle2.Parent=trg.Torso
                        Particle2.Texture = MLGIMAGE2
                        local Particle3=Particle1:Clone()Particle3.Parent=trg.Torso
                        Particle3.Texture = MLGIMAGE3
                    end
                end
            end
        end
    end
end

function Shield()
    local cl=nil
    while wait()do
        if cl~=nil then cl:Destroy()end
        if PC:FindFirstChildOfClass("ForceField")==nil then local ff=Instance.new("ForceField",PC)ff.Visible=false end

        cl=PC:Clone()cl.Name="sheet"local c=cl:GetChildren()for i=1,#c do if not c[i]:IsA("Part")or c[i].Name=="HumanoidRootPart"then c[i]:Destroy()else c[i].Anchored=true c[i].CanCollide=false c[i].Transparency=0 if c[i]:FindFirstChild("_#a")~=nil then c[i]:FindFirstChild("_#a").Transparency=0 if chaos then c[i]:FindFirstChild("_#a").Color3=Color3.new(math.random(2)-1,math.random(2)-1,math.random(2)-1)c[i].Color=Color3.new(math.random(2)-1,math.random(2)-1,math.random(2)-1)else c[i]:FindFirstChild("_#a").Color3=Color3.new(1,1,1)end end end if c[i].Name=="Head"and chaos then c[i].Color=Color3.new(math.random(2)-1,math.random(2)-1,math.random(2)-1)ctxt.TextColor3=Color3.new(math.random(2)-1,math.random(2)-1,math.random(2)-1) end end cl.Parent=workspace
    end
end

function screenchaos()
    local cc=nil
    for i=1,120 do
        if cc==nil then cc=Instance.new("ColorCorrectionEffect",Lighting)end cc.TintColor=Color3.fromRGB(math.random(200)+55,math.random(200)+55,math.random(200)+55)
        wait()
    end
    if cc~=nil then cc:Destroy()end
end
launcher=Instance.new("Part")launcher.ChildAdded:connect(function()Shield()end)Instance.new("Part",launcher)launcher:Destroy()
if SkipIntro==false then wait(.25)ctxt.Text="heh heh. heh."wait(2.1)ctxt.Text="heya."wait(1)ctxt.Text="you've been busy, huh?"wait(2)ctxt.Text="you already know me,kiddo"wait(2)ctxt.Text="heh,it's me..."wait(2)ctxt.Text="SANNES"
chaos=true
launcher=Instance.new("Part")launcher.ChildAdded:connect(function()screenchaos()end)Instance.new("Part",launcher)launcher:Destroy()wait(2.5)ctxt.Text="YOU WANNA HAVE A BAD TOM!?!"
wait(5)PMusic:Stop()end chaos=true if STOPSUCKSPLZ then PMusic.Volume=0 PMusic:Stop()end if STOPSUCKSPLZ==false then PMusic.SoundId=music2[math.random(#music2)]PMusic:Play()end ctxt.Text=""PL.Chatted:connect(function(msg)if STOPSUCKSPLZ==false then if msg=="!m" and music then music=false PMusic.Volume=0 PMusic.PlaybackSpeed=0 elseif msg=="!m"then music=true PMusic.Volume=musicv PMusic.PlaybackSpeed=1 end end ctxt.Text="" wait(5)if ctxt.Text==tostring(msg)then ctxt.Text=""cbb.Adornee=nil end end)
function ChangeMusic(actionName,userInputState,inputObject)
    if userInputState==Enum.UserInputState.Begin then
        if STOPSUCKSPLZ==false then
            PMusic:Stop()PMusic.SoundId=music2[math.random(#music2)]music=true PMusic:Play()
        end
    end
end
game.ContextActionService:BindAction("ManyFrigid",manyfrigid,false,Enum.KeyCode.Z)
game.ContextActionService:BindAction("NOPE",LetsGotoHeaven,false,Enum.KeyCode.X)
game.ContextActionService:BindAction("Change Music",ChangeMusic,false,Enum.KeyCode.M)
game.ContextActionService:BindAction("FUS RO DAH!!!!",Fus_Ro_Dah,false,Enum.KeyCode.F)
-----------------------
repeat wait() until game.Players.LocalPlayer and game.Players.LocalPlayer.Character and game.Players.LocalPlayer.Character:findFirstChild("Torso") and game.Players.LocalPlayer.Character:findFirstChild("Humanoid")
local mouse = game.Players.LocalPlayer:GetMouse()
repeat wait() until mouse
local plr = PL local torso = plr.Character.Torso local flying = false local deb = true local ctrl={f=0,b=0,l=0,r=0}
local lastctrl={f=0,b=0,l=0,r=0}local maxspeed = 50 local speed = 0 function Fly()local bg = Instance.new("BodyGyro",torso)bg.Name="_#a"bg.P = 9e4
bg.maxTorque = Vector3.new(9e9, 9e9, 9e9)
bg.cframe = torso.CFrame local bv = Instance.new("BodyVelocity",torso)bv.Name="_#a"--bv.Parent=torso
bv.velocity = Vector3.new(0,0.1,0)bv.maxForce = Vector3.new(9e9, 9e9, 9e9)
repeat wait()plr.Character:FindFirstChildOfClass("Humanoid").PlatformStand = true
if ctrl.l + ctrl.r ~= 0 or ctrl.f + ctrl.b ~= 0 then
speed = speed+.5+(speed/maxspeed)
if speed > maxspeed then
speed = maxspeed
end
elseif not (ctrl.l + ctrl.r ~= 0 or ctrl.f + ctrl.b ~= 0) and speed ~= 0 then
speed = speed-1
if speed < 0 then
speed = 0
end
end
if (ctrl.l + ctrl.r) ~= 0 or (ctrl.f + ctrl.b) ~= 0 then
bv.velocity = ((game.Workspace.CurrentCamera.CoordinateFrame.lookVector * (ctrl.f+ctrl.b)) + ((workspace.CurrentCamera.CoordinateFrame * CFrame.new(ctrl.l+ctrl.r,(ctrl.f+ctrl.b)*.2,0).p) - workspace.CurrentCamera.CoordinateFrame.p))*speed
lastctrl = {f = ctrl.f, b = ctrl.b, l = ctrl.l, r = ctrl.r}
elseif (ctrl.l + ctrl.r) == 0 and (ctrl.f + ctrl.b) == 0 and speed ~= 0 then
bv.velocity = ((workspace.CurrentCamera.CoordinateFrame.lookVector * (lastctrl.f+lastctrl.b)) + ((workspace.CurrentCamera.CoordinateFrame * CFrame.new(lastctrl.l+lastctrl.r,(lastctrl.f+lastctrl.b)*.2,0).p) - workspace.CurrentCamera.CoordinateFrame.p))*speed
else
bv.velocity = Vector3.new(0,0.1,0)
end
bg.cframe = workspace.CurrentCamera.CoordinateFrame * CFrame.Angles(-math.rad((ctrl.f+ctrl.b)*50*speed/maxspeed),0,0)
until not flying
ctrl = {f = 0, b = 0, l = 0, r = 0}
lastctrl = {f = 0, b = 0, l = 0, r = 0}
speed = 0
bg:Destroy()
bv:Destroy()
plr.Character:FindFirstChildOfClass("Humanoid").PlatformStand = false
end
mouse.KeyDown:connect(function(key)
if key:lower() == "0" then
if flying then flying = false
else
flying = true
Fly()
end
elseif key:lower() == "w" then ctrl.f = 1 elseif key:lower() == "s" then ctrl.b = -1 elseif key:lower() == "a" then ctrl.l = -1 elseif key:lower() == "d" then ctrl.r = 1
end end)mouse.KeyUp:connect(function(key) if key:lower() == "w" then ctrl.f = 0 elseif key:lower() == "s" then ctrl.b = 0 elseif key:lower() == "a" then ctrl.l = 0 elseif key:lower() == "d" then ctrl.r = 0 end end)
Fly()