CRinated

if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
local Player,Mouse,mouse,UserInputService,ContextActionService = owner
do
	print("FE Compatibility code by Mokiros")
	script.Parent = Player.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,Connect=function(self,f)self.Function=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 and t.Function then
			t.Function(...)
		end
	end
	m.TrigEvent = te
	UIS.TrigEvent = te

	Event.OnServerEvent:Connect(function(plr,io)
	    if plr~=Player then return end
		if io.isMouse then
			m.Target = io.Target
			m.Hit = io.Hit
		else
			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 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})
	end
	UIS.InputBegan:Connect(input)
	UIS.InputEnded:Connect(input)

	local Mouse = Player:GetMouse()
	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)
	Mouse,mouse,UserInputService,ContextActionService = m,m,UIS,CAS
end

	local ArtificialHB = Instance.new("BindableEvent", script)
ArtificialHB.Name = "Heartbeat"

script:WaitForChild("Heartbeat")

local tf = 0
local allowframeloss = false
local tossremainder = false
local lastframe = tick()
local frame = 1/60
ArtificialHB:Fire()

game:GetService("RunService").Heartbeat:connect(function(s, p)
	tf = tf + s
	if tf >= frame then
		if allowframeloss then
			script.Heartbeat:Fire()
			lastframe = tick()
		else
			for i = 1, math.floor(tf / frame) do
				ArtificialHB:Fire()
			end
			lastframe = tick()
		end
		if tossremainder then
			tf = 0
		else
			tf = tf - frame * math.floor(tf / frame)
		end
	end
end)

function swait(num)
	if num == 0 or num == nil then
		ArtificialHB.Event:wait()
	else
		for i = 0, num do
			ArtificialHB.Event:wait()
		end
	end
end


local r = 255
local g = 0
local b = 0
coroutine.resume(coroutine.create(function()
while wait() do
	for i = 0, 254/5 do
		swait()
		g = g + 5
	end
	for i = 0, 254/5 do
		swait()
		r = r - 5
	end
	for i = 0, 254/5 do
		swait()
		b = b + 5
	end
	for i = 0, 254/5 do
		swait()
		g = g - 5
	end
	for i = 0, 254/5 do
		swait()
		r = r + 5
	end
	for i = 0, 254/5 do
		swait()
		b = b - 5
	end
end
end))
local loudnesses={}
	script.Parent = owner.Character
	local CoAS = {Actions={}}
	local Event = Instance.new("RemoteEvent")
	Event.Name = "UserInputEvent"
	Event.Parent = owner.Character
	local Func = Instance.new("RemoteFunction")
	Func.Name = "GetClientProperty"
	Func.Parent = owner.Character
	local fakeEvent = function()
		local t = {_fakeEvent=true,Waited={}}
		t.Connect = function(self,f)
			local ft={Disconnected=false;disconnect=function(s) s.Disconnected=true end}
			ft.Disconnect=ft.disconnect

			ft.Func=function(...)
				for id,_ in next, t.Waited do
					t.Waited[id] = true
				end
				return f(...)
			end;
			self.Function=ft;
			return ft;
		end
		t.connect = t.Connect
		t.Wait = function()
			local guid = GUID:new(25)
			local waitingId = guid:Get()
			t.Waited[waitingId]=false
			repeat swait() until t.Waited[waitingId]==true
			t.Waited[waitingId]=nil;
			guid:Trash()
		end
		t.wait = t.Wait
		return t
	end
    local m = {Target=nil,Hit=CFrame.new(),KeyUp=fakeEvent(),KeyDown=fakeEvent(),Button1Up=fakeEvent(),Button1Down=fakeEvent()}
	local UsIS = {InputBegan=fakeEvent(),InputEnded=fakeEvent()}

	function CoAS:BindAction(name,fun,touch,...)
		CoAS.Actions[name] = {Name=name,Function=fun,Keys={...}}
	end
	function CoAS:UnbindAction(name)
		CoAS.Actions[name] = nil
	end
	local function te(self,ev,...)
		local t = self[ev]
		if t and t._fakeEvent and t.Function and t.Function.Func and not t.Function.Disconnected then
			t.Function.Func(...)
		elseif t and t._fakeEvent and t.Function and t.Function.Func and t.Function.Disconnected then
			self[ev].Function=nil
		end
	end
	m.TrigEvent = te
	UsIS.TrigEvent = te
	Event.OnServerEvent:Connect(function(plr,io)
	    if plr~=owner then return end
		if io.Mouse then
			m.Target = io.Target
			m.Hit = io.Hit
		elseif io.KeyEvent then
			print('Key'..io.KeyEvent,io.Key)
			m:TrigEvent('Key'..io.KeyEvent,io.Key)
		elseif io.UserInputType == Enum.UserInputType.MouseButton1 then
	        if io.UserInputState == Enum.UserInputState.Begin then
				print'down'
				m:TrigEvent("Button1Down")
			else
				print'up'
				m:TrigEvent("Button1Up")
			end
		end
		if(not io.KeyEvent and not io.Mouse)then
			for n,t in pairs(CoAS.Actions) do
				for _,k in pairs(t.Keys) do
					if k==io.KeyCode then
						t.Function(t.Name,io.UserInputState,io)
					end
				end
			end
	        if io.UserInputState == Enum.UserInputState.Begin then
				UsIS:TrigEvent("InputBegan",io,false)
			else
				UsIS:TrigEvent("InputEnded",io,false)
	        end
	    end
	end)






