2000-05-28 13:40:48 +00:00
|
|
|
;
|
2002-05-26 09:08:52 +00:00
|
|
|
; Zeropage and I/O definitions for the CBM 610
|
2000-05-28 13:40:48 +00:00
|
|
|
;
|
2002-05-26 09:08:52 +00:00
|
|
|
; Taken from a kernal disassembly done by myself in 1987.
|
|
|
|
;
|
|
|
|
; Ullrich von Bassewitz, 28.09.1998
|
2000-05-28 13:40:48 +00:00
|
|
|
|
|
|
|
|
|
|
|
; ---------------------------------------------------------------------------
|
2003-12-20 23:38:42 +00:00
|
|
|
; Zeropage registers
|
2002-05-26 09:08:52 +00:00
|
|
|
|
2003-12-20 23:38:42 +00:00
|
|
|
ExecReg = $00
|
|
|
|
IndReg = $01
|
2002-05-26 09:08:52 +00:00
|
|
|
|
2003-04-09 19:34:57 +00:00
|
|
|
; ---------------------------------------------------------------------------
|
|
|
|
; Screen size
|
|
|
|
|
|
|
|
XSIZE = 80
|
|
|
|
YSIZE = 25
|
|
|
|
|
2002-05-26 09:08:52 +00:00
|
|
|
; ---------------------------------------------------------------------------
|
|
|
|
; I/O definitions
|
|
|
|
|
|
|
|
|
|
|
|
; I/O $d800: CRTC 6545
|
2000-05-28 13:40:48 +00:00
|
|
|
|
2003-12-20 23:38:42 +00:00
|
|
|
.struct CRTC
|
|
|
|
ADDR .byte
|
|
|
|
DATA .byte
|
|
|
|
.endstruct
|
2002-05-26 09:08:52 +00:00
|
|
|
|
|
|
|
; I/O $db00: CIA 6526 Inter Process Communication
|
2003-12-19 23:04:30 +00:00
|
|
|
;
|
2002-05-26 09:08:52 +00:00
|
|
|
; IPCcia = $db00
|
|
|
|
|
2003-12-19 23:04:30 +00:00
|
|
|
.struct CIA
|
|
|
|
PRA .byte
|
|
|
|
PRB .byte
|
|
|
|
DDRA .byte
|
|
|
|
DDRB .byte
|
|
|
|
.union
|
|
|
|
.struct
|
|
|
|
TALO .byte
|
|
|
|
TAHI .byte
|
|
|
|
.endstruct
|
|
|
|
TA .word
|
|
|
|
.endunion
|
|
|
|
.union
|
|
|
|
.struct
|
|
|
|
TBLO .byte
|
|
|
|
TBHI .byte
|
|
|
|
.endstruct
|
|
|
|
TB .word
|
|
|
|
.endunion
|
|
|
|
TOD10 .byte
|
|
|
|
TODSEC .byte
|
|
|
|
TODMIN .byte
|
|
|
|
TODHR .byte
|
|
|
|
SDR .byte
|
|
|
|
ICR .byte
|
|
|
|
CRA .byte
|
|
|
|
CRB .byte
|
|
|
|
.endstruct
|
2002-05-26 09:08:52 +00:00
|
|
|
|
|
|
|
|
|
|
|
; I/O $dc00: CIA 6526
|
2003-12-20 23:38:42 +00:00
|
|
|
;
|
2002-05-26 09:08:52 +00:00
|
|
|
; cia = $dc00
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
; I/O $dd00: ACIA 6551
|
2003-12-20 23:38:42 +00:00
|
|
|
;
|
2003-12-19 23:04:30 +00:00
|
|
|
; acia = $dd00
|
2002-05-26 09:08:52 +00:00
|
|
|
|
2003-12-20 23:13:26 +00:00
|
|
|
.struct ACIA
|
|
|
|
DATA .byte
|
|
|
|
STATUS .byte
|
|
|
|
CMD .byte
|
|
|
|
CTRL .BYTE
|
|
|
|
.endstruct
|
2002-05-26 09:08:52 +00:00
|
|
|
|
|
|
|
|
|
|
|
; I/O $de00: Triport #1 6525
|
2003-12-20 23:38:42 +00:00
|
|
|
;
|
2003-12-19 23:04:30 +00:00
|
|
|
; tpi1 = $de00
|
|
|
|
|
|
|
|
.struct TPI
|
|
|
|
PRA .byte
|
|
|
|
PRB .byte
|
|
|
|
.union
|
|
|
|
PRC .byte
|
|
|
|
INT .byte
|
|
|
|
.endunion
|
|
|
|
DDRA .byte
|
|
|
|
DDRB .byte
|
|
|
|
.union
|
|
|
|
DDRC .byte
|
|
|
|
IMR .byte
|
|
|
|
.endunion
|
|
|
|
CR .byte
|
|
|
|
AIR .byte
|
|
|
|
.endstruct
|
2002-05-26 09:08:52 +00:00
|
|
|
|
|
|
|
|
|
|
|
; I/O $df00: Triport #2 6525
|
|
|
|
|
2003-12-19 23:04:30 +00:00
|
|
|
; tpi2 = $df00
|
2002-05-26 09:08:52 +00:00
|
|
|
|
|
|
|
|