sword creator

function createSword(ignorecharlist)
	local ret = nil
	task.spawn(function()
		pcall(function()
			local tool = Instance.new("Tool")
			tool.Name = "LinkedSword"
			tool.TextureId = "http://www.roblox.com/asset/?id=124987047"
			tool.Grip = CFrame.new(0, 0, -1.5, 0, 0, 1, 1, 0, 0, 0, 1, 0)

			ret = tool

			local handle = Instance.new("Part",tool)
			handle.Name = "Handle"
			handle.Reflectance = .4
			handle.Size = Vector3.new(1,.8,4)

			local function cS(p,n,id,vol)
				local sound = Instance.new("Sound",p)
				sound.Name = n
				sound.SoundId = id
				sound.Volume = vol
			end
			cS(handle,"Lunge","http://www.roblox.com/asset/?id=12222208",.6)
			cS(handle,"Slash","http://www.roblox.com/asset/?id=12222216",.7)
			cS(handle,"Unsheath","http://www.roblox.com/asset/?id=12222225",1)

			local mesh = Instance.new("SpecialMesh",handle)
			mesh.MeshId = "http://www.roblox.com/asset/?id=12221720"
			mesh.TextureId = "http://www.roblox.com/asset/?id=12224218"
			mesh.Scale = Vector3.one

			do
				local script = {Parent = tool}
				--Rescripted by Luckymaxer

				local Tool = script.Parent
				local Handle = Tool:WaitForChild("Handle")
				local Mesh = Handle:WaitForChild("Mesh")

				local Players = game:GetService("Players")
				local Debris = game:GetService("Debris")
				local RunService = game:GetService("RunService")

				local BaseUrl = "http://www.roblox.com/asset/?id="

				local Grips = {
					Up = CFrame.new(0, 0, -1.5, 0, 0, 1, 1, 0, 0, 0, 1, 0),
					Out = CFrame.new(0, 0, -1.5, 0, -1, -0, -1, 0, -0, 0, 0, -1),
				}

				local DamageValues = {
					BaseDamage = 5,
					SlashDamage = 10,
					LungeDamage = 30,
				}

				local Damage = DamageValues.BaseDamage

				local Sounds = {
					Slash = Handle:WaitForChild("Slash"),
					Lunge = Handle:WaitForChild("Lunge"),
					Unsheath = Handle:WaitForChild("Unsheath"),
				}

				local LastAttack = 0

				local ToolEquipped = false
				local Character
				local Player
				local Humanoid
				local RootPart

				Tool.Enabled = true

				local function CheckIfAlive()
					return (((Character and Character.Parent and Humanoid and Humanoid.Parent and Humanoid.Health > 0 and RootPart and RootPart.Parent) and true) or false)
				end

				local function SwordUp()
					Tool.Grip = Grips.Up
				end

				local function SwordOut()
					Tool.Grip = Grips.Out
				end

				local function IsTeamMate(Player1, Player2)
					return (Player1 and Player2 and not Player1.Neutral and not Player2.Neutral and Player1.TeamColor == Player2.TeamColor)
				end

				local function TagHumanoid(humanoid, player)
					local Creator_Tag = Instance.new("ObjectValue")
					Creator_Tag.Name = "creator"
					Creator_Tag.Value = player
					Debris:AddItem(Creator_Tag, 2)
					Creator_Tag.Parent = humanoid
				end

				local function UntagHumanoid(humanoid)
					for i, v in pairs(humanoid:GetChildren()) do
						if v:IsA("ObjectValue") and v.Name == "creator" then
							v:Destroy()
						end
					end
				end

				local function Attack()
					Damage = DamageValues.SlashDamage
					Sounds.Slash:Play()
					local Anim = Instance.new("StringValue")
					Anim.Name = "toolanim"
					Anim.Value = "Slash"
					Anim.Parent = Tool
				end

				local function Lunge()
					Damage = DamageValues.LungeDamage
					Sounds.Lunge:Play()
					local Anim = Instance.new("StringValue")
					Anim.Name = "toolanim"
					Anim.Value = "Lunge"
					Anim.Parent = Tool	
					local Force = Instance.new("BodyVelocity")
					Force.velocity = Vector3.new(0, 10, 0) 
					Force.maxForce = Vector3.new(0, 4000, 0)
					Debris:AddItem(Force, 0.5)
					Force.Parent = RootPart
					wait(0.25)
					SwordOut()
					wait(0.25)
					if Force and Force.Parent then
						Force:Destroy()
					end
					wait(0.5)
					SwordUp()
				end

				local function Blow(Hit)
					for _,v in pairs(ignorecharlist or {}) do
						if Hit:IsDescendantOf(v) then
							return
						end
					end
					if not Hit or not Hit.Parent or not CheckIfAlive() then
						return
					end
					local RightArm = (Character:FindFirstChild("Right Arm") or Character:FindFirstChild("RightHand"))
					if not RightArm then
						return
					end
					local RightGrip = RightArm:FindFirstChild("RightGrip")
					if not RightGrip or (RightGrip.Part0 ~= RightArm and RightGrip.Part1 ~= RightArm) or (RightGrip.Part0 ~= Handle and RightGrip.Part1 ~= Handle) then
						return
					end
					local character = Hit.Parent
					local humanoid = character:FindFirstChild("Humanoid")
					if not humanoid then
						return
					end
					local player = Players:GetPlayerFromCharacter(character)
					if player and (player == Player or IsTeamMate(Player, player)) then
						return
					end
					UntagHumanoid(humanoid)
					TagHumanoid(humanoid, Player)
					humanoid:TakeDamage(Damage)
				end

				local function Activated()
					if not Tool.Enabled or not ToolEquipped or not CheckIfAlive() then
						return
					end
					Tool.Enabled = false
					local Tick = RunService.Stepped:wait()
					if (Tick - LastAttack) < 0.2 then
						Lunge()
					else
						Attack()
					end
					Damage = DamageValues.BaseDamage
					LastAttack = Tick
					Tool.Enabled = true
				end

				local function Equipped()
					Character = Tool.Parent
					Player = Players:GetPlayerFromCharacter(Character)
					Humanoid = Character:FindFirstChild("Humanoid")
					RootPart = Character:FindFirstChild("HumanoidRootPart")
					if not CheckIfAlive() then
						return
					end
					ToolEquipped = true
					Sounds.Unsheath:Play()
				end

				local function Unequipped()
					ToolEquipped = false
				end

				SwordUp()

				Handle.Touched:connect(Blow)

				Tool.Activated:connect(Activated)
				Tool.Equipped:connect(Equipped)
				Tool.Unequipped:connect(Unequipped)
			end
		end)
	end)
	return ret
end
return createSword