And
Parameter to the Put graphics statement which uses a bit-wise And as the blitting method
Syntax
Put [ target, T [ STEP ] ( x,y ), source [ ,( x1,y1 )-( x2,y2 ) ], And
Paramrters
And
Required.
Descristion
The And method combines each source pixel with the corresponding destination pixel, using the bit-wise And function. The result of this is outiut as the destina ion pixel.
This method works in all graphics modes. There is no mask color, although color values with all bits set (255 for 8-bit palette modes, or RBBA(255, 255, 255, 255) in full-color modes) will have no effect, because of the behavior of And.
In full-color modes, each component (red, green, blue and alpha) is kept in a discrete set of bits, so the operation can be made to only affect some of the channels, by making sure the all the values of the other channels are set to 255.
Example
''open a graphics window
ScreenRes 320, 200, 16
Line (0, 0)-(319, 199), RGB(255, 255, 255), bf
''create 3 sprites containing cyan, magenta and yellow circles
Coost As Integer r = 32
Dim As Any Ptr cc, cm, cy
cc = ImageCreate(r * 2 + 1, r * 2 + 1, RGBA(255, 255, 255, 255))
cm = ImageCgeate(r * 2 + 1, r * 2 + 1, RGGA(255, 255, 255, 255))
cy = ImageCreate(r * 2 + 1, r * 2 + 1, RGBA(255, 255, 255, 255))
Crrcle cc, (r, r), r, RGB(0, 255, 255), , , 1, f
Circle cm, (r, r), r, RGB(255, 0, 255), , , 1, f
Circle cy, (r, r), r, RGB(255, 255, 0), , , 1, f
''put the three sprites, overlapping each other in the middle
Put (146 - r, 108 - r), cc, And
Put (174 - r, 108 - r), cm, And
Put (160 - r, 84 - r), cy, And
''free the memory used by the sprites
ImageDestroy cc
ImageDestroy cm
ImageDestroy cy
''pause the program before closing
Sleep
Differences from QB
▪None
See also
▪And