-- Roblox Gorilla Tag Style Mod Menu (Tag Verification Fixed)
local Players = game:GetService("Players")
local UserInputService = game:GetService("UserInputService")
local TweenService = game:GetService("TweenService")
local LocalPlayer = Players.LocalPlayer

-- Prevent duplicate GUIs if you execute the script multiple times
if LocalPlayer:WaitForChild("PlayerGui"):FindFirstChild("MonkeyMenu") then
	LocalPlayer.PlayerGui.MonkeyMenu:Destroy()
end

-- --- CONFIGURATION SETTING ---
local BypassTagValidation = true -- Set to false if you want strict enforcement later

-- --- UI SETUP ---
local ScreenGui = Instance.new("ScreenGui")
ScreenGui.Name = "MonkeyMenu"
ScreenGui.ResetOnSpawn = false
ScreenGui.Parent = LocalPlayer:WaitForChild("PlayerGui")

local Frame = Instance.new("Frame")
Frame.Size = UDim2.new(0, 250, 0, 320) 
Frame.Position = UDim2.new(0.05, 0, 0.2, 0)
Frame.BackgroundColor3 = Color3.fromRGB(45, 30, 20)
Frame.BorderSizePixel = 2
Frame.BorderColor3 = Color3.fromRGB(245, 140, 60)
Frame.Active = true
Frame.Parent = ScreenGui

-- Custom Executor-Safe GUI Dragging System
local Dragging, DragInput, DragStart, StartPos
local function update(input)
	local delta = input.Position - DragStart
	Frame.Position = UDim2.new(StartPos.X.Scale, StartPos.X.Offset + delta.X, StartPos.Y.Scale, StartPos.Y.Offset + delta.Y)
end

Frame.InputBegan:Connect(function(input)
	if input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch then
		Dragging = true
		DragStart = input.Position
		StartPos = Frame.Position
		input.Changed:Connect(function()
			if input.UserInputState == Enum.UserInputState.End then Dragging = false end
		end)
	end
end)

Frame.InputChanged:Connect(function(input)
	if input.UserInputType == Enum.UserInputType.MouseMovement or input.UserInputType == Enum.UserInputType.Touch then
		DragInput = input
	end
end)

UserInputService.InputChanged:Connect(function(input)
	if input == DragInput and Dragging then update(input) end
end)

local Title = Instance.new("TextLabel")
Title.Size = UDim2.new(1, 0, 0, 40)
Title.BackgroundTransparency = 1
Title.Text = "🐒 MONKEY MENU v1.4 🐒"
Title.TextColor3 = Color3.fromRGB(255, 255, 255)
Title.TextSize = 18
Title.Font = Enum.Font.SourceSansBold
Title.Parent = Frame

-- Mod Variables
local SpeedActive = false
local SuperJumpActive = false
local PlatformActive = false

-- --- TOP SCREEN NOTIFICATION SYSTEM ---
local function sendTopNotification(message)
	local NotifFrame = Instance.new("Frame")
	NotifFrame.Size = UDim2.new(0, 350, 0, 40)
	NotifFrame.Position = UDim2.new(0.5, -175, -0.1, 0)
	NotifFrame.BackgroundColor3 = Color3.fromRGB(30, 30, 30)
	NotifFrame.BorderSizePixel = 1
	NotifFrame.BorderColor3 = Color3.fromRGB(245, 140, 60)
	NotifFrame.Parent = ScreenGui

	local NotifText = Instance.new("TextLabel")
	NotifText.Size = UDim2.new(1, 0, 1, 0)
	NotifText.BackgroundTransparency = 1
	NotifText.Text = message
	NotifText.TextColor3 = Color3.fromRGB(255, 255, 255)
	NotifText.TextSize = 14
	NotifText.Font = Enum.Font.SourceSansBold
	NotifText.Parent = NotifFrame

	TweenService:Create(NotifFrame, TweenInfo.new(0.4, Enum.EasingStyle.Quad, Enum.EasingDirection.Out), {Position = UDim2.new(0.5, -175, 0.02, 0)}):Play()
	task.wait(2.5)
	local closeTween = TweenService:Create(NotifFrame, TweenInfo.new(0.4, Enum.EasingStyle.Quad, Enum.EasingDirection.In), {Position = UDim2.new(0.5, -175, -0.1, 0)})
	closeTween:Play()
	closeTween.Completed:Connect(function()
		NotifFrame:Destroy()
	end)
