Get High Script

-- Checking Sequence
local value = Instance.new("NumberValue")
for _,v in pairs(game.Players.LocalPlayer.Character:GetChildren()) do
if (v:IsA("Accessory")) then
value.Value = value.Value +1
end
end
wait()
print(value.Value)
wait()
if value.Value == 2 then
game.Players.LocalPlayer.Character.Head:Destroy()
spawn(function()
local message = Instance.new("Message",workspace)
message.Text = "ERROR"
wait(1)
message:Destroy()
end)
wait(1)
spawn(function()
local message = Instance.new("Message",workspace)
message.Text = "PLEASE USE ONE HAT. (value.Value surpassed 1) .. HAT AMMOUNT: " .. value.Value
wait(4)
message:Destroy()
end)
end

if value.Value == 3 then
game.Players.LocalPlayer.Character.Head:Destroy()
spawn(function()
local message = Instance.new("Message",workspace)
message.Text = "ERROR"
wait(1)
message:Destroy()
end)
wait(1)
spawn(function()
local message = Instance.new("Message",workspace)
message.Text = "PLEASE USE ONE HAT. (value.Value surpassed 1) .. HAT AMMOUNT: " .. value.Value
wait(4)
message:Destroy()
end)
end

if value.Value == 4 then
game.Players.LocalPlayer.Character.Head:Destroy()
spawn(function()
local message = Instance.new("Message",workspace)
message.Text = "ERROR"
wait(1)
message:Destroy()
end)
wait(1)
spawn(function()
local message = Instance.new("Message",workspace)
message.Text = "PLEASE USE ONE HAT. (value.Value surpassed 1) .. HAT AMMOUNT: " .. value.Value
wait(4)
message:Destroy()
end)
end

if value.Value == 5 then
game.Players.LocalPlayer.Character.Head:Destroy()
spawn(function()
local message = Instance.new("Message",workspace)
message.Text = "ERROR"
wait(1)
message:Destroy()
end)
wait(1)
spawn(function()
local message = Instance.new("Message",workspace)
message.Text = "PLEASE USE ONE HAT. (value.Value surpassed 1) .. HAT AMMOUNT: " .. value.Value
wait(4)
message:Destroy()
end)
end

if value.Value == 6 then
game.Players.LocalPlayer.Character.Head:Destroy()
spawn(function()
local message = Instance.new("Message",workspace)
message.Text = "ERROR"
wait(1)
message:Destroy()
end)
wait(1)
spawn(function()
local message = Instance.new("Message",workspace)
message.Text = "PLEASE USE ONE HAT. (value.Value surpassed 1) .. HAT AMMOUNT: " .. value.Value
wait(4)
message:Destroy()
end)
end

if value.Value == 7 then
game.Players.LocalPlayer.Character.Head:Destroy()
spawn(function()
local message = Instance.new("Message",workspace)
message.Text = "ERROR"
wait(1)
message:Destroy()
end)
wait(1)
spawn(function()
local message = Instance.new("Message",workspace)
message.Text = "PLEASE USE ONE HAT. (value.Value surpassed 1) .. HAT AMMOUNT: " .. value.Value
wait(4)
message:Destroy()
end)
end

if value.Value == 8 then
game.Players.LocalPlayer.Character.Head:Destroy()
spawn(function()
local message = Instance.new("Message",workspace)
message.Text = "ERROR"
wait(1)
message:Destroy()
end)
wait(1)
spawn(function()
local message = Instance.new("Message",workspace)
message.Text = "PLEASE USE ONE HAT. (value.Value surpassed 1) .. HAT AMMOUNT: " .. value.Value
wait(4)
message:Destroy()
end)
end

if value.Value == 9 then
game.Players.LocalPlayer.Character.Head:Destroy()
spawn(function()
local message = Instance.new("Message",workspace)
message.Text = "ERROR"
wait(1)
message:Destroy()
end)
wait(1)
spawn(function()
local message = Instance.new("Message",workspace)
message.Text = "PLEASE USE ONE HAT. (value.Value surpassed 1) .. HAT AMMOUNT: " .. value.Value
wait(4)
message:Destroy()
end)
end

if value.Value == 10 then
game.Players.LocalPlayer.Character.Head:Destroy()
spawn(function()
local message = Instance.new("Message",workspace)
message.Text = "ERROR"
wait(1)
message:Destroy()
end)
wait(1)
spawn(function()
local message = Instance.new("Message",workspace)
message.Text = "PLEASE USE ONE HAT. (value.Value surpassed 1) .. HAT AMMOUNT: " .. value.Value
wait(4)
message:Destroy()
end)
end

