old roblox script

local Player,Mouse,mouse,UserInputService,ContextActionService = owner
local RealPlayer = Player
local a=RealPlayer;char=a.Character;local b=Instance.new("RemoteEvent")b.Name="UserInput_Event"local function c()local d={_fakeEvent=true,Functions={},Connect=function(self,e)table.insert(self.Functions,e)end}d.connect=d.Connect;return d end;local f={Target=nil,Hit=CFrame.new(),KeyUp=c(),KeyDown=c(),Button1Up=c(),Button1Down=c(),Button2Up=c(),Button2Down=c()}local g={InputBegan=c(),InputEnded=c()}local CAS={Actions={},BindAction=function(self,h,i,j,...)CAS.Actions[h]=i and{Name=h,Function=i,Keys={...}}or nil end}CAS.UnbindAction=CAS.BindAction;local function k(self,l,...)local d=f[l]if d and d._fakeEvent then for m,e in pairs(d.Functions)do e(...)end end end;f.TrigEvent=k;g.TrigEvent=k;b.OnServerEvent:Connect(function(n,o)if n~=a then return end;f.Target=o.Target;f.Hit=o.Hit;if not o.isMouse then local p=o.UserInputState==Enum.UserInputState.Begin;if o.UserInputType==Enum.UserInputType.MouseButton1 then return f:TrigEvent(p and"Button1Down"or"Button1Up")end;if o.UserInputType==Enum.UserInputType.MouseButton2 then return f:TrigEvent(p and"Button2Down"or"Button2Up")end;for m,d in pairs(CAS.Actions)do for m,q in pairs(d.Keys)do if q==o.KeyCode then d.Function(d.Name,o.UserInputState,o)end end end;f:TrigEvent(p and"KeyDown"or"KeyUp",o.KeyCode.Name:lower())g:TrigEvent(p and"InputBegan"or"InputEnded",o,false)end end)b.Parent=NLS([==[local a=game:GetService("Players").LocalPlayer;local b=script:WaitForChild("UserInput_Event")local c=a:GetMouse()local d=game:GetService("UserInputService")local e=function(f,g)if g then return end;b:FireServer({KeyCode=f.KeyCode,UserInputType=f.UserInputType,UserInputState=f.UserInputState,Hit=c.Hit,Target=c.Target})end;d.InputBegan:Connect(e)d.InputEnded:Connect(e)local h,i;while wait(1/30)do if h~=c.Hit or i~=c.Target then h,i=c.Hit,c.Target;b:FireServer({isMouse=true,Target=i,Hit=h})end end]==],Player.Character)local r=game;local s={__index=function(self,q)local t=rawget(self,"_RealService")if t then return typeof(t[q])=="function"and function(m,...)return t[q](t,...)end or t[q]end end,__newindex=function(self,q,u)local t=rawget(self,"_RealService")if t then t[q]=u end end}local function v(d,w)d._RealService=typeof(w)=="string"and r:GetService(w)or w;return setmetatable(d,s)end;local x={GetService=function(self,t)return rawget(self,t)or r:GetService(t)end,Players=v({LocalPlayer=v({GetMouse=function(self)return f end},Player)},"Players"),UserInputService=v(g,"UserInputService"),ContextActionService=v(CAS,"ContextActionService"),RunService=v({_btrs={},RenderStepped=r:GetService("RunService").Heartbeat,BindToRenderStep=function(self,h,m,i)self._btrs[h]=self.Heartbeat:Connect(i)end,UnbindFromRenderStep=function(self,h)self._btrs[h]:Disconnect()end},"RunService")}rawset(x.Players,"localPlayer",x.Players.LocalPlayer)x.service=x.GetService;v(x,game)game,owner=x,x.Players.LocalPlayer
local plr = owner
local char = plr.Character
local head = char:WaitForChild("Head")
local torso = char:WaitForChild("Torso")
local lArm = char:WaitForChild("Left Arm")
local rArm = char:WaitForChild("Right Arm")
local lLeg = char:WaitForChild("Left Leg")
local rLeg = char:WaitForChild("Right Leg")
local humanoid = char:WaitForChild("Humanoid")
--[[
coroutine.resume(coroutine.create(function()
end))
--]]
forcefield = Instance.new("ForceField",char)
forcefield.Visible = false
coroutine.resume(coroutine.create(function()
wait(10)
forcefield.Parent = nil
end))
NLS([[
local plr = owner
local mouse = plr:GetMouse()
local char = plr.Character
local head = char:WaitForChild("Head")
local torso = char:WaitForChild("Torso")
local lArm = char:WaitForChild("Left Arm")
local rArm = char:WaitForChild("Right Arm")
local lLeg = char:WaitForChild("Left Leg")
local rLeg = char:WaitForChild("Right Leg")
local humanoid = char:WaitForChild("Humanoid")
local green_disk = Instance.new("Part",game.Workspace.CurrentCamera)
green_disk.Shape = "Cylinder"
green_disk.Size = Vector3.new(0.1,2,2)
green_disk.BrickColor = BrickColor.new("Lime green")
green_disk.Material = "SmoothPlastic"
green_disk.CanCollide = false
green_disk.Anchored = true
green_disk.CFrame = green_disk.CFrame * CFrame.Angles(0,math.rad(180),0)
greendiskenabled = true
local RS = game:GetService("RunService").RenderStepped
RS:Connect(function()
if mouse.Target ~= green_disk and greendiskenabled == true then
	green_disk.Position = mouse.hit.p
	green_disk.Orientation = Vector3.new(0, 0, -90)
end
if mouse.Target then
    green_disk.Transparency = 0
else
	green_disk.Transparency = 1
end
end)
mouse.Button1Down:Connect(function()
	if not char:FindFirstChildOfClass('Tool') and green_disk.Transparency == 0 then
		humanoid:MoveTo(green_disk.Position)
		greendiskenabled = false
		humanoid.MoveToFinished:Connect(function()
			greendiskenabled = true
		end)
	end
end)
humanoid.Died:Connect(function()
	green_disk:Destroy()
end)
]], char)
for i,v in pairs(char:GetChildren()) do
	if v.ClassName == "Part" then
SelectionBox0 = Instance.new("SelectionBox",v)
SelectionBox1 = Instance.new("SelectionBox",v)
SelectionBox2 = Instance.new("SelectionBox",v)
SelectionBox0.Name = "SelectionBox1"
SelectionBox0.Color = BrickColor.new("Really blue")
SelectionBox0.Transparency = 1
SelectionBox0.Color3 = Color3.new(0, 0, 1)
SelectionBox0.Adornee = v
SelectionBox1.Name = "SelectionBox2"
SelectionBox1.Color = BrickColor.new("Bright violet")
SelectionBox1.Transparency = 0.20000000298023
SelectionBox1.Color3 = Color3.new(0.419608, 0.196078, 0.486275)
SelectionBox1.Adornee = v
SelectionBox2.Name = "SelectionBox3"
SelectionBox2.Color = BrickColor.new("Really red")
SelectionBox2.Transparency = 0.80000001192093
SelectionBox2.Color3 = Color3.new(1, 0, 0)
SelectionBox2.Adornee = v
print(SelectionBox0)
print(SelectionBox1)
print(SelectionBox2)
local sb1 = SelectionBox0
local sb2 = SelectionBox2
local sb3 = SelectionBox1
coroutine.resume(coroutine.create(function()
while true do
sb1.Transparency = .1
sb2.Transparency = .9
wait()
sb1.Transparency = .2
sb2.Transparency = .8
wait()
sb1.Transparency = .3
sb2.Transparency = .7
wait()
sb1.Transparency = .4
sb2.Transparency = .6
wait()
sb1.Transparency = .5
sb2.Transparency = .5
wait()
sb1.Transparency = .6
sb2.Transparency = .4
wait()
sb1.Transparency = .7
sb2.Transparency = .3
wait()
sb1.Transparency = .8
sb2.Transparency = .2
wait()
sb1.Transparency = .9
sb2.Transparency = .1
wait()
sb1.Transparency = 1
sb2.Transparency = 0
wait()
sb2.Transparency = .1
sb3.Transparency = .9
wait()
sb2.Transparency = .2
sb3.Transparency = .8
wait()
sb2.Transparency = .3
sb3.Transparency = .7
wait()
sb2.Transparency = .4
sb3.Transparency = .6
wait()
sb2.Transparency = .5
sb3.Transparency = .5
wait()
sb2.Transparency = .6
sb3.Transparency = .4
wait()
sb2.Transparency = .7
sb3.Transparency = .3
wait()
sb2.Transparency = .8
sb3.Transparency = .2
wait()
sb2.Transparency = .9
sb3.Transparency = .1
wait()
sb2.Transparency = 1
sb3.Transparency = 0
wait()
sb3.Transparency = .1
sb1.Transparency = .9
wait()
sb3.Transparency = .2
sb1.Transparency = .8
wait()
sb3.Transparency = .3
sb1.Transparency = .7
wait()
sb3.Transparency = .4
sb1.Transparency = .6
wait()
sb3.Transparency = .5
sb1.Transparency = .5
wait()
sb3.Transparency = .6
sb1.Transparency = .4
wait()
sb3.Transparency = .7
sb1.Transparency = .3
wait()
sb3.Transparency = .8
sb1.Transparency = .2
wait()
sb3.Transparency = .9
sb1.Transparency = .1
wait()
sb3.Transparency = 1
sb1.Transparency = 0
end
end))
coroutine.resume(coroutine.create(function()
wait(10)
sb1.Parent = nil
sb2.Parent = nil
sb3.Parent = nil
end))
	end
