local Players = game:GetService("Players")
local UserInputService = game:GetService("UserInputService")
local RunService = game:GetService("RunService")

local player = Players.LocalPlayer

--// DİLLER
local LANG_LIST = {
	{code = "en", name = "English"},
	{code = "tr", name = "Türkçe"},
	{code = "es", name = "Español"},
	{code = "de", name = "Deutsch"},
	{code = "fr", name = "Français"},
	{code = "pt", name = "Português"},
	{code = "it", name = "Italiano"},
}

local TEXTS = {
	en = {
		title = "All In One", tabMove = "Movement", tabPlayers = "Players",
		speedPH = "Fly speed", speed = "Speed: ",
		flyOff = "Fly: OFF", flyOn = "Fly: ON",
		noclipOff = "Noclip: OFF", noclipOn = "Noclip: ON",
		up = "▲ Up", down = "▼ Down",
		hint = "F: Fly  |  N: Noclip\nSpace: up  |  Ctrl: down",
		players = "Players in server: ", pickTitle = "Choose language",
	},
	tr = {
		title = "Hepsi Bir Arada", tabMove = "Hareket", tabPlayers = "Oyuncular",
		speedPH = "Uçuş hızı", speed = "Hız: ",
		flyOff = "Uçuş: KAPALI", flyOn = "Uçuş: AÇIK",
		noclipOff = "Noclip: KAPALI", noclipOn = "Noclip: AÇIK",
		up = "▲ Yukarı", down = "▼ Aşağı",
		hint = "F: Uçuş  |  N: Noclip\nSpace: yukarı  |  Ctrl: aşağı",
		players = "Sunucudaki oyuncu: ", pickTitle = "Dil seç",
	},
	es = {
		title = "Todo en Uno", tabMove = "Movimiento", tabPlayers = "Jugadores",
		speedPH = "Velocidad de vuelo", speed = "Velocidad: ",
		flyOff = "Volar: NO", flyOn = "Volar: SÍ",
		noclipOff = "Noclip: NO", noclipOn = "Noclip: SÍ",
		up = "▲ Subir", down = "▼ Bajar",
		hint = "F: Volar  |  N: Noclip\nEspacio: subir  |  Ctrl: bajar",
		players = "Jugadores en el servidor: ", pickTitle = "Elige idioma",
	},
	de = {
		title = "Alles in Einem", tabMove = "Bewegung", tabPlayers = "Spieler",
		speedPH = "Fluggeschwindigkeit", speed = "Tempo: ",
		flyOff = "Fliegen: AUS", flyOn = "Fliegen: AN",
		noclipOff = "Noclip: AUS", noclipOn = "Noclip: AN",
		up = "▲ Hoch", down = "▼ Runter",
		hint = "F: Fliegen  |  N: Noclip\nLeertaste: hoch  |  Strg: runter",
		players = "Spieler auf dem Server: ", pickTitle = "Sprache wählen",
	},
	fr = {
		title = "Tout en Un", tabMove = "Mouvement", tabPlayers = "Joueurs",
		speedPH = "Vitesse de vol", speed = "Vitesse : ",
		flyOff = "Vol : OFF", flyOn = "Vol : ON",
		noclipOff = "Noclip : OFF", noclipOn = "Noclip : ON",
		up = "▲ Monter", down = "▼ Descendre",
		hint = "F : Vol  |  N : Noclip\nEspace : monter  |  Ctrl : descendre",
		players = "Joueurs sur le serveur : ", pickTitle = "Choisir la langue",
	},
	pt = {
		title = "Tudo em Um", tabMove = "Movimento", tabPlayers = "Jogadores",
		speedPH = "Velocidade de voo", speed = "Velocidade: ",
		flyOff = "Voar: OFF", flyOn = "Voar: ON",
		noclipOff = "Noclip: OFF", noclipOn = "Noclip: ON",
		up = "▲ Subir", down = "▼ Descer",
		hint = "F: Voar  |  N: Noclip\nEspaço: subir  |  Ctrl: descer",
		players = "Jogadores no servidor: ", pickTitle = "Escolher idioma",
	},
	it = {
		title = "Tutto in Uno", tabMove = "Movimento", tabPlayers = "Giocatori",
		speedPH = "Velocità di volo", speed = "Velocità: ",
		flyOff = "Volo: OFF", flyOn = "Volo: ON",
		noclipOff = "Noclip: OFF", noclipOn = "Noclip: ON",
		up = "▲ Su", down = "▼ Giù",
		hint = "F: Volo  |  N: Noclip\nSpazio: su  |  Ctrl: giù",
		players = "Giocatori nel server: ", pickTitle = "Scegli la lingua",
	},
}

