Atari XL User Manual

Graphics
151
3040 IF COL=O THEN POKE 656,1:POKE
657,2:PRINT"ERASE":REM TEXT IN
REVERSE
3050 IF COL=l THEN POKE 656,1;POKE
657,9:PRINT
n
RED n:REM TEXT IN
REVERSE
3060 IF COL=2 THEN POKE 656,l;POKE
657,l7:PRINT"YELLOW":REM TEXT
IN REVERSE
3070 IF COL=3 THEN POKE 656,1;POKE
657,25:PRINT" BLUE n:REM TEXT
IN REVERSE
3100 RETURN
3992 REM COLOUR
4000 SETCOLOR 0,3,8
4010 SETCOLOR 1,1,12
4020 SETCOLOR 2,9,4
4030 SETCOLOR 4,0,12
4100 RETURN
19992 REM SET UP
20000 DIM DXY(15,1)
20010 FOR J=5 TO 15
20020 FOR K=O TO 1
20030 READ DXY
20040 DXY(J,K)=DXY
20050 NEXT K
20060 NEXT J
20070 COL=2
20092 REM DEFINE LABELS
20100 PICTURE=1000
20110 JOYREAD=1100
20120 TEXT=2000
20130 CHECKJOY=2100
20140 SCREEN=2300
20150 SWITCH=2500
20160 CHCURSOR=2600
20170 MESSAGE=3000
20180 COLOUR=4000

Atari XL Specifications

General

Release Year	1983
CPU	MOS Technology 6502C
Graphics	ANTIC, GTIA
Sound	POKEY (4 channels)
Storage	Cassette tape
Ports	Cartridge
Operating System	Atari BASIC
CPU Speed	1.79 MHz
RAM	64 KB