1
0
mirror of https://github.com/cc65/cc65.git synced 2024-10-30 12:28:25 +00:00
cc65/libsrc/cbm610/banking.s
cuz a7042ddbe4 Complete redesign of the CBM610 support.
Use wrappers to call the kernal in bank 15 instead of implementing kernal
functionality within the cc65 libs (eats performance but is much smaller and
simpler).
Improved startup/shutdown code allows a return to the system bank without
calling the BASIC cold start vector.


git-svn-id: svn://svn.cc65.org/cc65/trunk@2793 b7a2c559-68d2-44c3-8de9-860c34a00d81
2003-12-20 23:13:26 +00:00

42 lines
437 B
ArmAsm

;
; Ullrich von Bassewitz, 28.09.1998
;
; Banking routines for the 610.
;
.export set_bank, sys_bank, restore_bank
.importzp ptr1, segsave
.include "cbm610.inc"
.code
.proc sys_bank
pha
lda IndReg
sta segsave
lda #$0F
sta IndReg
pla
rts
.endproc
.proc set_bank
pha
lda IndReg
sta segsave
pla
sta IndReg
rts
.endproc
.proc restore_bank
pha
lda segsave
sta IndReg
pla
rts
.endproc