--// DİL KAYDI (writefile/readfile varsa dosyaya kaydeder)
local LANG_FILE = "AllInOnePanel_lang.txt"
local currentLang = nil

local function loadLang()
	local ok, result = pcall(function()
		if isfile and readfile and isfile(LANG_FILE) then
			return readfile(LANG_FILE)
		end
	end)
	if ok and result and TEXTS[result] then
		return result
	end
	return nil
end

local function saveLang(code)
	pcall(function()
		if writefile then
			writefile(LANG_FILE, code)
		end
	end)
end

currentLang = loadLang()

local function t(key)
	local pack = TEXTS[currentLang or "en"]
	return pack[key] or TEXTS.en[key] or key
end

--// DURUM
local flySpeed = 60
local flying, noclip = false, false
local upHeld, downHeld = false, false
local bodyVelocity, bodyGyro, flyConnection, noclipConnection
local originalStates = {}
local spectating = nil

--// YARDIMCI FONKSİYONLAR
local function corner(obj, r)
	local c = Instance.new("UICorner")
	c.CornerRadius = UDim.new(0, r)
	c.Parent = obj
	return c
end

local function makeButton(parent, text, pos, size, color)
	local b = Instance.new("TextButton")
	b.Size = size
	b.Position = pos
	b.BackgroundColor3 = color or Color3.fromRGB(35, 75, 145)
	b.TextColor3 = Color3.new(1, 1, 1)
	b.Text = text
	b.TextSize = 14
	b.Font = Enum.Font.GothamBold
	b.BorderSizePixel = 0
	b.Parent = parent
	corner(b, 9)
	return b
end

local function isPress(i)
	return i.UserInputType == Enum.UserInputType.MouseButton1
		or i.UserInputType == Enum.UserInputType.Touch
end

local function isMove(i)
	return i.UserInputType == Enum.UserInputType.MouseMovement
		or i.UserInputType == Enum.UserInputType.Touch
end

local function makeDraggable(obj)
	local dragging, dragStart, startPos = false, nil, nil

	obj.InputBegan:Connect(function(input)
		if isPress(input) then
			dragging = true
			dragStart = input.Position
			startPos = obj.Position
			input.Changed:Connect(function()
				if input.UserInputState == Enum.UserInputState.End then
					dragging = false
				end
			end)
		end
	end)

	UserInputService.InputChanged:Connect(function(input)
		if dragging and isMove(input) then
			local d = input.Position - dragStart
			obj.Position = UDim2.new(
				startPos.X.Scale, startPos.X.Offset + d.X,
				startPos.Y.Scale, startPos.Y.Offset + d.Y
			)
		end
	end)
end

local BLUE = Color3.fromRGB(35, 75, 145)
local GREEN = Color3.fromRGB(30, 150, 90)

local function applyGradient(obj)
	local g = Instance.new("UIGradient")
	g.Color = ColorSequence.new({
		ColorSequenceKeypoint.new(0, Color3.fromRGB(100, 210, 255)),
		ColorSequenceKeypoint.new(1, Color3.fromRGB(20, 50, 140))
	})
	g.Rotation = 90
	g.Parent = obj
end

--// GUI
local gui = Instance.new("ScreenGui")
gui.Name = "AllInOnePanel"
gui.ResetOnSpawn = false
gui.Parent = player:WaitForChild("PlayerGui")