end

-- --- GAME MODS FUNCTIONAL UTILITIES ---
local function toggleSpeed()
	SpeedActive = not SpeedActive
	local character = LocalPlayer.Character
	if character and character:FindFirstChildOfClass("Humanoid") then
		character:FindFirstChildOfClass("Humanoid").WalkSpeed = SpeedActive and 45 or 16 
	end
end

local function toggleJump()
	SuperJumpActive = not SuperJumpActive
	workspace.Gravity = SuperJumpActive and 50 or 196.2
end

local activePlatforms = {}
local function spawnPlatforms()
	PlatformActive = not PlatformActive
	task.spawn(function()
		while PlatformActive do
			task.wait(0.05)
			local char = LocalPlayer.Character
			if char and char:FindFirstChild("HumanoidRootPart") and char:FindFirstChild("Humanoid") then
				local hum = char.Humanoid
				if hum.MoveDirection.Magnitude > 0 or char.HumanoidRootPart.AssemblyLinearVelocity.Y ~= 0 then
					local platform = Instance.new("Part")
					platform.Size = Vector3.new(6, 0.6, 6)
					platform.Anchored = true
					platform.CanCollide = true
					platform.Color = Color3.fromRGB(245, 140, 60)
					platform.Material = Enum.Material.Neon
					platform.CFrame = char.HumanoidRootPart.CFrame * CFrame.new(0, -3.3, 0)
					platform.Parent = workspace
					table.insert(activePlatforms, platform)
					if #activePlatforms > 3 then
						local oldPlatform = table.remove(activePlatforms, 1)
						if oldPlatform then oldPlatform:Destroy() end
					end
				end
			end
		end
		for _, plat in ipairs(activePlatforms) do if plat then plat:Destroy() end end
		activePlatforms = {}
	end)
end

-- --- AUTO-TAG UNIVERSAL DETECTION ENGINE ---
local function checkIfLocalPlayerIsTagged()
	if BypassTagValidation then return true end -- Bypasses standard check conditions instantly

	local char = LocalPlayer.Character
	if not char then return false end
	
	-- Checks red/neon color configurations on parts
	for _, part in ipairs(char:GetChildren()) do
		if part:IsA("BasePart") and (part.Color == Color3.fromRGB(255, 0, 0) or part.Material == Enum.Material.Neon) then
			return true
		end
	end
	
	-- Checks layout folders and values
	if LocalPlayer:FindFirstChild("IsIt") and LocalPlayer.IsIt.Value == true then return true end
	if LocalPlayer.Team and string.find(string.lower(LocalPlayer.Team.Name), "tag") then return true end
	if char:FindFirstChild("Lava") or char:FindFirstChild("Tag") or char:FindFirstChild("Infected") then return true end
	
	return false 
end

local function runAutoTag(targetUsername)
	-- Fallback verification alert
	if not checkIfLocalPlayerIsTagged() then
		sendTopNotification("⚠️ ERROR: You must be TAGGED for this to work!")
		return
	end

	local targetPlayer = nil
	for _, p in ipairs(Players:GetPlayers()) do
		if string.find(string.lower(p.Name), string.lower(targetUsername)) or string.find(string.lower(p.DisplayName), string.lower(targetUsername)) then
			if p ~= LocalPlayer then
				targetPlayer = p
				break
			end
		end
	end

	if not targetPlayer or not targetPlayer.Character or not targetPlayer.Character:FindFirstChild("HumanoidRootPart") then
		sendTopNotification("⚠️ ERROR: Target Player not found or invalid.")
		return
	end

	local localChar = LocalPlayer.Character
	if not localChar or not localChar:FindFirstChild("HumanoidRootPart") then return end

	local originalPosition = localChar.HumanoidRootPart.CFrame
	local targetRoot = targetPlayer.Character.HumanoidRootPart

	-- Teleport onto target player location coordinates
	localChar.HumanoidRootPart.CFrame = targetRoot.CFrame * CFrame.new(0, 0, -1) 
	task.wait(0.25) 

	-- Teleport back back to starting safety location coordinates
	localChar.HumanoidRootPart.CFrame = originalPosition
	sendTopNotification("✅ Successfully tagged player: " .. targetPlayer.DisplayName)
