function rgb2int,rgb
rgb=byte(rgb)
rgb=long(rgb)
return,rgb[0]+256*rgb[1]+65536*rgb[2]
end