crabify

NLS([==[
local Player = owner
local hum
game:GetService("RunService").Stepped:Connect(function()
if Player.Character then
	hum = Player.Character:FindFirstChildOfClass("Humanoid")
end
if hum then
	for k,v in pairs(hum:GetPlayingAnimationTracks()) do
		v:AdjustSpeed(10)
	end
	end
end)]==],owner.Character)


crabtable = {1837215419,1842306658,1841476350,1845736826,1845736900,1847174545}

local Player = owner
local retard = Instance.new("Sound")

defaultsound = 3426632334
local lastvolume = 2
local funnypitch = 1 +math.random(-2,2)/10
lasttime = 0

if math.random(1,15) == 1 then
	defaultsoundB =12637000925
	else
	defaultsoundB = crabtable[math.random(1,#crabtable)]
end
local lastvolumeB = 1
local funnypitchB = math.random(9,11)/10
retard.Parent = Player.Character.HumanoidRootPart
retard.Name = "Crabify"
retard.SoundId = "rbxassetid://"..defaultsound
retard.Playing = false
retard.Looped = true
retard.Volume = 2
retard.PlaybackSpeed = 1 + math.random(-1,1)/10
local retardB = Instance.new("Sound")
retardB.Parent = Player.Character.HumanoidRootPart
retardB.Name = "Epic crab music"
retardB.SoundId = "rbxassetid://"..defaultsoundB
retardB.Playing = true
retardB.Looped = true
retardB.Volume = 1
retardB.PlaybackSpeed = funnypitchB




Player.Character.Humanoid.WalkSpeed = 14
local hum
local dead = false

function RWait(Numb)
	Numb = Numb or 0
	if Numb ~= 0 then
		for i = 0, Numb, 0.1 do
			game:GetService("RunService").Stepped:wait()
		end
	else
		game:GetService("RunService").Stepped:wait()
	end
end
local chatfold = Instance.new("Folder",Player.Character)


local crabintro = false
function ChatFunc(text)
	local stop = false
	local chat = coroutine.wrap(function()

		for index, Chatbox in pairs(chatfold:GetChildren()) do
			if Chatbox:IsA("BillboardGui") then
				local troll = Chatbox
				troll.StudsOffset = troll.StudsOffset +Vector3.new(0,2,0)
			end
		end
		local Bill = Instance.new("BillboardGui",chatfold)
		Bill.Size = UDim2.new(5, 35,3, 15)
		Bill.StudsOffset = Vector3.new(0,4,0)
		Bill.Adornee = Player.Character.HumanoidRootPart
		Bill.Name = "CrabBoard"
		Bill.MaxDistance = 140
		local Hehe = Instance.new("TextLabel",Bill)
		Hehe.BackgroundTransparency = 1
		Hehe.BorderSizePixel = 0
		Hehe.Text = ""
		Hehe.Name = "CrabBottomJeans"
		Hehe.TextSize = 30
		Hehe.TextStrokeTransparency = 0
		Hehe.TextScaled = true
		Hehe.TextWrapped = true
		Hehe.Size = UDim2.new(1,0,0.5,0)
		coroutine.resume(coroutine.create(function()
			repeat
				RWait()
				Hehe.TextColor3 = Color3.fromRGB(255, 88, 91)
				Hehe.TextStrokeColor3 = Color3.fromRGB(0, 0, 0)

				Hehe.Font = "SourceSans"
					Hehe.Position = UDim2.new(0,0,.1,0)
					Hehe.Rotation = 0

					Hehe.Rotation = 0



			until Hehe.Parent ~= Bill
		end))
		for i = 1,string.len(text),1 do
			RWait()
			local newtext = string.sub(text,1,i)





			Hehe.Text = newtext
			if string.sub(newtext,#newtext) == "," then
				RWait(2)
			elseif string.sub(newtext,#newtext) == "." then
				RWait(2)
			elseif string.sub(newtext,#newtext) == "?" then
				RWait(3)
			elseif string.sub(newtext,#newtext) == "!" then
				RWait(1)
			elseif string.sub(newtext,#newtext) == ";" then
				RWait(2)

			end

		end

		for i = 0, 2, .01 do
			RWait()
		end
		for i = 0, 5, .035 do
			RWait()


			Hehe.TextStrokeTransparency = i
			Hehe.TextTransparency = i
			Bill.StudsOffset = Vector3.new(0,Bill.StudsOffset.Y+ i,0)
			stop = true
		end
			crabintro = true
		Bill:Destroy()
	end)
	chat()
end

local Craebe = Instance.new("Sound")
Craebe.Parent = Player.Character.HumanoidRootPart
Craebe.Name = "certified"
Craebe.SoundId = "rbxassetid://"..12697723770
Craebe.Playing = true
Craebe.TimePosition = 0
Craebe.Looped = false
Craebe.Volume = 10
Craebe.PlaybackSpeed = math.random(8,12)/10
game:GetService("Debris"):AddItem(Craebe,4)

ChatFunc("This is a certified crab moment")
local whattable = {",",".","?","!",";"}

local Filter = true
function filter()
	Filter = not Filter
end

CrabSound = true
Player.Chatted:connect(function(text)
	if text == "filter/" then
		filter()
	end
	if(Filter)then
		local filter,text = pcall(function() return game:service'Chat':FilterStringForBroadcast(text,Player) end)
		if(not Filter)then
			text = string.rep("*",#text)
		end
		if text:sub(1,2) ~= "/e" then
			ChatFunc(text)
		end
	else
		if text:sub(1,2) ~= "/e" then
			ChatFunc(text)
		end

	end
	if text:sub(1,5) == "play/" then
		defaultsound = text:sub(6)
		funnypitch = 1
		NewPl = 2
	elseif text:sub(1,6) == "pitch/"  then
		funnypitch = text:sub(7)
	elseif text:sub(1,4) == "vol/" then

		lastvolume = text:sub(5)
end

	if text:sub(1,6) == "crabs/" then
		if CrabSound == true then CrabSound = false  elseif CrabSound == false then CrabSound = true  end
	elseif text:sub(1,6) == "perish" then
		Player.Character.Humanoid.Health = 0

	end

end)




cachedrsize = Player.Character.HumanoidRootPart.Size


game:GetService("RunService").Stepped:Connect(function()


	retard.Playing = Player.Character.Humanoid.MoveDirection ~= Vector3.new()
	if Player.Character.HumanoidRootPart:FindFirstChild("Epic crab music") ~= nil then
		lasttime = retardB.TimePosition
	end
	if Player.Character.HumanoidRootPart:FindFirstChild("Epic crab music") == nil then
		retardB:Destroy()
		local retardBb = Instance.new("Sound",Player.Character.HumanoidRootPart)
		retardBb.Parent = Player.Character.HumanoidRootPart
		retardB = retardBb
		retardBb.Pitch = funnypitchB
		retardBb.SoundId = "rbxassetid://"..defaultsoundB
		retardBb.Name = "Epic crab music"
		retardBb:resume()
		retardBb.Looped = true
		retardBb.Volume = lastvolumeB
		retardBb.MaxDistance = 80
		retardBb.TimePosition = lasttime
NLS([==[
local Player = owner
local hum
game:GetService("RunService").Stepped:Connect(function()
if Player.Character then
	hum = Player.Character:FindFirstChildOfClass("Humanoid")
end
if hum then
	for k,v in pairs(hum:GetPlayingAnimationTracks()) do
		v:AdjustSpeed(10)
	end
	end
end)]==],owner.Character)
	end


	for index, descendant in pairs(Player.Character:GetDescendants()) do
		if descendant:IsA("TextLabel") then


			if descendant.Name ~= "CrabBottomJeans" then
				descendant.Text = "Crabbed label"
			end
		end
	end
	if Player.Character.HumanoidRootPart:FindFirstChild("Crabify") == nil then
		retard:Destroy()
		local retardb = Instance.new("Sound",Player.Character.HumanoidRootPart)
		retardb.Parent = Player.Character.HumanoidRootPart
		retard = retardb
		retardb.Pitch = funnypitch
		retardb.SoundId = "rbxassetid://"..defaultsound
		retardb.Name = "Crabify"
		retardb.Playing = false
		retardb.Looped = true
		retardb.Volume = lastvolume
		retardb.MaxDistance = 80

	end


	retardB.Pitch = funnypitchB
	retardB.SoundId = "rbxassetid://"..defaultsoundB
	retardB.Name = "Epic crab music"
	retardB.Playing = true
	retardB.Looped = true
	retardB.Volume = lastvolumeB
	retardB.MaxDistance = 80
	retardB.Playing = true

	if math.random(1,100) == 1 and dead == false and crabintro == true and CrabSound == true then
		local Crabe = Instance.new("Sound")
		Crabe.Parent = Player.Character.HumanoidRootPart
		Crabe.Name = "he said the funny"
		Crabe.SoundId = "rbxassetid://"..12696778767
		Crabe.Playing = true
		Crabe.TimePosition = 0
		Crabe.Looped = false
		Crabe.Volume = 10
		Crabe.PlaybackSpeed = math.random(8,12)/10
		game:GetService("Debris"):AddItem(Crabe,1)
		ChatFunc("Crab"..whattable[math.random(1,#whattable)])
	end


	if math.random(1,100) == 1 and dead == false and crabintro == true and CrabSound == true then
		local Crabe = Instance.new("Sound")
		Crabe.Parent = Player.Character.HumanoidRootPart
		Crabe.Name = "he said the money"
		Crabe.SoundId = "rbxassetid://"..8506497442
		Crabe.Playing = true
		Crabe.TimePosition = 0
		Crabe.Looped = false
		Crabe.Volume = 1
		Crabe.PlaybackSpeed = math.random(8,12)/10
		game:GetService("Debris"):AddItem(Crabe,1)
		ChatFunc("Money"..whattable[math.random(1,#whattable)])
	end
	if chatfold.Parent ~= Player.Character then
chatfold = Instance.new("Folder",Player.Character)
end

	if Player.Character.Humanoid.Health == 0 and dead == false then
		ChatFunc("The crustacean has perished")
		local boom =Instance.new("Explosion")
		boom.Parent = Player.Character
		dead = true
		boom.BlastRadius = 5
		boom.Position = Player.Character.HumanoidRootPart.Position

		local crust = Instance.new("Sound")
		local distort = Instance.new("DistortionSoundEffect",crust)
		distort.Level = 10
		crust.Parent = Player.Character.HumanoidRootPart
		crust.Name = "banan slip"
		crust.SoundId = "rbxassetid://"..12697790143
		crust.Playing = true
		crust.Looped = false
		crust.Volume = 10
		crust.PlaybackSpeed = 1

		local banan = Instance.new("Sound")
		banan.Parent = Player.Character.HumanoidRootPart
		banan.Name = "Perish"
		banan.SoundId = "rbxassetid://"..12696789454
		banan.Playing = true
		banan.TimePosition = 0.4
		banan.Looped = false
		banan.Volume = 5
		banan.PlaybackSpeed = 1
	end
end)