mirror of
https://github.com/robmcmullen/atrcopy.git
synced 2024-11-29 11:51:14 +00:00
30 lines
416 B
ArmAsm
30 lines
416 B
ArmAsm
|
SDLSTL = $0230
|
||
|
|
CONSOL = $D01F
|
||
|
|
;
|
||
|
|
*= $0600
|
||
|
|
;
|
||
|
|
INIT
|
||
|
|
LDA #<TITLEDL
|
||
|
|
STA SDLSTL
|
||
|
|
LDA #>TITLEDL
|
||
|
|
STA SDLSTL+1
|
||
|
|
LDA #8
|
||
|
|
STA CONSOL
|
||
|
|
TTL0 LDA CONSOL
|
||
|
|
CMP #6
|
||
|
|
BNE TTL0
|
||
|
|
RTS
|
||
|
|
;
|
||
|
|
TITLESC
|
||
|
|
.SBYTE +$80 ," PRESS START TO "
|
||
|
|
.SBYTE +$C0 ," CONTINUE LOADING "
|
||
|
|
;
|
||
|
|
TITLEDL .BYTE $70 ,$70 ,$70
|
||
|
|
.BYTE $70 ,$70 ,$70 ,$70 ,$70 ,$70 ,$70 ,$70 ,$70 ,$70 ,$47
|
||
|
|
.WORD TITLESC
|
||
|
|
.BYTE 6 ,$41
|
||
|
|
.WORD TITLEDL
|
||
|
|
|
||
|
|
*= $02E2
|
||
|
|
.WORD INIT
|