Werbung
Grafiken erstellen
Die Beispiele von den vorigen Seiten können mit folgendem BASIC-Programm
ausgedruckt werden. Die anhand des Rasters ermittelten Zahlen sind in Zeile
80 bis 140 enthalten. Die WIDTH -Anweisung in Zeile 10 bezieht sich lediglich
auf das IBM PC BASIC und kann je nach System anders lauten.
10 WIDTH "LPT1:",255
20 LPRZINT CHRS(27)"*"CHRS(39)CERS(42)CHe(0);
30 FOR X=1 TO 126
40 READ N
50 LPR1NT CHRSM;
60 NEXT X
70 LPR1NT
80 DATA 0,0,63,0,0,127,0,0,255,0,3,255,0,15,255,0,31,255
90 DATA 0,127,255,0,255,255,1255,255,3,255,255,7,255,255,15,
255,255
100 DATA 31,255,254,31,255,252,31,255,248,31,255,240,31,255,
224,31,255,192
110 DATA 31,255,0,31,252,0,31,240,0,31,224,0,31,128,0,31,240,0
120 DATA 31,255,192,28,255,224,28,127,240,28,15,248,30,0,252,
31,0,126
130 DATA 15,128,15,7,192,7,3,240,7,1,254,7,0,255,7,0,127,135
140 DATA 0,31,199,0,7,231,0,1,247,0,0,255,0,0,127,0,0,63
Die Zahl 39 in Zeile 20 aktiviert dem 24-Nadel-Grafikdruck dreifache Punktdich-
te, die Zahl 42 definiert die benötigte Anzahl Spalten. Die Zeilen 80 bis 140 ent-
halten die 126 Datenbytes (42 Spalten x 3 Bytes) für jede Punktspalte. Die Zei-
len 30 bis 60 veranlassen den Ausdruck des nachfolgend abgebildeten Mu-
sters.
pe.
In diesem Beispiel sieht man deutlich, daß die einzelnen Punkte sich überlap-
pen, da das Muster im 24-Nadel-Modus mit dreifacher Punktdichte (d. h. hori-
zontal und vertikal 180 Punkte/Zoll) gedruckt wurde.
Durch Einfügen der folgenden beiden Zeilen in das vorige Grafikprogramm wird
das gewünschte Punktmuster wie unten abgebildet zehnmal hintereinander ge-
druckt:
15 FOR 0-1 TO 10 :RESTORE
65 NEXT C
lerIeJeJeJeJeJeJeJeJeä
Software konfigurieren und Grafiken erstellen
4-21
Werbung