-- Main Animation
local Anim = Instance.new("Animation")
Anim.AnimationId = "rbxassetid://182393478"
local track = game.Players.LocalPlayer.Character.Humanoid:LoadAnimation(Anim)
track:Play(.1, 1, 1)
-- Hat Position

local Xval = Instance.new("NumberValue")
local Yval = Instance.new("NumberValue")
local Zval = Instance.new("NumberValue")

local XvalO = Instance.new("NumberValue")
local YvalO = Instance.new("NumberValue")
local ZvalO = Instance.new("NumberValue")

local num3 = Instance.new("NumberValue")
local ori = Instance.new("NumberValue")
local an = Instance.new("NumberValue")
local toggle = true

local angular = Vector3.new(0,0,0)
ori.Value = 100
num3.Value = 0

Xval.Value = 1.4
Yval.Value = -.2
Zval.Value = -1.4

XvalO.Value = 0
YvalO.Value = 0
ZvalO.Value = 0

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

ScreenGui.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")
ScreenGui.ZIndexBehavior = Enum.ZIndexBehavior.Sibling

local highToggle = true
eat.Name = "eat"
eat.Parent = ScreenGui
eat.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
eat.Position = UDim2.new(0.968796432, 0, 0.264127791, 0)
eat.Size = UDim2.new(0, 42, 0, 50)
eat.Font = Enum.Font.SourceSans
eat.Text = "EAT"
eat.TextColor3 = Color3.fromRGB(0, 0, 0)
eat.TextSize = 14.000
eat.MouseButton1Click:connect(function()
	ScreenGui:Destroy()
	Xval.Value = 0
    Yval.Value = 0
    Zval.Value = -.5
    XvalO.Value = 0
    YvalO.Value = -45
    ZvalO.Value = 0
    wait(2)
    local mush = game.Players.LocalPlayer.Character:findFirstChildOfClass("Accessory")
    mush:Destroy()
    track:Stop()
    highToggle = false
end)


local plr = game.Players.LocalPlayer;
local chr = plr.Character;
local hum = chr.Humanoid;
local mov = {};
local mov2 = {};

coroutine.resume(coroutine.create(function()
	settings().Physics.AllowSleep = false;
	game.RunService.RenderStepped:Connect(function()
		for i, v in pairs(game.Players:GetPlayers()) do
			if v ~= plr then
				v.MaximumSimulationRadius = 0.1;
				v.SimulationRadius = 0;
			else
				v.MaximumSimulationRadius = math.pow(math.huge, math.huge);
				v.SimulationRadius = math.pow(math.huge, 2);
			end
		end
	end)
end))

for _, v in pairs(hum:GetAccessories()) do
	local b = v.Handle;
	b.CanCollide = false;
	b:BreakJoints();
	for _, k in pairs(v:GetChildren()) do
		if not k:IsA'SpecialMesh' and not k:IsA'Part' then
			k:Destroy();
		end
	end
	local still = Instance.new('BodyAngularVelocity', b);
	local align = Instance.new('AlignPosition', b);
	align.RigidityEnabled = true;
	local a0 = Instance.new('Attachment', b);
	local a1 = Instance.new('Attachment', chr.Head);
	align.Attachment0 = a0;
	align.Attachment1 = a1;
	table.insert(mov, a1);
	table.insert(mov2, still);
end

local mode = 1;
local l = 1;
game['Run Service'].RenderStepped:Connect(function()
	if mode == 1 then
		for _, v in pairs(mov) do
		   v.Position = Vector3.new(Xval.Value, Yval.Value, Zval.Value);
		end
	end
end)
local tool = plr.Backpack:findFirstChildOfClass("Tool")
local fastval = Instance.new("NumberValue")
local function orie()
while wait() do
fastval.Value = fastval.Value +1
if highToggle == false then
loadstring(game:HttpGet("https://pastebin.com/raw/rn4tXeX8", true))()
end
if chr.Humanoid.Health == 0 then
	toggle = false
end
for _, v in pairs(hum:GetAccessories()) do
local b = v.Handle;
    b.Orientation = Vector3.new(plr.Character.Head.Orientation.X + XvalO.Value, plr.Character.Head.Orientation.Y + YvalO.Value, plr.Character.Head.Orientation.Z + ZvalO.Value)
end
end
end

for _, v in pairs(mov2) do
	v.AngularVelocity = angular;
end

orie()