er

ActivateKey = "v"
--
math.randomseed(tick())
RService = game:GetService("RunService")
UIS = game:GetService("UserInputService")
CAS = game:GetService("ContextActionService")
ChatService = game:GetService("Chat")
ButtonHolding = nil
--
ZoneColor = BrickColor.new("Really red")
ZoneSpeed = 32
ZoneContestSpeed = 30
CD = false
On = false
Duration = 120
LastUseTime = 0
ReloadTime = 360
ReloadTimeMax = 360
--
Plr = game.Players.LocalPlayer
Mouse = Plr:GetMouse()
Char = Plr.Character or Plr.CharacterAdded:wait()
Char = workspace:WaitForChild(Plr.Name)
--
function CheckBall()
	for _,thing in pairs(Char:GetChildren()) do
		if thing:IsA("Tool") and thing:FindFirstChild("Shoot()") then
			return true
		end
	end
	return false
end
--
function ReturnBall()
	for _,thing in pairs(Char:GetChildren()) do
		if thing:IsA("Tool") and thing:FindFirstChild("Shoot()") then
			return thing
		end
	end
	return nil
end
--
function IsTeam(playergiven)
	local player = playergiven
	local NumOfTeams = game:GetService("Teams"):GetChildren()
	if playergiven:IsA("Model") then
		player = game.Players:GetPlayerFromCharacter(playergiven)
	end
	if player and Plr.TeamColor == player.TeamColor and #NumOfTeams > 0 then
		return true
	end
	return false
end
--
function ReturnHumanoids(Radius)
	local Humanoids = {}
	for _,obj in pairs(workspace:GetChildren()) do
		if obj:IsA("Model") and obj ~= Char then
			if obj:FindFirstChild("Humanoid") and obj:FindFirstChild("Torso") and obj:FindFirstChild("Head") and (obj.Torso.CFrame.p-Char.Torso.CFrame.p).Magnitude <= Radius then
				table.insert(Humanoids,obj)
			end
		end
	end
	return Humanoids
end
--
function TpFx(A,B,s1,s2)
	local Fx = Instance.new("Part",workspace)
	Fx.CanCollide = false
	Fx.Anchored = true
	Fx.BrickColor = ZoneColor
	Fx.Transparency = 0.4
	Fx.FormFactor = "Custom"
	Fx.TopSurface = 0
	Fx.BottomSurface = 0
	Fx.Size = Vector3.new(s1,s2,(A.p-B.p).Magnitude)
	Fx.CFrame = CFrame.new(A.p,B.p)*CFrame.new(0,0,-(A.p-B.p).Magnitude/2)
	return Fx
