diff options
author | B. Watson <yalhcru@gmail.com> | 2016-01-02 21:35:39 -0500 |
---|---|---|
committer | B. Watson <yalhcru@gmail.com> | 2016-01-02 21:35:39 -0500 |
commit | 7d412a05b2eb563f268d81387be0dacd1b77cac2 (patch) | |
tree | cb8d2c1a5356a2f83d21f3eebcef6d7edf3b3da0 /newtitle.s | |
parent | d3395e701c2a14d30508a7f36c84be620ff2261a (diff) | |
download | taipan-7d412a05b2eb563f268d81387be0dacd1b77cac2.tar.gz |
leave title screen showing while loading (not quite right yet)
Diffstat (limited to 'newtitle.s')
-rw-r--r-- | newtitle.s | 41 |
1 files changed, 24 insertions, 17 deletions
@@ -5,16 +5,19 @@ .include "atari.inc" ; where our screen was loaded (see newtitle.pl) -screendata = $3000 +screendata = $9000 ; homebrew atari xex header .word $ffff - .word start + .word version .word end-1 - .org $5000 ; anywhere that doesn't step on the title data at - ; $3000, and doesn't cross a 1K boundary (since there's - ; a display list included here) + ; needs to be above the BSS (see taipan.map). we'll place it right at + ; the end of screendata. + .org $a800 + +version: + .incbin "ver.dat" ; executable code here start: @@ -60,18 +63,20 @@ wait4key: sta CH ; restore OS's display list - lda #0 - sta SDMCTL ; disable screen again - lda FR0 - sta SDLSTL - lda FR0+1 - sta SDLSTH + ;lda #0 + ;sta SDMCTL ; disable screen again + ;lda FR0 + ;sta SDLSTL + ;lda FR0+1 + ;sta SDLSTH - jsr wait1jiffy + ;jsr wait1jiffy - ; switch to normal playfield, enable screen - lda #$22 - sta SDMCTL + ; switch to normal playfield, enable screen. this is now + ; done in atari_text_setup() in taipan.c, so the title screen + ; can keep displaying. + ;lda #$22 + ;sta SDMCTL rts ; return to DOS @@ -87,7 +92,7 @@ dlist: .byte $70 ; 24 scanlines of blanks .byte $70 .byte $70 - .byte $30 ; 4 more since image is only 184 lines tall +; .byte $30 ; 4 more since image is only 184 lines tall .byte $0f | $40 ; LMS, BASIC mode 8 .word screendata @@ -100,7 +105,9 @@ dlist: .repeat 55 .byte $0f ; 55 more scanlines of mode 8 .endrepeat - .byte $30 ; blank 4 lines to match GR.8 (does it even matter?) +; .byte $30 ; blank 4 lines to match GR.8 (does it even matter?) + .byte $02 | $40 ; LMS, 1 line of GR.0 for the version + .word version .byte $41 ; JVB, jump & wait for vblank .word dlist |