--the code is disgusting and im aware. this was rushed a lot
me = nil
prefferedmethod = 'nogetobjects'
allowmeshes = false
tooirl = nil
ihavearrived = false
changecam = false
slotamount = 2
hatmeme = false
slotsalive = false
if prefferedmethod == 'nogetobjects' then
	local lightingambient = game:GetService'Lighting'.Ambient
	local lightingbrighcsb = game:GetService'Lighting'['ColorShift_Bottom']
	local lightingbrighcst = game:GetService'Lighting'['ColorShift_Top']
	local lightingglobalshadows = game:GetService'Lighting'.GlobalShadows
	local lightingoutdoorambient = game:GetService'Lighting'.OutdoorAmbient
	local lightingoutlines = game:GetService'Lighting'.Outlines
	local lightinglat = game:GetService'Lighting'.GeographicLatitude
	local lightingtime = game:GetService'Lighting'.TimeOfDay
	local lightingfogcolor = game:GetService'Lighting'.FogColor
	local lightingfogend = game:GetService'Lighting'.FogEnd
	local lightingfogstart = game:GetService'Lighting'.FogStart
	local lightingbrightness = game:GetService'Lighting'.Brightness
	local kk = workspace.DescendantAdded:Connect(function(asdd)
		if asdd.Name == 'rawrxdv2' then
			me = asdd:Clone()
			asdd.Parent.CameraSubject = game:GetService'Players'.LocalPlayer.Character:FindFirstChildOfClass'Humanoid'
			asdd.Parent.CameraType = 'Custom'
		end
	end)
	pcall(function()
		game:Load'rbxassetid://755125737'
	end)
	game:GetService'Lighting'.Ambient = lightingambient
	game:GetService'Lighting'['ColorShift_Bottom'] = lightingbrighcsb
	game:GetService'Lighting'['ColorShift_Bottom'] = lightingbrighcst
	game:GetService'Lighting'.GlobalShadows = lightingglobalshadows
	game:GetService'Lighting'.OutdoorAmbient = lightingoutdoorambient
	game:GetService'Lighting'.Outlines =lightingoutlines
	game:GetService'Lighting'.GeographicLatitude = lightinglat
	game:GetService'Lighting'.TimeOfDay = lightingtime
	game:GetService'Lighting'.FogColor = lightingfogcolor
	game:GetService'Lighting'.FogEnd = lightingfogend
	game:GetService'Lighting'.FogStart = lightingfogstart
	game:GetService'Lighting'.Brightness = lightingbrightness
	repeat wait'' until me ~= nil
	kk:Disconnect()
else
	me = game:GetObjects('rbxassetid://697662211')[1]:Clone() --old version of gui that will no longer be updated (the model) i recommend u use game:Load method