end
--
TrueZone = function(stringa,userinputstate,inputobject)
	if CD == true or userinputstate == Enum.UserInputState.End then return end
	CD = true
	if On == false then
		On = true
		LastUseTime = tick()
		ChatService:Chat(Char,"I must win...",2)
		wait(0.5)
		ChatService:Chat(Char,"No matter who it is against...",2)
		wait(0.5)
		ChatService:Chat(Char,"No matter what happens...",2)
		wait(0.5)
		ChatService:Chat(Char,"Because I am victorious over all, I am always the just.",2)
		wait(0.5)
		ChatService:Chat(Char,"Akashi : Zone!",2)
		wait(0.5)
		Char.PrimaryPart = Char:WaitForChild("Torso")
		Char:WaitForChild("Humanoid").WalkSpeed = ZoneSpeed
		local ZoneGlow = Instance.new("PointLight",Char:WaitForChild("Torso"))
		ZoneGlow.Brightness = math.huge
		ZoneGlow.Color = ZoneColor.Color
		ZoneGlow.Range = 15
		spawn(function()
			while On == true do RService.RenderStepped:wait() end
			ZoneGlow:Destroy()
			Char.Humanoid.WalkSpeed = 16
		end)
		local AfterImageFunction = function()
			asd = false
			local lasttorsopX = Char.Torso.Position.X
			local lasttorsopZ = Char.Torso.Position.Z
			while On == true do
				if asd == false then
				spawn(function()
					wait(0.5)
					asd = false
				end)
				asd = true
				if Char.Torso.Position.X ~= lasttorsopX or Char.Torso.Position.Z ~= lasttorsopZ then
					lasttorsopX = Char.Torso.Position.X
					lasttorsopZ = Char.Torso.Position.Z
					for _,part in pairs(Char:GetChildren()) do
						local parttoclone = nil
						local savedcframe = nil
							if part.Name ~= "HumanoidRootPart" then
								if part:IsA("BasePart") then
									parttoclone = part
									savedcframe = part.CFrame
								elseif part:IsA("Hat") then
									parttoclone = part.Handle
									savedcframe = part.Handle.CFrame
								end
								if parttoclone ~= nil then
									local PartHolder = Instance.new("Model",workspace)
									PartHolder.Name = ""
									local PC = Instance.new("Part")
									PC.Parent = workspace
									PC.FormFactor = "Custom"
									PC.CanCollide = false
									PC.Anchored = true
									PC.Name = parttoclone.Name
									PC.BrickColor = ZoneColor
									PC.Size = parttoclone.Size
									PC.TopSurface = 0
									PC.BottomSurface = 0
									PC.Transparency = 0.5
									PC.CFrame = savedcframe
									PC.Parent = PartHolder
									PC.CanCollide = false
									PC.Changed:connect(function()
										PC.CanCollide = false
									end)
									if parttoclone:FindFirstChild("Mesh") then
										local Mesh = parttoclone.Mesh:Clone()
										Mesh.TextureId = ""
										Mesh.Parent = PC
									end
									spawn(function()
										for i = 1, 20 do
										PC.Transparency = PC.Transparency + 0.1/4
										wait()
										end
									end)
									spawn(function()
									wait(0.1)
									PartHolder:Destroy()
									end)
								end
							end
						end
					end
				end
				wait()
			end
		end
		local LaserEyesFunction = function()
			--LeftEye CFrame =  Head.CFrame*CFrame.new(-.175,.225,-.6)
			--RightEye CFrame =  Head.CFrame*CFrame.new(.175,.225,-.6)
			local LastCF = nil
			while On == true do
				local FxCreated
				local FxCreated2
				if LastCF == nil then
					local C1 = Char:WaitForChild("Head").CFrame
					RService.RenderStepped:wait()
					FxCreated = TpFx(Char:WaitForChild("Head").CFrame*CFrame.new(-.175,.225,-.6),C1*CFrame.new(-.175,.225,-.6),0,0)
					FxCreated2 = TpFx(Char:WaitForChild("Head").CFrame*CFrame.new(.175,.225,-.6),C1*CFrame.new(.175,.225,-.6),0,0)
					LastCF = C1
				else
				FxCreated = TpFx(Char:WaitForChild("Head").CFrame*CFrame.new(-.175,.225,-.6),LastCF*CFrame.new(-.175,.225,-.6),0,0)
				FxCreated2 = TpFx(Char:WaitForChild("Head").CFrame*CFrame.new(.175,.225,-.6),LastCF*CFrame.new(.175,.225,-.6),0,0)
				LastCF = Char:WaitForChild("Head").CFrame
				end
				spawn(function()
					wait(.1)
					FxCreated2:Destroy()
					FxCreated:Destroy()
				end)
				RService.RenderStepped:wait()
			end
		end
		local JumpFunction = function()
			local JumpCD = false
			local HumChange
			HumChange = Char:WaitForChild("Humanoid").Changed:connect(function(Value)
				if JumpCD == false and Value == "Jump" and Char:WaitForChild("Humanoid").Jump == true then
					JumpCD = true
					Char.PrimaryPart = Char:WaitForChild("Torso")
					local PStart = Char:GetPrimaryPartCFrame()
					Char:SetPrimaryPartCFrame(PStart+Vector3.new(0,13,0))
					local PEnd = Char:GetPrimaryPartCFrame()
					local BP = Instance.new("BodyPosition",Char.Torso)
					BP.maxForce = Vector3.new(0,1,0)*math.huge
					BP.position = PEnd.p
					spawn(function()
						wait(.5)
						BP:Destroy()
					end)
					local Fx = TpFx(PStart,PEnd,2,2)
					spawn(function()
						wait(2)
						for i = 1, 5 do
							Fx.Transparency = Fx.Transparency + 0.1
							wait()
						end
						Fx:Destroy()
					end)
					wait(.25)
					JumpCD = false
				end
			end)
			while On == true do RService.RenderStepped:wait() end
			HumChange:disconnect()
		end
		local DodgeFunction
		DodgeFunction = function()
			while On == true do RService.RenderStepped:wait()
				local xBall = ReturnBall()
				if CheckBall() then
					local HTable = ReturnHumanoids(10)
					pcall(function()
						local Direction = 1
						for _,obj in pairs(HTable) do
							if (obj.Torso.CFrame.p-Char.Torso.CFrame.p).Magnitude <= 10 then
								if IsTeam(obj) == false then
									obj.PrimaryPart = obj.Torso
									if Direction == 1 then
										Direction = -1
									else
										Direction = 1
									end

									if xBall and xBall.Parent == Char then
										if obj.Humanoid.WalkSpeed < ZoneContestSpeed then
											xBall:WaitForChild("StealBall").Disabled = true
										else
											xBall:WaitForChild("StealBall").Disabled = false
											spawn(function()
												wait(1)
												if xBall.Parent == Char then
													if xBall:WaitForChild("StealBall").Disabled == true then
														xBall:WaitForChild("StealBall").Disabled = false
													end
												end
											end)
										end
									end
									if obj.Humanoid.WalkSpeed < Char.Humanoid.WalkSpeed and Char.Humanoid.Jump == false then
										local PStart = Char:GetPrimaryPartCFrame()
										local P = obj:GetPrimaryPartCFrame()*CFrame.new((obj:GetExtentsSize()/2)*Direction,0,-3.5)+Char:GetPrimaryPartCFrame().lookVector*11
										Char:SetPrimaryPartCFrame(P)
										--Char:MoveTo(Char:GetPrimaryPartCFrame().p)
										local PEnd = Char:GetPrimaryPartCFrame()
										local Fx = TpFx(PStart,PEnd,4,4)
										spawn(function()
											wait(2)
											for i = 1, 5 do
												Fx.Transparency = Fx.Transparency + 0.1
												wait()
											end
											Fx:Destroy()
										end)
										wait(.1)
									end
								end
							end
						end
					end)
				end
				if xBall then
				xBall:WaitForChild("StealBall").Disabled = false
				end
			end
		end
		local LaserShootFunction
		LaserShootFunction = function()
			local ShootDown
			ShootDown = Mouse.Button1Down:connect(function()
				local BR = ReturnBall()
				if BR then
					local LastCF = nil
					local FDone = false
					spawn(function()
					while FDone == false do
						local BC
						if LastCF == nil then
							local C1 = BR.Handle.CFrame
							wait(.1)
							BC = TpFx(BR.Handle.CFrame,C1,2,2)
							LastCF = BR.Handle.CFrame
						else
							BC = TpFx(BR.Handle.CFrame,LastCF,2,2)
							LastCF = BR.Handle.CFrame
						end
						spawn(function()
							wait(1)
							BC:Destroy()
						end)
						wait(.1)
					end
					end)
					wait(.2)
					spawn(function()
						local Change
						Change = BR.Changed:connect(function(Value)
							if FDone == true then Change:disconnect() return end
							if BR.Parent ~= workspace then
								Change:disconnect()
								FDone = true
							end
						end)
						wait(3)
						FDone = true
					end)
					local BackboardAssist
					BackboardAssist = BR.Handle.Touched:connect(function(hit)
						if hit.Parent ~= nil and hit.Parent.Name == "Backboard" then
							local A1 = Vector3.new(-15,-15,-15)+hit.CFrame.p
							local A2 = Vector3.new(15,15,15)+hit.CFrame.p
							local Region = Region3.new(A1,A2)
							for _,obj in pairs(workspace:FindPartsInRegion3(Region,nil,200)) do
								if BR.Parent == workspace and obj.Name == "Goal" and BR.Handle.Position.Y >= obj.Position.Y+3 then
									BackboardAssist:disconnect()
									local BP = Instance.new("BodyPosition",BR.Handle)
									BP.maxForce = Vector3.new(1,1,1)*math.huge
									BP.position = obj.CFrame.p
									BR.Handle.CanCollide = false
									BP.ReachedTarget:wait()
									BP:Destroy()
									BR.Handle.CanCollide = true
									BackboardAssist = nil
									return
								end
							end
						end
					end)
				end
			end)
			while On == true do RService.RenderStepped:wait() end
			ShootDown:disconnect()
		end
		local UnlimitedPowerFunction
		UnlimitedPowerFunction = function()
			local KeyUp = ""
			Mouse.KeyUp:connect(function(Key)
				KeyUp = Key:lower()
			end)
			local UP
			UP = UIS.InputBegan:connect(function(Input,GPE)
				if GPE then return end
				if Input.KeyCode == Enum.KeyCode.E or Input.KeyCode == Enum.KeyCode.Q then
					repeat
						local RB = ReturnBall()
						if RB and RB:WaitForChild("PowerValue").Value >= 100 then
							if Input.KeyCode == Enum.KeyCode.E then
								RB:WaitForChild("Power").Disabled = true
								RB:WaitForChild("PowerValue").Value = RB:WaitForChild("PowerValue").Value+5
								RB:WaitForChild("Power").Disabled = false
							elseif Input.KeyCode == Enum.KeyCode.Q then
								RB:WaitForChild("Power").Disabled = true
								RB:WaitForChild("PowerValue").Value = RB:WaitForChild("PowerValue").Value-5
								RB:WaitForChild("Power").Disabled = false
							end
						end
					wait(.1)
					until KeyUp == "e" or KeyUp == "q"
				end
			end)
			while On == true do RService.RenderStepped:wait() end
			UP:disconnect()
		end
		spawn(DodgeFunction)
		spawn(JumpFunction)
		spawn(LaserEyesFunction)
		spawn(AfterImageFunction)
		spawn(LaserShootFunction)
		spawn(UnlimitedPowerFunction)
		wait(Duration)
		On = false
	else
		On = false
		ChatService:Chat(Char,ReloadTime.." seconds til I can reuse...")
	end
	wait(ReloadTime)
	CD = false
end
--
CAS:BindAction("TrueZone",TrueZone,true,ActivateKey)
Char:WaitForChild("Humanoid").Died:wait()
CAS:UnbindAction("TrueZone")
--tbnj123