I figured it out. If anyone is interested, here's the code:
-- create a black and white buffer image
theBW = image(120, 180, 8)
theBW.paletteRef = #grayscale
-- copy a color image into the 8-bit #grayscale image converts it to BW
theBW.copypixels(member("photo").image, member("photo").image.rect,
member("photo").image.rect)
-- create a color buffer image, same dimensions as BW buffer image
theColorized = image(120, 180, 32)
theColorized.fill(theColorized.rect, rgb(0,0,255))
-- then apply the BW photo into the color photo
theColorized.copyPixels(theBW, theColorized.rect, theColorized.rect,
[#ink:39])
Hope someone else likes it enough to use it too.
Regards,
- Michael M.
[To remove yourself from this list, or to change to digest mode, go to
http://www.penworks.com/lingo-l.cgi To post messages to the list, email
[email protected] (Problems, email [EMAIL PROTECTED]). Lingo-L is for
learning and helping with programming Lingo. Thanks!]
