Sprinter/mame
2
0
Fork 0
mirror of https://github.com/holub/mame synced 2025-04-29 11:30:28 +03:00
Code Issues Actions 11 Packages Projects Releases Wiki Activity

document flags, and fixed flags in add/sub

Browse Source
This commit is contained in:
Michaël Banaan Ananas 2014-02-05 01:32:32 +00:00
parent 6b6bd02db1
commit a27f7ed935
1 changed files with 242 additions and 221 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

463
src/emu/cpu/mn10200/mn10200.c
View File

@ -16,6 +16,25 @@
#define MEM_BYTE (0) #define MEM_BYTE (0)
#define MEM_WORD (1) #define MEM_WORD (1)
enum mn10200_flag
{
FLAG_ZF = 0x0001, // zero flag
FLAG_NF = 0x0002, // negative flag
FLAG_CF = 0x0004, // carry flag
FLAG_VF = 0x0008, // overflow flag
FLAG_ZX = 0x0010, // extended zero flag
FLAG_NX = 0x0020, // extended negative flag
FLAG_CX = 0x0040, // extended carry flag
FLAG_VX = 0x0080, // extended overflow flag
FLAG_IM0 = 0x0100, // interrupt mask
FLAG_IM1 = 0x0200, // "
FLAG_IM2 = 0x0400, // "
FLAG_IE = 0x0800, // interrupt enable
FLAG_S0 = 0x1000, // software bit
FLAG_S1 = 0x2000, // software bit
FLAG_D14 = 0x4000, // ?
FLAG_D15 = 0x8000 // ?
};
const device_type MN10200 = &device_creator<mn10200_device>; const device_type MN10200 = &device_creator<mn10200_device>;
@ -99,12 +118,12 @@ void mn10200_device::w24(offs_t adr, UINT32 val)
void mn10200_device::mn102_change_pc(UINT32 pc) void mn10200_device::mn102_change_pc(UINT32 pc)
{ {
m_pc = pc & 0xffffff; m_pc = pc & 0xffffff;
} }
void mn10200_device::mn102_take_irq(int level, int group) void mn10200_device::mn102_take_irq(int level, int group)
{ {
if(!(m_psw & 0x800)) if(!(m_psw & FLAG_IE))
{ {
// if (group != 8) printf("MN10200: Dropping irq L %d G %d pc=%x, a3=%x\n", level, group, m_pc, m_a[3]); // if (group != 8) printf("MN10200: Dropping irq L %d G %d pc=%x, a3=%x\n", level, group, m_pc, m_a[3]);
return; return;
@ -396,16 +415,16 @@ void mn10200_device::state_string_export(const device_state_entry &entry, astrin
case CPUINFO_STR_FLAGS: case CPUINFO_STR_FLAGS:
string.printf( "S=%d irq=%s im=%d %c%c%c%c %c%c%c%c", string.printf( "S=%d irq=%s im=%d %c%c%c%c %c%c%c%c",
(m_psw >> 12) & 3, (m_psw >> 12) & 3,
m_psw & 0x0800 ? "on " : "off", m_psw & FLAG_IE ? "on " : "off",
(m_psw >> 8) & 7, (m_psw >> 8) & 7,
m_psw & 0x0080 ? 'V' : '-', m_psw & FLAG_VX ? 'V' : '-',
m_psw & 0x0040 ? 'C' : '-', m_psw & FLAG_CX ? 'C' : '-',
m_psw & 0x0020 ? 'N' : '-', m_psw & FLAG_NX ? 'N' : '-',
m_psw & 0x0010 ? 'Z' : '-', m_psw & FLAG_ZX ? 'Z' : '-',
m_psw & 0x0008 ? 'v' : '-', m_psw & FLAG_VF ? 'v' : '-',
m_psw & 0x0004 ? 'c' : '-', m_psw & FLAG_CF ? 'c' : '-',
m_psw & 0x0002 ? 'n' : '-', m_psw & FLAG_NF ? 'n' : '-',
m_psw & 0x0001 ? 'z' : '-'); m_psw & FLAG_ZF ? 'z' : '-');
break; break;
} }
} }
@ -447,125 +466,107 @@ void mn10200_device::unemul()
UINT32 mn10200_device::do_add(UINT32 a, UINT32 b) UINT32 mn10200_device::do_add(UINT32 a, UINT32 b)
{ {
UINT32 r24, r16; UINT32 r = (a & 0xffffff) + (b & 0xffffff);
r24 = (a & 0xffffff) + (b & 0xffffff);
r16 = (a & 0xffff) + (b & 0xffff);
m_psw &= 0xff00; m_psw &= 0xff00;
if((~(a^b)) & (a^r24) & 0x00800000) if((a^r) & (b^r) & 0x00800000)
m_psw |= 0x80; m_psw |= FLAG_VX;
if(r24 & 0x01000000) if(r & 0x01000000)
m_psw |= 0x40; m_psw |= FLAG_CX;
if(r24 & 0x00800000) if(r & 0x00800000)
m_psw |= 0x20; m_psw |= FLAG_NX;
if(!(r24 & 0x00ffffff)) if((r & 0x00ffffff) == 0)
m_psw |= 0x10; m_psw |= FLAG_ZX;
if((~(a^b)) & (a^r16) & 0x00008000) if((a^r) & (b^r) & 0x00008000)
m_psw |= 0x08; m_psw |= FLAG_VF;
if(r16 & 0x00010000) if((a^b^r) & 0x00010000)
m_psw |= 0x04; m_psw |= FLAG_CF;
if(r16 & 0x00008000) if(r & 0x00008000)
m_psw |= 0x02; m_psw |= FLAG_NF;
if(!(r16 & 0x0000ffff)) if((r & 0x0000ffff) == 0)
m_psw |= 0x01; m_psw |= FLAG_ZF;
return r24 & 0xffffff; return r & 0xffffff;
} }
UINT32 mn10200_device::do_addc(UINT32 a, UINT32 b) UINT32 mn10200_device::do_addc(UINT32 a, UINT32 b)
{ {
UINT32 r24, r16; UINT32 r = (a & 0xffffff) + (b & 0xffffff) + ((m_psw & FLAG_CF) ? 1 : 0);
r24 = (a & 0xffffff) + (b & 0xffffff);
r16 = (a & 0xffff) + (b & 0xffff);
if(m_psw & 0x04) {
r24++;
r16++;
}
m_psw &= 0xff00; m_psw &= 0xff00;
if((~(a^b)) & (a^r24) & 0x00800000) if((a^r) & (b^r) & 0x00800000)
m_psw |= 0x80; m_psw |= FLAG_VX;
if(r24 & 0x01000000) if(r & 0x01000000)
m_psw |= 0x40; m_psw |= FLAG_CX;
if(r24 & 0x00800000) if(r & 0x00800000)
m_psw |= 0x20; m_psw |= FLAG_NX;
if(!(r24 & 0x00ffffff)) if((r & 0x00ffffff) == 0)
m_psw |= 0x10; m_psw |= FLAG_ZX;
if((~(a^b)) & (a^r16) & 0x00008000) if((a^r) & (b^r) & 0x00008000)
m_psw |= 0x08; m_psw |= FLAG_VF;
if(r16 & 0x00010000) if((a^b^r) & 0x00010000)
m_psw |= 0x04; m_psw |= FLAG_CF;
if(r16 & 0x00008000) if(r & 0x00008000)
m_psw |= 0x02; m_psw |= FLAG_NF;
if(!(r16 & 0x0000ffff)) if((r & 0x0000ffff) == 0)
m_psw |= 0x01; m_psw |= FLAG_ZF;
return r24 & 0xffffff; return r & 0xffffff;
} }
UINT32 mn10200_device::do_sub(UINT32 a, UINT32 b) UINT32 mn10200_device::do_sub(UINT32 a, UINT32 b)
{ {
UINT32 r24, r16; UINT32 r = (a & 0xffffff) - (b & 0xffffff);
r24 = (a & 0xffffff) - (b & 0xffffff);
r16 = (a & 0xffff) - (b & 0xffff);
m_psw &= 0xff00; m_psw &= 0xff00;
if((a^b) & (a^r24) & 0x00800000) if((a^b) & (a^r) & 0x00800000)
m_psw |= 0x80; m_psw |= FLAG_VX;
if(r24 & 0x01000000) if(r & 0x01000000)
m_psw |= 0x40; m_psw |= FLAG_CX;
if(r24 & 0x00800000) if(r & 0x00800000)
m_psw |= 0x20; m_psw |= FLAG_NX;
if(!(r24 & 0x00ffffff)) if((r & 0x00ffffff) == 0)
m_psw |= 0x10; m_psw |= FLAG_ZX;
if((a^b) & (a^r16) & 0x00008000) if((a^b) & (a^r) & 0x00008000)
m_psw |= 0x08; m_psw |= FLAG_VF;
if(r16 & 0x00010000) if((a^b^r) & 0x00010000)
m_psw |= 0x04; m_psw |= FLAG_CF;
if(r16 & 0x00008000) if(r & 0x00008000)
m_psw |= 0x02; m_psw |= FLAG_NF;
if(!(r16 & 0x0000ffff)) if((r & 0x0000ffff) == 0)
m_psw |= 0x01; m_psw |= FLAG_ZF;
return r24 & 0xffffff; return r & 0xffffff;
} }
UINT32 mn10200_device::do_subc(UINT32 a, UINT32 b) UINT32 mn10200_device::do_subc(UINT32 a, UINT32 b)
{ {
UINT32 r24, r16; UINT32 r = (a & 0xffffff) - (b & 0xffffff) - ((m_psw & FLAG_CF) ? 1 : 0);
r24 = (a & 0xffffff) - (b & 0xffffff);
r16 = (a & 0xffff) - (b & 0xffff);
if(m_psw & 0x04) {
r24--;
r16--;
}
m_psw &= 0xff00; m_psw &= 0xff00;
if(r24 >= 0x00800000 && r24 < 0xff800000) if((a^b) & (a^r) & 0x00800000)
m_psw |= 0x80; m_psw |= FLAG_VX;
if(r24 & 0x01000000) if(r & 0x01000000)
m_psw |= 0x40; m_psw |= FLAG_CX;
if(r24 & 0x00800000) if(r & 0x00800000)
m_psw |= 0x20; m_psw |= FLAG_NX;
if(!(r24 & 0x00ffffff)) if((r & 0x00ffffff) == 0)
m_psw |= 0x10; m_psw |= FLAG_ZX;
if(r16 >= 0x00008000 && r16 < 0xffff8000) if((a^b) & (a^r) & 0x00008000)
m_psw |= 0x08; m_psw |= FLAG_VF;
if(r16 & 0x00010000) if((a^b^r) & 0x00010000)
m_psw |= 0x04; m_psw |= FLAG_CF;
if(r16 & 0x00008000) if(r & 0x00008000)
m_psw |= 0x02; m_psw |= FLAG_NF;
if(!(r16 & 0x0000ffff)) if((r & 0x0000ffff) == 0)
m_psw |= 0x01; m_psw |= FLAG_ZF;
return r24 & 0xffffff; return r & 0xffffff;
} }
void mn10200_device::test_nz16(UINT16 v) void mn10200_device::test_nz16(UINT16 v)
{ {
m_psw &= 0xfff0; m_psw &= 0xfff0;
if(v & 0x8000) if(v & 0x8000)
m_psw |= 2; m_psw |= FLAG_NF;
if(!v) if(!v)
m_psw |= 1; m_psw |= FLAG_ZF;
} }
void mn10200_device::do_jsr(UINT32 to, UINT32 ret) void mn10200_device::do_jsr(UINT32 to, UINT32 ret)
@ -575,21 +576,6 @@ void mn10200_device::do_jsr(UINT32 to, UINT32 ret)
w24(m_a[3], ret); w24(m_a[3], ret);
} }
#if 0
log_event("MN102", "PSW change S=%d irq=%s im=%d %c%c%c%c %c%c%c%c",
(psw >> 12) & 3,
psw & 0x0800 ? "on" : "off",
(psw >> 8) & 7,
psw & 0x0080 ? 'V' : '-',
psw & 0x0040 ? 'C' : '-',
psw & 0x0020 ? 'N' : '-',
psw & 0x0010 ? 'Z' : '-',
psw & 0x0008 ? 'v' : '-',
psw & 0x0004 ? 'c' : '-',
psw & 0x0002 ? 'n' : '-',
psw & 0x0001 ? 'z' : '-');
#endif
// take an external IRQ // take an external IRQ
void mn10200_device::execute_set_input(int irqnum, int state) void mn10200_device::execute_set_input(int irqnum, int state)
{ {
@ -806,7 +792,7 @@ void mn10200_device::execute_run()
// blt label8 // blt label8
case 0xe0: case 0xe0:
if(((m_psw & 0x0a) == 2) || ((m_psw & 0x0a) == 8)) if(((m_psw & (FLAG_NF|FLAG_VF)) == FLAG_NF) || ((m_psw & (FLAG_NF|FLAG_VF)) == FLAG_VF)) // (VF^NF)=1
{ {
m_cycles -= 2; m_cycles -= 2;
mn102_change_pc(m_pc+2+(INT8)mn102_read_byte(m_pc+1)); mn102_change_pc(m_pc+2+(INT8)mn102_read_byte(m_pc+1));
@ -820,7 +806,7 @@ void mn10200_device::execute_run()
// bgt label8 // bgt label8
case 0xe1: case 0xe1:
if(((m_psw & 0x0b) == 0) || ((m_psw & 0x0b) == 0xa)) if(((m_psw & (FLAG_ZF|FLAG_NF|FLAG_VF)) == 0) || ((m_psw & (FLAG_ZF|FLAG_NF|FLAG_VF)) == (FLAG_NF|FLAG_VF))) // ((VF^NF)|ZF)=0
{ {
m_cycles -= 2; m_cycles -= 2;
mn102_change_pc(m_pc+2+(INT8)mn102_read_byte(m_pc+1)); mn102_change_pc(m_pc+2+(INT8)mn102_read_byte(m_pc+1));
@ -834,7 +820,7 @@ void mn10200_device::execute_run()
// bge label8 // bge label8
case 0xe2: case 0xe2:
if(((m_psw & 0x0a) == 0) || ((m_psw & 0x0a) == 0xa)) if(((m_psw & (FLAG_NF|FLAG_VF)) == 0) || ((m_psw & (FLAG_NF|FLAG_VF)) == (FLAG_NF|FLAG_VF))) // (VF^NF)=0
{ {
m_cycles -= 2; m_cycles -= 2;
mn102_change_pc(m_pc+2+(INT8)mn102_read_byte(m_pc+1)); mn102_change_pc(m_pc+2+(INT8)mn102_read_byte(m_pc+1));
@ -848,21 +834,21 @@ void mn10200_device::execute_run()
// ble label8 // ble label8
case 0xe3: case 0xe3:
if((m_psw & 0x01) || ((m_psw & 0x0a) == 2) || ((m_psw & 0x0a) == 8)) if((m_psw & FLAG_ZF) || ((m_psw & (FLAG_NF|FLAG_VF)) == FLAG_NF) || ((m_psw & (FLAG_NF|FLAG_VF)) == FLAG_VF)) // ((VF^NF)|ZF)=1
{ {
m_cycles -= 2; m_cycles -= 2;
mn102_change_pc(m_pc+2+(INT8)mn102_read_byte(m_pc+1)); mn102_change_pc(m_pc+2+(INT8)mn102_read_byte(m_pc+1));
} }
else else
{ {
m_cycles -= 1; m_cycles -= 1;
m_pc += 2; m_pc += 2;
} }
break; break;
// bcs label8 // bcs label8
case 0xe4: case 0xe4:
if(m_psw & 0x04) if(m_psw & FLAG_CF) // CF=1
{ {
m_cycles -= 2; m_cycles -= 2;
mn102_change_pc(m_pc+2+(INT8)mn102_read_byte(m_pc+1)); mn102_change_pc(m_pc+2+(INT8)mn102_read_byte(m_pc+1));
@ -876,7 +862,7 @@ void mn10200_device::execute_run()
// bhi label8 // bhi label8
case 0xe5: case 0xe5:
if(!(m_psw & 0x05)) if(!(m_psw & (FLAG_ZF|FLAG_CF))) // (CF|ZF)=0
{ {
m_cycles -= 2; m_cycles -= 2;
mn102_change_pc(m_pc+2+(INT8)mn102_read_byte(m_pc+1)); mn102_change_pc(m_pc+2+(INT8)mn102_read_byte(m_pc+1));
@ -890,7 +876,7 @@ void mn10200_device::execute_run()
// bcc label8 // bcc label8
case 0xe6: case 0xe6:
if(!(m_psw & 0x04)) if(!(m_psw & FLAG_CF)) // CF=0
{ {
m_cycles -= 2; m_cycles -= 2;
mn102_change_pc(m_pc+2+(INT8)mn102_read_byte(m_pc+1)); mn102_change_pc(m_pc+2+(INT8)mn102_read_byte(m_pc+1));
@ -904,7 +890,7 @@ void mn10200_device::execute_run()
// bls label8 // bls label8
case 0xe7: case 0xe7:
if(m_psw & 0x05) if(m_psw & (FLAG_ZF|FLAG_CF)) // (CF|ZF)=1
{ {
m_cycles -= 2; m_cycles -= 2;
mn102_change_pc(m_pc+2+(INT8)mn102_read_byte(m_pc+1)); mn102_change_pc(m_pc+2+(INT8)mn102_read_byte(m_pc+1));
@ -918,7 +904,7 @@ void mn10200_device::execute_run()
// beq label8 // beq label8
case 0xe8: case 0xe8:
if(m_psw & 0x01) if(m_psw & FLAG_ZF) // ZF=1
{ {
m_cycles -= 2; m_cycles -= 2;
mn102_change_pc(m_pc+2+(INT8)mn102_read_byte(m_pc+1)); mn102_change_pc(m_pc+2+(INT8)mn102_read_byte(m_pc+1));
@ -932,7 +918,7 @@ void mn10200_device::execute_run()
// bne label8 // bne label8
case 0xe9: case 0xe9:
if(!(m_psw & 0x01)) if(!(m_psw & FLAG_ZF)) // ZF=0
{ {
m_cycles -= 2; m_cycles -= 2;
mn102_change_pc(m_pc+2+(INT8)mn102_read_byte(m_pc+1)); mn102_change_pc(m_pc+2+(INT8)mn102_read_byte(m_pc+1));
@ -983,9 +969,8 @@ void mn10200_device::execute_run()
// bset dm, (an) // bset dm, (an)
case 0x20: case 0x21: case 0x22: case 0x23: case 0x24: case 0x25: case 0x26: case 0x27: case 0x20: case 0x21: case 0x22: case 0x23: case 0x24: case 0x25: case 0x26: case 0x27:
case 0x28: case 0x29: case 0x2a: case 0x2b: case 0x2c: case 0x2d: case 0x2e: case 0x2f: { case 0x28: case 0x29: case 0x2a: case 0x2b: case 0x2c: case 0x2d: case 0x2e: case 0x2f: {
UINT8 v;
m_cycles -= 5; m_cycles -= 5;
v = mn102_read_byte(m_a[(opcode>>2) & 3]); UINT8 v = mn102_read_byte(m_a[(opcode>>2) & 3]);
test_nz16(v & m_d[opcode & 3]); test_nz16(v & m_d[opcode & 3]);
mn102_write_byte(m_a[(opcode>>2) & 3], v | m_d[opcode & 3]); mn102_write_byte(m_a[(opcode>>2) & 3], v | m_d[opcode & 3]);
m_pc += 2; m_pc += 2;
@ -995,9 +980,8 @@ void mn10200_device::execute_run()
// bclr dm, (an) // bclr dm, (an)
case 0x30: case 0x31: case 0x32: case 0x33: case 0x34: case 0x35: case 0x36: case 0x37: case 0x30: case 0x31: case 0x32: case 0x33: case 0x34: case 0x35: case 0x36: case 0x37:
case 0x38: case 0x39: case 0x3a: case 0x3b: case 0x3c: case 0x3d: case 0x3e: case 0x3f: { case 0x38: case 0x39: case 0x3a: case 0x3b: case 0x3c: case 0x3d: case 0x3e: case 0x3f: {
UINT8 v;
m_cycles -= 5; m_cycles -= 5;
v = mn102_read_byte(m_a[(opcode>>2) & 3]); UINT8 v = mn102_read_byte(m_a[(opcode>>2) & 3]);
test_nz16(v & m_d[opcode & 3]); test_nz16(v & m_d[opcode & 3]);
mn102_write_byte(m_a[(opcode>>2) & 3], v & ~m_d[opcode & 3]); mn102_write_byte(m_a[(opcode>>2) & 3], v & ~m_d[opcode & 3]);
m_pc += 2; m_pc += 2;
@ -1227,9 +1211,9 @@ void mn10200_device::execute_run()
case 0x30: case 0x31: case 0x32: case 0x33: { case 0x30: case 0x31: case 0x32: case 0x33: {
UINT32 d = m_d[opcode & 3]; UINT32 d = m_d[opcode & 3];
m_cycles -= 2; m_cycles -= 2;
test_nz16(m_d[opcode & 3] = (d & 0xff0000) | ((d << 1) & 0x00fffe) | ((m_psw & 0x04) ? 1 : 0)); test_nz16(m_d[opcode & 3] = (d & 0xff0000) | ((d << 1) & 0x00fffe) | ((m_psw & FLAG_CF) ? 1 : 0));
if(d & 0x8000) if(d & 0x8000)
m_psw |= 0x04; m_psw |= FLAG_CF;
m_pc += 2; m_pc += 2;
break; break;
} }
@ -1238,9 +1222,9 @@ void mn10200_device::execute_run()
case 0x34: case 0x35: case 0x36: case 0x37: { case 0x34: case 0x35: case 0x36: case 0x37: {
UINT32 d = m_d[opcode & 3]; UINT32 d = m_d[opcode & 3];
m_cycles -= 2; m_cycles -= 2;
test_nz16(m_d[opcode & 3] = (d & 0xff0000) | ((d >> 1) & 0x007fff) | ((m_psw & 0x04) ? 0x8000 : 0)); test_nz16(m_d[opcode & 3] = (d & 0xff0000) | ((d >> 1) & 0x007fff) | ((m_psw & FLAG_CF) ? 0x8000 : 0));
if(d & 1) if(d & 1)
m_psw |= 0x04; m_psw |= FLAG_CF;
m_pc += 2; m_pc += 2;
break; break;
} }
@ -1251,7 +1235,7 @@ void mn10200_device::execute_run()
m_cycles -= 2; m_cycles -= 2;
test_nz16(m_d[opcode & 3] = (d & 0xff8000) | ((d >> 1) & 0x007fff)); test_nz16(m_d[opcode & 3] = (d & 0xff8000) | ((d >> 1) & 0x007fff));
if(d & 1) if(d & 1)
m_psw |= 0x04; m_psw |= FLAG_CF;
m_pc += 2; m_pc += 2;
break; break;
} }
@ -1262,7 +1246,7 @@ void mn10200_device::execute_run()
m_cycles -= 2; m_cycles -= 2;
test_nz16(m_d[opcode & 3] = (d & 0xff0000) | ((d >> 1) & 0x007fff)); test_nz16(m_d[opcode & 3] = (d & 0xff0000) | ((d >> 1) & 0x007fff));
if(d & 1) if(d & 1)
m_psw |= 0x04; m_psw |= FLAG_CF;
m_pc += 2; m_pc += 2;
break; break;
} }
@ -1274,11 +1258,11 @@ void mn10200_device::execute_run()
m_cycles -= 12; m_cycles -= 12;
res = ((INT16)m_d[opcode & 3])*((INT16)m_d[(opcode>>2) & 3]); res = ((INT16)m_d[opcode & 3])*((INT16)m_d[(opcode>>2) & 3]);
m_d[opcode & 3] = res & 0xffffff; m_d[opcode & 3] = res & 0xffffff;
m_psw &= 0xff00; m_psw &= 0xff00; // f4 is undefined
if(res & 0x80000000) if(res & 0x80000000)
m_psw |= 2; m_psw |= FLAG_NF;
if(!res) if(!res)
m_psw |= 1; m_psw |= FLAG_ZF;
m_mdr = res >> 16; m_mdr = res >> 16;
m_pc += 2; m_pc += 2;
break; break;
@ -1291,11 +1275,11 @@ void mn10200_device::execute_run()
m_cycles -= 12; m_cycles -= 12;
res = ((UINT16)m_d[opcode & 3])*((UINT16)m_d[(opcode>>2) & 3]); res = ((UINT16)m_d[opcode & 3])*((UINT16)m_d[(opcode>>2) & 3]);
m_d[opcode & 3] = res & 0xffffff; m_d[opcode & 3] = res & 0xffffff;
m_psw &= 0xff00; m_psw &= 0xff00; // f4 is undefined
if(res & 0x80000000) if(res & 0x80000000)
m_psw |= 2; m_psw |= FLAG_NF;
if(!res) if(!res)
m_psw |= 1; m_psw |= FLAG_ZF;
m_mdr = res >> 16; m_mdr = res >> 16;
m_pc += 2; m_pc += 2;
break; break;
@ -1307,26 +1291,30 @@ void mn10200_device::execute_run()
UINT32 n, d, q, r; UINT32 n, d, q, r;
m_cycles -= 13; m_cycles -= 13;
m_pc += 2; m_pc += 2;
m_psw &= 0xff00; m_psw &= 0xff00; // f7 may be undefined
n = (m_mdr<<16)|(UINT16)m_d[opcode & 3]; n = (m_mdr<<16)|(UINT16)m_d[opcode & 3];
d = (UINT16)m_d[(opcode>>2) & 3]; d = (UINT16)m_d[(opcode>>2) & 3];
if(!d) { if(!d)
m_psw |= 8; {
break; // divide by 0
m_psw |= FLAG_VF;
break;
} }
q = n/d; q = n/d;
r = n%d; r = n%d;
if(q >= 0x10000) { if(q >= 0x10000)
m_psw |= 8; {
break; // overflow (Dm and MDR are undefined)
m_psw |= FLAG_VF;
break;
} }
m_d[opcode & 3] = q; m_d[opcode & 3] = q;
m_mdr = r; m_mdr = r;
if(!q) if(!q)
m_psw |= 0x11; m_psw |= FLAG_ZF|FLAG_ZX;
if(q & 0x8000) if(q & 0x8000)
m_psw |= 2; m_psw |= FLAG_NF;
break; break;
} }
@ -1657,122 +1645,155 @@ void mn10200_device::execute_run()
// bltx label8 // bltx label8
case 0xe0: case 0xe0:
if(((m_psw & 0xa0) == 0x20) || ((m_psw & 0xa0) == 0x80)) { if(((m_psw & (FLAG_NX|FLAG_VX)) == FLAG_NX) || ((m_psw & (FLAG_NX|FLAG_VX)) == FLAG_VX)) // (VX^NX)=1
m_cycles -= 3; {
mn102_change_pc(m_pc+3+(INT8)mn102_read_byte(m_pc+2)); m_cycles -= 3;
} else { mn102_change_pc(m_pc+3+(INT8)mn102_read_byte(m_pc+2));
m_cycles -= 2; }
m_pc += 3; else
{
m_cycles -= 2;
m_pc += 3;
} }
break; break;
// bgtx label8 // bgtx label8
case 0xe1: case 0xe1:
if(((m_psw & 0xb0) == 0) || ((m_psw & 0xb0) == 0xa0)) { if(((m_psw & (FLAG_ZX|FLAG_NX|FLAG_VX)) == 0) || ((m_psw & (FLAG_ZX|FLAG_NX|FLAG_VX)) == (FLAG_NX|FLAG_VX))) // ((VX^NX)|ZX)=0
m_cycles -= 3; {
mn102_change_pc(m_pc+3+(INT8)mn102_read_byte(m_pc+2)); m_cycles -= 3;
} else { mn102_change_pc(m_pc+3+(INT8)mn102_read_byte(m_pc+2));
m_cycles -= 2; }
m_pc += 3; else
{
m_cycles -= 2;
m_pc += 3;
} }
break; break;
// bgex label8 // bgex label8
case 0xe2: case 0xe2:
if(((m_psw & 0xa0) == 0) || ((m_psw & 0xa0) == 0xa0)) { if(((m_psw & (FLAG_NX|FLAG_VX)) == 0) || ((m_psw & (FLAG_NX|FLAG_VX)) == (FLAG_NX|FLAG_VX))) // (VX^NX)=0
m_cycles -= 3; {
mn102_change_pc(m_pc+3+(INT8)mn102_read_byte(m_pc+2)); m_cycles -= 3;
} else { mn102_change_pc(m_pc+3+(INT8)mn102_read_byte(m_pc+2));
m_cycles -= 2; }
m_pc += 3; else
{
m_cycles -= 2;
m_pc += 3;
} }
break; break;
// blex label8 // blex label8
case 0xe3: case 0xe3:
if((m_psw & 0x10) || ((m_psw & 0xa0) == 0x20) || ((m_psw & 0xa0) == 0x80)) { if((m_psw & FLAG_ZX) || ((m_psw & (FLAG_NX|FLAG_VX)) == FLAG_NX) || ((m_psw & (FLAG_NX|FLAG_VX)) == FLAG_VX)) // ((VX^NX)|ZX)=1
m_cycles -= 3; {
mn102_change_pc(m_pc+3+(INT8)mn102_read_byte(m_pc+2)); m_cycles -= 3;
} else { mn102_change_pc(m_pc+3+(INT8)mn102_read_byte(m_pc+2));
m_cycles -= 2; }
m_pc += 3; else
{
m_cycles -= 2;
m_pc += 3;
} }
break; break;
// bcsx label8 // bcsx label8
case 0xe4: case 0xe4:
if(m_psw & 0x40) { if(m_psw & FLAG_CX) // CX=1
m_cycles -= 3; {
mn102_change_pc(m_pc+3+(INT8)mn102_read_byte(m_pc+2)); m_cycles -= 3;
} else { mn102_change_pc(m_pc+3+(INT8)mn102_read_byte(m_pc+2));
m_cycles -= 2; }
m_pc += 3; else
{
m_cycles -= 2;
m_pc += 3;
} }
break; break;
// bhix label8 // bhix label8
case 0xe5: case 0xe5:
if(!(m_psw & 0x50)) { if(!(m_psw & (FLAG_ZX|FLAG_CX))) // (CX|ZX)=0
m_cycles -= 3; {
mn102_change_pc(m_pc+3+(INT8)mn102_read_byte(m_pc+2)); m_cycles -= 3;
} else { mn102_change_pc(m_pc+3+(INT8)mn102_read_byte(m_pc+2));
m_cycles -= 2; }
m_pc += 3; else
{
m_cycles -= 2;
m_pc += 3;
} }
break; break;
// bccx label8 // bccx label8
case 0xe6: case 0xe6:
if(!(m_psw & 0x40)) { if(!(m_psw & FLAG_CX)) // CX=0
m_cycles -= 3; {
mn102_change_pc(m_pc+3+(INT8)mn102_read_byte(m_pc+2)); m_cycles -= 3;
} else { mn102_change_pc(m_pc+3+(INT8)mn102_read_byte(m_pc+2));
m_cycles -= 2; }
m_pc += 3; else
{
m_cycles -= 2;
m_pc += 3;
} }
break; break;
// blsx label8 // blsx label8
case 0xe7: case 0xe7:
if(m_psw & 0x50) { if(m_psw & (FLAG_ZX|FLAG_CX)) // (CX|ZX)=1
m_cycles -= 3; {
mn102_change_pc(m_pc+3+(INT8)mn102_read_byte(m_pc+2)); m_cycles -= 3;
} else { mn102_change_pc(m_pc+3+(INT8)mn102_read_byte(m_pc+2));
m_cycles -= 2; }
m_pc += 3; else
{
m_cycles -= 2;
m_pc += 3;
} }
break; break;
// beqx label8 // beqx label8
case 0xe8: case 0xe8:
if(m_psw & 0x10) { if(m_psw & FLAG_ZX) // ZX=1
m_cycles -= 3; {
mn102_change_pc(m_pc+3+(INT8)mn102_read_byte(m_pc+2)); m_cycles -= 3;
} else { mn102_change_pc(m_pc+3+(INT8)mn102_read_byte(m_pc+2));
m_cycles -= 2; }
m_pc += 3; else
{
m_cycles -= 2;
m_pc += 3;
} }
break; break;
// bnex label8 // bnex label8
case 0xe9: case 0xe9:
if(!(m_psw & 0x10)) { if(!(m_psw & FLAG_ZX)) // ZX=0
m_cycles -= 3; {
mn102_change_pc(m_pc+3+(INT8)mn102_read_byte(m_pc+2)); m_cycles -= 3;
} else { mn102_change_pc(m_pc+3+(INT8)mn102_read_byte(m_pc+2));
m_cycles -= 2; }
m_pc += 3; else
{
m_cycles -= 2;
m_pc += 3;
} }
break; break;
// bnc label8 // bnc label8
case 0xfe: case 0xfe:
if(!(m_psw & 0x02)) { if(!(m_psw & FLAG_NF)) // NF=0
m_cycles -= 3; {
mn102_change_pc(m_pc+3+(INT8)mn102_read_byte(m_pc+2)); m_cycles -= 3;
} else { mn102_change_pc(m_pc+3+(INT8)mn102_read_byte(m_pc+2));
m_cycles -= 2; }
m_pc += 3; else
{
m_cycles -= 2;
m_pc += 3;
} }
break; break;