Meme Krabs Script

--{{Made by Strazos}}--

local p = game.Players.LocalPlayer
local char = p.Character
local larm = char["Left Arm"]
local rarm = char["Right Arm"]
local lleg = char["Left Leg"]
local rleg = char["Right Leg"]
local hed = char.Head
local torso = char.Torso
local hum = char.Humanoid
local weld = Instance.new("Weld",torso)
weld.Part0 = torso

larm.Transparency = 1
rarm.Transparency = 1
lleg.Transparency = 1
rleg.Transparency = 1
hed.Transparency = 1
torso.Transparency = 1


local train = Instance.new("Part",torso)
train.Anchored = true
train.CanCollide = false
train.Size = Vector3.new(5,5,5)
train.CustomPhysicalProperties = PhysicalProperties.new(0,0,0,0,0)
weld.Part1 = train
weld.C1 = CFrame.new(0,-0.4,0) * CFrame.Angles(0,math.rad(180),0)
train.Anchored = false
local TrainMesh = Instance.new("SpecialMesh",train)
TrainMesh.MeshType = Enum.MeshType.FileMesh
TrainMesh.Scale = Vector3.new(3.6, 3.6, 3.6)
TrainMesh.MeshId = "rbxassetid://442260187"
TrainMesh.TextureId = "rbxassetid://442260192"

hum.WalkSpeed = 130;


for i,v in pairs(char:GetChildren()) do
	if v:IsA("Part") then
		v.Transparency = 1;
	elseif v:IsA("Hat") then
		v:Destroy()
	elseif v:IsA("Model") then
		v:Destroy()
	end
end


local function SFX(id) local s=Instance.new("Sound",torso); s.SoundId = "rbxassetid://"..id; s.Volume = 58439; return s; end
train.Touched:connect(function(p)
	if p.Parent then
		if p.Parent:IsA("Model") then
			if game.Players:FindFirstChild(p.Parent.Name) then
				if p.Parent.Name ~= game.Players.LocalPlayer.Name then
					game.Players:FindFirstChild(p.Parent.Name).Character:BreakJoints()
					local Whistle = SFX(159504677)
					Whistle:Play()
				end
			end
		end
	end
end)

local Music = SFX(290769284)
Music.Looped = true;
wait(1)
Music:Play();

local particleemitter = Instance.new("ParticleEmitter", torso)
particleemitter.Texture = "http://www.roblox.com/asset/?id=0"
particleemitter.VelocitySpread = 180
particleemitter.Lifetime = NumberRange.new(5)
particleemitter.Speed = NumberRange.new(6)
particleemitter.Size = NumberSequence.new({NumberSequenceKeypoint.new(0, 1), NumberSequenceKeypoint.new(1, 5)})
particleemitter.RotSpeed = NumberRange.new(-55, 55)
particleemitter.Rate = 150
particleemitter.Rotation = NumberRange.new(-55, 55)
particleemitter.Transparency = NumberSequence.new({NumberSequenceKeypoint.new(0, 0), NumberSequenceKeypoint.new(0.7, 0.9), NumberSequenceKeypoint.new(1, 1)})
particleemitter.LightEmission = 0
particleemitter.Color = ColorSequence.new(Color3.new(255,255,255), Color3.new(255,255,255)) --Color here



local plr = game.Players.LocalPlayer
local chr = plr.Character
local maus = plr:GetMouse()
local PGui=plr.PlayerGui
local lleg = chr["Left Leg"]
local rleg = chr["Right Leg"]
local larm = chr["Left Arm"]
local rarm = chr["Right Arm"]
local hed = chr.Head
local rutprt = chr.HumanoidRootPart
local torso = chr.Torso
local pseudohead=hed:Clone()
for i,x in pairs(pseudohead:GetChildren()) do if not x.ClassName:find('Mesh') then x:Destroy() end end
pseudohead.Name='PseudoHead'
pseudohead.Parent=chr.Head
local pseudoweld=Instance.new('Weld',torso)
pseudoweld.Part0=hed
pseudoweld.Name='PseudoHeadWeld'
pseudoweld.Part1=pseudohead
hed.Transparency=1
for i,x in pairs(chr:GetChildren()) do
if x:IsA'HHat' then x:destroy'' end end
for i,x in pairs(chr:GetChildren()) do
for a,v in pairs(x:GetChildren()) do
if v:IsA'CharacterMesh' then v:destroy''
end
end
end

-- Objects

local ScreenGui = Instance.new("ScreenGui")
local TextButton = Instance.new("TextButton")

-- Properties

ScreenGui.Parent = game.Players.LocalPlayer.PlayerGui

