FSR - QBasic Seite 20

AG Informatik

Der Zeichensatz des Computers besteht aus 256 Zeichen, die jedoch nicht alle darstellbar sind, da einige Sonderfunktionen haben. Mit Hilfe der Tastatur können nicht alle dieser 256 Zeichen eingegeben werden (warum wohl?). Deshalb gibt es in QBasic die Funktion CHR$(n), mit der sich (fast) alle Zeichen auf dem Bildschirm darstellen lassen.

Das folgende Programm gibt alle wichtigen Zeichen des Zeichensatzes aus.

       REM Strings7
       CLS
       PRINT "Die wichtigsten Zeichen des Computers:"
       FOR n=32 TO 255
         PRINT CHR$(n);
       NEXT n

Prüfe auch, wie die Zeichen 1 bis 6, 11 und 12, 21, 24 bis 27 aussehen. Erweitere dazu das Programm Strings7 um die entsprechenden Zeilen. Was bewirkt die Zeile PRINT CHR$(7)?

Soll eine Zeichenkette aus lauter gleichen Zeichen bestehen, so verwendet man dazu die Funktion STRING$(n,x$).

Das folgende Programm erzeugt einen Rahmen um einen Text. Verwende für x$ verschiedene Namen und starte jeweils das Programm.

       REM Strings8
       CLS
       LET x$="Winfried Furrer"
       LET n=LEN(x$)
       PRINT CHR$(201); STRING$(n+2,CHR$(205)); CHR$(187)
       PRINT CHR$(186); " "; x$; " "; CHR$(186)
       PRINT CHR$(200); STRING$(n+2,CHR$(205)); CHR$(188)
       PRINT

Soll der Rahmen anstelle einer Doppellinie aus einer einfachen Linie bestehen, dann sind die im obigen Programm verwendeten Zeichen wie folgt zu ersetzen:

201218, 205196, 187191, 186179, 200192, 188217

Ändere das Programm Strings8 mit den obenstehenden Angaben so ab, daß ein einfacher Rahmen entsteht.

Die Zeichen 196 bzw. 205 können zum Unterstreichen verwendet werden.

       REM Strings9
       CLS
       LET x$="Winfried Furrer"
       PRINT x$
       PRINT STRING$(LEN(x$),CHR$(196))