[fpgaboy.git] / core / insn_ldx_ahl.v

`define INSN_LDx_AHL            9'b0001xx010    // LDD/LDI A,(HL) / (HL),A

`ifdef EXECUTE
        `INSN_LDx_AHL: begin
                case (cycle)
                0:      if (opcode[3])          // LDx A, (HL)
                                `EXEC_READ(`_HL)
                        else
                                `EXEC_WRITE(`_HL, `_A)
                1:      begin
                                `EXEC_NEWCYCLE
                                `EXEC_INC_PC
                        end
                endcase
        end
`endif

`ifdef WRITEBACK
        `INSN_LDx_AHL: begin
                case (cycle)
                0:      begin /* Type F */ end
                1:      begin
                                if (opcode[3])
                                        `_A <= rdata;
                                `_HL <= opcode[4] ? // if set, LDD, else LDI
                                        (`_HL - 1) :
                                        (`_HL + 1);
                        end
                endcase
        end
`endif