Random game
Random game
Random game
  • Entry name:
     GTIA Part 1 - Listing 3 
  • Category:
    Graphics
  • Publisher/Developer:
    SoftSide Publications
  • Year:
    1983
  • Code:
    Alan J. Zett
  • Programming language:
    Atari BASIC
source: GTIA Part 1 - Listing 3 GTIA Part 1 - Listing 3 GTIA Part 1 - Listing 3 GTIA Part 1 - Listing 3 GTIA Part 1 - Listing 3 GTIA Part 1 - Listing 3
Listing 1
10 GRAPHICS 11
20 POKE 712,2
30 P=INT(RND(0)*16):S=INT(RND(0)*16)
40 IF P=S OR P=0 OR S=0 THEN 30
50 FOR Y=0 TO 100 STEP 2
60 COLOR P:PLOT 5,Y:DRAWTO 43,Y
70 PLOT 55,Y/2:DRAWTO 75,Y/2
80 COLOR S:PLOT 12,Y+1:DRAWTO 50,Y+l
90 PLOT 55,Y/2+53:DRAWTO 75,Y/2+53
100 NEXT Y
200 IF PEEK(53279)=7 THEN 200
210 RUN	

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!