# HG changeset patch # User Michael Pavone # Date 1692854448 25200 # Node ID f500831f7fb4312d763d17a11965f359d761781f # Parent 959a3e9aaac5fee4088cf8027b07d7ce9b55940a Fix missing init in fake TMSS diff -r 959a3e9aaac5 -r f500831f7fb4 tmss.s68 --- a/tmss.s68 Wed Aug 23 22:09:35 2023 -0700 +++ b/tmss.s68 Wed Aug 23 22:20:48 2023 -0700 @@ -95,7 +95,7 @@ dc.b " " dc.b " " dc.b "JUE " - + frame_counter equ $FFFF8000 ram_code equ $FFFF8002 @@ -118,13 +118,25 @@ move.w #$8D00, (a1) ;hscroll table at 0 move.w #$8F02, (a1) ;autoinc 2 move.w #$9011, (a1) ;64x64 scroll size + + moveq.l #0, d0 + ;init palette move.l #$C0000000, (a1) - move.w #$000, (a0) + move.w d0, (a0) move.w #$EEE, (a0) ;clear scroll table move.l #$40000000, (a1) - move.l #0, (a0) + move.l d0, (a0) + + ;clear vsram + move.l #$40000010, (a1) + move.l d0, (a0) + + ;clear SAT + move.l #$40000003, (a1) + move.l d0, (a0) + move.l d0, (a0) ;load tiles move.l #$44000000, (a1) @@ -144,7 +156,7 @@ move.l #$45960002, d7 move.l d7, (a1) move.l #$800000, d6 - + lea ram_code_src(pc), a6 lea ram_code.w, a5 moveq #(font-ram_code_src)/2-1, d0 @@ -174,15 +186,16 @@ move.b d0, (a4) lea good(pc), a6 bsr.s print_string - - add.l d6, d7 - move.l d7, (a1) - bsr.s print_string - + add.l d6, d7 move.l d7, (a1) bsr.s print_string + add.l d6, d7 + move.l d7, (a1) + bsr.s print_string + + move.w #0, frame_counter.w move.w #$8164, (a1) move #$2500, SR wait: @@ -195,20 +208,20 @@ move.w #$8104, (a1) move.l d0, (a3) jmp (a6) - + is_bad: move.b d0, (a4) lea bad(pc), a6 bsr.s print_string - + add.l d6, d7 move.l d7, (a1) bsr.s print_string - + add.l d6, d7 move.l d7, (a1) bsr.s print_string - + move.w #$8144, (a1) forever: bra.s forever @@ -234,12 +247,12 @@ bra .loop .end rts - + good: dc.b " BLASTEM THINKS", 0 dc.b " THAT THIS CART", 0 dc.b " TASTES DELICIOUS!", 0 - + bad: dc.b " *sniff* *sniff*", 0 dc.b " something doesn't", 0