Atari 130XE User Manual

TYPE·A· TU N E
This program assigns musical note values to the keys on the top row
of the keyboard. Press
only one key at a time.
KEY
MUSICAL VALUE
Insert
Bb (~r A#)
Cl ear
0
A
9
A b (or G#)
8
G
7
F#(or G b
6
F
5
E
4
E b (or D#)
3
D
2
Db (or C#)
C
1.9 DIM CHORD (37) .. TUNE (1.2)
29 GRAPHICS 9:? :? "
TVPE-A-TUNE PROGRAM"
25 ? :? "PRESS KEVS 1.-<;J .. 9 .. < .. > TO PRODUCE NOTES. ";
27 ? :? "RELEASE ONE KEV BEFORE PRESSING THE NE)(T . "
28 ?:? "OTHERWISE .. THERE MAV BE A DELAV. "
39 FOR )( =1. TO 37: READ A: CHORD ()() =A : NE)(T )(
49 FOR )(=1. TO 1.2: READ A: TUNE ()() =A : NE)(T )(
59 OPEN 111. .. 4 .. 9 .. "K:"
55 OLDCHR=-1.
69 A=PEEK(764): IF A=255 THEN 60
63 IF A=OLDCHR THEN 1.99
650LDCHR=A
79 FOR )(=1. TO 1.2: IF TUNE ()() =A THEN SOUND
9 .. CHORD()() .. 1.9 .. 8: GOTO 1.99
89 NE)(T )(
1.99 I=INT(PEEK(53775)/4) :IF (I/2)=INT(I/2) THEN 69
1.1.9 POKE 764 .. 255:S0UND 9 .. 9 .. 9 .. 9:OLDCHR=-1. :GOTO 69
299 DATA 243 .. 239 .. 21.7 .. 294 .. 1.<;J3 .. 1.82 .. 1.73 .. 1.62 .. 1.53 .. 1.44 .. 1.36 ..
1.28 .. 1.21. .. 1.1.4 .. 1.98 .. 1.92 .. <;J6 .. <;J1. .. 85 .. 81. .. 76 .. 72 .. 68 .. 64 .. 69
21.9 DATA 57 .. 53 .. 59 .. 47 .. 45 .. 42 .. 49 .. 37 .. 35 .. 33 .. 31. .. 2<;J
229 DATA 31. .. 39 .. 26 .. 24 .. 2<;J .. 27 .. 51. .. 53 .. 48 .. 50 .. 54 .. 55
To play "Mary Had a Little Lamb," press the following keys:
5, 3, 1, 3, 5, 5, 5 3, 3, 3 5, 8, 8 5, 3, 1, 3, 5, 5, 5 5, 3, 3, 5, 3, 1
Note: Make sure you insert three spaces between THE and NEXT in
line 27.
82

Atari 130XE Specifications

General

Type	Home computer
Release year	1985
CPU	MOS Technology 6502C
CPU Speed	1.79 MHz
RAM	128 KB
ROM	24 KB
Graphics	ANTIC and GTIA chips
Manufacturer	Atari
Display resolution	320x192
Sound	POKEY chip, 4 channels
Storage	External floppy disk drive, cassette tape
Ports	2 joystick ports
Operating System	Atari BASIC