OpenEuphoria

1. How do you define a custom color [LINUX}

• Posted by Senator Jun 01, 2020
• 1232 views

-- from std/graphcst.e 
 
--**** 
-- === Routines 
 
--** 
-- Mixture Type 
-- 
-- Comments: 
-- 
-- A mixture is a ##{red, green, blue}## triple of intensities, which enables you to define 
-- custom colors. Intensities must be from 0 (weakest) to 63 (strongest). Thus, the brightest 
-- white is ##{63, 63, 63}##. 
 
public type mixture(object s) 
	if atom(s) then 
		return 0 
	end if 
	 
	if length(s) != 3 then 
		return 0 
	end if 
	 
	for i=1 to 3 do 
		if not integer(s[i]) then 
			return 0 
		end if 
  		if and_bits(s[i],#FFFFFFC0) then 
  			return 0 
  		end if 
	end for 
	return 1 
end type 

I haven't got a clue as to how to use this type. I suspect that it might be an old dos routine to be used with a function called pallete.

Can custom colors be defined in Euphoria/LINUX?

Regards,
Ken

3. Re: How do you define a custom color [LINUX}

• Posted by Senator Jun 01, 2020
• 1199 views

Ok.......

Thanks for all the information, Greg.

Regards, Ken

5. Re: How do you define a custom color [LINUX}

• Posted by petelomax Jun 01, 2020
• 1185 views
• Last edited Jun 02, 2020

Well actually, you can do anything:

If you are talking about a console, then text_color()/bk_color() are limited to the 16 predefined ones but (as per phix\builtins\VM\pfileioN.e/set_console_colour() - which could fairly easily be ported to Euphoria) you can always wrap kernel32/SetConsoleTextAttribute on windows or printf(1"\E[%d;%dm", {bold,color}) on Linux. You would probably gain very little though, if indeed anything.

If you are talking about a gui lib, each will have it's own mechanism, eg pGUI supports #AARRGGBB formats and has an atom color = rgb(atom red, green, blue, alpha=0) routine, in other words that is 16 million colours, and each of those ranging from completely opaque to completely transparent.

As said though, some/most of the ancient DOS palette and bitmap handling stuff is either dead in the water or pretty close to it, and quite rightly so.

Pete