diff --git a/demosplash/demosplash.s b/demosplash/demosplash.s index 128e506f..50f9e7dd 100644 --- a/demosplash/demosplash.s +++ b/demosplash/demosplash.s @@ -125,7 +125,11 @@ frame_decode_loop: ; starbase scene ;=========================== - jsr starbase + nop + nop + nop + +; jsr starbase ;============================ ; disable irq music @@ -149,7 +153,7 @@ frame_decode_loop: nop nop nop -; jsr end_book + jsr end_book ;=========================== ; credits diff --git a/demosplash/reading.s b/demosplash/reading.s index bfc5059b..d83e7cbc 100644 --- a/demosplash/reading.s +++ b/demosplash/reading.s @@ -18,12 +18,35 @@ end_book: lda #0 sta DRAW_PAGE + lda #255 + sta FRAMEL ;=================== ; setup grahics jsr create_update_type1 + + ;====================== + ; print message + + lda #read_book_text + sta OUTH + + jsr move_and_print + jsr move_and_print + + lda #200 + jsr long_wait + lda #200 + jsr long_wait + + + + ;============================= ; Load graphic page0 @@ -144,14 +167,19 @@ bloop2: dey ; 2 bne bloop1 ; 2nt/3 + dec FRAMEL ; 5 + nop ; 2 + bne book_loop ; 3 +; lda TEMP ; 3 +; lda KEYPRESS ; 4 +; bpl book_loop ; 3 - lda KEYPRESS ; 4 - bpl book_no_keypress ; 3 rts ; 6 -book_no_keypress: - - jmp book_loop ; 3 + +read_book_text: +.byte 2,11,"QUIET AT LAST",0 +.byte 2,12,"FINALLY I CAN READ MY BOOK IN PEACE",0