-- This script has convert to FE by who i don't know?

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

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

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

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

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

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

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

    local h,t
    --Give the server mouse data 30 times every second, but only if the values changed
    --If player is not moving their mouse, client won't fire events
    while wait(1/30) do
        if h~=Mouse.Hit or t~=Mouse.Target then
            h,t=Mouse.Hit,Mouse.Target
            Event:FireServer({isMouse=true,Target=t,Hit=h})
        end
    end]==],Player.Character)

    ----Sandboxed game object that allows the usage of client-side methods and services
    --Real game object
    local _rg = game

    --Metatable for fake service
    local fsmt = {
        __index = function(self,k)
            local s = rawget(self,"_RealService")
            if s then return s[k] end
        end,
        __newindex = function(self,k,v)
            local s = rawget(self,"_RealService")
            if s then s[k]=v end
        end,
        __call = function(self,...)
            local s = rawget(self,"_RealService")
            if s then return s(...) end
        end
    }
    local function FakeService(t,RealService)
        t._RealService = typeof(RealService)=="string" and _rg:GetService(RealService) or RealService
        return setmetatable(t,fsmt)
    end

    --Fake game object
    local g = {
        GetService = function(self,s)
            return self[s]
        end,
        Players = FakeService({
            LocalPlayer = FakeService({GetMouse=function(self)return m end},Player)
        },"Players"),
        UserInputService = FakeService(UIS,"UserInputService"),
        ContextActionService = FakeService(CAS,"ContextActionService"),
    }
    rawset(g.Players,"localPlayer",g.Players.LocalPlayer)
    g.service = g.GetService

    g.RunService = FakeService({
        RenderStepped = _rg:GetService("RunService").Heartbeat,
        BindToRenderStep = function(self,name,_,fun)

        end,
        UnbindFromRenderStep = function(self,name)
            self._btrs[name]:Disconnect()
        end,
    },"RunService")

    setmetatable(g,{
        __index=function(self,s)
            return _rg:GetService(s) or typeof(_rg[s])=="function"
            and function(_,...)return _rg[s](_rg,...)end or _rg[s]
        end,
        __newindex = fsmt.__newindex,
        __call = fsmt.__call
    })
    --Changing owner to fake player object to support owner:GetMouse()
    game,owner = g,g.Players.LocalPlayer