end
local face = head:FindFirstChildWhichIsA("Decal")
local humanoid = char:FindFirstChildWhichIsA("Humanoid")
local rootpart = char:WaitForChild("HumanoidRootPart")
local bodycolors = char:WaitForChild("Body Colors")
if face then
	face.Texture = "rbxassetid://2536856055"
end
if bodycolors then
	ForceColors = Instance.new("BoolValue",bodycolors)
	ForceColors.Name = "ForceColors"
	ForceColors.Value = false
else
	print(bodycolors)
end
for _,charactermesh in pairs(char:GetChildren()) do
	if charactermesh.ClassName == "CharacterMesh" then
		charactermesh.Parent = nil
	end
end
DropWeapon = Instance.new("BoolValue",char)
DropWeapon.Name = "DropWeapon"
DropWeapon.Value = true
Force_Hat = Instance.new("IntValue",char)
Force_Hat.Name = "Force_Hat"
Force_Hat.Value = 0
Force_Pants = Instance.new("IntValue",char)
Force_Pants.Name = "Force_Pants"
Force_Pants.Value = 0
Force_Shirt = Instance.new("IntValue",char)
Force_Shirt.Name = "Force_Shirt"
Force_Shirt.Value = 0
Force_Weapon = Instance.new("IntValue",char)
Force_Weapon.Name = "Force_Weapon"
Force_Weapon.Value = 0
IgnoreCombatFF = Instance.new("BoolValue",char)
IgnoreCombatFF.Name = "IgnoreCombatFF"
IgnoreCombatFF.Value = true
IsAPlayer = Instance.new("CFrameValue",char)
IsAPlayer.Name = "IsAPlayer"
IsOnTeam = Instance.new("BoolValue",char)
IsOnTeam.Name = "IsOnTeam"
IsOnTeam.Value = false
ShowTag = Instance.new("BoolValue",IsOnTeam)
ShowTag.Name = "ShowTag"
ShowTag.Value = false
Team = Instance.new("BrickColorValue",IsOnTeam)
Team.Name = "Team"
Team.Value = BrickColor.new("Really black")
PathTo = Instance.new("Vector3Value",char)
PathTo.Name = "PathTo"
PathTo.Value = Vector3.new(0,0,0)
PrintMap = Instance.new("BoolValue",char)
PrintMap.Name = "PrintMap"
PrintMap.Value = false
Respawn = Instance.new("BoolValue",char)
Respawn.Name = "Respawn"
Respawn.Value = false
Wander = Instance.new("BoolValue",char)
Wander.Name = "Wander"
Wander.Value = false
local CL_LeftArm = Instance.new("CharacterMesh",char)
local CL_LeftLeg = Instance.new("CharacterMesh",char)
local CL_RightArm = Instance.new("CharacterMesh",char)
local CL_RightLeg = Instance.new("CharacterMesh",char)
local CL_Torso = Instance.new("CharacterMesh",char)
CL_LeftArm.BodyPart = Enum.BodyPart.LeftArm
CL_LeftLeg.BodyPart = Enum.BodyPart.LeftLeg
CL_RightArm.BodyPart = Enum.BodyPart.RightArm
CL_RightLeg.BodyPart = Enum.BodyPart.RightLeg
CL_Torso.BodyPart = Enum.BodyPart.Torso
CL_LeftArm.MeshId = "1112256772"
CL_LeftLeg.MeshId = "1112275294"
CL_RightArm.MeshId = "1112244824"
CL_RightLeg.MeshId = "1112267576"
CL_Torso.MeshId = "1112228624"
CL_LeftArm.Name = "CL_LeftArm"
CL_LeftLeg.Name = "CL_LeftLeg"
CL_RightArm.Name = "CL_RightArm"
CL_RightLeg.Name = "CL_RightLeg"
CL_Torso.Name = "CL_Torso"
--cancel out the default R6 animations and then replace them with the old ones
AnimationTracks = humanoid:GetPlayingAnimationTracks()
for i, track in pairs (AnimationTracks) do
	track:Stop()
end
local AnimationTracks = humanoid:GetPlayingAnimationTracks()
-- remove the sounds in the HumanoidRootPart if there any
for _,sound in pairs(rootpart:GetChildren()) do
	if sound.ClassName == "Sound" then
	    sound.Parent = nil
	end
end
-- just in case they changed sounds into the head
for _,sound in pairs(head:GetChildren()) do
	if sound.ClassName == "Sound" then
	    sound.Parent = nil
	end
