2008-03-16 09:37:22 +00:00
|
|
|
;
|
|
|
|
|
; Oliver Schmidt, 03.03.2007
|
|
|
|
|
;
|
|
|
|
|
; VTABZ routine
|
|
|
|
|
;
|
|
|
|
|
|
2013-05-09 13:56:54 +02:00
|
|
|
.export VTABZ
|
2008-03-16 09:37:22 +00:00
|
|
|
|
2013-05-09 13:56:54 +02:00
|
|
|
.include "apple2.inc"
|
2008-03-16 09:37:22 +00:00
|
|
|
|
2013-05-09 13:56:54 +02:00
|
|
|
.segment "LOWCODE"
|
2008-03-16 09:37:22 +00:00
|
|
|
|
|
|
|
|
VTABZ:
|
2013-05-09 13:56:54 +02:00
|
|
|
; Switch in ROM and call VTABZ
|
|
|
|
|
bit $C082
|
|
|
|
|
jsr $FC24 ; Generate text base address
|
2008-03-16 09:37:22 +00:00
|
|
|
|
2013-05-09 13:56:54 +02:00
|
|
|
; Switch in LC bank 2 and return
|
|
|
|
|
bit $C080
|
|
|
|
|
rts
|
