Atari 65XE, Owner'S Manual

Page: 84 / 135

A. Sample Programs
Your ATARI Computer can work miracles with a little help from your
imagination and the right programming techniques. These sample
programs will show off the versatility of your ATARI 65XE and motivate
you to try writing some programs yourself.
Just type in each program exactly as written, pressing at the
end of every line. When you're finished, type the word RUN, press
, and watch your ATARI Computer come to life.
Note: When spacing in program lines is critical, a note at the bottom
of the program will specify the exact number of spaces needed.
THE ATARI CHOO-CHOO
Sound effects are an ATARI specialty. If you close your eyes when you
run ATARI Choo-Choo, you might think you're on the Marrakesh
Express.
10 POKE 765,255:POKE 580,1
20 GRAPHICS 17:POKE 712,148: POSITION 1,10 : PRINT #6;
"THE A T A R I CHOO-CHOO"
30 FOR X=15 TO 0 STEP -1-P:SOUND l,0,0,X
40 R = I N T ( R N D (0)*300)+1
50 IF R=30 THEN S O U N D 3,36,10,10: SOUND 2,48,10,
10:GOSUB 90: S O U N D 3,0,0,0:SOUND 2,0,0,0
60 N E X T X:P=P+0.03
70 IF P>=5 THEN P=5
80 GOTO 30
90 POKE 77,0:POSITION 8,12: PRINT #6; "toot":FOR A=1 TO
400 : NEXT A : POSITION 8,12 : PRINT #6;" " : R E T U R N
Note: Line 90 requires four blank spaces between the quotation
marks.
79