2010-02-28 09:55:12 +00:00
|
|
|
;
|
|
|
|
; PET generic definitions.
|
|
|
|
;
|
|
|
|
|
|
|
|
|
|
|
|
; ---------------------------------------------------------------------------
|
|
|
|
; Zero page, Commodore stuff
|
|
|
|
|
2013-05-09 11:56:54 +00:00
|
|
|
MEMSIZE := $34 ; Size of memory installed
|
2010-02-28 09:55:12 +00:00
|
|
|
TIME := $8D ; 60HZ clock
|
2013-05-09 11:56:54 +00:00
|
|
|
KEY_COUNT := $9E ; Number of keys in input buffer
|
|
|
|
RVS := $9F ; Reverse flag
|
|
|
|
CURS_FLAG := $A7 ; 1 = cursor off
|
|
|
|
CURS_BLINK := $A8 ; Blink counter
|
|
|
|
CURS_CHAR := $A9 ; Character under the cursor
|
|
|
|
CURS_STATE := $AA ; Cursor blink state
|
|
|
|
SCREEN_PTR := $C4 ; Pointer to current char in text screen
|
|
|
|
CURS_X := $C6 ; Cursor column
|
2010-02-28 09:55:12 +00:00
|
|
|
FNLEN := $D1 ; Length of filename
|
|
|
|
LFN := $D2 ; Current Logical File Number
|
2013-05-09 11:56:54 +00:00
|
|
|
SECADR := $D3 ; Secondary address
|
|
|
|
DEVNUM := $D4 ; Device number
|
|
|
|
SCR_LINELEN := $D5 ; Screen line length
|
|
|
|
CURS_Y := $D8 ; Cursor row
|
2010-02-28 09:55:12 +00:00
|
|
|
FNADR := $DA ; Pointer to file name
|
|
|
|
|
2013-05-09 11:56:54 +00:00
|
|
|
KEY_BUF := $26F ; Keyboard buffer
|
2010-02-28 09:55:12 +00:00
|
|
|
|
|
|
|
;----------------------------------------------------------------------------
|
|
|
|
; PET ROM type detection
|
|
|
|
|
|
|
|
PET_DETECT := $FFFB
|
|
|
|
PET_2000 = $CA
|
|
|
|
PET_3000 = $FC
|
|
|
|
PET_4000 = $FD
|
|
|
|
|
|
|
|
|
|
|
|
;----------------------------------------------------------------------------
|
|
|
|
; Vector and other locations
|
|
|
|
|
2013-05-09 11:56:54 +00:00
|
|
|
IRQVec := $0090
|
|
|
|
BRKVec := $0092
|
|
|
|
NMIVec := $0094
|
2010-02-28 09:55:12 +00:00
|
|
|
|
|
|
|
; ---------------------------------------------------------------------------
|
|
|
|
; I/O: 6522 VIA2
|
|
|
|
|
2013-05-09 11:56:54 +00:00
|
|
|
VIA := $E840
|
2010-02-28 09:55:12 +00:00
|
|
|
VIA_PRB := $E840
|
|
|
|
VIA_PRA := $E841
|
2013-05-09 11:56:54 +00:00
|
|
|
VIA_DDRB := $E842
|
|
|
|
VIA_DDRA := $E843
|
2010-02-28 09:55:12 +00:00
|
|
|
|
|
|
|
|