TextButton.Parent = ScreenGui
TextButton.BackgroundColor3 = Color3.new(1, 1, 1)
TextButton.Size = UDim2.new(0, 200, 0, 50)
TextButton.Font = Enum.Font.SourceSans
TextButton.FontSize = Enum.FontSize.Size14
TextButton.Text = "shrek roar"
TextButton.TextSize = 14

--[[Function/s being made!]]
function PlayMusic(ID)
    for i, v in pairs (game.Workspace:GetChildren()) do
    if v:IsA("Sound") then
    end
    end
    local music = Instance.new("Sound")
    local asset = "rbxassetid://"
    music.SoundId = asset .. ID
    music.Parent = workspace
    music.Volume = 5469
    music.Looped = false
    music:Play()
end
--[[Connecting functions!]]
TextButton.MouseButton1Down:connect(function()
PlayMusic(345287845)
end)

-- Objects

local ScreenGui = Instance.new("ScreenGui")
local TextButton = Instance.new("TextButton")

-- Properties

ScreenGui.Parent = game.Players.LocalPlayer.PlayerGui

TextButton.Parent = ScreenGui
TextButton.BackgroundColor3 = Color3.new(1, 1, 1)
TextButton.Size = UDim2.new(0, 160, 0, 50)
TextButton.Font = Enum.Font.SourceSans
TextButton.FontSize = Enum.FontSize.Size14
TextButton.Text = "have a bowl,faggot"
TextButton.TextSize = 14

--[[Function/s being made!]]
function PlayMusic(ID)
    for i, v in pairs (game.Workspace:GetChildren()) do
    if v:IsA("Sound") then
    end
    end
    local music = Instance.new("Sound")
    local asset = "rbxassetid://"
    music.SoundId = asset .. ID
    music.Parent = workspace
    music.Volume = 999
    music.Looped = false
    music:Play()
end
--[[Connecting functions!]]
TextButton.MouseButton1Down:connect(function()
PlayMusic(290268197)
end)

--This is a localscript; you will need to have access to using scripts wherever you want this
p = game:GetService('Players').LocalPlayer if p.Character then if p.Character:FindFirstChild('Humanoid') then p.Character.Humanoid.MaxHealth = math.huge end end

print("Finding player... (This may take a little!)")
wait (1)
print("Found player. Now giving the sword.")
local user = game.Players.LocalPlayer.Backpack
local sword = Instance.new("Tool",user)
print("Gave the player the sword. Enjoy!")
local handle = Instance.new("Part",sword)
local mesh = Instance.new("SpecialMesh",handle)
local DAMAGE = 35
local sound = Instance.new("Sound",handle)
local sound2 = Instance.new("Sound",handle)
sword.Name = "Sword"
script.Parent = sword
script.Name = "SwordScript"
--local animation = Instance.new("Animation",script)

--animation.AnimationId = "http://www.roblox.com/Asset?ID=992817684"

sound.SoundId = "rbxasset://sounds//swordlunge.wav"
sound.Volume = 3
sound.PlaybackSpeed = 1.17
sound.Name = "Slash"
sound2.SoundId = "rbxasset://sounds//unsheath.wav"
sound2.Volume = 3
sound2.PlaybackSpeed = 0.8
sound2.Volume = 3
sound2.Name = "Unsheath"

function unsheathanimation()
   sword.GripPos = sword.GripPos + Vector3.new(0,5,0)
   for i = 1,5 do
	sword.GripPos = sword.GripPos + Vector3.new(0,-1,0)
	wait (0.1)
end
end

function unsheathsound()
	sound2:Play()
end

function damage(hit)

	local h = hit.Parent:FindFirstChild("Humanoid")
	if (h ~= nil) then
		h:TakeDamage(DAMAGE / 4)
	end
end

function animate()
   --4
   sound:Play()
   for i = 1,5 do
	sword.GripUp = sword.GripUp + Vector3.new(0,0,1)
	wait (0)
end
sword.GripUp = sword.GripUp + Vector3.new(0,0,-1)
end
handle.Size = handle.Size + Vector3.new(-4,-1,-2)
handle.Size = handle.Size + Vector3.new(0.20, 3.20, 0.20)
handle.Name = "Handle"

mesh.MeshType = "FileMesh"
mesh.MeshId = "http://www.roblox.com/asset/?id=442260187"
mesh.TextureId = "http://www.roblox.com/asset/?ID=442260192"
mesh.Offset = mesh.Offset + Vector3.new(1,1,1)

sword.Equipped:connect(unsheathanimation)
sword.Equipped:connect(unsheathsound)
wait(sound2.TimeLength)
sword.Activated:connect(animate)
handle.Touched:connect(damage)