emailler/client/a2/autoexec.s
2013-04-12 09:28:49 +00:00

24 lines
578 B
ArmAsm

.include "../inc/common.i"
.include "../inc/a2const.i"
.import exit_to_basic
.import __CODE_LOAD__
.import __CODE_SIZE__
.import __RODATA_SIZE__
.import __DATA_SIZE__
.segment "EXEHDR" ;this is what gets put an the start of the file on the Apple 2
.addr __CODE_LOAD__-$03 ; Start address
.word __CODE_SIZE__+__RODATA_SIZE__+__DATA_SIZE__+4 ; file size
jmp init
.code
init:
lday #chain_cmd
jsr STROUT
jmp exit_to_basic
chain_cmd:
.byte 13,4,"CATALOG",13,0