]> git.sur5r.net Git - cc65/blob - asminc/atari.inc
Some formatting and style fixes.
[cc65] / asminc / atari.inc
1 ;-------------------------------------------------------------------------
2 ; Atari System Equates
3 ; by Freddy Offenga, Christian Groessler, and Christian Krueger
4 ;
5 ; References:
6 ; - Atari 400/800 OS rev.B source code, Atari 1979
7 ; - Atari OS manual - XL addendum
8 ; - Atari XL/XE rev.2 source code, Atari 1984
9 ; - Mapping the Atari - revised edition, Ian Chadwick 1985
10 ;
11 ; ##old##       old OS rev.B label - moved or deleted
12 ; ##1200xl##    new label introduced in 1200XL OS (rev.10/11)
13 ; ##rev2##      new label introduced in XL/XE OS rev.2
14 ;-------------------------------------------------------------------------
15
16 ;-------------------------------------------------------------------------
17 ; Configuration Equates
18 ;-------------------------------------------------------------------------
19
20 MAXDEV  = 33            ;offset to last possible entry of HATABS
21 IOCBSZ  = 16            ;length of IOCB
22
23 SEIOCB  = 0*IOCBSZ      ;##rev2## screen editor IOCB index
24 MAXIOC  = 8*IOCBSZ      ;first invalid IOCB index
25
26 DSCTSZ  = 128           ;##rev2## disk sector size
27
28 LEDGE   = 2             ;left edge
29 REDGE   = 39            ;right edge
30
31 INIML   = $0700         ;##rev2## initial MEMLO
32
33 ICSORG  = $CC00         ;##rev2## international character set origin
34 DCSORG  = $E000         ;##rev2## domestic character set origin
35
36 ; IOCB Command Code Equates
37
38 OPEN    = $03           ;open
39 GETREC  = $05           ;get record
40 GETCHR  = $07           ;get character(s)
41 PUTREC  = $09           ;put record
42 PUTCHR  = $0B           ;put character(s)
43 CLOSE   = $0C           ;close
44 STATIS  = $0D           ;status
45 SPECIL  = $0E           ;special
46
47 ; DOS IOCB command codes
48
49 RENAME  = $20           ;rename disk file
50 DELETE  = $21           ;delete disk file
51 LOCKFL  = $23           ;lock file (set to read-only)
52 UNLOCK  = $24           ;unlock file
53 POINT   = $25           ;point sector
54 NOTE    = $26           ;note sector
55 GETFL   = $27           ;get file length
56 CHDIR_MYDOS     = $29   ;change directory (MyDOS)
57 MKDIR   = $2A           ;make directory (MyDOS/SpartaDOS)
58 RMDIR   = $2B           ;remove directory (SpartaDOS)
59 CHDIR_SPDOS     = $2C   ;change directory (SpartaDOS)
60 FORMAT  = $FE           ;format
61
62 GETCWD  = $30           ;get current directory (MyDOS/SpartaDOS)
63
64 ; Special Entry Command Equates
65 ; DOS Commands
66 ; Command line table, Index values for (DOSVEC),Y -- COMTAB
67 ; Compatible with OS/A+, DOS XL and SpartaDOS
68
69 COMTAB  = 0             ;DOS entry jump vector
70 ZCRNAME = 3             ;file name crunch routine jump vector
71 BUFOFF  = 10            ;next parameter buffer offset
72 COMFNAM = 33            ;destination buffer for crunch routine
73 LBUF    = 63            ;command line input buffer
74
75 ; Screen IOCB Commands
76
77 DRAWLN  = $11           ;draw line
78 FILLIN  = $12           ;draw line with right fill
79
80 ; ICAX1 Auxiliary Byte 1 Equates
81
82 APPEND  = $01           ;open write append (D:)
83 DIRECT  = $02           ;open for directory access (D:)
84 OPNIN   = $04           ;open for input (all devices)
85 OPNOT   = $08           ;open for output (all devices)
86 MXDMOD  = $10           ;open for mixed mode (E:, S:)
87 INSCLR  = $20           ;open for input without clearing screen
88
89 ; Device Code Equates
90
91 CASSET  = 'C'           ;cassette
92 DISK    = 'D'           ;disk
93 SCREDT  = 'E'           ;screen editor
94 KBD     = 'K'           ;keyboard
95 PRINTR  = 'P'           ;printer
96 DISPLY  = 'S'           ;screen display
97
98 ; SIO Command Code Equates
99
100 SIO_FORMAT   = $21      ;format disk (default density)
101 SIO_FORMATS  = $22      ;1050: format medium density
102 SIO_CONFIG   = $44      ;configure drive
103 SIO_CONFIGSF = $4B      ;slow/fast configure drive??
104 SIO_RDPERCOM = $4E      ;read PERCOM block (XF551)
105 SIO_WRPERCOM = $4F      ;write PERCOM block (XF551)
106 SIO_WRITE    = $50      ;write sector
107 SIO_READ     = $52      ;read sector
108 SIO_STAT     = $53      ;get status information
109 SIO_VERIFY   = $56      ;verify sector 
110 SIO_WRITEV   = $57      ;write sector with verify
111 SIO_WRITETRK = $60      ;write track (Speedy)
112 SIO_READTRK  = $62      ;read track (Speedy)
113
114 ; SIO Status Code (DSTATS)
115 ; Input: data direction
116 ;     Bit #7 - W (write operation)
117 ;         #6 - R (read operation)
118 ; Output: status code
119 ;     $01 (001) -- OPERATION COMPLETE (NO ERRORS)
120 ;     $8A (138) -- DEVICE TIMEOUT (DOESN'T RESPOND)
121 ;     $8B (139) -- DEVICE NAK
122 ;     $8C (140) -- SERIAL BUS INPUT FRAMING ERROR
123 ;     $8E (142) -- SERIAL BUS DATA FRAME OVERRUN ERROR
124 ;     $8F (143) -- SERIAL BUS DATA FRAME CHECKSUM ERROR
125 ;     $90 (144) -- DEVICE DONE ERROR
126
127 ; Character and Key Code Equates
128
129 CLS     = $7D           ;##rev2## clear screen
130 EOL     = $9B           ;end of line (RETURN)
131
132 HELP    = $11           ;##1200xl## key code for HELP
133 CNTLF1  = $83           ;##1200xl## key code for CTRL-F1
134 CNTLF2  = $84           ;##1200xl## key code for CTRL-F2
135 CNTLF3  = $93           ;##1200xl## key code for CTRL-F3
136 CNTLF4  = $94           ;##1200xl## key code for CTRL-F4
137 CNTL1   = $9F           ;##1200xl## key code for CTRL-1
138
139 ; Status Code Equates
140
141 SUCCES  = 1             ;($01) succesful operation
142
143 BRKABT  = 128           ;($80) BREAK key abort
144 PRVOPN  = 129           ;($81) IOCB already open error
145 NONDEV  = 130           ;($82) nonexistent device error
146 WRONLY  = 131           ;($83) IOCB opened for write only error
147 NVALID  = 132           ;($84) invalid command error
148 NOTOPN  = 133           ;($85) device/file not open error
149 BADIOC  = 134           ;($86) invalid IOCB index error
150 RDONLY  = 135           ;($87) IOCB opened for read only error
151 EOFERR  = 136           ;($88) end of file error
152 TRNRCD  = 137           ;($89) truncated record error
153 TIMOUT  = 138           ;($8A) peripheral device timeout error
154 DNACK   = 139           ;($8B) device does not acknowledge command
155 FRMERR  = 140           ;($8C) serial bus framing error
156 CRSROR  = 141           ;($8D) cursor overrange error
157 OVRRUN  = 142           ;($8E) serial bus data overrun error
158 CHKERR  = 143           ;($8F) serial bus checksum error
159 DERROR  = 144           ;($90) device done (operation incomplete)
160 BADMOD  = 145           ;($91) bad screen mode number error
161 FNCNOT  = 146           ;($92) function not implemented in handler
162 SCRMEM  = 147           ;($93) insufficient memory for screen mode
163
164 DSKFMT  = 148           ;($94) SpartaDOS: unrecognized disk format
165 INCVER  = 149           ;($95) SpartaDOS: disk was made with incompat. version
166 DIRNFD  = 150           ;($96) SpartaDOS: directory not found
167 FEXIST  = 151           ;($97) SpartaDOS: file exists
168 NOTBIN  = 152           ;($98) SpartaDOS: file not binary
169 LSYMND  = 154           ;($9A) SDX: loader symbol not defined
170 BADPRM  = 156           ;($9C) SDX: bad parameter
171 OUTOFM  = 158           ;($9E) SDX: out of memory
172 INVDEV  = 160           ;($A0) invalid device number
173 TMOF    = 161           ;($A1) too many open files
174 DSKFLL  = 162           ;($A2) disk full
175 FATLIO  = 163           ;($A3) fatal I/O error
176 FNMSMT  = 164           ;($A4) internal file number mismatch
177 INVFNM  = 165           ;($A5) invalid file name
178 PDLERR  = 166           ;($A6) point data length error
179 EPERM   = 167           ;($A7) permission denied
180 DINVCM  = 168           ;($A8) command invalid for disk
181 DIRFLL  = 169           ;($A9) directory full
182 FNTFND  = 170           ;($AA) file not found
183 PNTINV  = 171           ;($AB) point invalid
184 BADDSK  = 173           ;($AD) bad disk
185 INCFMT  = 176           ;($B0) DOS 3: incompatible file system
186
187 ; DCB Device Bus Equates
188
189 DISKID  = $31           ;##rev2## disk bus ID
190 PDEVN   = $40           ;##rev2## printer bus ID
191 CASET   = $60           ;##rev2## cassette bus ID
192
193 ; Bus Command Equates
194
195 FOMAT   = '!'           ;##rev2## format command
196 PUTSEC  = 'P'           ;##rev2## put sector command
197 READ    = 'R'           ;##rev2## read command
198 STATC   = 'S'           ;##rev2## status command
199 WRITE   = 'W'           ;##rev2## write command
200
201 ; Command Auxiliary Byte Equates
202
203 DOUBLE  = 'D'           ;##rev2## print 20 characters double width
204 NORMAL  = 'N'           ;##rev2## print 40 characters normally
205 PLOT    = 'P'           ;##rev2## plot
206 SIDWAY  = 'S'           ;##rev2## print 16 characters sideways
207
208 ; Bus Response Equates
209
210 ACK     = 'A'           ;##rev2## device acknowledged
211 COMPLT  = 'C'           ;##rev2## device succesfully completed operation
212 ERROR   = 'E'           ;##rev2## device incurred error
213 NACK    = 'N'           ;##rev2## device did not understand
214
215 ; Floating Point Miscellaneous Equates
216
217 FPREC   = 6             ;precision
218
219 FMPREC  = FPREC-1       ;##rev2## length of mantissa
220
221 ; Cassette Record Type Equates
222
223 HDR     = $FB           ;##rev2## header
224 DTA     = $FC           ;##rev2## data record
225 DT1     = $FA           ;##rev2## last data record
226 EOT     = $FE           ;##rev2## end of tape (file)
227
228 TONE1   = 2             ;##rev2## record
229 TONE2   = 1             ;##rev2## playback
230
231 ; Cassette Timing Equates
232
233 WLEADN  = 1152          ;##rev2## NTSC 19.2 second WRITE file leader
234 RLEADN  = 576           ;##rev2## NTSC 9.6 second READ file leader
235 WIRGLN  = 180           ;##rev2## NTSC 3.0 second WRITE IRG
236 RIRGLN  = 120           ;##rev2## NTSC 2.0 second READ IRG
237 WSIRGN  = 15            ;##rev2## NTSC 0.25 second WRITE short IRG
238 RSIRGN  = 10            ;##rev2## NTSC 0.16 second READ short IRG
239 BEEPNN  = 30            ;##rev2## NTSC 0.5 second beep duration
240 BEEPFN  = 10            ;##rev2## NTSC 0.16 seconrd beep duration
241
242 WLEADP  = 960           ;##rev2## PAL 19.2 second WRITE file leader
243 RLEADP  = 480           ;##rev2## PAL 9.6 second READ file leader
244 WIRGLP  = 150           ;##rev2## PAL 3.0 second WRITE IRG
245 RIRGLP  = 100           ;##rev2## PAL 2.0 second READ IRG
246 WSIRGP  = 13            ;##rev2## PAL 0.25 second WRITE short IRG
247 RSIRGP  = 8             ;##rev2## PAL 0.16 second READ short IRG
248 BEEPNP  = 25            ;##rev2## PAL 0.5 second beep duration
249 BEEPFP  = 8             ;##rev2## PAL 0.16 seconrd beep duration
250
251 WIRGHI  = 0             ;##rev2## high WRITE IRG
252 RIRGHI  = 0             ;##rev2## high READ IRG
253
254 ; Power-up Validation Byte Value Equates
255
256 PUPVL1  = $5C           ;##rev2## power-up validation value 1
257 PUPVL2  = $93           ;##rev2## power-up validation value 2
258 PUPVL3  = $25           ;##rev2## power-up validation value 3
259
260 ; Relocating Loader Miscellaneous Equates
261
262 DATAER  = 156           ;##rev2## end of record appears before END
263 MEMERR  = 157           ;##rev2## memory insufficient for load error
264
265 ; Miscellaneous Equates
266
267 IOCFRE  = $FF           ;IOCB free indication
268
269 B19200  = $0028         ;##rev2## 19200 baud POKEY counter value
270 B00600  = $05CC         ;##rev2## 600 baud POKEY counter value
271
272 HITONE  = $05           ;##rev2## FSK high freq. POKEY counter value
273 LOTONE  = $07           ;##rev2## FSK low freq. POKEY counter value
274
275 NCOMLO  = $34           ;##rev2## PIA lower NOT COMMAND line command
276 NCOMHI  = $3C           ;##rev2## PIA raise NOT COMMAND line command
277
278 MOTRGO  = $34           ;##rev2## PIA cassette motor ON command
279 MOTRST  = $3C           ;##rev2## PIA cassette motor OFF command
280
281 NODAT   = $00           ;##rev2## SIO immediate operation
282 GETDAT  = $40           ;##rev2## SIO read data frame
283 PUTDAT  = $80           ;##rev2## SIO write data frame
284
285 CRETRI  = 13            ;##rev2## number of command frame retries
286 DRETRI  = 1             ;##rev2## number of device retries
287 CTIM    = 2             ;##rev2## command frame ACK timeout
288
289 NBUFSZ  = 40            ;##rev2## print normal buffer size
290 DBUFSZ  = 20            ;##rev2## print double buffer size
291 SBUFSZ  = 29            ;##rev2## print sideways buffer size
292
293 ;-------------------------------------------------------------------------
294 ; Page Zero Address Equates
295 ;-------------------------------------------------------------------------
296
297 LINZBS  = $00           ;LINBUG RAM (WILL BE REPLACED BY MONITOR RAM)
298 LNFLG   = $00           ;##1200xl## 1-byte LNBUG flag (0 = not LNBUG)
299 NGFLAG  = $01           ;##1200xl## 1-byte memory status (0 = failure)
300
301 ; Not Cleared
302
303 CASINI  = $02           ;CASSETTE INIT LOCATION
304 RAMLO   = $04           ;RAM POINTER FOR MEMORY TEST
305 TRAMSZ  = $06           ;TEMPORARY REGISTER FOR RAM SIZE
306 ;TSTDAT = $07           ;##old## RAM TEST DATA REGISTER
307 CMCMD   = $07           ;##rev2## 1-byte command communications
308
309 ; Cleared upon Coldstart only
310
311 WARMST  = $08           ;WARM START FLAG
312 BOOTQ   = $09           ;SUCCESSFUL BOOT FLAG
313 DOSVEC  = $0A           ;DISK SOFTWARE START VECTOR
314 DOSINI  = $0C           ;DISK SOFTWARE INIT ADDRESS
315 APPMHI  = $0E           ;APPLICATIONS MEMORY HI LIMIT
316
317 ; Cleared upon Coldstart or Warmstart
318
319 INTZBS  = $10           ;INTERRUPT HANDLER
320
321 POKMSK  = $10           ;SYSTEM MASK FOR POKEY IRG ENABLE
322 BRKKEY  = $11           ;BREAK KEY FLAG
323 RTCLOK  = $12           ;REAL TIME CLOCK (IN 16 MSEC UNITS>
324 BUFADR  = $15           ;INDIRECT BUFFER ADDRESS REGISTER
325 ICCOMT  = $17           ;COMMAND FOR VECTOR
326 DSKFMS  = $18           ;DISK FILE MANAGER POINTER
327 DSKUTL  = $1A           ;DISK UTILITIES POINTER
328 ABUFPT  = $1C           ;##1200xl## 4-byte ACMI buffer pointer area
329
330 ;PTIMOT = $1C           ;##old## PRINTER TIME OUT REGISTER
331 ;PBPNT  = $1D           ;##old## PRINT BUFFER POINTER
332 ;PBUFSZ = $1E           ;##old## PRINT BUFFER SIZE
333 ;PTEMP  = $1F           ;##old## TEMPORARY REGISTER
334
335 ZIOCB   = $20           ;ZERO PAGE I/O CONTROL BLOCK
336 IOCBAS  = $20           ;16-byte page zero IOCB
337 ICHIDZ  = $20           ;HANDLER INDEX NUMBER (FF = IOCB FREE)
338 ICDNOZ  = $21           ;DEVICE NUMBER (DRIVE NUMBER)
339 ICCOMZ  = $22           ;COMMAND CODE
340 ICSTAZ  = $23           ;STATUS OF LAST IOCB ACTION
341 ICBALZ  = $24           ;BUFFER ADDRESS LOW BYTE
342 ICBAHZ  = $25           ;1-byte high buffer address
343 ICPTLZ  = $26           ;PUT BYTE ROUTINE ADDRESS -1
344 ICPTHZ  = $27           ;1-byte high PUT-BYTE routine address
345 ICBLLZ  = $28           ;BUFFER LENGTH LOW BYTE
346 ICBLHZ  = $29           ;1-byte high buffer length
347 ICAX1Z  = $2A           ;AUXILIARY INFORMATION FIRST BYTE
348 ICAX2Z  = $2B           ;1-byte second auxiliary information
349 ICSPRZ  = $2C           ;4-byte spares
350
351 ENTVEC  = $2C           ;##rev2## 2-byte (not used)
352 ICIDNO  = $2E           ;IOCB NUMBER X 16
353 CIOCHR  = $2F           ;CHARACTER BYTE FOR CURRENT OPERATION
354
355 STATUS  = $30           ;INTERNAL STATUS STORAGE
356 CHKSUM  = $31           ;CHECKSUM (SINGLE BYTE SUM WITH CARRY)
357 BUFRLO  = $32           ;POINTER TO DATA BUFFER (LO BYTE)
358 BUFRHI  = $33           ;POINTER TO DATA BUFFER (HI BYTE)
359 BFENLO  = $34           ;NEXT BYTE PAST END OF THE DATA BUFFER LO
360 BFENHI  = $35           ;NEXT BYTE PAST END OF THE DATA BUFFER HI
361 ;CRETRY = $36           ;##old## NUMBER OF COMMAND FRAME RETRIES
362 ;DRETRY = $37           ;##old## NUMBER OF DEVICE RETRIES
363 LTEMP   = $36           ;##1200xl## 2-byte loader temporary
364 BUFRFL  = $38           ;DATA BUFFER FULL FLAG
365 RECVDN  = $39           ;RECEIVE DONE FLAG
366 XMTDON  = $3A           ;TRANSMISSION DONE FLAG
367 CHKSNT  = $3B           ;CHECKSUM SENT FLAG
368 NOCKSM  = $3C           ;NO CHECKSUM FOLLOWS DATA FLAG
369 BPTR    = $3D           ;1-byte cassette buffer pointer
370 FTYPE   = $3E           ;1-byte cassette IRG type
371 FEOF    = $3F           ;1-byte cassette EOF flag (0 = quiet)
372 FREQ    = $40           ;1-byte cassette beep counter
373 SOUNDR  = $41           ;NOISY I/0 FLAG. (ZERO IS QUIET)
374
375 CRITIC  = $42           ;DEFINES CRITICAL SECTION (CRITICAL IF NON-Z)
376
377 FMSZPG  = $43           ;DISK FILE MANAGER SYSTEM ZERO PAGE
378
379 ;CKEY   = $4A           ;##old## FLAG SET WHEN GAME START PRESSED
380 ZCHAIN  = $4A           ;##1200xl## 2-byte handler linkage chain pointer
381 ;CASSBT = $4B           ;##old## CASSETTE BOOT FLAG
382 DSTAT   = $4C           ;DISPLAY STATUS
383 ATRACT  = $4D           ;ATRACT FLAG
384 DRKMSK  = $4E           ;DARK ATRACT MASK
385 COLRSH  = $4F           ;ATRACT COLOR SHIFTER (EOR'ED WITH PLAYFIELD
386
387
388 TMPCHR  = $50           ;1-byte temporary character
389 HOLD1   = $51           ;1-byte temporary
390 LMARGN  = $52           ;left margin (normally 2, cc65 C startup code sets it to 0)
391 RMARGN  = $53           ;right margin (normally 39 if no XEP80 is used)
392 ROWCRS  = $54           ;1-byte cursor row
393 COLCRS  = $55           ;2-byte cursor column
394 DINDEX  = $57           ;1-byte display mode
395 SAVMSC  = $58           ;2-byte saved memory scan counter
396 OLDROW  = $5A           ;1-byte prior row
397 OLDCOL  = $5B           ;2-byte prior column
398 OLDCHR  = $5D           ;DATA UNDER CURSOR
399 OLDADR  = $5E           ;2-byte saved cursor memory address
400 FKDEF   = $60           ;##1200xl## 2-byte function key definition table
401 ;NEWROW = $60           ;##old## POINT DRAW GOES TO
402 ;NEWCOL = $61           ;##old##
403 PALNTS  = $62           ;##1200xl## 1-byte PAL/NTSC indicator (0 = NTSC)
404 LOGCOL  = $63           ;POINTS AT COLUMN IN LOGICAL LINE
405 ADRESS  = $64           ;2-byte temporary address
406
407 MLTTMP  = $66           ;1-byte temporary
408 OPNTMP  = $66           ;FIRST BYTE IS USED IN OPEN AS TEMP
409 TOADR   = $66           ;##rev2## 2-byte destination address
410
411 SAVADR  = $68           ;2-byte saved address
412 FRMADR  = $68           ;##rev2## 2-byte source address
413
414 RAMTOP  = $6A           ;RAM SIZE DEFINED BY POWER ON LOGIC
415 BUFCNT  = $6B           ;BUFFER COUNT
416 BUFSTR  = $6C           ;EDITOR GETCH POINTER
417 BITMSK  = $6E           ;BIT MASK
418 SHFAMT  = $6F           ;1-byte shift amount for pixel justifucation
419 ROWAC   = $70           ;2-byte draw working row
420 COLAC   = $72           ;2-byte draw working column
421 ENDPT   = $74           ;2-byte end point
422 DELTAR  = $76           ;1-byte row difference
423 DELTAC  = $77           ;2-byte column difference
424 KEYDEF  = $79           ;##1200xl## 2-byte key definition table address
425 ;ROWINC = $79           ;##old##
426 ;COLINC = $7A           ;##old##
427 SWPFLG  = $7B           ;NON-0 1F TXT AND REGULAR RAM IS SWAPPED
428 HOLDCH  = $7C           ;CH IS MOVED HERE IN KGETCH BEFORE CNTL & SH
429 INSDAT  = $7D           ;1-byte temporary
430 COUNTR  = $7E           ;2-byte draw iteration count
431
432 ; Floating Point Package Page Zero Address Equates
433
434 FR0     = $D4           ;6-byte register 0
435 FR0M    = $D5           ;##rev2## 5-byte register 0 mantissa
436 QTEMP   = $D9           ;##rev2## 1-byte temporary
437
438 FRE     = $DA           ;6-byte (internal) register E
439
440 FR1     = $E0           ;FP REG1
441 FR1M    = $E1           ;##rev2## 5-byte register 1 mantissa
442
443 FR2     = $E6           ;6-byte (internal) register 2
444
445 FRX     = $EC           ;1-byte temporary
446
447 EEXP    = $ED           ;VALUE OF E
448
449 FRSIGN  = $EE           ;##rev2## 1-byte floating point sign
450 NSIGN   = $EE           ;SIGN OF #
451
452 PLYCNT  = $EF           ;##rev2## 1-byte polynomial degree
453 ESIGN   = $EF           ;SIGN OF EXPONENT
454
455 SGNFLG  = $F0           ;##rev2## 1-byte sign flag
456 FCHRFLG = $F0           ;1ST CHAR FLAG
457
458 XFMFLG  = $F1           ;##rev2## 1-byte transform flag
459 DIGRT   = $F1           ;# OF DIGITS RIGHT OF DECIMAL
460
461 CIX     = $F2           ;CURRENT INPUT INDEX
462 INBUFF  = $F3           ;POINTS TO USER'S LINE INPUT BUFFER
463
464 ZTEMP1  = $F5           ;2-byte temporary
465 ZTEMP4  = $F7           ;2-byte temporary
466 ZTEMP3  = $F9           ;2-byte temporary
467
468 ;DEGFLG = $FB           ;##old## same as RADFLG
469 ;RADFLG = $FB           ;##old## 0=RADIANS, 6=DEGREES
470
471 FLPTR   = $FC           ;2-byte floating point number pointer
472 FPTR2   = $FE           ;2-byte floating point number pointer
473
474 ;-------------------------------------------------------------------------
475 ; Page Two Address Equates
476 ;-------------------------------------------------------------------------
477
478 INTABS  = $0200         ;INTERRUPT RAM
479
480 VDSLST  = $0200         ;DISPLAY LIST NMI VECTOR
481 VPRCED  = $0202         ;PROCEED LINE IRQ VECTOR
482 VINTER  = $0204         ;INTERRUPT LINE IRQ VECTOR
483 VBREAK  = $0206         ;SOFTWARE BREAK (00) INSTRUCTION IRQ VECTOR
484 VKEYBD  = $0208         ;POKEY KEYBOARD IRQ VECTOR
485 VSERIN  = $020A         ;POKEY SERIAL INPUT READY IRQ
486 VSEROR  = $020C         ;POKEY SERIAL OUTPUT READY IRQ
487 VSEROC  = $020E         ;POKEY SERIAL OUTPUT COMPLETE IRQ
488 VTIMR1  = $0210         ;POKEY TIMER 1 IRG
489 VTIMR2  = $0212         ;POKEY TIMER 2 IRG
490 VTIMR4  = $0214         ;POKEY TIMER 4 IRG
491 VIMIRQ  = $0216         ;IMMEDIATE IRG VECTOR
492 CDTMV1  = $0218         ;COUNT DOWN TIMER 1
493 CDTMV2  = $021A         ;COUNT DOWN TIMER 2
494 CDTMV3  = $021C         ;COUNT DOWN TIMER 3
495 CDTMV4  = $021E         ;COUNT DOWN TIMER 4
496 CDTMV5  = $0220         ;COUNT DOWN TIMER 5
497 VVBLKI  = $0222         ;IMMEDIATE VERTICAL BLANK NMI VECTOR
498 VVBLKD  = $0224         ;DEFERRED VERTICAL BLANK NMI VECTOR
499 CDTMA1  = $0226         ;COUNT DOWN TIMER 1 JSR ADDRESS
500 CDTMA2  = $0228         ;COUNT DOWN TIMER 2 JSR ADDRESS
501 CDTMF3  = $022A         ;COUNT DOWN TIMER 3 FLAG
502 SRTIMR  = $022B         ;SOFTWARE REPEAT TIMER
503 CDTMF4  = $022C         ;COUNT DOWN TIMER 4 FLAG
504 INTEMP  = $022D         ;IAN'S TEMP
505 CDTMF5  = $022E         ;COUNT DOWN TIMER FLAG 5
506 SDMCTL  = $022F         ;SAVE DMACTL REGISTER
507 SDLSTL  = $0230         ;SAVE DISPLAY LIST LOW BYTE
508 SDLSTH  = $0231         ;SAVE DISPLAY LIST HI BYTE
509 SSKCTL  = $0232         ;SKCTL REGISTER RAM
510 LCOUNT  = $0233         ;##1200xl## 1-byte relocating loader record
511 LPENH   = $0234         ;LIGHT PEN HORIZONTAL VALUE
512 LPENV   = $0235         ;LIGHT PEN VERTICAL VALUE
513 BRKKY   = $0236         ;BREAK KEY VECTOR
514 ;RELADR = $0238         ;##1200xl## 2-byte relocatable loader address
515 VPIRQ   = $0238         ;##rev2## 2-byte parallel device IRQ vector
516 CDEVIC  = $023A         ;COMMAND FRAME BUFFER - DEVICE
517 CCOMND  = $023B         ;COMMAND
518 CAUX1   = $023C         ;COMMAND AUX BYTE 1
519 CAUX2   = $023D         ;COMMAND AUX BYTE 2
520
521 TEMP    = $023E         ;TEMPORARY RAM CELL
522
523 ERRFLG  = $023F         ;ERROR FLAG - ANY DEVICE ERROR EXCEPT TIME OUT
524
525 DFLAGS  = $0240         ;DISK FLAGS FROM SECTOR ONE
526 DBSECT  = $0241         ;NUMBER OF DISK BOOT SECTORS
527 BOOTAD  = $0242         ;ADDRESS WHERE DISK BOOT LOADER WILL BE PUT
528 COLDST  = $0244         ;COLDSTART FLAG (1=IN MIDDLE OF COLDSTART>
529 RECLEN  = $0245         ;##1200xl## 1-byte relocating loader record length
530 DSKTIM  = $0246         ;DISK TIME OUT REGISTER
531 ;LINBUF = $0247         ;##old## CHAR LINE BUFFER
532 PDVMSK  = $0247         ;##rev2## 1-byte parallel device selection mask
533 SHPDVS  = $0248         ;##rev2## 1-byte PDVS (parallel device select)
534 PDIMSK  = $0249         ;##rev2## 1-byte parallel device IRQ selection
535 RELADR  = $024A         ;##rev2## 2-byte relocating loader relative adr.
536 PPTMPA  = $024C         ;##rev2## 1-byte parallel device handler temporary
537 PPTMPX  = $024D         ;##rev2## 1-byte parallel device handler temporary
538
539 CHSALT  = $026B         ;##1200xl## 1-byte character set alternate
540 VSFLAG  = $026C         ;##1200xl## 1-byte fine vertical scroll count
541 KEYDIS  = $026D         ;##1200xl## 1-byte keyboard disable
542 FINE    = $026E         ;##1200xl## 1-byte fine scrolling mode
543 GPRIOR  = $026F         ;GLOBAL PRIORITY CELL
544
545 PADDL0  = $0270         ;1-byte potentiometer 0
546 PADDL1  = $0271         ;1-byte potentiometer 1
547 PADDL2  = $0272         ;1-byte potentiometer 2
548 PADDL3  = $0273         ;1-byte potentiometer 3
549 PADDL4  = $0274         ;1-byte potentiometer 4
550 PADDL5  = $0275         ;1-byte potentiometer 5
551 PADDL6  = $0276         ;1-byte potentiometer 6
552 PADDL7  = $0277         ;1-byte potentiometer 7
553
554 STICK0  = $0278         ;1-byte joystick 0
555 STICK1  = $0279         ;1-byte joystick 1
556 STICK2  = $027A         ;1-byte joystick 2
557 STICK3  = $027B         ;1-byte joystick 3
558
559 PTRIG0  = $027C         ;1-byte paddle trigger 0
560 PTRIG1  = $027D         ;1-byte paddle trigger 1
561 PTRIG2  = $027E         ;1-byte paddle trigger 2
562 PTRIG3  = $027F         ;1-byte paddle trigger 3
563 PTRIG4  = $0280         ;1-byte paddle trigger 4
564 PTRIG5  = $0281         ;1-byte paddle trigger 5
565 PTRIG6  = $0281         ;1-byte paddle trigger 6
566 PTRIG7  = $0283         ;1-byte paddle trigger 7
567
568 STRIG0  = $0284         ;1-byte joystick trigger 0
569 STRIG1  = $0285         ;1-byte joystick trigger 1
570 STRIG2  = $0286         ;1-byte joystick trigger 2
571 STRIG3  = $0287         ;1-byte joystick trigger 3
572
573 ;CSTAT  = $0288         ;##old## cassette status register
574 HIBYTE  = $0288         ;##1200xl## 1-byte relocating loader high byte
575 WMODE   = $0289         ;1-byte cassette WRITE mode
576 BLIM    = $028A         ;1-byte cassette buffer limit
577 IMASK   = $028B         ;##rev2## (not used)
578 JVECK   = $028C         ;2-byte jump vector or temporary
579 NEWADR  = $028E         ;##1200xl## 2-byte relocating address
580 TXTROW  = $0290         ;TEXT ROWCRS
581 TXTCOL  = $0291         ;TEXT COLCRS
582 TINDEX  = $0293         ;TEXT INDEX
583 TXTMSC  = $0294         ;FOOLS CONVRT INTO NEW MSC
584 TXTOLD  = $0296         ;OLDROW & OLDCOL FOR TEXT (AND THEN SOME)
585 ;TMPX1  = $029C         ;##old## 1-byte temporary register
586 CRETRY  = $029C         ;##1200xl## 1-byte number of command frame retries
587 HOLD3   = $029D         ;1-byte temporary
588 SUBTMP  = $029E         ;1-byte temporary
589 HOLD2   = $029F         ;1-byte (not used)
590 DMASK   = $02A0         ;1-byte display (pixel location) mask
591 TMPLBT  = $02A1         ;1-byte (not used)
592 ESCFLG  = $02A2         ;ESCAPE FLAG
593 TABMAP  = $02A3         ;15-byte (120 bit) tab stop bit map
594 LOGMAP  = $02B2         ;LOGICAL LINE START BIT MAP
595 INVFLG  = $02B6         ;INVERSE VIDEO FLAG (TOGGLED BY ATARI KEY)
596 FILFLG  = $02B7         ;RIGHT FILL FLAG FOR DRAW
597 TMPROW  = $02B8         ;1-byte temporary row
598 TMPCOL  = $02B9         ;2-byte temporary column
599 SCRFLG  = $02BB         ;SET IF SCROLL OCCURS
600 HOLD4   = $02BC         ;TEMP CELL USED IN DRAW ONLY
601 ;HOLD5  = $02BD         ;##old## DITTO
602 DRETRY  = $02BD         ;##1200xl## 1-byte number of device retries
603 SHFLOK  = $02BE         ;1-byte shift/control lock flags
604 BOTSCR  = $02BF         ;BOTTOM OF SCREEN   24 NORM 4 SPLIT
605
606 PCOLR0  = $02C0         ;1-byte player-missile 0 color/luminance
607 PCOLR1  = $02C1         ;1-byte player-missile 1 color/luminance
608 PCOLR2  = $02C2         ;1-byte player-missile 2 color/luminance
609 PCOLR3  = $02C3         ;1-byte player-missile 3 color/luminance
610
611 COLOR0  = $02C4         ;1-byte playfield 0 color/luminance
612 COLOR1  = $02C5         ;1-byte playfield 1 color/luminance
613 COLOR2  = $02C6         ;1-byte playfield 2 color/luminance
614 COLOR3  = $02C7         ;1-byte playfield 3 color/luminance
615
616 COLOR4  = $02C8         ;1-byte background color/luminance
617
618 PARMBL  = $02C9         ;##rev2## 6-byte relocating loader parameter
619 RUNADR  = $02C9         ;##1200xl## 2-byte run address
620 HIUSED  = $02CB         ;##1200xl## 2-byte highest non-zero page address
621 ZHIUSE  = $02CD         ;##1200xl## 2-byte highest zero page address
622
623 OLDPAR  = $02CF         ;##rev2## 6-byte relocating loader parameter
624 GBYTEA  = $02CF         ;##1200xl## 2-byte GET-BYTE routine address
625 LOADAD  = $02D1         ;##1200xl## 2-byte non-zero page load address
626 ZLOADA  = $02D3         ;##1200xl## 2-byte zero page load address
627
628 DSCTLN  = $02D5         ;##1200xl## 2-byte disk sector length
629 ACMISR  = $02D7         ;##1200xl## 2-byte ACMI interrupt service routine
630 KRPDEL  = $02D9         ;##1200xl## 1-byte auto-repeat delay
631 KEYREP  = $02DA         ;##1200xl## 1-byte auto-repeat rate
632 NOCLIK  = $02DB         ;##1200xl## 1-byte key click disable
633 HELPFG  = $02DC         ;##1200xl## 1-byte HELP key flag (0 = no HELP)
634 DMASAV  = $02DD         ;##1200xl## 1-byte SDMCTL save/restore
635 PBPNT   = $02DE         ;##1200xl## 1-byte printer buffer pointer
636 PBUFSZ  = $02DF         ;##1200xl## 1-byte printer buffer size
637
638 GLBABS  = $02E0         ;4-byte global variables for non-DOS users
639 RUNAD   = $02E0         ;##map## 2-byte binary file run address
640 INITAD  = $02E2         ;##map## 2-byte binary file initialization address
641
642 RAMSIZ  = $02E4         ;RAM SIZE (HI BYTE ONLY)
643 MEMTOP  = $02E5         ;TOP OF AVAILABLE USER MEMORY
644 MEMLO   = $02E7         ;BOTTOM OF AVAILABLE USER MEMORY
645 HNDLOD  = $02E9         ;##1200xl## 1-byte user load flag
646 DVSTAT  = $02EA         ;STATUS BUFFER
647 CBAUDL  = $02EE         ;1-byte low cassette baud rate
648 CBAUDH  = $02EF         ;1-byte high cassette baud rate
649 CRSINH  = $02F0         ;CURSOR INHIBIT (00 = CURSOR ON)
650 KEYDEL  = $02F1         ;KEY DELAY
651 CH1     = $02F2         ;1-byte prior keyboard character
652 CHACT   = $02F3         ;CHACTL REGISTER RAM
653 CHBAS   = $02F4         ;CHBAS REGISTER RAM
654
655 NEWROW  = $02F5         ;##1200xl## 1-byte draw destination row
656 NEWCOL  = $02F6         ;##1200xl## 2-byte draw destination column
657 ROWINC  = $02F8         ;##1200xl## 1-byte draw row increment
658 COLINC  = $02F9         ;##1200xl## 1-byte draw column increment
659
660 CHAR    = $02FA         ;1-byte internal character
661 ATACHR  = $02FB         ;ATASCII CHARACTER
662 CH      = $02FC         ;GLOBAL VARIABLE FOR KEYBOARD
663 FILDAT  = $02FD         ;RIGHT FILL DATA <DRAW>
664 DSPFLG  = $02FE         ;DISPLAY FLAG   DISPLAY CNTLS IF NON-ZERO
665 SSFLAG  = $02FF         ;START/STOP FLAG FOR PAGING (CNTL 1). CLEARE
666
667 ;-------------------------------------------------------------------------
668 ; Page Three Address Equates
669 ;-------------------------------------------------------------------------
670
671 DCB     = $0300         ;DEVICE CONTROL BLOCK
672 DDEVIC  = $0300         ;PERIPHERAL UNIT 1 BUS I.D. NUMBER
673 DUNIT   = $0301         ;UNIT NUMBER
674 DCOMND  = $0302         ;BUS COMMAND
675 DSTATS  = $0303         ;COMMAND TYPE/STATUS RETURN
676 DBUFLO  = $0304         ;1-byte low data buffer address
677 DBUFHI  = $0305         ;1-byte high data buffer address
678 DTIMLO  = $0306         ;DEVICE TIME OUT IN 1 SECOND UNITS
679 DUNUSE  = $0307         ;UNUSED BYTE
680 DBYTLO  = $0308         ;1-byte low number of bytes to transfer
681 DBYTHI  = $0309         ;1-byte high number of bytes to transfer
682 DAUX1   = $030A         ;1-byte first command auxiliary
683 DAUX2   = $030B         ;1-byte second command auxiliary
684
685 TIMER1  = $030C         ;INITIAL TIMER VALUE
686 ;ADDCOR = $030E         ;##old## ADDITION CORRECTION
687 JMPERS  = $030E         ;##1200xl## 1-byte jumper options
688 CASFLG  = $030F         ;CASSETTE MODE WHEN SET
689 TIMER2  = $0310         ;2-byte final baud rate timer value
690 TEMP1   = $0312         ;TEMPORARY STORAGE REGISTER
691 ;TEMP2  = $0314         ;##old## TEMPORARY STORAGE REGISTER
692 TEMP2   = $0313         ;##1200xl## 1-byte temporary 
693 PTIMOT  = $0314         ;##1200xl## 1-byte printer timeout
694 TEMP3   = $0315         ;TEMPORARY STORAGE REGISTER
695 SAVIO   = $0316         ;SAVE SERIAL IN DATA PORT
696 TIMFLG  = $0317         ;TIME OUT FLAG FOR BAUD RATE CORRECTION
697 STACKP  = $0318         ;SIO STACK POINTER SAVE CELL
698 TSTAT   = $0319         ;TEMPORARY STATUS HOLDER
699
700 HATABS  = $031A         ;35-byte handler address table (was 38 bytes)
701 PUPBT1  = $033D         ;##1200xl## 1-byte power-up validation byte 1
702 PUPBT2  = $033E         ;##1200xl## 1-byte power-up validation byte 2
703 PUPBT3  = $033F         ;##1200xl## 1-byte power-up validation byte 3
704
705 IOCB    = $0340         ;I/O CONTROL BLOCKS
706 ICHID   = $0340         ;HANDLER INDEX NUMBER (FF=IOCB FREE)
707 ICDNO   = $0341         ;DEVICE NUMBER (DRIVE NUMBER)
708 ICCOM   = $0342         ;COMMAND CODE
709 ICSTA   = $0343         ;STATUS OF LAST IOCB ACTION
710 ICBAL   = $0344         ;1-byte low buffer address
711 ICBAH   = $0345         ;1-byte high buffer address
712 ICPTL   = $0346         ;1-byte low PUT-BYTE routine address - 1
713 ICPTH   = $0347         ;1-byte high PUT-BYTE routine address - 1
714 ICBLL   = $0348         ;1-byte low buffer length
715 ICBLH   = $0349         ;1-byte high buffer length
716 ICAX1   = $034A         ;1-byte first auxiliary information
717 ICAX2   = $034B         ;1-byte second auxiliary information
718 ICAX3   = $034C         ;1-byte third auxiliary information
719 ICAX4   = $034D         ;1-byte fourth auxiliary information
720 ICAX5   = $034E         ;1-byte fifth auxiliary information
721 ICSPR   = $034F         ;SPARE BYTE
722
723 PRNBUF  = $03C0         ;PRINTER BUFFER
724 SUPERF  = $03E8         ;##1200xl## 1-byte editor super function flag
725 CKEY    = $03E9         ;##1200xl## 1-byte cassette boot request flag
726 CASSBT  = $03EA         ;##1200xl## 1-byte cassette boot flag
727 CARTCK  = $03EB         ;##1200xl## 1-byte cartridge equivalence check
728 DERRF   = $03EC         ;##rev2## 1-byte screen OPEN error flag
729
730 ; Remainder of Page Three Not Cleared upon Reset
731
732 ACMVAR  = $03ED         ;##1200xl## 11 bytes reserved for ACMI
733 BASICF  = $03F8         ;##rev2## 1-byte BASIC switch flag
734 MINTLK  = $03F9         ;##1200xl## 1-byte ACMI module interlock
735 GINTLK  = $03FA         ;##1200xl## 1-byte cartridge interlock
736 CHLINK  = $03FB         ;##1200xl## 2-byte loaded handler chain link
737 CASBUF  = $03FD         ;CASSETTE BUFFER
738
739 ;-------------------------------------------------------------------------
740 ; Page Four/Five Address Equates
741 ;-------------------------------------------------------------------------
742
743 ; USER AREA STARTS HERE AND GOES TO END OF PAGE FIVE
744 USAREA  = $0480         ;128 bytes reserved for application
745
746 LBPR1   = $057E         ;LBUFF PREFIX 1
747 LBPR2   = $057F         ;LBUFF PREFIX 2
748 LBUFF   = $0580         ;128-byte line buffer
749
750 PLYARG  = $05E0         ;6-byte floating point polynomial argument
751 FPSCR   = $05E6         ;6-byte floating point temporary
752 FPSCR1  = $05EC         ;6-byte floating point temporary
753
754 ;LBFEND = $05FF         ;##old## END OF LBUFF
755
756
757 DOS     = $0700
758
759 ;-------------------------------------------------------------------------
760 ; Cartridge Address Equates
761 ;-------------------------------------------------------------------------
762
763 CARTCS  = $BFFA         ;##rev2## 2-byte cartridge coldstart address
764 CART    = $BFFC         ;##rev2## 1-byte cartridge present indicator
765 CARTFG  = $BFFD         ;##rev2## 1-byte cartridge flags
766 CARTAD  = $BFFE         ;##rev2## 2-byte cartridge start vector
767
768 ;-------------------------------------------------------------------------
769 ; CTIA/GTIA Address Equates
770 ;-------------------------------------------------------------------------
771
772 GTIA    = $D000         ;CTIA/GTIA area
773
774 ; Read/Write Addresses
775
776 CONSOL  = $D01F         ;console switches and speaker control
777
778 ; Read Addresses
779
780 M0PF    = $D000         ;missile 0 and playfield collision
781 M1PF    = $D001         ;missile 1 and playfield collision
782 M2PF    = $D002         ;missile 2 and playfield collision
783 M3PF    = $D003         ;missile 3 and playfield collision
784
785 P0PF    = $D004         ;player 0 and playfield collision
786 P1PF    = $D005         ;player 1 and playfield collision
787 P2PF    = $D006         ;player 2 and playfield collision
788 P3PF    = $D007         ;player 3 and playfield collision
789
790 M0PL    = $D008         ;missile 0 and player collision
791 M1PL    = $D009         ;missile 1 and player collision
792 M2PL    = $D00A         ;missile 2 and player collision
793 M3PL    = $D00B         ;missile 3 and player collision
794
795 P0PL    = $D00C         ;player 0 and player collision
796 P1PL    = $D00D         ;player 1 and player collision
797 P2PL    = $D00E         ;player 2 and player collision
798 P3PL    = $D00F         ;player 3 and player collision
799
800 TRIG0   = $D010         ;joystick trigger 0
801 TRIG1   = $D011         ;joystick trigger 1
802
803 TRIG2   = $D012         ;cartridge interlock
804 TRIG3   = $D013         ;ACMI module interlock
805
806 PAL     = $D014         ;##rev2## PAL/NTSC indicator
807
808 ; Write Addresses
809
810 HPOSP0  = $D000         ;player 0 horizontal position
811 HPOSP1  = $D001         ;player 1 horizontal position
812 HPOSP2  = $D002         ;player 2 horizontal position
813 HPOSP3  = $D003         ;player 3 horizontal position
814
815 HPOSM0  = $D004         ;missile 0 horizontal position
816 HPOSM1  = $D005         ;missile 1 horizontal position
817 HPOSM2  = $D006         ;missile 2 horizontal position
818 HPOSM3  = $D007         ;missile 3 horizontal position
819
820 SIZEP0  = $D008         ;player 0 size
821 SIZEP1  = $D009         ;player 1 size
822 SIZEP2  = $D00A         ;player 2 size
823 SIZEP3  = $D00B         ;player 3 size
824
825 SIZEM   = $D00C         ;missile sizes
826
827 GRAFP0  = $D00D         ;player 0 graphics
828 GRAFP1  = $D00E         ;player 1 graphics
829 GRAFP2  = $D00F         ;player 2 graphics
830 GRAFP3  = $D010         ;player 3 graphics
831
832 GRAFM   = $D011         ;missile graphics
833
834 COLPM0  = $D012         ;player-missile 0 color/luminance
835 COLPM1  = $D013         ;player-missile 1 color/luminance
836 COLPM2  = $D014         ;player-missile 2 color/luminance
837 COLPM3  = $D015         ;player-missile 3 color/luminance
838
839 COLPF0  = $D016         ;playfield 0 color/luminance
840 COLPF1  = $D017         ;playfield 1 color/luminance
841 COLPF2  = $D018         ;playfield 2 color/luminance
842 COLPF3  = $D019         ;playfield 3 color/luminance
843
844 COLBK   = $D01A         ;background color/luminance
845
846 PRIOR   = $D01B         ;priority select
847 VDELAY  = $D01C         ;vertical delay
848 GRACTL  = $D01D         ;graphic control
849 HITCLR  = $D01E         ;collision clear
850
851 ;-------------------------------------------------------------------------
852 ; PBI Address Equates
853 ;-------------------------------------------------------------------------
854
855 PBI     = $D100         ;##rev2## parallel bus interface area
856
857 ; Read Addresses
858
859 PDVI    = $D1FF         ;##rev2## parallel device IRQ status
860
861 ; Write Addresses
862
863 PDVS    = $D1FF         ;##rev2## parallel device select
864
865 ; PBI RAM Address Equates
866
867 PBIRAM  = $D600         ;##rev2## parallel bus interface RAM area
868
869 ; Parallel Device Address Equates
870
871 PDID1   = $D803         ;##rev2## parallel device ID 1
872 PDIDV   = $D805         ;##rev2## parallel device I/O vector
873 PDIRQV  = $D808         ;##rev2## parallel device IRQ vector
874 PDID2   = $D80B         ;##rev2## parallel device ID 2
875 PDVV    = $D80D         ;##rev2## parallel device vector table
876
877 ;-------------------------------------------------------------------------
878 ; POKEY Address Equates
879 ;-------------------------------------------------------------------------
880
881 POKEY   = $D200         ;POKEY area
882
883 ; Read Addresses
884
885 POT0    = $D200         ;potentiometer 0
886 POT1    = $D201         ;potentiometer 1
887 POT2    = $D202         ;potentiometer 2
888 POT3    = $D203         ;potentiometer 3
889 POT4    = $D204         ;potentiometer 4
890 POT5    = $D205         ;potentiometer 5
891 POT6    = $D206         ;potentiometer 6
892 POT7    = $D207         ;potentiometer 7
893
894 ALLPOT  = $D208         ;potentiometer port status
895 KBCODE  = $D209         ;keyboard code
896 RANDOM  = $D20A         ;random number generator
897 SERIN   = $D20D         ;serial port input
898 IRQST   = $D20E         ;IRQ interrupt status
899 SKSTAT  = $D20F         ;serial port and keyboard status
900
901 ; Write Addresses
902
903 AUDF1   = $D200         ;channel 1 audio frequency
904 AUDC1   = $D201         ;channel 1 audio control
905
906 AUDF2   = $D202         ;channel 2 audio frequency
907 AUDC2   = $D203         ;channel 2 audio control
908
909 AUDF3   = $D204         ;channel 3 audio frequency
910 AUDC3   = $D205         ;channel 3 audio control
911
912 AUDF4   = $D206         ;channel 4 audio frequency
913 AUDC4   = $D207         ;channel 4 audio control
914
915 AUDCTL  = $D208         ;audio control
916 STIMER  = $D209         ;start timers
917 SKRES   = $D20A         ;reset SKSTAT status
918 POTGO   = $D20B         ;start potentiometer scan sequence
919 SEROUT  = $D20D         ;serial port output
920 IRQEN   = $D20E         ;IRQ interrupt enable
921 SKCTL   = $D20F         ;serial port and keyboard control
922
923 ;-------------------------------------------------------------------------
924 ; PIA Address Equates
925 ;-------------------------------------------------------------------------
926
927 PIA     = $D300         ;PIA area
928
929 PORTA   = $D300         ;port A direction register or jacks one/two
930 PORTB   = $D301         ;port B direction register or memory management
931
932 PACTL   = $D302         ;port A control
933 PBCTL   = $D303         ;port B control
934
935 ;-------------------------------------------------------------------------
936 ; ANTIC Address Equates
937 ;-------------------------------------------------------------------------
938
939 ANTIC   = $D400         ;ANTIC area
940
941 ; Read Addresses
942
943 VCOUNT  = $D40B         ;vertical line counter
944 PENH    = $D40C         ;light pen horizontal position
945 PENV    = $D40D         ;light pen vertical position
946 NMIST   = $D40F         ;NMI interrupt status
947
948 ; Write Addresses
949
950 DMACTL  = $D400         ;DMA control
951 CHACTL  = $D401         ;character control
952 DLISTL  = $D402         ;low display list address
953 DLISTH  = $D403         ;high display list address
954 HSCROL  = $D404         ;horizontal scroll
955 VSCROL  = $D405         ;vertical scroll
956 PMBASE  = $D407         ;player-missile base address
957 CHBASE  = $D409         ;character base address
958 WSYNC   = $D40A         ;wait for HBLANK synchronization
959 NMIEN   = $D40E         ;NMI enable
960 NMIRES  = $D40F         ;NMI interrupt reset
961
962 ;-------------------------------------------------------------------------
963 ; Floating Point Package Address Equates
964 ;-------------------------------------------------------------------------
965
966 AFP     = $D800         ;convert ASCII to floating point
967 FASC    = $D8E6         ;convert floating point to ASCII
968 IFP     = $D9AA         ;convert integer to floating point
969 FPI     = $D9D2         ;convert floating point to integer
970 ZFR0    = $DA44         ;zero FR0
971 ZF1     = $DA46         ;zero floating point number
972 FSUB    = $DA60         ;subtract floating point numbers
973 FADD    = $DA66         ;add floating point numbers
974 FMUL    = $DADB         ;multiply floating point numbers
975 FDIV    = $DB28         ;divide floating point numbers
976 PLYEVL  = $DD40         ;evaluate floating point polynomial
977 FLD0R   = $DD89         ;load floating point number
978 FLD0P   = $DD8D         ;load floating point number
979 FLD1R   = $DD98         ;load floating point number
980 PLD1P   = $DD9C         ;load floating point number
981 FST0R   = $DDA7         ;store floating point number
982 FST0P   = $DDAB         ;store floating point number
983 FMOVE   = $DDB6         ;move floating point number
984 LOG     = $DECD         ;calculate floating point logarithm
985 LOG10   = $DED1         ;calculate floating point base 10 logarithm
986 EXP     = $DDC0         ;calculate floating point exponential
987 EXP10   = $DDCC         ;calculate floating point base 10 exponential
988
989 ;-------------------------------------------------------------------------
990 ; Device Handler Vector Table Address Equates
991 ;-------------------------------------------------------------------------
992
993 EDITRV  = $E400         ;editor handler vector table
994 SCRENV  = $E410         ;screen handler vector table
995 KEYBDV  = $E420         ;keyboard handler vector table
996 PRINTV  = $E430         ;printer handler vector table
997 CASETV  = $E440         ;cassette handler vector table
998
999 ;-------------------------------------------------------------------------
1000 ; Jump Vector Address Equates
1001 ;-------------------------------------------------------------------------
1002
1003 DISKIV  = $E450         ;vector to initialize DIO
1004 DSKINV  = $E453         ;vector to DIO
1005 .ifdef __ATARIXL__
1006 .ifndef SHRAM_HANDLERS
1007 .import CIO_handler, SIO_handler, SETVBV_handler
1008 .endif
1009 .define CIOV    CIO_handler
1010 .define SIOV    SIO_handler
1011 .define SETVBV  SETVBV_handler
1012 CIOV_org    = $E456     ;vector to CIO
1013 SIOV_org    = $E459     ;vector to SIO
1014 SETVBV_org  = $E45C     ;vector to set VBLANK parameters
1015 .else
1016 CIOV    = $E456         ;vector to CIO
1017 SIOV    = $E459         ;vector to SIO
1018 SETVBV  = $E45C         ;vector to set VBLANK parameters
1019 .endif
1020 SYSVBV  = $E45F         ;vector to process immediate VBLANK
1021 XITVBV  = $E462         ;vector to process deferred VBLANK
1022 SIOINV  = $E465         ;vector to initialize SIO
1023 SENDEV  = $E468         ;vector to enable SEND
1024 INTINV  = $E46B         ;vector to initialize interrupt handler
1025 CIOINV  = $E46E         ;vector to initialize CIO
1026 BLKBDV  = $E471         ;vector to power-up display
1027 WARMSV  = $E474         ;vector to warmstart
1028 COLDSV  = $E477         ;vector to coldstart
1029 RBLOKV  = $E47A         ;vector to read cassette block
1030 CSOPIV  = $E47D         ;vector to open cassette for input
1031 VCTABL  = $E480         ;RAM vector initial value table
1032 PUPDIV  = $E480         ;##rev2## vector to power-up display
1033 SLFTSV  = $E483         ;##rev2## vector to self-test
1034 PHENTV  = $E486         ;##rev2## vector to enter peripheral handler
1035 PHUNLV  = $E489         ;##rev2## vector to unlink peripheral handler
1036 PHINIV  = $E48C         ;##rev2## vector to initialize peripheral handler
1037 GPDVV   = $E48F         ;##rev2## generic parallel device handler vector
1038
1039 ; NOTE: OS rom self-test labels are not included in this file
1040
1041 ;-------------------------------------------------------------------------
1042 ; Some misc. stuff from the 400/800 rev.B source
1043 ;-------------------------------------------------------------------------
1044
1045 ; THE FOLLOWING ARE IN BASIC CARTRIDGE:
1046 SIN     = $BD81         ;FR0 <- SIN (FR0) DEGFLG (0=RAD,6=DEG) CARRY
1047 COS     = $BD73         ;FR0 <- COS (FR0) CARRY
1048 ATAN    = $BE43         ;FR0 <- ATAN(FR0) CARRY
1049 SQR     = $BEB1         ;FR0 <- ROOT(FR0) CARRY
1050
1051 RADON   = 0             ;INDICATES RADIANS
1052 DEGON   = 6             ;INDICATES DEGREES
1053
1054 ASCZER  = '0'           ;ASCII ZERO
1055 COLON   = $3A           ;ASCII COLON 
1056 CR      = $9B           ;SYSTEM EOL (CARRIAGE RETURN)
1057
1058 ;-------------------------------------------------------------------------
1059 ; 6502
1060 ;-------------------------------------------------------------------------
1061
1062 NMIVEC  = $FFFA
1063 RESVEC  = $FFFC
1064 IRQVEC  = $FFFE
1065
1066 ;-------------------------------------------------------------------------
1067 ; BASIC
1068 ;-------------------------------------------------------------------------
1069
1070 LOMEM   = $80           ;2-byte low memory pointer
1071 VNTP    = $82           ;2-byte variable name table address
1072 VNTD    = $84           ;2-byte variable name table end + 1
1073 VVTP    = $86           ;2-byte variable value table
1074 STMTAB  = $88           ;2-byte statement table address
1075 STMCUR  = $8A           ;2-byte current statement pointer
1076 STARP   = $8C           ;2-byte string and array table pointer
1077 RUNSTK  = $8E           ;2-byte runtime stack address
1078 BMEMTOP = $90           ;2-byte top of memory pointer
1079 STOPLN  = $BA           ;2-byte stopped line number
1080 ERRSAVE = $C3           ;1-byte error code
1081 PTABW   = $C9           ;1-byte tab width
1082
1083 ;-------------------------------------------------------------------------
1084 ; ATASCII CHARACTER DEFS
1085 ;-------------------------------------------------------------------------
1086
1087 ATCLR   = $7D           ;CLEAR SCREEN CHARACTER
1088 ATRUB   = $7E           ;BACK SPACE (RUBOUT)
1089 ATTAB   = $7F           ;TAB
1090 ATEOL   = $9B           ;END-OF-LINE
1091 ATDELL  = $9C           ;delete line
1092 ATINSL  = $9D           ;insert line
1093 ATCTAB  = $9E           ;clear TAB
1094 ATSTAB  = $9F           ;set TAB
1095 ATBEL   = $FD           ;CONSOLE BELL
1096 ATDEL   = $FE           ;delete char.
1097 ATINS   = $FF           ;insert char.
1098 ATURW   = $1C           ;UP-ARROW
1099 ATDRW   = $1D           ;DOWN-ARROW
1100 ATLRW   = $1E           ;LEFT-ARROW
1101 ATRRW   = $1F           ;RIGHT-ARROW
1102 ATESC   = $1B           ;ESCAPE
1103
1104 ;-------------------------------------------------------------------------
1105 ; OFFSETS INTO SECTSIZETAB (DIO functions)
1106 ;-------------------------------------------------------------------------
1107
1108 sst_flag     = 0        ; length 1
1109 sst_sectsize = 1        ;        2
1110 sst_driveno  = 3        ;        1  (drive #)
1111 sst_size     = 4        ; size of one entry
1112                         ; if changed, adapt diopncls.s
1113
1114 ;-------------------------------------------------------------------------
1115 ; OFFSETS INTO dio_phys_pos
1116 ;-------------------------------------------------------------------------
1117
1118 diopp_head   = 0        ; head
1119 diopp_track  = 1        ; track / cylinder
1120 diopp_sector = 3        ; sector
1121 diopp_size   = 5        ; size of structure
1122
1123 ;-------------------------------------------------------------------------
1124 ; VALUES for dos_type
1125 ;-------------------------------------------------------------------------
1126
1127 ATARIDOS     = 0
1128 SPARTADOS    = 1
1129 OSADOS       = 2        ; OS/A+
1130 MYDOS        = 3
1131 XDOS         = 4
1132 NODOS        = 255
1133
1134 ;-------------------------------------------------------------------------
1135 ; Antic opcodes
1136 ;-------------------------------------------------------------------------
1137
1138 ; usage example:
1139 ;
1140 ; ScreenDL:
1141 ; .byte DL_BLK8
1142 ; .byte DL_BLK8
1143 ; .byte DL_CHR40x8x1 + DL_LMS + DL_DLI
1144 ; .word ScreenAlignment
1145 ; .byte DL_BLK1 + DL_DLI
1146 ; .byte DL_MAP320x1x1 + DL_LMS
1147 ; .word Screen
1148 ;
1149 ; .repeat 99
1150 ; .byte DL_MAP320x1x1
1151 ; .endrepeat
1152 ; .byte DL_MAP320x1x1 + DL_LMS
1153 ; .word Screen + 40 * 100       ; 100 lines a 40 byte, 'Screen' has to be aligned correctly!
1154 ; .repeat 92
1155 ; .byte DL_MAP320x1x1
1156 ; .endrepeat
1157 ;
1158 ; .byte DL_JVB
1159
1160 ; absolute instructions (non mode lines)
1161
1162 DL_JMP  = 1
1163 DL_JVB  = 65
1164
1165 DL_BLK1  = 0
1166 DL_BLK2  = 16
1167 DL_BLK3  = 32
1168 DL_BLK4  = 48
1169 DL_BLK5  = 64
1170 DL_BLK6  = 80
1171 DL_BLK7  = 96
1172 DL_BLK8  = 112
1173
1174 ; absolute instructions (mode lines)
1175
1176 DL_CHR40x8x1  = 2               ; monochrome, 40 character & 8 scanlines per mode line (GR. 0)
1177 DL_CHR40x10x1 = 3               ; monochrome, 40 character & 10 scanlines per mode line
1178 DL_CHR40x8x4  = 4               ; colour, 40 character & 8 scanlines per mode line (GR. 12)
1179 DL_CHR40x16x4 = 5               ; colour, 40 character & 16 scanlines per mode line (GR. 13)
1180 DL_CHR20x8x2  = 6               ; colour (duochrome per character), 20 character & 8 scanlines per mode line (GR. 1)
1181 DL_CHR20x16x2 = 7               ; colour (duochrome per character), 20 character & 16 scanlines per mode line (GR. 2)
1182
1183 DL_MAP40x8x4  = 8               ; colour, 40 pixel & 8 scanlines per mode line (GR. 3)
1184 DL_MAP80x4x2  = 9               ; 'duochrome', 80 pixel & 4 scanlines per mode line (GR.4) 
1185 DL_MAP80x4x4  = 10              ; colour, 80 pixel & 4 scanlines per mode line (GR.5) 
1186 DL_MAP160x2x2 = 11              ; 'duochrome', 160 pixel & 2 scanlines per mode line (GR.6) 
1187 DL_MAP160x1x2 = 12              ; 'duochrome', 160 pixel & 1 scanline per mode line (GR.14) 
1188 DL_MAP160x2x4 = 13              ; 4 colours, 160 pixel & 2 scanlines per mode line (GR.7) 
1189 DL_MAP160x1x4 = 14              ; 4 colours, 160 pixel & 1 scanline per mode line (GR.15) 
1190 DL_MAP320x1x1 = 15              ; monochrome, 320 pixel & 1 scanline per mode line (GR.8) 
1191
1192 ; modifiers on mode lines...
1193
1194 DL_HSCROL = 16
1195 DL_VSCROL = 32
1196 DL_LMS    = 64
1197
1198 ; general modifier...
1199
1200 DL_DLI    = 128
1201
1202 ;-------------------------------------------------------------------------
1203 ; End of atari.inc
1204 ;-------------------------------------------------------------------------