Bezeichnung
GetPen -- gibt die Stiftfarbe aus der aktuellen Palette zurück (V9.0)
Übersicht
color = GetPen(pen[, t])
Beschreibung
Dieser Befehl ruft die Farbe des durch pen angegebenen Stifts aus der aktuell aktiven Palette ab. Standardmäßig ist die Palette des aktuellen Displays die aktive Palette, aber natürlich nur, wenn das aktuelle Display ein Palettenmodus-Display ist. Siehe Palettenmodus-Displays für Details. Mit dem Befehl SelectPalette() kann eine Palette zur aktuellen Palette werden.

Alternativ können Sie auch GetPen() verwenden, um die Stiftfarbe von einem anderen Palettenobjekt abzurufen. 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 vom optionalen Tabellenargument t unterstützt:

Type:
Setzen Sie dies auf den Typ des Objekts, dessen Palette Sie abfragen möchten. Dies kann einer der folgenden Objekttypen sein:

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

Beachten Sie, dass Sie bei der Verwendung der Typen #ANIM oder #SPRITE auch den Tag Frame (siehe unten) setzen müssen, um das Einzelbild anzugeben, dessen Palette Sie abfragen 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 Palette Sie abfragen möchten. Voreingestellt ist die ID der aktuell aktiven Palette, die mit SelectPalette() gesetzt 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 Palette Sie abfragen möchten. Einzelbilder werden von 1 an gezählt. Bei Verwendung mit Animationen und Sprites wird standardmäßig 1 und mit Animationsebenen das aktuelle Einzelbild verwendet.

Eingaben
pen
Stift, den Sie erhalten möchten (beginnend bei 0)
t
optional: Tabelle zum Festlegen weiterer Optionen (siehe oben)
Rückgabewerte
color
Farbe des Stifts, angegeben als RGB-Farbe
Beispiel
@DISPLAY {Palette = #PALETTE_MONOCHROME}
color0 = GetPen(0)
color1 = GetPen(1)
Der obige Code erzeugt ein monochromes Palettenmodus-Display und gibt die Farben der ersten beiden Stifte zurück. color0 wird schwarz und color1 wird weiß sein.


color = GetPen(4, {Type = #BRUSH, ID = 2})
Der Code gibt die Farbe von Stift 4 in Pinsel 2 zurück.

Navigation zeigen