prelaunch for Argos

This commit is contained in:
Peter Ferrie 2021-05-22 12:17:46 -07:00
parent 17bedb0607
commit 9e508ba4a6

25
src/prelaunch/argos.a Normal file
View File

@ -0,0 +1,25 @@
;license:MIT
;(c) 2021 by qkumba
!cpu 6502
!to "build/PRELAUNCH/ARGOS",plain
*=$106
!source "src/prelaunch/common.a"
+ENABLE_ACCEL
lda #$60
sta $852
jsr $800 ; load "DOS"
lda #<callback
sta $B64F
lda #>callback
sta $B650
+DISABLE_ACCEL
jmp $300
callback
+ENABLE_ACCEL
jsr $B65A ; decompress
+DISABLE_ACCEL
rts