Atari 400

LIGHT SHOW
H-8 Appendix
This program demonstrates another aspect of Atari graphics. It uses graphics
mode 7 for high resolution and the PLOT and DRA WTO statements to draw the
lines. In line 20, the title will be more effective if it is entered in inverse video
(use the Atari logo key).
10 FOR ST=1 TO 8: GF.:APHIC::; 7
15 POKE 752.• 1
20 ? : ? II At.a.r· i t s SPed a 1 Li eh t. s~.OIJJ
II : SETCOLOF~ 2, 0 ·' 0
30 SETCOLOR 1, 2*ST I 8 : COLOR 2
40 FOR DR=0 TO :;0 STEP ST
50 PLOT 0, 0 = DRAL·lTO 100 .. DR
60 NE:~=:T DR : FOR t·~=l TO 8(1~3: NE>=:T t·l: t · ~Ei·::i ST
70 FOR H=l TO 2000 = r·iE>=:T H: GOTO 10