Color wheel not working as surface gui

Help and Feedback Scripting Support
#1

im having issues getting a surface gui color wheel because all the ones i try are meant to be used for a gui instead and i dont know how to make them work as surface gui someone please help me

#2

Can you show us the code you used as well as the GUI object in explorer.

1 Like
#3

– Localize

local ceil,clamp,atan2,pi = math.ceil,math.clamp,math.atan2,math.pi
local tostr,sub = tostring,string.sub
local fromHSV = Color3.fromHSV
local v2,udim2 = Vector2.new,UDim2.new

– GUI Elements

local wheel = script.Parent:WaitForChild(“Wheel”);
local ring = wheel:WaitForChild(“Ring”);

local slider = wheel:WaitForChild(“Slider”)
local slide = slider:WaitForChild(“Slide”)

local colour = script.Parent:WaitForChild(“Colour”);

– Input variables

local UserInputService = game:GetService(“UserInputService”)
local Mouse = game.Players.LocalPlayer:GetMouse()

local WheelDown = false
local SlideDown = false

– Math

local function toPolar(v)
return atan2(v.y, v.x), v.magnitude;
end

local function radToDeg(x)
return ((x + pi) / (2 * pi)) * 360;
end

– Color control

local hue, saturation, value = 0, 0, 1;

local function update()
local c = fromHSV(hue, saturation, value);

colour.BackgroundColor3 = c
colour.TextLabel.Text	=	sub(tostr(ceil(clamp(c.r*255,0,255))),1,3)..", "..
							sub(tostr(ceil(clamp(c.g*255,0,255))),1,3)..", "..
							sub(tostr(ceil(clamp(c.b*255,0,255))),1,3)

end

– GUI control

local function UpdateSlide(iX,iY)
local rY = iY - slider.AbsolutePosition.y;
local cY = clamp(rY, 0, slider.AbsoluteSize.y - slide.AbsoluteSize.y);
slide.Position = udim2(0, 0, 0, cY);

value = 1 - (cY / (slider.AbsoluteSize.y - slide.AbsoluteSize.y));
slide.BackgroundColor3 = fromHSV(0, 0, 1-value);

update();

end
local function UpdateRing(iX,iY)
local r = wheel.AbsoluteSize.x/2
local d = v2(iX, iY) - wheel.AbsolutePosition - wheel.AbsoluteSize/2;

if (d:Dot(d) > r*r) then
	d = d.unit * r;
end

ring.Position = udim2(0.5, d.x, 0.5, d.y);

local phi, len = toPolar(d * v2(1, -1));
hue, saturation = radToDeg(phi)/360, len / r;
slider.BackgroundColor3 = fromHSV(hue, saturation, 1);

update();

end

wheel.MouseButton1Down:Connect(function()
WheelDown = true
UpdateRing(Mouse.X,Mouse.Y)
end)
slider.MouseButton1Down:Connect(function()
SlideDown = true
UpdateSlide(Mouse.X,Mouse.Y)
end)

UserInputService.InputEnded:Connect(function(input)
if input.UserInputType == Enum.UserInputType.MouseButton1 then
WheelDown = false
SlideDown = false
end
end)

wheel.MouseMoved:Connect(function()
if WheelDown then
UpdateRing(Mouse.X,Mouse.Y)
end
end)
slider.MouseMoved:Connect(function()
if SlideDown then
UpdateSlide(Mouse.X,Mouse.Y)
end
end)

#4

Replicating this to a surface GUI would be a pain due to it using the Mouse Position, as you’d need to get the vector3 position of the mouse and calculate where on the color wheel the mouse is.

I suggest using mouse.hit to calculate this with.

2 Likes
#5

so what would i have to change the script to becuse this isnt my script so i dont really know what to modify

#6

What kind of objects are slider, ring, slider and slide?