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

Xor

Метод Xor комбинирует в себе каждый исходный пиксель с соответствующим конечным пикселем, используя битовую функцию Xor. Результат этого выводится как конечный пиксель.
Этот метод работает во всех графических режимах. Там нет маски цвета, хотя цветовые значения 0 (RGBA(0, 0, 0, 0) в полноцветном режиме) не будет иметь никакого эффекта, из-за поведения Xor.

В полноцветных режимах, каждый компонент (красный, зеленый, синий и альфа) хранится в дискретном наборе битов, поэтому операция может быть сделана только затронув некоторые каналы, убедившись, что все значения других каналов установлены в 0.

''открываем графическое окно
ScreenRes 320, 200, 16

''создаем спрайт, содержащий круг
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 (146 - r, 108 - r), c, Xor
Put (174 - r, 108 - r), c, Xor
Put (160 - r,  84 - r), c, Xor

''освобождаем память, используемую для спрайта
ImageDestroy c

''приостанавливаем программу перед закрытием
Sleep

• Нет
  
  

• Xor
  
• Put (Графика)