>>Thanks, now I can see all 32 rows. Here's the corrected code for the 33 row
>>

lnInc= 255/(2^4-1)
>>    For lnColor = 0 to 2^4-1
>>       STORE round(lnColor * lnInc,0) TO lnRed, lnGreen, lnBlue
>>        lnShp  = lnShp+1
>>        lcWebColor = right(trans(rgb(lnBlue,lnGreen,lnRed),'@0'),6)
>>        lcHTML = lcHTML + ;
>>          iif((lnShp-1)%lnPerRow=0,'</TR><TR>','') + ;
>>          '<TD bgcolor=#'+lcWebColor+'<'+lcWebColor+'</TD>'
>>
>>     Endfor
>>

>
>Perfect, I have added the last two rows. Does that make sense?

The last row certanly make sence. I'm not sure what colors from row previous to the last can be used for. Anyway it nice to have a choce of gray scale colors.