!rgb2hex Thread last updated on 2004-08-07 17:35:09

Posted by member 37809 on 2004-08-07 17:31:12

For those modules that take colors specified in hexadecimal (e.g. for a setting which takes variable arguments) [read: xLabel] ;o

Example:
!rgb2hex pink 255 0 255
!msgbox %{pink}
*script bang !rgb2hex ;<resultVarName> <redValue> <greenValue> <blueValue> (each color value 0-255)
*script exec !varset trgb2hex_color %#%{\2}/16%#
*script exec !varset trgb2hex_todo %{trgb2hex_color}:%#%{\2}-%{trgb2hex_color}*16%#
*script exec !varset trgb2hex_color %#%{\3}/16%#
*script exec !varset trgb2hex_todo %{trgb2hex_todo}:%{trgb2hex_color}:%#%{\3}-%{trgb2hex_color}*16%#
*script exec !varset trgb2hex_color %#%{\4}/16%#
*script exec !varset trgb2hex_todo %{trgb2hex_todo}:%{trgb2hex_color}:%#%{\4}-%{trgb2hex_color}*16%#:none
*script exec !varset trgb2hex_color ""
*script label loop
*script gotoif ("%{trgb2hex_todo:}" = "15") f
*script gotoif ("%{trgb2hex_todo:}" = "14") e
*script gotoif ("%{trgb2hex_todo:}" = "13") d
*script gotoif ("%{trgb2hex_todo:}" = "12") c
*script gotoif ("%{trgb2hex_todo:}" = "11") b
*script gotoif ("%{trgb2hex_todo:}" = "10") a
*script exec !varset trgb2hex_color %{trgb2hex_color}%{trgb2hex_todo:}
*script goto next
*script label f
*script exec !varset trgb2hex_color %{trgb2hex_color}f
*script goto next
*script label e
*script exec !varset trgb2hex_color %{trgb2hex_color}e
*script goto next
*script label d
*script exec !varset trgb2hex_color %{trgb2hex_color}d
*script goto next
*script label c
*script exec !varset trgb2hex_color %{trgb2hex_color}c
*script goto next
*script label b
*script exec !varset trgb2hex_color %{trgb2hex_color}b
*script goto next
*script label a
*script exec !varset trgb2hex_color %{trgb2hex_color}a
*script label next
*script exec !varset trgb2hex_todo %{trgb2hex_todo:_}
*script gotoif ("%{trgb2hex_todo}" <> "none") loop
*script exec !varset %{\1} %{trgb2hex_color}
;*script exec !varremove trgb2hex_color
;*script exec !varremove trgb2hex_todo
*script ~bang