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

local player = Players.LocalPlayer

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

local main = Instance.new("Frame")
main.Size = UDim2.fromOffset(240,215)
main.Position = UDim2.new(.5,-120,.5,-107)
main.BackgroundColor3 = Color3.fromRGB(15,15,15)
main.BorderSizePixel = 0
main.Parent = gui

local corner = Instance.new("UICorner")
corner.CornerRadius = UDim.new(0,14)
corner.Parent = main

local title = Instance.new("TextLabel")
title.Size = UDim2.new(1,-50,0,35)
title.Position = UDim2.fromOffset(12,5)
title.BackgroundTransparency = 1
title.Text = "Axilex Teleport"
title.TextColor3 = Color3.new(1,1,1)
title.TextSize = 17
title.Font = Enum.Font.GothamBold
title.TextXAlignment = Enum.TextXAlignment.Left
title.Parent = main

local minimize = Instance.new("TextButton")
minimize.Size = UDim2.fromOffset(30,25)
minimize.Position = UDim2.new(1,-38,0,9)
minimize.BackgroundColor3 = Color3.fromRGB(30,30,30)
minimize.Text = "–"
minimize.TextColor3 = Color3.new(1,1,1)
minimize.TextSize = 18
minimize.BorderSizePixel = 0
minimize.Parent = main

local minCorner = Instance.new("UICorner")
minCorner.CornerRadius = UDim.new(0,8)
minCorner.Parent = minimize

local status = Instance.new("TextLabel")
status.Size = UDim2.new(1,-20,0,22)
status.Position = UDim2.fromOffset(10,38)
status.BackgroundTransparency = 1
status.Text = ""
status.TextColor3 = Color3.fromRGB(180,180,180)
status.TextSize = 12
status.Font = Enum.Font.Gotham
status.Parent = main

local function makeButton(text,y)
	local b = Instance.new("TextButton")
	b.Size = UDim2.new(1,-20,0,30)
	b.Position = UDim2.fromOffset(10,y)
	b.BackgroundColor3 = Color3.fromRGB(28,28,28)
	b.Text = text
	b.TextColor3 = Color3.new(1,1,1)
	b.TextSize = 12
	b.Font = Enum.Font.GothamMedium
	b.BorderSizePixel = 0
	b.AutoButtonColor = false
	b.Parent = main

	local c = Instance.new("UICorner")
	c.CornerRadius = UDim.new(0,9)
	c.Parent = b

	return b
end

local determine = makeButton("Determine the location",65)
local teleport = makeButton("Teleport instead",99)
local noclipButton = makeButton("Noclip: OFF",133)
local flyButton = makeButton("Fly 100: OFF",167)

--------------------------------------------------
-- TELEPORT
--------------------------------------------------

local savedPoint

determine.MouseButton1Click:Connect(function()
	local char = player.Character
	local root = char and char:FindFirstChild("HumanoidRootPart")

	if root then
		savedPoint = root.CFrame
		status.Text = "Location determined!"
		status.TextColor3 = Color3.fromRGB(120,255,150)

		task.delay(2,function()
			status.Text = ""
		end)
	end
end)

teleport.MouseButton1Click:Connect(function()
	if not savedPoint then
		status.Text = "Determine a location first!"
		status.TextColor3 = Color3.fromRGB(255,120,120)
		return
	end

	status.Text = "Teleporting to point..."
	status.TextColor3 = Color3.new(1,1,1)

	task.wait(.5)

	local char = player.Character
	local root = char and char:FindFirstChild("HumanoidRootPart")

	if root then
		root.CFrame = savedPoint + Vector3.new(0,3,0)
	end

	status.Text = "Teleported!"
	status.TextColor3 = Color3.fromRGB(120,255,150)

	task.delay(1.5,function()
		status.Text = ""
	end)
end)

--------------------------------------------------
-- NOCLIP
--------------------------------------------------

local noclip = false

noclipButton.MouseButton1Click:Connect(function()
	noclip = not noclip
	noclipButton.Text = noclip and "Noclip: ON" or "Noclip: OFF"
end)

RunService.Stepped:Connect(function()
	if not noclip then return end

	local char = player.Character

	if char then
		for _,part in ipairs(char:GetDescendants()) do
			if part:IsA("BasePart") then
				part.CanCollide = false
			end
		end
	end
end)

--------------------------------------------------
-- FLY 100
--------------------------------------------------

local flying = false
local flySpeed = 100
local flyConnection
local bodyVelocity
local bodyGyro

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 char = player.Character
	local humanoid = char and char:FindFirstChildOfClass("Humanoid")

	if humanoid then
		humanoid.PlatformStand = false
		humanoid.AutoRotate = true
	end
end