local frame = Instance.new("Frame")
frame.Size = UDim2.fromOffset(260, 340)
frame.Position = UDim2.new(0.5, -130, 0.5, -170)
frame.BackgroundColor3 = Color3.fromRGB(80, 180, 255)
frame.BorderSizePixel = 0
frame.Visible = currentLang ~= nil -- dil seçilmediyse ilk tıklamaya kadar gizli
frame.Parent = gui
corner(frame, 15)
applyGradient(frame)

local title = Instance.new("TextLabel")
title.Size = UDim2.fromOffset(190, 25)
title.Position = UDim2.fromOffset(15, 7)
title.BackgroundTransparency = 1
title.TextColor3 = Color3.new(1, 1, 1)
title.TextSize = 17
title.TextXAlignment = Enum.TextXAlignment.Left
title.Font = Enum.Font.GothamBold
title.Parent = frame

local langBtn = makeButton(frame, "🌐", UDim2.fromOffset(212, 6), UDim2.fromOffset(33, 27), Color3.fromRGB(30, 100, 200))
langBtn.TextSize = 16

local tabMove = makeButton(frame, "", UDim2.fromOffset(15, 38), UDim2.fromOffset(110, 30), GREEN)
local tabPlayers = makeButton(frame, "", UDim2.fromOffset(135, 38), UDim2.fromOffset(110, 30))

local moveFrame = Instance.new("Frame")
moveFrame.Size = UDim2.fromOffset(230, 255)
moveFrame.Position = UDim2.fromOffset(15, 76)
moveFrame.BackgroundTransparency = 1
moveFrame.Parent = frame

local playersFrame = Instance.new("Frame")
playersFrame.Size = moveFrame.Size
playersFrame.Position = moveFrame.Position
playersFrame.BackgroundTransparency = 1
playersFrame.Visible = false
playersFrame.Parent = frame

--// HAREKET SEKMESİ
local speedBox = Instance.new("TextBox")
speedBox.Size = UDim2.fromOffset(230, 34)
speedBox.BackgroundColor3 = Color3.fromRGB(235, 250, 255)
speedBox.TextColor3 = Color3.fromRGB(20, 40, 80)
speedBox.Text = tostring(flySpeed)
speedBox.TextSize = 15
speedBox.Font = Enum.Font.Gotham
speedBox.ClearTextOnFocus = false
speedBox.BorderSizePixel = 0
speedBox.Parent = moveFrame
corner(speedBox, 9)

local info = Instance.new("TextLabel")
info.Size = UDim2.fromOffset(230, 22)
info.Position = UDim2.fromOffset(0, 38)
info.BackgroundTransparency = 1
info.TextSize = 15
info.Font = Enum.Font.GothamBold
info.TextColor3 = Color3.fromRGB(255, 235, 90)
info.Parent = moveFrame

local flyBtn = makeButton(moveFrame, "", UDim2.fromOffset(0, 66), UDim2.fromOffset(230, 35))
local noclipBtn = makeButton(moveFrame, "", UDim2.fromOffset(0, 108), UDim2.fromOffset(230, 35))
local upBtn = makeButton(moveFrame, "", UDim2.fromOffset(0, 150), UDim2.fromOffset(110, 35), Color3.fromRGB(30, 100, 200))
local downBtn = makeButton(moveFrame, "", UDim2.fromOffset(120, 150), UDim2.fromOffset(110, 35), Color3.fromRGB(30, 100, 200))

local hint = Instance.new("TextLabel")
hint.Size = UDim2.fromOffset(230, 55)
hint.Position = UDim2.fromOffset(0, 195)
hint.BackgroundTransparency = 1
hint.TextSize = 13
hint.Font = Enum.Font.Gotham
hint.TextColor3 = Color3.new(1, 1, 1)
hint.TextWrapped = true
hint.Parent = moveFrame

local function updateFlyBtn()
	flyBtn.Text = flying and t("flyOn") or t("flyOff")
	flyBtn.BackgroundColor3 = flying and GREEN or BLUE
end

local function updateNoclipBtn()
	noclipBtn.Text = noclip and t("noclipOn") or t("noclipOff")
	noclipBtn.BackgroundColor3 = noclip and GREEN or BLUE
