-- [[ Rscripts Risk Notice ]]
-- This script is not verified by rscripts.net. Deal with caution.
--
-- Stay safe:
--   • Never log in on unofficial Roblox sites or lookalike domains.
--   • Real Roblox links use roblox.com (check the .com ending).
--   • Treat fake Roblox login / "claim reward" pages as phishing.
-- [[ End Rscripts Risk Notice ]]

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

local player = Players.LocalPlayer

-- 1. إنشاء ScreenGui
local screenGui = Instance.new("ScreenGui")
screenGui.Name = "R6Gui"
screenGui.ResetOnSpawn = false
screenGui.Parent = player:WaitForChild("PlayerGui")

-- 2. إنشاء Frame بحجم {0.225, 0}, {0.333, 0} وشفافية 0.2
local mainFrame = Instance.new("Frame")
mainFrame.Name = "MainFrame"
mainFrame.Size = UDim2.new(0.225, 0, 0.333, 0)
mainFrame.Position = UDim2.new(0.387, 0, 0.333, 0)
mainFrame.BackgroundTransparency = 0.2
mainFrame.BackgroundColor3 = Color3.fromRGB(30, 30, 30)
mainFrame.BorderSizePixel = 0
mainFrame.Active = true -- تفعيل التفاعل مع الـ Frame
mainFrame.Parent = screenGui

-- 3. إنشاء TextButton داخل الـ Frame
local r6Button = Instance.new("TextButton")
r6Button.Name = "R6Button"
r6Button.Size = UDim2.new(0.8, 0, 0.3, 0)
r6Button.Position = UDim2.new(0.1, 0, 0.35, 0)
r6Button.Text = "R6 Button"
r6Button.TextScaled = true
r6Button.Font = Enum.Font.SourceSansBold
r6Button.ZIndex = 2
r6Button.Parent = mainFrame

-- 4. إضافة تأثير قوس قزح (Rainbow)
local hue = 0
RunService.RenderStepped:Connect(function(delta)
	hue = (hue + delta * 0.2) % 1
	local rainbowColor = Color3.fromHSV(hue, 0.8, 1)
	local textColor = Color3.fromHSV((hue + 0.5) % 1, 0.8, 1)
	
	r6Button.BackgroundColor3 = rainbowColor
	r6Button.TextColor3 = textColor
end)

-- 5. برمجة سحب وإفلات الـ Frame على الشاشة (Dragging System)
local dragging = false
local dragInput, dragStart, startPos

local function update(input)
	local delta = input.Position - dragStart
	-- تحريك الـ Frame بسلاسة باستخدام TweenService
	local targetPosition = UDim2.new(
		startPos.X.Scale, startPos.X.Offset + delta.X,
		startPos.Y.Scale, startPos.Y.Offset + delta.Y
	)
	TweenService:Create(mainFrame, TweenInfo.new(0.08), {Position = targetPosition}):Play()
end

mainFrame.InputBegan:Connect(function(input)
	if input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch then
		dragging = true
		dragStart = input.Position
		startPos = mainFrame.Position

		input.Changed:Connect(function()
			if input.UserInputState == Enum.UserInputState.End then
				dragging = false
			end
		end)
	end
end)

mainFrame.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)

-- 6. وظيفة تحويل الشخصية إلى R6 عند الضغط
local function convertToR6()
	local character = player.Character
	if not character then return end
	
	local humanoid = character:FindFirstChildOfClass("Humanoid")
	if not humanoid then return end
	
	if humanoid.RigType == Enum.HumanoidRigType.R15 then
		local description = humanoid:GetAppliedDescription()
		local currentCFrame = character:GetPivot()
		
		local r6Model = Players:CreateHumanoidModelFromDescription(description, Enum.HumanoidRigType.R6)
		r6Model.Name = player.Name
		
		player.Character = r6Model
		r6Model.Parent = workspace
		r6Model:PivotTo(currentCFrame)
		
		character:Destroy()
	end
end

r6Button.MouseButton1Click:Connect(convertToR6)