you could use $rand:

$rand(v1,v2)
This works in two ways. If you supply it with numbers for v1 and v2, it returns a random number between v1 and v2. If you supply it with letters, it returns a random letter between letters v1 and v2.

and then test the value returend and if it is '8' then call $rand again..

ie: set %color1 $rand(1,15) (valid values are 0 to 15 but you do not want to use 0)

Hope this helps.