Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2025-03-06 03:29:46 +00:00
Code Issues Projects Releases Wiki Activity

ds: sorta have sound and progression going first 2 screens

Browse Source
This commit is contained in:
Vince Weaver 2019-11-07 22:16:26 -05:00
parent 3a57302641
commit 3a204cba54
2 changed files with 24 additions and 33 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
demosplash/demosplash.s
View File

@ -50,21 +50,15 @@ demosplash2019:
; Setup pages (is this necessary?) ; Setup pages (is this necessary?)
;=========================== ;===========================
lda #0 ; lda #0
sta DRAW_PAGE ; sta DRAW_PAGE
lda #1 ; lda #1
sta DISP_PAGE ; sta DISP_PAGE
;=========================== ;===========================
; apple II intro ; apple II intro
;============================ ;============================
nop
nop
nop
jsr appleII_intro jsr appleII_intro
@ -72,10 +66,6 @@ demosplash2019:
; missing scene ; missing scene
;=========================== ;===========================
; nop
; nop
; nop
jsr missing_intro jsr missing_intro
@ -83,7 +73,6 @@ demosplash2019:
; start irq music ; start irq music
;======================== ;========================
nop
; cli ; enable interrupts ; cli ; enable interrupts
;=========================== ;===========================
@ -208,6 +197,7 @@ wait_until_keypressed:
; Pictures (no need to align) ; Pictures (no need to align)
.include "appleII_40_96.inc" .include "appleII_40_96.inc"
.include "k_40_48d.inc"
.include "graphics/book_open/book_open.inc" .include "graphics/book_open/book_open.inc"
.include "graphics/starbase/starbase.inc" .include "graphics/starbase/starbase.inc"
.include "graphics/starbase/ship_flames.inc" .include "graphics/starbase/ship_flames.inc"

37
demosplash/missing.s
View File

@ -144,42 +144,43 @@ missing_display_loop:
; do_nothing should be ; do_nothing should be
; 4550 ; 4550
; -12 jsr/ret to update_type1 ; -12 jsr/ret to update_type1
; - 7 check keypress ; - 8 check keypress
; - 3 jmp loop ; -1239
;============= ;=============
; 4528 ; 3291
; blah, current code the tight loops are right at a page boundary ; blah, current code the tight loops are right at a page boundary
jsr play_frame_compressed ; 6+1233
do_nothing_missing: do_nothing_missing:
; want 4528 ; want 3291
; Try X=4 Y=174 cycles=4525 R3 ; Try X=163 Y=4 cycles=3285R6
lda TEMP ; nop 3 lda TEMP
lda TEMP
ldy #174 ; 2 ldy #4 ; 2
gloop1: ldx #4 ; 2 gloop1: ldx #163 ; 2
gloop2: dex ; 2 gloop2: dex ; 2
bne gloop2 ; 2nt/3 bne gloop2 ; 2nt/3
dey ; 2 dey ; 2
bne gloop1 ; 2nt/3 bne gloop1 ; 2nt/3
lda KEYPRESS ; 4 lda FRAME_PLAY_PAGE ; 3
bpl missing_no_keypress ; 3 cmp #4 ; 2
bne missing_display_loop ; 3
; lda KEYPRESS ; 4
; bpl missing_no_keypress ; 3
rts rts
missing_no_keypress: ;.align $100
;.include "k_40_48d.inc"
jmp missing_display_loop ; 3
.align $100
.include "k_40_48d.inc"