Format: |
v=PEN(n)
|
Zweck: | Liefert den Zustand oder die Bildschirmkoordinaten des Lichtstiftes (Lightpen).
n Ein ganzzahliger Wert zwischen 0 und 4, der folgende Wirkung hat:
0 | x-Koordinate der Lichtstiftposition auf dem grafischen Bildschirm (60 bis 320). | 1 | y-Koordinate der Lichtstiftposition auf dem grafischen Bildschirm (50 bis 200) | 2 | Zeichen-Spaltenposition des Lichtstiftes beim 80-Zeichen-Bildschirm. | 3 | Zeichen-Zeilenposition des Lichtstiftes beim 80-Zeichen-Bildschirm. | 4 | Es wird 1 übergeben, falls der Lichtstift seit der letzten Abfrage aktiviert wurde, andernfalls 0. |
|
Bemerkungen: | Wie
bei den Sprite-Koordinaten sind die Lichtstiftkoordinaten nicht
skaliert, sondern echte Koordinaten innerhalb des umrahmten
Bildschirmbereiches.
Liegt die Lichtstiftposition
außerhalb des gültigen Bildschirmbereiches, sind die
übergebenen Koordinatenwerte 0.
Für die PEN-Funktion braucht die COLLISION-Anweisung nicht aktiviert zu werden.
Im allgemeinen ist für die Stimulierung des Lichtstiftes ein weißer Bildschirmhintergrund erforderlich.
Die von der PEN-Funktion übergebenen Werte können von Bildschirm zu Bildschirm unterschiedlich sein.
|
Beispiel: | 100 DO UNTIL PEN(4):LOOP 110 PRINT PEN(2);PEN(3)
Sobald
der Lichtstift aktiviert wird, wird die Spalten- und
Zeilen-Position des Bildschirmzeichens (auf dem 80-Zeichen-Bildschirm)
gedruckt, bei dem er aufgesetzt wurde.
|