mirror of
https://github.com/deater/dos33fsprogs.git
synced 2025-01-14 13:33:48 +00:00
megademo: start arranging the files
This commit is contained in:
parent
2cf31f2240
commit
1f6860c0a8
@ -2,12 +2,15 @@
|
|||||||
; all good demos start with the C64 boot screen, right?
|
; all good demos start with the C64 boot screen, right?
|
||||||
|
|
||||||
; Apple II has a lot of trouble making clear text with bluish background
|
; Apple II has a lot of trouble making clear text with bluish background
|
||||||
; would be a lot clearer if I used black and white
|
; it looks a lot cleaner in black+white
|
||||||
|
|
||||||
TOP = $F0
|
; Zero page addresses
|
||||||
BOTTOM = $F1
|
|
||||||
|
TOP = $F0
|
||||||
|
BOTTOM = $F1
|
||||||
|
|
||||||
c64_opener:
|
c64_opener:
|
||||||
|
|
||||||
;===================
|
;===================
|
||||||
; init vars
|
; init vars
|
||||||
;===================
|
;===================
|
||||||
@ -16,34 +19,16 @@ c64_opener:
|
|||||||
sta BOTTOM
|
sta BOTTOM
|
||||||
|
|
||||||
;===================
|
;===================
|
||||||
; set graphics mode
|
; setup graphics
|
||||||
;===================
|
;===================
|
||||||
|
|
||||||
|
; We assume that the c64 image was put in $2000 by the loader
|
||||||
|
|
||||||
bit PAGE0 ; first graphics page
|
bit PAGE0 ; first graphics page
|
||||||
bit FULLGR ; full screen graphics
|
bit FULLGR ; full screen graphics
|
||||||
bit HIRES ; hires mode !!!
|
bit HIRES ; hires mode !!!
|
||||||
bit SET_GR ; graphics mode
|
bit SET_GR ; graphics mode
|
||||||
|
|
||||||
; lda #<c64
|
|
||||||
; sta LZ4_SRC
|
|
||||||
; lda #>c64
|
|
||||||
; sta LZ4_SRC+1
|
|
||||||
|
|
||||||
; lda #<(c64_end-8) ; skip checksum at end
|
|
||||||
; sta LZ4_END
|
|
||||||
; lda #>(c64_end-8) ; skip checksum at end
|
|
||||||
; sta LZ4_END+1
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
; lda #<$2000
|
|
||||||
; sta LZ4_DST
|
|
||||||
; lda #>$2000
|
|
||||||
; sta LZ4_DST+1
|
|
||||||
|
|
||||||
; jsr lz4_decode
|
|
||||||
|
|
||||||
|
|
||||||
jsr wait_until_keypress
|
jsr wait_until_keypress
|
||||||
|
|
||||||
;==============================
|
;==============================
|
||||||
|
@ -6,15 +6,7 @@
|
|||||||
.include "hardware.inc"
|
.include "hardware.inc"
|
||||||
|
|
||||||
|
|
||||||
;===================
|
megademo_start: ; this should end up at $4000
|
||||||
; graphics
|
|
||||||
;===================
|
|
||||||
;c64: ; this should end up at $2000-$4000
|
|
||||||
;.incbin "c64.img"
|
|
||||||
;c64_end:
|
|
||||||
|
|
||||||
|
|
||||||
real_start: ; this should end up at $4000
|
|
||||||
|
|
||||||
;===================
|
;===================
|
||||||
; Check for Apple II and patch
|
; Check for Apple II and patch
|
||||||
|
Loading…
x
Reference in New Issue
Block a user