end
if not me then error'model not found :(' end
spawn(function() --hot ui script by iCookieBG
	-- sorry for my complex way of scripting ;-; --
	local thegui = me
	local tabopen = "CMDS"
	local Top = thegui.Stripe.Main.Top -- define the top thing here --
	local Stripe = thegui.Stripe -- stripe here --
	local Main = thegui.Stripe.Main -- define main here --
	local hidden = false
	local currenttab
	local function ChangeTab(tab)
		if thegui.Stripe.Main.alert.Visible == true then return end
		Main[tabopen.."Container"].Visible = false
		Top[tabopen].TextColor3 = Color3.fromRGB(216, 216, 216)
		tabopen = tab
		currenttab = Top[tab]
		Top.TabLine:TweenPosition(UDim2.new(currenttab.Position.X, Top.TabLine.Position.Y), "In", "Quad", 0.2)
		currenttab.TextColor3 = Color3.new(1, 1, 1)
		Main[tab.."Container"].Visible = true
	end
	-- Example ChangeTab('CMDSContainer')
	Top.CMDS.MouseButton1Down:connect(function() ChangeTab('CMDS') end)
	Top.Credits.MouseButton1Down:connect(function() ChangeTab('Credits') end)
	Top.Settings.MouseButton1Down:connect(function() ChangeTab('Settings') end)
	-- Hide function --
	local function Hide()
		if hidden == true then
			hidden = false
			Main:TweenSize(UDim2.new(0, 405,0, 320), "In", "Quad", 1)
		else
			hidden = true
			Main:TweenSize(UDim2.new(0, 405,0, 0), "In", "Quad", 1)
		end
	end
	Stripe.HideButton.MouseButton1Down:connect(function() Hide'' end)
	local RS = game:GetService('RunService')
	for i,v in pairs(me.Stripe.Main.CMDSContainer:GetChildren()) do
		if v:IsA'GuiButton' then
			v.MouseButton1Down:connect(function(X, Y)
				local C = Instance.new('ImageLabel', v)
				C.BackgroundTransparency = 1
				C.Position = UDim2.new(0, X - 0, 0, Y - 35) - UDim2.new(0, v.AbsolutePosition.X, 0, v.AbsolutePosition.Y)
				C.Size = UDim2.new(0, 0, 0, 0)
				C.ZIndex = v.ZIndex + 1
				C.Image = 'rbxassetid://728907318'
				C.ImageColor3 = Color3.new(1,1,1)
				C.Name = 'circle'
				C.ImageTransparency = 0.5
				C:TweenSizeAndPosition(UDim2.new(0, 500, 0, 500), C.Position - UDim2.new(0, 250, 0, 250), 'Out', 'Quart', 2.75)
				for i = 0, 1, 0.03 do
					C.ImageTransparency = i
					RS.RenderStepped:wait()
				end
				C:Destroy()
			end)
		end
	end
end)
me.Parent = game:GetService'Players'.LocalPlayer.PlayerGui
for i,v in pairs(me.Stripe.Main.memeteam:GetChildren()) do
	spawn(function()
		for i = 1,10 do
			v.TextTransparency = v.TextTransparency - 0.1
			wait'0.1'
		end
	end)
	local num = 100
	if v:IsA'TextLabel' and v.TextSize == 30 then num = 50 end
	v:TweenPosition(UDim2.new(0,num,0,v.Position.Y.Offset), 'In', 'Quad', 2, false)
	wait'1'
end
wait'4.5'
for i,v in pairs(me.Stripe.Main.memeteam:GetChildren()) do
	v:TweenPosition(UDim2.new(0,500,0,v.Position.Y.Offset), 'Out', 'Quad', 1.3, false)
end
repeat wait'' until me.Stripe.Main.memeteam:GetChildren()[3].Position.X.Offset == 500
plrfield = me.Stripe.Main.CMDSContainer.inputname
prbs = me.Stripe.Main.alert
prbs.okb.MouseButton1Down:Connect(function()
	prbs.Visible = false
	prbs.Parent.CMDSContainer.Visible = true
end)
function displayMessage(taa)
	prbs.msg.Text = taa
	prbs.Parent.CMDSContainer.Visible = false
	prbs.Visible = true
end
clicked = false
function getPerson(asd)
	if asd.Text == '' then return nil end
	local txt = string.lower(asd.Text)
	if txt == 'me' then return game:GetService'Players'.LocalPlayer end
	if txt == 'all' then return 'all' end
	for i,v in pairs(game:GetService'Players':GetPlayers()) do
		if string.lower(v.Name):find(txt) then
			return v
		end
	end
	warn'invalid name'
	return nil
end
function spookykill(bbb)
	for i,v in pairs(game:GetService'Players'.LocalPlayer.Character:GetChildren()) do
		if v:IsA'BasePart' and v.Name ~= 'HumanoidRootPart' then
			if v.Name == 'Head' then v:ClearAllChildren() end
			v:Destroy()
		end
	end
end
for i,v in pairs(me.Stripe.Main.Top:GetChildren()) do
	pcall(function()
		v.Visible = true
	end)