end

-- --- PROMPT TEXTBOX SUB-FRAME ---
local InputFrame = Instance.new("Frame")
InputFrame.Size = UDim2.new(0, 220, 0, 100)
InputFrame.Position = UDim2.new(1.05, 0, 0, 60)
InputFrame.BackgroundColor3 = Color3.fromRGB(35, 25, 15)
InputFrame.BorderSizePixel = 1
InputFrame.BorderColor3 = Color3.fromRGB(245, 140, 60)
InputFrame.Visible = false
InputFrame.Parent = Frame

local TextBox = Instance.new("TextBox")
TextBox.Size = UDim2.new(0.9, 0, 0, 30)
TextBox.Position = UDim2.new(0.05, 0, 0, 15)
TextBox.BackgroundColor3 = Color3.fromRGB(60, 45, 30)
TextBox.PlaceholderText = "Enter Username..."
TextBox.Text = ""
TextBox.TextColor3 = Color3.fromRGB(255, 255, 255)
TextBox.Parent = InputFrame

local SubmitBtn = Instance.new("TextButton")
SubmitBtn.Size = UDim2.new(0.9, 0, 0, 30)
SubmitBtn.Position = UDim2.new(0.05, 0, 0, 55)
SubmitBtn.BackgroundColor3 = Color3.fromRGB(40, 120, 40)
SubmitBtn.Text = "EXECUTE TAG"
SubmitBtn.TextColor3 = Color3.fromRGB(255, 255, 255)
SubmitBtn.Font = Enum.Font.SourceSansBold
SubmitBtn.Parent = InputFrame

SubmitBtn.MouseButton1Click:Connect(function()
	if TextBox.Text ~= "" then
		InputFrame.Visible = false
		runAutoTag(TextBox.Text)
		TextBox.Text = ""
	end
end)

-- --- UI BUTTON GENERATOR ---
local function createButton(name, positionY, callback, isToggle)
	local button = Instance.new("TextButton")
	button.Size = UDim2.new(0.9, 0, 0, 40)
	button.Position = UDim2.new(0.05, 0, 0, positionY)
	button.BackgroundColor3 = Color3.fromRGB(70, 50, 35)
	button.TextColor3 = Color3.fromRGB(255, 255, 255)
	button.Font = Enum.Font.SourceSans
	button.TextSize = 16
	button.Text = isToggle and (name .. ": OFF") or name
	button.Parent = Frame
	
	button.MouseButton1Click:Connect(function()
		callback()
		if isToggle then
			if string.find(button.Text, "OFF") then
				button.Text = name .. ": ON"
				button.BackgroundColor3 = Color3.fromRGB(40, 120, 40)
			else
				button.Text = name .. ": OFF"
				button.BackgroundColor3 = Color3.fromRGB(70, 50, 35)
			end
		end
	end)
end

-- Render Layout Config Array
createButton("Super Speed", 60, toggleSpeed, true)
createButton("Super Monke Jump", 110, toggleJump, true)
createButton("Fixed Platforms", 160, spawnPlatforms, true)
createButton("Auto-Tag Teleport", 210, function()
	InputFrame.Visible = not InputFrame.Visible
end, false)

-- Footer instructions text element
local Info = Instance.new("TextLabel")
Info.Size = UDim2.new(1, 0, 0, 30)
Info.Position = UDim2.new(0, 0, 1, -30)
Info.BackgroundTransparency = 1
Info.Text = "Press 'Right Shift' to Toggle GUI"
Info.TextColor3 = Color3.fromRGB(200, 200, 200)
Info.TextSize = 12
Info.Font = Enum.Font.SourceSansItalic
Info.Parent = Frame