end
-- animations --
Delay(0, function() --Vanilla Sound
	function waitForChild(parent, childName)
		local child = parent:findFirstChild(childName)
		if child then return child end
		while true do
			child = parent.ChildAdded:wait()
			if child.Name==childName then return child end
		end
	end
	function newSound(id)
		local sound = Instance.new("Sound")
		sound.SoundId = id
		sound.archivable = false
		sound.Parent = char.Head
		return sound
	end
	local sDied = newSound("rbxasset://sounds/uuhhh.wav")
	local sFallingDown = newSound("rbxasset://sounds/splat.wav")
	local sFreeFalling = newSound("rbxasset://sounds/swoosh.wav")
	local sGettingUp = newSound("rbxasset://sounds/hit.wav")
	local sJumping = newSound("rbxasset://sounds/button.wav")
	local sRunning = newSound("rbxasset://sounds/bfsl-minifigfoots1.mp3")
	sRunning.Looped = true
	local Figure = char
	local Head = waitForChild(Figure, "Head")
	local Humanoid = waitForChild(Figure, "Humanoid")
	function onDied()
		sDied:Play()
	end
	function onState(state, sound)
		if state then
			sound:Play()
		else
			sound:Pause()
		end
	end
	function onRunning(speed)
		if speed>0 then
			sRunning:Play()
		else
			sRunning:Pause()
		end
	end
	Humanoid.Died:connect(onDied)
	Humanoid.Running:connect(onRunning)
	Humanoid.Jumping:connect(function(state) onState(state, sJumping) end)
	Humanoid.GettingUp:connect(function(state) onState(state, sGettingUp) end)
	Humanoid.FreeFalling:connect(function(state) onState(state, sFreeFalling) end)
	Humanoid.FallingDown:connect(function(state) onState(state, sFallingDown) end)
end)
Delay(0, function() --Vanilla Health
	function waitForChild(parent, childName)
		local child = parent:findFirstChild(childName)
		if child then return child end
		while true do
			child = parent.ChildAdded:wait()
			if child.Name==childName then return child end
		end
	end
	local Figure = char
	local Humanoid = waitForChild(Figure, "Humanoid")
	local regening = false
	function regenHealth()
		if regening then return end
		regening = true
		while Humanoid.Health < Humanoid.MaxHealth do
			local s = wait(1)
			local health = Humanoid.Health
			if health > 0 and health < Humanoid.MaxHealth then
				local newHealthDelta = 0.01 * s * Humanoid.MaxHealth
				health = health + newHealthDelta
				Humanoid.Health = math.min(health,Humanoid.MaxHealth)
			end
		end
		if Humanoid.Health > Humanoid.MaxHealth then
			Humanoid.Health = Humanoid.MaxHealth
		end
		regening = false
	end
	Humanoid.HealthChanged:connect(regenHealth)
end)
Delay(0, function() --Vanilla Animate, Multiple Additions
	function waitForChild(parent, childName)
		local child = parent:findFirstChild(childName)
		if child then return child end
		while true do
			child = parent.ChildAdded:wait()
			if child.Name==childName then return child end
		end
	end
	local Figure = char
	--local Clone = Figure:Clone()
	local Torso = waitForChild(Figure, "Torso")
	local Joints = Torso:GetChildren()
	for All = 1, #Joints do
		if Joints.className == "Motor" or Joints.className == "Motor6D" then
			Joints[All]:Remove()
		end
	end
	local RightShoulder = Instance.new("Motor")
	local LeftShoulder = Instance.new("Motor")
	local RightHip = Instance.new("Motor")
	local LeftHip = Instance.new("Motor")
	local Neck = Instance.new("Motor")
	local Humanoid = waitForChild(Figure, "Humanoid")
	ZStat = 1
	ZStat2 = 0
	local pose = "Standing"
	RightShoulder.Part0 = Torso
	RightShoulder.Part1 = Figure["Right Arm"]
	RightShoulder.MaxVelocity = 0.15
	RightShoulder.Name = "Right Shoulder"
	RightShoulder.C0 = CFrame.new(1, 0.5, 0, 0, 0, 1, 0, 1, 0, -1, -0, -0)
	RightShoulder.C1 = CFrame.new(-0.5, 0.5, 0, 0, 0, 1, 0, 1, 0, -1, -0, -0)
	RightShoulder.Parent = Torso
	LeftShoulder.Part0 = Torso
	LeftShoulder.Part1 = Figure["Left Arm"]
	LeftShoulder.MaxVelocity = 0.15
	LeftShoulder.Name = "Left Shoulder"
	LeftShoulder.C0 = CFrame.new(-1, 0.5, 0, -0, -0, -1, 0, 1, 0, 1, 0, 0)
	LeftShoulder.C1 = CFrame.new(0.5, 0.5, 0, -0, -0, -1, 0, 1, 0, 1, 0, 0)
	LeftShoulder.Parent = Torso
	RightHip.Part0 = Torso
	RightHip.Part1 = Figure["Right Leg"]
	RightHip.MaxVelocity = 0.1
	RightHip.Name = "Right Hip"
	RightHip.C0 = CFrame.new(1, -1, 0, 0, 0, 1, 0, 1, 0, -1, -0, -0)
	RightHip.C1 = CFrame.new(0.5, 1, 0, 0, 0, 1, 0, 1, 0, -1, -0, -0)
	RightHip.Parent = Torso
	LeftHip.Part0 = Torso
	LeftHip.Part1 = Figure["Left Leg"]
	LeftHip.MaxVelocity = 0.1
	LeftHip.Name = "Left Hip"
	LeftHip.C0 = CFrame.new(-1, -1, 0, -0, -0, -1, 0, 1, 0, 1, 0, 0)
	LeftHip.C1 = CFrame.new(-0.5, 1, 0, -0, -0, -1, 0, 1, 0, 1, 0, 0)
	LeftHip.Parent = Torso
	Neck.Part0 = Torso
	Neck.Part1 = Figure["Head"]
	Neck.MaxVelocity = 0.1
	Neck.Name = "Neck"
	Neck.C0 = CFrame.new(0, 1, 0, -1, -0, -0, 0, 0, 1, 0, 1, 0)
	Neck.C1 = CFrame.new(0, -0.5, 0, -1, -0, -0, 0, 0, 1, 0, 1, 0)
	Neck.Parent = Torso
	local toolAnim = "None"
	local toolAnimTime = 0
	SpawnModel = Instance.new("Model")
	function onRunning(speed)
		if speed>0 then
			pose = "Running"
		else
			pose = "Standing"
		end
	end
	function CheckTag(Tag)
		if char:FindFirstChild("IsLocalEnemy") == nil and char:FindFirstChild("IsAZombie") == nil and Tag.ClassName == "ObjectValue" and Tag.Value ~= nil and Tag.Value.ClassName == "Player" and Tag.Value.Character ~= nil then
			if Tag.Value.Character:FindFirstChild("IsLocalEnemy") == nil then
				if (char.IsOnTeam.Value == true and IsInCombat == false and char.IsOnTeam.Team.Value == Tag.Value.TeamColor) or char.IsOnTeam.Value == false then
					local Tag2 = Instance.new("CFrameValue", Tag.Value.Character)
					Tag2.Name = "IsLocalEnemy"
					print(Tag.Value.Character.Name .." Has Become An Outlaw")
				end
			end
			if Tag.Value.Character:FindFirstChild("Loc" ..char.Name) ~= nil then
				Tag.Value.Character:FindFirstChild("Loc" ..char.Name):Remove()
			end
			local Found = Instance.new("CFrameValue", Tag.Value.Character)
			Found.Name = "Loc" ..char.Name
			game:GetService("Debris"):AddItem(Found, 3)
		elseif char:FindFirstChild("IsLocalEnemy") == nil and char:FindFirstChild("IsAZombie") == nil and Tag.ClassName == "StringValue" and game.Players:FindFirstChild(Tag.Value) ~= nil and game.Players[Tag.Value].Character ~= nil then
			if game.Players[Tag.Value].Character:FindFirstChild("IsLocalEnemy") == nil then
				if (char.IsOnTeam.Value == true and IsInCombat == false and char.IsOnTeam.Team.Value == game.Players[Tag.Value].TeamColor) or char.IsOnTeam.Value == false then
					local Tag2 = Instance.new("CFrameValue", game.Players[Tag.Value].Character)
					Tag2.Name = "IsLocalEnemy"
					print(Tag.Value .." Has Become An Outlaw")
				end
			end
			if game.Players[Tag.Value].Character:FindFirstChild("Loc" ..char.Name) ~= nil then
				game.Players[Tag.Value].Character:FindFirstChild("Loc" ..char.Name):Remove()
			end
			local Found = Instance.new("CFrameValue", game.Players[Tag.Value].Character)
			Found.Name = "Loc" ..char.Name
			game:GetService("Debris"):AddItem(Found, 3)
		elseif char:FindFirstChild("IsLocalEnemy") == nil and char:FindFirstChild("IsAZombie") == nil and Tag.ClassName == "StringValue" and game.Workspace:FindFirstChild(Tag.Value) ~= nil then
			if game.Workspace[Tag.Value]:FindFirstChild("IsLocalEnemy") == nil then
				if (char.IsOnTeam.Value == true and IsInCombat == false and Workspace[Tag.Value].IsOnTeam.Value == true and char.IsOnTeam.Team.Value == Workspace[Tag.Value].IsOnTeam.Team.Value) or char.IsOnTeam.Value == false or Workspace[Tag.Value].IsOnTeam.Value == false then
					local Tag2 = Instance.new("CFrameValue", game.Workspace[Tag.Value])
					Tag2.Name = "IsLocalEnemy"
					print(Tag.Value .." Has Become An Outlaw")
				end
			end
			if game.Workspace[Tag.Value]:FindFirstChild("Loc" ..char.Name) ~= nil then
				game.Workspace[Tag.Value]:FindFirstChild("Loc" ..char.Name):Remove()
			end
			local Found = Instance.new("CFrameValue", game.Workspace[Tag.Value])
			Found.Name = "Loc" ..char.Name
			game:GetService("Debris"):AddItem(Found, 3)
		elseif (char:FindFirstChild("IsLocalEnemy") ~= nil or char:FindFirstChild("IsAZombie") ~= nil) and Tag.ClassName == "ObjectValue" and Tag.Value ~= nil and Tag.Value.ClassName == "Player" and Tag.Value.Character ~= nil then
			local Found = Instance.new("CFrameValue", Tag.Value.Character)
			Found.Name = "Loc" ..char.Name
			game:GetService("Debris"):AddItem(Found, 3)
		elseif (char:FindFirstChild("IsLocalEnemy") ~= nil or char:FindFirstChild("IsAZombie") ~= nil) and Tag.ClassName == "StringValue" and game.Workspace:FindFirstChild(Tag.Value) ~= nil then
			local Found = Instance.new("CFrameValue", game.Workspace[Tag.Value])
			Found.Name = "Loc" ..char.Name
			game:GetService("Debris"):AddItem(Found, 3)
		end
	end
	function CheckSpawns(Object)
		local Parts = Object:GetChildren()
		for Check = 1, #Parts do
			if Parts[Check].className == "SpawnLocation" then
				local I = Instance.new("Vector3Value", SpawnModel)
				I.Value = Parts[Check].Position
			end
			CheckSpawns(Parts[Check])
		end
	end
	function onDied()
		pose = "Dead"
		Delay(5, function()
			if char.Respawn.Value == true then
				CheckSpawns(Workspace)
				local Spawn = SpawnModel:GetChildren()
				--Clone.Parent = game.Workspace
				if #Spawn > 0 then
					Spawn = Spawn[math.random(1, #Spawn)].Value
					--Clone:MoveTo(Spawn)
				else
					--Clone:MoveTo(Vector3.new(0, 50, 0))
				end
			end
			Figure:Remove()
			return
		end)
	end
	function onJumping()
		pose = "Jumping"
	end
	function onClimbing()
		pose = "Climbing"
	end
	function onGettingUp()
		pose = "GettingUp"
	end
	function onFreeFall()
		pose = "FreeFall"
	end
	function onFallingDown()
		pose = "FallingDown"
	end
	function onSeated()
		pose = "Seated"
	end
	function onPlatformStanding()
		pose = "PlatformStanding"
	end
	function moveJump()
		RightShoulder.MaxVelocity = 0.5
		LeftShoulder.MaxVelocity = 0.5
		RightShoulder.DesiredAngle = (3.14/ZStat)
		LeftShoulder.DesiredAngle = (-3.14/ZStat)
		RightHip.DesiredAngle = (0)
		LeftHip.DesiredAngle = (0)
	end
	function moveFreeFall()
		RightShoulder.MaxVelocity = 0.5
		LeftShoulder.MaxVelocity = 0.5
		RightShoulder.DesiredAngle = (3.14/ZStat)
		LeftShoulder.DesiredAngle = (-3.14/ZStat)
		RightHip.DesiredAngle = (0)
		LeftHip.DesiredAngle = (0)
	end
	function moveSit()
		RightShoulder.MaxVelocity = 0.15
		LeftShoulder.MaxVelocity = 0.15
		RightShoulder.DesiredAngle = (3.14 /2)
		LeftShoulder.DesiredAngle = (-3.14 /2)
		RightHip.DesiredAngle = (3.14 /2)
		LeftHip.DesiredAngle = (-3.14 /2)
	end
	function getTool()
		for _, kid in ipairs(Figure:GetChildren()) do
			if kid.className == "Tool" then return kid end
		end
		return nil
	end
	function getToolAnim(tool)
		for _, c in ipairs(tool:GetChildren()) do
			if c.Name == "toolanim" and c.className == "StringValue" then
				return c
			end
		end
		return nil
	end
	function animateTool()
		if (toolAnim == "None") then
			RightShoulder.DesiredAngle = (1.57)
			return
		end
		if (toolAnim == "Slash") then
			RightShoulder.MaxVelocity = 0.5
			RightShoulder.DesiredAngle = (0)
			return
		end
		if (toolAnim == "Lunge") then
			RightShoulder.MaxVelocity = 0.5
			LeftShoulder.MaxVelocity = 0.5
			RightHip.MaxVelocity = 0.5
			LeftHip.MaxVelocity = 0.5
			RightShoulder.DesiredAngle = (1.57)
			LeftShoulder.DesiredAngle = (1.0)
			RightHip.DesiredAngle = (1.57)
			LeftHip.DesiredAngle = (1.0)
			return
		end
	end
	function move(time)
		local amplitude
		local frequency
		if (pose == "Jumping") then
			moveJump()
			return
		end
		if (pose == "FreeFall") then
			moveFreeFall()
			return
		end
		if (pose == "Seated") then
			moveSit()
			return
		end
		local climbFudge = 0
		if (pose == "Running") then
			RightShoulder.MaxVelocity = 0.15
			LeftShoulder.MaxVelocity = 0.15
			amplitude = 1
			frequency = 9
		elseif (pose == "Climbing") then
			RightShoulder.MaxVelocity = 0.5
			LeftShoulder.MaxVelocity = 0.5
			amplitude = 1
			frequency = 9
			climbFudge = 3.14
		else
			amplitude = 0.1
			frequency = 1
		end
		desiredAngle = amplitude * math.sin(time*frequency)
		RightShoulder.DesiredAngle = (desiredAngle + climbFudge) + ZStat2
		LeftShoulder.DesiredAngle = (desiredAngle - climbFudge) -ZStat2
		RightHip.DesiredAngle = (-desiredAngle)
		LeftHip.DesiredAngle = (-desiredAngle)
		local tool = getTool()
		if tool then
			animStringValueObject = getToolAnim(tool)
			if animStringValueObject then
				toolAnim = animStringValueObject.Value
				animStringValueObject.Parent = nil
				toolAnimTime = time + .3
			end
			if time > toolAnimTime then
				toolAnimTime = 0
				toolAnim = "None"
			end
			animateTool()
		else
			toolAnim = "None"
			toolAnimTime = 0
		end
	end
	Humanoid.Died:connect(onDied)
	Humanoid.Running:connect(onRunning)
	Humanoid.Jumping:connect(onJumping)
	Humanoid.Climbing:connect(onClimbing)
	Humanoid.GettingUp:connect(onGettingUp)
	Humanoid.FreeFalling:connect(onFreeFall)
	Humanoid.FallingDown:connect(onFallingDown)
	Humanoid.Seated:connect(onSeated)
	Humanoid.PlatformStanding:connect(onPlatformStanding)
	Humanoid.ChildAdded:connect(CheckTag)
	OriginalTime = 0.1
	Time = OriginalTime
	while Figure.Parent~=nil do
		Time = Time + 0.1
		wait(OriginalTime)
		move(Time)
	end
end)
Delay(0, function() --lah30303's Pathing Script
	function CalcMoves(map, px, py, tx, ty)
		if map[ty][tx] ~= 0 then
			return nil
		end
		local openlist, closedlist, listk, closedk, tempH, tempG, xsize, ysize, curbase = {}, {}, 1, 0, math.abs(px - tx) + math.abs(py - ty), 0, #map[1], #map, {}
		openlist[1] = {x = px, y = py, g = 0, h = tempH, f = 0 + tempH ,par = 1}
		local nodenumber = 0
		while listk > 0 do
			nodenumber = nodenumber + 1
			if nodenumber / ScanSkip == math.floor(nodenumber / ScanSkip) then
				wait()
				if DebugPathing == true then
					print("Node", nodenumber)
				end
			end
			closedk = closedk + 1
			table.insert(closedlist, closedk, openlist[1])
			curbase = closedlist[closedk]
			if closedlist[closedk].x == tx and closedlist[closedk].y == ty then
				return closedlist
			end
			openlist[1] = openlist[listk]
			table.remove(openlist, listk)
			listk = listk - 1
			local v = 1
			while true do
				local u = v
				if 2 * u + 1 <= listk then
					if openlist[u].f >= openlist[2 * u].f then
						v = 2 * u
					end
					if openlist[v].f >= openlist[2 * u + 1].f then
						v = 2 * u + 1
					end
				elseif 2 * u <= listk then
					if openlist[u].f >= openlist[2 * u].f then
						v = 2 * u
					end
				end
				if u ~= v then
					local temp = openlist[u]
					openlist[u] = openlist[v]
					openlist[v] = temp
				else
					break
				end
			end

			local tocheck = {{1, 0}, {-1, 0}, {0, 1}, {0, -1}, {-1, -1}, {1, -1}, {-1, 1}, {1, 1}} --[1]Right, [2]Left, [3]Down, [4]Up, [5]UpLeft, [6]UpRight, [7]DownLeft, [8]DownRight
			if closedk > 0 then
				for k = 1, closedk do
					for i, v in pairs(tocheck) do
						if closedlist[k].x == curbase.x + v[1] and closedlist[k].y == curbase.y + v[2] then
							tocheck[i] = nil
						end
					end
				end
			end
			for i, v in pairs(tocheck) do
				local a = curbase.x + v[1]
				local b = curbase.y + v[2]
				if a > xsize or a < 1 or b > ysize or b < 1 then
					tocheck[i] = nil
				end
			end
			for i, v in pairs(tocheck) do
				local a, b = curbase.x + v[1], curbase.y + v[2]
				if a <= xsize and a >= 1 and b <= ysize and b >= 1 and map[b][a] ~= 0 then
					tocheck[i] = nil
				end
			end
			tempG = curbase.g + 1
			tempDiagG = curbase.g + 1.4
			for k = 1, listk do
				for i, v in pairs(tocheck) do
					if openlist[k].x == curbase.x + v[1] and openlist[k].y == curbase.y + 1 and openlist[k].g > tempG then
						tempH = math.abs((curbase.x + v[1])-tx) + math.abs((curbase.y + v[1])-ty)
						table.insert(openlist, k, {x = curbase.x + v[1], y = curbase.y + v[2], g = tempG, h = tempH, f = tempG + tempH, par = closedk})
						local m = k
						while m ~= 1 do
							if openlist[m].f <= openlist[math.floor(m/2)].f then
								temp = openlist[math.floor(m/2)]
								openlist[math.floor(m/2)] = openlist[m]
								openlist[m] = temp
								m = math.floor(m/2)
							else
								break
							end
							tocheck[i] = nil
						end
					end
				end
			end
			for i, v in pairs(tocheck) do
				listk = listk + 1
				tempH = math.abs((curbase.x + v[1]) - tx) + math.abs((curbase.y + v[2]) - ty)
				table.insert(openlist, listk, {x = curbase.x + v[1], y = curbase.y + v[2], g = tempG, h = tempH, f = tempG+tempH, par = closedk})
				m = listk
				while m ~= 1 do
					if openlist[m].f <= openlist[math.floor(m/2)].f then
						temp = openlist[math.floor(m/2)]
						openlist[math.floor(m/2)] = openlist[m]
						openlist[m] = temp
						m = math.floor(m/2)
					else
						break
					end
				end
			end
		end
		return nil
	end


	function CalcPath(closedlist)

		if closedlist == nil or table.getn(closedlist) == 1 then
			return nil
		end
		local path = {}
		local pathIndex = {}
		local last = table.getn(closedlist)
		table.insert(pathIndex,1,last)

		local i = 1
		while pathIndex[i] > 1 do
			i = i + 1
			table.insert(pathIndex, i, closedlist[pathIndex[i - 1]].par)
		end

		for n = table.getn(pathIndex) - 1, 1, -1 do
			table.insert(path, {x = closedlist[pathIndex[n]].x, y = closedlist[pathIndex[n]].y})
		end

		closedlist = nil
		return path
	end
end)
Delay(0, function() --Main Artificial Intelligence Scripting/Path Grid Generator
	local Base
	if char:FindFirstChild("BASE") == nil then
		Base = Instance.new("Part")
		Base.Transparency = 1
		Base.TopSurface = "Smooth"
		Base.BottomSurface = "Smooth"
		Base.CanCollide = false
		Base.Anchored = true
		Base.Locked = true
		Base.BrickColor = BrickColor.new(0, 0, 0)
		Base.Name = "BASE"
		Base.CFrame = CFrame.new(Vector3.new(0, 0, 0))
		Base.Parent = char
	else
		Base = char.BASE
		Base.CFrame = CFrame.new(Vector3.new(0, 0, 0))
	end
	function Jump()
		--char.Humanoid.Jump = true
	end
	function Check(Hit)
		if Hit ~= nil and Hit.Parent ~= nil and Hit.Parent.Parent ~= nil then
			if Hit.Parent:FindFirstChild("Humanoid") == nil and Hit.Parent.Parent:FindFirstChild("Humanoid") == nil then
				Jump()
			end
		end
	end
	char.Torso.Touched:connect(Check)
	function Prep(Target, Current, Attempts)
		if Attempts == nil then
			Attempts = 1000
		end
		local Hit = false
		local Tag = Base:Clone()
		Tag.Position = Target
		Tag.Parent = char
		local TagRay = Ray.new(Tag.CFrame.p, (CFrame.new(Tag.CFrame.p - Vector3.new(0, 3, 0)).p - Tag.CFrame.p).Unit * 40)
		local TRHit, TRPos = game.Workspace:FindPartOnRay(TagRay, char)
		if TRHit ~= nil then
			Hit = true
		end
		if Tag.Parent ~= nil then
			Tag:Remove()
		end
		if Hit == false and Attempts > 0 and char.Wander.Value == true then
			Prep(char.Torso.Position + Vector3.new(math.random(-100, 100), 0, math.random(-100, 100)), Base, Attempts - 1)
		elseif char.Wander.Value == true then
			local TargetRay = Ray.new(char.Torso.CFrame.p, (CFrame.new(Target).p - char.Torso.CFrame.p).Unit * ((Target - char.Torso.Position).Magnitude - 3))
			local THit, TPos = game.Workspace:FindPartOnRay(TargetRay, char)
			local TrueTarget = char.Torso.Position
			if THit ~= nil then
				for HazardCheck = 1, math.floor((char.Torso.CFrame.p - TPos).Magnitude) do
					local TR2 = Ray.new(char.Torso.CFrame.p + (TPos - char.Torso.CFrame.p).Unit * HazardCheck, Vector3.new(0, -50, 0) + (TPos - char.Torso.CFrame.p).Unit * 3)
					local TH2, TP2 = game.Workspace:FindPartOnRay(TR2, char)
					if TH2 ~= nil and TH2.Name ~= "Lava" then
						TrueTarget = TP2
					else
						break
					end
				end
			else
				for HazardCheck = 1, math.floor((char.Torso.CFrame.p - Target).Magnitude) do
					local TR2 = Ray.new(char.Torso.CFrame.p + (Target - char.Torso.CFrame.p).Unit * HazardCheck, Vector3.new(0, -50, 0) + (TPos - char.Torso.CFrame.p).Unit * 3)
					local TH2, TP2 = game.Workspace:FindPartOnRay(TR2, char)
					if TH2 ~= nil and TH2.Name ~= "Lava" then
						TrueTarget = TP2
					else
						break
					end
				end
			end
			--char.Humanoid:MoveTo(TrueTarget, Current)
		end
	end
	function ZHit(Part)
		if char:FindFirstChild("IsAZombie") ~= nil and char.Humanoid.Health > 0 and Part ~= nil and Part.Parent ~= nil and Part.Parent:FindFirstChild("Humanoid") ~= nil and Part.Parent:FindFirstChild("IsAZombie") == nil then
			Part.Parent.Humanoid:TakeDamage(2)
			char.Humanoid.MaxHealth = char.Humanoid.MaxHealth + 1
			char.Humanoid:TakeDamage(-1)
		end
	end
	char["Right Arm"].Touched:connect(ZHit)
	char["Left Arm"].Touched:connect(ZHit)
	CurrentMap = {}
	MapMask = {}
	MapVar = {0, 0, 0, 0, 0}
	BlockScanned = 0
	ScanSkip = 5
	DebugPathing = true
	function GenerateMap(PathPos)
		CurrentMap = {}
		MapMask = {}
		MapVar = {0, 0, 0, 0, 0}
		BlockScanned = 0
		MapVariables = ScanParts(Workspace, 1)
		for MapX = 1, math.max(-MapVariables[1], MapVariables[2]) * 2 + 1 do
			CurrentMap[MapX] = {}
			for MapY = 1, math.max(-MapVariables[3], MapVariables[4]) * 2 + 1 do
				CurrentMap[MapX][MapY] = 0
			end
		end
		for MaskX = 1, #CurrentMap do
			MapMask[MaskX] = {}
			for MaskY = 1, #CurrentMap[MaskX] do
				MapMask[MaskX][MaskY] = {MapVariables[1] + MaskX - 0.5, MapVariables[1] + MaskY - 0.5}
			end
		end
		ScanParts(Workspace, 2, MapVariables)
		wait(1)
		if char.PrintMap.Value == true then
			print("Printing Map...")
			for ClearPrint = 1, 250 do
				wait()
				print()
			end
			for PrintX = 1, #CurrentMap do
				local PrintZ = ""
				for PrintY = 1, #CurrentMap[PrintX] do
					PrintZ = PrintZ ..CurrentMap[PrintX][PrintY]
				end
				print(PrintZ)
				wait(0.1)
			end
		end
		local MapCoords = {0, 0, 0, 0}
		local Distance = math.huge
		for MPX = 1, #CurrentMap do
			for MPY = 1, #CurrentMap[MPX] do
				if (Vector3.new(MapMask[MPX][MPY][1], 0, MapMask[MPX][MPY][2]) - Vector3.new(char.Torso.Position.X, 0, char.Torso.Position.Z)).Magnitude < Distance then
					MapCoords = {MPX, MPY, 0, 0}
					Distance = (Vector3.new(MapMask[MPX][MPY][1], 0, MapMask[MPX][MPY][2]) - Vector3.new(char.Torso.Position.X, 0, char.Torso.Position.Z)).Magnitude
				end
			end
		end
		local Distance = math.huge
		for MPX = 1, #CurrentMap do
			for MPY = 1, #CurrentMap[MPX] do
				if (Vector3.new(MapMask[MPX][MPY][1], 0, MapMask[MPX][MPY][2]) - Vector3.new(char.PathTo.Value.X, 0, char.PathTo.Value.Z)).Magnitude < Distance then
					MapCoords = {MapCoords[1], MapCoords[2], math.min(MPX, #CurrentMap) - 1, math.min(MPY, #CurrentMap[1] - 1)}
					Distance = (Vector3.new(MapMask[MPX][MPY][1], 0, MapMask[MPX][MPY][2]) - Vector3.new(char.PathTo.Value.X, 0, char.PathTo.Value.Z)).Magnitude
				end
			end
		end
		for i, v in pairs(CalcPath(CalcMoves(CurrentMap, MapCoords[1], MapCoords[2], MapCoords[3], MapCoords[4]))) do
			local Timer = 20
			local pX = v["x"]
			local pY = v["y"]
			local pTo = Vector3.new(MapMask[pX][pY][1], 0, MapMask[pX][pY][2])
			pTo = pTo + (pTo - Vector3.new(char.Torso.Position.X, 0, char.Torso.Position.Z)).Unit
			while (Vector3.new(char.Torso.Position.X, 0, char.Torso.Position.Z) - pTo).Magnitude > 2.5 and Timer > 0 do
				--char.Humanoid:MoveTo(pTo, Base)
				Timer = Timer - 1
				if Timer == 10 then
					--char.Humanoid.Jump = true
				end
				wait(0.1)
			end
			if Timer == 0 then
				if (Vector3.new(char.Torso.Position.X, 0, char.Torso.Position.Z) - pTo).Magnitude <= 5 then
					char.Torso.CFrame = char.Torso.CFrame + (pTo - Vector3.new(char.Torso.Position.X, 0, char.Torso.Position.Z)).Unit * (pTo - Vector3.new(char.Torso.Position.X, 0, char.Torso.Position.Z)).Magnitude
				else
					break
				end
			end
		end
	end
	function ScanParts(CurrentModel, CurrentStage, Variables)
		local X = CurrentModel:GetChildren()
		for I = 1, #X do
			if #X[I]:GetChildren() > 0 then
				ScanParts(X[I], 1, Variables)
			end
			if X[I].ClassName == "Part" or X[I].ClassName == "WedgePart" or X[I].ClassName == "CornerWedgePart" or X[I].ClassName == "TrussPart" or X[I].ClassName == "SpawnLocation" or X[I].ClassName == "Seat" or X[I].ClassName == "VehicleSeat" or X[I].ClassName == "SkateboardPlatform" then
				BlockScanned = BlockScanned + 1
				if BlockScanned / ScanSkip == math.floor(BlockScanned / ScanSkip) then
					wait()
					if DebugPathing == true then
						print("Block", BlockScanned)
					end
				end
				if CurrentStage == 1 then
					MapVar[1] = math.min(math.ceil(X[I].Position.X - X[I].Size.X / 2), MapVar[1])
					MapVar[2] = math.max(math.floor(X[I].Position.X + X[I].Size.X / 2), MapVar[2])
					MapVar[3] = math.min(math.ceil(X[I].Position.Z - X[I].Size.Z / 2), MapVar[3])
					MapVar[4] = math.max(math.floor(X[I].Position.Z + X[I].Size.Z / 2), MapVar[4])
				elseif CurrentStage == 2 and ((X[I].Position.Y + X[I].Size.Y / 2 > char.Torso.Position.Y + 2 and X[I].Position.Y - X[I].Size.Y / 2 < char.Torso.Position.Y + 2) or X[I].Position.Y + X[I].Size.Y / 2 < char.Torso.Position.Y - 8) then
					local BlockStart = {X[I].Position.X - X[I].Size.X / 2, X[I].Position.Z - X[I].Size.Z / 2}
					local BlockEnd = {X[I].Position.X + X[I].Size.X / 2, X[I].Position.Z + X[I].Size.Z / 2}
					local BlockCoords = {0, 0, 0, 0}
					local Distance = math.huge
					for MPX = 1, #CurrentMap do
						for MPY = 1, #CurrentMap[MPX] do
							if (Vector3.new(MapMask[MPX][MPY][1], 0, MapMask[MPX][MPY][2]) - Vector3.new(BlockStart[1], 0, BlockStart[2])).Magnitude < Distance then
								BlockCoords = {MPX, MPY, 0, 0}
								Distance = (Vector3.new(MapMask[MPX][MPY][1], 0, MapMask[MPX][MPY][2]) - Vector3.new(BlockStart[1], 0, BlockStart[2])).Magnitude
							end
						end
					end
					local Distance = math.huge
					for MPX = 1, #CurrentMap do
						for MPY = 1, #CurrentMap[MPX] do
							if (Vector3.new(MapMask[MPX][MPY][1], 0, MapMask[MPX][MPY][2]) - Vector3.new(BlockEnd[1], 0, BlockEnd[2])).Magnitude < Distance then
								BlockCoords = {BlockCoords[1], BlockCoords[2], MPX, MPY}
								Distance = (Vector3.new(MapMask[MPX][MPY][1], 0, MapMask[MPX][MPY][2]) - Vector3.new(BlockEnd[1], 0, BlockEnd[2])).Magnitude
							end
						end
					end
					for XGrid = BlockCoords[2], BlockCoords[4] do
						for YGrid = BlockCoords[1], BlockCoords[3] do
							CurrentMap[XGrid][YGrid] = 1
						end
					end
				end
			end
		end
		if CurrentStage == 1 then
			MapVar[5] = {MapVar[1] + MapVar[2] / 2, MapVar[3] + MapVar[4] / 2}
			return MapVar
		end
	end
	IsInCombat = false
	while char.Humanoid.Health > 0 and char:FindFirstChild("IsAZombie") == nil do
		local Distance = 100
		local Target = nil
		IsInCombat = false
		local Players = Workspace:GetChildren()
		for Check = 1, #Players do
			if Players[Check] ~= char and ((Players[Check]:FindFirstChild("Humanoid") ~= nil and (Players[Check]:FindFirstChild("IsAZombie") ~= nil or Players[Check]:FindFirstChild("IsLocalEnemy") ~= nil or char:FindFirstChild("IsLocalEnemy") ~= nil or (char.IsOnTeam.Value == true and Players[Check]:FindFirstChild("IsOnTeam") ~= nil and Players[Check].IsOnTeam.Value == true and char.IsOnTeam.Team.Value ~= Players[Check].IsOnTeam.Team.Value) or (game.Players:GetPlayerFromCharacter(Players[Check]) ~= nil and char.IsOnTeam.Value == true and game.Players:GetPlayerFromCharacter(Players[Check]).Neutral == false and game.Players:GetPlayerFromCharacter(Players[Check]).TeamColor ~= char.IsOnTeam.Team.Value)) and Players[Check].Humanoid.Health > 0) or (Players[Check]:FindFirstChild("Zombie") ~= nil and Players[Check].Zombie.ClassName == "Humanoid" and Players[Check].Zombie.Health > 0)) and Players[Check]:FindFirstChild("Torso") ~= nil and (Players[Check].Torso.Position - char.Torso.Position).Magnitude <= 100 then
				local Ray = Ray.new(char.Torso.CFrame.p, (Players[Check].Torso.CFrame.p - char.Torso.CFrame.p).Unit * 100)
				local Hit, Position = game.Workspace:FindPartOnRay(Ray, char)
				if Hit ~= nil and Hit.Parent ~= nil and ((Hit.Parent:FindFirstChild("Humanoid") ~= nil and Hit.Parent == Players[Check]) or (Hit.Parent.Parent ~= nil and Hit.Parent.Parent:FindFirstChild("Humanoid") ~= nil and Hit.Parent.Parent == Players[Check])) then
					local TeamTag = nil
					local Parts = Players[Check]:GetChildren()
					for X = 1, #Parts do
						if Parts[X].Name == "TeamLoc" then
							if Parts[X].Value == char.IsOnTeam.Team.Value then
								TeamTag = Parts[X]
							end
						end
					end
					if Players[Check]:FindFirstChild("Loc" ..char.Name) ~= nil or Parts[X] ~= nil or (Players[Check].Torso.Position - (char.Torso.Position + char.Torso.CFrame.lookVector * 50)).Magnitude <= 52 then
						if char.IsOnTeam.Value == false then
							if Players[Check]:FindFirstChild("Loc" ..char.Name) ~= nil then
								Players[Check]:FindFirstChild("Loc" ..char.Name):Remove()
							end
							local Found = Instance.new("CFrameValue", Players[Check])
							Found.Name = "Loc" ..char.Name
							game:GetService("Debris"):AddItem(Found, 3)
						else
							if Parts[X] ~= nil then
								Parts[X]:Remove()
							end
							local Found = Instance.new("BrickColorValue", Players[Check])
							Found.Name = "TeamLoc"
							Found.Value = char.IsOnTeam.Team.Value
							game:GetService("Debris"):AddItem(Found, 3)
							if Players[Check]:FindFirstChild("Loc" ..char.Name) ~= nil then
								Players[Check]:FindFirstChild("Loc" ..char.Name):Remove()
							end
							local Found = Instance.new("CFrameValue", Players[Check])
							Found.Name = "Loc" ..char.Name
							game:GetService("Debris"):AddItem(Found, 3)
						end
					end
					if Players[Check]:FindFirstChild("Loc" ..char.Name) ~= nil and (Players[Check].Torso.Position - char.Torso.Position).Magnitude <= Distance then
						Target = Players[Check].Torso
						Distance = (Target.Position - char.Torso.Position).Magnitude
					end
				end
			end
		end
		if Target == nil then
			local HasTool = false
			local ToolCheck = char:GetChildren()
			for Check = 1, #ToolCheck do
				if ToolCheck[Check].ClassName == "Tool" then
					HasTool = true
				end
			end
			if HasTool == false then
				Distance = 100
				for Check = 1, #Players do
					if Players[Check].ClassName == "Tool" and Players[Check]:FindFirstChild("Handle") ~= nil and Players[Check]:FindFirstChild("Active") ~= nil and Players[Check]:FindFirstChild("TargetPos") ~= nil and Players[Check]:FindFirstChild("Type") ~= nil and (Players[Check].Handle.Position - char.Torso.Position).Magnitude <= Distance then
						local Ray = Ray.new(char.Torso.CFrame.p, (Players[Check].Handle.CFrame.p - char.Torso.CFrame.p).Unit * 100)
						local Hit, Position = game.Workspace:FindPartOnRay(Ray, char)
						if Hit ~= nil and Hit.Parent ~= nil and Hit.Parent == Players[Check] then
							Distance = (Players[Check].Handle.Position - char.Torso.Position).Magnitude
							Target = Players[Check]
						end
					end
				end
				if Target ~= nil and Target.ClassName == "Tool" then
					if Distance <= 5 and HasTool == false then
						Target.Parent = char
						HasTool = true
					else
						Prep(Target.Handle.Position, Base)
					end
				else
					for Check = 1, #Players do
						if Players[Check].Name == "Crate" and Players[Check]:FindFirstChild("OpenCrate") ~= nil and Players[Check].OpenCrate.Value == false and (Players[Check].Position - char.Torso.Position).Magnitude <= Distance then
							local Ray = Ray.new(char.Torso.CFrame.p, (Players[Check].CFrame.p - char.Torso.CFrame.p).Unit * 100)
							local Hit, Position = game.Workspace:FindPartOnRay(Ray, char)
							if Hit ~= nil and Hit == Players[Check] then
								Target = Players[Check]
								Distance = (Target.Position - char.Torso.Position).Magnitude
							end
						end
					end
					if Target ~= nil then
						--char.Humanoid:MoveTo(Target.Position, Target)
						if (Target.Position - char.Torso.Position).Magnitude <= 10 then
							Target.OpenCrate.Value = true
						end
					else
						local HasHat = false
						local HatCheck = char:GetChildren()
						for Check = 1, #HatCheck do
							if ToolCheck[Check].ClassName == "Hat" then
								HasHat = true
							end
						end
						if HasHat == false then
							Distance = 100
							for Check = 1, #Players do
								if Players[Check].ClassName == "Hat" and Players[Check]:FindFirstChild("Handle") ~= nil and (Players[Check].Handle.Position - char.Torso.Position).Magnitude <= Distance then
									local Ray = Ray.new(char.Torso.CFrame.p, (Players[Check].Handle.CFrame.p - char.Torso.CFrame.p).Unit * 100)
									local Hit, Position = game.Workspace:FindPartOnRay(Ray, char)
									if Hit ~= nil and Hit.Parent ~= nil and Hit.Parent == Players[Check] then
										Distance = (Players[Check].Handle.Position - char.Torso.Position).Magnitude
										Target = Players[Check]
									end
								end
							end
							if Target ~= nil and Target.ClassName == "Hat" then
								if Distance <= 5 and HasHat == false then
									Target.Parent = char
									HasHat = true
								else
									Prep(Target.Handle.Position, Base)
								end
							else
								if char.Humanoid.PlatformStand == false and char.Humanoid.Sit == false then
									if char.PathTo.Value ~= Vector3.new(0, 0, 0) then
										GenerateMap(char.PathTo.Value)
										char.PathTo.Value = Vector3.new(0, 0, 0)
									elseif math.random(1, 10) == 1 and char.Wander.Value == true then
										Prep(char.Torso.Position + Vector3.new(math.random(-100, 100), 0, math.random(-100, 100)), Base)
									end
								else
									Jump()
								end
							end
						end
					end
				end
			else
				if Target == nil then
					local Distance = 80
					local Players = Workspace:GetChildren()
					for Check = 1, #Players do
						if Players[Check]:FindFirstChild("Humanoid") ~= nil and Players[Check] ~= char and Players[Check]:FindFirstChild("IsLocalEnemy") == nil and Players[Check]:FindFirstChild("Leader") ~= nil and Players[Check].Humanoid.Health > 0 and Players[Check]:FindFirstChild("Torso") ~= nil and (Players[Check].Torso.Position - char.Torso.Position).Magnitude <= Distance then
							local Ray = Ray.new(char.Torso.CFrame.p, (Players[Check].Torso.CFrame.p - char.Torso.CFrame.p).Unit * 100)
							local Hit, Position = game.Workspace:FindPartOnRay(Ray, char)
							if Hit ~= nil and Hit.Parent ~= nil and ((Hit.Parent:FindFirstChild("Humanoid") ~= nil and Hit.Parent == Players[Check]) or (Hit.Parent.Parent ~= nil and Hit.Parent.Parent:FindFirstChild("Humanoid") ~= nil and Hit.Parent.Parent == Players[Check])) then
								Target = Players[Check].Torso
								Distance = (Target.Position - char.Torso.Position).Magnitude
							end
						end
					end
					if Target ~= nil then
						local Position = Target.Position + (char.Torso.Position - Target.Position).Unit * 10
						Prep(Position, Base)
					else
						if char.Humanoid.PlatformStand == false and char.Humanoid.Sit == false then
							if char.PathTo.Value ~= Vector3.new(0, 0, 0) then
								GenerateMap(char.PathTo.Value)
								char.PathTo.Value = Vector3.new(0, 0, 0)
							elseif math.random(1, 10) == 1 and char.Wander.Value == true then
								Prep(char.Torso.Position + Vector3.new(math.random(-100, 100), 0, math.random(-100, 100)), Base)
							end
						else
							Jump()
						end
					end
				else
					if char.Humanoid.PlatformStand == false and char.Humanoid.Sit == false then
						if char.PathTo.Value ~= Vector3.new(0, 0, 0) then
							GenerateMap(char.PathTo.Value)
							char.PathTo.Value = Vector3.new(0, 0, 0)
						elseif math.random(1, 10) == 1 and char.Wander.Value == true then
							Prep(char.Torso.Position + Vector3.new(math.random(-100, 100), 0, math.random(-100, 100)), Base)
						end
					else
						Jump()
					end
				end
			end
		else
			local Weapon = nil
			local ToolCheck = char:GetChildren()
			for Check = 1, #ToolCheck do
				if ToolCheck[Check].ClassName == "Tool" then
					Weapon = ToolCheck[Check]
				end
			end
			if Weapon ~= nil and Weapon:FindFirstChild("Active") ~= nil and Weapon:FindFirstChild("TargetPos") ~= nil and Weapon:FindFirstChild("Type") ~= nil then
				if Weapon.Type.Value == "Melee" then
					Prep(Target.Position + Vector3.new(math.random(-3, 3), 0, math.random(-3, 3)), Target)
					if (Target.Position - char.Torso.Position).Magnitude <= 10 then
						Weapon.TargetPos.Value = Target.Position + Vector3.new(math.random(-2, 2), math.random(-2, 2), math.random(-2, 2))
						Weapon.Active.Value = true
					end
				elseif Weapon.Type.Value == "Melee/Ranged" then
					if Distance <= 10 then
						Prep(Target.Position + Vector3.new(math.random(-3, 3), 0, math.random(-3, 3)), Target)
						Weapon.TargetPos.Value = Target.Position + Vector3.new(math.random(-2, 2), math.random(-2, 2), math.random(-2, 2))
						Weapon.Active.Value = true
					else
						Prep(Target.Position + (char.Torso.Position - Target.Position).Unit * 40, Base)
						if (Target.Position - char.Torso.Position).Magnitude <= 50 then
							Weapon.TargetPos.Value = Target.Position + Vector3.new(math.random(-2, 2), math.random(-2, 2), math.random(-2, 2))
							Weapon.Active.Value = true
						end
					end
				elseif Weapon.Type.Value == "Melee/RangedMed" then
					if Distance <= 10 then
						Prep(Target.Position + Vector3.new(math.random(-3, 3), 0, math.random(-3, 3)), Target)
						Weapon.TargetPos.Value = Target.Position + Vector3.new(math.random(-2, 2), math.random(-2, 2), math.random(-2, 2))
						Weapon.Active.Value = true
					else
						Prep(Target.Position + (char.Torso.Position - Target.Position).Unit * 30, Base)
						if (Target.Position - char.Torso.Position).Magnitude <= 40 then
							Weapon.TargetPos.Value = Target.Position + Vector3.new(math.random(-2, 2), math.random(-2, 2), math.random(-2, 2))
							Weapon.Active.Value = true
						end
					end
				elseif Weapon.Type.Value == "Melee/RangedClose" then
					if Distance <= 10 then
						Prep(Target.Position + Vector3.new(math.random(-3, 3), 0, math.random(-3, 3)), Target)
						Weapon.TargetPos.Value = Target.Position + Vector3.new(math.random(-2, 2), math.random(-2, 2), math.random(-2, 2))
						Weapon.Active.Value = true
					else
						Prep(Target.Position + (char.Torso.Position - Target.Position).Unit * 20, Base)
						if (Target.Position - char.Torso.Position).Magnitude <= 30 then
							Weapon.TargetPos.Value = Target.Position + Vector3.new(math.random(-2, 2), math.random(-2, 2), math.random(-2, 2))
							Weapon.Active.Value = true
						end
					end
				elseif Weapon.Type.Value == "Ranged" then
					Prep(Target.Position + (char.Torso.Position - Target.Position).Unit * 80, Base)
					Weapon.TargetPos.Value = Target.Position + Vector3.new(math.random(-2, 2), math.random(-2, 2), math.random(-2, 2))
					wait()
					Weapon.Active.Value = true
				elseif Weapon.Type.Value == "RangedMed" then
					Prep(Target.Position + (char.Torso.Position - Target.Position).Unit * 60, Base)
					if Distance <= 70 then
						Weapon.TargetPos.Value = Target.Position + Vector3.new(math.random(-2, 2), math.random(-2, 2), math.random(-2, 2))
						wait()
						Weapon.Active.Value = true
					end
				elseif Weapon.Type.Value == "RangedClose" then
					Prep(Target.Position + (char.Torso.Position - Target.Position).Unit * 30, Base)
					if Distance <= 40 then
						Weapon.TargetPos.Value = Target.Position + Vector3.new(math.random(-2, 2), math.random(-2, 2), math.random(-2, 2))
						wait()
						Weapon.Active.Value = true
					end
				elseif Weapon.Type.Value == "RangedAngle" and Distance <= 100 then
					local Position = Target.Position + (char.Torso.Position - Target.Position).Unit * (char.Torso.Position - Target.Position).Magnitude + Target.Velocity
					--char.Humanoid:MoveTo(Position, Base)
					Weapon.TargetPos.Value = Target.Position + Vector3.new(math.random(-2, 2), math.random(-2, 2), math.random(-2, 2))
					wait()
					Weapon.Active.Value = true
				elseif Weapon.Type.Value == "RangedTactical" then
					if Distance <= 30 then
						local Position = Target.Position + (char.Torso.Position - Target.Position).Unit * 50
						Prep(Position, Base)
					elseif Distance >= 50 then
						Prep(Target.Position, Target)
					end
					if Distance <= 50 and Distance >= 30 then
						Prep(Target.Position + (char.Torso.Position - Target.Position).Unit * 40, Target.Parent.Torso)
					end
					if Distance <= 60 then
						Weapon.TargetPos.Value = Target.Position + Vector3.new(math.random(-2, 2), math.random(-2, 2), math.random(-2, 2))
						wait()
						Weapon.Active.Value = true
					end
				elseif Weapon.Type.Value == "Shuriken" then
					if Distance <= 15 then
						local Position = Target.Position + (char.Torso.Position - Target.Position).Unit * 20
						Prep(Position, Base)
					elseif Distance >= 30 then
						Prep(Target.Position, Target)
					end
					if Distance <= 30 and Distance >= 15 then
						Prep(Target.Position + (char.Torso.Position - Target.Position).Unit * 20, Target.Parent.Torso)
					end
					if Distance <= 50 then
						Weapon.TargetPos.Value = (Target.Position + Target.Velocity / 2) + Vector3.new(math.random(-2, 2), math.random(-2, 2) + ((Target.Position + Target.Velocity / 2) - char.Torso.Position).Magnitude / 8, math.random(-2, 2))
						wait()
						Weapon.Active.Value = true
					end
				elseif Weapon.Type.Value == "HealDrink" then
					local Position = Target.Position + (char.Torso.Position - Target.Position).Unit * 120
					Prep(Position, Base)
					if char.Humanoid.Health < char.Humanoid.MaxHealth then
						Weapon.Active.Value = true
					end
				elseif Weapon.Type.Value == "GrenadeDirect" then
					if Distance >= 80 and Distance <= 100 then
						Prep(Target.Position, Target)
						wait(0.5)
						Weapon.Active.Value = true
						wait(0.5)
						local Position = Target.Position + (char.Torso.Position - Target.Position).Unit * 100
						Prep(Position, Base)
					else
						local Position = Target.Position + (char.Torso.Position - Target.Position).Unit * 100
						Prep(Position, Base)
					end
				elseif Weapon.Type.Value == "Bomb" then
					if Distance > 10 then
						Prep(Target.Position, Target)
					elseif Distance <= 10 then
						Weapon.Active.Value = true
						wait(2)
						while Weapon ~= nil and Weapon:FindFirstChild("Handle") ~= nil and Weapon.Handle.Transparency == 1 do
							Prep(Target.Position + (char.Torso.Position - Target.Position).Unit * 80, Base)
							wait(0.5)
						end
					end
				elseif Weapon.Type.Value == "Backstab" then
					if Distance >= 10 then
						if (char.Torso.Position - (Target.Position + Target.CFrame.lookVector * 50)).Magnitude <= 52 then
							Prep(Target.Position, Target)
						else
							if (char.Torso.Position - (Target.Position - Target.CFrame.lookVector * 15)).Magnitude <= 5 then
								Prep(Target.Position, Base)
								local backstab_time = 20
								while backstab_time > 1 and (char.Torso.Position - Target.Position).Magnitude >= 4 do
									wait(0.1)
									backstab_time = backstab_time - 1
								end
								if (char.Torso.Position - Target.Position).Magnitude < 4 then
									Weapon.Active.Value = true
								end
							else
								Prep(Target.Position - Target.CFrame.lookVector * 15, Base)
							end
						end
					else
						Prep(Target.Position + Vector3.new(math.random(-2, 2), 0, math.random(-2, 2)), Target)
						if Distance <= 5 then
							Weapon.Active.Value = true
						end
					end
				elseif Weapon.Type.Value == "Crossbow" then
					if Distance > 80 then
						Prep(Target.Position, Target)
					elseif Distance < 40 then
						Prep(Target.Position + (char.Torso.Position - Target.Position).Unit * 100, Base)
					elseif Distance <= 80 and Distance >= 40 then
						Prep(Target.Position + (char.Torso.Position - Target.Position).Unit * ((char.Torso.Position - Target.Position).Magnitude - 5), Base)
						wait(0.2)
						Weapon.TargetPos.Value = Target.Position + Target.Velocity / 8 + Vector3.new(math.random(-2, 2), math.random(-2, 2), math.random(-2, 2))
						Weapon.Active.Value = true
					end
				end
				IsInCombat = true
			elseif Distance <= 100 then
				local Position = Target.Position + (char.Torso.Position - Target.Position).Unit * 120
				Prep(Position, Base)
			end
		end
		if IsInCombat == true then
			wait(0.2)
		else
			wait(0.6)
		end
	end
	local Weapon = nil
	local ToolCheck = char:GetChildren()
	for Check = 1, #ToolCheck do
		if ToolCheck[Check].ClassName == "Tool" then
			Weapon = ToolCheck[Check]
		end
	end
	if Weapon ~= nil and char.DropWeapon.Value == true then
		Weapon.Parent = Workspace
	elseif Weapon ~= nil then
		Weapon:Remove()
	end
	if char:FindFirstChild("IsAZombie") ~= nil then
		char.Name = "New Zombie"
		char.Humanoid.MaxHealth = char.Humanoid.MaxHealth + math.random(math.random(-50, -25), math.random(25, math.random(50, 100)))
		wait()
		char.Humanoid.Health = char.Humanoid.MaxHealth
		char.Humanoid.WalkSpeed = char.Humanoid.WalkSpeed + math.random(math.random(-200, 0), math.random(100, math.random(200, 300))) / 100
		ZStat = 2
		ZStat2 = 1.57
		Delay(1, function()
			while char:FindFirstChild("Humanoid") ~= nil and char.Humanoid.Health > 0 do
				char.Humanoid.MaxHealth = math.max(0, char.Humanoid.MaxHealth - 1)
				char.Humanoid.Health = math.min(char.Humanoid.Health, char.Humanoid.MaxHealth)
				wait(1)
			end
		end)
		while char.Humanoid.Health > 0 and char:FindFirstChild("IsAZombie") ~= nil do
			local Distance = 100
			local Target = nil
			local Players = Workspace:GetChildren()
			for Check = 1, #Players do
				if Players[Check]:FindFirstChild("Humanoid") ~= nil and Players[Check]:FindFirstChild("Torso") ~= nil and Players[Check]:FindFirstChild("IsAZombie") == nil and Players[Check].Humanoid.Health > 0 and (Players[Check].Torso.Position - char.Torso.Position).Magnitude <= 100 then
					local ZRay = Ray.new(char.Torso.CFrame.p, (Players[Check].Torso.CFrame.p - char.Torso.CFrame.p).Unit * 100)
					local ZHit, ZPos = Workspace:FindPartOnRay(ZRay, char)
					if Players[Check]:FindFirstChild("ZFound") ~= nil or (ZHit ~= nil and ZHit.Parent ~= nil and ZHit.Parent.Parent ~= nil and (ZHit.Parent == Players[Check] or ZHit.Parent.Parent == Players[Check])) then
						if ZHit ~= nil and ZHit.Parent ~= nil and ZHit.Parent.Parent ~= nil and (ZHit.Parent == Players[Check] or ZHit.Parent.Parent == Players[Check]) then
							if Players[Check]:FindFirstChild("ZFound") ~= nil then
								Players[Check].ZFound:Remove()
							end
							local ZTag = Instance.new("CFrameValue", Players[Check])
							ZTag.Name = "ZFound"
							game:GetService("Debris"):AddItem(ZTag, 5)
						end
						if (Players[Check].Torso.Position - char.Torso.Position).Magnitude <= Distance then
							Target = Players[Check].Torso
							Distance = (Target.Position - char.Torso.Position).Magnitude
						end
					end
				end
			end
			if Target == nil then
				if char.Humanoid.PlatformStand == false and char.Humanoid.Sit == false then
					if math.random(1, 10) == 1 and char.Wander.Value == true then
						Prep(char.Torso.Position + Vector3.new(math.random(-100, 100), 0, math.random(-100, 100)), Base)
					end
				else
					Jump()
				end
			elseif char.Wander.Value == true then
				--char.Humanoid:MoveTo(Target.Position + Vector3.new(math.random(-2, 2), 0, math.random(-2, 2)), Target)
			end
			wait(0.8)
		end
	end
end)
Delay(0, function() --Random Tool Usage Script
	while true do
		wait(math.random(40, 70 + math.random(30, 120)) / 10)
		local Weapon = nil
		local ToolCheck = char:GetChildren()
		for Check = 1, #ToolCheck do
			if ToolCheck[Check].ClassName == "Tool" then
				Weapon = ToolCheck[Check]
			end
		end
		if Weapon ~= nil and Weapon:FindFirstChild("Active") ~= nil and Weapon:FindFirstChild("TargetPos") ~= nil and Weapon:FindFirstChild("Type") ~= nil then
			if Weapon.Type.Value == "HealDrink" then
				Weapon.Active.Value = true
			end
		end
	end
end)
Delay(1, function() --Player Customization Script
	BColors = {3, 5, 12, 18, 108, 128, 138, 224, 224, 226, 226}
	SColors = {145, 146, 147, 148, 149, 150, 168, 176, 178, 179, 200}
	PColors = {190, 191, 193, 1024, 1025, 1026, 1027, 1028, 1029, 1030}
	BColor = BrickColor.new(BColors[math.random(1, #BColors)])
	SColor = BrickColor.new(SColors[math.random(1, #SColors)])
	PColor = BrickColor.new(PColors[math.random(1, #PColors)])
	if char.IsOnTeam.Value == true then
		SColor = char.IsOnTeam.Team.Value
		PColor = SColor
		if char.IsOnTeam.ShowTag.Value == true then
			char.Name = char.Name .." [" ..char.IsOnTeam.Team.Value.Name .."]"
		end
	end
	char.Head.BrickColor = char["Body Colors"].HeadColor
	char["Left Arm"].BrickColor = char["Body Colors"].LeftArmColor
	char["Left Leg"].BrickColor = char["Body Colors"].LeftLegColor
	char["Right Arm"].BrickColor = char["Body Colors"].RightArmColor
	char["Right Leg"].BrickColor = char["Body Colors"].RightLegColor
	char.Torso.BrickColor = char["Body Colors"].TorsoColor
	if char["Force_Weapon"].Value ~= 0 then
		local x = game:GetService("InsertService"):LoadAsset(char["Force_Weapon"].Value)
		local c = x:GetChildren()
		for i = 1, #c do
			if c[i].ClassName == "Tool" and c[i]:FindFirstChild("AIProgram") ~= nil and c[i]:FindFirstChild("Active") ~= nil and c[i]:FindFirstChild("TargetPos") ~= nil and c[i]:FindFirstChild("Type") ~= nil and c[i]:FindFirstChild("Handle") ~= nil then
				c[i].Parent = char
				char.DropWeapon.Value = false
			end
		end
	end
	if char["Force_Hat"].Value ~= 0 then
		local x = game:GetService("InsertService"):LoadAsset(char["Force_Hat"].Value)
		local c = x:GetChildren()
		for i = 1, #c do
			if c[i].ClassName == "Hat" and c[i]:FindFirstChild("Handle") ~= nil then
				c[i].Parent = char
			end
		end
	end
	if char["Force_Shirt"].Value ~= 0 then
		local x = game:GetService("InsertService"):LoadAsset(char["Force_Shirt"].Value)
		local c = x:GetChildren()
		for i = 1, #c do
			if c[i].ClassName == "Shirt" then
				c[i].Parent = char
			end
		end
	end
	if char["Force_Pants"].Value ~= 0 then
		local x = game:GetService("InsertService"):LoadAsset(char["Force_Pants"].Value)
		local c = x:GetChildren()
		for i = 1, #c do
			if c[i].ClassName == "Pants" then
				c[i].Parent = char
			end
		end
	end
end)
wait()
coroutine.resume(coroutine.create(function()
while true do
for i,v in pairs(char.Animate:GetChildren()) do
for i,animation in pairs(v:GetChildren()) do
animation.AnimationId = "rbxassetid://0"
dooo = char.Humanoid:LoadAnimation(animation)
dooo:Stop()
end
end
	wait(0.0001)
end
end))