end
--{{{    slenercat5's    }}}---
--{      Beat drop script      }--
Player=game.Players.LocalPlayer
Character=Player.Character
Head=Character:waitForChild('Head')
Torso=Character:waitForChild('Torso')
RootPart=Character:waitForChild('HumanoidRootPart')
Character.Health:remove()
Character.Humanoid.MaxHealth=0
Humanoid=Character.Humanoid
Humanoid.Name='F'..math.random(0,1).. math.random(0,1) .. 'F' .. math.random(0,1)
ff=Instance.new('ForceField',Character)ff.Visible=false
function rpg()-- remove player gravity
Character.Animate.Parent=nil
for _,v in pairs (Torso:GetChildren()) do
if v:IsA('Motor6D') then
	v:remove()
end
end

local svch = Character
	local hum = Character:findFirstChild("Humanoid")
	Character.Archivable = true
	local chrclone = Character:clone()
	Character.Archivable = false

	local ch = chrclone:GetChildren()
	local i
	for i = 1,#ch do
		if ch[i].Name == "THandle1" or ch[i].Name == "THandle2" or ch[i].ClassName == "Script" then
			ch[i]:remove()
		end
	end
	local function Scan(ch)
		local e
		for e = 1,#ch do
			Scan(ch[e]:GetChildren())
			if ch[e].ClassName == "Weld" or ch[e].ClassName == "Motor6D" then
				ch[e]:remove()
			end
		end
	end
	Scan(chrclone:GetChildren())

	local hum2 = chrclone:findFirstChild("Humanoid")


	if hum2 ~= nil then
		hum2.Name = "Humanoid2"
		hum2.PlatformStand = true
		hum2.Sit = true
		hum2.MaxHealth = 0
		hum2.Health = 0
	end

	local ch = Character:GetChildren()
	local i
	for i = 1,#ch do
		if ch[i].Name == "THandle1" or ch[i].Name == "THandle2" then
			ch[i]:remove()
		end
	end



	local ch = Character:GetChildren()
	local i
	local Torso = Character.Torso
	local movevector = Vector3.new()

		local Head = Character:FindFirstChild("Head")
		if Head then
			local Neck = Instance.new("Weld")
			Neck.Name = "Neck"
			Neck.Part0 = Torso
			Neck.Part1 = Head
			Neck.C0 = CFrame.new(0, 1.5, 0)
			Neck.C1 = CFrame.new()
			Neck.Parent = Torso
		end
		local Limb = Character:FindFirstChild("Right Arm")
		if Limb then

			Limb.CFrame = Torso.CFrame * CFrame.new(1.5, 0, 0)
			local Joint = Instance.new("Glue")
			Joint.Name = "RightShoulder"
			Joint.Part0 = Torso
			Joint.Part1 = Limb
			Joint.C0 = CFrame.new(1.5, 0.5, 0, 0, 0, 1, 0, 1, 0, -1, -0, -0)
			Joint.C1 = CFrame.new(-0, 0.5, 0, 0, 0, 1, 0, 1, 0, -1, -0, -0)
			Joint.Parent = Torso

			local B = Instance.new("Part")
			B.TopSurface = 0
			B.BottomSurface = 0
			B.formFactor = "Symmetric"
			B.Size = Vector3.new(1, 1, 1)
			B.Transparency = 1
			B.CFrame = Limb.CFrame * CFrame.new(0, -0.5, 0)
			B.Parent = Character
			local W = Instance.new("Weld")
			W.Part0 = Limb
			W.Part1 = B
			W.C0 = CFrame.new(0, -0.5, 0)
			W.Parent = Limb

		end
		local Limb = Character:FindFirstChild("Left Arm")
		if Limb then

			Limb.CFrame = Torso.CFrame * CFrame.new(-1.5, 0, 0)
			local Joint = Instance.new("Glue")
			Joint.Name = "LeftShoulder"
			Joint.Part0 = Torso
			Joint.Part1 = Limb
			Joint.C0 = CFrame.new(-1.5, 0.5, 0, -0, -0, -1, 0, 1, 0, 1, 0, 0)
			Joint.C1 = CFrame.new(0, 0.5, 0, -0, -0, -1, 0, 1, 0, 1, 0, 0)
			Joint.Parent = Torso

			local B = Instance.new("Part")
			B.TopSurface = 0
			B.BottomSurface = 0
			B.formFactor = "Symmetric"
			B.Size = Vector3.new(1, 1, 1)
			B.Transparency = 1
			B.CFrame = Limb.CFrame * CFrame.new(0, -0.5, 0)
			B.Parent = Character
			local W = Instance.new("Weld")
			W.Part0 = Limb
			W.Part1 = B
			W.C0 = CFrame.new(0, -0.5, 0)
			W.Parent = Limb

		end
		local Limb = Character:FindFirstChild("Right Leg")
		if Limb then

			Limb.CFrame = Torso.CFrame * CFrame.new(0.5, -2, 0)
			local Joint = Instance.new("Glue")
			Joint.Name = "RightHip"
			Joint.Part0 = Torso
			Joint.Part1 = Limb
			Joint.C0 = CFrame.new(0.5, -1, 0, 0, 0, 1, 0, 1, 0, -1, -0, -0)
			Joint.C1 = CFrame.new(0, 1, 0, 0, 0, 1, 0, 1, 0, -1, -0, -0)
			Joint.Parent = Torso

			local B = Instance.new("Part")
			B.TopSurface = 0
			B.BottomSurface = 0
			B.formFactor = "Symmetric"
			B.Size = Vector3.new(1, 1, 1)
			B.Transparency = 1
			B.CFrame = Limb.CFrame * CFrame.new(0, -0.5, 0)
			B.Parent = Character
			local W = Instance.new("Weld")
			W.Part0 = Limb
			W.Part1 = B
			W.C0 = CFrame.new(0, -0.5, 0)
			W.Parent = Limb

		end
Humanoid.WalkSpeed=250 -- flight speed

		local Limb = Character:FindFirstChild("Left Leg")
		if Limb then

			Limb.CFrame = Torso.CFrame * CFrame.new(-0.5, -2, 0)
			local Joint = Instance.new("Glue")
			Joint.Name = "LeftHip"
			Joint.Part0 = Torso
			Joint.Part1 = Limb
			Joint.C0 = CFrame.new(-0.5, -1, 0, -0, -0, -1, 0, 1, 0, 1, 0, 0)
			Joint.C1 = CFrame.new(-0, 1, 0, -0, -0, -1, 0, 1, 0, 1, 0, 0)
			Joint.Parent = Torso

			local B = Instance.new("Part")
			B.TopSurface = 0
			B.BottomSurface = 0
			B.formFactor = "Symmetric"
			B.Size = Vector3.new(1, 1, 1)
			B.Transparency = 1
			B.CFrame = Limb.CFrame * CFrame.new(0, -0.5, 0)
			B.Parent = Character
			local W = Instance.new("Weld")
			W.Part0 = Limb
			W.Part1 = B
			W.C0 = CFrame.new(0, -0.5, 0)
			W.Parent = Limb

		end
		--[
		local Bar = Instance.new("Part")
		Bar.TopSurface = 0
		Bar.BottomSurface = 0
		Bar.formFactor = "Symmetric"
		Bar.Size = Vector3.new(1, 1, 1)
		Bar.Transparency = 1
		Bar.CFrame = Torso.CFrame * CFrame.new(0, 0.5, 0)
		Bar.Parent = Character
		local Weld = Instance.new("Weld")
		Weld.Part0 = Torso
		Weld.Part1 = Bar
		Weld.C0 = CFrame.new(0, 0.5, 0)
		Weld.Parent = Torso
		--]]-- ripped that from a random script. Ball sockt joints were not working ^^^
		Humanoid.AutoRotate=false-- so you cant spazz out bruh
		RootPart.RootJoint:remove()

		B=Instance.new('BallSocketConstraint',Torso)
		At1=Instance.new('Attachment',Torso)
		At2=Instance.new('Attachment',RootPart)
		B.Attachment1=At1
		B.Attachment0=At2
		for _,v in pairs(Character:GetChildren()) do
			if v.Name=='Part' then
				local keypoints = {}

for i = 0,1,0.1 do
	local color = Color3.fromHSV(i,1,1)
	local keypoint = ColorSequenceKeypoint.new(i,color)
	table.insert(keypoints,keypoint)
end
At1=Instance.new('Attachment',v)
At1.CFrame=CFrame.new(0,0,0)
At2=Instance.new('Attachment',v)
At2.CFrame=CFrame.new(0,-1,0)
local particle = Instance.new("Trail",v)
particle.Color = ColorSequence.new(keypoints)
table.insert(attaches,particle)
particle.Lifetime=1
particle.Attachment0=At1
particle.Attachment1=At2
particle.Texture='http://www.roblox.com/asset/?id=967852042'
			end
if v:IsA('Part') then
g=Instance.new('BodyForce',v)
g.force = Vector3.new(0, game.Workspace.Gravity, 0)*Vector3.new(0,v:GetMass(),0)
elseif v:IsA('Accessory') and v:findFirstChild('Handle')~=nil  then
g=Instance.new('BodyForce',v.Handle)
g.force = Vector3.new(0, game.Workspace.Gravity, 0)*Vector3.new(0,v.Handle:GetMass(),0)
end
end
end
attaches={

}
	Character.Parent = workspace

	--game.Debris:AddItem(Character, 12)

	--[[if movevector ~= Vector3.new() then
		for i = 1,10 do
			wait()
			Torso.Velocity = movevector * 30
		end
	end]]--

	e,q=false
Ms=Player:GetMouse()
Ms.KeyDown:connect(function(k)
	if floating then
		if k=='f' then
		for _,v in pairs(attaches) do
			if v.Enabled==true then
			v.Enabled=false
			else v.Enabled=true
			end
		end
		end
	if k=='q' then
		q=true
		while q do
			wait()
		RootPart.Velocity=Vector3.new(0,-100,0)
		end
	elseif k=='e' then
		e=true
		while e do
			wait()
		RootPart.Velocity=Vector3.new(0,100,0)
		end
	end
	end
end)
warn"-{    slenercat5's   }-"
warn'-{{{flamingo script}}}-'
warn'-{{  E is to raise  }}-'
warn'-{{  Q is to lower  }}-'
warn'{F is to toggle trails}'
Ms.KeyUp:connect(function(k)
	print(k)
	if k=='q' then
		q=false

	elseif k=='e' then
		e=false
	end
end)
local keypoints = {}

light={

}

TEHSONG=Instance.new('Sound',Torso) TEHSONG.SoundId='rbxassetid://1260234844' TEHSONG.Volume=2 TEHSONG.PlaybackSpeed=1
TEHSONG:Play()
Light=Instance.new('SurfaceLight',Torso)
Light.Face='Top'
Light2=Instance.new('SurfaceLight',Torso)
Light2.Face='Front'
Light3=Instance.new('SurfaceLight',Torso)
Light3.Face='Back'
Light4=Instance.new('SurfaceLight',Torso)
Light4.Face='Right'
Light5=Instance.new('SurfaceLight',Torso)
Light5.Face='Left'
table.insert(light,Light)
table.insert(light,Light2)
table.insert(light,Light3)
table.insert(light,Light4)
table.insert(light,Light5)

--Converted with ttyyuu12345's model to script plugin v4
function sandbox(var,func)
	local env = getfenv(func)
	local newenv = setmetatable({},{
		__index = function(self,k)
			if k=="script" then
				return var
			else
				return env[k]
			end
		end,
	})
	setfenv(func,newenv)
	return func
end


floating=false
while 1 do
	for _,v in pairs(attaches) do
	v.LightEmission=TEHSONG.PlaybackLoudness/150
	end
	Humanoid.Name='F'..math.random(0,1).. math.random(0,1) .. 'F' .. math.random(0,1)
	if not floating then
		for _,v in pairs(light) do
	v.Color=Color3.new(1,1,1)
	end

	else
		for _,v in pairs(light) do
		v.Range=TEHSONG.PlaybackLoudness
		v.Color=Color3.new(math.random(0,1),math.random(0,1),math.random(0,1))
		end
	end
	if floating then
	workspace.CurrentCamera.FieldOfView=80+TEHSONG.PlaybackLoudness/150
		end
	if TEHSONG.TimePosition>11 then-- beat drop
		if not floating then
			rpg()
			floating=true
			print(floating)
		end
	end
	wait()
end