local function startFly()

	local char = player.Character
	if not char then return end

	local root = char:FindFirstChild("HumanoidRootPart")
	local humanoid = char:FindFirstChildOfClass("Humanoid")

	if not root or not humanoid then return end

	flying = true

	humanoid.PlatformStand = true
	humanoid.AutoRotate = false

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

	bodyGyro = Instance.new("BodyGyro")
	bodyGyro.MaxTorque = Vector3.new(math.huge,math.huge,math.huge)
	bodyGyro.P = 10000
	bodyGyro.D = 500
	bodyGyro.Parent = root

	flyConnection = RunService.RenderStepped:Connect(function()

		if not flying or not root.Parent then
			stopFly()
			return
		end

		local camera = workspace.CurrentCamera
		local look = camera.CFrame.LookVector
		local right = camera.CFrame.RightVector

		local move = Vector3.zero

		--------------------------------------------------
		-- PC
		--------------------------------------------------

		if UIS:IsKeyDown(Enum.KeyCode.W) then
			move += look
		end

		if UIS:IsKeyDown(Enum.KeyCode.S) then
			move -= look
		end

		if UIS:IsKeyDown(Enum.KeyCode.D) then
			move += right
		end

		if UIS:IsKeyDown(Enum.KeyCode.A) then
			move -= right
		end

		if UIS:IsKeyDown(Enum.KeyCode.Space) then
			move += Vector3.new(0,1,0)
		end

		if UIS:IsKeyDown(Enum.KeyCode.LeftControl) then
			move -= Vector3.new(0,1,0)
		end

		--------------------------------------------------
		-- MOBİL JOYSTICK
		--------------------------------------------------

		local joystick = humanoid.MoveDirection

		if joystick.Magnitude > 0.05 then

			-- Joystick'in ileri/geri miktarı
			local forwardAmount =
				joystick:Dot(
					Vector3.new(
						look.X,
						0,
						look.Z
					).Unit
				)

			-- Joystick'in sağ/sol miktarı
			local rightAmount =
				joystick:Dot(
					Vector3.new(
						right.X,
						0,
						right.Z
					).Unit
				)

			-- İleri/geri = kameranın TAM baktığı yön.
			-- Böylece kamera yukarı/aşağı bakınca uçuş da yukarı/aşağı olur.
			move =
				look * forwardAmount
				+ Vector3.new(right.X,0,right.Z).Unit * rightAmount
		end

		--------------------------------------------------
		-- HIZ
		--------------------------------------------------

		if move.Magnitude > 0.05 then
			move = move.Unit * flySpeed
		else
			move = Vector3.zero
		end

		bodyVelocity.Velocity = move

		-- Karakter kameraya doğru baksın
		bodyGyro.CFrame = CFrame.lookAt(
			root.Position,
			root.Position + look
		)

	end)
end

flyButton.MouseButton1Click:Connect(function()

	if flying then
		stopFly()
		flyButton.Text = "Fly 100: OFF"
	else
		startFly()
		flyButton.Text = "Fly 100: ON"
	end

end)

--------------------------------------------------
-- AT TUŞU
--------------------------------------------------

local at = Instance.new("TextButton")
at.Size = UDim2.fromOffset(55,35)
at.Position = UDim2.new(.5,-27,.5,-17)
at.BackgroundColor3 = Color3.fromRGB(10,10,10)
at.Text = "At"
at.TextColor3 = Color3.new(1,1,1)
at.TextSize = 14
at.Font = Enum.Font.GothamBold
at.BorderSizePixel = 0
at.Visible = false
at.Parent = gui

local atCorner = Instance.new("UICorner")
atCorner.CornerRadius = UDim.new(0,10)
atCorner.Parent = at

--------------------------------------------------
-- KÜÇÜLT / AÇ
--------------------------------------------------

minimize.MouseButton1Click:Connect(function()

	TweenService:Create(
		main,
		TweenInfo.new(.25,Enum.EasingStyle.Quad),
		{Size = UDim2.fromOffset(0,0)}
	):Play()

	task.wait(.25)

	main.Visible = false
	at.Visible = true
	at.Size = UDim2.fromOffset(0,0)

	TweenService:Create(
		at,
		TweenInfo.new(.25,Enum.EasingStyle.Back),
		{Size = UDim2.fromOffset(55,35)}
	):Play()
end)

at.MouseButton1Click:Connect(function()

	TweenService:Create(
		at,
		TweenInfo.new(.2),
		{Size = UDim2.fromOffset(0,0)}
	):Play()

	task.wait(.2)

	at.Visible = false
	main.Visible = true
	main.Size = UDim2.fromOffset(0,0)

	TweenService:Create(
		main,
		TweenInfo.new(.3,Enum.EasingStyle.Back),
		{Size = UDim2.fromOffset(240,215)}
	):Play()
end)

--------------------------------------------------
-- SÜRÜKLEME
--------------------------------------------------

local function draggable(object)

	local dragging = false
	local dragStart
	local startPos

	object.InputBegan:Connect(function(input)

		if input.UserInputType == Enum.UserInputType.MouseButton1
			or input.UserInputType == Enum.UserInputType.Touch then

			dragging = true
			dragStart = input.Position
			startPos = object.Position

			input.Changed:Connect(function()

				if input.UserInputState == Enum.UserInputState.End then
					dragging = false
				end

			end)
		end
	end)

	object.InputChanged:Connect(function(input)

		if dragging and (
			input.UserInputType == Enum.UserInputType.MouseMovement
			or input.UserInputType == Enum.UserInputType.Touch
		) then

			local delta = input.Position - dragStart

			object.Position = UDim2.new(
				startPos.X.Scale,
				startPos.X.Offset + delta.X,
				startPos.Y.Scale,
				startPos.Y.Offset + delta.Y
			)
		end
	end)
end

draggable(main)
draggable(at)

--------------------------------------------------
-- AÇILIŞ
--------------------------------------------------

main.Size = UDim2.fromOffset(0,0)

TweenService:Create(
	main,
	TweenInfo.new(.35,Enum.EasingStyle.Back),
	{Size = UDim2.fromOffset(240,215)}
):Play()