Random game
Random game
Random demo
  • Entry name:
     GTIA Part 1 - Listing 1 
  • Category:
    Graphics
  • Publisher/Developer:
    SoftSide Publications
  • Year:
    1983
  • Code:
    Alan J. Zett
  • Programming language:
    Atari BASIC
source: GTIA Part 1 - Listing 1 GTIA Part 1 - Listing 1 GTIA Part 1 - Listing 1 GTIA Part 1 - Listing 1 GTIA Part 1 - Listing 1
Listing 1
10 GRAPHICS 11:POKE 712,6:CLR
20 XM=(RND(0)*39)+40:X=1
30 YM=(RND(0)*95)+96:Y=1
40 XI=RND(0)+0.2:YI=RND(0)+0.55
50 COLOR INT(RND(0)*9)+1
60 PLOT X,Y
70 PLOT 79-X,Y
80 PLOT X,191-Y
90 PLOT 79-X,191-Y
100 X=ABS(X+XI):Y=ABS(Y+YI)
110 IF X+XI>XM-1 THEN XI=-XI:GOTO 50
120 IF Y+YI>YM-I THEN YI=-YI:GOTO 50
130 IF X+XI<1 THEN XI=-XI:GOTO 50
140 IF Y+YI<1 THEN YI=-YI:GOTO 50
150 IF PEEK(53279)<>7 THEN RUN
160 GOTO 60	

This is non-commercial site, its content is based on Atari 8-bit home computer contents and references.
If you feel your rights are violated by showing/using any part of contents of your product represented on this page, please contact me immediatelly so I can remove it!