cc65/libsrc/cbm610/kreadst.s

;
; Ullrich von Bassewitz, 2003-12-19
;
; READST kernal call
;

        .export         READST

        .import         sys_bank, restore_bank
        .import         sysp0: zp, ktmp: zp

        .include        "cbm610.inc"


.proc   READST

        jsr     sys_bank
        sty     ktmp                    ; Save Y register
        ldy     #$9C                    ; STATUS
        lda     (sysp0),y               ; Load STATUS from system bank
        ldy     ktmp
        jmp     restore_bank            ; Will set condition codes on A

.endproc
kiec.s git-svn-id: svn://svn.cc65.org/cc65/trunk@2781 b7a2c559-68d2-44c3-8de9-860c34a00d81 2003-12-19 00:12:08 +00:00			`;`
			`; Ullrich von Bassewitz, 2003-12-19`
			`;`
			`; READST kernal call`
			`;`

			`.export READST`

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			`.import sys_bank, restore_bank`
			`.import sysp0: zp, ktmp: zp`

kiec.s git-svn-id: svn://svn.cc65.org/cc65/trunk@2781 b7a2c559-68d2-44c3-8de9-860c34a00d81 2003-12-19 00:12:08 +00:00			`.include "cbm610.inc"`


			`.proc READST`

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			`jsr sys_bank`
			`sty ktmp ; Save Y register`
Minor changes and cleanup git-svn-id: svn://svn.cc65.org/cc65/trunk@2796 b7a2c559-68d2-44c3-8de9-860c34a00d81 2003-12-20 23:38:42 +00:00			`ldy #$9C ; STATUS`
			`lda (sysp0),y ; Load STATUS from system bank`
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			`ldy ktmp`
			`jmp restore_bank ; Will set condition codes on A`
kiec.s git-svn-id: svn://svn.cc65.org/cc65/trunk@2781 b7a2c559-68d2-44c3-8de9-860c34a00d81 2003-12-19 00:12:08 +00:00
			`.endproc`