Sprinter/mame
2
0
Fork 0
mirror of https://github.com/holub/mame synced 2025-04-17 22:13:04 +03:00
Code Issues Actions Packages Projects Releases Wiki Activity
9349b16a17
mame/src/devices/cpu/upd7810/upd7810_opcodes.cpp
Devin Acker 9349b16a17
Add a skeleton for an Oldsmobile Driver Information System (#13525) 
* New NOT_WORKING machine
----------
Oldsmobile Driver Information System (version 2.2 CH) [Devin Acker]
2025-04-02 10:22:45 -04:00

9485 lines
144 KiB
C++
Raw Blame History

// license:BSD-3-Clause
// copyright-holders:Juergen Buchmueller
/*****************************************************************************
*
* Portable uPD7810/11, 7810H/11H, 78C10/C11/C14 emulator V0.2
*
* 7810ops.inc - opcode functions
*
*****************************************************************************/
#include "emu.h"
#include "upd7810.h"
#include "upd7810_macros.h"
void upd7810_device::illegal()
{
logerror("uPD7810 '%s': illegal opcode %02x at PC:%04x\n", tag(), OP, PC);
}
void upd7810_device::illegal2()
{
logerror("uPD7810 '%s': illegal opcode %02x %02x at PC:%04x\n", tag(), OP, OP2, PC);
}
/* prefix 48 */
/* 48 01: 0100 1000 0000 0001 */
void upd7810_device::SLRC_A()
{
PSW = (PSW & ~CY) | (A & CY);
A >>= 1;
SKIP_CY;
}
/* 48 02: 0100 1000 0000 0010 */
void upd7810_device::SLRC_B()
{
PSW = (PSW & ~CY) | (B & CY);
B >>= 1;
SKIP_CY;
}
/* 48 03: 0100 1000 0000 0011 */
void upd7810_device::SLRC_C()
{
PSW = (PSW & ~CY) | (C & CY);
C >>= 1;
SKIP_CY;
}
/* 48 05: 0100 1000 0000 0101 */
void upd7810_device::SLLC_A()
{
PSW = (PSW & ~CY) | ((A >> 7) & CY);
A <<= 1;
SKIP_CY;
}
/* 48 06: 0100 1000 0000 0110 */
void upd7810_device::SLLC_B()
{
PSW = (PSW & ~CY) | ((B >> 7) & CY);
B <<= 1;
SKIP_CY;
}
/* 48 07: 0100 1000 0000 0111 */
void upd7810_device::SLLC_C()
{
PSW = (PSW & ~CY) | ((C >> 7) & CY);
C <<= 1;
SKIP_CY;
}
/* 48 08: 0100 1000 0000 1000 */
void upd7810_device::SK_NV()
{
/* 48 skip never */
}
/* 48 0a: 0100 1000 0000 1010 */
void upd7810_device::SK_CY()
{
if (CY == (PSW & CY))
PSW |= SK;
}
/* 48 0b: 0100 1000 0000 1011 */
void upd7810_device::SK_HC()
{
if (HC == (PSW & HC))
PSW |= SK;
}
/* 48 0c: 0100 1000 0000 1100 */
void upd7810_device::SK_Z()
{
if (Z == (PSW & Z))
PSW |= SK;
}
/* 48 18: 0100 1000 0001 1000 */
void upd7810_device::SKN_NV()
{
/* skip not never -> skip always ;-) */
PSW |= SK;
}
/* 48 1a: 0100 1000 0001 1010 */
void upd7810_device::SKN_CY()
{
if (0 == (PSW & CY))
PSW |= SK;
}
/* 48 1b: 0100 1000 0001 1011 */
void upd7810_device::SKN_HC()
{
if (0 == (PSW & HC))
PSW |= SK;
}
/* 48 1c: 0100 1000 0001 1100 */
void upd7810_device::SKN_Z()
{
if (0 == (PSW & Z))
PSW |= SK;
}
/* 48 21: 0100 1000 0010 0001 */
void upd7810_device::SLR_A()
{
PSW = (PSW & ~CY) | (A & CY);
A >>= 1;
}
/* 48 22: 0100 1000 0010 0010 */
void upd7810_device::SLR_B()
{
PSW = (PSW & ~CY) | (B & CY);
B >>= 1;
}
/* 48 23: 0100 1000 0010 0011 */
void upd7810_device::SLR_C()
{
PSW = (PSW & ~CY) | (C & CY);
C >>= 1;
}
/* 48 25: 0100 1000 0010 0101 */
void upd7810_device::SLL_A()
{
PSW = (PSW & ~CY) | ((A >> 7) & CY);
A <<= 1;
}
/* 48 26: 0100 1000 0010 0110 */
void upd7810_device::SLL_B()
{
PSW = (PSW & ~CY) | ((B >> 7) & CY);
B <<= 1;
}
/* 48 27: 0100 1000 0010 0111 */
void upd7810_device::SLL_C()
{
PSW = (PSW & ~CY) | ((C >> 7) & CY);
C <<= 1;
}
/* 48 28: 0100 1000 0010 1000 */
void upd7810_device::JEA()
{
PC = EA;
}
/* 48 29: 0100 1000 0010 1001 */
void upd7810_device::CALB()
{
SP--;
WM( SPD, PCH );
SP--;
WM( SPD, PCL );
PC = BC;
}
/* 48 2a: 0100 1000 0010 1010 */
void upd7810_device::CLC()
{
PSW &= ~CY;
}
/* 48 2b: 0100 1000 0010 1011 */
void upd7810_device::STC()
{
PSW |= CY;
}
/* 48 2d: 0100 1000 0010 1101 */
void upd7810_device::MUL_A()
{
EA = A * A;
}
/* 48 2e: 0100 1000 0010 1110 */
void upd7810_device::MUL_B()
{
EA = A * B;
}
/* 48 2f: 0100 1000 0010 1111 */
void upd7810_device::MUL_C()
{
EA = A * C;
}
/* 48 31: 0100 1000 0011 0001 */
void upd7810_device::RLR_A()
{
uint8_t carry=(PSW&CY)<<7;
PSW = (PSW & ~CY) | (A & CY);
A = (A >> 1) | carry;
}
/* 48 32: 0100 1000 0011 0010 */
void upd7810_device::RLR_B()
{
uint8_t carry=(PSW&CY)<<7;
PSW = (PSW & ~CY) | (B & CY);
B = (B >> 1) | carry;
}
/* 48 33: 0100 1000 0011 0011 */
void upd7810_device::RLR_C()
{
uint8_t carry=(PSW&CY)<<7;
PSW = (PSW & ~CY) | (C & CY);
C = (C >> 1) | carry;
}
/* 48 35: 0100 1000 0011 0101 */
void upd7810_device::RLL_A()
{
uint8_t carry=PSW&CY;
PSW = (PSW & ~CY) | ((A >> 7) & CY);
A = (A << 1) | carry;
}
/* 48 36: 0100 1000 0011 0110 */
void upd7810_device::RLL_B()
{
uint8_t carry=PSW&CY;
PSW = (PSW & ~CY) | ((B >> 7) & CY);
B = (B << 1) | carry;
}
/* 48 37: 0100 1000 0011 0111 */
void upd7810_device::RLL_C()
{
uint8_t carry=PSW&CY;
PSW = (PSW & ~CY) | ((C >> 7) & CY);
C = (C << 1) | carry;
}
/* 48 38: 0100 1000 0011 1000 */
void upd7810_device::RLD()
{
uint8_t m = RM( HL ), tmp;
tmp = (m << 4) | (A & 0x0f);
A = (A & 0xf0) | (m >> 4);
WM( HL, tmp );
}
/* 48 39: 0100 1000 0011 1001 */
void upd7810_device::RRD()
{
uint8_t m = RM( HL ), tmp;
tmp = (A << 4) | (m >> 4);
A = (A & 0xf0) | (m & 0x0f);
WM( HL, tmp );
}
/* 48 3a: 0100 1000 0011 1010 */
void upd7810_device::NEGA()
{
A = ~A + 1;
}
/* 48 3b: 0100 1000 0011 1011 */
void upd7810_device::HALT()
{
int cycles = (m_icount / 4) * 4;
m_icount -= cycles;
handle_timers(cycles);
PC -= 1; /* continue executing HALT */
}
/* 48 3d: 0100 1000 0011 1101 */
void upd7810_device::DIV_A()
{
if (A)
{
uint8_t remainder;
remainder = EA % A;
EA /= A;
A = remainder;
}
else
{
A = EAL;
EA = 0xffff;
}
}
/* 48 3e: 0100 1000 0011 1110 */
void upd7810_device::DIV_B()
{
if (B)
{
uint8_t remainder;
remainder = EA % B;
EA /= B;
B = remainder;
}
else
{
B = EAL;
EA = 0xffff;
}
}
/* 48 3f: 0100 1000 0011 1111 */
void upd7810_device::DIV_C()
{
if (C)
{
uint8_t remainder;
remainder = EA % C;
EA /= C;
C = remainder;
}
else
{
C = EAL;
EA = 0xffff;
}
}
/* 48 40: 0100 1000 0100 0000 */
void upd7810_device::SKIT_NMI()
{
if (m_nmi == CLEAR_LINE) // 1 pin level
PSW |= SK;
// INTFNMI is not tested or changed
}
/* 48 41: 0100 1000 0100 0001 */
void upd7810_device::SKIT_FT0()
{
if (IRR & INTFT0)
PSW |= SK;
IRR &= ~INTFT0;
}
/* 48 42: 0100 1000 0100 0010 */
void upd7810_device::SKIT_FT1()
{
if (IRR & INTFT1)
PSW |= SK;
IRR &= ~INTFT1;
}
/* 48 43: 0100 1000 0100 0011 */
void upd7810_device::SKIT_F1()
{
if (IRR & INTF1)
PSW |= SK;
IRR &= ~INTF1;
}
/* 48 44: 0100 1000 0100 0100 */
void upd7810_device::SKIT_F2()
{
if (IRR & INTF2)
PSW |= SK;
IRR &= ~INTF2;
}
/* 48 45: 0100 1000 0100 0101 */
void upd7810_device::SKIT_FE0()
{
if (IRR & INTFE0)
PSW |= SK;
IRR &= ~INTFE0;
}
/* 48 46: 0100 1000 0100 0110 */
void upd7810_device::SKIT_FE1()
{
if (IRR & INTFE1)
PSW |= SK;
IRR &= ~INTFE1;
}
/* 48 47: 0100 1000 0100 0111 */
void upd7810_device::SKIT_FEIN()
{
if (IRR & INTFEIN)
PSW |= SK;
IRR &= ~INTFEIN;
}
/* 48 48: 0100 1000 0100 1000 */
void upd7810_device::SKIT_FAD()
{
if (IRR & INTFAD)
PSW |= SK;
IRR &= ~INTFAD;
}
/* 48 49: 0100 1000 0100 1001 */
void upd7810_device::SKIT_FSR()
{
if (IRR & INTFSR)
PSW |= SK;
IRR &= ~INTFSR;
}
/* 48 4a: 0100 1000 0100 1010 */
void upd7810_device::SKIT_FST()
{
if (IRR & INTFST)
PSW |= SK;
IRR &= ~INTFST;
}
/* 48 4b: 0100 1000 0100 1011 */
void upd7810_device::SKIT_ER()
{
if (IRR & INTER)
PSW |= SK;
IRR &= ~INTER;
}
/* 48 4c: 0100 1000 0100 1100 */
void upd7810_device::SKIT_OV()
{
if (IRR & INTOV)
PSW |= SK;
IRR &= ~INTOV;
}
/* 48 50: 0100 1000 0101 0000 */
void upd7810_device::SKIT_AN4()
{
if (ITF & INTAN4)
PSW |= SK;
ITF &= ~INTAN4;
}
/* 48 51: 0100 1000 0101 0001 */
void upd7810_device::SKIT_AN5()
{
if (ITF & INTAN5)
PSW |= SK;
ITF &= ~INTAN5;
}
/* 48 52: 0100 1000 0101 0010 */
void upd7810_device::SKIT_AN6()
{
if (ITF & INTAN6)
PSW |= SK;
ITF &= ~INTAN6;
}
/* 48 53: 0100 1000 0101 0011 */
void upd7810_device::SKIT_AN7()
{
if (ITF & INTAN7)
PSW |= SK;
ITF &= ~INTAN7;
}
/* 48 54: 0100 1000 0101 0100 */
void upd7810_device::SKIT_SB()
{
if (ITF & INTSB)
PSW |= SK;
ITF &= ~INTSB;
}
/* 48 60: 0100 1000 0110 0000 */
void upd7810_device::SKNIT_NMI()
{
if (m_nmi == ASSERT_LINE) // 0 pin level
PSW |= SK;
// INTFNMI is not tested or changed
}
/* 48 61: 0100 1000 0110 0001 */
void upd7810_device::SKNIT_FT0()
{
if (0 == (IRR & INTFT0))
PSW |= SK;
IRR &= ~INTFT0;
}
/* 48 62: 0100 1000 0110 0010 */
void upd7810_device::SKNIT_FT1()
{
if (0 == (IRR & INTFT1))
PSW |= SK;
IRR &= ~INTFT1;
}
/* 48 63: 0100 1000 0110 0011 */
void upd7810_device::SKNIT_F1()
{
if (0 == (IRR & INTF1))
PSW |= SK;
IRR &= ~INTF1;
}
/* 48 64: 0100 1000 0110 0100 */
void upd7810_device::SKNIT_F2()
{
if (0 == (IRR & INTF2))
PSW |= SK;
IRR &= ~INTF2;
}
/* 48 65: 0100 1000 0110 0101 */
void upd7810_device::SKNIT_FE0()
{
if (0 == (IRR & INTFE0))
PSW |= SK;
IRR &= ~INTFE0;
}
/* 48 66: 0100 1000 0110 0110 */
void upd7810_device::SKNIT_FE1()
{
if (0 == (IRR & INTFE1))
PSW |= SK;
IRR &= ~INTFE1;
}
/* 48 67: 0100 1000 0110 0111 */
void upd7810_device::SKNIT_FEIN()
{
if (0 == (IRR & INTFEIN))
PSW |= SK;
IRR &= ~INTFEIN;
}
/* 48 68: 0100 1000 0110 1000 */
void upd7810_device::SKNIT_FAD()
{
if (0 == (IRR & INTFAD))
PSW |= SK;
IRR &= ~INTFAD;
}
/* 48 69: 0100 1000 0110 1001 */
void upd7810_device::SKNIT_FSR()
{
if (0 == (IRR & INTFSR))
PSW |= SK;
IRR &= ~INTFSR;
}
/* 48 6a: 0100 1000 0110 1010 */
void upd7810_device::SKNIT_FST()
{
if (0 == (IRR & INTFST))
PSW |= SK;
IRR &= ~INTFST;
}
/* 48 6b: 0100 1000 0110 1011 */
void upd7810_device::SKNIT_ER()
{
if (0 == (IRR & INTER))
PSW |= SK;
IRR &= ~INTER;
}
/* 48 6c: 0100 1000 0110 1100 */
void upd7810_device::SKNIT_OV()
{
if (0 == (IRR & INTOV))
PSW |= SK;
IRR &= ~INTOV;
}
/* 48 70: 0100 1000 0111 0000 */
void upd7810_device::SKNIT_AN4()
{
if (0 == (ITF & INTAN4))
PSW |= SK;
ITF &= ~INTAN4;
}
/* 48 71: 0100 1000 0111 0001 */
void upd7810_device::SKNIT_AN5()
{
if (0 == (ITF & INTAN5))
PSW |= SK;
ITF &= ~INTAN5;
}
/* 48 72: 0100 1000 0111 0010 */
void upd7810_device::SKNIT_AN6()
{
if (0 == (ITF & INTAN6))
PSW |= SK;
ITF &= ~INTAN6;
}
/* 48 73: 0100 1000 0111 0011 */
void upd7810_device::SKNIT_AN7()
{
if (0 == (ITF & INTAN7))
PSW |= SK;
ITF &= ~INTAN7;
}
/* 48 74: 0100 1000 0111 0100 */
void upd7810_device::SKNIT_SB()
{
if (0 == (ITF & INTSB))
PSW |= SK;
ITF &= ~INTSB;
}
/* 48 82: 0100 1000 1000 0010 */
void upd7810_device::LDEAX_D()
{
EAL = RM( DE );
EAH = RM( DE + 1 );
}
/* 48 83: 0100 1000 1000 0011 */
void upd7810_device::LDEAX_H()
{
EAL = RM( HL );
EAH = RM( HL + 1 );
}
/* 48 84: 0100 1000 1000 0100 */
void upd7810_device::LDEAX_Dp()
{
EAL = RM( DE );
EAH = RM( DE + 1 );
DE += 2;
}
/* 48 85: 0100 1000 1000 0101 */
void upd7810_device::LDEAX_Hp()
{
EAL = RM( HL );
EAH = RM( HL + 1 );
HL += 2;
}
/* 48 8b: 0100 1000 1000 1011 xxxx xxxx */
void upd7810_device::LDEAX_D_xx()
{
uint16_t ea;
RDOPARG( ea );
ea += DE;
EAL = RM( ea );
EAH = RM( ea + 1 );
}
/* 48 8c: 0100 1000 1000 1100 */
void upd7810_device::LDEAX_H_A()
{
uint16_t ea = HL + A;
EAL = RM( ea );
EAH = RM( ea + 1 );
}
/* 48 8d: 0100 1000 1000 1101 */
void upd7810_device::LDEAX_H_B()
{
uint16_t ea = HL + B;
EAL = RM( ea );
EAH = RM( ea + 1 );
}
/* 48 8e: 0100 1000 1000 1110 */
void upd7810_device::LDEAX_H_EA()
{
uint16_t ea = HL + EA;
EAL = RM( ea );
EAH = RM( ea + 1 );
}
/* 48 8f: 0100 1000 1000 1111 xxxx xxxx */
void upd7810_device::LDEAX_H_xx()
{
uint16_t ea;
RDOPARG( ea );
ea += HL;
EAL = RM( ea );
EAH = RM( ea + 1 );
}
/* 48 92: 0100 1000 1000 0010 */
void upd7810_device::STEAX_D()
{
WM( DE, EAL );
WM( DE + 1, EAH );
}
/* 48 93: 0100 1000 1000 0011 */
void upd7810_device::STEAX_H()
{
WM( HL, EAL );
WM( HL + 1, EAH );
}
/* 48 94: 0100 1000 1000 0100 */
void upd7810_device::STEAX_Dp()
{
WM( DE, EAL );
WM( DE + 1, EAH );
DE += 2;
}
/* 48 95: 0100 1000 1000 0101 */
void upd7810_device::STEAX_Hp()
{
WM( HL, EAL );
WM( HL + 1, EAH );
HL += 2;
}
/* 48 9b: 0100 1000 1000 1011 xxxx xxxx */
void upd7810_device::STEAX_D_xx()
{
uint16_t ea;
RDOPARG( ea );
ea += DE;
WM( ea, EAL );
WM( ea + 1, EAH );
}
/* 48 9c: 0100 1000 1000 1100 */
void upd7810_device::STEAX_H_A()
{
uint16_t ea = HL + A;
WM( ea, EAL );
WM( ea + 1, EAH );
}
/* 48 9d: 0100 1000 1000 1101 */
void upd7810_device::STEAX_H_B()
{
uint16_t ea = HL + B;
WM( ea, EAL );
WM( ea + 1, EAH );
}
/* 48 9e: 0100 1000 1000 1110 */
void upd7810_device::STEAX_H_EA()
{
uint16_t ea = HL + EA;
WM( ea, EAL );
WM( ea + 1, EAH );
}
/* 48 9f: 0100 1000 1000 1111 xxxx xxxx */
void upd7810_device::STEAX_H_xx()
{
uint16_t ea;
RDOPARG( ea );
ea += HL;
WM( ea, EAL );
WM( ea + 1, EAH );
}
/* 48 a0: 0100 1000 1010 0000 */
void upd7810_device::DSLR_EA()
{
PSW = (PSW & ~CY) | (EA & CY);
EA >>= 1;
}
/* 48 a4: 0100 1000 1010 0100 */
void upd7810_device::DSLL_EA()
{
PSW = (PSW & ~CY) | ((EA >> 15) & CY);
EA <<= 1;
}
/* 48 a8: 0100 1000 1010 1000 */
void upd7810_device::TABLE()
{
uint16_t ea = PC + A + 1;
C = RM( ea );
B = RM( ea + 1 );
}
/* 48 b0: 0100 1000 1011 0000 */
void upd7810_device::DRLR_EA()
{
uint8_t carry=PSW&CY;
PSW = (PSW & ~CY) | (EA & CY);
EA = (EA >> 1) | (carry << 15);
}
/* 48 b4: 0100 1000 1011 0100 */
void upd7810_device::DRLL_EA()
{
uint8_t carry=PSW&CY;
PSW = (PSW & ~CY) | ((EA >> 15) & CY);
EA = (EA << 1) | carry;
}
/* 48 bb: 0100 1000 1011 1011 */
void upd7810_device::STOP()
{
int cycles = (m_icount / 4) * 4;
m_icount -= cycles;
handle_timers(cycles);
PC -= 1;
}
/* 48 c0: 0100 1000 1100 0000 */
void upd7810_device::DMOV_EA_ECNT()
{
EA = ECNT;
}
/* 48 c1: 0100 1000 1100 0001 */
void upd7810_device::DMOV_EA_ECPT()
{
EA = ECPT;
}
/* 48 d2: 0100 1000 1101 0010 */
void upd7810_device::DMOV_ETM0_EA()
{
ETM0 = EA;
}
/* 48 d3: 0100 1000 1101 0011 */
void upd7810_device::DMOV_ETM1_EA()
{
ETM1 = EA;
}
/* prefix 4C */
/* 4c c0: 0100 1100 1100 0000 */
void upd7810_device::MOV_A_PA()
{
A = RP( UPD7810_PORTA );
}
/* 4c c1: 0100 1100 1100 0001 */
void upd7810_device::MOV_A_PB()
{
A = RP( UPD7810_PORTB );
}
/* 4c c2: 0100 1100 1100 0010 */
void upd7810_device::MOV_A_PC()
{
A = RP( UPD7810_PORTC );
}
/* 4c c3: 0100 1100 1100 0011 */
void upd7810_device::MOV_A_PD()
{
A = RP( UPD7810_PORTD );
}
/* 4c c5: 0100 1100 1100 0101 */
void upd7810_device::MOV_A_PF()
{
A = RP( UPD7810_PORTF );
}
/* 4c c6: 0100 1100 1100 0110 */
void upd7810_device::MOV_A_MKH()
{
A = MKH;
}
/* 4c c7: 0100 1100 1100 0111 */
void upd7810_device::MOV_A_MKL()
{
A = MKL;
}
/* 4c c8: 0100 1100 1100 1000 */
void upd7810_device::MOV_A_ANM()
{
A = ANM;
}
/* 4c c9: 0100 1100 1100 1001 */
void upd7810_device::MOV_A_SMH()
{
A = SMH;
}
/* 4c cb: 0100 1100 1100 1011 */
void upd7810_device::MOV_A_EOM()
{
/* only bits #1 and #5 can be read */
uint8_t eom = EOM & 0x22;
A = eom;
}
/* 4c cd: 0100 1100 1100 1101 */
void upd7810_device::MOV_A_TMM()
{
A = TMM;
}
/* 4c ce: 0100 1100 1110 0000 (7807 only) */
void upd7810_device::MOV_A_PT()
{
A = RP( UPD7807_PORTT );
}
/* 4c d9: 0100 1100 1101 1001 */
void upd7810_device::MOV_A_RXB()
{
A = RXB;
}
/* 4c e0: 0100 1100 1110 0000 */
void upd7810_device::MOV_A_CR0()
{
A = CR[0];
}
/* 4c e1: 0100 1100 1110 0001 */
void upd7810_device::MOV_A_CR1()
{
A = CR[1];
}
/* 4c e2: 0100 1100 1110 0010 */
void upd7810_device::MOV_A_CR2()
{
A = CR[2];
}
/* 4c e3: 0100 1100 1110 0011 */
void upd7810_device::MOV_A_CR3()
{
A = CR[3];
}
/* prefix 4D */
/* 4d c0: 0100 1101 1100 0000 */
void upd7810_device::MOV_PA_A()
{
WP( UPD7810_PORTA, A );
}
/* 4d c1: 0100 1101 1100 0001 */
void upd7810_device::MOV_PB_A()
{
WP( UPD7810_PORTB, A );
}
/* 4d c2: 0100 1101 1100 0010 */
void upd7810_device::MOV_PC_A()
{
WP( UPD7810_PORTC, A );
}
/* 4d c3: 0100 1101 1100 0011 */
void upd7810_device::MOV_PD_A()
{
WP( UPD7810_PORTD, A );
}
/* 4d c5: 0100 1101 1100 0101 */
void upd7810_device::MOV_PF_A()
{
WP( UPD7810_PORTF, A );
}
/* 4d c6: 0100 1101 1100 0110 */
void upd7810_device::MOV_MKH_A()
{
MKH = A;
}
/* 4d c7: 0100 1101 1100 0111 */
void upd7810_device::MOV_MKL_A()
{
MKL = A;
}
/* 4d c8: 0100 1101 1100 1000 */
void upd7810_device::MOV_ANM_A()
{
ANM = A;
}
/* 4d c9: 0100 1101 1100 1001 */
void upd7810_device::MOV_SMH_A()
{
SMH = A;
}
/* 4d ca: 0100 1101 1100 1010 */
void upd7810_device::MOV_SML_A()
{
SML = A;
}
/* 4d cb: 0100 1101 1100 1011 */
void upd7810_device::MOV_EOM_A()
{
EOM = A;
upd7810_write_EOM();
}
/* 4d cc: 0100 1101 1100 1100 */
void upd7810_device::MOV_ETMM_A()
{
ETMM = A;
}
/* 4d cd: 0100 1101 1100 1101 */
void upd7810_device::MOV_TMM_A()
{
TMM = A;
}
/* 4d d0: 0100 1101 1101 0000 */
void upd7810_device::MOV_MM_A()
{
MM = A;
if (BIT(A, 3))
m_ram_view.select(0);
else
m_ram_view.disable();
}
/* 4d d1: 0100 1101 1101 0001 */
void upd7810_device::MOV_MCC_A()
{
if (MCC == A)
return;
MCC = A;
WP(UPD7810_PORTC, m_pc_out);
}
/* 4d d2: 0100 1101 1101 0010 */
void upd7810_device::MOV_MA_A()
{
if (MA == A)
return;
MA = A;
WP(UPD7810_PORTA, m_pa_out);
}
/* 4d d3: 0100 1101 1101 0011 */
void upd7810_device::MOV_MB_A()
{
if (MB == A)
return;
MB = A;
WP(UPD7810_PORTB, m_pb_out);
}
/* 4d d4: 0100 1101 1101 0100 */
void upd7810_device::MOV_MC_A()
{
if (MC == A)
return;
MC = A;
WP(UPD7810_PORTC, m_pc_out);
}
/* 4d d7: 0100 1101 1101 0111 */
void upd7810_device::MOV_MF_A()
{
if (MF == A)
return;
MF = A;
WP(UPD7810_PORTF, m_pf_out);
}
/* 4d d8: 0100 1101 1101 1000 */
void upd7810_device::MOV_TXB_A()
{
TXB = A;
upd7810_write_TXB();
}
/* 4d da: 0100 1101 1101 1010 */
void upd7810_device::MOV_TM0_A()
{
TM0 = A;
}
/* 4d db: 0100 1101 1101 1011 */
void upd7810_device::MOV_TM1_A()
{
TM1 = A;
}
/* 4d e5: 0100 1101 1110 0101 (7807 only) */
void upd7810_device::MOV_MT_A()
{
MT = A;
}
/* 4d e8: 0100 1101 1110 1000 */
void upd7810_device::MOV_ZCM_A()
{
ZCM = A;
}
/* prefix 60 */
/* 60 08: 0110 0000 0000 1000 */
void upd7810_device::ANA_V_A()
{
V &= A;
SET_Z(V);
}
/* 60 09: 0110 0000 0000 1001 */
void upd7810_device::ANA_A_A()
{
A &= A;
SET_Z(A);
}
/* 60 0a: 0110 0000 0000 1010 */
void upd7810_device::ANA_B_A()
{
B &= A;
SET_Z(B);
}
/* 60 0b: 0110 0000 0000 1011 */
void upd7810_device::ANA_C_A()
{
C &= A;
SET_Z(C);
}
/* 60 0c: 0110 0000 0000 1100 */
void upd7810_device::ANA_D_A()
{
D &= A;
SET_Z(D);
}
/* 60 0d: 0110 0000 0000 1101 */
void upd7810_device::ANA_E_A()
{
E &= A;
SET_Z(E);
}
/* 60 0e: 0110 0000 0000 1110 */
void upd7810_device::ANA_H_A()
{
H &= A;
SET_Z(H);
}
/* 60 0f: 0110 0000 0000 1111 */
void upd7810_device::ANA_L_A()
{
L &= A;
SET_Z(L);
}
/* 60 10: 0110 0000 0001 0000 */
void upd7810_device::XRA_V_A()
{
V ^= A;
SET_Z(V);
}
/* 60 11: 0110 0000 0001 0001 */
void upd7810_device::XRA_A_A()
{
A ^= A;
SET_Z(A);
}
/* 60 12: 0110 0000 0001 0010 */
void upd7810_device::XRA_B_A()
{
B ^= A;
SET_Z(B);
}
/* 60 13: 0110 0000 0001 0011 */
void upd7810_device::XRA_C_A()
{
C ^= A;
SET_Z(C);
}
/* 60 14: 0110 0000 0001 0100 */
void upd7810_device::XRA_D_A()
{
D ^= A;
SET_Z(D);
}
/* 60 15: 0110 0000 0001 0101 */
void upd7810_device::XRA_E_A()
{
E ^= A;
SET_Z(E);
}
/* 60 16: 0110 0000 0001 0110 */
void upd7810_device::XRA_H_A()
{
H ^= A;
SET_Z(H);
}
/* 60 17: 0110 0000 0001 0111 */
void upd7810_device::XRA_L_A()
{
L ^= A;
SET_Z(L);
}
/* 60 18: 0110 0000 0001 1000 */
void upd7810_device::ORA_V_A()
{
V |= A;
SET_Z(V);
}
/* 60 19: 0110 0000 0001 1001 */
void upd7810_device::ORA_A_A()
{
A |= A;
SET_Z(A);
}
/* 60 1a: 0110 0000 0001 1010 */
void upd7810_device::ORA_B_A()
{
B |= A;
SET_Z(B);
}
/* 60 1b: 0110 0000 0001 1011 */
void upd7810_device::ORA_C_A()
{
C |= A;
SET_Z(C);
}
/* 60 1c: 0110 0000 0001 1100 */
void upd7810_device::ORA_D_A()
{
D |= A;
SET_Z(D);
}
/* 60 1d: 0110 0000 0001 1101 */
void upd7810_device::ORA_E_A()
{
E |= A;
SET_Z(E);
}
/* 60 1e: 0110 0000 0001 1110 */
void upd7810_device::ORA_H_A()
{
H |= A;
SET_Z(H);
}
/* 60 1f: 0110 0000 0001 1111 */
void upd7810_device::ORA_L_A()
{
L |= A;
SET_Z(L);
}
/* 60 20: 0110 0000 0010 0000 */
void upd7810_device::ADDNC_V_A()
{
uint8_t tmp = V + A;
ZHC_ADD( tmp, V, 0 );
V = tmp;
SKIP_NC;
}
/* 60 21: 0110 0000 0010 0001 */
void upd7810_device::ADDNC_A_A()
{
uint8_t tmp = A + A;
ZHC_ADD( tmp, A, 0 );
A = tmp;
SKIP_NC;
}
/* 60 22: 0110 0000 0010 0010 */
void upd7810_device::ADDNC_B_A()
{
uint8_t tmp = B + A;
ZHC_ADD( tmp, B, 0 );
B = tmp;
SKIP_NC;
}
/* 60 23: 0110 0000 0010 0011 */
void upd7810_device::ADDNC_C_A()
{
uint8_t tmp = C + A;
ZHC_ADD( tmp, C, 0 );
C = tmp;
SKIP_NC;
}
/* 60 24: 0110 0000 0010 0100 */
void upd7810_device::ADDNC_D_A()
{
uint8_t tmp = D + A;
ZHC_ADD( tmp, D, 0 );
D = tmp;
SKIP_NC;
}
/* 60 25: 0110 0000 0010 0101 */
void upd7810_device::ADDNC_E_A()
{
uint8_t tmp = E + A;
ZHC_ADD( tmp, E, 0 );
E = tmp;
SKIP_NC;
}
/* 60 26: 0110 0000 0010 0110 */
void upd7810_device::ADDNC_H_A()
{
uint8_t tmp = H + A;
ZHC_ADD( tmp, H, 0 );
H = tmp;
SKIP_NC;
}
/* 60 27: 0110 0000 0010 0111 */
void upd7810_device::ADDNC_L_A()
{
uint8_t tmp = L + A;
ZHC_ADD( tmp, L, 0 );
L = tmp;
SKIP_NC;
}
/* 60 28: 0110 0000 0010 1000 */
void upd7810_device::GTA_V_A()
{
uint16_t tmp = V - A - 1;
ZHC_SUB( tmp, V, 0 );
SKIP_NC;
}
/* 60 29: 0110 0000 0010 1001 */
void upd7810_device::GTA_A_A()
{
uint16_t tmp = A - A - 1;
ZHC_SUB( tmp, A, 0 );
SKIP_NC;
}
/* 60 2a: 0110 0000 0010 1010 */
void upd7810_device::GTA_B_A()
{
uint16_t tmp = B - A - 1;
ZHC_SUB( tmp, B, 0 );
SKIP_NC;
}
/* 60 2b: 0110 0000 0010 1011 */
void upd7810_device::GTA_C_A()
{
uint16_t tmp = C - A - 1;
ZHC_SUB( tmp, C, 0 );
SKIP_NC;
}
/* 60 2c: 0110 0000 0010 1100 */
void upd7810_device::GTA_D_A()
{
uint16_t tmp = D - A - 1;
ZHC_SUB( tmp, D, 0 );
SKIP_NC;
}
/* 60 2d: 0110 0000 0010 1101 */
void upd7810_device::GTA_E_A()
{
uint16_t tmp = E - A - 1;
ZHC_SUB( tmp, E, 0 );
SKIP_NC;
}
/* 60 2e: 0110 0000 0010 1110 */
void upd7810_device::GTA_H_A()
{
uint16_t tmp = H - A - 1;
ZHC_SUB( tmp, H, 0 );
SKIP_NC;
}
/* 60 2f: 0110 0000 0010 1111 */
void upd7810_device::GTA_L_A()
{
uint16_t tmp = L - A - 1;
ZHC_SUB( tmp, L, 0 );
SKIP_NC;
}
/* 60 30: 0110 0000 0011 0000 */
void upd7810_device::SUBNB_V_A()
{
uint8_t tmp = V - A;
ZHC_SUB( tmp, V, 0 );
V = tmp;
SKIP_NC;
}
/* 60 31: 0110 0000 0011 0001 */
void upd7810_device::SUBNB_A_A()
{
uint8_t tmp = A - A;
ZHC_SUB( tmp, A, 0 );
A = tmp;
SKIP_NC;
}
/* 60 32: 0110 0000 0011 0010 */
void upd7810_device::SUBNB_B_A()
{
uint8_t tmp = B - A;
ZHC_SUB( tmp, B, 0 );
B = tmp;
SKIP_NC;
}
/* 60 33: 0110 0000 0011 0011 */
void upd7810_device::SUBNB_C_A()
{
uint8_t tmp = C - A;
ZHC_SUB( tmp, C, 0 );
C = tmp;
SKIP_NC;
}
/* 60 34: 0110 0000 0011 0100 */
void upd7810_device::SUBNB_D_A()
{
uint8_t tmp = D - A;
ZHC_SUB( tmp, D, 0 );
D = tmp;
SKIP_NC;
}
/* 60 35: 0110 0000 0011 0101 */
void upd7810_device::SUBNB_E_A()
{
uint8_t tmp = E - A;
ZHC_SUB( tmp, E, 0 );
E = tmp;
SKIP_NC;
}
/* 60 36: 0110 0000 0011 0110 */
void upd7810_device::SUBNB_H_A()
{
uint8_t tmp = H - A;
ZHC_SUB( tmp, H, 0 );
H = tmp;
SKIP_NC;
}
/* 60 37: 0110 0000 0011 0111 */
void upd7810_device::SUBNB_L_A()
{
uint8_t tmp = L - A;
ZHC_SUB( tmp, L, 0 );
L = tmp;
SKIP_NC;
}
/* 60 38: 0110 0000 0011 1000 */
void upd7810_device::LTA_V_A()
{
uint8_t tmp = V - A;
ZHC_SUB( tmp, V, 0 );
SKIP_CY;
}
/* 60 39: 0110 0000 0011 1001 */
void upd7810_device::LTA_A_A()
{
uint8_t tmp = A - A;
ZHC_SUB( tmp, A, 0 );
SKIP_CY;
}
/* 60 3a: 0110 0000 0011 1010 */
void upd7810_device::LTA_B_A()
{
uint8_t tmp = B - A;
ZHC_SUB( tmp, B, 0 );
SKIP_CY;
}
/* 60 3b: 0110 0000 0011 1011 */
void upd7810_device::LTA_C_A()
{
uint8_t tmp = C - A;
ZHC_SUB( tmp, C, 0 );
SKIP_CY;
}
/* 60 3c: 0110 0000 0011 1100 */
void upd7810_device::LTA_D_A()
{
uint8_t tmp = D - A;
ZHC_SUB( tmp, D, 0 );
SKIP_CY;
}
/* 60 3d: 0110 0000 0011 1101 */
void upd7810_device::LTA_E_A()
{
uint8_t tmp = E - A;
ZHC_SUB( tmp, E, 0 );
SKIP_CY;
}
/* 60 3e: 0110 0000 0011 1110 */
void upd7810_device::LTA_H_A()
{
uint8_t tmp = H - A;
ZHC_SUB( tmp, H, 0 );
SKIP_CY;
}
/* 60 3f: 0110 0000 0011 1111 */
void upd7810_device::LTA_L_A()
{
uint8_t tmp = L - A;
ZHC_SUB( tmp, L, 0 );
SKIP_CY;
}
/* 60 40: 0110 0000 0100 0000 */
void upd7810_device::ADD_V_A()
{
uint8_t tmp = V + A;
ZHC_ADD( tmp, V, 0 );
V = tmp;
}
/* 60 41: 0110 0000 0100 0001 */
void upd7810_device::ADD_A_A()
{
uint8_t tmp = A + A;
ZHC_ADD( tmp, A, 0 );
A = tmp;
}
/* 60 42: 0110 0000 0100 0010 */
void upd7810_device::ADD_B_A()
{
uint8_t tmp = B + A;
ZHC_ADD( tmp, B, 0 );
B = tmp;
}
/* 60 43: 0110 0000 0100 0011 */
void upd7810_device::ADD_C_A()
{
uint8_t tmp = C + A;
ZHC_ADD( tmp, C, 0 );
C = tmp;
}
/* 60 44: 0110 0000 0100 0100 */
void upd7810_device::ADD_D_A()
{
uint8_t tmp = D + A;
ZHC_ADD( tmp, D, 0 );
D = tmp;
}
/* 60 45: 0110 0000 0100 0101 */
void upd7810_device::ADD_E_A()
{
uint8_t tmp = E + A;
ZHC_ADD( tmp, E, 0 );
E = tmp;
}
/* 60 46: 0110 0000 0100 0110 */
void upd7810_device::ADD_H_A()
{
uint8_t tmp = H + A;
ZHC_ADD( tmp, H, 0 );
H = tmp;
}
/* 60 47: 0110 0000 0100 0111 */
void upd7810_device::ADD_L_A()
{
uint8_t tmp = L + A;
ZHC_ADD( tmp, L, 0 );
L = tmp;
}
/* 60 50: 0110 0000 0101 0000 */
void upd7810_device::ADC_V_A()
{
uint8_t tmp = V + A + (PSW & CY);
ZHC_ADD( tmp, V, (PSW & CY) );
V = tmp;
}
/* 60 51: 0110 0000 0101 0001 */
void upd7810_device::ADC_A_A()
{
uint8_t tmp = A + A + (PSW & CY);
ZHC_ADD( tmp, A, (PSW & CY) );
A = tmp;
}
/* 60 52: 0110 0000 0101 0010 */
void upd7810_device::ADC_B_A()
{
uint8_t tmp = B + A + (PSW & CY);
ZHC_ADD( tmp, B, (PSW & CY) );
B = tmp;
}
/* 60 53: 0110 0000 0101 0011 */
void upd7810_device::ADC_C_A()
{
uint8_t tmp = C + A + (PSW & CY);
ZHC_ADD( tmp, C, (PSW & CY) );
C = tmp;
}
/* 60 54: 0110 0000 0101 0100 */
void upd7810_device::ADC_D_A()
{
uint8_t tmp = D + A + (PSW & CY);
ZHC_ADD( tmp, D, (PSW & CY) );
D = tmp;
}
/* 60 55: 0110 0000 0101 0101 */
void upd7810_device::ADC_E_A()
{
uint8_t tmp = E + A + (PSW & CY);
ZHC_ADD( tmp, E, (PSW & CY) );
E = tmp;
}
/* 60 56: 0110 0000 0101 0110 */
void upd7810_device::ADC_H_A()
{
uint8_t tmp = H + A + (PSW & CY);
ZHC_ADD( tmp, H, (PSW & CY) );
H = tmp;
}
/* 60 57: 0110 0000 0101 0111 */
void upd7810_device::ADC_L_A()
{
uint8_t tmp = L + A + (PSW & CY);
ZHC_ADD( tmp, L, (PSW & CY) );
L = tmp;
}
/* 60 60: 0110 0000 0110 0000 */
void upd7810_device::SUB_V_A()
{
uint8_t tmp = V - A;
ZHC_SUB( tmp, V, 0 );
V = tmp;
}
/* 60 61: 0110 0000 0110 0001 */
void upd7810_device::SUB_A_A()
{
uint8_t tmp = A - A;
ZHC_SUB( tmp, A, 0 );
A = tmp;
}
/* 60 62: 0110 0000 0110 0010 */
void upd7810_device::SUB_B_A()
{
uint8_t tmp = B - A;
ZHC_SUB( tmp, B, 0 );
B = tmp;
}
/* 60 63: 0110 0000 0110 0011 */
void upd7810_device::SUB_C_A()
{
uint8_t tmp = C - A;
ZHC_SUB( tmp, C, 0 );
C = tmp;
}
/* 60 64: 0110 0000 0110 0100 */
void upd7810_device::SUB_D_A()
{
uint8_t tmp = D - A;
ZHC_SUB( tmp, D, 0 );
D = tmp;
}
/* 60 65: 0110 0000 0110 0101 */
void upd7810_device::SUB_E_A()
{
uint8_t tmp = E - A;
ZHC_SUB( tmp, E, 0 );
E = tmp;
}
/* 60 66: 0110 0000 0110 0110 */
void upd7810_device::SUB_H_A()
{
uint8_t tmp = H - A;
ZHC_SUB( tmp, H, 0 );
H = tmp;
}
/* 60 67: 0110 0000 0110 0111 */
void upd7810_device::SUB_L_A()
{
uint8_t tmp = L - A;
ZHC_SUB( tmp, L, 0 );
L = tmp;
}
/* 60 68: 0110 0000 0110 1000 */
void upd7810_device::NEA_V_A()
{
uint8_t tmp = V - A;
ZHC_SUB( tmp, V, 0 );
SKIP_NZ;
}
/* 60 69: 0110 0000 0110 1001 */
void upd7810_device::NEA_A_A()
{
uint8_t tmp = A - A;
ZHC_SUB( tmp, A, 0 );
SKIP_NZ;
}
/* 60 6a: 0110 0000 0110 1010 */
void upd7810_device::NEA_B_A()
{
uint8_t tmp = B - A;
ZHC_SUB( tmp, B, 0 );
SKIP_NZ;
}
/* 60 6b: 0110 0000 0110 1011 */
void upd7810_device::NEA_C_A()
{
uint8_t tmp = C - A;
ZHC_SUB( tmp, C, 0 );
SKIP_NZ;
}
/* 60 6c: 0110 0000 0110 1100 */
void upd7810_device::NEA_D_A()
{
uint8_t tmp = D - A;
ZHC_SUB( tmp, D, 0 );
SKIP_NZ;
}
/* 60 6d: 0110 0000 0110 1101 */
void upd7810_device::NEA_E_A()
{
uint8_t tmp = E - A;
ZHC_SUB( tmp, E, 0 );
SKIP_NZ;
}
/* 60 6e: 0110 0000 0110 1110 */
void upd7810_device::NEA_H_A()
{
uint8_t tmp = H - A;
ZHC_SUB( tmp, H, 0 );
SKIP_NZ;
}
/* 60 6f: 0110 0000 0110 1111 */
void upd7810_device::NEA_L_A()
{
uint8_t tmp = L - A;
ZHC_SUB( tmp, L, 0 );
SKIP_NZ;
}
/* 60 70: 0110 0000 0111 0000 */
void upd7810_device::SBB_V_A()
{
uint8_t tmp = V - A - (PSW & CY);
ZHC_SUB( tmp, V, (PSW & CY) );
V = tmp;
}
/* 60 71: 0110 0000 0111 0001 */
void upd7810_device::SBB_A_A()
{
uint8_t tmp = A - A - (PSW & CY);
ZHC_SUB( tmp, A, (PSW & CY) );
A = tmp;
}
/* 60 72: 0110 0000 0111 0010 */
void upd7810_device::SBB_B_A()
{
uint8_t tmp = B - A - (PSW & CY);
ZHC_SUB( tmp, B, (PSW & CY) );
B = tmp;
}
/* 60 73: 0110 0000 0111 0011 */
void upd7810_device::SBB_C_A()
{
uint8_t tmp = C - A - (PSW & CY);
ZHC_SUB( tmp, C, (PSW & CY) );
C = tmp;
}
/* 60 74: 0110 0000 0111 0100 */
void upd7810_device::SBB_D_A()
{
uint8_t tmp = D - A - (PSW & CY);
ZHC_SUB( tmp, D, (PSW & CY) );
D = tmp;
}
/* 60 75: 0110 0000 0111 0101 */
void upd7810_device::SBB_E_A()
{
uint8_t tmp = E - A - (PSW & CY);
ZHC_SUB( tmp, E, (PSW & CY) );
E = tmp;
}
/* 60 76: 0110 0000 0111 0110 */
void upd7810_device::SBB_H_A()
{
uint8_t tmp = H - A - (PSW & CY);
ZHC_SUB( tmp, H, (PSW & CY) );
H = tmp;
}
/* 60 77: 0110 0000 0111 0111 */
void upd7810_device::SBB_L_A()
{
uint8_t tmp = L - A - (PSW & CY);
ZHC_SUB( tmp, L, (PSW & CY) );
L = tmp;
}
/* 60 78: 0110 0000 0111 1000 */
void upd7810_device::EQA_V_A()
{
uint8_t tmp = V - A;
ZHC_SUB( tmp, V, 0 );
SKIP_Z;
}
/* 60 79: 0110 0000 0111 1001 */
void upd7810_device::EQA_A_A()
{
uint8_t tmp = A - A;
ZHC_SUB( tmp, A, 0 );
SKIP_Z;
}
/* 60 7a: 0110 0000 0111 1010 */
void upd7810_device::EQA_B_A()
{
uint8_t tmp = B - A;
ZHC_SUB( tmp, B, 0 );
SKIP_Z;
}
/* 60 7b: 0110 0000 0111 1011 */
void upd7810_device::EQA_C_A()
{
uint8_t tmp = C - A;
ZHC_SUB( tmp, C, 0 );
SKIP_Z;
}
/* 60 7c: 0110 0000 0111 1100 */
void upd7810_device::EQA_D_A()
{
uint8_t tmp = D - A;
ZHC_SUB( tmp, D, 0 );
SKIP_Z;
}
/* 60 7d: 0110 0000 0111 1101 */
void upd7810_device::EQA_E_A()
{
uint8_t tmp = E - A;
ZHC_SUB( tmp, E, 0 );
SKIP_Z;
}
/* 60 7e: 0110 0000 0111 1110 */
void upd7810_device::EQA_H_A()
{
uint8_t tmp = H - A;
ZHC_SUB( tmp, H, 0 );
SKIP_Z;
}
/* 60 7f: 0110 0000 0111 1111 */
void upd7810_device::EQA_L_A()
{
uint8_t tmp = L - A;
ZHC_SUB( tmp, L, 0 );
SKIP_Z;
}
/* 60 88: 0110 0000 1000 1000 */
void upd7810_device::ANA_A_V()
{
A &= V;
SET_Z(A);
}
/* 60 89: 0110 0000 1000 1001 */
/* ANA_A_A already defined */
/* 60 8a: 0110 0000 1000 1010 */
void upd7810_device::ANA_A_B()
{
A &= B;
SET_Z(A);
}
/* 60 8b: 0110 0000 1000 1011 */
void upd7810_device::ANA_A_C()
{
A &= C;
SET_Z(A);
}
/* 60 8c: 0110 0000 1000 1100 */
void upd7810_device::ANA_A_D()
{
A &= D;
SET_Z(A);
}
/* 60 8d: 0110 0000 1000 1101 */
void upd7810_device::ANA_A_E()
{
A &= E;
SET_Z(A);
}
/* 60 8e: 0110 0000 1000 1110 */
void upd7810_device::ANA_A_H()
{
A &= H;
SET_Z(A);
}
/* 60 8f: 0110 0000 1000 1111 */
void upd7810_device::ANA_A_L()
{
A &= L;
SET_Z(A);
}
/* 60 90: 0110 0000 1001 0000 */
void upd7810_device::XRA_A_V()
{
A ^= V;
SET_Z(A);
}
/* 60 91: 0110 0000 1001 0001 */
/* XRA_A_A already defined */
/* 60 92: 0110 0000 1001 0010 */
void upd7810_device::XRA_A_B()
{
A ^= B;
SET_Z(A);
}
/* 60 93: 0110 0000 1001 0011 */
void upd7810_device::XRA_A_C()
{
A ^= C;
SET_Z(A);
}
/* 60 94: 0110 0000 1001 0100 */
void upd7810_device::XRA_A_D()
{
A ^= D;
SET_Z(A);
}
/* 60 95: 0110 0000 1001 0101 */
void upd7810_device::XRA_A_E()
{
A ^= E;
SET_Z(A);
}
/* 60 96: 0110 0000 1001 0110 */
void upd7810_device::XRA_A_H()
{
A ^= H;
SET_Z(A);
}
/* 60 97: 0110 0000 1001 0111 */
void upd7810_device::XRA_A_L()
{
A ^= L;
SET_Z(A);
}
/* 60 98: 0110 0000 1001 1000 */
void upd7810_device::ORA_A_V()
{
A |= V;
SET_Z(A);
}
/* 60 99: 0110 0000 1001 1001 */
/* ORA_A_A already defined */
/* 60 9a: 0110 0000 1001 1010 */
void upd7810_device::ORA_A_B()
{
A |= B;
SET_Z(A);
}
/* 60 9b: 0110 0000 1001 1011 */
void upd7810_device::ORA_A_C()
{
A |= C;
SET_Z(A);
}
/* 60 9c: 0110 0000 1001 1100 */
void upd7810_device::ORA_A_D()
{
A |= D;
SET_Z(A);
}
/* 60 9d: 0110 0000 1001 1101 */
void upd7810_device::ORA_A_E()
{
A |= E;
SET_Z(A);
}
/* 60 9e: 0110 0000 1001 1110 */
void upd7810_device::ORA_A_H()
{
A |= H;
SET_Z(A);
}
/* 60 9f: 0110 0000 1001 1111 */
void upd7810_device::ORA_A_L()
{
A |= L;
SET_Z(A);
}
/* 60 a0: 0110 0000 1010 0000 */
void upd7810_device::ADDNC_A_V()
{
uint8_t tmp = A + V;
ZHC_ADD( tmp, A, 0 );
A = tmp;
SKIP_NC;
}
/* 60 a1: 0110 0000 1010 0001 */
/* ADDNC_A_A already defined */
/* 60 a2: 0110 0000 1010 0010 */
void upd7810_device::ADDNC_A_B()
{
uint8_t tmp = A + B;
ZHC_ADD( tmp, A, 0 );
A = tmp;
SKIP_NC;
}
/* 60 a3: 0110 0000 1010 0011 */
void upd7810_device::ADDNC_A_C()
{
uint8_t tmp = A + C;
ZHC_ADD( tmp, A, 0 );
A = tmp;
SKIP_NC;
}
/* 60 a4: 0110 0000 1010 0100 */
void upd7810_device::ADDNC_A_D()
{
uint8_t tmp = A + D;
ZHC_ADD( tmp, A, 0 );
A = tmp;
SKIP_NC;
}
/* 60 a5: 0110 0000 1010 0101 */
void upd7810_device::ADDNC_A_E()
{
uint8_t tmp = A + E;
ZHC_ADD( tmp, A, 0 );
A = tmp;
SKIP_NC;
}
/* 60 a6: 0110 0000 1010 0110 */
void upd7810_device::ADDNC_A_H()
{
uint8_t tmp = A + H;
ZHC_ADD( tmp, A, 0 );
A = tmp;
SKIP_NC;
}
/* 60 a7: 0110 0000 1010 0111 */
void upd7810_device::ADDNC_A_L()
{
uint8_t tmp = A + L;
ZHC_ADD( tmp, A, 0 );
A = tmp;
SKIP_NC;
}
/* 60 a8: 0110 0000 1010 1000 */
void upd7810_device::GTA_A_V()
{
uint16_t tmp = A - V - 1;
ZHC_SUB( tmp, A, 0 );
SKIP_NC;
}
/* 60 a9: 0110 0000 1010 1001 */
/* GTA_A_A already defined */
/* 60 aa: 0110 0000 1010 1010 */
void upd7810_device::GTA_A_B()
{
uint16_t tmp = A - B - 1;
ZHC_SUB( tmp, A, 0 );
SKIP_NC;
}
/* 60 ab: 0110 0000 1010 1011 */
void upd7810_device::GTA_A_C()
{
uint16_t tmp = A - C - 1;
ZHC_SUB( tmp, A, 0 );
SKIP_NC;
}
/* 60 ac: 0110 0000 1010 1100 */
void upd7810_device::GTA_A_D()
{
uint16_t tmp = A - D - 1;
ZHC_SUB( tmp, A, 0 );
SKIP_NC;
}
/* 60 ad: 0110 0000 1010 1101 */
void upd7810_device::GTA_A_E()
{
uint16_t tmp = A - E - 1;
ZHC_SUB( tmp, A, 0 );
SKIP_NC;
}
/* 60 ae: 0110 0000 1010 1110 */
void upd7810_device::GTA_A_H()
{
uint16_t tmp = A - H - 1;
ZHC_SUB( tmp, A, 0 );
SKIP_NC;
}
/* 60 af: 0110 0000 1010 1111 */
void upd7810_device::GTA_A_L()
{
uint16_t tmp = A - L - 1;
ZHC_SUB( tmp, A, 0 );
SKIP_NC;
}
/* 60 b0: 0110 0000 1011 0000 */
void upd7810_device::SUBNB_A_V()
{
uint8_t tmp = A - V;
ZHC_SUB( tmp, A, 0 );
A = tmp;
SKIP_NC;
}
/* 60 b1: 0110 0000 1011 0001 */
/* SUBNB_A_A already defined */
/* 60 b2: 0110 0000 1011 0010 */
void upd7810_device::SUBNB_A_B()
{
uint8_t tmp = A - B;
ZHC_SUB( tmp, A, 0 );
A = tmp;
SKIP_NC;
}
/* 60 b3: 0110 0000 1011 0011 */
void upd7810_device::SUBNB_A_C()
{
uint8_t tmp = A - C;
ZHC_SUB( tmp, A, 0 );
A = tmp;
SKIP_NC;
}
/* 60 b4: 0110 0000 1011 0100 */
void upd7810_device::SUBNB_A_D()
{
uint8_t tmp = A - D;
ZHC_SUB( tmp, A, 0 );
A = tmp;
SKIP_NC;
}
/* 60 b5: 0110 0000 1011 0101 */
void upd7810_device::SUBNB_A_E()
{
uint8_t tmp = A - E;
ZHC_SUB( tmp, A, 0 );
A = tmp;
SKIP_NC;
}
/* 60 b6: 0110 0000 1011 0110 */
void upd7810_device::SUBNB_A_H()
{
uint8_t tmp = A - H;
ZHC_SUB( tmp, A, 0 );
A = tmp;
SKIP_NC;
}
/* 60 b7: 0110 0000 1011 0111 */
void upd7810_device::SUBNB_A_L()
{
uint8_t tmp = A - L;
ZHC_SUB( tmp, A, 0 );
A = tmp;
SKIP_NC;
}
/* 60 b8: 0110 0000 1011 1000 */
void upd7810_device::LTA_A_V()
{
uint8_t tmp = A - V;
ZHC_SUB( tmp, A, 0 );
SKIP_CY;
}
/* 60 b9: 0110 0000 1011 1001 */
/* LTA_A_A already defined */
/* 60 ba: 0110 0000 1011 1010 */
void upd7810_device::LTA_A_B()
{
uint8_t tmp = A - B;
ZHC_SUB( tmp, A, 0 );
SKIP_CY;
}
/* 60 bb: 0110 0000 1011 1011 */
void upd7810_device::LTA_A_C()
{
uint8_t tmp = A - C;
ZHC_SUB( tmp, A, 0 );
SKIP_CY;
}
/* 60 bc: 0110 0000 1011 1100 */
void upd7810_device::LTA_A_D()
{
uint8_t tmp = A - D;
ZHC_SUB( tmp, A, 0 );
SKIP_CY;
}
/* 60 bd: 0110 0000 1011 1101 */
void upd7810_device::LTA_A_E()
{
uint8_t tmp = A - E;
ZHC_SUB( tmp, A, 0 );
SKIP_CY;
}
/* 60 be: 0110 0000 1011 1110 */
void upd7810_device::LTA_A_H()
{
uint8_t tmp = A - H;
ZHC_SUB( tmp, A, 0 );
SKIP_CY;
}
/* 60 bf: 0110 0000 1011 1111 */
void upd7810_device::LTA_A_L()
{
uint8_t tmp = A - L;
ZHC_SUB( tmp, A, 0 );
SKIP_CY;
}
/* 60 c0: 0110 0000 1100 0000 */
void upd7810_device::ADD_A_V()
{
uint8_t tmp = A + V;
ZHC_ADD( tmp, A, 0 );
A = tmp;
}
/* 60 c1: 0110 0000 1100 0001 */
/* ADD_A_A already defined */
/* 60 c2: 0110 0000 1100 0010 */
void upd7810_device::ADD_A_B()
{
uint8_t tmp = A + B;
ZHC_ADD( tmp, A, 0 );
A = tmp;
}
/* 60 c3: 0110 0000 1100 0011 */
void upd7810_device::ADD_A_C()
{
uint8_t tmp = A + C;
ZHC_ADD( tmp, A, 0 );
A = tmp;
}
/* 60 c4: 0110 0000 1100 0100 */
void upd7810_device::ADD_A_D()
{
uint8_t tmp = A + D;
ZHC_ADD( tmp, A, 0 );
A = tmp;
}
/* 60 c5: 0110 0000 1100 0101 */
void upd7810_device::ADD_A_E()
{
uint8_t tmp = A + E;
ZHC_ADD( tmp, A, 0 );
A = tmp;
}
/* 60 c6: 0110 0000 1100 0110 */
void upd7810_device::ADD_A_H()
{
uint8_t tmp = A + H;
ZHC_ADD( tmp, A, 0 );
A = tmp;
}
/* 60 c7: 0110 0000 1100 0111 */
void upd7810_device::ADD_A_L()
{
uint8_t tmp = A + L;
ZHC_ADD( tmp, A, 0 );
A = tmp;
}
/* 60 c8: 0110 0000 1100 1000 */
void upd7810_device::ONA_A_V()
{
if (A & V)
PSW = (PSW & ~Z) | SK;
else
PSW |= Z;
}
/* 60 c9: 0110 0000 1100 1001 */
void upd7810_device::ONA_A_A()
{
if (A & A)
PSW = (PSW & ~Z) | SK;
else
PSW |= Z;
}
/* 60 ca: 0110 0000 1100 1010 */
void upd7810_device::ONA_A_B()
{
if (A & B)
PSW = (PSW & ~Z) | SK;
else
PSW |= Z;
}
/* 60 cb: 0110 0000 1100 1011 */
void upd7810_device::ONA_A_C()
{
if (A & C)
PSW = (PSW & ~Z) | SK;
else
PSW |= Z;
}
/* 60 cc: 0110 0000 1100 1100 */
void upd7810_device::ONA_A_D()
{
if (A & D)
PSW = (PSW & ~Z) | SK;
else
PSW |= Z;
}
/* 60 cd: 0110 0000 1100 1101 */
void upd7810_device::ONA_A_E()
{
if (A & E)
PSW = (PSW & ~Z) | SK;
else
PSW |= Z;
}
/* 60 ce: 0110 0000 1100 1110 */
void upd7810_device::ONA_A_H()
{
if (A & H)
PSW = (PSW & ~Z) | SK;
else
PSW |= Z;
}
/* 60 cf: 0110 0000 1100 1111 */
void upd7810_device::ONA_A_L()
{
if (A & L)
PSW = (PSW & ~Z) | SK;
else
PSW |= Z;
}
/* 60 d0: 0110 0000 1101 0000 */
void upd7810_device::ADC_A_V()
{
uint8_t tmp = A + V + (PSW & CY);
ZHC_ADD( tmp, A, (PSW & CY) );
A = tmp;
}
/* 60 d1: 0110 0000 1101 0001 */
/* ADC_A_A already defined */
/* 60 d2: 0110 0000 1101 0010 */
void upd7810_device::ADC_A_B()
{
uint8_t tmp = A + B + (PSW & CY);
ZHC_ADD( tmp, A, (PSW & CY) );
A = tmp;
}
/* 60 d3: 0110 0000 1101 0011 */
void upd7810_device::ADC_A_C()
{
uint8_t tmp = A + C + (PSW & CY);
ZHC_ADD( tmp, A, (PSW & CY) );
A = tmp;
}
/* 60 d4: 0110 0000 1101 0100 */
void upd7810_device::ADC_A_D()
{
uint8_t tmp = A + D + (PSW & CY);
ZHC_ADD( tmp, A, (PSW & CY) );
A = tmp;
}
/* 60 d5: 0110 0000 1101 0101 */
void upd7810_device::ADC_A_E()
{
uint8_t tmp = A + E + (PSW & CY);
ZHC_ADD( tmp, A, (PSW & CY) );
A = tmp;
}
/* 60 d6: 0110 0000 1101 0110 */
void upd7810_device::ADC_A_H()
{
uint8_t tmp = A + H + (PSW & CY);
ZHC_ADD( tmp, A, (PSW & CY) );
A = tmp;
}
/* 60 d7: 0110 0000 1101 0111 */
void upd7810_device::ADC_A_L()
{
uint8_t tmp = A + L + (PSW & CY);
ZHC_ADD( tmp, A, (PSW & CY) );
A = tmp;
}
/* 60 d8: 0110 0000 1101 1000 */
void upd7810_device::OFFA_A_V()
{
if ( A & V )
PSW &= ~Z;
else
PSW = PSW | Z | SK;
}
/* 60 d9: 0110 0000 1101 1001 */
void upd7810_device::OFFA_A_A()
{
if ( A & A )
PSW &= ~Z;
else
PSW = PSW | Z | SK;
}
/* 60 da: 0110 0000 1101 1010 */
void upd7810_device::OFFA_A_B()
{
if ( A & B )
PSW &= ~Z;
else
PSW = PSW | Z | SK;
}
/* 60 db: 0110 0000 1101 1011 */
void upd7810_device::OFFA_A_C()
{
if ( A & C )
PSW &= ~Z;
else
PSW = PSW | Z | SK;
}
/* 60 dc: 0110 0000 1101 1100 */
void upd7810_device::OFFA_A_D()
{
if ( A & D )
PSW &= ~Z;
else
PSW = PSW | Z | SK;
}
/* 60 dd: 0110 0000 1101 1101 */
void upd7810_device::OFFA_A_E()
{
if ( A & E )
PSW &= ~Z;
else
PSW = PSW | Z | SK;
}
/* 60 de: 0110 0000 1101 1110 */
void upd7810_device::OFFA_A_H()
{
if ( A & H )
PSW &= ~Z;
else
PSW = PSW | Z | SK;
}
/* 60 df: 0110 0000 1101 1111 */
void upd7810_device::OFFA_A_L()
{
if ( A & L )
PSW &= ~Z;
else
PSW = PSW | Z | SK;
}
/* 60 e0: 0110 0000 1110 0000 */
void upd7810_device::SUB_A_V()
{
uint8_t tmp = A - V;
ZHC_SUB( tmp, A, 0 );
A = tmp;
}
/* 60 e1: 0110 0000 1110 0001 */
/* SUB_A_A already defined */
/* 60 e2: 0110 0000 1110 0010 */
void upd7810_device::SUB_A_B()
{
uint8_t tmp = A - B;
ZHC_SUB( tmp, A, 0 );
A = tmp;
}
/* 60 e3: 0110 0000 1110 0011 */
void upd7810_device::SUB_A_C()
{
uint8_t tmp = A - C;
ZHC_SUB( tmp, A, 0 );
A = tmp;
}
/* 60 e4: 0110 0000 1110 0100 */
void upd7810_device::SUB_A_D()
{
uint8_t tmp = A - D;
ZHC_SUB( tmp, A, 0 );
A = tmp;
}
/* 60 e5: 0110 0000 1110 0101 */
void upd7810_device::SUB_A_E()
{
uint8_t tmp = A - E;
ZHC_SUB( tmp, A, 0 );
A = tmp;
}
/* 60 e6: 0110 0000 1110 0110 */
void upd7810_device::SUB_A_H()
{
uint8_t tmp = A - H;
ZHC_SUB( tmp, A, 0 );
A = tmp;
}
/* 60 e7: 0110 0000 1110 0111 */
void upd7810_device::SUB_A_L()
{
uint8_t tmp = A - L;
ZHC_SUB( tmp, A, 0 );
A = tmp;
}
/* 60 e8: 0110 0000 1110 1000 */
void upd7810_device::NEA_A_V()
{
uint8_t tmp = A - V;
ZHC_SUB( tmp, A, 0 );
SKIP_NZ;
}
/* 60 e9: 0110 0000 1110 1001 */
/* NEA_A_A already defined */
/* 60 ea: 0110 0000 1110 1010 */
void upd7810_device::NEA_A_B()
{
uint8_t tmp = A - B;
ZHC_SUB( tmp, A, 0 );
SKIP_NZ;
}
/* 60 eb: 0110 0000 1110 1011 */
void upd7810_device::NEA_A_C()
{
uint8_t tmp = A - C;
ZHC_SUB( tmp, A, 0 );
SKIP_NZ;
}
/* 60 ec: 0110 0000 1110 1100 */
void upd7810_device::NEA_A_D()
{
uint8_t tmp = A - D;
ZHC_SUB( tmp, A, 0 );
SKIP_NZ;
}
/* 60 ed: 0110 0000 1110 1101 */
void upd7810_device::NEA_A_E()
{
uint8_t tmp = A - E;
ZHC_SUB( tmp, A, 0 );
SKIP_NZ;
}
/* 60 ee: 0110 0000 1110 1110 */
void upd7810_device::NEA_A_H()
{
uint8_t tmp = A - H;
ZHC_SUB( tmp, A, 0 );
SKIP_NZ;
}
/* 60 ef: 0110 0000 1110 1111 */
void upd7810_device::NEA_A_L()
{
uint8_t tmp = A - L;
ZHC_SUB( tmp, A, 0 );
SKIP_NZ;
}
/* 60 f0: 0110 0000 1111 0000 */
void upd7810_device::SBB_A_V()
{
uint8_t tmp = A - V - (PSW & CY);
ZHC_SUB( tmp, A, (PSW & CY) );
A = tmp;
}
/* 60 f1: 0110 0000 1111 0001 */
/* SBB_A_A already defined */
/* 60 f2: 0110 0000 1111 0010 */
void upd7810_device::SBB_A_B()
{
uint8_t tmp = A - B - (PSW & CY);
ZHC_SUB( tmp, A, (PSW & CY) );
A = tmp;
}
/* 60 f3: 0110 0000 1111 0011 */
void upd7810_device::SBB_A_C()
{
uint8_t tmp = A - C - (PSW & CY);
ZHC_SUB( tmp, A, (PSW & CY) );
A = tmp;
}
/* 60 f4: 0110 0000 1111 0100 */
void upd7810_device::SBB_A_D()
{
uint8_t tmp = A - D - (PSW & CY);
ZHC_SUB( tmp, A, (PSW & CY) );
A = tmp;
}
/* 60 f5: 0110 0000 1111 0101 */
void upd7810_device::SBB_A_E()
{
uint8_t tmp = A - E - (PSW & CY);
ZHC_SUB( tmp, A, (PSW & CY) );
A = tmp;
}
/* 60 f6: 0110 0000 1111 0110 */
void upd7810_device::SBB_A_H()
{
uint8_t tmp = A - H - (PSW & CY);
ZHC_SUB( tmp, A, (PSW & CY) );
A = tmp;
}
/* 60 f7: 0110 0000 1111 0111 */
void upd7810_device::SBB_A_L()
{
uint8_t tmp = A - L - (PSW & CY);
ZHC_SUB( tmp, A, (PSW & CY) );
A = tmp;
}
/* 60 f8: 0110 0000 1111 1000 */
void upd7810_device::EQA_A_V()
{
uint8_t tmp = A - V;
ZHC_SUB( tmp, A, 0 );
SKIP_Z;
}
/* 60 f9: 0110 0000 1111 1001 */
/* EQA_A_A already defined */
/* 60 fa: 0110 0000 1111 1010 */
void upd7810_device::EQA_A_B()
{
uint8_t tmp = A - B;
ZHC_SUB( tmp, A, 0 );
SKIP_Z;
}
/* 60 fb: 0110 0000 1111 1011 */
void upd7810_device::EQA_A_C()
{
uint8_t tmp = A - C;
ZHC_SUB( tmp, A, 0 );
SKIP_Z;
}
/* 60 fc: 0110 0000 1111 1100 */
void upd7810_device::EQA_A_D()
{
uint8_t tmp = A - D;
ZHC_SUB( tmp, A, 0 );
SKIP_Z;
}
/* 60 fd: 0110 0000 1111 1101 */
void upd7810_device::EQA_A_E()
{
uint8_t tmp = A - E;
ZHC_SUB( tmp, A, 0 );
SKIP_Z;
}
/* 60 fe: 0110 0000 1111 1110 */
void upd7810_device::EQA_A_H()
{
uint8_t tmp = A - H;
ZHC_SUB( tmp, A, 0 );
SKIP_Z;
}
/* 60 ff: 0110 0000 1111 1111 */
void upd7810_device::EQA_A_L()
{
uint8_t tmp = A - L;
ZHC_SUB( tmp, A, 0 );
SKIP_Z;
}
/* prefix 64 */
/* 64 00: 0110 0100 0000 0000 xxxx xxxx */
void upd7810_device::MVI_PA_xx()
{
uint8_t imm;
RDOPARG( imm );
WP( UPD7810_PORTA, imm );
}
/* 64 01: 0110 0100 0000 0001 xxxx xxxx */
void upd7810_device::MVI_PB_xx()
{
uint8_t imm;
RDOPARG( imm );
WP( UPD7810_PORTB, imm );
}
/* 64 02: 0110 0100 0000 0010 xxxx xxxx */
void upd7810_device::MVI_PC_xx()
{
uint8_t imm;
RDOPARG( imm );
WP( UPD7810_PORTC, imm );
}
/* 64 03: 0110 0100 0000 0011 xxxx xxxx */
void upd7810_device::MVI_PD_xx()
{
uint8_t imm;
RDOPARG( imm );
WP( UPD7810_PORTD, imm );
}
/* 64 05: 0110 0100 0000 0101 xxxx xxxx */
void upd7810_device::MVI_PF_xx()
{
uint8_t imm;
RDOPARG( imm );
WP( UPD7810_PORTF, imm );
}
/* 64 06: 0110 0100 0000 0110 xxxx xxxx */
void upd7810_device::MVI_MKH_xx()
{
RDOPARG( MKH );
}
/* 64 07: 0110 0100 0000 0111 xxxx xxxx */
void upd7810_device::MVI_MKL_xx()
{
RDOPARG( MKL );
}
/* 64 08: 0110 0100 0000 1000 xxxx xxxx */
void upd7810_device::ANI_PA_xx()
{
uint8_t pa = RP( UPD7810_PORTA), imm;
RDOPARG( imm );
pa &= imm;
WP( UPD7810_PORTA, pa );
SET_Z(pa);
}
/* 64 09: 0110 0100 0000 1001 xxxx xxxx */
void upd7810_device::ANI_PB_xx()
{
uint8_t pb = RP( UPD7810_PORTB), imm;
RDOPARG( imm );
pb &= imm;
WP( UPD7810_PORTB, pb );
SET_Z(pb);
}
/* 64 0a: 0110 0100 0000 1010 xxxx xxxx */
void upd7810_device::ANI_PC_xx()
{
uint8_t pc = RP( UPD7810_PORTC), imm;
RDOPARG( imm );
pc &= imm;
WP( UPD7810_PORTC, pc );
SET_Z(pc);
}
/* 64 0b: 0110 0100 0000 1011 xxxx xxxx */
void upd7810_device::ANI_PD_xx()
{
uint8_t pd = RP( UPD7810_PORTD ), imm;
RDOPARG( imm );
pd &= imm;
WP( UPD7810_PORTD, pd );
SET_Z(pd);
}
/* 64 0d: 0110 0100 0000 1101 xxxx xxxx */
void upd7810_device::ANI_PF_xx()
{
uint8_t pf = RP( UPD7810_PORTF ), imm;
RDOPARG( imm );
pf &= imm;
WP( UPD7810_PORTF, pf );
SET_Z(pf);
}
/* 64 0e: 0110 0100 0000 1110 xxxx xxxx */
void upd7810_device::ANI_MKH_xx()
{
uint8_t imm;
RDOPARG( imm );
MKH &= imm;
SET_Z(MKH);
}
/* 64 0f: 0110 0100 0000 1111 xxxx xxxx */
void upd7810_device::ANI_MKL_xx()
{
uint8_t imm;
RDOPARG( imm );
MKL &= imm;
SET_Z(MKL);
}
/* 64 10: 0110 0100 0001 0000 xxxx xxxx */
void upd7810_device::XRI_PA_xx()
{
uint8_t pa = RP( UPD7810_PORTA ), imm;
RDOPARG( imm );
pa ^= imm;
WP( UPD7810_PORTA, pa );
SET_Z(pa);
}
/* 64 11: 0110 0100 0001 0001 xxxx xxxx */
void upd7810_device::XRI_PB_xx()
{
uint8_t pb = RP( UPD7810_PORTB ), imm;
RDOPARG( imm );
pb ^= imm;
WP( UPD7810_PORTB, pb );
SET_Z(pb);
}
/* 64 12: 0110 0100 0001 0010 xxxx xxxx */
void upd7810_device::XRI_PC_xx()
{
uint8_t pc = RP( UPD7810_PORTC ), imm;
RDOPARG( imm );
pc ^= imm;
WP( UPD7810_PORTC, pc );
SET_Z(pc);
}
/* 64 13: 0110 0100 0001 0011 xxxx xxxx */
void upd7810_device::XRI_PD_xx()
{
uint8_t pd = RP( UPD7810_PORTD ), imm;
RDOPARG( imm );
pd ^= imm;
WP( UPD7810_PORTD, pd );
SET_Z(pd);
}
/* 64 15: 0110 0100 0001 0101 xxxx xxxx */
void upd7810_device::XRI_PF_xx()
{
uint8_t pf = RP( UPD7810_PORTF ), imm;
RDOPARG( imm );
pf ^= imm;
WP( UPD7810_PORTF, pf );
SET_Z(pf);
}
/* 64 16: 0110 0100 0001 0110 xxxx xxxx */
void upd7810_device::XRI_MKH_xx()
{
uint8_t imm;
RDOPARG( imm );
MKH ^= imm;
SET_Z(MKH);
}
/* 64 17: 0110 0100 0001 0111 xxxx xxxx */
void upd7810_device::XRI_MKL_xx()
{
uint8_t imm;
RDOPARG( imm );
MKL ^= imm;
SET_Z(MKL);
}
/* 64 18: 0110 0100 0001 1000 xxxx xxxx */
void upd7810_device::ORI_PA_xx()
{
uint8_t pa = RP( UPD7810_PORTA ), imm;
RDOPARG( imm );
pa |= imm;
WP( UPD7810_PORTA, pa );
SET_Z(pa);
}
/* 64 19: 0110 0100 0001 1001 xxxx xxxx */
void upd7810_device::ORI_PB_xx()
{
uint8_t pb = RP( UPD7810_PORTB ), imm;
RDOPARG( imm );
pb |= imm;
WP( UPD7810_PORTB, pb );
SET_Z(pb);
}
/* 64 1a: 0110 0100 0001 1010 xxxx xxxx */
void upd7810_device::ORI_PC_xx()
{
uint8_t pc = RP( UPD7810_PORTC ), imm;
RDOPARG( imm );
pc |= imm;
WP( UPD7810_PORTC, pc );
SET_Z(pc);
}
/* 64 1b: 0110 0100 0001 1011 xxxx xxxx */
void upd7810_device::ORI_PD_xx()
{
uint8_t pd = RP( UPD7810_PORTD ), imm;
RDOPARG( imm );
pd |= imm;
WP( UPD7810_PORTD, pd );
SET_Z(pd);
}
/* 64 1d: 0110 0100 0001 1101 xxxx xxxx */
void upd7810_device::ORI_PF_xx()
{
uint8_t pf = RP( UPD7810_PORTF ), imm;
RDOPARG( imm );
pf |= imm;
WP( UPD7810_PORTF, pf );
SET_Z(pf);
}
/* 64 1e: 0110 0100 0001 1110 xxxx xxxx */
void upd7810_device::ORI_MKH_xx()
{
uint8_t imm;
RDOPARG( imm );
MKH |= imm;
SET_Z(MKH);
}
/* 64 1f: 0110 0100 0001 1111 xxxx xxxx */
void upd7810_device::ORI_MKL_xx()
{
uint8_t imm;
RDOPARG( imm );
MKL |= imm;
SET_Z(MKL);
}
/* 64 20: 0110 0100 0010 0000 xxxx xxxx */
void upd7810_device::ADINC_PA_xx()
{
uint8_t pa = RP( UPD7810_PORTA );
uint8_t tmp, imm;
RDOPARG( imm );
tmp = pa + imm;
ZHC_ADD( tmp, pa, 0 );
WP( UPD7810_PORTA , tmp );
SKIP_NC;
}
/* 64 21: 0110 0100 0010 0001 xxxx xxxx */
void upd7810_device::ADINC_PB_xx()
{
uint8_t pb = RP( UPD7810_PORTB );
uint8_t tmp, imm;
RDOPARG( imm );
tmp = pb + imm;
ZHC_ADD( tmp, pb, 0 );
WP( UPD7810_PORTB, tmp );
SKIP_NC;
}
/* 64 22: 0110 0100 0010 0010 xxxx xxxx */
void upd7810_device::ADINC_PC_xx()
{
uint8_t pc = RP( UPD7810_PORTC );
uint8_t tmp, imm;
RDOPARG( imm );
tmp = pc + imm;
ZHC_ADD( tmp, pc, 0 );
WP( UPD7810_PORTC, tmp );
SKIP_NC;
}
/* 64 23: 0110 0100 0010 0011 xxxx xxxx */
void upd7810_device::ADINC_PD_xx()
{
uint8_t pd = RP( UPD7810_PORTD );
uint8_t tmp, imm;
RDOPARG( imm );
tmp = pd + imm;
ZHC_ADD( tmp, pd, 0 );
WP( UPD7810_PORTD, tmp );
SKIP_NC;
}
/* 64 25: 0110 0100 0010 0101 xxxx xxxx */
void upd7810_device::ADINC_PF_xx()
{
uint8_t pf = RP( UPD7810_PORTF );
uint8_t tmp, imm;
RDOPARG( imm );
tmp = pf + imm;
ZHC_ADD( tmp, pf, 0 );
WP( UPD7810_PORTF, tmp );
SKIP_NC;
}
/* 64 26: 0110 0100 0010 0110 xxxx xxxx */
void upd7810_device::ADINC_MKH_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = MKH + imm;
ZHC_ADD( tmp, MKH, 0 );
MKH = tmp;
SKIP_NC;
}
/* 64 27: 0110 0100 0010 0111 xxxx xxxx */
void upd7810_device::ADINC_MKL_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = MKL + imm;
ZHC_ADD( tmp, MKL, 0 );
MKL = tmp;
SKIP_NC;
}
/* 64 28: 0110 0100 0010 1000 xxxx xxxx */
void upd7810_device::GTI_PA_xx()
{
uint8_t pa = RP( UPD7810_PORTA ), imm;
uint16_t tmp;
RDOPARG( imm );
tmp = pa - imm - 1;
ZHC_SUB( tmp, pa, 0 );
SKIP_NC;
}
/* 64 29: 0110 0100 0010 1001 xxxx xxxx */
void upd7810_device::GTI_PB_xx()
{
uint8_t pb = RP( UPD7810_PORTB ), imm;
uint16_t tmp;
RDOPARG( imm );
tmp = pb - imm - 1;
ZHC_SUB( tmp, pb, 0 );
SKIP_NC;
}
/* 64 2a: 0110 0100 0010 1010 xxxx xxxx */
void upd7810_device::GTI_PC_xx()
{
uint8_t pc = RP( UPD7810_PORTC ), imm;
uint16_t tmp;
RDOPARG( imm );
tmp = pc - imm - 1;
ZHC_SUB( tmp, pc, 0 );
SKIP_NC;
}
/* 64 2b: 0110 0100 0010 1011 xxxx xxxx */
void upd7810_device::GTI_PD_xx()
{
uint8_t pd = RP( UPD7810_PORTD ), imm;
uint16_t tmp;
RDOPARG( imm );
tmp = pd - imm - 1;
ZHC_SUB( tmp, pd, 0 );
SKIP_NC;
}
/* 64 2d: 0110 0100 0010 1101 xxxx xxxx */
void upd7810_device::GTI_PF_xx()
{
uint8_t pf = RP( UPD7810_PORTF ), imm;
uint16_t tmp;
RDOPARG( imm );
tmp = pf - imm - 1;
ZHC_SUB( tmp, pf, 0 );
SKIP_NC;
}
/* 64 2e: 0110 0100 0010 1110 xxxx xxxx */
void upd7810_device::GTI_MKH_xx()
{
uint8_t imm;
uint16_t tmp;
RDOPARG( imm );
tmp = MKH - imm - 1;
ZHC_SUB( tmp, MKH, 0 );
SKIP_NC;
}
/* 64 2f: 0110 0100 0010 1111 xxxx xxxx */
void upd7810_device::GTI_MKL_xx()
{
uint8_t imm;
uint16_t tmp;
RDOPARG( imm );
tmp = MKL - imm - 1;
ZHC_SUB( tmp, MKL, 0 );
SKIP_NC;
}
/* 64 30: 0110 0100 0011 0000 xxxx xxxx */
void upd7810_device::SUINB_PA_xx()
{
uint8_t pa = RP( UPD7810_PORTA ), tmp, imm;
RDOPARG( imm );
tmp = pa - imm;
ZHC_SUB( tmp, pa, 0 );
pa = tmp;
WP( UPD7810_PORTA, pa );
SKIP_NC;
}
/* 64 31: 0110 0100 0011 0001 xxxx xxxx */
void upd7810_device::SUINB_PB_xx()
{
uint8_t pb = RP( UPD7810_PORTB ), tmp, imm;
RDOPARG( imm );
tmp = pb - imm;
ZHC_SUB( tmp, pb, 0 );
pb = tmp;
WP( UPD7810_PORTB, pb );
SKIP_NC;
}
/* 64 32: 0110 0100 0011 0010 xxxx xxxx */
void upd7810_device::SUINB_PC_xx()
{
uint8_t pc = RP( UPD7810_PORTC ), tmp, imm;
RDOPARG( imm );
tmp = pc - imm;
ZHC_SUB( tmp, pc, 0 );
pc = tmp;
WP( UPD7810_PORTC, pc );
SKIP_NC;
}
/* 64 33: 0110 0100 0011 0011 xxxx xxxx */
void upd7810_device::SUINB_PD_xx()
{
uint8_t pd = RP( UPD7810_PORTD ), tmp, imm;
RDOPARG( imm );
tmp = pd - imm;
ZHC_SUB( tmp, pd, 0 );
pd = tmp;
WP( UPD7810_PORTD, pd );
SKIP_NC;
}
/* 64 35: 0110 0100 0011 0101 xxxx xxxx */
void upd7810_device::SUINB_PF_xx()
{
uint8_t pf = RP( UPD7810_PORTF ), tmp, imm;
RDOPARG( imm );
tmp = pf - imm;
ZHC_SUB( tmp, pf, 0 );
pf = tmp;
WP( UPD7810_PORTF, pf );
SKIP_NC;
}
/* 64 36: 0110 0100 0011 0110 xxxx xxxx */
void upd7810_device::SUINB_MKH_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = MKH - imm;
ZHC_SUB( tmp, MKH, 0 );
MKH = tmp;
SKIP_NC;
}
/* 64 37: 0110 0100 0011 0111 xxxx xxxx */
void upd7810_device::SUINB_MKL_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = MKL - imm;
ZHC_SUB( tmp, MKL, 0 );
MKL = tmp;
SKIP_NC;
}
/* 64 38: 0110 0100 0011 1000 xxxx xxxx */
void upd7810_device::LTI_PA_xx()
{
uint8_t pa = RP( UPD7810_PORTA ), tmp, imm;
RDOPARG( imm );
tmp = pa - imm;
ZHC_SUB( tmp, pa, 0 );
SKIP_CY;
}
/* 64 39: 0110 0100 0011 1001 xxxx xxxx */
void upd7810_device::LTI_PB_xx()
{
uint8_t pb = RP( UPD7810_PORTB ), tmp, imm;
RDOPARG( imm );
tmp = pb - imm;
ZHC_SUB( tmp, pb, 0 );
SKIP_CY;
}
/* 64 3a: 0110 0100 0011 1010 xxxx xxxx */
void upd7810_device::LTI_PC_xx()
{
uint8_t pc = RP( UPD7810_PORTC ), tmp, imm;
RDOPARG( imm );
tmp = pc - imm;
ZHC_SUB( tmp, pc, 0 );
SKIP_CY;
}
/* 64 3b: 0110 0100 0011 1011 xxxx xxxx */
void upd7810_device::LTI_PD_xx()
{
uint8_t pd = RP( UPD7810_PORTD ), tmp, imm;
RDOPARG( imm );
tmp = pd - imm;
ZHC_SUB( tmp, pd, 0 );
SKIP_CY;
}
/* 64 3d: 0110 0100 0011 1101 xxxx xxxx */
void upd7810_device::LTI_PF_xx()
{
uint8_t pf = RP( UPD7810_PORTF ), tmp, imm;
RDOPARG( imm );
tmp = pf - imm;
ZHC_SUB( tmp, pf, 0 );
SKIP_CY;
}
/* 64 3e: 0110 0100 0011 1110 xxxx xxxx */
void upd7810_device::LTI_MKH_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = MKH - imm;
ZHC_SUB( tmp, MKH, 0 );
SKIP_CY;
}
/* 64 3f: 0110 0100 0011 1111 xxxx xxxx */
void upd7810_device::LTI_MKL_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = MKL - imm;
ZHC_SUB( tmp, MKL, 0 );
SKIP_CY;
}
/* 64 40: 0110 0100 0100 0000 xxxx xxxx */
void upd7810_device::ADI_PA_xx()
{
uint8_t pa = RP( UPD7810_PORTA ), tmp, imm;
RDOPARG( imm );
tmp = pa + imm;
ZHC_ADD( tmp, pa, 0 );
pa = tmp;
WP( UPD7810_PORTA, pa );
}
/* 64 41: 0110 0100 0100 0001 xxxx xxxx */
void upd7810_device::ADI_PB_xx()
{
uint8_t pb = RP( UPD7810_PORTB ), tmp, imm;
RDOPARG( imm );
tmp = pb + imm;
ZHC_ADD( tmp, pb, 0 );
pb = tmp;
WP( UPD7810_PORTB, pb );
}
/* 64 42: 0110 0100 0100 0010 xxxx xxxx */
void upd7810_device::ADI_PC_xx()
{
uint8_t pc = RP( UPD7810_PORTC ), tmp, imm;
RDOPARG( imm );
tmp = pc + imm;
ZHC_ADD( tmp, pc, 0 );
pc = tmp;
WP( UPD7810_PORTC, pc );
}
/* 64 43: 0110 0100 0100 0011 xxxx xxxx */
void upd7810_device::ADI_PD_xx()
{
uint8_t pd = RP( UPD7810_PORTD ), tmp, imm;
RDOPARG( imm );
tmp = pd + imm;
ZHC_ADD( tmp, pd, 0 );
pd = tmp;
WP( UPD7810_PORTD, pd );
}
/* 64 45: 0110 0100 0100 0101 xxxx xxxx */
void upd7810_device::ADI_PF_xx()
{
uint8_t pf = RP( UPD7810_PORTF ), tmp, imm;
RDOPARG( imm );
tmp = pf + imm;
ZHC_ADD( tmp, pf, 0 );
pf = tmp;
WP( UPD7810_PORTF, pf );
}
/* 64 46: 0110 0100 0100 0110 xxxx xxxx */
void upd7810_device::ADI_MKH_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = MKH + imm;
ZHC_ADD( tmp, MKH, 0 );
MKH = tmp;
}
/* 64 47: 0110 0100 0100 0111 xxxx xxxx */
void upd7810_device::ADI_MKL_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = MKL + imm;
ZHC_ADD( tmp, MKL, 0 );
MKL = tmp;
}
/* 64 48: 0110 0100 0100 1000 xxxx xxxx */
void upd7810_device::ONI_PA_xx()
{
uint8_t pa = RP( UPD7810_PORTA ), imm;
RDOPARG( imm );
if (pa & imm)
PSW |= SK;
}
/* 64 49: 0110 0100 0100 1001 xxxx xxxx */
void upd7810_device::ONI_PB_xx()
{
uint8_t pb = RP( UPD7810_PORTB ), imm;
RDOPARG( imm );
if (pb & imm)
PSW |= SK;
}
/* 64 4a: 0110 0100 0100 1010 xxxx xxxx */
void upd7810_device::ONI_PC_xx()
{
uint8_t pc = RP( UPD7810_PORTC ), imm;
RDOPARG( imm );
if (pc & imm)
PSW |= SK;
}
/* 64 4b: 0110 0100 0100 1011 xxxx xxxx */
void upd7810_device::ONI_PD_xx()
{
uint8_t pd = RP( UPD7810_PORTD ), imm;
RDOPARG( imm );
if (pd & imm)
PSW |= SK;
}
/* 64 4d: 0110 0100 0100 1101 xxxx xxxx */
void upd7810_device::ONI_PF_xx()
{
uint8_t pf = RP( UPD7810_PORTF ), imm;
RDOPARG( imm );
if (pf & imm)
PSW |= SK;
}
/* 64 4e: 0110 0100 0100 1110 xxxx xxxx */
void upd7810_device::ONI_MKH_xx()
{
uint8_t imm;
RDOPARG( imm );
if (MKH & imm)
PSW |= SK;
}
/* 64 4f: 0110 0100 0100 1111 xxxx xxxx */
void upd7810_device::ONI_MKL_xx()
{
uint8_t imm;
RDOPARG( imm );
if (MKL & imm)
PSW |= SK;
}
/* 64 50: 0110 0100 0101 0000 xxxx xxxx */
void upd7810_device::ACI_PA_xx()
{
uint8_t pa = RP( UPD7810_PORTA ), tmp, imm;
RDOPARG( imm );
tmp = pa + imm + (PSW & CY);
ZHC_ADD( tmp, pa, (PSW & CY) );
pa = tmp;
WP( UPD7810_PORTA, pa );
}
/* 64 51: 0110 0100 0101 0001 xxxx xxxx */
void upd7810_device::ACI_PB_xx()
{
uint8_t pb = RP( UPD7810_PORTB ), tmp, imm;
RDOPARG( imm );
tmp = pb + imm + (PSW & CY);
ZHC_ADD( tmp, pb, (PSW & CY) );
pb = tmp;
WP( UPD7810_PORTB, pb );
}
/* 64 52: 0110 0100 0101 0010 xxxx xxxx */
void upd7810_device::ACI_PC_xx()
{
uint8_t pc = RP( UPD7810_PORTC ), tmp, imm;
RDOPARG( imm );
tmp = pc + imm + (PSW & CY);
ZHC_ADD( tmp, pc, (PSW & CY) );
pc = tmp;
WP( UPD7810_PORTC, pc );
}
/* 64 53: 0110 0100 0101 0011 xxxx xxxx */
void upd7810_device::ACI_PD_xx()
{
uint8_t pd = RP( UPD7810_PORTD ), tmp, imm;
RDOPARG( imm );
tmp = pd + imm + (PSW & CY);
ZHC_ADD( tmp, pd, (PSW & CY) );
pd = tmp;
WP( UPD7810_PORTD, pd );
}
/* 64 55: 0110 0100 0101 0101 xxxx xxxx */
void upd7810_device::ACI_PF_xx()
{
uint8_t pf = RP( UPD7810_PORTF ), tmp, imm;
RDOPARG( imm );
tmp = pf + imm + (PSW & CY);
ZHC_ADD( tmp, pf, (PSW & CY) );
pf = tmp;
WP( UPD7810_PORTF, pf );
}
/* 64 56: 0110 0100 0101 0110 xxxx xxxx */
void upd7810_device::ACI_MKH_xx()
{
uint8_t imm, tmp;
RDOPARG( imm );
tmp = MKH + imm + (PSW & CY);
ZHC_ADD( tmp, MKH, (PSW & CY) );
MKH = tmp;
}
/* 64 57: 0110 0100 0101 0111 xxxx xxxx */
void upd7810_device::ACI_MKL_xx()
{
uint8_t imm, tmp;
RDOPARG( imm );
tmp = MKL + imm + (PSW & CY);
ZHC_ADD( tmp, MKL, (PSW & CY) );
MKL = tmp;
}
/* 64 58: 0110 0100 0101 1000 xxxx xxxx */
void upd7810_device::OFFI_PA_xx()
{
uint8_t pa = RP( UPD7810_PORTA ), imm;
RDOPARG( imm );
if (0 == (pa & imm))
PSW |= SK;
}
/* 64 59: 0110 0100 0101 1001 xxxx xxxx */
void upd7810_device::OFFI_PB_xx()
{
uint8_t pb = RP( UPD7810_PORTB ), imm;
RDOPARG( imm );
if (0 == (pb & imm))
PSW |= SK;
}
/* 64 5a: 0110 0100 0101 1010 xxxx xxxx */
void upd7810_device::OFFI_PC_xx()
{
uint8_t pc = RP( UPD7810_PORTC ), imm;
RDOPARG( imm );
if (0 == (pc & imm))
PSW |= SK;
}
/* 64 5b: 0110 0100 0101 1011 xxxx xxxx */
void upd7810_device::OFFI_PD_xx()
{
uint8_t pd = RP( UPD7810_PORTD ), imm;
RDOPARG( imm );
if (0 == (pd & imm))
PSW |= SK;
}
/* 64 5d: 0110 0100 0101 1101 xxxx xxxx */
void upd7810_device::OFFI_PF_xx()
{
uint8_t pf = RP( UPD7810_PORTF ), imm;
RDOPARG( imm );
if (0 == (pf & imm))
PSW |= SK;
}
/* 64 5e: 0110 0100 0101 1110 xxxx xxxx */
void upd7810_device::OFFI_MKH_xx()
{
uint8_t imm;
RDOPARG( imm );
if (0 == (MKH & imm))
PSW |= SK;
}
/* 64 5f: 0110 0100 0101 1111 xxxx xxxx */
void upd7810_device::OFFI_MKL_xx()
{
uint8_t imm;
RDOPARG( imm );
if (0 == (MKL & imm))
PSW |= SK;
}
/* 64 60: 0110 0100 0110 0000 xxxx xxxx */
void upd7810_device::SUI_PA_xx()
{
uint8_t pa = RP( UPD7810_PORTA ), tmp, imm;
RDOPARG( imm );
tmp = pa - imm;
ZHC_SUB( tmp, pa, 0 );
pa = tmp;
WP( UPD7810_PORTA, pa );
}
/* 64 61: 0110 0100 0110 0001 xxxx xxxx */
void upd7810_device::SUI_PB_xx()
{
uint8_t pb = RP( UPD7810_PORTB ), tmp, imm;
RDOPARG( imm );
tmp = pb - imm;
ZHC_SUB( tmp, pb, 0 );
pb = tmp;
WP( UPD7810_PORTB, pb );
}
/* 64 62: 0110 0100 0110 0010 xxxx xxxx */
void upd7810_device::SUI_PC_xx()
{
uint8_t pc = RP( UPD7810_PORTC ), tmp, imm;
RDOPARG( imm );
tmp = pc - imm;
ZHC_SUB( tmp, pc, 0 );
pc = tmp;
WP( UPD7810_PORTC, pc );
}
/* 64 63: 0110 0100 0110 0011 xxxx xxxx */
void upd7810_device::SUI_PD_xx()
{
uint8_t pd = RP( UPD7810_PORTD ), tmp, imm;
RDOPARG( imm );
tmp = pd - imm;
ZHC_SUB( tmp, pd, 0 );
pd = tmp;
WP( UPD7810_PORTD, pd );
}
/* 64 65: 0110 0100 0110 0101 xxxx xxxx */
void upd7810_device::SUI_PF_xx()
{
uint8_t pf = RP( UPD7810_PORTF ), tmp, imm;
RDOPARG( imm );
tmp = pf - imm;
ZHC_SUB( tmp, pf, 0 );
pf = tmp;
WP( UPD7810_PORTF, pf );
}
/* 64 66: 0110 0100 0110 0110 xxxx xxxx */
void upd7810_device::SUI_MKH_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = MKH - imm;
ZHC_SUB( tmp, MKH, 0 );
MKH = tmp;
}
/* 64 67: 0110 0100 0110 0111 xxxx xxxx */
void upd7810_device::SUI_MKL_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = MKL - imm;
ZHC_SUB( tmp, MKL, 0 );
MKL = tmp;
}
/* 64 68: 0110 0100 0110 1000 xxxx xxxx */
void upd7810_device::NEI_PA_xx()
{
uint8_t pa = RP( UPD7810_PORTA ), tmp, imm;
RDOPARG( imm );
tmp = pa - imm;
ZHC_SUB( tmp, pa, 0 );
SKIP_NZ;
}
/* 64 69: 0110 0100 0110 1001 xxxx xxxx */
void upd7810_device::NEI_PB_xx()
{
uint8_t pb = RP( UPD7810_PORTB ), tmp, imm;
RDOPARG( imm );
tmp = pb - imm;
ZHC_SUB( tmp, pb, 0 );
SKIP_NZ;
}
/* 64 6a: 0110 0100 0110 1010 xxxx xxxx */
void upd7810_device::NEI_PC_xx()
{
uint8_t pc = RP( UPD7810_PORTC ), tmp, imm;
RDOPARG( imm );
tmp = pc - imm;
ZHC_SUB( tmp, pc, 0 );
SKIP_NZ;
}
/* 64 6b: 0110 0100 0110 1011 xxxx xxxx */
void upd7810_device::NEI_PD_xx()
{
uint8_t pd = RP( UPD7810_PORTD ), tmp, imm;
RDOPARG( imm );
tmp = pd - imm;
ZHC_SUB( tmp, pd, 0 );
SKIP_NZ;
}
/* 64 6d: 0110 0100 0110 1101 xxxx xxxx */
void upd7810_device::NEI_PF_xx()
{
uint8_t pf = RP( UPD7810_PORTF ), tmp, imm;
RDOPARG( imm );
tmp = pf - imm;
ZHC_SUB( tmp, pf, 0 );
SKIP_NZ;
}
/* 64 6e: 0110 0100 0110 1110 xxxx xxxx */
void upd7810_device::NEI_MKH_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = MKH - imm;
ZHC_SUB( tmp, MKH, 0 );
SKIP_NZ;
}
/* 64 6f: 0110 0100 0110 1111 xxxx xxxx */
void upd7810_device::NEI_MKL_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = MKL - imm;
ZHC_SUB( tmp, MKL, 0 );
SKIP_NZ;
}
/* 64 70: 0110 0100 0111 0000 xxxx xxxx */
void upd7810_device::SBI_PA_xx()
{
uint8_t pa = RP( UPD7810_PORTA ), tmp, imm;
RDOPARG( imm );
tmp = pa - imm - (PSW & CY);
ZHC_SUB( tmp, pa, (PSW & CY) );
pa = tmp;
WP( UPD7810_PORTA, pa );
}
/* 64 71: 0110 0100 0111 0001 xxxx xxxx */
void upd7810_device::SBI_PB_xx()
{
uint8_t pb = RP( UPD7810_PORTB ), tmp, imm;
RDOPARG( imm );
tmp = pb - imm - (PSW & CY);
ZHC_SUB( tmp, pb, (PSW & CY) );
pb = tmp;
WP( UPD7810_PORTB, pb );
}
/* 64 72: 0110 0100 0111 0010 xxxx xxxx */
void upd7810_device::SBI_PC_xx()
{
uint8_t pc = RP( UPD7810_PORTC ), tmp, imm;
RDOPARG( imm );
tmp = pc - imm - (PSW & CY);
ZHC_SUB( tmp, pc, (PSW & CY) );
pc = tmp;
WP( UPD7810_PORTC, pc );
}
/* 64 73: 0110 0100 0111 0011 xxxx xxxx */
void upd7810_device::SBI_PD_xx()
{
uint8_t pd = RP( UPD7810_PORTD ), tmp, imm;
RDOPARG( imm );
tmp = pd - imm - (PSW & CY);
ZHC_SUB( tmp, pd, (PSW & CY) );
pd = tmp;
WP( UPD7810_PORTD, pd );
}
/* 64 75: 0110 0100 0111 0101 xxxx xxxx */
void upd7810_device::SBI_PF_xx()
{
uint8_t pf = RP( UPD7810_PORTF ), tmp, imm;
RDOPARG( imm );
tmp = pf - imm - (PSW & CY);
ZHC_SUB( tmp, pf, (PSW & CY) );
pf = tmp;
WP( UPD7810_PORTF, pf );
}
/* 64 76: 0110 0100 0111 0110 xxxx xxxx */
void upd7810_device::SBI_MKH_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = MKH - imm - (PSW & CY);
ZHC_SUB( tmp, MKH, (PSW & CY) );
MKH = tmp;
}
/* 64 77: 0110 0100 0111 0111 xxxx xxxx */
void upd7810_device::SBI_MKL_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = MKL - imm - (PSW & CY);
ZHC_SUB( tmp, MKL, (PSW & CY) );
MKL = tmp;
}
/* 64 78: 0110 0100 0111 1000 xxxx xxxx */
void upd7810_device::EQI_PA_xx()
{
uint8_t pa = RP( UPD7810_PORTA ), tmp, imm;
RDOPARG( imm );
tmp = pa - imm;
ZHC_SUB( tmp, pa, 0 );
SKIP_Z;
}
/* 64 79: 0110 0100 0111 1001 xxxx xxxx */
void upd7810_device::EQI_PB_xx()
{
uint8_t pb = RP( UPD7810_PORTB ), tmp, imm;
RDOPARG( imm );
tmp = pb - imm;
ZHC_SUB( tmp, pb, 0 );
SKIP_Z;
}
/* 64 7a: 0110 0100 0111 1010 xxxx xxxx */
void upd7810_device::EQI_PC_xx()
{
uint8_t pc = RP( UPD7810_PORTC ), tmp, imm;
RDOPARG( imm );
tmp = pc - imm;
ZHC_SUB( tmp, pc, 0 );
SKIP_Z;
}
/* 64 7b: 0110 0100 0111 1011 xxxx xxxx */
void upd7810_device::EQI_PD_xx()
{
uint8_t pd = RP( UPD7810_PORTD ), tmp, imm;
RDOPARG( imm );
tmp = pd - imm;
ZHC_SUB( tmp, pd, 0 );
SKIP_Z;
}
/* 64 7d: 0110 0100 0111 1101 xxxx xxxx */
void upd7810_device::EQI_PF_xx()
{
uint8_t pf = RP( UPD7810_PORTF ), tmp, imm;
RDOPARG( imm );
tmp = pf - imm;
ZHC_SUB( tmp, pf, 0 );
SKIP_Z;
}
/* 64 7e: 0110 0100 0111 1110 xxxx xxxx */
void upd7810_device::EQI_MKH_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = MKH - imm;
ZHC_SUB( tmp, MKH, 0 );
SKIP_Z;
}
/* 64 7f: 0110 0100 0111 1111 xxxx xxxx */
void upd7810_device::EQI_MKL_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = MKL - imm;
ZHC_SUB( tmp, MKL, 0 );
SKIP_Z;
}
/* 64 80: 0110 0100 1000 0000 xxxx xxxx */
void upd7810_device::MVI_ANM_xx()
{
RDOPARG( ANM );
}
/* 64 81: 0110 0100 1000 0001 xxxx xxxx */
void upd7810_device::MVI_SMH_xx()
{
RDOPARG( SMH );
}
/* 64 83: 0110 0100 1000 0011 xxxx xxxx */
void upd7810_device::MVI_EOM_xx()
{
RDOPARG( EOM );
upd7810_write_EOM();
}
/* 64 85: 0110 0100 1000 0101 xxxx xxxx */
void upd7810_device::MVI_TMM_xx()
{
RDOPARG( TMM );
}
/* 64 88: 0110 0100 1000 1000 xxxx xxxx */
void upd7810_device::ANI_ANM_xx()
{
uint8_t imm;
RDOPARG( imm );
ANM &= imm;
SET_Z(ANM);
}
/* 64 89: 0110 0100 1000 1001 xxxx xxxx */
void upd7810_device::ANI_SMH_xx()
{
uint8_t imm;
RDOPARG( imm );
SMH &= imm;
SET_Z(SMH);
}
/* 64 8b: 0110 0100 1000 1011 xxxx xxxx */
void upd7810_device::ANI_EOM_xx()
{
/* only bits #1 and #5 can be read */
uint8_t eom = EOM & 0x22;
uint8_t imm;
RDOPARG( imm );
/* only bits #1 and #5 can be read */
EOM = eom & imm;
SET_Z(EOM);
upd7810_write_EOM();
}
/* 64 8d: 0110 0100 1000 1101 xxxx xxxx */
void upd7810_device::ANI_TMM_xx()
{
uint8_t imm;
RDOPARG( imm );
TMM &= imm;
SET_Z(TMM);
}
/* 64 90: 0110 0100 1001 0000 xxxx xxxx */
void upd7810_device::XRI_ANM_xx()
{
uint8_t imm;
RDOPARG( imm );
ANM ^= imm;
SET_Z(ANM);
}
/* 64 91: 0110 0100 1001 0001 xxxx xxxx */
void upd7810_device::XRI_SMH_xx()
{
uint8_t imm;
RDOPARG( imm );
SMH ^= imm;
SET_Z(SMH);
}
/* 64 93: 0110 0100 1001 0011 xxxx xxxx */
void upd7810_device::XRI_EOM_xx()
{
/* only bits #1 and #5 can be read */
uint8_t eom = EOM & 0x22;
uint8_t imm;
RDOPARG( imm );
/* only bits #1 and #5 can be read */
EOM = eom ^ imm;
SET_Z(EOM);
upd7810_write_EOM();
}
/* 64 95: 0110 0100 1001 0101 xxxx xxxx */
void upd7810_device::XRI_TMM_xx()
{
uint8_t imm;
RDOPARG( imm );
TMM ^= imm;
SET_Z(TMM);
}
/* 64 98: 0110 0100 1001 1000 xxxx xxxx */
void upd7810_device::ORI_ANM_xx()
{
uint8_t imm;
RDOPARG( imm );
ANM |= imm;
SET_Z(ANM);
}
/* 64 99: 0110 0100 1001 1001 xxxx xxxx */
void upd7810_device::ORI_SMH_xx()
{
uint8_t imm;
RDOPARG( imm );
SMH |= imm;
SET_Z(SMH);
}
/* 64 9b: 0110 0100 1001 1011 xxxx xxxx */
void upd7810_device::ORI_EOM_xx()
{
/* only bits #1 and #5 can be read */
uint8_t eom = EOM & 0x22;
uint8_t imm;
RDOPARG( imm );
/* only bits #1 and #5 can be read */
EOM = eom | imm;
SET_Z(EOM);
upd7810_write_EOM();
}
/* 64 9d: 0110 0100 1001 1101 xxxx xxxx */
void upd7810_device::ORI_TMM_xx()
{
uint8_t imm;
RDOPARG( imm );
TMM |= imm;
SET_Z(TMM);
}
/* 64 a0: 0110 0100 1010 0000 xxxx xxxx */
void upd7810_device::ADINC_ANM_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = ANM + imm;
ZHC_ADD( tmp, ANM, 0 );
ANM = tmp;
SKIP_NC;
}
/* 64 a1: 0110 0100 1010 0001 xxxx xxxx */
void upd7810_device::ADINC_SMH_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = SMH + imm;
ZHC_ADD( tmp, SMH, 0 );
SMH = tmp;
SKIP_NC;
}
/* 64 a3: 0110 0100 1010 0011 xxxx xxxx */
void upd7810_device::ADINC_EOM_xx()
{
/* only bits #1 and #5 can be read */
uint8_t eom = EOM & 0x22;
uint8_t tmp, imm;
RDOPARG( imm );
/* only bits #1 and #5 can be read */
tmp = eom + imm;
ZHC_ADD( tmp, eom, 0 );
EOM = tmp;
SKIP_NC;
upd7810_write_EOM();
}
/* 64 a5: 0110 0100 1010 0101 xxxx xxxx */
void upd7810_device::ADINC_TMM_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = TMM + imm;
ZHC_ADD( tmp, TMM, 0 );
TMM = tmp;
SKIP_NC;
}
/* 64 a8: 0110 0100 1010 1000 xxxx xxxx */
void upd7810_device::GTI_ANM_xx()
{
uint8_t imm;
uint16_t tmp;
RDOPARG( imm );
tmp = ANM - imm - 1;
ZHC_SUB( tmp, ANM, 0 );
SKIP_NC;
}
/* 64 a9: 0110 0100 1010 1001 xxxx xxxx */
void upd7810_device::GTI_SMH_xx()
{
uint8_t imm;
uint16_t tmp;
RDOPARG( imm );
tmp = SMH - imm - 1;
ZHC_SUB( tmp, SMH, 0 );
SKIP_NC;
}
/* 64 ab: 0110 0100 1010 1011 xxxx xxxx */
void upd7810_device::GTI_EOM_xx()
{
/* only bits #1 and #5 can be read */
uint8_t eom = EOM & 0x22;
uint8_t imm;
uint16_t tmp;
RDOPARG( imm );
tmp = eom - imm - 1;
ZHC_SUB( tmp, eom, 0 );
SKIP_NC;
}
/* 64 ad: 0110 0100 1010 1101 xxxx xxxx */
void upd7810_device::GTI_TMM_xx()
{
uint8_t imm;
uint16_t tmp;
RDOPARG( imm );
tmp = TMM - imm - 1;
ZHC_SUB( tmp, TMM, 0 );
SKIP_NC;
}
/* 64 b0: 0110 0100 1011 0000 xxxx xxxx */
void upd7810_device::SUINB_ANM_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = ANM - imm;
ZHC_SUB( tmp, ANM, 0 );
ANM = tmp;
SKIP_NC;
}
/* 64 b1: 0110 0100 1011 0001 xxxx xxxx */
void upd7810_device::SUINB_SMH_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = SMH - imm;
ZHC_SUB( tmp, SMH, 0 );
SMH = tmp;
SKIP_NC;
}
/* 64 b3: 0110 0100 1011 0011 xxxx xxxx */
void upd7810_device::SUINB_EOM_xx()
{
/* only bits #1 and #5 can be read */
uint8_t eom = EOM & 0x22;
uint8_t tmp, imm;
RDOPARG( imm );
tmp = eom - imm;
ZHC_SUB( tmp, eom, 0 );
EOM = tmp;
SKIP_NC;
upd7810_write_EOM();
}
/* 64 b5: 0110 0100 1011 0101 xxxx xxxx */
void upd7810_device::SUINB_TMM_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = TMM - imm;
ZHC_SUB( tmp, TMM, 0 );
TMM = tmp;
SKIP_NC;
}
/* 64 b8: 0110 0100 1011 1000 xxxx xxxx */
void upd7810_device::LTI_ANM_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = ANM - imm;
ZHC_SUB( tmp, ANM, 0 );
SKIP_CY;
}
/* 64 b9: 0110 0100 1011 1001 xxxx xxxx */
void upd7810_device::LTI_SMH_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = SMH - imm;
ZHC_SUB( tmp, SMH, 0 );
SKIP_CY;
}
/* 64 bb: 0110 0100 1011 1011 xxxx xxxx */
void upd7810_device::LTI_EOM_xx()
{
/* only bits #1 and #5 can be read */
uint8_t eom = EOM & 0x22;
uint8_t tmp, imm;
RDOPARG( imm );
tmp = eom - imm;
ZHC_SUB( tmp, eom, 0 );
SKIP_CY;
}
/* 64 bd: 0110 0100 1011 1101 xxxx xxxx */
void upd7810_device::LTI_TMM_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = TMM - imm;
ZHC_SUB( tmp, TMM, 0 );
SKIP_CY;
}
/* 64 c0: 0110 0100 1100 0000 xxxx xxxx */
void upd7810_device::ADI_ANM_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = ANM + imm;
ZHC_ADD( tmp, ANM, 0 );
ANM = tmp;
}
/* 64 c1: 0110 0100 1100 0001 xxxx xxxx */
void upd7810_device::ADI_SMH_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = SMH + imm;
ZHC_ADD( tmp, SMH, 0 );
SMH = tmp;
}
/* 64 c3: 0110 0100 1100 0011 xxxx xxxx */
void upd7810_device::ADI_EOM_xx()
{
/* only bits #1 and #5 can be read */
uint8_t eom = EOM & 0x22;
uint8_t tmp, imm;
RDOPARG( imm );
tmp = eom + imm;
ZHC_ADD( tmp, eom, 0 );
EOM = tmp;
upd7810_write_EOM();
}
/* 64 c5: 0110 0100 1100 0101 xxxx xxxx */
void upd7810_device::ADI_TMM_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = TMM + imm;
ZHC_ADD( tmp, TMM, 0 );
TMM = tmp;
}
/* 64 c8: 0110 0100 1100 1000 xxxx xxxx */
void upd7810_device::ONI_ANM_xx()
{
uint8_t imm;
RDOPARG( imm );
if (ANM & imm)
PSW |= SK;
}
/* 64 c9: 0110 0100 1100 1001 xxxx xxxx */
void upd7810_device::ONI_SMH_xx()
{
uint8_t imm;
RDOPARG( imm );
if (SMH & imm)
PSW |= SK;
}
/* 64 cb: 0110 0100 1100 1011 xxxx xxxx */
void upd7810_device::ONI_EOM_xx()
{
/* only bits #1 and #5 can be read */
uint8_t eom = EOM & 0x22;
uint8_t imm;
RDOPARG( imm );
if (eom & imm)
PSW |= SK;
}
/* 64 cd: 0110 0100 1100 1101 xxxx xxxx */
void upd7810_device::ONI_TMM_xx()
{
uint8_t imm;
RDOPARG( imm );
if (TMM & imm)
PSW |= SK;
}
/* 64 d0: 0110 0100 1101 0000 xxxx xxxx */
void upd7810_device::ACI_ANM_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = ANM + imm + (PSW & CY);
ZHC_ADD( tmp, ANM, (PSW & CY) );
ANM = tmp;
}
/* 64 d1: 0110 0100 1101 0001 xxxx xxxx */
void upd7810_device::ACI_SMH_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = SMH + imm + (PSW & CY);
ZHC_ADD( tmp, SMH, (PSW & CY) );
SMH = tmp;
}
/* 64 d3: 0110 0100 1101 0011 xxxx xxxx */
void upd7810_device::ACI_EOM_xx()
{
/* only bits #1 and #5 can be read */
uint8_t eom = EOM & 0x22;
uint8_t tmp, imm;
RDOPARG( imm );
tmp = eom + imm + (PSW & CY);
ZHC_ADD( tmp, eom, (PSW & CY) );
EOM = tmp;
upd7810_write_EOM();
}
/* 64 d5: 0110 0100 1101 0101 xxxx xxxx */
void upd7810_device::ACI_TMM_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = TMM + imm + (PSW & CY);
ZHC_ADD( tmp, TMM, (PSW & CY) );
TMM = tmp;
}
/* 64 d8: 0110 0100 1101 1000 xxxx xxxx */
void upd7810_device::OFFI_ANM_xx()
{
uint8_t imm;
RDOPARG( imm );
if (0 == (ANM & imm))
PSW |= SK;
}
/* 64 d9: 0110 0100 1101 1001 xxxx xxxx */
void upd7810_device::OFFI_SMH_xx()
{
uint8_t imm;
RDOPARG( imm );
if (0 == (SMH & imm))
PSW |= SK;
}
/* 64 db: 0110 0100 1101 1011 xxxx xxxx */
void upd7810_device::OFFI_EOM_xx()
{
/* only bits #1 and #5 can be read */
uint8_t eom = EOM & 0x22;
uint8_t imm;
RDOPARG( imm );
if (0 == (eom & imm))
PSW |= SK;
}
/* 64 dd: 0110 0100 1101 1101 xxxx xxxx */
void upd7810_device::OFFI_TMM_xx()
{
uint8_t imm;
RDOPARG( imm );
if (0 == (TMM & imm))
PSW |= SK;
}
/* 64 e0: 0110 0100 1110 0000 xxxx xxxx */
void upd7810_device::SUI_ANM_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = ANM - imm;
ZHC_SUB( tmp, ANM, 0 );
ANM = tmp;
}
/* 64 e1: 0110 0100 1110 0001 xxxx xxxx */
void upd7810_device::SUI_SMH_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = SMH - imm;
ZHC_SUB( tmp, SMH, 0 );
SMH = tmp;
}
/* 64 e3: 0110 0100 1110 0011 xxxx xxxx */
void upd7810_device::SUI_EOM_xx()
{
/* only bits #1 and #5 can be read */
uint8_t eom = EOM & 0x22;
uint8_t tmp, imm;
RDOPARG( imm );
tmp = eom - imm;
ZHC_SUB( tmp, eom, 0 );
EOM = tmp;
upd7810_write_EOM();
}
/* 64 e5: 0110 0100 1110 0101 xxxx xxxx */
void upd7810_device::SUI_TMM_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = TMM - imm;
ZHC_SUB( tmp, TMM, 0 );
TMM = tmp;
}
/* 64 e8: 0110 0100 1110 1000 xxxx xxxx */
void upd7810_device::NEI_ANM_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = ANM - imm;
ZHC_SUB( tmp, ANM, 0 );
SKIP_NZ;
}
/* 64 e9: 0110 0100 1110 1001 xxxx xxxx */
void upd7810_device::NEI_SMH_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = SMH - imm;
ZHC_SUB( tmp, SMH, 0 );
SKIP_NZ;
}
/* 64 eb: 0110 0100 1110 1011 xxxx xxxx */
void upd7810_device::NEI_EOM_xx()
{
/* only bits #1 and #5 can be read */
uint8_t eom = EOM & 0x22;
uint8_t tmp, imm;
RDOPARG( imm );
tmp = eom - imm;
ZHC_SUB( tmp, eom, 0 );
SKIP_NZ;
}
/* 64 ed: 0110 0100 1110 1101 xxxx xxxx */
void upd7810_device::NEI_TMM_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = TMM - imm;
ZHC_SUB( tmp, TMM, 0 );
SKIP_NZ;
}
/* 64 f0: 0110 0100 1111 0000 xxxx xxxx */
void upd7810_device::SBI_ANM_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = ANM - imm - (PSW & CY);
ZHC_SUB( tmp, ANM, (PSW & CY) );
ANM = tmp;
}
/* 64 f1: 0110 0100 1111 0001 xxxx xxxx */
void upd7810_device::SBI_SMH_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = SMH - imm - (PSW & CY);
ZHC_SUB( tmp, SMH, (PSW & CY) );
SMH = tmp;
}
/* 64 f3: 0110 0100 1111 0011 xxxx xxxx */
void upd7810_device::SBI_EOM_xx()
{
/* only bits #1 and #5 can be read */
uint8_t eom = EOM & 0x22;
uint8_t tmp, imm;
RDOPARG( imm );
tmp = eom - imm - (PSW & CY);
ZHC_SUB( tmp, eom, (PSW & CY) );
EOM = tmp;
upd7810_write_EOM();
}
/* 64 f5: 0110 0100 1111 0101 xxxx xxxx */
void upd7810_device::SBI_TMM_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = TMM - imm - (PSW & CY);
ZHC_SUB( tmp, TMM, (PSW & CY) );
TMM = tmp;
}
/* 64 f8: 0110 0100 1111 1000 xxxx xxxx */
void upd7810_device::EQI_ANM_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = ANM - imm;
ZHC_SUB( tmp, ANM, 0 );
SKIP_Z;
}
/* 64 f9: 0110 0100 1111 1001 xxxx xxxx */
void upd7810_device::EQI_SMH_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = SMH - imm;
ZHC_SUB( tmp, SMH, 0 );
SKIP_Z;
}
/* 64 fb: 0110 0100 1111 1011 xxxx xxxx */
void upd7810_device::EQI_EOM_xx()
{
/* only bits #1 and #5 can be read */
uint8_t eom = EOM & 0x22;
uint8_t tmp, imm;
RDOPARG( imm );
tmp = eom - imm;
ZHC_SUB( tmp, eom, 0 );
SKIP_Z;
}
/* 64 fd: 0110 0100 1111 1101 xxxx xxxx */
void upd7810_device::EQI_TMM_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = TMM - imm;
ZHC_SUB( tmp, TMM, 0 );
SKIP_Z;
}
/* prefix 70 */
/* 70 0e: 0111 0000 0000 1110 llll llll hhhh hhhh */
void upd7810_device::SSPD_w()
{
PAIR ea;
ea.d = 0;
RDOPARG( ea.b.l );
RDOPARG( ea.b.h );
WM( ea.d, SPL );
WM( ea.d + 1, SPH );
}
/* 70 0f: 0111 0000 0000 1111 llll llll hhhh hhhh */
void upd7810_device::LSPD_w()
{
PAIR ea;
ea.d = 0;
RDOPARG( ea.b.l );
RDOPARG( ea.b.h );
SPL = RM( ea.d );
SPH = RM( ea.d + 1 );
}
/* 70 1e: 0111 0000 0001 1110 llll llll hhhh hhhh */
void upd7810_device::SBCD_w()
{
PAIR ea;
ea.d = 0;
RDOPARG( ea.b.l );
RDOPARG( ea.b.h );
WM( ea.d, C );
WM( ea.d + 1, B );
}
/* 70 1f: 0111 0000 0001 1111 llll llll hhhh hhhh */
void upd7810_device::LBCD_w()
{
PAIR ea;
ea.d = 0;
RDOPARG( ea.b.l );
RDOPARG( ea.b.h );
C = RM( ea.d );
B = RM( ea.d + 1 );
}
/* 70 2e: 0111 0000 0010 1110 llll llll hhhh hhhh */
void upd7810_device::SDED_w()
{
PAIR ea;
ea.d = 0;
RDOPARG( ea.b.l );
RDOPARG( ea.b.h );
WM( ea.d, E );
WM( ea.d + 1, D );
}
/* 70 2f: 0111 0000 0010 1111 llll llll hhhh hhhh */
void upd7810_device::LDED_w()
{
PAIR ea;
ea.d = 0;
RDOPARG( ea.b.l );
RDOPARG( ea.b.h );
E = RM( ea.d );
D = RM( ea.d + 1 );
}
/* 70 3e: 0111 0000 0011 1110 llll llll hhhh hhhh */
void upd7810_device::SHLD_w()
{
PAIR ea;
ea.d = 0;
RDOPARG( ea.b.l );
RDOPARG( ea.b.h );
WM( ea.d, L );
WM( ea.d + 1, H );
}
/* 70 3f: 0111 0000 0011 1111 llll llll hhhh hhhh */
void upd7810_device::LHLD_w()
{
PAIR ea;
ea.d = 0;
RDOPARG( ea.b.l );
RDOPARG( ea.b.h );
L = RM( ea.d );
H = RM( ea.d + 1 );
}
/* 70 41: 0111 0000 0100 0001 */
void upd7810_device::EADD_EA_A()
{
uint16_t tmp;
tmp = EA + A;
ZHC_ADD( tmp, EA, 0 );
EA = tmp;
}
/* 70 42: 0111 0000 0100 0010 */
void upd7810_device::EADD_EA_B()
{
uint16_t tmp;
tmp = EA + B;
ZHC_ADD( tmp, EA, 0 );
EA = tmp;
}
/* 70 43: 0111 0000 0100 0011 */
void upd7810_device::EADD_EA_C()
{
uint16_t tmp;
tmp = EA + C;
ZHC_ADD( tmp, EA, 0 );
EA = tmp;
}
/* 70 61: 0111 0000 0110 0001 */
void upd7810_device::ESUB_EA_A()
{
uint16_t tmp;
tmp = EA - A;
ZHC_SUB( tmp, EA, 0 );
EA = tmp;
}
/* 70 62: 0111 0000 0110 0010 */
void upd7810_device::ESUB_EA_B()
{
uint16_t tmp;
tmp = EA - B;
ZHC_SUB( tmp, EA, 0 );
EA = tmp;
}
/* 70 63: 0111 0000 0110 0011 */
void upd7810_device::ESUB_EA_C()
{
uint16_t tmp;
tmp = EA - C;
ZHC_SUB( tmp, EA, 0 );
EA = tmp;
}
/* 70 68: 0111 0000 0110 1000 llll llll hhhh hhhh */
void upd7810_device::MOV_V_w()
{
PAIR ea;
ea.d = 0;
RDOPARG( ea.b.l );
RDOPARG( ea.b.h );
V = RM( ea.d );
}
/* 70 69: 0111 0000 0110 1001 llll llll hhhh hhhh */
void upd7810_device::MOV_A_w()
{
PAIR ea;
ea.d = 0;
RDOPARG( ea.b.l );
RDOPARG( ea.b.h );
A = RM( ea.d );
}
/* 70 6a: 0111 0000 0110 1010 llll llll hhhh hhhh */
void upd7810_device::MOV_B_w()
{
PAIR ea;
ea.d = 0;
RDOPARG( ea.b.l );
RDOPARG( ea.b.h );
B = RM( ea.d );
}
/* 70 6b: 0111 0000 0110 1011 llll llll hhhh hhhh */
void upd7810_device::MOV_C_w()
{
PAIR ea;
ea.d = 0;
RDOPARG( ea.b.l );
RDOPARG( ea.b.h );
C = RM( ea.d );
}
/* 70 6c: 0111 0000 0110 1100 llll llll hhhh hhhh */
void upd7810_device::MOV_D_w()
{
PAIR ea;
ea.d = 0;
RDOPARG( ea.b.l );
RDOPARG( ea.b.h );
D = RM( ea.d );
}
/* 70 6d: 0111 0000 0110 1101 llll llll hhhh hhhh */
void upd7810_device::MOV_E_w()
{
PAIR ea;
ea.d = 0;
RDOPARG( ea.b.l );
RDOPARG( ea.b.h );
E = RM( ea.d );
}
/* 70 6e: 0111 0000 0110 1110 llll llll hhhh hhhh */
void upd7810_device::MOV_H_w()
{
PAIR ea;
ea.d = 0;
RDOPARG( ea.b.l );
RDOPARG( ea.b.h );
H = RM( ea.d );
}
/* 70 6f: 0111 0000 0110 1111 llll llll hhhh hhhh */
void upd7810_device::MOV_L_w()
{
PAIR ea;
ea.d = 0;
RDOPARG( ea.b.l );
RDOPARG( ea.b.h );
L = RM( ea.d );
}
/* 70 78: 0111 0000 0111 1000 llll llll hhhh hhhh */
void upd7810_device::MOV_w_V()
{
PAIR ea;
ea.d = 0;
RDOPARG( ea.b.l );
RDOPARG( ea.b.h );
WM( ea.d, V );
}
/* 70 79: 0111 0000 0111 1001 llll llll hhhh hhhh */
void upd7810_device::MOV_w_A()
{
PAIR ea;
ea.d = 0;
RDOPARG( ea.b.l );
RDOPARG( ea.b.h );
WM( ea.d, A );
}
/* 70 7a: 0111 0000 0111 1010 llll llll hhhh hhhh */
void upd7810_device::MOV_w_B()
{
PAIR ea;
ea.d = 0;
RDOPARG( ea.b.l );
RDOPARG( ea.b.h );
WM( ea.d, B );
}
/* 70 7b: 0111 0000 0111 1011 llll llll hhhh hhhh */
void upd7810_device::MOV_w_C()
{
PAIR ea;
ea.d = 0;
RDOPARG( ea.b.l );
RDOPARG( ea.b.h );
WM( ea.d, C );
}
/* 70 7c: 0111 0000 0111 1100 llll llll hhhh hhhh */
void upd7810_device::MOV_w_D()
{
PAIR ea;
ea.d = 0;
RDOPARG( ea.b.l );
RDOPARG( ea.b.h );
WM( ea.d, D );
}
/* 70 7d: 0111 0000 0111 1101 llll llll hhhh hhhh */
void upd7810_device::MOV_w_E()
{
PAIR ea;
ea.d = 0;
RDOPARG( ea.b.l );
RDOPARG( ea.b.h );
WM( ea.d, E );
}
/* 70 7e: 0111 0000 0111 1110 llll llll hhhh hhhh */
void upd7810_device::MOV_w_H()
{
PAIR ea;
ea.d = 0;
RDOPARG( ea.b.l );
RDOPARG( ea.b.h );
WM( ea.d, H );
}
/* 70 7f: 0111 0000 0111 1111 llll llll hhhh hhhh */
void upd7810_device::MOV_w_L()
{
PAIR ea;
ea.d = 0;
RDOPARG( ea.b.l );
RDOPARG( ea.b.h );
WM( ea.d, L );
}
/* 70 89: 0111 0000 1000 1001 */
void upd7810_device::ANAX_B()
{
A &= RM( BC );
SET_Z(A);
}
/* 70 8a: 0111 0000 1000 1010 */
void upd7810_device::ANAX_D()
{
A &= RM( DE );
SET_Z(A);
}
/* 70 8b: 0111 0000 1000 1011 */
void upd7810_device::ANAX_H()
{
A &= RM( HL );
SET_Z(A);
}
/* 70 8c: 0111 0000 1000 1100 */
void upd7810_device::ANAX_Dp()
{
A &= RM( DE );
DE++;
SET_Z(A);
}
/* 70 8d: 0111 0000 1000 1101 */
void upd7810_device::ANAX_Hp()
{
A &= RM( HL );
HL++;
SET_Z(A);
}
/* 70 8e: 0111 0000 1000 1110 */
void upd7810_device::ANAX_Dm()
{
A &= RM( DE );
DE--;
SET_Z(A);
}
/* 70 8f: 0111 0000 1000 1111 */
void upd7810_device::ANAX_Hm()
{
A &= RM( HL );
HL--;
SET_Z(A);
}
/* 70 91: 0111 0000 1001 0001 */
void upd7810_device::XRAX_B()
{
A ^= RM( BC );
SET_Z(A);
}
/* 70 92: 0111 0000 1001 0010 */
void upd7810_device::XRAX_D()
{
A ^= RM( DE );
SET_Z(A);
}
/* 70 93: 0111 0000 1001 0011 */
void upd7810_device::XRAX_H()
{
A ^= RM( HL );
SET_Z(A);
}
/* 70 94: 0111 0000 1001 0100 */
void upd7810_device::XRAX_Dp()
{
A ^= RM( DE );
DE++;
SET_Z(A);
}
/* 70 95: 0111 0000 1001 0101 */
void upd7810_device::XRAX_Hp()
{
A ^= RM( HL );
HL++;
SET_Z(A);
}
/* 70 96: 0111 0000 1001 0110 */
void upd7810_device::XRAX_Dm()
{
A ^= RM( DE );
DE--;
SET_Z(A);
}
/* 70 97: 0111 0000 1001 0111 */
void upd7810_device::XRAX_Hm()
{
A ^= RM( HL );
HL--;
SET_Z(A);
}
/* 70 99: 0111 0000 1001 1001 */
void upd7810_device::ORAX_B()
{
A |= RM( BC );
SET_Z(A);
}
/* 70 9a: 0111 0000 1001 1010 */
void upd7810_device::ORAX_D()
{
A |= RM( DE );
SET_Z(A);
}
/* 70 9b: 0111 0000 1001 1011 */
void upd7810_device::ORAX_H()
{
A |= RM( HL );
SET_Z(A);
}
/* 70 9c: 0111 0000 1001 0100 */
void upd7810_device::ORAX_Dp()
{
A |= RM( DE );
DE++;
SET_Z(A);
}
/* 70 9d: 0111 0000 1001 1101 */
void upd7810_device::ORAX_Hp()
{
A |= RM( HL );
HL++;
SET_Z(A);
}
/* 70 9e: 0111 0000 1001 1110 */
void upd7810_device::ORAX_Dm()
{
A |= RM( DE );
DE--;
SET_Z(A);
}
/* 70 9f: 0111 0000 1001 1111 */
void upd7810_device::ORAX_Hm()
{
A |= RM( HL );
HL--;
SET_Z(A);
}
/* 70 a1: 0111 0000 1010 0001 */
void upd7810_device::ADDNCX_B()
{
uint8_t tmp = A + RM( BC );
ZHC_ADD( tmp, A, 0 );
A = tmp;
SKIP_NC;
}
/* 70 a2: 0111 0000 1010 0010 */
void upd7810_device::ADDNCX_D()
{
uint8_t tmp = A + RM( DE );
ZHC_ADD( tmp, A, 0 );
A = tmp;
SKIP_NC;
}
/* 70 a3: 0111 0000 1010 0011 */
void upd7810_device::ADDNCX_H()
{
uint8_t tmp = A + RM( HL );
ZHC_ADD( tmp, A, 0 );
A = tmp;
SKIP_NC;
}
/* 70 a4: 0111 0000 1010 0100 */
void upd7810_device::ADDNCX_Dp()
{
uint8_t tmp = A + RM( DE );
DE++;
ZHC_ADD( tmp, A, 0 );
A = tmp;
SKIP_NC;
}
/* 70 a5: 0111 0000 1010 0101 */
void upd7810_device::ADDNCX_Hp()
{
uint8_t tmp = A + RM( HL );
HL++;
ZHC_ADD( tmp, A, 0 );
A = tmp;
SKIP_NC;
}
/* 70 a6: 0111 0000 1010 0110 */
void upd7810_device::ADDNCX_Dm()
{
uint8_t tmp = A + RM( DE );
DE--;
ZHC_ADD( tmp, A, 0 );
A = tmp;
SKIP_NC;
}
/* 70 a7: 0111 0000 1010 0111 */
void upd7810_device::ADDNCX_Hm()
{
uint8_t tmp = A + RM( HL );
HL--;
ZHC_ADD( tmp, A, 0 );
A = tmp;
SKIP_NC;
}
/* 70 a9: 0111 0000 1010 1001 */
void upd7810_device::GTAX_B()
{
uint16_t tmp = A - RM( BC ) - 1;
ZHC_SUB( tmp, A, 0 );
SKIP_NC;
}
/* 70 aa: 0111 0000 1010 1010 */
void upd7810_device::GTAX_D()
{
uint16_t tmp = A - RM( DE ) - 1;
ZHC_SUB( tmp, A, 0 );
SKIP_NC;
}
/* 70 ab: 0111 0000 1010 1011 */
void upd7810_device::GTAX_H()
{
uint16_t tmp = A - RM( HL ) - 1;
ZHC_SUB( tmp, A, 0 );
SKIP_NC;
}
/* 70 ac: 0111 0000 1010 1100 */
void upd7810_device::GTAX_Dp()
{
uint16_t tmp = A - RM( DE ) - 1;
DE++;
ZHC_SUB( tmp, A, 0 );
SKIP_NC;
}
/* 70 ad: 0111 0000 1010 1101 */
void upd7810_device::GTAX_Hp()
{
uint16_t tmp = A - RM( HL ) - 1;
HL++;
ZHC_SUB( tmp, A, 0 );
SKIP_NC;
}
/* 70 ae: 0111 0000 1010 1110 */
void upd7810_device::GTAX_Dm()
{
uint16_t tmp = A - RM( DE ) - 1;
DE--;
ZHC_SUB( tmp, A, 0 );
SKIP_NC;
}
/* 70 af: 0111 0000 1010 1111 */
void upd7810_device::GTAX_Hm()
{
uint16_t tmp = A - RM( HL ) - 1;
HL--;
ZHC_SUB( tmp, A, 0 );
SKIP_NC;
}
/* 70 b1: 0111 0000 1011 0001 */
void upd7810_device::SUBNBX_B()
{
uint8_t tmp = A - RM( BC );
ZHC_SUB( tmp, A, 0 );
A = tmp;
SKIP_NC;
}
/* 70 b2: 0111 0000 1011 0010 */
void upd7810_device::SUBNBX_D()
{
uint8_t tmp = A - RM( DE );
ZHC_SUB( tmp, A, 0 );
A = tmp;
SKIP_NC;
}
/* 70 b3: 0111 0000 1011 0011 */
void upd7810_device::SUBNBX_H()
{
uint8_t tmp = A - RM( HL );
ZHC_SUB( tmp, A, 0 );
A = tmp;
SKIP_NC;
}
/* 70 b4: 0111 0000 1011 0100 */
void upd7810_device::SUBNBX_Dp()
{
uint8_t tmp = A - RM( DE );
DE++;
ZHC_SUB( tmp, A, 0 );
A = tmp;
SKIP_NC;
}
/* 70 b5: 0111 0000 1011 0101 */
void upd7810_device::SUBNBX_Hp()
{
uint8_t tmp = A - RM( HL );
HL++;
ZHC_SUB( tmp, A, 0 );
A = tmp;
SKIP_NC;
}
/* 70 b6: 0111 0000 1011 0110 */
void upd7810_device::SUBNBX_Dm()
{
uint8_t tmp = A - RM( DE );
DE--;
ZHC_SUB( tmp, A, 0 );
A = tmp;
SKIP_NC;
}
/* 70 b7: 0111 0000 1011 0111 */
void upd7810_device::SUBNBX_Hm()
{
uint8_t tmp = A - RM( HL );
HL--;
ZHC_SUB( tmp, A, 0 );
A = tmp;
SKIP_NC;
}
/* 70 b9: 0111 0000 1011 1001 */
void upd7810_device::LTAX_B()
{
uint8_t tmp = A - RM( BC );
ZHC_SUB( tmp, A, 0 );
SKIP_CY;
}
/* 70 ba: 0111 0000 1011 1010 */
void upd7810_device::LTAX_D()
{
uint8_t tmp = A - RM( DE );
ZHC_SUB( tmp, A, 0 );
SKIP_CY;
}
/* 70 bb: 0111 0000 1011 1011 */
void upd7810_device::LTAX_H()
{
uint8_t tmp = A - RM( HL );
ZHC_SUB( tmp, A, 0 );
SKIP_CY;
}
/* 70 bc: 0111 0000 1011 1100 */
void upd7810_device::LTAX_Dp()
{
uint8_t tmp = A - RM( DE );
DE++;
ZHC_SUB( tmp, A, 0 );
SKIP_CY;
}
/* 70 bd: 0111 0000 1011 1101 */
void upd7810_device::LTAX_Hp()
{
uint8_t tmp = A - RM( HL );
HL++;
ZHC_SUB( tmp, A, 0 );
SKIP_CY;
}
/* 70 be: 0111 0000 1011 1110 */
void upd7810_device::LTAX_Dm()
{
uint8_t tmp = A - RM( DE );
DE--;
ZHC_SUB( tmp, A, 0 );
SKIP_CY;
}
/* 70 bf: 0111 0000 1011 1111 */
void upd7810_device::LTAX_Hm()
{
uint8_t tmp = A - RM( HL );
HL--;
ZHC_SUB( tmp, A, 0 );
SKIP_CY;
}
/* 70 c1: 0111 0000 1100 0001 */
void upd7810_device::ADDX_B()
{
uint8_t tmp = A + RM( BC );
ZHC_ADD( tmp, A, 0 );
A = tmp;
}
/* 70 c2: 0111 0000 1100 0010 */
void upd7810_device::ADDX_D()
{
uint8_t tmp = A + RM( DE );
ZHC_ADD( tmp, A, 0 );
A = tmp;
}
/* 70 c3: 0111 0000 1100 0011 */
void upd7810_device::ADDX_H()
{
uint8_t tmp = A + RM( HL );
ZHC_ADD( tmp, A, 0 );
A = tmp;
}
/* 70 c4: 0111 0000 1100 0100 */
void upd7810_device::ADDX_Dp()
{
uint8_t tmp = A + RM( DE );
DE++;
ZHC_ADD( tmp, A, 0 );
A = tmp;
}
/* 70 c5: 0111 0000 1100 0101 */
void upd7810_device::ADDX_Hp()
{
uint8_t tmp = A + RM( HL );
HL++;
ZHC_ADD( tmp, A, 0 );
A = tmp;
}
/* 70 c6: 0111 0000 1100 0110 */
void upd7810_device::ADDX_Dm()
{
uint8_t tmp = A + RM( DE );
DE--;
ZHC_ADD( tmp, A, 0 );
A = tmp;
}
/* 70 c7: 0111 0000 1100 0111 */
void upd7810_device::ADDX_Hm()
{
uint8_t tmp = A + RM( HL );
HL--;
ZHC_ADD( tmp, A, 0 );
A = tmp;
}
/* 70 c9: 0111 0000 1100 1001 */
void upd7810_device::ONAX_B()
{
if (A & RM( BC ))
PSW = (PSW & ~Z) | SK;
else
PSW |= Z;
}
/* 70 ca: 0111 0000 1100 1010 */
void upd7810_device::ONAX_D()
{
if (A & RM( DE ))
PSW = (PSW & ~Z) | SK;
else
PSW |= Z;
}
/* 70 cb: 0111 0000 1100 1011 */
void upd7810_device::ONAX_H()
{
if (A & RM( HL ))
PSW = (PSW & ~Z) | SK;
else
PSW |= Z;
}
/* 70 cc: 0111 0000 1100 1100 */
void upd7810_device::ONAX_Dp()
{
if (A & RM( DE ))
PSW = (PSW & ~Z) | SK;
else
PSW |= Z;
DE++;
}
/* 70 cd: 0111 0000 1100 1101 */
void upd7810_device::ONAX_Hp()
{
if (A & RM( HL ))
PSW = (PSW & ~Z) | SK;
else
PSW |= Z;
HL++;
}
/* 70 ce: 0111 0000 1100 1110 */
void upd7810_device::ONAX_Dm()
{
if (A & RM( DE ))
PSW = (PSW & ~Z) | SK;
else
PSW |= Z;
DE--;
}
/* 70 cf: 0111 0000 1100 1111 */
void upd7810_device::ONAX_Hm()
{
if (A & RM( HL ))
PSW = (PSW & ~Z) | SK;
else
PSW |= Z;
HL--;
}
/* 70 d1: 0111 0000 1101 0001 */
void upd7810_device::ADCX_B()
{
uint8_t tmp = A + RM( BC ) + (PSW & CY);
ZHC_ADD( tmp, A, 0 );
A = tmp;
}
/* 70 d2: 0111 0000 1101 0010 */
void upd7810_device::ADCX_D()
{
uint8_t tmp = A + RM( DE ) + (PSW & CY);
ZHC_ADD( tmp, A, 0 );
A = tmp;
}
/* 70 d3: 0111 0000 1101 0011 */
void upd7810_device::ADCX_H()
{
uint8_t tmp = A + RM( HL ) + (PSW & CY);
ZHC_ADD( tmp, A, 0 );
A = tmp;
}
/* 70 d4: 0111 0000 1101 0100 */
void upd7810_device::ADCX_Dp()
{
uint8_t tmp = A + RM( DE ) + (PSW & CY);
DE++;
ZHC_ADD( tmp, A, 0 );
A = tmp;
}
/* 70 d5: 0111 0000 1101 0101 */
void upd7810_device::ADCX_Hp()
{
uint8_t tmp = A + RM( HL ) + (PSW & CY);
HL++;
ZHC_ADD( tmp, A, 0 );
A = tmp;
}
/* 70 d6: 0111 0000 1101 0110 */
void upd7810_device::ADCX_Dm()
{
uint8_t tmp = A + RM( DE ) + (PSW & CY);
DE--;
ZHC_ADD( tmp, A, 0 );
A = tmp;
}
/* 70 d7: 0111 0000 1101 0111 */
void upd7810_device::ADCX_Hm()
{
uint8_t tmp = A + RM( HL ) + (PSW & CY);
HL--;
ZHC_ADD( tmp, A, 0 );
A = tmp;
}
/* 70 d9: 0111 0000 1101 1001 */
void upd7810_device::OFFAX_B()
{
if ( A & RM( BC ) )
PSW &= ~Z;
else
PSW = PSW | Z | SK;
}
/* 70 da: 0111 0000 1101 1010 */
void upd7810_device::OFFAX_D()
{
if ( A & RM( DE ) )
PSW &= ~Z;
else
PSW = PSW | Z | SK;
}
/* 70 db: 0111 0000 1101 1011 */
void upd7810_device::OFFAX_H()
{
if ( A & RM( HL ) )
PSW &= ~Z;
else
PSW = PSW | Z | SK;
}
/* 70 dc: 0111 0000 1101 1100 */
void upd7810_device::OFFAX_Dp()
{
if ( A & RM( DE ) )
PSW &= ~Z;
else
PSW = PSW | Z | SK;
DE++;
}
/* 70 dd: 0111 0000 1101 1101 */
void upd7810_device::OFFAX_Hp()
{
if ( A & RM( HL ) )
PSW &= ~Z;
else
PSW = PSW | Z | SK;
HL++;
}
/* 70 de: 0111 0000 1101 1110 */
void upd7810_device::OFFAX_Dm()
{
if ( A & RM( DE ) )
PSW &= ~Z;
else
PSW = PSW | Z | SK;
DE--;
}
/* 70 df: 0111 0000 1101 1111 */
void upd7810_device::OFFAX_Hm()
{
if ( A & RM( HL ) )
PSW &= ~Z;
else
PSW = PSW | Z | SK;
HL--;
}
/* 70 e1: 0111 0000 1110 0001 */
void upd7810_device::SUBX_B()
{
uint8_t tmp = A - RM( BC );
ZHC_SUB( tmp, A, 0 );
A = tmp;
}
/* 70 e2: 0111 0000 1110 0010 */
void upd7810_device::SUBX_D()
{
uint8_t tmp = A - RM( DE );
ZHC_SUB( tmp, A, 0 );
A = tmp;
}
/* 70 e3: 0111 0000 1110 0011 */
void upd7810_device::SUBX_H()
{
uint8_t tmp = A - RM( HL );
ZHC_SUB( tmp, A, 0 );
A = tmp;
}
/* 70 e4: 0111 0000 1110 0100 */
void upd7810_device::SUBX_Dp()
{
uint8_t tmp = A - RM( DE );
ZHC_SUB( tmp, A, 0 );
A = tmp;
DE++;
}
/* 70 e5: 0111 0000 1110 0101 */
void upd7810_device::SUBX_Hp()
{
uint8_t tmp = A - RM( HL );
ZHC_SUB( tmp, A, 0 );
A = tmp;
HL++;
}
/* 70 e6: 0111 0000 1110 0110 */
void upd7810_device::SUBX_Dm()
{
uint8_t tmp = A - RM( DE );
ZHC_SUB( tmp, A, 0 );
A = tmp;
DE--;
}
/* 70 e7: 0111 0000 1110 0111 */
void upd7810_device::SUBX_Hm()
{
uint8_t tmp = A - RM( HL );
ZHC_SUB( tmp, A, 0 );
A = tmp;
HL--;
}
/* 70 e9: 0111 0000 1110 1001 */
void upd7810_device::NEAX_B()
{
uint8_t tmp = A - RM( BC );
ZHC_SUB( tmp, A, 0 );
SKIP_NZ;
}
/* 70 ea: 0111 0000 1110 1010 */
void upd7810_device::NEAX_D()
{
uint8_t tmp = A - RM( DE );
ZHC_SUB( tmp, A, 0 );
SKIP_NZ;
}
/* 70 eb: 0111 0000 1110 1011 */
void upd7810_device::NEAX_H()
{
uint8_t tmp = A - RM( HL );
ZHC_SUB( tmp, A, 0 );
SKIP_NZ;
}
/* 70 ec: 0111 0000 1110 1100 */
void upd7810_device::NEAX_Dp()
{
uint8_t tmp = A - RM( DE );
DE++;
ZHC_SUB( tmp, A, 0 );
SKIP_NZ;
}
/* 70 ed: 0111 0000 1110 1101 */
void upd7810_device::NEAX_Hp()
{
uint8_t tmp = A - RM( HL );
HL++;
ZHC_SUB( tmp, A, 0 );
SKIP_NZ;
}
/* 70 ee: 0111 0000 1110 1110 */
void upd7810_device::NEAX_Dm()
{
uint8_t tmp = A - RM( DE );
DE--;
ZHC_SUB( tmp, A, 0 );
SKIP_NZ;
}
/* 70 ef: 0111 0000 1110 1111 */
void upd7810_device::NEAX_Hm()
{
uint8_t tmp = A - RM( HL );
HL--;
ZHC_SUB( tmp, A, 0 );
SKIP_NZ;
}
/* 70 f1: 0111 0000 1111 0001 */
void upd7810_device::SBBX_B()
{
uint8_t tmp = A - RM( BC ) - (PSW & CY);
ZHC_SUB( tmp, A, (PSW & CY) );
A = tmp;
}
/* 70 f2: 0111 0000 1111 0010 */
void upd7810_device::SBBX_D()
{
uint8_t tmp = A - RM( DE ) - (PSW & CY);
ZHC_SUB( tmp, A, (PSW & CY) );
A = tmp;
}
/* 70 f3: 0111 0000 1111 0011 */
void upd7810_device::SBBX_H()
{
uint8_t tmp = A - RM( HL ) - (PSW & CY);
ZHC_SUB( tmp, A, (PSW & CY) );
A = tmp;
}
/* 70 f4: 0111 0000 1111 0100 */
void upd7810_device::SBBX_Dp()
{
uint8_t tmp = A - RM( DE ) - (PSW & CY);
DE++;
ZHC_SUB( tmp, A, (PSW & CY) );
A = tmp;
}
/* 70 f5: 0111 0000 1111 0101 */
void upd7810_device::SBBX_Hp()
{
uint8_t tmp = A - RM( HL ) - (PSW & CY);
HL++;
ZHC_SUB( tmp, A, (PSW & CY) );
A = tmp;
}
/* 70 f6: 0111 0000 1111 0110 */
void upd7810_device::SBBX_Dm()
{
uint8_t tmp = A - RM( DE ) - (PSW & CY);
DE--;
ZHC_SUB( tmp, A, (PSW & CY) );
A = tmp;
}
/* 70 f7: 0111 0000 1111 0111 */
void upd7810_device::SBBX_Hm()
{
uint8_t tmp = A - RM( HL ) - (PSW & CY);
HL--;
ZHC_SUB( tmp, A, (PSW & CY) );
A = tmp;
}
/* 70 f9: 0111 0000 1111 1001 */
void upd7810_device::EQAX_B()
{
uint8_t tmp = A - RM( BC );
ZHC_SUB( tmp, A, 0 );
SKIP_Z;
}
/* 70 fa: 0111 0000 1111 1010 */
void upd7810_device::EQAX_D()
{
uint8_t tmp = A - RM( DE );
ZHC_SUB( tmp, A, 0 );
SKIP_Z;
}
/* 70 fb: 0111 0000 1111 1011 */
void upd7810_device::EQAX_H()
{
uint8_t tmp = A - RM( HL );
ZHC_SUB( tmp, A, 0 );
SKIP_Z;
}
/* 70 fc: 0111 0000 1111 1100 */
void upd7810_device::EQAX_Dp()
{
uint8_t tmp = A - RM( DE );
DE++;
ZHC_SUB( tmp, A, 0 );
SKIP_Z;
}
/* 70 fd: 0111 0000 1111 1101 */
void upd7810_device::EQAX_Hp()
{
uint8_t tmp = A - RM( HL );
HL++;
ZHC_SUB( tmp, A, 0 );
SKIP_Z;
}
/* 70 fe: 0111 0000 1111 1110 */
void upd7810_device::EQAX_Dm()
{
uint8_t tmp = A - RM( DE );
DE--;
ZHC_SUB( tmp, A, 0 );
SKIP_Z;
}
/* 70 ff: 0111 0000 1111 1111 */
void upd7810_device::EQAX_Hm()
{
uint8_t tmp = A - RM( HL );
HL--;
ZHC_SUB( tmp, A, 0 );
SKIP_Z;
}
/* prefix 74 */
/* 74 08: 0111 0100 0000 1000 xxxx xxxx */
void upd7810_device::ANI_V_xx()
{
uint8_t imm;
RDOPARG( imm );
V &= imm;
SET_Z(V);
}
/* 74 09: 0111 0100 0000 1001 xxxx xxxx */
void upd7810_device::ANI_A_xx()
{
uint8_t imm;
RDOPARG( imm );
A &= imm;
SET_Z(A);
}
/* 74 0a: 0111 0100 0000 1010 xxxx xxxx */
void upd7810_device::ANI_B_xx()
{
uint8_t imm;
RDOPARG( imm );
B &= imm;
SET_Z(B);
}
/* 74 0b: 0111 0100 0000 1011 xxxx xxxx */
void upd7810_device::ANI_C_xx()
{
uint8_t imm;
RDOPARG( imm );
C &= imm;
SET_Z(C);
}
/* 74 0c: 0111 0100 0000 1100 xxxx xxxx */
void upd7810_device::ANI_D_xx()
{
uint8_t imm;
RDOPARG( imm );
D &= imm;
SET_Z(D);
}
/* 74 0d: 0111 0100 0000 1101 xxxx xxxx */
void upd7810_device::ANI_E_xx()
{
uint8_t imm;
RDOPARG( imm );
E &= imm;
SET_Z(E);
}
/* 74 0e: 0111 0100 0000 1110 xxxx xxxx */
void upd7810_device::ANI_H_xx()
{
uint8_t imm;
RDOPARG( imm );
H &= imm;
SET_Z(H);
}
/* 74 0f: 0111 0100 0000 1111 xxxx xxxx */
void upd7810_device::ANI_L_xx()
{
uint8_t imm;
RDOPARG( imm );
L &= imm;
SET_Z(L);
}
/* 74 10: 0111 0100 0001 0000 xxxx xxxx */
void upd7810_device::XRI_V_xx()
{
uint8_t imm;
RDOPARG( imm );
V ^= imm;
SET_Z(V);
}
/* 74 11: 0111 0100 0001 0001 xxxx xxxx */
void upd7810_device::XRI_A_xx()
{
uint8_t imm;
RDOPARG( imm );
A ^= imm;
SET_Z(A);
}
/* 74 12: 0111 0100 0001 0010 xxxx xxxx */
void upd7810_device::XRI_B_xx()
{
uint8_t imm;
RDOPARG( imm );
B ^= imm;
SET_Z(B);
}
/* 74 13: 0111 0100 0001 0011 xxxx xxxx */
void upd7810_device::XRI_C_xx()
{
uint8_t imm;
RDOPARG( imm );
C ^= imm;
SET_Z(C);
}
/* 74 14: 0111 0100 0001 0100 xxxx xxxx */
void upd7810_device::XRI_D_xx()
{
uint8_t imm;
RDOPARG( imm );
D ^= imm;
SET_Z(D);
}
/* 74 15: 0111 0100 0001 0101 xxxx xxxx */
void upd7810_device::XRI_E_xx()
{
uint8_t imm;
RDOPARG( imm );
E ^= imm;
SET_Z(E);
}
/* 74 16: 0111 0100 0001 0110 xxxx xxxx */
void upd7810_device::XRI_H_xx()
{
uint8_t imm;
RDOPARG( imm );
H ^= imm;
SET_Z(H);
}
/* 74 17: 0111 0100 0001 0111 xxxx xxxx */
void upd7810_device::XRI_L_xx()
{
uint8_t imm;
RDOPARG( imm );
L ^= imm;
SET_Z(L);
}
/* 74 18: 0111 0100 0001 1000 xxxx xxxx */
void upd7810_device::ORI_V_xx()
{
uint8_t imm;
RDOPARG( imm );
V |= imm;
SET_Z(V);
}
/* 74 19: 0111 0100 0001 1001 xxxx xxxx */
void upd7810_device::ORI_A_xx()
{
uint8_t imm;
RDOPARG( imm );
A |= imm;
SET_Z(A);
}
/* 74 1a: 0111 0100 0001 1010 xxxx xxxx */
void upd7810_device::ORI_B_xx()
{
uint8_t imm;
RDOPARG( imm );
B |= imm;
SET_Z(B);
}
/* 74 1b: 0111 0100 0001 1011 xxxx xxxx */
void upd7810_device::ORI_C_xx()
{
uint8_t imm;
RDOPARG( imm );
C |= imm;
SET_Z(C);
}
/* 74 1c: 0111 0100 0001 1100 xxxx xxxx */
void upd7810_device::ORI_D_xx()
{
uint8_t imm;
RDOPARG( imm );
D |= imm;
SET_Z(D);
}
/* 74 1d: 0111 0100 0001 1101 xxxx xxxx */
void upd7810_device::ORI_E_xx()
{
uint8_t imm;
RDOPARG( imm );
E |= imm;
SET_Z(E);
}
/* 74 1e: 0111 0100 0001 1110 xxxx xxxx */
void upd7810_device::ORI_H_xx()
{
uint8_t imm;
RDOPARG( imm );
H |= imm;
SET_Z(H);
}
/* 74 1f: 0111 0100 0001 1111 xxxx xxxx */
void upd7810_device::ORI_L_xx()
{
uint8_t imm;
RDOPARG( imm );
L |= imm;
SET_Z(L);
}
/* 74 20: 0111 0100 0010 0000 xxxx xxxx */
void upd7810_device::ADINC_V_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = V + imm;
ZHC_ADD( tmp, V, 0 );
V = tmp;
SKIP_NC;
}
/* 74 21: 0111 0100 0010 0001 xxxx xxxx */
void upd7810_device::ADINC_A_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = A + imm;
ZHC_ADD( tmp, A, 0 );
A = tmp;
SKIP_NC;
}
/* 74 22: 0111 0100 0010 0010 xxxx xxxx */
void upd7810_device::ADINC_B_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = B + imm;
ZHC_ADD( tmp, B, 0 );
B = tmp;
SKIP_NC;
}
/* 74 23: 0111 0100 0010 0011 xxxx xxxx */
void upd7810_device::ADINC_C_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = C + imm;
ZHC_ADD( tmp, C, 0 );
C = tmp;
SKIP_NC;
}
/* 74 24: 0111 0100 0010 0100 xxxx xxxx */
void upd7810_device::ADINC_D_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = D + imm;
ZHC_ADD( tmp, D, 0 );
D = tmp;
SKIP_NC;
}
/* 74 25: 0111 0100 0010 0101 xxxx xxxx */
void upd7810_device::ADINC_E_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = E + imm;
ZHC_ADD( tmp, E, 0 );
E = tmp;
SKIP_NC;
}
/* 74 26: 0111 0100 0010 0110 xxxx xxxx */
void upd7810_device::ADINC_H_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = H + imm;
ZHC_ADD( tmp, H, 0 );
H = tmp;
SKIP_NC;
}
/* 74 27: 0111 0100 0010 0111 xxxx xxxx */
void upd7810_device::ADINC_L_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = L + imm;
ZHC_ADD( tmp, L, 0 );
L = tmp;
SKIP_NC;
}
/* 74 28: 0111 0100 0010 1000 xxxx xxxx */
void upd7810_device::GTI_V_xx()
{
uint8_t imm;
uint16_t tmp;
RDOPARG( imm );
tmp = V - imm - 1;
ZHC_SUB( tmp, V, 0 );
SKIP_NC;
}
/* 74 29: 0111 0100 0010 1001 xxxx xxxx */
void upd7810_device::GTI_A_xx()
{
uint8_t imm;
uint16_t tmp;
RDOPARG( imm );
tmp = A - imm - 1;
ZHC_SUB( tmp, A, 0 );
SKIP_NC;
}
/* 74 2a: 0111 0100 0010 1010 xxxx xxxx */
void upd7810_device::GTI_B_xx()
{
uint8_t imm;
uint16_t tmp;
RDOPARG( imm );
tmp = B - imm - 1;
ZHC_SUB( tmp, B, 0 );
SKIP_NC;
}
/* 74 2b: 0111 0100 0010 1011 xxxx xxxx */
void upd7810_device::GTI_C_xx()
{
uint8_t imm;
uint16_t tmp;
RDOPARG( imm );
tmp = C - imm - 1;
ZHC_SUB( tmp, C, 0 );
SKIP_NC;
}
/* 74 2c: 0111 0100 0010 1100 xxxx xxxx */
void upd7810_device::GTI_D_xx()
{
uint8_t imm;
uint16_t tmp;
RDOPARG( imm );
tmp = D - imm - 1;
ZHC_SUB( tmp, D, 0 );
SKIP_NC;
}
/* 74 2d: 0111 0100 0010 1101 xxxx xxxx */
void upd7810_device::GTI_E_xx()
{
uint8_t imm;
uint16_t tmp;
RDOPARG( imm );
tmp = E - imm - 1;
ZHC_SUB( tmp, E, 0 );
SKIP_NC;
}
/* 74 2e: 0111 0100 0010 1110 xxxx xxxx */
void upd7810_device::GTI_H_xx()
{
uint8_t imm;
uint16_t tmp;
RDOPARG( imm );
tmp = H - imm - 1;
ZHC_SUB( tmp, H, 0 );
SKIP_NC;
}
/* 74 2f: 0111 0100 0010 1111 xxxx xxxx */
void upd7810_device::GTI_L_xx()
{
uint8_t imm;
uint16_t tmp;
RDOPARG( imm );
tmp = L - imm - 1;
ZHC_SUB( tmp, L, 0 );
SKIP_NC;
}
/* 74 30: 0111 0100 0011 0000 xxxx xxxx */
void upd7810_device::SUINB_V_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = V - imm;
ZHC_SUB( tmp, V, 0 );
V = tmp;
SKIP_NC;
}
/* 74 31: 0111 0100 0011 0001 xxxx xxxx */
void upd7810_device::SUINB_A_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = A - imm;
ZHC_SUB( tmp, A, 0 );
A = tmp;
SKIP_NC;
}
/* 74 32: 0111 0100 0011 0010 xxxx xxxx */
void upd7810_device::SUINB_B_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = B - imm;
ZHC_SUB( tmp, B, 0 );
B = tmp;
SKIP_NC;
}
/* 74 33: 0111 0100 0011 0011 xxxx xxxx */
void upd7810_device::SUINB_C_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = C - imm;
ZHC_SUB( tmp, C, 0 );
C = tmp;
SKIP_NC;
}
/* 74 34: 0111 0100 0011 0100 xxxx xxxx */
void upd7810_device::SUINB_D_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = D - imm;
ZHC_SUB( tmp, D, 0 );
D = tmp;
SKIP_NC;
}
/* 74 35: 0111 0100 0011 0101 xxxx xxxx */
void upd7810_device::SUINB_E_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = E - imm;
ZHC_SUB( tmp, E, 0 );
E = tmp;
SKIP_NC;
}
/* 74 36: 0111 0100 0011 0110 xxxx xxxx */
void upd7810_device::SUINB_H_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = H - imm;
ZHC_SUB( tmp, H, 0 );
H = tmp;
SKIP_NC;
}
/* 74 37: 0111 0100 0011 0111 xxxx xxxx */
void upd7810_device::SUINB_L_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = L - imm;
ZHC_SUB( tmp, L, 0 );
L = tmp;
SKIP_NC;
}
/* 74 38: 0111 0100 0011 1000 xxxx xxxx */
void upd7810_device::LTI_V_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = V - imm;
ZHC_SUB( tmp, V, 0 );
SKIP_CY;
}
/* 74 39: 0111 0100 0011 1001 xxxx xxxx */
void upd7810_device::LTI_A_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = A - imm;
ZHC_SUB( tmp, A, 0 );
SKIP_CY;
}
/* 74 3a: 0111 0100 0011 1010 xxxx xxxx */
void upd7810_device::LTI_B_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = B - imm;
ZHC_SUB( tmp, B, 0 );
SKIP_CY;
}
/* 74 3b: 0111 0100 0011 1011 xxxx xxxx */
void upd7810_device::LTI_C_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = C - imm;
ZHC_SUB( tmp, C, 0 );
SKIP_CY;
}
/* 74 3c: 0111 0100 0011 1100 xxxx xxxx */
void upd7810_device::LTI_D_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = D - imm;
ZHC_SUB( tmp, D, 0 );
SKIP_CY;
}
/* 74 3d: 0111 0100 0011 1101 xxxx xxxx */
void upd7810_device::LTI_E_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = E - imm;
ZHC_SUB( tmp, E, 0 );
SKIP_CY;
}
/* 74 3e: 0111 0100 0011 1110 xxxx xxxx */
void upd7810_device::LTI_H_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = H - imm;
ZHC_SUB( tmp, H, 0 );
SKIP_CY;
}
/* 74 3f: 0111 0100 0011 1111 xxxx xxxx */
void upd7810_device::LTI_L_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = L - imm;
ZHC_SUB( tmp, L, 0 );
SKIP_CY;
}
/* 74 40: 0111 0100 0100 0000 xxxx xxxx */
void upd7810_device::ADI_V_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = V + imm;
ZHC_ADD( tmp, V, 0 );
V = tmp;
}
/* 74 41: 0111 0100 0100 0001 xxxx xxxx */
void upd7810_device::ADI_A_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = A + imm;
ZHC_ADD( tmp, A, 0 );
A = tmp;
}
/* 74 42: 0111 0100 0100 0010 xxxx xxxx */
void upd7810_device::ADI_B_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = B + imm;
ZHC_ADD( tmp, B, 0 );
B = tmp;
}
/* 74 43: 0111 0100 0100 0011 xxxx xxxx */
void upd7810_device::ADI_C_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = C + imm;
ZHC_ADD( tmp, C, 0 );
C = tmp;
}
/* 74 44: 0111 0100 0100 0100 xxxx xxxx */
void upd7810_device::ADI_D_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = D + imm;
ZHC_ADD( tmp, D, 0 );
D = tmp;
}
/* 74 45: 0111 0100 0100 0101 xxxx xxxx */
void upd7810_device::ADI_E_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = E + imm;
ZHC_ADD( tmp, E, 0 );
E = tmp;
}
/* 74 46: 0111 0100 0100 0110 xxxx xxxx */
void upd7810_device::ADI_H_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = H + imm;
ZHC_ADD( tmp, H, 0 );
H = tmp;
}
/* 74 47: 0111 0100 0100 0111 xxxx xxxx */
void upd7810_device::ADI_L_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = L + imm;
ZHC_ADD( tmp, L, 0 );
L = tmp;
}
/* 74 48: 0111 0100 0100 1000 xxxx xxxx */
void upd7810_device::ONI_V_xx()
{
uint8_t imm;
RDOPARG( imm );
if (V & imm)
PSW |= SK;
}
/* 74 49: 0111 0100 0100 1001 xxxx xxxx */
void upd7810_device::ONI_A_xx()
{
uint8_t imm;
RDOPARG( imm );
if (A & imm)
PSW |= SK;
}
/* 74 4a: 0111 0100 0100 1010 xxxx xxxx */
void upd7810_device::ONI_B_xx()
{
uint8_t imm;
RDOPARG( imm );
if (B & imm)
PSW |= SK;
}
/* 74 4b: 0111 0100 0100 1011 xxxx xxxx */
void upd7810_device::ONI_C_xx()
{
uint8_t imm;
RDOPARG( imm );
if (C & imm)
PSW |= SK;
}
/* 74 4c: 0111 0100 0100 1100 xxxx xxxx */
void upd7810_device::ONI_D_xx()
{
uint8_t imm;
RDOPARG( imm );
if (D & imm)
PSW |= SK;
}
/* 74 4d: 0111 0100 0100 1101 xxxx xxxx */
void upd7810_device::ONI_E_xx()
{
uint8_t imm;
RDOPARG( imm );
if (E & imm)
PSW |= SK;
}
/* 74 4e: 0111 0100 0100 1110 xxxx xxxx */
void upd7810_device::ONI_H_xx()
{
uint8_t imm;
RDOPARG( imm );
if (H & imm)
PSW |= SK;
}
/* 74 4f: 0111 0100 0100 1111 xxxx xxxx */
void upd7810_device::ONI_L_xx()
{
uint8_t imm;
RDOPARG( imm );
if (L & imm)
PSW |= SK;
}
/* 74 50: 0111 0100 0101 0000 xxxx xxxx */
void upd7810_device::ACI_V_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = V + imm + (PSW & CY);
ZHC_ADD( tmp, V, (PSW & CY) );
V = tmp;
}
/* 74 51: 0111 0100 0101 0001 xxxx xxxx */
void upd7810_device::ACI_A_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = A + imm + (PSW & CY);
ZHC_ADD( tmp, A, (PSW & CY) );
A = tmp;
}
/* 74 52: 0111 0100 0101 0010 xxxx xxxx */
void upd7810_device::ACI_B_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = B + imm + (PSW & CY);
ZHC_ADD( tmp, B, (PSW & CY) );
B = tmp;
}
/* 74 53: 0111 0100 0101 0011 xxxx xxxx */
void upd7810_device::ACI_C_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = C + imm + (PSW & CY);
ZHC_ADD( tmp, C, (PSW & CY) );
C = tmp;
}
/* 74 54: 0111 0100 0101 0100 xxxx xxxx */
void upd7810_device::ACI_D_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = D + imm + (PSW & CY);
ZHC_ADD( tmp, D, (PSW & CY) );
D = tmp;
}
/* 74 55: 0111 0100 0101 0101 xxxx xxxx */
void upd7810_device::ACI_E_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = E + imm + (PSW & CY);
ZHC_ADD( tmp, E, (PSW & CY) );
E = tmp;
}
/* 74 56: 0111 0100 0101 0110 xxxx xxxx */
void upd7810_device::ACI_H_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = H + imm + (PSW & CY);
ZHC_ADD( tmp, H, (PSW & CY) );
H = tmp;
}
/* 74 57: 0111 0100 0101 0111 xxxx xxxx */
void upd7810_device::ACI_L_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = L + imm + (PSW & CY);
ZHC_ADD( tmp, L, (PSW & CY) );
L = tmp;
}
/* 74 58: 0111 0100 0101 1000 xxxx xxxx */
void upd7810_device::OFFI_V_xx()
{
uint8_t imm;
RDOPARG( imm );
if (0 == (V & imm))
PSW |= SK;
}
/* 74 59: 0111 0100 0101 1001 xxxx xxxx */
void upd7810_device::OFFI_A_xx()
{
uint8_t imm;
RDOPARG( imm );
if (0 == (A & imm))
PSW |= SK;
}
/* 74 5a: 0111 0100 0101 1010 xxxx xxxx */
void upd7810_device::OFFI_B_xx()
{
uint8_t imm;
RDOPARG( imm );
if (0 == (B & imm))
PSW |= SK;
}
/* 74 5b: 0111 0100 0101 1011 xxxx xxxx */
void upd7810_device::OFFI_C_xx()
{
uint8_t imm;
RDOPARG( imm );
if (0 == (C & imm))
PSW |= SK;
}
/* 74 5c: 0111 0100 0101 1100 xxxx xxxx */
void upd7810_device::OFFI_D_xx()
{
uint8_t imm;
RDOPARG( imm );
if (0 == (D & imm))
PSW |= SK;
}
/* 74 5d: 0111 0100 0101 1101 xxxx xxxx */
void upd7810_device::OFFI_E_xx()
{
uint8_t imm;
RDOPARG( imm );
if (0 == (E & imm))
PSW |= SK;
}
/* 74 5e: 0111 0100 0101 1110 xxxx xxxx */
void upd7810_device::OFFI_H_xx()
{
uint8_t imm;
RDOPARG( imm );
if (0 == (H & imm))
PSW |= SK;
}
/* 74 5f: 0111 0100 0101 1111 xxxx xxxx */
void upd7810_device::OFFI_L_xx()
{
uint8_t imm;
RDOPARG( imm );
if (0 == (L & imm))
PSW |= SK;
}
/* 74 60: 0111 0100 0110 0000 xxxx xxxx */
void upd7810_device::SUI_V_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = V - imm;
ZHC_SUB( tmp, V, 0 );
V = tmp;
}
/* 74 61: 0111 0100 0110 0001 xxxx xxxx */
void upd7810_device::SUI_A_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = A - imm;
ZHC_SUB( tmp, A, 0 );
A = tmp;
}
/* 74 62: 0111 0100 0110 0010 xxxx xxxx */
void upd7810_device::SUI_B_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = B - imm;
ZHC_SUB( tmp, B, 0 );
B = tmp;
}
/* 74 63: 0111 0100 0110 0011 xxxx xxxx */
void upd7810_device::SUI_C_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = C - imm;
ZHC_SUB( tmp, C, 0 );
C = tmp;
}
/* 74 64: 0111 0100 0110 0100 xxxx xxxx */
void upd7810_device::SUI_D_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = D - imm;
ZHC_SUB( tmp, D, 0 );
D = tmp;
}
/* 74 65: 0111 0100 0110 0101 xxxx xxxx */
void upd7810_device::SUI_E_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = E - imm;
ZHC_SUB( tmp, E, 0 );
E = tmp;
}
/* 74 66: 0111 0100 0110 0110 xxxx xxxx */
void upd7810_device::SUI_H_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = H - imm;
ZHC_SUB( tmp, H, 0 );
H = tmp;
}
/* 74 67: 0111 0100 0110 0111 xxxx xxxx */
void upd7810_device::SUI_L_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = L - imm;
ZHC_SUB( tmp, L, 0 );
L = tmp;
}
/* 74 68: 0111 0100 0110 1000 xxxx xxxx */
void upd7810_device::NEI_V_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = V - imm;
ZHC_SUB( tmp, V, 0 );
SKIP_NZ;
}
/* 74 69: 0111 0100 0110 1001 xxxx xxxx */
void upd7810_device::NEI_A_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = A - imm;
ZHC_SUB( tmp, A, 0 );
SKIP_NZ;
}
/* 74 6a: 0111 0100 0110 1010 xxxx xxxx */
void upd7810_device::NEI_B_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = B - imm;
ZHC_SUB( tmp, B, 0 );
SKIP_NZ;
}
/* 74 6b: 0111 0100 0110 1011 xxxx xxxx */
void upd7810_device::NEI_C_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = C - imm;
ZHC_SUB( tmp, C, 0 );
SKIP_NZ;
}
/* 74 6c: 0111 0100 0110 1100 xxxx xxxx */
void upd7810_device::NEI_D_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = D - imm;
ZHC_SUB( tmp, D, 0 );
SKIP_NZ;
}
/* 74 6d: 0111 0100 0110 1101 xxxx xxxx */
void upd7810_device::NEI_E_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = E - imm;
ZHC_SUB( tmp, E, 0 );
SKIP_NZ;
}
/* 74 6e: 0111 0100 0110 1110 xxxx xxxx */
void upd7810_device::NEI_H_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = H - imm;
ZHC_SUB( tmp, H, 0 );
SKIP_NZ;
}
/* 74 6f: 0111 0100 0110 1111 xxxx xxxx */
void upd7810_device::NEI_L_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = L - imm;
ZHC_SUB( tmp, L, 0 );
SKIP_NZ;
}
/* 74 70: 0111 0100 0111 0000 xxxx xxxx */
void upd7810_device::SBI_V_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = V - imm - (PSW & CY);
ZHC_SUB( tmp, V, (PSW & CY) );
V = tmp;
}
/* 74 71: 0111 0100 0111 0001 xxxx xxxx */
void upd7810_device::SBI_A_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = A - imm - (PSW & CY);
ZHC_SUB( tmp, A, (PSW & CY) );
A = tmp;
}
/* 74 72: 0111 0100 0111 0010 xxxx xxxx */
void upd7810_device::SBI_B_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = B - imm - (PSW & CY);
ZHC_SUB( tmp, B, (PSW & CY) );
B = tmp;
}
/* 74 73: 0111 0100 0111 0011 xxxx xxxx */
void upd7810_device::SBI_C_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = C - imm - (PSW & CY);
ZHC_SUB( tmp, C, (PSW & CY) );
C = tmp;
}
/* 74 74: 0111 0100 0111 0100 xxxx xxxx */
void upd7810_device::SBI_D_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = D - imm - (PSW & CY);
ZHC_SUB( tmp, D, (PSW & CY) );
D = tmp;
}
/* 74 75: 0111 0100 0111 0101 xxxx xxxx */
void upd7810_device::SBI_E_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = E - imm - (PSW & CY);
ZHC_SUB( tmp, E, (PSW & CY) );
E = tmp;
}
/* 74 76: 0111 0100 0111 0110 xxxx xxxx */
void upd7810_device::SBI_H_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = H - imm - (PSW & CY);
ZHC_SUB( tmp, H, (PSW & CY) );
H = tmp;
}
/* 74 77: 0111 0100 0111 0111 xxxx xxxx */
void upd7810_device::SBI_L_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = L - imm - (PSW & CY);
ZHC_SUB( tmp, L, (PSW & CY) );
L = tmp;
}
/* 74 78: 0111 0100 0111 1000 xxxx xxxx */
void upd7810_device::EQI_V_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = V - imm;
ZHC_SUB( tmp, V, 0 );
SKIP_Z;
}
/* 74 79: 0111 0100 0111 1001 xxxx xxxx */
void upd7810_device::EQI_A_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = A - imm;
ZHC_SUB( tmp, A, 0 );
SKIP_Z;
}
/* 74 7a: 0111 0100 0111 1010 xxxx xxxx */
void upd7810_device::EQI_B_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = B - imm;
ZHC_SUB( tmp, B, 0 );
SKIP_Z;
}
/* 74 7b: 0111 0100 0111 1011 xxxx xxxx */
void upd7810_device::EQI_C_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = C - imm;
ZHC_SUB( tmp, C, 0 );
SKIP_Z;
}
/* 74 7c: 0111 0100 0111 1100 xxxx xxxx */
void upd7810_device::EQI_D_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = D - imm;
ZHC_SUB( tmp, D, 0 );
SKIP_Z;
}
/* 74 7d: 0111 0100 0111 1101 xxxx xxxx */
void upd7810_device::EQI_E_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = E - imm;
ZHC_SUB( tmp, E, 0 );
SKIP_Z;
}
/* 74 7e: 0111 0100 0111 1110 xxxx xxxx */
void upd7810_device::EQI_H_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = H - imm;
ZHC_SUB( tmp, H, 0 );
SKIP_Z;
}
/* 74 7f: 0111 0100 0111 1111 xxxx xxxx */
void upd7810_device::EQI_L_xx()
{
uint8_t tmp, imm;
RDOPARG( imm );
tmp = L - imm;
ZHC_SUB( tmp, L, 0 );
SKIP_Z;
}
/* 74 88: 0111 0100 1000 1000 oooo oooo */
void upd7810_device::ANAW_wa()
{
PAIR ea = m_va;
RDOPARG( ea.b.l );
A &= RM( ea.d );
SET_Z(A);
}
/* 74 8d: 0111 0100 1000 1101 */
void upd7810_device::DAN_EA_BC()
{
EA &= BC;
SET_Z(EA);
}
/* 74 8e: 0111 0100 1000 1110 */
void upd7810_device::DAN_EA_DE()
{
EA &= DE;
SET_Z(EA);
}
/* 74 8f: 0111 0100 1000 1111 */
void upd7810_device::DAN_EA_HL()
{
EA &= HL;
SET_Z(EA);
}
/* 74 90: 0111 0100 1001 0000 oooo oooo */
void upd7810_device::XRAW_wa()
{
PAIR ea = m_va;
RDOPARG( ea.b.l );
A ^= RM( ea.d );
SET_Z(A);
}
/* 74 95: 0111 0100 1001 0101 */
void upd7810_device::DXR_EA_BC()
{
EA ^= BC;
SET_Z(EA);
}
/* 74 96: 0111 0100 1001 0110 */
void upd7810_device::DXR_EA_DE()
{
EA ^= DE;
SET_Z(EA);
}
/* 74 97: 0111 0100 1001 0111 */
void upd7810_device::DXR_EA_HL()
{
EA ^= HL;
SET_Z(EA);
}
/* 74 98: 0111 0100 1001 1000 oooo oooo */
void upd7810_device::ORAW_wa()
{
PAIR ea = m_va;
RDOPARG( ea.b.l );
A |= RM( ea.d );
SET_Z(A);
}
/* 74 9d: 0111 0100 1001 1101 */
void upd7810_device::DOR_EA_BC()
{
EA |= BC;
SET_Z(EA);
}
/* 74 9e: 0111 0100 1001 1110 */
void upd7810_device::DOR_EA_DE()
{
EA |= DE;
SET_Z(EA);
}
/* 74 9f: 0111 0100 1001 1111 */
void upd7810_device::DOR_EA_HL()
{
EA |= HL;
SET_Z(EA);
}
/* 74 a0: 0111 0100 1010 0000 oooo oooo */
void upd7810_device::ADDNCW_wa()
{
PAIR ea = m_va;
uint8_t tmp;
RDOPARG( ea.b.l );
tmp = A + RM( ea.d );
ZHC_ADD( tmp, A, 0 );
A = tmp;
SKIP_NC;
}
/* 74 a5: 0111 0100 1010 0101 */
void upd7810_device::DADDNC_EA_BC()
{
uint16_t tmp = EA + BC;
ZHC_ADD( tmp, EA, 0 );
EA = tmp;
SKIP_NC;
}
/* 74 a6: 0111 0100 1010 0110 */
void upd7810_device::DADDNC_EA_DE()
{
uint16_t tmp = EA + DE;
ZHC_ADD( tmp, EA, 0 );
EA = tmp;
SKIP_NC;
}
/* 74 a7: 0111 0100 1010 0111 */
void upd7810_device::DADDNC_EA_HL()
{
uint16_t tmp = EA + HL;
ZHC_ADD( tmp, EA, 0 );
EA = tmp;
SKIP_NC;
}
/* 74 a8: 0111 0100 1010 1000 oooo oooo */
void upd7810_device::GTAW_wa()
{
PAIR ea = m_va;
uint16_t tmp;
RDOPARG( ea.b.l );
tmp = A - RM( ea.d ) - 1;
ZHC_SUB( tmp, A, 0 );
SKIP_NC;
}
/* 74 ad: 0111 0100 1010 1101 */
void upd7810_device::DGT_EA_BC()
{
uint32_t tmp = EA - BC - 1;
ZHC_SUB( tmp, EA, 0 );
SKIP_NC;
}
/* 74 ae: 0111 0100 1010 1110 */
void upd7810_device::DGT_EA_DE()
{
uint32_t tmp = EA - DE - 1;
ZHC_SUB( tmp, EA, 0 );
SKIP_NC;
}
/* 74 af: 0111 0100 1010 1111 */
void upd7810_device::DGT_EA_HL()
{
uint32_t tmp = EA - HL - 1;
ZHC_SUB( tmp, EA, 0 );
SKIP_NC;
}
/* 74 b0: 0111 0100 1011 0000 oooo oooo */
void upd7810_device::SUBNBW_wa()
{
PAIR ea = m_va;
uint8_t tmp;
RDOPARG( ea.b.l );
tmp = A - RM( ea.d );
ZHC_SUB( tmp, A, 0 );
A = tmp;
SKIP_NC;
}
/* 74 b5: 0111 0100 1011 0101 */
void upd7810_device::DSUBNB_EA_BC()
{
uint16_t tmp = EA - BC;
ZHC_SUB( tmp, EA, 0 );
EA = tmp;
SKIP_NC;
}
/* 74 b6: 0111 0100 1011 0110 */
void upd7810_device::DSUBNB_EA_DE()
{
uint16_t tmp = EA - DE;
ZHC_SUB( tmp, EA, 0 );
EA = tmp;
SKIP_NC;
}
/* 74 b7: 0111 0100 1011 0111 */
void upd7810_device::DSUBNB_EA_HL()
{
uint16_t tmp;
tmp = EA - HL;
ZHC_SUB( tmp, EA, 0 );
EA = tmp;
SKIP_NC;
}
/* 74 b8: 0111 0100 1011 1000 oooo oooo */
void upd7810_device::LTAW_wa()
{
PAIR ea = m_va;
uint8_t tmp;
RDOPARG( ea.b.l );
tmp = A - RM( ea.d );
ZHC_SUB( tmp, A, 0 );
SKIP_CY;
}
/* 74 bd: 0111 0100 1011 1101 */
void upd7810_device::DLT_EA_BC()
{
uint16_t tmp = EA - BC;
ZHC_SUB( tmp, EA, 0 );
SKIP_CY;
}
/* 74 be: 0111 0100 1011 1110 */
void upd7810_device::DLT_EA_DE()
{
uint16_t tmp = EA - DE;
ZHC_SUB( tmp, EA, 0 );
SKIP_CY;
}
/* 74 bf: 0111 0100 1011 1111 */
void upd7810_device::DLT_EA_HL()
{
uint16_t tmp = EA - HL;
ZHC_SUB( tmp, EA, 0 );
SKIP_CY;
}
/* 74 c0: 0111 0100 1100 0000 oooo oooo */
void upd7810_device::ADDW_wa()
{
PAIR ea = m_va;
uint8_t tmp;
RDOPARG( ea.b.l );
tmp = A + RM( ea.d );
ZHC_ADD( tmp, A, 0 );
A = tmp;
}
/* 74 c5: 0111 0100 1100 0101 */
void upd7810_device::DADD_EA_BC()
{
uint16_t tmp = EA + BC;
ZHC_ADD( tmp, EA, 0 );
EA = tmp;
}
/* 74 c6: 0111 0100 1100 0110 */
void upd7810_device::DADD_EA_DE()
{
uint16_t tmp = EA + DE;
ZHC_ADD( tmp, EA, 0 );
EA = tmp;
}
/* 74 c7: 0111 0100 1100 0111 */
void upd7810_device::DADD_EA_HL()
{
uint16_t tmp = EA + HL;
ZHC_ADD( tmp, EA, 0 );
EA = tmp;
}
/* 74 c8: 0111 0100 1100 1000 oooo oooo */
void upd7810_device::ONAW_wa()
{
PAIR ea = m_va;
RDOPARG( ea.b.l );
if (A & RM( ea.d ))
PSW = (PSW & ~Z) | SK;
else
PSW |= Z;
}
/* 74 cd: 0111 0100 1100 1101 */
void upd7810_device::DON_EA_BC()
{
if (EA & BC)
PSW = (PSW & ~Z) | SK;
else
PSW |= Z;
}
/* 74 ce: 0111 0100 1100 1110 */
void upd7810_device::DON_EA_DE()
{
if (EA & DE)
PSW = (PSW & ~Z) | SK;
else
PSW |= Z;
}
/* 74 cf: 0111 0100 1100 1111 */
void upd7810_device::DON_EA_HL()
{
if (EA & HL)
PSW = (PSW & ~Z) | SK;
else
PSW |= Z;
}
/* 74 d0: 0111 0100 1101 0000 oooo oooo */
void upd7810_device::ADCW_wa()
{
PAIR ea = m_va;
uint8_t tmp;
RDOPARG( ea.b.l );
tmp = A + RM( ea.d ) + (PSW & CY);
ZHC_ADD( tmp, A, (PSW & CY) );
A = tmp;
}
/* 74 d5: 0111 0100 1101 0101 */
void upd7810_device::DADC_EA_BC()
{
uint16_t tmp = EA + BC + (PSW & CY);
ZHC_ADD( tmp, EA, (PSW & CY) );
EA = tmp;
}
/* 74 d6: 0111 0100 1101 0110 */
void upd7810_device::DADC_EA_DE()
{
uint16_t tmp = EA + DE + (PSW & CY);
ZHC_ADD( tmp, EA, (PSW & CY) );
EA = tmp;
}
/* 74 d7: 0111 0100 1101 0111 */
void upd7810_device::DADC_EA_HL()
{
uint16_t tmp = EA + HL + (PSW & CY);
ZHC_ADD( tmp, EA, (PSW & CY) );
EA = tmp;
}
/* 74 d8: 0111 0100 1101 1000 oooo oooo */
void upd7810_device::OFFAW_wa()
{
PAIR ea = m_va;
RDOPARG( ea.b.l );
if ( A & RM( ea.d ) )
PSW &= ~Z;
else
PSW = PSW | Z | SK;
}
/* 74 dd: 0111 0100 1101 1101 */
void upd7810_device::DOFF_EA_BC()
{
if ( EA & BC )
PSW &= ~Z;
else
PSW = PSW | Z | SK;
}
/* 74 de: 0111 0100 1101 1110 */
void upd7810_device::DOFF_EA_DE()
{
if ( EA & DE )
PSW &= ~Z;
else
PSW = PSW | Z | SK;
}
/* 74 df: 0111 0100 1101 1111 */
void upd7810_device::DOFF_EA_HL()
{
if ( EA & HL )
PSW &= ~Z;
else
PSW = PSW | Z | SK;
}
/* 74 e0: 0111 0100 1110 0000 oooo oooo */
void upd7810_device::SUBW_wa()
{
PAIR ea = m_va;
uint8_t tmp;
RDOPARG( ea.b.l );
tmp = A - RM( ea.d );
ZHC_SUB( tmp, A, 0 );
A = tmp;
}
/* 74 e5: 0111 0100 1110 0101 */
void upd7810_device::DSUB_EA_BC()
{
uint16_t tmp = EA - BC;
ZHC_SUB( tmp, EA, 0 );
EA = tmp;
}
/* 74 e6: 0111 0100 1110 0110 */
void upd7810_device::DSUB_EA_DE()
{
uint16_t tmp = EA - DE;
ZHC_SUB( tmp, EA, 0 );
EA = tmp;
}
/* 74 e7: 0111 0100 1110 0111 */
void upd7810_device::DSUB_EA_HL()
{
uint16_t tmp = EA - HL;
ZHC_SUB( tmp, EA, 0 );
EA = tmp;
}
/* 74 e8: 0111 0100 1110 1000 oooo oooo */
void upd7810_device::NEAW_wa()
{
PAIR ea = m_va;
uint8_t tmp;
RDOPARG( ea.b.l );
tmp = A - RM( ea.d );
ZHC_SUB( tmp, A, 0 );
SKIP_NZ;
}
/* 74 ed: 0111 0100 1110 1101 */
void upd7810_device::DNE_EA_BC()
{
uint16_t tmp;
tmp = EA - BC;
ZHC_SUB( tmp, EA, 0 );
SKIP_NZ;
}
/* 74 ee: 0111 0100 1110 1110 */
void upd7810_device::DNE_EA_DE()
{
uint16_t tmp;
tmp = EA - DE;
ZHC_SUB( tmp, EA, 0 );
SKIP_NZ;
}
/* 74 ef: 0111 0100 1110 1111 */
void upd7810_device::DNE_EA_HL()
{
uint16_t tmp;
tmp = EA - HL;
ZHC_SUB( tmp, EA, 0 );
SKIP_NZ;
}
/* 74 f0: 0111 0100 1111 0000 oooo oooo */
void upd7810_device::SBBW_wa()
{
PAIR ea = m_va;
uint8_t tmp;
RDOPARG( ea.b.l );
tmp = A - RM( ea.d ) - (PSW & CY);
ZHC_SUB( tmp, A, (PSW & CY) );
A = tmp;
}
/* 74 f5: 0111 0100 1111 0101 */
void upd7810_device::DSBB_EA_BC()
{
uint16_t tmp = EA - BC - (PSW & CY);
ZHC_SUB( tmp, EA, (PSW & CY) );
EA = tmp;
}
/* 74 f6: 0111 0100 1111 0110 */
void upd7810_device::DSBB_EA_DE()
{
uint16_t tmp = EA - DE - (PSW & CY);
ZHC_SUB( tmp, EA, (PSW & CY) );
EA = tmp;
}
/* 74 f7: 0111 0100 1111 0111 */
void upd7810_device::DSBB_EA_HL()
{
uint16_t tmp = EA - HL - (PSW & CY);
ZHC_SUB( tmp, EA, (PSW & CY) );
EA = tmp;
}
/* 74 f8: 0111 0100 1111 1000 oooo oooo */
void upd7810_device::EQAW_wa()
{
PAIR ea = m_va;
uint8_t tmp;
RDOPARG( ea.b.l );
tmp = A - RM( ea.d );
ZHC_SUB( tmp, A, 0 );
SKIP_Z;
}
/* 74 fd: 0111 0100 1111 1101 */
void upd7810_device::DEQ_EA_BC()
{
uint16_t tmp;
tmp = EA - BC;
ZHC_SUB( tmp, EA, 0 );
SKIP_Z;
}
/* 74 fe: 0111 0100 1111 1110 */
void upd7810_device::DEQ_EA_DE()
{
uint16_t tmp;
tmp = EA - DE;
ZHC_SUB( tmp, EA, 0 );
SKIP_Z;
}
/* 74 ff: 0111 0100 1111 1111 */
void upd7810_device::DEQ_EA_HL()
{
uint16_t tmp;
tmp = EA - HL;
ZHC_SUB( tmp, EA, 0 );
SKIP_Z;
}
/************************************************
* main opcodes
************************************************/
/* 00: 0000 0000 */
void upd7810_device::NOP()
{
}
/* 01: 0000 0001 oooo oooo */
void upd7810_device::LDAW_wa()
{
PAIR ea = m_va;
RDOPARG( ea.b.l );
A = RM( ea.d );
}
/* 02: 0000 0010 */
void upd7810_device::INX_SP()
{
SP++;
}
/* 03: 0000 0011 */
void upd7810_device::DCX_SP()
{
SP--;
}
/* 04: 0000 0100 llll llll hhhh hhhh */
void upd7810_device::LXI_S_w()
{
RDOPARG( SPL );
RDOPARG( SPH );
}
/* 05: 0000 0101 oooo oooo xxxx xxxx */
void upd7810_device::ANIW_wa_xx()
{
PAIR ea = m_va;
uint8_t m, imm;
RDOPARG( ea.b.l );
RDOPARG( imm );
m = RM( ea.d );
m &= imm;
WM( ea.d, m );
SET_Z(m);
}
/* 07: 0000 0111 xxxx xxxx */
/* ANI_A_xx already defined (long form) */
/* 08: 0000 1000 */
void upd7810_device::MOV_A_EAH()
{
A = EAH;
}
/* 09: 0000 1001 */
void upd7810_device::MOV_A_EAL()
{
A = EAL;
}
/* 0a: 0000 1010 */
void upd7810_device::MOV_A_B()
{
A = B;
}
/* 0b: 0000 1011 */
void upd7810_device::MOV_A_C()
{
A = C;
}
/* 0c: 0000 1100 */
void upd7810_device::MOV_A_D()
{
A = D;
}
/* 0d: 0000 1101 */
void upd7810_device::MOV_A_E()
{
A = E;
}
/* 0e: 0000 1110 */
void upd7810_device::MOV_A_H()
{
A = H;
}
/* 0f: 0000 1111 */
void upd7810_device::MOV_A_L()
{
A = L;
}
/* 10: 0001 0000 */
void upd7810_device::EXA()
{
uint16_t tmp;
tmp = EA; EA = EA2; EA2 = tmp;
tmp = VA; VA = VA2; VA2 = tmp;
}
/* 11: 0001 0001 */
void upd7810_device::EXX()
{
uint16_t tmp;
tmp = BC; BC = BC2; BC2 = tmp;
tmp = DE; DE = DE2; DE2 = tmp;
tmp = HL; HL = HL2; HL2 = tmp;
}
/* 48 AD (7807 only) */
void upd7810_device::EXR()
{
uint16_t tmp;
tmp = BC; BC = BC2; BC2 = tmp;
tmp = DE; DE = DE2; DE2 = tmp;
tmp = HL; HL = HL2; HL2 = tmp;
tmp = EA; EA = EA2; EA2 = tmp;
tmp = VA; VA = VA2; VA2 = tmp;
}
/* 12: 0001 0010 */
void upd7810_device::INX_BC()
{
BC++;
}
/* 13: 0001 0011 */
void upd7810_device::DCX_BC()
{
BC--;
}
/* 14: 0001 0100 llll llll hhhh hhhh */
void upd7810_device::LXI_B_w()
{
RDOPARG( C );
RDOPARG( B );
}
/* 15: 0001 0101 oooo oooo xxxx xxxx */
void upd7810_device::ORIW_wa_xx()
{
PAIR ea = m_va;
uint8_t m, imm;
RDOPARG( ea.b.l );
RDOPARG( imm );
m = RM( ea.d );
m |= imm;
WM( ea.d, m );
SET_Z(m);
}
/* 16: 0001 0110 xxxx xxxx */
/* XRI_A_xx already defined (long form) */
/* 17: 0001 0111 xxxx xxxx */
/* ORI_A_xx already defined (long form) */
/* 18: 0001 1000 */
void upd7810_device::MOV_EAH_A()
{
EAH = A;
}
/* 19: 0001 1001 */
void upd7810_device::MOV_EAL_A()
{
EAL = A;
}
/* 1a: 0001 1010 */
void upd7810_device::MOV_B_A()
{
B = A;
}
/* 1b: 0001 1011 */
void upd7810_device::MOV_C_A()
{
C = A;
}
/* 1c: 0001 1100 */
void upd7810_device::MOV_D_A()
{
D = A;
}
/* 1d: 0001 1101 */
void upd7810_device::MOV_E_A()
{
E = A;
}
/* 1e: 0001 1110 */
void upd7810_device::MOV_H_A()
{
H = A;
}
/* 1f: 0001 1111 */
void upd7810_device::MOV_L_A()
{
L = A;
}
/* 20: 0010 0000 oooo oooo */
void upd7810_device::INRW_wa()
{
PAIR ea = m_va;
uint8_t tmp, m;
uint8_t old_cy = PSW & CY;
RDOPARG( ea.b.l );
m = RM( ea.d );
tmp = m + 1;
ZHC_ADD( tmp, m, 0 );
WM( ea.d, tmp );
SKIP_CY;
PSW = ( PSW & ~CY ) | old_cy;
}
/* 21: 0010 0001 */
void upd7810_device::JB()
{
PC = BC;
}
/* 22: 0010 0010 */
void upd7810_device::INX_DE()
{
DE++;
}
/* 23: 0010 0011 */
void upd7810_device::DCX_DE()
{
DE--;
}
/* 24: 0010 0100 llll llll hhhh hhhh */
void upd7810_device::LXI_D_w()
{
RDOPARG( E );
RDOPARG( D );
}
/* 25: 0010 0101 oooo oooo xxxx xxxx */
void upd7810_device::GTIW_wa_xx()
{
PAIR ea = m_va;
uint8_t m, imm;
uint16_t tmp;
RDOPARG( ea.b.l );
RDOPARG( imm );
m = RM( ea.d );
tmp = m - imm - 1;
ZHC_SUB( tmp, m, 0 );
SKIP_NC;
}
/* 26: 0010 0110 xxxx xxxx */
/* ADINC_A_xx already defined (long form) */
/* 27: 0010 0111 xxxx xxxx */
/* GTI_A_xx already defined (long form) */
/* 29: 0010 1001 */
void upd7810_device::LDAX_B()
{
A = RM( BC );
}
/* 2a: 0010 1010 */
void upd7810_device::LDAX_D()
{
A = RM( DE );
}
/* 2b: 0010 1011 */
void upd7810_device::LDAX_H()
{
A = RM( HL );
}
/* 2c: 0010 1100 */
void upd7810_device::LDAX_Dp()
{
A = RM( DE );
DE++;
}
/* 2d: 0010 1101 dddd dddd */
void upd7810_device::LDAX_Hp()
{
A = RM( HL );
HL++;
}
/* 2e: 0010 1110 dddd dddd */
void upd7810_device::LDAX_Dm()
{
A = RM( DE );
DE--;
}
/* 2f: 0010 1111 dddd dddd */
void upd7810_device::LDAX_Hm()
{
A = RM( HL );
HL--;
}
/* 30: 0011 0000 oooo oooo */
void upd7810_device::DCRW_wa()
{
PAIR ea = m_va;
uint8_t tmp, m;
uint8_t old_cy = PSW & CY;
RDOPARG( ea.b.l );
m = RM( ea.d );
tmp = m - 1;
ZHC_SUB( tmp, m, 0 );
WM( ea.d, tmp );
SKIP_CY;
PSW = ( PSW & ~CY ) | old_cy;
}
/* 31: 0011 0001 */
void upd7810_device::BLOCK()
{
WM( DE, RM( HL ) );
DE++;
HL++;
C--;
if (C == 0xff)
PSW |= CY;
else
{
PSW &= ~CY;
PC--;
}
}
/* 32: 0011 0010 */
void upd7810_device::INX_HL()
{
HL++;
}
/* 33: 0011 0011 */
void upd7810_device::DCX_HL()
{
HL--;
}
/* 34: 0011 0100 llll llll hhhh hhhh */
void upd7810_device::LXI_H_w()
{
if (PSW & L0) { /* overlay active? */
PC+=2;
return;
}
RDOPARG( L );
RDOPARG( H );
PSW |= L0;
}
/* 35: 0011 0101 oooo oooo xxxx xxxx */
void upd7810_device::LTIW_wa_xx()
{
PAIR ea = m_va;
uint8_t tmp, m, imm;
RDOPARG( ea.b.l );
RDOPARG( imm );
m = RM( ea.d );
tmp = m - imm;
ZHC_SUB( tmp, m, 0 );
SKIP_CY;
}
/* 36: 0011 0110 xxxx xxxx */
/* SUINB_A_xx already defined (long form) */
/* 37: 0011 0111 xxxx xxxx */
/* LTI_A_xx already defined (long form) */
/* 39: 0011 1001 */
void upd7810_device::STAX_B()
{
WM( BC, A );
}
/* 3a: 0011 1010 */
void upd7810_device::STAX_D()
{
WM( DE, A );
}
/* 3b: 0011 1011 */
void upd7810_device::STAX_H()
{
WM( HL, A );
}
/* 3c: 0011 1100 */
void upd7810_device::STAX_Dp()
{
WM( DE, A );
DE++;
}
/* 3d: 0011 1101 */
void upd7810_device::STAX_Hp()
{
WM( HL, A );
HL++;
}
/* 3e: 0011 1110 */
void upd7810_device::STAX_Dm()
{
WM( DE, A );
DE--;
}
/* 3f: 0011 1111 */
void upd7810_device::STAX_Hm()
{
WM( HL, A );
HL--;
}
/* 40: 0100 0000 llll llll hhhh hhhh */
void upd7810_device::CALL_w()
{
PAIR w;
w.d = 0;
RDOPARG( w.b.l );
RDOPARG( w.b.h );
SP--;
WM( SPD, PCH );
SP--;
WM( SPD, PCL );
PC = w.w.l;
}
/* 41: 0100 0001 */
void upd7810_device::INR_A()
{
uint8_t old_cy = PSW & CY;
uint8_t tmp = A + 1;
ZHC_ADD( tmp, A, 0 );
A = tmp;
SKIP_CY;
PSW = ( PSW & ~CY ) | old_cy;
}
/* 42: 0100 0010 */
void upd7810_device::INR_B()
{
uint8_t old_cy = PSW & CY;
uint8_t tmp = B + 1;
ZHC_ADD( tmp, B, 0 );
B = tmp;
SKIP_CY;
PSW = ( PSW & ~CY ) | old_cy;
}
/* 43: 0100 0011 */
void upd7810_device::INR_C()
{
uint8_t old_cy = PSW & CY;
uint8_t tmp = C + 1;
ZHC_ADD( tmp, C, 0 );
C = tmp;
SKIP_CY;
PSW = ( PSW & ~CY ) | old_cy;
}
/* 44: 0100 0100 llll llll hhhh hhhh */
void upd7810_device::LXI_EA_s()
{
RDOPARG( EAL );
RDOPARG( EAH );
}
/* 45: 0100 0101 oooo oooo xxxx xxxx */
void upd7810_device::ONIW_wa_xx()
{
PAIR ea = m_va;
uint8_t imm;
RDOPARG( ea.b.l );
RDOPARG( imm );
if (RM( ea.d ) & imm)
PSW |= SK;
}
/* 46: 0100 0110 xxxx xxxx */
/* ADI_A_xx already defined (long form) */
/* 47: 0100 0111 xxxx xxxx */
/* ONI_A_xx already defined (long form) */
/* 48: prefix */
void upd7810_device::PRE_48()
{
RDOP(OP2);
m_icount -= m_op48[OP2].cycles;
handle_timers(m_op48[OP2].cycles);
(this->*m_op48[OP2].opfunc)();
}
/* 49: 0100 1001 xxxx xxxx */
void upd7810_device::MVIX_BC_xx()
{
uint8_t imm;
RDOPARG( imm );
WM( BC, imm );
}
/* 4a: 0100 1010 xxxx xxxx */
void upd7810_device::MVIX_DE_xx()
{
uint8_t imm;
RDOPARG( imm );
WM( DE, imm );
}
/* 4b: 0100 1011 xxxx xxxx */
void upd7810_device::MVIX_HL_xx()
{
uint8_t imm;
RDOPARG( imm );
WM( HL, imm );
}
/* 4c: prefix */
void upd7810_device::PRE_4C()
{
RDOP(OP2);
m_icount -= m_op4C[OP2].cycles;
handle_timers(m_op4C[OP2].cycles);
(this->*m_op4C[OP2].opfunc)();
}
/* 4d: prefix */
void upd7810_device::PRE_4D()
{
RDOP(OP2);
m_icount -= m_op4D[OP2].cycles;
handle_timers(m_op4D[OP2].cycles);
(this->*m_op4D[OP2].opfunc)();
}
/* 4e: 0100 111d dddd dddd */
void upd7810_device::JRE()
{
uint8_t offs;
RDOPARG( offs );
if (OP & 0x01)
PC -= 256 - offs;
else
PC += offs;
}
/* 50: 0101 0000 */
void upd7810_device::EXH()
{
uint16_t tmp;
tmp = HL; HL = HL2; HL2 = tmp;
}
/* 51: 0101 0001 */
void upd7810_device::DCR_A()
{
uint8_t old_cy = PSW & CY;
uint8_t tmp = A - 1;
ZHC_SUB( tmp, A, 0 );
A = tmp;
SKIP_CY;
PSW = ( PSW & ~CY ) | old_cy;
}
/* 52: 0101 0010 */
void upd7810_device::DCR_B()
{
uint8_t old_cy = PSW & CY;
uint8_t tmp = B - 1;
ZHC_SUB( tmp, B, 0 );
B = tmp;
SKIP_CY;
PSW = ( PSW & ~CY ) | old_cy;
}
/* 53: 0101 0011 */
void upd7810_device::DCR_C()
{
uint8_t old_cy = PSW & CY;
uint8_t tmp = C - 1;
ZHC_SUB( tmp, C, 0 );
C = tmp;
SKIP_CY;
PSW = ( PSW & ~CY ) | old_cy;
}
/* 54: 0101 0100 llll llll hhhh hhhh */
void upd7810_device::JMP_w()
{
PAIR w;
w.d = 0;
RDOPARG( w.b.l );
RDOPARG( w.b.h );
PCD = w.d;
}
/* 55: 0101 0101 oooo oooo xxxx xxxx */
void upd7810_device::OFFIW_wa_xx()
{
PAIR ea = m_va;
uint8_t imm;
RDOPARG( ea.b.l );
RDOPARG( imm );
if (0 == (RM( ea.d ) & imm))
PSW |= SK;
}
/* 56: 0101 0110 xxxx xxxx */
/* ACI_A_xx already defined (long form) */
/* 57: 0101 0111 xxxx xxxx */
/* OFFI_A_xx already defined (long form) */
/* 58: 0101 1000 oooo oooo (7810 only) */
void upd7810_device::BIT_0_wa()
{
PAIR ea = m_va;
RDOPARG( ea.b.l );
if (RM( ea.d ) & 0x01)
PSW |= SK;
}
/* 59: 0101 1001 oooo oooo (7810 only) */
void upd7810_device::BIT_1_wa()
{
PAIR ea = m_va;
RDOPARG( ea.b.l );
if (RM( ea.d ) & 0x02)
PSW |= SK;
}
/* 5a: 0101 1010 oooo oooo (7810 only) */
void upd7810_device::BIT_2_wa()
{
PAIR ea = m_va;
RDOPARG( ea.b.l );
if (RM( ea.d ) & 0x04)
PSW |= SK;
}
/* 5b: 0101 1011 oooo oooo (7810 only) */
void upd7810_device::BIT_3_wa()
{
PAIR ea = m_va;
RDOPARG( ea.b.l );
if (RM( ea.d ) & 0x08)
PSW |= SK;
}
/* 5c: 0101 1100 oooo oooo (7810 only) */
void upd7810_device::BIT_4_wa()
{
PAIR ea = m_va;
RDOPARG( ea.b.l );
if (RM( ea.d ) & 0x10)
PSW |= SK;
}
/* 5d: 0101 1101 oooo oooo (7810 only) */
void upd7810_device::BIT_5_wa()
{
PAIR ea = m_va;
RDOPARG( ea.b.l );
if (RM( ea.d ) & 0x20)
PSW |= SK;
}
/* 5e: 0101 1110 oooo oooo (7810 only) */
void upd7810_device::BIT_6_wa()
{
PAIR ea = m_va;
RDOPARG( ea.b.l );
if (RM( ea.d ) & 0x40)
PSW |= SK;
}
/* 5f: 0101 1111 oooo oooo (7810 only) */
void upd7810_device::BIT_7_wa()
{
PAIR ea = m_va;
RDOPARG( ea.b.l );
if (RM( ea.d ) & 0x80)
PSW |= SK;
}
/* 5d: 0101 1111 bbbb bbbb (7807 only) */
void upd7810_device::SKN_bit()
{
uint8_t imm;
int val;
RDOPARG( imm );
switch( imm & 0x1f )
{
case 0x10: /* PA */
val = RP( UPD7810_PORTA );
break;
case 0x11: /* PB */
val = RP( UPD7810_PORTB );
break;
case 0x12: /* PC */
val = RP( UPD7810_PORTC );
break;
case 0x13: /* PD */
val = RP( UPD7810_PORTD );
break;
case 0x15: /* PF */
val = RP( UPD7810_PORTF );
break;
case 0x16: /* MKH */
val = MKH;
break;
case 0x17: /* MKL */
val = MKL;
break;
case 0x19: /* SMH */
val = SMH;
break;
case 0x1b: /* EOM */
val = EOM;
break;
case 0x1d: /* TMM */
val = TMM;
break;
case 0x1e: /* PT */
val = RP( UPD7807_PORTT );
break;
default:
logerror("uPD7810 '%s': illegal opcode %02x %02x at PC:%04x\n", tag(), OP, imm, PC);
val = 0;
break;
}
if (~val & (1 << (imm >> 5)))
PSW |= SK;
}
/* 58: 0101 1000 bbbb bbbb (7807 only) */
void upd7810_device::SETB()
{
uint8_t imm;
int bit;
RDOPARG( imm );
bit = imm >> 5;
switch( imm & 0x1f )
{
case 0x10: /* PA */
WP( UPD7810_PORTA, RP( UPD7810_PORTA ) | (1 << bit));
break;
case 0x11: /* PB */
WP( UPD7810_PORTB, RP( UPD7810_PORTB ) | (1 << bit));
break;
case 0x12: /* PC */
WP( UPD7810_PORTC, RP( UPD7810_PORTC ) | (1 << bit));
break;
case 0x13: /* PD */
WP( UPD7810_PORTD, RP( UPD7810_PORTD ) | (1 << bit));
break;
case 0x15: /* PF */
WP( UPD7810_PORTF, RP( UPD7810_PORTF ) | (1 << bit));
break;
case 0x16: /* MKH */
MKH |= (1 << bit);
break;
case 0x17: /* MKL */
MKL |= (1 << bit);
break;
case 0x19: /* SMH */
SMH |= (1 << bit);
break;
case 0x1b: /* EOM */
EOM |= (1 << bit);
break;
case 0x1d: /* TMM */
TMM |= (1 << bit);
break;
// case 0x1e: /* PT */
// PT is input only
// break;
default:
logerror("uPD7810 '%s': illegal opcode %02x %02x at PC:%04x\n", tag(), OP, imm, PC);
break;
}
}
/* 5b: 0101 1011 bbbb bbbb (7807 only) */
void upd7810_device::CLR()
{
uint8_t imm;
int bit;
RDOPARG( imm );
bit = imm >> 5;
switch( imm & 0x1f )
{
case 0x10: /* PA */
WP( UPD7810_PORTA, RP( UPD7810_PORTA ) & ~(1 << bit));
break;
case 0x11: /* PB */
WP( UPD7810_PORTB, RP( UPD7810_PORTB ) & ~(1 << bit));
break;
case 0x12: /* PC */
WP( UPD7810_PORTC, RP( UPD7810_PORTC ) & ~(1 << bit));
break;
case 0x13: /* PD */
WP( UPD7810_PORTD, RP( UPD7810_PORTD ) & ~(1 << bit));
break;
case 0x15: /* PF */
WP( UPD7810_PORTF, RP( UPD7810_PORTF ) & ~(1 << bit));
break;
case 0x16: /* MKH */
MKH &= ~(1 << bit);
break;
case 0x17: /* MKL */
MKL &= ~(1 << bit);
break;
case 0x19: /* SMH */
SMH &= ~(1 << bit);
break;
case 0x1b: /* EOM */
EOM &= ~(1 << bit);
break;
case 0x1d: /* TMM */
TMM &= ~(1 << bit);
break;
// case 0x1e: /* PT */
// PT is input only
// break;
default:
logerror("uPD7810 '%s': illegal opcode %02x %02x at PC:%04x\n", tag(), OP, imm, PC);
break;
}
}
/* 5d: 0101 1111 bbbb bbbb (7807 only) */
void upd7810_device::SK_bit()
{
uint8_t imm;
int val;
RDOPARG( imm );
switch( imm & 0x1f )
{
case 0x10: /* PA */
val = RP( UPD7810_PORTA );
break;
case 0x11: /* PB */
val = RP( UPD7810_PORTB );
break;
case 0x12: /* PC */
val = RP( UPD7810_PORTC );
break;
case 0x13: /* PD */
val = RP( UPD7810_PORTD );
break;
case 0x15: /* PF */
val = RP( UPD7810_PORTF );
break;
case 0x16: /* MKH */
val = MKH;
break;
case 0x17: /* MKL */
val = MKL;
break;
case 0x19: /* SMH */
val = SMH;
break;
case 0x1b: /* EOM */
val = EOM;
break;
case 0x1d: /* TMM */
val = TMM;
break;
case 0x1e: /* PT */
val = RP( UPD7807_PORTT );
break;
default:
logerror("uPD7810 '%s': illegal opcode %02x %02x at PC:%04x\n", tag(), OP, imm, PC);
val = 0;
break;
}
if (val & (1 << (imm >> 5)))
PSW |= SK;
}
/* 60:*/
void upd7810_device::PRE_60()
{
RDOP(OP2);
m_icount -= m_op60[OP2].cycles;
handle_timers(m_op60[OP2].cycles);
(this->*m_op60[OP2].opfunc)();
}
/* 61: 0110 0001 */
void upd7810_device::DAA()
{
uint8_t l = A & 0x0f;
uint8_t h = A >> 4;
uint8_t adj = 0x00;
uint8_t old_cy = PSW & CY;
if (0 == (PSW & HC))
{
if (l < 10)
{
if (!(h < 10 && 0 == (PSW & CY)))
adj = 0x60;
}
else
{
if (h < 9 && 0 == (PSW & CY))
adj = 0x06;
else
adj = 0x66;
}
}
else if (l < 3)
{
if (h < 10 && 0 == (PSW & CY))
adj = 0x06;
else
adj = 0x66;
}
uint8_t tmp = A + adj;
ZHC_ADD( tmp, A, PSW & CY );
PSW |= old_cy;
A = tmp;
}
/* 62: 0110 0010 */
void upd7810_device::RETI()
{
PCL = RM( SPD );
SP++;
PCH = RM( SPD );
SP++;
PSW = RM( SPD );
SP++;
}
/* 63: 0110 0011 oooo oooo */
void upd7810_device::STAW_wa()
{
PAIR ea = m_va;
RDOPARG( ea.b.l );
WM( ea.d, A );
}
/* 64: prefix */
void upd7810_device::PRE_64()
{
RDOP(OP2);
m_icount -= m_op64[OP2].cycles;
handle_timers(m_op64[OP2].cycles);
(this->*m_op64[OP2].opfunc)();
}
/* 65: 0110 0101 oooo oooo xxxx xxxx */
void upd7810_device::NEIW_wa_xx()
{
PAIR ea = m_va;
uint8_t tmp, m, imm;
RDOPARG( ea.b.l );
RDOPARG( imm );
m = RM( ea.d );
tmp = m - imm;
ZHC_SUB( tmp, m, 0 );
SKIP_NZ;
}
/* 66: 0110 0110 xxxx xxxx */
/* SUI_A_xx already defined (long form) */
/* 67: 0110 0111 xxxx xxxx */
/* NEI_A_xx already defined (long form) */
/* 68: 0110 1000 xxxx xxxx */
void upd7810_device::MVI_V_xx()
{
RDOPARG( V );
}
/* 69: 0110 1001 xxxx xxxx */
void upd7810_device::MVI_A_xx()
{
if (PSW & L1) { /* overlay active? */
PC++;
return; /* NOP */
}
RDOPARG( A );
PSW |= L1;
}
/* 6a: 0110 1010 xxxx xxxx */
void upd7810_device::MVI_B_xx()
{
RDOPARG( B );
}
/* 6b: 0110 1011 xxxx xxxx */
void upd7810_device::MVI_C_xx()
{
RDOPARG( C );
}
/* 6c: 0110 1100 xxxx xxxx */
void upd7810_device::MVI_D_xx()
{
RDOPARG( D );
}
/* 6d: 0110 1101 xxxx xxxx */
void upd7810_device::MVI_E_xx()
{
RDOPARG( E );
}
/* 6e: 0110 1110 xxxx xxxx */
void upd7810_device::MVI_H_xx()
{
RDOPARG( H );
}
/* 6f: 0110 1111 xxxx xxxx */
void upd7810_device::MVI_L_xx()
{
if (PSW & L0) { /* overlay active? */
PC++;
return; /* NOP */
}
RDOPARG( L );
PSW |= L0;
}
/* 70: prefix */
void upd7810_device::PRE_70()
{
RDOP(OP2);
m_icount -= m_op70[OP2].cycles;
handle_timers(m_op70[OP2].cycles);
(this->*m_op70[OP2].opfunc)();
}
/* 71: 0111 0001 oooo oooo xxxx xxxx */
void upd7810_device::MVIW_wa_xx()
{
PAIR ea = m_va;
uint8_t imm;
RDOPARG( ea.b.l );
RDOPARG( imm );
WM( ea.d, imm );
}
/* 72: 0111 0010 */
void upd7810_device::SOFTI()
{
SP--;
WM( SPD, PSW );
SP--;
WM( SPD, PCH );
SP--;
WM( SPD, PCL );
PC = 0x0060;
}
/* 74: prefix */
void upd7810_device::PRE_74()
{
RDOP(OP2);
m_icount -= m_op74[OP2].cycles;
handle_timers(m_op74[OP2].cycles);
(this->*m_op74[OP2].opfunc)();
}
/* 75: 0111 0101 oooo oooo xxxx xxxx */
void upd7810_device::EQIW_wa_xx()
{
PAIR ea = m_va;
uint8_t tmp, m, imm;
RDOPARG( ea.b.l );
RDOPARG( imm );
m = RM( ea.d );
tmp = m - imm;
ZHC_SUB( tmp, m, 0 );
SKIP_Z;
}
/* 76: 0111 0110 xxxx xxxx */
/* SBI_A_xx already defined (long form) */
/* 77: 0111 0111 xxxx xxxx */
/* EQI_A_xx already defined (long form) */
/* 78: 0111 1ddd dddd dddd */
void upd7810_device::CALF()
{
PAIR w;
w.d = 0;
RDOPARG( w.b.l );
w.b.h = 0x08 + (OP & 0x07);
SP--;
WM( SPD, PCH );
SP--;
WM( SPD, PCL );
PCD = w.d;
}
/* 80: 100t tttt */
void upd7810_device::CALT()
{
PAIR w;
w.d = 0;
w.w.l = 0x80 + 2 * (OP & 0x1f);
SP--;
WM( SPD, PCH );
SP--;
WM( SPD, PCL );
PCL=RM(w.w.l);
PCH=RM(w.w.l+1);
}
/* a0: 1010 0000 */
void upd7810_device::POP_VA()
{
A = RM( SPD );
SP++;
V = RM( SPD );
SP++;
}
/* a1: 1010 0001 */
void upd7810_device::POP_BC()
{
C = RM( SPD );
SP++;
B = RM( SPD );
SP++;
}
/* a2: 1010 0010 */
void upd7810_device::POP_DE()
{
E = RM( SPD );
SP++;
D = RM( SPD );
SP++;
}
/* a3: 1010 0011 */
void upd7810_device::POP_HL()
{
L = RM( SPD );
SP++;
H = RM( SPD );
SP++;
}
/* a4: 1010 0100 */
void upd7810_device::POP_EA()
{
EAL = RM( SPD );
SP++;
EAH = RM( SPD );
SP++;
}
/* a5: 1010 0101 */
void upd7810_device::DMOV_EA_BC()
{
EA = BC;
}
/* a6: 1010 0110 */
void upd7810_device::DMOV_EA_DE()
{
EA = DE;
}
/* a7: 1010 0111 */
void upd7810_device::DMOV_EA_HL()
{
EA = HL;
}
/* a8: 1010 1000 */
void upd7810_device::INX_EA()
{
EA++;
}
/* a9: 1010 1001 */
void upd7810_device::DCX_EA()
{
EA--;
}
/* aa: 1010 1010 */
void upd7810_device::EI()
{
m_iff_pending = 1;
}
/* ab: 1010 1011 dddd dddd */
void upd7810_device::LDAX_D_xx()
{
uint16_t ea;
RDOPARG( ea );
ea += DE;
A = RM( ea );
}
/* ac: 1010 1100 */
void upd7810_device::LDAX_H_A()
{
uint16_t ea;
ea = HL + A;
A = RM( ea );
}
/* ad: 1010 1101 */
void upd7810_device::LDAX_H_B()
{
uint16_t ea;
ea = HL + B;
A = RM( ea );
}
/* ae: 1010 1110 */
void upd7810_device::LDAX_H_EA()
{
uint16_t ea;
ea = HL + EA;
A = RM( ea );
}
/* af: 1010 1111 dddd dddd */
void upd7810_device::LDAX_H_xx()
{
uint16_t ea;
RDOPARG( ea );
ea += HL;
A = RM( ea );
}
/* b0: 1011 0000 */
void upd7810_device::PUSH_VA()
{
SP--;
WM( SPD, V );
SP--;
WM( SPD, A );
}
/* b1: 1011 0001 */
void upd7810_device::PUSH_BC()
{
SP--;
WM( SPD, B );
SP--;
WM( SPD, C );
}
/* b2: 1011 0010 */
void upd7810_device::PUSH_DE()
{
SP--;
WM( SPD, D );
SP--;
WM( SPD, E );
}
/* b3: 1011 0011 */
void upd7810_device::PUSH_HL()
{
SP--;
WM( SPD, H );
SP--;
WM( SPD, L );
}
/* b4: 1011 0100 */
void upd7810_device::PUSH_EA()
{
SP--;
WM( SPD, EAH );
SP--;
WM( SPD, EAL );
}
/* b5: 1011 0101 */
void upd7810_device::DMOV_BC_EA()
{
BC = EA;
}
/* b6: 1011 0110 */
void upd7810_device::DMOV_DE_EA()
{
DE = EA;
}
/* b7: 1011 0111 */
void upd7810_device::DMOV_HL_EA()
{
HL = EA;
}
/* b8: 1011 1000 */
void upd7810_device::RET()
{
PCL = RM( SPD );
SP++;
PCH = RM( SPD );
SP++;
}
/* b9: 1011 1001 */
void upd7810_device::RETS()
{
PCL = RM( SPD );
SP++;
PCH = RM( SPD );
SP++;
PSW|=SK; /* skip one instruction */
}
/* ba: 1011 1010 */
void upd7810_device::DI()
{
IFF = m_iff_pending = 0;
}
/* bb: 1011 1011 dddd dddd */
void upd7810_device::STAX_D_xx()
{
uint16_t ea;
RDOPARG(ea);
ea += DE;
WM( ea, A );
}
/* bc: 1011 1100 */
void upd7810_device::STAX_H_A()
{
uint16_t ea = A;
ea += HL;
WM( ea, A );
}
/* bd: 1011 1101 */
void upd7810_device::STAX_H_B()
{
uint16_t ea = B;
ea += HL;
WM( ea, A );
}
/* be: 1011 1110 */
void upd7810_device::STAX_H_EA()
{
uint16_t ea = EA;
ea += HL;
WM( ea, A );
}
/* bf: 1011 1111 dddd dddd */
void upd7810_device::STAX_H_xx()
{
uint16_t ea;
RDOPARG( ea );
ea += HL;
WM( ea, A );
}
/* c0: 11dd dddd */
void upd7810_device::JR()
{
int8_t offs = (int8_t)(OP << 2) >> 2;
PC += offs;
}
/*********************/
/* */
/* 7801 instructions */
/* */
/*********************/
void upd7810_device::CALT_7801()
{
PAIR w;
w.d = 0;
w.w.l = 0x80 + 2 * (OP & 0x3f);
SP--;
WM( SPD, PCH );
SP--;
WM( SPD, PCL );
PCL=RM(w.w.l);
PCH=RM(w.w.l+1);
}
void upd7810_device::IN()
{
logerror("unimplemented instruction: IN\n");
}
void upd7810_device::OUT()
{
logerror("unimplemented instruction: OUT\n");
}
void upd7810_device::MOV_A_S()
{
logerror("unimplemented instruction: MOV_A_S\n");
}
void upd7810_device::MOV_S_A()
{
logerror("unimplemented instruction: MOV_A_S\n");
}
void upd7810_device::PEN()
{
logerror("unimplemented instruction: PEN\n");
}
void upd7810_device::PER()
{
logerror("unimplemented instruction: PER\n");
}
void upd7810_device::PEX()
{
logerror("unimplemented instruction: PEX\n");
}
void upd7810_device::SIO()
{
logerror("unimplemented instruction: SIO\n");
}
void upd7810_device::SKIT_F0()
{
if (IRR & INTF0)
PSW |= SK;
IRR &= ~INTF0;
}
void upd7810_device::SKNIT_F0()
{
logerror("unimplemented instruction: SKNIT_F0\n");
}
void upd7810_device::STM()
{
m_ovc0 = ( ( TMM & 0x04 ) ? 16 * 8 : 8 ) * TM0;
}
void upd7810_device::STM_7801()
{
/* Set the timer flip/flop */
upd7810_to_output_change(1);
/* Reload the timer */
m_ovc0 = 8 * ( TM0 + ( ( TM1 & 0x0f ) << 8 ) );
}
void upd7810_device::MOV_MC_A_7801()
{
/* On the 7801 the mode C bits function as follows: */
/* Cn=1 Cn=0 */
/* PC0 Input Output */
/* PC1 Input Output */
/* PC2 Input -SCS Input */
/* PC3 Output SAK Output */
/* PC4 Output To Output */
/* PC5 Output IO/-M Output */
/* PC6 Output HLDA Output */
/* PC7 Input HOLD Input */
if (MC == A)
return;
MC = A;
WP(UPD7810_PORTC, m_pc_out);
}
Reference in New Issue View Git Blame Copy Permalink