1
0
mirror of https://github.com/cc65/cc65.git synced 2024-06-07 07:29:33 +00:00

cleanups; split 'header' and 'init' part into two source files

This commit is contained in:
Christian Groessler 2014-02-21 22:43:44 +01:00
parent 8b876b2ce5
commit 81fe7a3805
3 changed files with 69 additions and 55 deletions

View File

@ -1,41 +1,27 @@
FEATURES { FEATURES {
STARTADDRESS: default = $1000; STARTADDRESS: default = $0700;
} }
SYMBOLS { SYMBOLS {
_cas_init: type = import; __STACKSIZE__: type = weak, value = $0800; # 2k stack
__STACKSIZE__: type = weak, value = $0800; # 2k stack __RESERVED_MEMORY__: type = weak, value = $0000;
__STARTADDRESS__: type = export, value = %S; __STARTADDRESS__: type = export, value = %S;
__RESERVED_MEMORY__: type = weak, value = $0000; _cas_hdr: type = import;
} }
MEMORY { MEMORY {
ZP: file = "", define = yes, start = $0082, size = $007E; ZP: file = "", define = yes, start = $0082, size = $007E;
# file header, just $FFFF
# HEADER: file = "", start = $0000, size = $0002;
# CASHDR: file = %O, start = $3FD, size = 128, fill = yes;
# CASHDR: file = %O, start = $0, size = 6;
# "main program" load chunk
# MAINHDR: file = "", start = $0000, size = $0004;
RAM: file = %O, define = yes, start = %S, size = $BC20 - __STACKSIZE__ - __RESERVED_MEMORY__ - %S; RAM: file = %O, define = yes, start = %S, size = $BC20 - __STACKSIZE__ - __RESERVED_MEMORY__ - %S;
# TRAILER: file = "", start = $0000, size = $0006;
} }
SEGMENTS { SEGMENTS {
# EXEHDR: load = HEADER, type = ro; CASHDR: load = RAM, type = ro;
# MAINHDR: load = MAINHDR, type = ro; STARTUP: load = RAM, type = ro, define = yes, optional = yes;
# CASHDR: load = CASHDR, type = ro; LOWCODE: load = RAM, type = ro, define = yes, optional = yes;
CASHDR: load = RAM, type = ro; INIT: load = RAM, type = ro, optional = yes;
CASINIT: load = RAM, type = ro; CODE: load = RAM, type = ro, define = yes;
STARTUP: load = RAM, type = ro, define = yes; RODATA: load = RAM, type = ro, optional = yes;
LOWCODE: load = RAM, type = ro, define = yes, optional = yes; DATA: load = RAM, type = rw, optional = yes;
INIT: load = RAM, type = ro, optional = yes; BSS: load = RAM, type = bss, define = yes, optional = yes;
CODE: load = RAM, type = ro, define = yes; ZEROPAGE: load = ZP, type = zp, optional = yes;
RODATA: load = RAM, type = ro; EXTZP: load = ZP, type = zp, optional = yes;
DATA: load = RAM, type = rw;
BSS: load = RAM, type = bss, define = yes;
ZEROPAGE: load = ZP, type = zp;
EXTZP: load = ZP, type = zp, optional = yes;
# AUTOSTRT: load = TRAILER, type = ro;
} }
FEATURES { FEATURES {
CONDES: type = constructor, CONDES: type = constructor,

View File

@ -1,40 +1,37 @@
; ;
; Cassette boot file header ; Cassette boot file header
; ;
; Christian Groessler, chris@groessler.org, 2013 ; Christian Groessler, chris@groessler.org, 2014
; ;
;DEBUG = 1
.ifndef __ATARIXL__ .ifndef __ATARIXL__
.include "atari.inc" .include "atari.inc"
.import __BSS_RUN__, __STARTADDRESS__, start .import __BSS_RUN__, __STARTADDRESS__, _cas_init
.export _cas_init .export _cas_hdr
.assert ((__BSS_RUN__ - __STARTADDRESS__ + 127) / 128) < $101, error, "File to big to load from cassette"
; for a description of the cassette header, see De Re Atari, appendix C
.segment "CASHDR" .segment "CASHDR"
.byte 0 ; ignored _cas_hdr:
.byte <((__BSS_RUN__ - __STARTADDRESS__ + 127 + 6) / 128) .byte 0 ; ignored
.word __STARTADDRESS__ .byte <((__BSS_RUN__ - __STARTADDRESS__ + 127) / 128) ; # of 128-byte records to read
.word _cas_init .word __STARTADDRESS__ ; load address
.word _cas_init ; init address
.segment "CASINIT" .ifdef DEBUG
lda #33
ldy #80
sta (SAVMSC),y
.endif
clc
rts
lda #33 .endif ; .ifdef __ATARIXL__
ldy #80
sta (SAVMSC),y
clc
rts
_cas_init:
lda #34
ldy #81
sta (SAVMSC),y
lda #<start
sta DOSVEC
lda #>start
sta DOSVEC+1
rts
.endif ; .ifdef __ATARIXL__

31
libsrc/atari/casinit.s Normal file
View File

@ -0,0 +1,31 @@
;
; Cassette boot file init routine
;
; Christian Groessler, chris@groessler.org, 2014
;
;DEBUG = 1
.ifndef __ATARIXL__
.include "atari.inc"
.import start
.export _cas_init
.segment "INIT"
_cas_init:
.ifdef DEBUG
lda #34
ldy #81
sta (SAVMSC),y
.endif
lda #<start
sta DOSVEC
lda #>start
sta DOSVEC+1
rts
.endif ; .ifdef __ATARIXL__