end
me.Stripe.Main.Top.BackgroundTransparency = 0
displayMessage'Checking game data..'
prbs.okb.Visible = false
coolgame = false
if game.PlaceId == 69 then print'feature coming later' coolgame = true end
wait'1'
displayMessage'Could not find any special scripts for the game you were in. You may use default commands.'
prbs.okb.Visible = true
function loadSlots()
	displayMessage'Before you can continue, you need to load slots. Please select a slot amount, or use the default.'
	spawn(function()
		if Synapse then displayMessage'Before you can continue, you need to load slots. Synapse shuts down when trying to load a slider. Use the default amount of slots!' return end
		local slidermeme = LoadLibrary'RbxGui'.CreateSlider(3, 300, UDim2.new(0.1, 0,0.75, 0))
		slidermeme.Name = 'slidermaymay'
		slidermeme.Parent = prbs
		slidermeme.SliderPosition.Value = 2
		slidermeme.SliderPosition.Changed:Connect(function()
			local val = slidermeme.SliderPosition.Value
			slotamount = val
			if val == 1 then
				prbs.opt.Text = 'Low: Loads a very little amount of slots (fastest loading)'
			end
			if val == 2 then
				prbs.opt.Text = 'Medium: Loads a good amount of slots (recommended)'
			end
			if val == 3 then
				prbs.opt.Text = 'High: Loads a very big amount of slots (Long loading times)'
			end
		end)
	end)
	repeat wait'' until game:GetService'Players'.LocalPlayer.Character
	repeat wait'' until prbs.Parent.CMDSContainer.Visible == true
	prbs.opt.Visible = false
	leethx = false
	pcall(function()
		prbs.slidermaymay:Destroy() --idk synapse could error ecks dee
	end)
	pcall(function()
		for i,v in pairs(game:GetService'Players'.LocalPlayer.Character:GetChildren()) do
			if v:IsA'Accoutrement' and v:GetChildren()[1] ~= nil then
				for x,d in pairs(v:GetChildren()[1]:GetChildren()) do
					if d:IsA'Weld' or d:IsA'Attachment' then
						d:Destroy()
					end
				end
				v.Parent = game:GetService'Players'.LocalPlayer:WaitForChild'StarterGear'
				leethx = true
			end
		end
	end)
	if leethx == false then
		displayMessage'You aren\'t wearing any hats or an error occured. FE kill and other functions will be removed from the GUI.'
		me.Stripe.Main.CMDSContainer.killb.Visible = false
		me.Stripe.Main.CMDSContainer.spamb.Visible = false
	end
	if leethx == true then
		displayMessage'Loading...'
		prbs.okb.Visible = false
		spawn(function()
			local theamountnum
			if slotamount == 1 then theamountnum = 200 end
			if slotamount == 2 then theamountnum = 500 end
			if slotamount == 3 then theamountnum = 925 end
			repeat
			wait''
			local done = false
			spookykill()
			local bp = game:GetService'Players'.LocalPlayer:WaitForChild'Backpack'
			for i,v in pairs(bp:GetChildren()) do
				if v:IsA'Accoutrement' then
					v.Parent = game:GetService'Players'.LocalPlayer:WaitForChild'StarterGear'
				end
			end
			while game:GetService'Players'.LocalPlayer.Character == nil do wait'' end
			for i,v in pairs(game:GetService'Players'.LocalPlayer.Character:GetChildren()) do
				if v:IsA'Accoutrement' then
					v.Parent = game:GetService'Players'.LocalPlayer:WaitForChild'StarterGear'
				end
			end
			done = true		
			until game:GetService'Players'.LocalPlayer:WaitForChild'StarterGear':GetChildren()[theamountnum]
			repeat wait'' until game:GetService'Players'.LocalPlayer.Character:FindFirstChild'Head'
			spookykill()
			local noyou = game:GetService'Players'.LocalPlayer:WaitForChild'StarterGear':FindFirstChildOfClass'Accessory' or game:GetService'Players'.LocalPlayer:WaitForChild'StarterGear':FindFirstChildOfClass'Hat'
			noyou.Parent = game:GetService'Players'.LocalPlayer.Character
			noyou:ClearAllChildren()
			noyou.Parent = game:GetService'Players'.LocalPlayer:WaitForChild'StarterGear'
			noyou.Name = 'the thing used for the stuff'
			for i,v in pairs(game:GetService'Players'.LocalPlayer:WaitForChild'Backpack':GetChildren()) do
				if v:IsA'Accoutrement' then
					v.Parent = game:GetService'Players'.LocalPlayer:WaitForChild'StarterGear'['the thing used for the stuff']
				end
			end
			spookykill()
			displayMessage'Done!'
			prbs.okb.Visible = true
			repeat wait'' until game:GetService'Players'.LocalPlayer.Character:FindFirstChild'Head'
			slotsalive = true
		end)
	end