end

local function holdButton(btn, setter)
	btn.InputBegan:Connect(function(i) if isPress(i) then setter(true) end end)
	btn.InputEnded:Connect(function(i) if isPress(i) then setter(false) end end)
end
holdButton(upBtn, function(v) upHeld = v end)
holdButton(downBtn, function(v) downHeld = v end)

speedBox.FocusLost:Connect(function()
	local n = tonumber(speedBox.Text)
	if n and n > 0 then
		flySpeed = math.clamp(n, 1, 500)
	end
	speedBox.Text = tostring(flySpeed)
	info.Text = t("speed") .. flySpeed
end)

--// FLY
local function stopFly()
	flying = false
	if flyConnection then flyConnection:Disconnect() flyConnection = nil end
	if bodyVelocity then bodyVelocity:Destroy() bodyVelocity = nil end
	if bodyGyro then bodyGyro:Destroy() bodyGyro = nil end

	local character = player.Character
	local humanoid = character and character:FindFirstChildOfClass("Humanoid")
	if humanoid then humanoid.PlatformStand = false end

	updateFlyBtn()
end

local function startFly()
	local character = player.Character
	local root = character and character:FindFirstChild("HumanoidRootPart")
	local humanoid = character and character:FindFirstChildOfClass("Humanoid")
	if not root or not humanoid then return end

	flying = true
	humanoid.PlatformStand = true

	bodyVelocity = Instance.new("BodyVelocity")
	bodyVelocity.MaxForce = Vector3.new(math.huge, math.huge, math.huge)
	bodyVelocity.Velocity = Vector3.zero
	bodyVelocity.Parent = root

	bodyGyro = Instance.new("BodyGyro")
	bodyGyro.MaxTorque = Vector3.new(math.huge, math.huge, math.huge)
	bodyGyro.P = 9000
	bodyGyro.CFrame = root.CFrame
	bodyGyro.Parent = root

	updateFlyBtn()

	flyConnection = RunService.RenderStepped:Connect(function()
		local cam = workspace.CurrentCamera
		if not flying or not cam or not root.Parent then return end

		local move = cam.CFrame:VectorToObjectSpace(humanoid.MoveDirection)
		local direction = (cam.CFrame.LookVector * -move.Z) + (cam.CFrame.RightVector * move.X)

		if upHeld or UserInputService:IsKeyDown(Enum.KeyCode.Space) then
			direction += Vector3.yAxis
		end
		if downHeld or UserInputService:IsKeyDown(Enum.KeyCode.LeftControl) then
			direction -= Vector3.yAxis
		end

		bodyVelocity.Velocity = direction * flySpeed
		bodyGyro.CFrame = cam.CFrame
	end)
end

--// NOCLIP
local function stopNoclip()
	noclip = false
	if noclipConnection then noclipConnection:Disconnect() noclipConnection = nil end

	for part, original in pairs(originalStates) do
		if part and part.Parent then
			part.CanCollide = original
		end
	end
	table.clear(originalStates)

	updateNoclipBtn()
end

local function startNoclip()
	noclip = true
	updateNoclipBtn()

	noclipConnection = RunService.Stepped:Connect(function()
		local character = player.Character
		if not character then return end

		for _, part in ipairs(character:GetDescendants()) do
			if part:IsA("BasePart") then
				if originalStates[part] == nil then
					originalStates[part] = part.CanCollide
				end
				part.CanCollide = false
			end
		end
	end)
end

local function toggleFly() if flying then stopFly() else startFly() end end
local function toggleNoclip() if noclip then stopNoclip() else startNoclip() end end

flyBtn.MouseButton1Click:Connect(toggleFly)
noclipBtn.MouseButton1Click:Connect(toggleNoclip)

UserInputService.InputBegan:Connect(function(input, processed)
	if processed then return end
	if input.KeyCode == Enum.KeyCode.F then
		toggleFly()
	elseif input.KeyCode == Enum.KeyCode.N then
		toggleNoclip()
	end
end)

