Flamingo

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 Mokiros")
	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(),Button2Up=fakeEvent(),Button2Down=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
			if io.UserInputType == Enum.UserInputType.MouseButton2 then
				return m:TrigEvent(b and "Button2Down" or "Button2Up")
			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 typeof(s[k])=="function"
				and function(_,...)return s[k](s,...)end or s[k]
			end
		end,
		__newindex = function(self,k,v)
			local s = rawget(self,"_RealService")
			if s then s[k]=v 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 rawget(self,s) or _rg:GetService(s)
		end,
		Players = FakeService({
			LocalPlayer = FakeService({GetMouse=function(self)return m end},Player)
		},"Players"),
		UserInputService = FakeService(UIS,"UserInputService"),
		ContextActionService = FakeService(CAS,"ContextActionService"),
		RunService = FakeService({
			_btrs = {},
			RenderStepped = _rg:GetService("RunService").Heartbeat,
			BindToRenderStep = function(self,name,_,fun)
				self._btrs[name] = self.Heartbeat:Connect(fun)
			end,
			UnbindFromRenderStep = function(self,name)
				self._btrs[name]:Disconnect()
			end,
		},"RunService")
	}
	rawset(g.Players,"localPlayer",g.Players.LocalPlayer)
	g.service = g.GetService
	FakeService(g,game)
	--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://1575860312' TEHSONG.Volume=10 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