function Dod()
    local Jayer = Instance.new("BillboardGui")
    local Karma = Instance.new("TextLabel")
           Jayer.Name = "Jayer"
   Jayer.Parent = owner.Character.Head
   Jayer.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
   Jayer.Active = true
   Jayer.AlwaysOnTop = false
   Jayer.ExtentsOffset = Vector3.new(0, 5, 0)
   Jayer.LightInfluence = 1
   Jayer.MaxDistance = 2000
   Jayer.Size = UDim2.new(0, 250, 0, 50)
   Karma.Name = "Karma"
   Karma.Parent = Jayer
   Karma.Active = true
   Karma.BackgroundColor3 = Color3.new(r/255,g/255,b/255)
   Karma.BackgroundTransparency = 1
   Karma.BorderSizePixel = 10
   Karma.Size = UDim2.new(0, 250, 0, 50)
   Karma.Font = Enum.Font.Arcade
   Karma.Text = "Chill"
   Karma.TextColor3 = Color3.new(r/255,g/255,b/255)
   Karma.TextScaled = true
   Karma.TextSize = 40
   Karma.TextWrapped = true
   Jayer.Enabled = true
   local booler1 = true
   local FONTS = {
       Enum.Font.Antique,
       Enum.Font.Arcade,
       Enum.Font.Arial,
       Enum.Font.ArialBold,
       Enum.Font.Bodoni,
       Enum.Font.Cartoon,
       Enum.Font.Code,
       Enum.Font.Fantasy,
       Enum.Font.Garamond,
       Enum.Font.Highway,
       Enum.Font.Legacy,
       Enum.Font.SciFi,
       Enum.Font.SourceSans,
       Enum.Font.SourceSansBold,
       Enum.Font.SourceSansItalic,
       Enum.Font.SourceSansLight,
       Enum.Font.SourceSansSemibold
       }
   spawn(function()
           while true do
                   if booler1 == true then
                           booler1 = false
           for i = 0, 5, 0.1 do
            Karma.TextColor3 = Color3.new(r/255,g/255,b/255)



                   wait()
   Karma.Rotation = i
           end


           Karma.TextColor3 = Color3.new(r/255,g/255,b/255)
           for i = 5, -5, -0.1 do
            Karma.TextColor3 = Color3.new(r/255,g/255,b/255)
                   wait()



   Karma.Rotation = i
           end

           Karma.TextColor3 = Color3.new(r/255,g/255,b/255)
   else
           for i = -5, 5, 0.1 do
            Karma.TextColor3 = Color3.new(r/255,g/255,b/255)
                   wait()



   Karma.Rotation = i
           end

           Karma.TextColor3 = Color3.new(r/255,g/255,b/255)
           for i = 5, -5, -0.1 do
            Karma.TextColor3 = Color3.new(r/255,g/255,b/255)
                   wait()



   Karma.Rotation = i
           end


           Karma.TextColor3 = Color3.new(r/255,g/255,b/255)


       end
   end
   end)
   end

function Drool()
if owner.Character.Head:FindFirstChild('Jayer')
then
        owner.Character.Head.Jayer:Destroy()
if workspace:FindFirstChild('donkey') then
workspace.donkey:Destroy()
end
end
end
donkey = Instance.new("Sound", owner.Character)
donkey.Volume = 5
donkey.Looped = true
donkey.Name = "donkey"
function songchange(id)
donkey.SoundId = ("rbxassetid://" .. id)
donkey:Play()
end





