greyscale conversion

i have 16-bit pixel values which i want to draw using pset.

if i just put that value in using pset all the colors are shades of red

how do i convert these values into greyscale and use it with pset?

Use the RGB function. Simply set the 3 parameters to the same value, and you will get a shade of gray.

Z.

Ex:

VB Code:

PSet (120, 120), vbBlack
PSet (240, 120), RGB(112, 112, 112)
PSet (480, 120), &HE0E0E0

i cant use rgb() cause the value i have is 16 bit which is more than 255

any other way ?