Merge branch 'master' of https://github.com/a2-4am/4cade

2024-11-27 08:50:01 +00:00 · 2020-03-09 17:24:32 -04:00 · 2020-03-09 17:24:32 -04:00 · a872d708f6
commit a872d708f6
parent 72814ee3a4 5d790168f7
1 changed files with 12 additions and 20 deletions
--- a/src/ui.attract.dhgr.a
+++ b/src/ui.attract.dhgr.a
@ -302,33 +302,25 @@ HGRByteToDHGRBytes
 ; out:   A = DHGR byte in mainmem
 ;        X = DHGR byte in auxmem
 ;        preserves Y
-;        clobbers zero page $00,$01,$02,$03
+;        clobbers zero page $00,$01,$02

         sty   $02
         ldy   #$02
-         sec
+--       stx   $01
+         ldx   #$04
+-        ror   $00                   ; duplicate previous bit
+         lsr                         ; fetch bit
         php
-         ldx   #$07
--       lsr
-        php
-         ror   $00
-         sec
-         dex
-         beq   +
+         ror   $00                   ; insert bit
         plp
-+        ror   $00
         dex
-         bpl   --
-         plp
-         ldx   $03
-         stx   $01
-         ldx   $00
-         stx   $03
-         ldx   #$06
-         dey
         bne   -
-         ror   $00
-         lda   $00
+         ldx   $00
+         dey
+         bne   --
+         txa
+         sec
+         ror   $01                   ; set bit 7 explicitly on auxmem value
         ldx   $01
         ldy   $02
         rts