REBOL [ Title: "Request a color and produce the html color value for it." Purpose: {This is a little helper used when hand-coding html. It asks for a color which you select with sliders, and then produces the html color value. This is explained in the REBOL function dictionary for "to-hex."} ] to-html-color: func [color [tuple!]] [ to-issue enbase/base to-binary color 16 ] write clipboard:// mold join "#" to-string to-html-color request-color alert "Clipboard loaded."