--// OYUNCULAR SEKMESİ
local countLabel = Instance.new("TextLabel")
countLabel.Size = UDim2.fromOffset(230, 20)
countLabel.BackgroundTransparency = 1
countLabel.TextSize = 14
countLabel.Font = Enum.Font.GothamBold
countLabel.TextColor3 = Color3.fromRGB(255, 235, 90)
countLabel.Parent = playersFrame

local list = Instance.new("ScrollingFrame")
list.Size = UDim2.fromOffset(230, 225)
list.Position = UDim2.fromOffset(0, 25)
list.BackgroundColor3 = Color3.fromRGB(20, 50, 140)
list.BackgroundTransparency = 0.5
list.BorderSizePixel = 0
list.ScrollBarThickness = 4
list.CanvasSize = UDim2.new(0, 0, 0, 0)
list.AutomaticCanvasSize = Enum.AutomaticSize.Y
list.Parent = playersFrame
corner(list, 9)

local layout = Instance.new("UIListLayout")
layout.Padding = UDim.new(0, 4)
layout.SortOrder = Enum.SortOrder.Name
layout.Parent = list

local padding = Instance.new("UIPadding")
padding.PaddingTop = UDim.new(0, 4)
padding.PaddingLeft = UDim.new(0, 4)
padding.PaddingRight = UDim.new(0, 4)
padding.Parent = list

local rows = {}

local function stopSpectate()
	spectating = nil
	local cam = workspace.CurrentCamera
	local humanoid = player.Character and player.Character:FindFirstChildOfClass("Humanoid")
	if cam and humanoid then
		cam.CameraSubject = humanoid
	end
end

local function updateCount()
	countLabel.Text = t("players") .. #Players:GetPlayers()
end

local function addRow(plr)
	if rows[plr] then return end

	local row = Instance.new("Frame")
	row.Name = plr.Name
	row.Size = UDim2.new(1, 0, 0, 34)
	row.BackgroundColor3 = BLUE
	row.BorderSizePixel = 0
	row.Parent = list
	corner(row, 8)

	local nameLabel = Instance.new("TextLabel")
	nameLabel.Size = UDim2.new(1, -82, 1, 0)
	nameLabel.Position = UDim2.fromOffset(8, 0)
	nameLabel.BackgroundTransparency = 1
	nameLabel.Text = plr.DisplayName
	nameLabel.TextXAlignment = Enum.TextXAlignment.Left
	nameLabel.TextTruncate = Enum.TextTruncate.AtEnd
	nameLabel.TextSize = 13
	nameLabel.Font = Enum.Font.GothamBold
	nameLabel.TextColor3 = plr == player and Color3.fromRGB(255, 235, 90) or Color3.new(1, 1, 1)
	nameLabel.Parent = row

	if plr ~= player then
		local tpBtn = makeButton(row, "TP", UDim2.new(1, -74, 0, 4), UDim2.fromOffset(34, 26), Color3.fromRGB(30, 100, 200))
		local viewBtn = makeButton(row, "👁", UDim2.new(1, -36, 0, 4), UDim2.fromOffset(32, 26), Color3.fromRGB(30, 100, 200))

		tpBtn.MouseButton1Click:Connect(function()
			local myRoot = player.Character and player.Character:FindFirstChild("HumanoidRootPart")
			local targetRoot = plr.Character and plr.Character:FindFirstChild("HumanoidRootPart")
			if myRoot and targetRoot then
				myRoot.CFrame = targetRoot.CFrame * CFrame.new(0, 0, 3)
			end
		end)

		viewBtn.MouseButton1Click:Connect(function()
			if spectating == plr then
				stopSpectate()
				return
			end
			local hum = plr.Character and plr.Character:FindFirstChildOfClass("Humanoid")
			if hum then
				spectating = plr
				workspace.CurrentCamera.CameraSubject = hum
			end
		end)
	end

	rows[plr] = row
	updateCount()
end

local function removeRow(plr)
	if rows[plr] then
		rows[plr]:Destroy()
		rows[plr] = nil
	end
	if spectating == plr then stopSpectate() end
	updateCount()
end

