Don't hardcode the address of the SYS call for the startup code of the

Commodore machines.


git-svn-id: svn://svn.cc65.org/cc65/trunk@4474 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
uz
2009-11-23 12:01:24 +00:00
parent 61b2834508
commit c7a33334ba
6 changed files with 47 additions and 28 deletions

View File

@@ -32,7 +32,11 @@ IRQInd = $2FD ; JMP $0000 - used as indirect IRQ vector
.word Head ; Load address .word Head ; Load address
Head: .word @Next Head: .word @Next
.word .version ; Line number .word .version ; Line number
.byte $9E,"7181" ; SYS 7181 .byte $9E ; SYS token
.byte <(((Start / 1000) .mod 10) + $30)
.byte <(((Start / 100) .mod 10) + $30)
.byte <(((Start / 10) .mod 10) + $30)
.byte <(((Start / 1) .mod 10) + $30)
.byte $00 ; End of BASIC line .byte $00 ; End of BASIC line
@Next: .word 0 ; BASIC end marker @Next: .word 0 ; BASIC end marker
.reloc .reloc
@@ -42,7 +46,7 @@ Head: .word @Next
; Close open files ; Close open files
jsr CLRCH Start: jsr CLRCH
; Switch to the second charset ; Switch to the second charset

View File

@@ -26,14 +26,18 @@
.word Head ; Load address .word Head ; Load address
Head: .word @Next Head: .word @Next
.word .version ; Line number .word .version ; Line number
.byte $9E,"4109" ; SYS 4109 .byte $9E ; SYS token
.byte <(((Start / 1000) .mod 10) + $30)
.byte <(((Start / 100) .mod 10) + $30)
.byte <(((Start / 10) .mod 10) + $30)
.byte <(((Start / 1) .mod 10) + $30)
.byte $00 ; End of BASIC line .byte $00 ; End of BASIC line
@Next: .word 0 ; BASIC end marker @Next: .word 0 ; BASIC end marker
; ------------------------------------------------------------------------ ; ------------------------------------------------------------------------
; Actual code ; Actual code
ldx #zpspace-1 Start: ldx #zpspace-1
L1: lda sp,x L1: lda sp,x
sta zpsave,x ; save the zero page locations we need sta zpsave,x ; save the zero page locations we need
dex dex

View File

@@ -25,14 +25,18 @@
.word Head ; Load address .word Head ; Load address
Head: .word @Next Head: .word @Next
.word .version ; Line number .word .version ; Line number
.byte $9E,"2061" ; SYS 2061 .byte $9E ; SYS token
.byte <(((Start / 1000) .mod 10) + $30)
.byte <(((Start / 100) .mod 10) + $30)
.byte <(((Start / 10) .mod 10) + $30)
.byte <(((Start / 1) .mod 10) + $30)
.byte $00 ; End of BASIC line .byte $00 ; End of BASIC line
@Next: .word 0 ; BASIC end marker @Next: .word 0 ; BASIC end marker
; ------------------------------------------------------------------------ ; ------------------------------------------------------------------------
; Actual code ; Actual code
ldx #zpspace-1 Start: ldx #zpspace-1
L1: lda sp,x L1: lda sp,x
sta zpsave,x ; Save the zero page locations we need sta zpsave,x ; Save the zero page locations we need
dex dex

View File

@@ -24,14 +24,18 @@
.word Head ; Load address .word Head ; Load address
Head: .word @Next Head: .word @Next
.word .version ; Line number .word .version ; Line number
.byte $9E,"1037" ; SYS 1037 .byte $9E ; SYS token
.byte <(((Start / 1000) .mod 10) + $30)
.byte <(((Start / 100) .mod 10) + $30)
.byte <(((Start / 10) .mod 10) + $30)
.byte <(((Start / 1) .mod 10) + $30)
.byte $00 ; End of BASIC line .byte $00 ; End of BASIC line
@Next: .word 0 ; BASIC end marker @Next: .word 0 ; BASIC end marker
; ------------------------------------------------------------------------ ; ------------------------------------------------------------------------
; Actual code ; Actual code
ldx #zpspace-1 Start: ldx #zpspace-1
L1: lda sp,x L1: lda sp,x
sta zpsave,x ; Save the zero page locations we need sta zpsave,x ; Save the zero page locations we need
dex dex

View File

@@ -28,14 +28,18 @@ IRQInd = $500 ; JMP $0000 - used as indirect IRQ vector
.word Head ; Load address .word Head ; Load address
Head: .word @Next Head: .word @Next
.word .version ; Line number .word .version ; Line number
.byte $9E,"4109" ; SYS 4109 .byte $9E ; SYS token
.byte <(((Start / 1000) .mod 10) + $30)
.byte <(((Start / 100) .mod 10) + $30)
.byte <(((Start / 10) .mod 10) + $30)
.byte <(((Start / 1) .mod 10) + $30)
.byte $00 ; End of BASIC line .byte $00 ; End of BASIC line
@Next: .word 0 ; BASIC end marker @Next: .word 0 ; BASIC end marker
; ------------------------------------------------------------------------ ; ------------------------------------------------------------------------
; Actual code ; Actual code
sei ; No interrupts since we're banking out the ROM Start: sei ; No interrupts since we're banking out the ROM
sta ENABLE_RAM sta ENABLE_RAM
ldx #zpspace-1 ldx #zpspace-1
L1: lda sp,x L1: lda sp,x

View File

@@ -25,18 +25,17 @@
Head: .word @Next Head: .word @Next
.word .version ; Line number .word .version ; Line number
.byte $9E ; SYS token .byte $9E ; SYS token
.byte <(((@Start / 1000) .mod 10) + $30) .byte <(((Start / 1000) .mod 10) + $30)
.byte <(((@Start / 100) .mod 10) + $30) .byte <(((Start / 100) .mod 10) + $30)
.byte <(((@Start / 10) .mod 10) + $30) .byte <(((Start / 10) .mod 10) + $30)
.byte <(((@Start / 1) .mod 10) + $30) .byte <(((Start / 1) .mod 10) + $30)
.byte $00 ; End of BASIC line .byte $00 ; End of BASIC line
@Next: .word 0 ; BASIC end marker @Next: .word 0 ; BASIC end marker
@Start:
; ------------------------------------------------------------------------ ; ------------------------------------------------------------------------
; Actual code ; Actual code
ldx #zpspace-1 Start: ldx #zpspace-1
L1: lda sp,x L1: lda sp,x
sta zpsave,x ; Save the zero page locations we need sta zpsave,x ; Save the zero page locations we need
dex dex