Bezeichnung
SetPen -- ändert die Stiftfarbe (V9.0)
Übersicht
SetPen(pen, color[, t])
Beschreibung
Dieser Befehl setzt die Farbe des durch pen angegebenen Stifts auf die durch color angegebene Farbe. Die Änderung wird in der aktuell aktiven Palette vorgenommen. Standardmäßig ist die Palette des aktuellen Displays die aktive Palette, aber natürlich nur für den Fall, wenn das aktuelle Display im Palettenmodus ist. Siehe Palettenmodus-Displays für Details. Eine Palette kann zur aktiven Palette gemacht werden, indem der Befehl SelectPalette() verwendet wird.

Alternativ können Sie SetPen() auch dazu bringen, Stifte in einem anderen Palettenobjekt zu ändern. Dazu müssen Sie das optionale Tabellenargument t an SetPen() übergeben und die Tags Type und ID angeben. Ein Beispiel finden Sie weiter unten.

Die folgenden Tags werden durch das optionale Tabellenargument t unterstützt:

Type:
Setzen Sie dies auf die Typkennung des Objekts, dessen Stift Sie ändern möchten. Dies kann einer der folgenden Objekttypen sein:

 
#ANIM
#BGPIC
#BRUSH
#DISPLAY
#LAYER
#PALETTE
#SPRITE

Beachten Sie, dass Sie bei Verwendung der Typen #ANIM oder #SPRITE auch den Tag Frame (siehe unten) setzen müssen, um das Einzelbild anzugeben, dessen Stift Sie ändern möchten. Wenn Sie #LAYER verwenden und die angegebene Ebene eine Animationsebene ist, müssen Sie auch den Tag Frame setzen.

Type ist standardmäßig der Typ der aktuell aktiven Palette, die mit dem Befehl SelectPalette() gewählt wurde. Siehe SelectPalette für Details.

ID:
Setzen Sie diesen Tag auf den Identifikator des Objekts, dessen Stift Sie ändern möchten. Die Standardeinstellung ist die ID der aktuell aktiven Palette, die mit SelectPalette() ausgewählt wurde. Siehe SelectPalette für Details.

Frame:
Wenn der Typ eine Animation, ein Sprite oder eine Animationsebene ist, müssen Sie diesen Tag setzen, um das Einzelbild anzugeben, dessen Stift Sie ändern möchten. Die Einzelbilder werden von 1 an gezählt. Bei Verwendung mit Animationen und Sprites wird standardmäßig 1 und bei Verwendung mit Animationsebenen das aktuelle Einzelbild verwendet.

Eingaben
pen
Stift, den Sie ändern möchten (beginnend bei 0)
color
neue Farbe für den Stift; muss als RGB-Farbe angegeben werden
t
optional: Tabelle mit weiteren Optionen (siehe oben)
Beispiel
@DISPLAY {Palette = #PALETTE_MONOCHROME}
SetFillStyle(#FILLCOLOR)
SetPaletteMode(#PALETTEMODE_PEN)
SetDrawPen(1)
Box(#CENTER, #CENTER, 320, 240)
WaitLeftMouse
SetPen(0, #WHITE)
SetPen(1, #BLACK)
Der obige Code erstellt ein monochromes Palettenmodus-Display mit einem schwarzen Hintergrund und einem weißen Rechteck in der Mitte. Nach einem Mausklick werden die Farben des Hintergrunds und des weißen Rechtecks vertauscht, indem Stift 0 auf Weiß und Stift 1 auf Schwarz gesetzt wird. 

SetPen(4, #RED, {Type = #BRUSH, ID = 2})
Der Code ändert den Stift 4 im Pinsel 2 auf rot.
Navigation zeigen