Übungen - NCR GW-BASIC Betriebsanleitung

ANZEIGE A M BILDSCHIRM
dem GW-BASIC Textmodus am Büdschirm ausgeben. Während bei der
Standardauflösung 40 Zeichen auf einer Zeile ausgegeben werden kön­
nen, ist es möglich, bei hoher Auflösung bis zu 80 Zeichen darzustellen.
Die einzelnen Zeichen werden in weiß auf schwarzem Hintergrund aus­
gegeben.
Die folgenden Beispiele können nur an einem Adapter mit Farbbild­
schirm ausprobiert werden. Das erste Beispiel zeigt die vorhandenen
Farben am Bildschirm sowohl in statisch als auch in blinkend. Die einzel­
nen Farben mit Ausnahme von schwarz und grau werden auf schwarzem
Hintergrund gezeigt. (Für eine unsichtbare Bildschirmanzeige brauchen
Sie nur die gleiche Farbe für den Vorder- und Hintergrund wählen).
Dieses Programm bedient sich des Textmodus zur Anzeige am Bild­
schirm. Das am Bildschirm ausgegebene Zeichen hat den Codewert 219
(ein Rechteck, das den gesamten Raum für ein Zeichen ausfüllt). Die
STRING$-Funktion in Zeile 10 richtet die Variable B$ mit 40 solcher
Rechtecke ein. In Zeile 20 wird die Hintergrundfarbe auf schwarz und die
Breite der Bildschirmanzeige auf 80 Zeichen gesetzt. Im restlichen Pro­
gramm werden die Grundfarben (0 to 7) nacheinander ausgewählt. Die
Grundfarbe (Zeile 50) wird zuerst angezeigt, dann wird diese blinkend
(Zeile 70), intensiv (Zeile 90) und zuletzt leuchtend und blinkend aus­
gegeben. In jedem Fall erhält man den blinkenden Zustand durch Addi­
tion von 16 zu dem Wert, der sonst als Farbwert gilt. Die Zeilenbreite von
80 hat zur Folge, daß die 4 Versionen für jede Farbe bei der Anzeige am
Bildschirm 2 Zeilen beansprucht.
5 SCREEN 0
10 B$=STRENG$(40,CHR$(219)
20 COLOR ,0:WIDTH 80
30 FOR p0/fe=l TO 7
40 COLOR LP%,0
50 PRINT B$;
60 COLOR LP°/of 16,0
70 PRINT B$;
80 COLOR LP°/(H-8,0
90 PRINT B$;
100 COLOR LP°/of24,0
110 PRINT B$;
120 NEXT LP%
125 COLOR 7,0
130 END
GW-BASIC
ÜBUNGEN
3-7