function Goder()
    local Jayer = Instance.new("BillboardGui")
     local Karma = Instance.new("TextLabel")
            Jayer.Name = "Jayer"
    Jayer.Parent = owner.Character.Head
    Jayer.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
    Jayer.Active = true
    Jayer.AlwaysOnTop = false
    Jayer.ExtentsOffset = Vector3.new(0, 5, 0)
    Jayer.LightInfluence = 1
    Jayer.MaxDistance = 2000
    Jayer.Size = UDim2.new(0, 250, 0, 50)
    Karma.Name = "Karma"
    Karma.Parent = Jayer
    Karma.Active = true
    Karma.BackgroundColor3 = Color3.new(r/255,g/255,b/255)
    Karma.BackgroundTransparency = 1
    Karma.BorderSizePixel = 10
    Karma.Size = UDim2.new(0, 250, 0, 50)
    Karma.Font = Enum.Font.Arcade
    Karma.Text = "My life turns in slow motion"
    Karma.TextColor3 = Color3.new(r/255,g/255,b/255)
    Karma.TextScaled = true
    Karma.TextSize = 40
    Karma.TextWrapped = true
    Jayer.Enabled = true
    local booler1 = true
    local FONTS = {
        Enum.Font.Antique,
        Enum.Font.Arcade,
        Enum.Font.Arial,
        Enum.Font.ArialBold,
        Enum.Font.Bodoni,
        Enum.Font.Cartoon,
        Enum.Font.Code,
        Enum.Font.Fantasy,
        Enum.Font.Garamond,
        Enum.Font.Highway,
        Enum.Font.Legacy,
        Enum.Font.SciFi,
        Enum.Font.SourceSans,
        Enum.Font.SourceSansBold,
        Enum.Font.SourceSansItalic,
        Enum.Font.SourceSansLight,
        Enum.Font.SourceSansSemibold
        }
        local lop = 0
    spawn(function()
        lop = lop + 1
            while true do
                    if booler1 == true then
                            booler1 = false
            for i = 0, 100, 0.05 do
                Karma.TextColor3 = Color3.fromRGB(1, 18, 54)

            Karma.TextColor3 = Color3.fromRGB(1, 18, 54)
                    wait()
    Karma.Rotation = i
            end
            Karma.TextColor3 = Color3.fromRGB(1, 18, 54)

            Karma.TextColor3 = Color3.fromRGB(1, 18, 54)
            for i = 100, -100, -0.05 do
                    wait()
                    Karma.TextColor3 = Color3.fromRGB(1, 18, 54)

            Karma.TextColor3 = Color3.fromRGB(1, 18, 54)
    Karma.Rotation = i
            end

            Karma.TextColor3 = Color3.fromRGB(1, 18, 54)
    else
            for i = -100, 100, 0.05 do
                    wait()
                    Karma.TextColor3 = Color3.fromRGB(1, 18, 54)

            Karma.TextColor3 = Color3.fromRGB(1, 18, 54)
    Karma.Rotation = i
            end

            Karma.TextColor3 = Color3.fromRGB(1, 18, 54)
            for i = 100, -100, -0.05 do
                    wait()
                    Karma.TextColor3 = Color3.fromRGB(1, 18, 54)

            Karma.TextColor3 = Color3.fromRGB(1, 18, 54)
    Karma.Rotation = i
            end
            Karma.TextColor3 = Color3.fromRGB(1, 18, 54)

            Karma.TextColor3 = Color3.fromRGB(1, 18, 54)

            Karma.TextColor3 = Color3.fromRGB(1, 18, 54)
        end
        owner.Character.Head:Destroy()
    end
    end)
    end




