Inhaltsverzeichnis
Werbung
ERWEITERUNGEN
Diesen Fehler können Sie beheben, indem Sie die fehlenden Daten in
Zeile 1« anfügen oder eine neue Programmzeile (z.B. 12) mit DATA und den
Werten hinzufügen.
Benötigen Sie jedoch die gleichen Werte in der gleichen Reihenfolge noch
einmal, so brauchen Sie nur den DATA -Zeiger auf den ersten Wert zurück-
setzen. Dies können Sie ganz einfach mit der Anweisung RESTORE bewerk-
stelligen. In unserem erwähnten Beispiel würden Sie dann folgende Pro-
grammzeile einfügen:
95 RESTORE
Eine einfache Möglichkeit der geschilderten Programmerweiterung könnte
dann wie folgt aussehen:
95 RESTORE
1«« FOR I = 1 TO 6
11« READ A
12« PRINT "A HALBE HAT JETZT DEN WERT"; A/2
13« NEXT
Abschließend soll anhand unseres Sonnenprogrammes aus Kapitel 11 de-
monstriert werden, wie Sie mit Hilfe der genannten Anweisungen Programme
elegant und wirksam verkürzen können.
Gleichzeitig wurde im Programm die Darstellung der Meeresfläche vereinfacht
über die WINDOW-Anweisung abgefahren und die Sonne durch die CIRCLE-
Anweisung innerhalb einer
Dabei wurden zwei Sonnen um einen Graphikpunkt versetzt gezeichnet, um
die Fläche lückenlos mit Vordergrundfarbpunkten "dicht" zu bekommen.
1« COLOR7,1:CLS
2« X=22«:Y=5«
3« FOR R=1TO3«
4« CIRCLEX,Y,R,2: CIRCLE,49,R,2
5« NEXT
6« FORI=1TO9
7« READC,D
8« LINEX,Y,C,D,2
9« NEXT
1«« WINDOW26,31,«,39:PAPER5:CLS:WINDOW
11« GOTO11«
12« DATA 0, 15«, «, 65, «, 247, 11«, 255, 22«
13« DATA 255,319,255,319,146,319,1««,319,58
96
FOR-Schleife kürzer und schneller
18
realisiert.
Quicklinks ausblenden:
Werbung
Inhaltsverzeichnis
