diff options
Diffstat (limited to 'newtitle.s')
| -rw-r--r-- | newtitle.s | 19 |
1 files changed, 14 insertions, 5 deletions
@@ -69,7 +69,7 @@ colorchoices: .byte $c0,$10,$00 colorcount = (*-colorchoices)-1 textchoices: - .byte $0c,$0e,$0a + .byte $08,$0a,$0c,$0e textcount = (*-textchoices)-1 wait1jiffy: @@ -120,11 +120,19 @@ bottomscanlines = (totalscanlines - topscanlines) .word arg .endmacro - ; display list here + ; display list here. slightly different display for the xex and + ; cart versions: the cart has an extra blank scanline just before the + ; menu GR.0 line, but one less blank at the top (so it comes out the same). + ; this is really nitpicking, but why not? + dlist: dlbyte $70 ; 24 scanlines of blanks dlbyte $70 + .ifdef CART_TARGET + dlbyte $60 + .else dlbyte $70 + .endif dl3byte $0f | $40, screendata ; LMS, BASIC mode 8 .repeat topscanlines - 1 @@ -138,14 +146,15 @@ dlist: .ifdef CART_TARGET dl3byte $01, dl_ram ; DL is mainly in ROM, jump to RAM (extra scanline) .else + ;dlbyte $00 ; extra blank scanline, to match the cart version (removed by request) dl3byte $02 | $40, version ; LMS, 1 line of GR.0 for the version help_lms = * - 2 dl3byte $41, dlist ; JVB, jump & wait for vblank .endif - .out .sprintf("dl start $%x, end $%x, size %d", dlist, *, (* - dlist) + 1) + .out .sprintf("dl start $%x, end $%x, size %d", dlist, *-1, (* - dlist) + 1) - .out .sprintf("C code can load at $%x", * + 1) + .out .sprintf("C code can load at $%x", *) helpshowing = FR1 @@ -276,7 +285,7 @@ start: sta CH ldx #0 ; X = index into bg color choices - ldy #0 ; Y = index into text color choices + ldy #textcount ; Y = index into text color choices ; wait for user to press a key wait4key: |