end
--hot fly script by RGEENEUS cuz im too lazy to make one
local speed = 50 -- This is the fly speed. Change it to whatever you like. The variable can be changed while running
local c
local h
local bv
local bav
local cam
local flying
local p = game:GetService'Players'.LocalPlayer
local buttons = {W = false, S = false, A = false, D = false, Moving = false}
local startFly = function () -- Call this function to begin flying 
	if not p.Character or not p.Character.Head or flying then return end
	c = p.Character
	h = c.Humanoid
	h.PlatformStand = true
	cam = workspace:WaitForChild('Camera')
	bv = Instance.new("BodyVelocity")
	bav = Instance.new("BodyAngularVelocity")
	bv.Velocity, bv.MaxForce, bv.P = Vector3.new(0, 0, 0), Vector3.new(10000, 10000, 10000), 1000
	bav.AngularVelocity, bav.MaxTorque, bav.P = Vector3.new(0, 0, 0), Vector3.new(10000, 10000, 10000), 1000
	bv.Parent = c.Head
	bav.Parent = c.Head
	flying = true
	h.Died:connect(function() flying = false end)
end
local endFly = function () -- Call this function to stop flying
	if not p.Character or not flying then return end
	h.PlatformStand = false
	bv:Destroy()
	bav:Destroy()
	flying = false
end
game:GetService("UserInputService").InputBegan:connect(function (input, GPE) 
	if GPE then return end
	for i, e in pairs(buttons) do
if i ~= "Moving" and input.KeyCode == Enum.KeyCode[i] then
	buttons[i] = true
	buttons.Moving = true
end
	end
end)
game:GetService("UserInputService").InputEnded:connect(function (input, GPE) 
	if GPE then return end
	local a = false
	for i, e in pairs(buttons) do
if i ~= "Moving" then
	if input.KeyCode == Enum.KeyCode[i] then
buttons[i] = false
	end
	if buttons[i] then a = true end
end
	end
	buttons.Moving = a
end)
local setVec = function (vec)
	return vec * (speed / vec.Magnitude)