for _, plr in ipairs(Players:GetPlayers()) do addRow(plr) end
Players.PlayerAdded:Connect(addRow)
Players.PlayerRemoving:Connect(removeRow)

--// SEKME GEÇİŞİ
local function showTab(tab)
	moveFrame.Visible = tab == "move"
	playersFrame.Visible = tab == "players"
	tabMove.BackgroundColor3 = tab == "move" and GREEN or BLUE
	tabPlayers.BackgroundColor3 = tab == "players" and GREEN or BLUE
end

tabMove.MouseButton1Click:Connect(function() showTab("move") end)
tabPlayers.MouseButton1Click:Connect(function() showTab("players") end)

--// TÜM METİNLERİ GÜNCELLE
local function refreshTexts()
	title.Text = t("title")
	tabMove.Text = t("tabMove")
	tabPlayers.Text = t("tabPlayers")
	speedBox.PlaceholderText = t("speedPH")
	info.Text = t("speed") .. flySpeed
	upBtn.Text = t("up")
	downBtn.Text = t("down")
	hint.Text = t("hint")
	updateFlyBtn()
	updateNoclipBtn()
	updateCount()
end

--// DİL SEÇME EKRANI
local picker = Instance.new("Frame")
picker.Size = UDim2.fromOffset(240, 60 + #LANG_LIST * 38)
picker.Position = UDim2.new(0.5, -120, 0.5, -(60 + #LANG_LIST * 38) / 2)
picker.BackgroundColor3 = Color3.fromRGB(80, 180, 255)
picker.BorderSizePixel = 0
picker.Visible = false
picker.ZIndex = 10
picker.Parent = gui
corner(picker, 15)
applyGradient(picker)

local pickTitle = Instance.new("TextLabel")
pickTitle.Size = UDim2.fromOffset(210, 30)
pickTitle.Position = UDim2.fromOffset(15, 10)
pickTitle.BackgroundTransparency = 1
pickTitle.Text = "🌐 Language / Dil"
pickTitle.TextColor3 = Color3.new(1, 1, 1)
pickTitle.TextSize = 17
pickTitle.Font = Enum.Font.GothamBold
pickTitle.ZIndex = 11
pickTitle.Parent = picker

local langButtons = {}

local function highlightLang()
	for code, btn in pairs(langButtons) do
		btn.BackgroundColor3 = (code == currentLang) and GREEN or BLUE
	end
end

local function setLanguage(code)
	currentLang = code
	saveLang(code)
	refreshTexts()
	highlightLang()
	picker.Visible = false
	frame.Visible = true
end

for i, lang in ipairs(LANG_LIST) do
	local b = makeButton(picker, lang.name, UDim2.fromOffset(15, 45 + (i - 1) * 38), UDim2.fromOffset(210, 32))
	b.ZIndex = 11
	b.TextSize = 15
	langButtons[lang.code] = b
	b.MouseButton1Click:Connect(function()
		setLanguage(lang.code)
	end)
end

makeDraggable(picker)

langBtn.MouseButton1Click:Connect(function()
	highlightLang()
	picker.Visible = not picker.Visible
end)

--// RESPAWN
player.CharacterAdded:Connect(function()
	stopFly()
	table.clear(originalStates)
	spectating = nil
end)

--// SÜRÜKLEME + GÖSTER/GİZLE BUTONU
makeDraggable(frame)

local toggle = Instance.new("TextButton")
toggle.Size = UDim2.fromOffset(40, 40)
toggle.Position = UDim2.new(0, 12, 0.5, -20)
toggle.BackgroundColor3 = Color3.fromRGB(35, 90, 170)
toggle.Text = "🕊️"
toggle.TextSize = 19
toggle.BorderSizePixel = 0
toggle.Parent = gui
corner(toggle, 12)
makeDraggable(toggle)

toggle.MouseButton1Click:Connect(function()
	-- İlk tıklama: dil henüz seçilmediyse dil seçme ekranını aç
	if not currentLang then
		picker.Visible = true
		return
	end
	frame.Visible = not frame.Visible
end)

refreshTexts()
highlightLang()