[REBOL] Re: setc, what is it?

From: amicom:sonic at: 4-Sep-2001 16:46

Ammon,

Try:

>> print mold get in system/words/req-funcs/req-color 'setc
func [clr val][
    x/color: poke x/color clr to-integer 255 * (1 - val)
    refresh
]

-Bo

1 · [2] · 3 · 4 · See whole thread