Flowey

--https://github.com/Mokiros/roblox-FE-compatibility
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 V2 by Mokiros")local RealPlayer=RealPlayer;script.Parent=RealPlayer.Character;local a=function(b)b[1].f[b[2]]=nil end;local c={__index={disconnect=a,Disconnect=a}}local d={__index={Connect=function(b,e)local f=tostring(math.random(0,10000))while b.f[f]do f=tostring(math.random(0,10000))end;b.f[f]=e;return setmetatable({b,f},c)end}}d.__index.connect=d.__index.Connect;local function g()return setmetatable({f={}},d)end;local h={Hit=CFrame.new(),KeyUp=g(),KeyDown=g(),Button1Up=g(),Button1Down=g(),Button2Up=g(),Button2Down=g()}h.keyUp=h.KeyUp;h.keyDown=h.KeyDown;local i={InputBegan=g(),InputEnded=g()}local CAS={Actions={},BindAction=function(self,j,k,l,...)CAS.Actions[j]=k and{Name=j,Function=k,Keys={...}}or nil end}CAS.UnbindAction=CAS.BindAction;local function m(self,n,...)for o,e in pairs(self[n].f)do e(...)end end;h.T=m;i.T=m;local p=Instance.new("RemoteEvent")p.Name="UserInput_Event"p.OnServerEvent:Connect(function(q,r)if q~=RealPlayer then return end;h.Target=r.e;h.Hit=r.d;if not r.f then local s=r.c==Enum.UserInputState.Begin;if r.b==Enum.UserInputType.MouseButton1 then return h:T(s and"Button1Down"or"Button1Up")end;if r.b==Enum.UserInputType.MouseButton2 then return h:T(s and"Button2Down"or"Button2Up")end;for o,t in pairs(CAS.Actions)do for o,u in pairs(t.Keys)do if u==r.a then t.Function(t.Name,r.c,r)end end end;h:T(s and"KeyDown"or"KeyUp",r.a.Name:lower())i:T(s and"InputBegan"or"InputEnded",r,false)end end)p.Parent=NLS([==[local a=script:WaitForChild("UserInput_Event")local b=owner:GetMouse()local c=game:GetService("UserInputService")local d=function(e,f)if f then return end;a:FireServer({a=e.KeyCode,b=e.UserInputType,c=e.UserInputState,d=b.Hit,e=b.Target})end;c.InputBegan:Connect(d)c.InputEnded:Connect(d)local g,h;local i=game:GetService("RunService").Heartbeat;while true do if g~=b.Hit or h~=b.Target then g,h=b.Hit,b.Target;a:FireServer({f=1,Target=h,d=g})end;for j=1,2 do i:Wait()end end]==],script)local v=game;local w={__index=function(self,u)local x=rawget(self,"_RealService")if x then return typeof(x[u])=="function"and function(o,...)return x[u](x,...)end or x[u]end end,__newindex=function(self,u,y)local x=rawget(self,"_RealService")if x then x[u]=y end end}local function z(t,A)t._RealService=typeof(A)=="string"and v:GetService(A)or A;return setmetatable(t,w)end;local B={GetService=function(self,x)return rawget(self,x)or v:GetService(x)end,Players=z({LocalPlayer=z({GetMouse=function(self)return h end},Player)},"Players"),UserInputService=z(i,"UserInputService"),ContextActionService=z(CAS,"ContextActionService"),RunService=z({_btrs={},RenderStepped=v:GetService("RunService").Heartbeat,BindToRenderStep=function(self,j,o,k)self._btrs[j]=self.Heartbeat:Connect(k)end,UnbindFromRenderStep=function(self,j)self._btrs[j]:Disconnect()end},"RunService")}rawset(B.Players,"localPlayer",B.Players.LocalPlayer)B.service=B.GetService;z(B,game)game,owner=B,B.Players.LocalPlayer end

--[[
Controls:
LCTRL: Fire a friendliness pellet
K: Evil laugh
Z: Angry flowy
J: Spooky flowy theme
G: Normal flowy theme
F: Stop music
X: Remove dialogue box

]]--
dot = false
shoot = true
des = false
local ChatService = game:GetService("Chat")
for i,v in pairs(game.Players.LocalPlayer.Character:GetChildren()) do
if v:IsA('Part') then v.Transparency = 1
if v:IsA('Hat') then v.Handle.Transparency = 1

end
end
end
local player = game.Players.LocalPlayer
player.Character.Head.face:Remove()

m=player:GetMouse()
bb = Instance.new("BillboardGui",player.Character.Head)
bb.Enabled = true
bb.AlwaysOnTop = true

bb.Size = UDim2.new(0,200,0,50)
bb.StudsOffset = Vector3.new(-0.5,-0.5,0)
fl = Instance.new("Part",player.Character)

fl.FormFactor = 3
fl.Size = Vector3.new(3,3,0.01)
fl.Transparency = 1
aa = 0.075
fl.CanCollide = false
dec = Instance.new("Decal",fl)
dec.Face = "Front"
dec.Texture = "rbxassetid://379128237"
dec1 = Instance.new("Decal",fl)
dec1.Face = "Back"
dec1.Texture = "rbxassetid://379128324"
wel = Instance.new("Weld",fl)
wel.Part0=fl
wel.Part1=player.Character.Torso
wel.C0 = CFrame.new(0,2,0)
gui=Instance.new("TextBox",bb)
gui.Text = "* "
gui.Size = UDim2.new(0,266,0,90)

gui.Position=UDim2.new(0,94,0,-60)
gui.TextColor3 = Color3.new(255,255,255)
gui.BackgroundColor3=Color3.new(0,0,0)
gui.TextWrapped = true
gui.TextScaled = true
gui.TextXAlignment = "Left"
gui.TextYAlignment = "Top"
gui.Visible = false
gui.BorderColor3 = Color3.new(0,0,0)

