XProfan

BlackWhite (F,X,Y,B,P)
Macht aus einer Grafik auf dem Bildschirm (oder Teilen davon) ein Schwarz-Weiß Bild.
F : Long - Handle der Zielbitmap (%HDC oder eine mit LoadExtBmp() / CreateExtBmp() erzeugte) oder 0
X : Long - X Offset zum Bildschirm
Y : Long - Y Offset zum Bildschirm
B : Long - Handle eines mit InitExtFX() oder CreateExtFX() erzeugten Bytes-Arrays (Quellbitmap)
P : Long - Priorität des Effekts, 0-255 (127=normal)
Ergebniss: Long - 0.
Die Grafik des Bildschirms wird in ein Schwarz-Weiß Bild umgewandelt. X und Y geben die linke obere Ecke an, ab wo der Bildschirm scharz-weiß gemacht wird. Die Grösse des Rechtecks ergibt sich aus der Grösse der Bitmap, die in InitExtFX() / CreateExtFX() angegeben wurde.
Wenn sie BlackWhite() innerhalb einer Schleife mit wechselnder Priorität aufrufen, gibt das einen ganz erstaunlichen Effekt!
Je niedriger die Priorität ist, desto mehr überwiegt die Farbe Schwarz, je höher sie ist, desto mehr überwiegt die Farbe Weiß.
Für F kann entweder eine der Profan-Bitmaps angegeben werden oder eine, die mit LoadExtBmp() / CreateExtBmp() erzeugt wurde. Wird für F aber 0 übergeben, dann wird die Funktion zwar ausgeführt, aber nicht auf den Bildschirm gebracht.
BlackWhite() ist ziemlich schnell und arbeitet in Echtzeit. Generell gilt: Je kleiner die Fläche, desto schneller arbeitet die Funktion.
Bevor die Funktion angewendet werden kann, muß eine Vorbereitung mit InitExtFX() stattgefunden haben.
Die Daten im Byte-Array B werden durch Aufruf dieser Funktion nicht verändert.
array&=InitExtFX(exhdc&)         Handle (Byte-Array) zu einer Bitmap erzeugen
BlackWhite(%HDC,0,0,array&,127)
FreeExtFX(array&)                später wieder