XOR（图形 Put）

• 来源: https://www.freebasic.net/wiki/wikka.php?wakka=KeyPgXorGfx
• 最后更新: 2023-07-09

---

Put 图形语句的参数，使用位运算 Xor 作为位图传输方法

语法

Put [ target, ] [ STEP ] ( x,y ), source [ ,( x1,y1 )-( x2,y2 ) ], Xor

参数

Xor

必填。

说明

Xor 方法将每个源像素与对应的目标像素进行位运算 Xor 操作，结果作为目标像素输出。

此方法适用于所有图形模式。没有遮罩颜色，但由于 Xor 的特性，颜色值为 0（全彩模式下为 RGBA(0, 0, 0, 0)）的像素不会产生任何效果。

在全彩模式下，每个分量（红、绿、蓝和 alpha）都保存在一组独立的位中，因此只需将其他通道的所有值设为 0，即可使操作仅影响某些通道。

示例

start GeSHi

''open a graphics window
ScreenRes 320, 200, 16

''create a sprite containing a circle
Const As Integer r = 32
Dim c As Any Ptr = ImageCreate(r * 2 + 1, r * 2 + 1, 0)
Circle c, (r, r), r, RGBA(255, 255, 255, 0), , , 1, f

''put the three sprites, overlapping each other in the middle
Put (146 - r, 108 - r), c, Xor
Put (174 - r, 108 - r), c, Xor
Put (160 - r,  84 - r), c, Xor

''free the memory used by the sprite
ImageDestroy c

''pause the program before closing
Sleep

end GeSHi

与 QB 的区别

• 无

另请参阅

• Xor
• Put (Graphics)

返回 目录