Fix ld a, []

diff --git a/diag.asm b/diag.asm
index 5d44cef29f6ba6c9654ef0dada74bf8868e4ae68..2c843eb33c7a1a0a15a4349f3ffe66ebf9f8b46c 100644 (file)
--- a/diag.asm
+++ b/diag.asm
@@ -52,8 +52,7 @@ signon:
 
 putscreen:
        ; Wait for vblank
 
 putscreen:
        ; Wait for vblank

-       ld c, $41
-.stat: ld a, [c]
+.stat: ld a, [$FF41]

        ld [$FF51], a
        and $03         ; mode
        cp $01          ; VBLANK
        ld [$FF51], a
        and $03         ; mode
        cp $01          ; VBLANK

diff --git a/insn_ldm8_a.v b/insn_ldm8_a.v
index 27548625708c1e00221742d012e32a0dc7eaf494..14d82cae0551e95abb579e0cf3da6c0a2015d782 100644 (file)
--- a/insn_ldm8_a.v
+++ b/insn_ldm8_a.v
@@ -24,8 +24,8 @@
        `INSN_LD8M_A: begin
                case (cycle)
                0:      begin end
        `INSN_LD8M_A: begin
                case (cycle)
                0:      begin end

-               2:      begin end
-               3:      if (opcode[4]) `_A <= rdata;
+               1:      begin end
+               2:      if (opcode[4]) `_A <= rdata;

                endcase
        end
 `endif
                endcase
        end
 `endif