Selected_slider = nil

Settings_background_sliders = {}

select_settings_slider = function(x,y, mouse_button)
	local result = false
	if on_slider(Settings_font_slider, x,y) then
		Selected_slider = Settings_font_slider.name
		result = true
	end
	for color,slider in pairs(Settings_foreground_sliders) do
		if on_slider(slider, x,y) then
			Selected_slider = slider.name
			result = true
		end
	end
	for color,slider in pairs(Settings_background_sliders) do
		if on_slider(slider, x,y) then
			Selected_slider = slider.name
			result = true
		end
	end
	return result
end

Settings_foreground_sliders = {}

update_any_sliders = function(x,y)
	if Selected_slider == Settings_font_slider.name then
		update_font_settings(slider_value(Settings_font_slider, x))
		return true
	end
	for color,slider in pairs(Settings_foreground_sliders) do
		if Selected_slider == slider.name then
			Foreground_color[color] = slider_value(slider, x)
			return true
		end
	end
	for color,slider in pairs(Settings_background_sliders) do
		if Selected_slider == slider.name then
			Background_color[color] = slider_value(slider, x)
			return true
		end
	end
end

Settings_font_slider = {
	name='font',
	-- left extreme
	x0=nil, y0=nil,
	-- right extreme
	x1=nil,
	-- slider itself
	x=nil,  -- y=y0
	w=nil, h=nil,
	lo=20, hi=40,
}

	if slider.x0 == nil then return end  -- slider uninitialized

mouse_press_consumed_by_any_slider = function(State, x, y)
	for name, slider in pairs(State.slider_handlers) do
		if on_slider(slider, x,y) then
			State.selected_slider = name  -- used by update across frames; slider_handlers is recreated every frame
			return true
		end
	end
end

update_sliders = function(State, x)
	for name, slider in pairs(State.slider_handlers) do
		if State.selected_slider == name then
			slider.update(slider_value(slider, x))
			break
		end
	end
end

slider = function(State, name, params)
	draw_slider(params)
	State.slider_handlers[name] = params
end

	App.color(s.fg)

	Settings_font_slider = {
		name='font',

	slider(Global_state, 'font', {
		fg=Normal_color,

	}
	draw_slider(Settings_font_slider)

		update=update_font_settings,
	})

	local prev = Settings_font_slider
	Settings_foreground_sliders = {
		r = {
			name='fg/r',

	local prev = Global_state.slider_handlers.font
	for _,color in ipairs{'r', 'g', 'b'} do
		slider(Global_state, 'fg/'..color, {
			fg=Normal_color,

			value=Foreground_color.r,
		},
		g = {
			name='fg/g',
			x0=prev.x0, x1=prev.x1,
			y0=y+15,
			w=prev.w, h=prev.h,
			lo=0, hi=1,
			value=Foreground_color.g,
		},
		b = {
			name='fg/b',
			x0=prev.x0, x1=prev.x1,
			y0=y+30,
			w=prev.w, h=prev.h,
			lo=0, hi=1,
			value=Foreground_color.b,
		},
	}
	App.color(Normal_color)
	draw_slider(Settings_foreground_sliders.r)
	draw_slider(Settings_foreground_sliders.g)
	draw_slider(Settings_foreground_sliders.b)
	y = y+50

			value=Foreground_color[color],
			update=function(v) Foreground_color[color] = v end,
		})
		y = y+15
	end
	y = y+5

	App.color(Normal_color)
	Settings_background_sliders = {
		r = {
			name='bg/r',

	for _,color in ipairs{'r', 'g', 'b'} do
		slider(Global_state, 'bg/'..color, {
			fg=Normal_color,

			w=prev.w, h=prev.h,
			lo=0, hi=1,
			value=Background_color.r
		},
		g = {
			name='bg/g',
			x0=prev.x0, x1=prev.x1,
			y0=y+15,

			value=Background_color.g
		},
		b = {
			name='bg/b',
			x0 = prev.x0, x1=prev.x1,
			y0 = y+30,
			w=prev.w, h=prev.h,
			lo = 0, hi=1,
			value = Background_color.b
		},
	}
	App.color(Normal_color)
	draw_slider(Settings_background_sliders.r)
	draw_slider(Settings_background_sliders.g)
	draw_slider(Settings_background_sliders.b)

			value=Background_color[color],
			update=function(v) Background_color[color] = v end,
		})
		y = y+15
	end

	Selected_slider = nil

	Global_state.selected_slider = nil

end

end

	if mouse_press_consumed_by_any_slider(Global_state, x,y) then
		return
	end

			select_settings_slider(x,y, mouse_button)

			-- nothing atm in settings menu that isn't a button or slider

	Global_state.slider_handlers = {}

	if Selected_slider then
		update_any_sliders(App.mouse_x(), App.mouse_y())
	end
	-- main area

	update_sliders(Global_state, App.mouse_x())
	-- == main area