6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2025-01-26 02:30:17 +00:00
Code Issues Projects Releases Wiki Activity

Some more improvements (untested).

Browse Source 
git-svn-id: svn://svn.cc65.org/cc65/trunk@4579 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
uz 2010-02-04 20:08:50 +00:00
parent b93a0b0511
commit aa6a507991
1 changed files with 7 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
libsrc/c64/c64-c256k.s
View File

@ -151,7 +151,7 @@ INSTALL:
jsr backup_and_setup_check_routine jsr backup_and_setup_check_routine
jsr CHECKC256K jsr CHECKC256K
cli cli
ldx #$29 ldx #.sizeof (c256kcheckcode) - 1
jsr restore_data jsr restore_data
cpy #$01 cpy #$01
beq @present beq @present
@ -212,8 +212,7 @@ MAP:
; Return the memory window ; Return the memory window
ldx #$0A jsr restore_copy_routine
jsr restore_data
lda #<window lda #<window
ldx #>window ; Return the window address ldx #>window ; Return the window address
cli cli
@ -258,8 +257,7 @@ COMMIT:
; Return the memory window ; Return the memory window
ldx #$0A jsr restore_copy_routine
jsr restore_data
done: done:
cli cli
rts rts
@ -309,8 +307,7 @@ COPYFROM:
bne @L1 bne @L1
inc ptr3+1 inc ptr3+1
bne @L1 bne @L1
ldx #$0A jsr restore_copy_routine
jsr restore_data
cli cli
rts rts
@ -375,8 +372,7 @@ COPYTO:
bne @L1 bne @L1
inc ptr3+1 inc ptr3+1
bne @L1 bne @L1
ldx #$0A jsr restore_copy_routine
jsr restore_data
cli cli
rts rts
@ -474,6 +470,8 @@ backup_and_setup_check_routine:
bpl @L1 bpl @L1
rts rts
restore_copy_routine:
ldx #.sizeof (c256kcopycode) - 1
restore_data: restore_data:
lda backup,x lda backup,x
sta CHECKC256K,x sta CHECKC256K,x