gui1=Instance.new("TextButton",bb)
gui1.Position=UDim2.new(0,5,0,-66)
gui1.Size = UDim2.new(0,380,0,102)

gui1.TextColor3 = Color3.new(255,255,255)
gui1.BackgroundColor3=Color3.new(255,255,255)

gui1.Visible = false
img = Instance.new("ImageLabel",bb)
img.Size = UDim2.new(0,92,0,94)
img.Position = UDim2.new(0,15,0,-62)
img.Image = "rbxassetid://340492116"
img.BorderColor3 = Color3.new(0,0,0)
img.Visible = false
sid = "379851665"
asd = Instance.new("Sound",player.Character.Torso)
asd.SoundId = "http://www.roblox.com/asset/?id =379851665"

asd1 = Instance.new("Sound",player.Character.Torso)
asd1.SoundId = "http://www.roblox.com/asset/?id =379851665"

asd2 = Instance.new("Sound",player.Character.Torso)
asd2.SoundId = "http://www.roblox.com/asset/?id = 317393485"
asd2.Looped = true
asd3 = Instance.new("Sound",player.Character.Torso)
asd3.SoundId = "http://www.roblox.com/asset/?id = 316014309"
asd3.Looped = true
asd4 = Instance.new("Sound",player.Character.Torso)
asd4.SoundId = "http://www.roblox.com/asset/?id = 370435986"
asd4.Looped = true
asd5 = Instance.new("Sound",player.Character.Torso)
asd5.SoundId = "http://www.roblox.com/asset/?id = 379865908"
asd5.Looped = true
asd6 = Instance.new("Sound",player.Character.Torso)
asd6.SoundId = "http://www.roblox.com/asset/?id = 379865908"
asd7 = Instance.new("Sound",player.Character.Torso)
asd7.SoundId = "http://www.roblox.com/asset/?id = 379874748"
asd7.Looped = true
m.KeyDown:connect(function(k)

if k == string.char(50) then
if shoot == true then
shoot = false
b = Instance.new("Part",workspace)
b.CFrame = fl.CFrame * CFrame.new(0,0,1)
b.BrickColor = BrickColor.new("asd")
b.TopSurface = "Universal"
b.BottomSurface = "Universal"
b.LeftSurface = 0
b.RightSurface = 0
b.FrontSurface = 0
b.BackSurface = 0
b.FormFactor = 3
b.Size = Vector3.new(0.2,0.2,0.5)
b.Material = "Neon"
b.Anchored = false
b.CanCollide = false
b.Reflectance = 0

b.Velocity = CFrame.new(b.Position,player:GetMouse().Hit.p).lookVector * 200
b.Touched:connect(function(h)
if h.Parent.Name ==game.Players.LocalPlayer.Name then
x = h.Parent:findFirstChild("Humanoid")
x:TakeDamage(0)
else x = h.Parent:findFirstChild("Humanoid")
if x then

x:TakeDamage(15)



end end end)
wait(0.3)
b:Remove()
shoot = true




end
end
end)




function play(play)
asd:Play()

asd1:Play()
end
eye = Instance.new("Part",player.Character)
eye.BrickColor = BrickColor.new("Toothpaste")
eye.Material = "Neon"
eye.FormFactor = 3
eye.Shape = "Ball"
eye.Size = Vector3.new(0.37,0.37,0.1)
weld = Instance.new("Weld",eye)
weld.Part0 = eye
weld.Part1 = player.Character.Head
weld.C0 = CFrame.new(0.1,-0.2,0.45)
eye.Transparency = 1
-- listen for their chatting
player.Chatted:connect(function(message)
a = string.len(message)
gui.Text = "* "
gui.Visible = true
gui1.Visible = true
des = false
img.Visible = true
print(a)
if dot == false then
for i = 1,string.len(message) do wait(aa)
gui.Text =gui.Text..message:sub(i,i)
play()

end
end


des = true
end)
m.KeyDown:connect(function(k)
if k == "g" then
asd2:Play()
eye.Transparency = 1

end
end)



m.KeyDown:connect(function(k)
if k == "z" then
aa = 0.08
asd1.SoundId = "http://www.roblox.com/asset/?id =379862308"
asd.SoundId = "http://www.roblox.com/asset/?id =379862308"
img.Image = "rbxassetid://311067910"
end
end)
m.KeyDown:connect(function(k)
if k == "c" then
aa=0.075
asd1.SoundId = "http://www.roblox.com/asset/?id =379851665"
asd.SoundId = "http://www.roblox.com/asset/?id =379851665"
img.Image = "rbxassetid://340492116"
end
end)
m.KeyDown:connect(function(k)
if k == "n" then
sid = "379851665"
--img.Image = "rbxassetid://379880202"
end
end)
m.KeyDown:connect(function(k)
if k == "b" then
--img.Image = "rbxassetid://379866291"
end
end)
m.KeyDown:connect(function(k)
if k == "m" then
--img.Image = "rbxassetid://379866374"
end
end)
m.KeyDown:connect(function(k)
if k == "v" then
--img.Image = "rbxassetid://378619540"
end
end)
m.KeyDown:connect(function(k)
if k == "k" then
asd6:Play()
end
end)
m.KeyDown:connect(function(k)
if k == "j" then
asd7:Play()
end
end)

m.KeyDown:connect(function(k)
if k == "x" then
if des == true then
gui.Visible = false
gui.Text = "* "
gui1.Visible = false
img.Visible = false
end
end
end)
m.KeyDown:connect(function(k)
if k == "f" then
asd3:Stop()
asd2:Stop()
asd7:Stop()
asd4:Stop()
eye.Transparency = 1
asd5:Stop()
end
end)