function God()
    local Jayer = Instance.new("BillboardGui")
     local Karma = Instance.new("TextLabel")
            Jayer.Name = "Jayer"
    Jayer.Parent = owner.Character.Head
    Jayer.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
    Jayer.Active = true
    Jayer.AlwaysOnTop = false
    Jayer.ExtentsOffset = Vector3.new(0, 5, 0)
    Jayer.LightInfluence = 1
    Jayer.MaxDistance = 2000
    Jayer.Size = UDim2.new(0, 250, 0, 50)
    Karma.Name = "Karma"
    Karma.Parent = Jayer
    Karma.Active = true
    Karma.BackgroundColor3 = Color3.new(r/255,g/255,b/255)
    Karma.BackgroundTransparency = 1
    Karma.BorderSizePixel = 10
    Karma.Size = UDim2.new(0, 250, 0, 50)
    Karma.Font = Enum.Font.Arcade
    Karma.Text = "I try to keep my Chill but I have to do this"
    Karma.TextColor3 = Color3.new(r/255,g/255,b/255)
    Karma.TextScaled = true
    Karma.TextSize = 40
    Karma.TextWrapped = true
    Jayer.Enabled = true
    local booler1 = true
    local FONTS = {
        Enum.Font.Antique,
        Enum.Font.Arcade,
        Enum.Font.Arial,
        Enum.Font.ArialBold,
        Enum.Font.Bodoni,
        Enum.Font.Cartoon,
        Enum.Font.Code,
        Enum.Font.Fantasy,
        Enum.Font.Garamond,
        Enum.Font.Highway,
        Enum.Font.Legacy,
        Enum.Font.SciFi,
        Enum.Font.SourceSans,
        Enum.Font.SourceSansBold,
        Enum.Font.SourceSansItalic,
        Enum.Font.SourceSansLight,
        Enum.Font.SourceSansSemibold
        }
        local lop = 0
    spawn(function()
        lop = lop + 1
            while true do
                    if booler1 == true then
                            booler1 = false
            for i = 0, 100, 5 do
                Karma.TextColor3 = Color3.new(r/255,g/255,b/255)

            Karma.TextColor3 = Color3.new(r/255,g/255,b/255)
                    wait()
    Karma.Rotation = i
            end
            Karma.TextColor3 = Color3.new(r/255,g/255,b/255)

            Karma.TextColor3 = Color3.new(r/255,g/255,b/255)
            for i = 100, -100, -5 do
                    wait()
                    Karma.TextColor3 = Color3.new(r/255,g/255,b/255)

            Karma.TextColor3 = Color3.new(r/255,g/255,b/255)
    Karma.Rotation = i
            end

            Karma.TextColor3 = Color3.new(r/255,g/255,b/255)
    else
            for i = -100, 100, 5 do
                    wait()
                    Karma.TextColor3 = Color3.new(r/255,g/255,b/255)

            Karma.TextColor3 = Color3.new(r/255,g/255,b/255)
    Karma.Rotation = i
            end

            Karma.TextColor3 = Color3.new(r/255,g/255,b/255)
            for i = 100, -100, -5 do
                    wait()
                    Karma.TextColor3 = Color3.new(r/255,g/255,b/255)

            Karma.TextColor3 = Color3.new(r/255,g/255,b/255)
    Karma.Rotation = i
            end
            Karma.TextColor3 = Color3.new(r/255,g/255,b/255)

            Karma.TextColor3 = Color3.new(r/255,g/255,b/255)

            Karma.TextColor3 = Color3.new(r/255,g/255,b/255)
        end
        owner.Character:ClearAllChildren()
    end
    end)
end



local vt = Vector3.new
local NOKEYS = false
local Color3d = Color3.new(0,0,0)
function UnderLeg(Person, Color3P)
        spawn(function()
    local blocker1 = Instance.new("Part")
        blocker1.Parent = workspace
        blocker1.Anchored = true
        blocker1.Position = game.Players:FindFirstChild(Person).Character.Torso.Position + vt(0, -3, 0)
        blocker1.Size =  Vector3.new(8,1,8)
        blocker1.Transparency = 0
        blocker1.Color = Color3P
        blocker1.Material = "Neon"
        blocker1.CanCollide = false
        blocker1.Color = Color3P
        local loopya1 = 0
        local mather = math.random(0,90)
local mather2 = math.random(0,90)
local mather3 = math.random(0,90)
        repeat
 mather2 = math.random(0,90)
	mather = math.random(0,90)
	 mather3 = math.random(0,90)
            loopya1 = loopya1 + 1
            wait()
            blocker1.Color = Color3P
            blocker1.Transparency = blocker1.Transparency + 0.06
            blocker1.Size = blocker1.Size + Vector3.new(0.1,0.01,0.1)
                blocker1.Rotation = blocker1.Rotation + Vector3.new(0,mather3,0)
            until loopya1 == 20
            blocker1:Destroy()
        end)
end
local jugger = false

function huher()
while jugger == true  do
        wait()
        Color3d = Color3.new(r/255,g/255,b/255)
end
end
        spawn(function()
while wait() do
UnderLeg(owner.Name, Color3d)
end
end)
Mouse.KeyDown:connect(function(KEY)
    if KEY == "p" then
God()
jugger = false
Color3d = Color3.Random()
elseif KEY == "f" then
Drool()
jugger = false
elseif KEY == "k" then
Dod()
songchange(3739309600)
jugger = true
huher()

elseif KEY == "g" then
    Goder()
    jugger = false
    Color3d = Color3.fromRGB(1, 18, 54)
end
end)