end
game:GetService("RunService").Heartbeat:connect(function (step) -- The actual fly function, called every frame
	if flying and c and c.PrimaryPart then
local p = c.PrimaryPart.Position
local cf = cam.CFrame
local ax, ay, az = cf:toEulerAnglesXYZ()
c:SetPrimaryPartCFrame(CFrame.new(p.x, p.y, p.z) * CFrame.Angles(ax, ay, az))
if buttons.Moving then
	local t = Vector3.new()
	if buttons.W then t = t + (setVec(cf.lookVector)) end
	if buttons.S then t = t - (setVec(cf.lookVector)) end
	if buttons.A then t = t - (setVec(cf.rightVector)) end
	if buttons.D then t = t + (setVec(cf.rightVector)) end
	c:TranslateBy(t * step)
end
	end
end)
me.Stripe.Main.CMDSContainer.hatb.MouseButton1Down:Connect(function()
	if clicked == true then return end
	if hatmeme == true then return end
	repeat wait'' until me.Stripe.Main.CMDSContainer.hatb:FindFirstChildOfClass'ImageLabel' ~= nil
	repeat wait'' until me.Stripe.Main.CMDSContainer.hatb:FindFirstChildOfClass'ImageLabel' == nil
	if slotsalive == false then
		loadSlots()
		repeat wait'' until slotsalive == true
	end
	hatmeme = true
	clicked = true
	local function metoothx(chr) --smh road blocks patching starter player stuff so annoying :(
		for i,v in pairs(game:GetService'Players'.LocalPlayer:FindFirstChildOfClass'Backpack':GetChildren()) do
			if v:IsA'Accoutrement' and v:FindFirstChildOfClass(v.ClassName) then
				if v:GetChildren()[10] == nil then displayMessage'Ran out of slots for hat meme.' break end
				repeat wait'' until chr:FindFirstChild'Head'
				local firstbro = v:GetChildren()[1]
				local tablememe = {}
				for x,d in pairs(v:GetChildren()) do
					if d.Name ~= firstbro.Name or d == firstbro then
						table.insert(tablememe, d)
					else
						break
					end
				end
				repeat wait'' until game:GetService'Players'.LocalPlayer.Character
				for a,f in pairs(tablememe) do
					tablememe[a].Parent = game:GetService'Players'.LocalPlayer.Character
					tablememe[a].Parent = chr
				end
			end
		end
	end
	if getPerson(plrfield) == 'all' then
		for i,v in pairs(game:GetService'Players':GetPlayers()) do
			pcall(function()
				if v.Character then metoothx(v.Character) end
			end)
		end
	end
	for i,v in pairs(game:GetService'Players':GetPlayers()) do
		v.CharacterAdded:Connect(metoothx)
	end
	game:GetService'Players'.PlayerAdded:Connect(function(noob)
		noob.CharacterAdded:Connect(metoothx)
	end)
	displayMessage'Hat(s) exploit complete. When a player spawns, they will be wearing your hat.'
	clicked = false
end)
me.Stripe.Main.CMDSContainer.shutdownb.MouseButton1Down:Connect(function()
	if clicked == true then return end
	clicked = true
	local hatasd = false
	local asd = pcall(function()
		local metoobb = game:GetService'Players'.LocalPlayer.AccountAgeReplicate
		for i,v in pairs(game:GetService'Players'.LocalPlayer.Character:GetChildren()) do
			if v:IsA'Accoutrement' then
				hatasd = true
				v.BackendAccoutrementState = 0/0
				wait'1'
				v.Parent = workspace
			end
		end
		displayMessage'Server has been crashed.'
	end)
	if not asd or hatasd == false then 
		displayMessage'Exploit missing unscriptable property bypass OR you have no slots.'
	end
	clicked = false
end)
me.Stripe.Main.CMDSContainer.floatb.MouseButton1Down:Connect(function()
	if clicked == true then return end
	clicked = true
	local plswork = pcall(function()
		local lol = game:GetService'Players'.LocalPlayer.Character
		for i,v in pairs(lol:GetChildren()) do
			if v.Name ~= 'Head' and v.Name ~= 'Torso' and v.Name ~= 'HumanoidRootPart' then
				v:Destroy()
			end
		end
		local ok = lol:FindFirstChild'Torso'
		if ok then ok = ok:FindFirstChild'roblox' if ok then ok:Destroy() end end
		Instance.new('Humanoid', lol)
		if lol.HumanoidRootPart:FindFirstChild'Rank' then lol.HumanoidRootPart:FindFirstChild'Rank':Destroy() end
		local nouxd = lol:FindFirstChild'Torso'
		wait'1'
		lol.Head.Position = lol.Head.Position + Vector3.new(1,1,1)
		if nouxd then nouxd.Transparency = 1 end
		wait'.3'
		displayMessage'You\'re now controlling a floating head! Nagivate using WASD. To stop, press proceed.'
		startFly()
	end)
	if plswork then
		repeat wait'' until prbs.Parent.CMDSContainer.Visible == true
		local partstomake = {'Head', 'Torso'}
		local deathkill = Instance.new'Model'
		Instance.new('Humanoid', deathkill)
		for i,v in pairs(partstomake) do
			local xdmemes = Instance.new('Part', deathkill)
			xdmemes.Name = v
		end
		endFly()
		game:GetService'Players'.LocalPlayer.Character = deathkill
	else
		displayMessage'Unknown error occured.'
	end
	clicked = false
end)
me.Stripe.Main.CMDSContainer.spamb.MouseButton1Down:Connect(function()
	if clicked == true then return end
	clicked = true
	local hatasd = false
	repeat wait'' until me.Stripe.Main.CMDSContainer.spamb:FindFirstChildOfClass'ImageLabel' ~= nil
	repeat wait'' until me.Stripe.Main.CMDSContainer.spamb:FindFirstChildOfClass'ImageLabel' == nil
	local myposition
	if slotsalive == false then
		myposition = game:GetService'Players'.LocalPlayer.Character:WaitForChild'Head'.CFrame
		loadSlots()
		repeat wait'' until slotsalive == true
	end
	if changecam == true then
		displayMessage'Choose a location by moving the camera where you want to spawn blocks, then click.'
		prbs.okb.Visible = false
		tooirl = game:GetService'Players'.LocalPlayer.Character
		for i,v in pairs(game:GetService'Players'.LocalPlayer.PlayerScripts:GetChildren()) do
			if v:FindFirstChild'MasterControl' then v.Disabled = true end
		end
		game:GetService'Players'.LocalPlayer.Character.Head.Anchored = true
		workspace.CurrentCamera.CameraType = Enum.CameraType.Fixed
		game:GetService'Players'.LocalPlayer.Character = nil
		while game:GetService'Players'.LocalPlayer.Character == nil and ihavearrived == false do wait'' end
		game:GetService'Players'.LocalPlayer.Character = tooirl
		wait'.1'
		ihavearrived = false
	end
	if myposition ~= nil then
		game:GetService'Players'.LocalPlayer.Character:WaitForChild'HumanoidRootPart'.CFrame = myposition
		wait'.1'
	end
	local asd = pcall(function()
		for i,v in pairs(game:GetService'Players'.LocalPlayer.Backpack:GetChildren()) do
			if v:IsA'Accoutrement' and v:FindFirstChildOfClass(v.ClassName) == nil then
				hatasd = true
				if v:FindFirstChild'Handle' then 
					v.Parent = game:GetService'Players'.LocalPlayer.Character
					if v.Handle:FindFirstChild'Mesh' and allowmeshes == false then v.Handle.Mesh:Destroy() end
					if game.PlaceId == 430367172 then v.Parent = workspace:FindFirstChild('Part').Mesh else
					v.Parent = workspace:FindFirstChildOfClass'Terrain' end
				end
			end
		end
	end)
	if not asd or hatasd == false then 
		displayMessage'No slots were found or something is preventing spawn (possibly anti exploit). Respawn and try again.'
		prbs.okb.Visible = true
	else
		spawn(function()
			pcall(function()
				spookykill(false)
			end)
		end)
		displayMessage'Spawned blocks into game (if there are none then the game most likely has a clean script)'
		prbs.okb.Visible = true
	end
	clicked = false
end)
me.Stripe.Main.SettingsContainer.meshb.MouseButton1Down:Connect(function()
	local RS = game:GetService('RunService')
	local square = me.Stripe.Main.SettingsContainer.meshb.ImageLabel
    if allowmeshes == false then
	   allowmeshes = true
       for i = 1, 0, -0.03 do
        square.ImageTransparency = i
        RS.RenderStepped:wait()
       end
       return
    else
	   allowmeshes = false
       for i = 0, 1, 0.03 do
        square.ImageTransparency = i
        RS.RenderStepped:wait()
       end
       return
    end
end)
me.Stripe.Main.SettingsContainer.positionb.MouseButton1Down:Connect(function()
	local RS = game:GetService('RunService')
	local square = me.Stripe.Main.SettingsContainer.positionb.ImageLabel
    if changecam == false then
	   changecam = true
       for i = 1, 0, -0.03 do
        square.ImageTransparency = i
        RS.RenderStepped:wait()
       end
       return
    else
	   changecam = false
       for i = 0, 1, 0.03 do
        square.ImageTransparency = i
        RS.RenderStepped:wait()
       end
       return
    end
end)
themouse = game:GetService'Players'.LocalPlayer:GetMouse()
themouse.Button1Down:Connect(function()
	pcall(function()
		if game:GetService'Players'.LocalPlayer.Character ~= nil then return end
		game:GetService'Players'.LocalPlayer.Character = tooirl
		game:GetService'Players'.LocalPlayer.Character.Head.Anchored = false
		for i,v in pairs(game:GetService'Players'.LocalPlayer.PlayerScripts:GetChildren()) do
			if v:FindFirstChild'MasterControl' then v.Disabled = false end
		end
		workspace.CurrentCamera.CameraType = Enum.CameraType.Custom
		game:GetService'Players'.LocalPlayer.Character.HumanoidRootPart.CFrame = themouse.Hit
		ihavearrived = true
	end)
end)