Commodore 128 Bedienungshandbuch Seite 291

C64-Modus Farben und grafische Effekte
Ein Springballspiel
10PRINTC.HR$(147} REM f LR/HOMF
28POKE53Z8B, 7
3 8 X = i Y = l
4BDX=1 DY=1
58 POKE 1024*X+39«Y,81
55 POKE 5529fc>*X+39~Y, 1
60 TORT = B I O 18 : NE VT
78 POKE 1024+X+39»Y,32
88 X=X*DX
90 I F X=8 OR X=39THEN DX= -DX
1BBY=V*DY
110 IF Y=0 OR Y=24 THEN DY= —DY
128 GOTO 58
Nachdem in Zeile 10 der Bildschirm gelöscht wurde, wird in Zeile 20 die
Hintergrundfarbe schwarz und die Rahmenfarbe gelb gewählt.
Die Variablen X und Y in Zeile 30 stehen für die Zeile und Spalte, in der sich
der Ball augenblicklich befindet.
Die Variablen DX und DY der Zeile 40 geben die horizontale und vertikale
Bewegungsrichtung des Balls an. D X = + 1 entspricht einer Bewegung nach
rechts. DX = - 1 entspricht einer Bewegung nach links. Analog dazu entspre-
chen DX und DY einer Bewegung nach oben bzw. unten.
In Zeile 50 wird der Ball in der durch Zeilen- und Spaltennummer bestimmten
Position angezeigt.
In Zeile 60 ist eine Verzögerungsschleife eingefügt.
In Zeile 70 wird der Ball durch Überschreiben mit einem Leerzeichen
gelöscht.
In Zeile 80 wird durch Addition von DX der. Ball in der richtigen Richtung
bewegt.
Das Vorzeichen von DX wird umgedreht, wenn in Zeile 90 festgestellt wird,
daß der Ball den linken oder rechten Rand berührt.
In den Zeilen 100 und 110 geschieht dasselbe für den oberen und unteren
Rand.
POKE53281,0
5-83