mirror of
https://github.com/cc65/cc65.git
synced 2024-11-01 11:04:34 +00:00
32 lines
466 B
ArmAsm
32 lines
466 B
ArmAsm
|
;
|
||
|
|
; 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__
|