mirror of
https://github.com/Wiimpathy/HatariWii.git
synced 2024-06-02 16:48:43 +02:00
39509 lines
1.0 MiB
39509 lines
1.0 MiB
#include "main.h"
|
|
#include "sysdeps.h"
|
|
#include "hatari-glue.h"
|
|
#include "maccess.h"
|
|
#include "memory.h"
|
|
#include "custom.h"
|
|
#include "newcpu.h"
|
|
#include "cpu_prefetch.h"
|
|
#include "cputbl.h"
|
|
#define CPUFUNC(x) x##_ff
|
|
#define SET_CFLG_ALWAYS(x) SET_CFLG(x)
|
|
#define SET_NFLG_ALWAYS(x) SET_NFLG(x)
|
|
#ifdef NOFLAGS
|
|
#include "noflags.h"
|
|
#endif
|
|
|
|
#if !defined(PART_1) && !defined(PART_2) && !defined(PART_3) && !defined(PART_4) && !defined(PART_5) && !defined(PART_6) && !defined(PART_7) && !defined(PART_8)
|
|
#define PART_1 1
|
|
#define PART_2 1
|
|
#define PART_3 1
|
|
#define PART_4 1
|
|
#define PART_5 1
|
|
#define PART_6 1
|
|
#define PART_7 1
|
|
#define PART_8 1
|
|
#endif
|
|
|
|
#ifdef PART_1
|
|
/* OR.B #<data>.B,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0000_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.B #<data>.B,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0010_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.B #<data>.B,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0018_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.B #<data>.B,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0020_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 14;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 14 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.B #<data>.B,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0028_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.B #<data>.B,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0030_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, src);
|
|
}}}}}return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.B #<data>.B,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0038_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.B #<data>.B,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0039_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (8);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ORSR.B #<data>.W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_003c_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 4;
|
|
CurrentInstrCycles = 8;
|
|
{ MakeSR ();
|
|
{ uae_s16 src = get_word_020_prefetch (2);
|
|
src &= 0xFF;
|
|
regs.sr |= src;
|
|
MakeFromSR();
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.W #<data>.W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0040_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.W #<data>.W,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0050_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.W #<data>.W,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0058_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
m68k_areg (regs, dstreg) += 2;
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.W #<data>.W,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0060_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 10;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 2;
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.W #<data>.W,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0068_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.W #<data>.W,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0070_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dsta, src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.W #<data>.W,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0078_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.W #<data>.W,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0079_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (8);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ORSR.W #<data>.W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_007c_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 4;
|
|
CurrentInstrCycles = 8;
|
|
{if (!regs.s) { Exception (8); goto l_200018; }
|
|
{ MakeSR ();
|
|
{ uae_s16 src = get_word_020_prefetch (2);
|
|
regs.sr |= src;
|
|
MakeFromSR();
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
l_200018: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.L #<data>.L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0080_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.L #<data>.L,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0090_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (6);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.L #<data>.L,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0098_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) += 4;
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (6);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.L #<data>.L,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_00a0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 18;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 4;
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (6);
|
|
return 18 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.L #<data>.L,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_00a8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (6);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (8);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.L #<data>.L,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_00b0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (6);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (dsta, src);
|
|
}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.L #<data>.L,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_00b8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (6);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (8);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.L #<data>.L,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_00b9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (6);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (10);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (10);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CHK2.B #<data>.W,(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_00d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 81;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15];
|
|
lower = (uae_s32)(uae_s8)x_get_byte (dsta); upper = (uae_s32)(uae_s8)x_get_byte (dsta + 1);
|
|
if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s8)reg;
|
|
SET_ZFLG (upper == reg || lower == reg);
|
|
SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower);
|
|
if ((extra & 0x800) && GET_CFLG ()) { Exception (6); goto l_200027; }
|
|
}
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
l_200027: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CHK2.B #<data>.W,(d16,An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_00e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 81;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15];
|
|
lower = (uae_s32)(uae_s8)x_get_byte (dsta); upper = (uae_s32)(uae_s8)x_get_byte (dsta + 1);
|
|
if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s8)reg;
|
|
SET_ZFLG (upper == reg || lower == reg);
|
|
SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower);
|
|
if ((extra & 0x800) && GET_CFLG ()) { Exception (6); goto l_200028; }
|
|
}
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}} m68k_incpci (6);
|
|
l_200028: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CHK2.B #<data>.W,(d8,An,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_00f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 81;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15];
|
|
lower = (uae_s32)(uae_s8)x_get_byte (dsta); upper = (uae_s32)(uae_s8)x_get_byte (dsta + 1);
|
|
if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s8)reg;
|
|
SET_ZFLG (upper == reg || lower == reg);
|
|
SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower);
|
|
if ((extra & 0x800) && GET_CFLG ()) { Exception (6); goto l_200029; }
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_200029: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CHK2.B #<data>.W,(xxx).W */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_00f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 81;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15];
|
|
lower = (uae_s32)(uae_s8)x_get_byte (dsta); upper = (uae_s32)(uae_s8)x_get_byte (dsta + 1);
|
|
if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s8)reg;
|
|
SET_ZFLG (upper == reg || lower == reg);
|
|
SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower);
|
|
if ((extra & 0x800) && GET_CFLG ()) { Exception (6); goto l_200030; }
|
|
}
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}} m68k_incpci (6);
|
|
l_200030: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CHK2.B #<data>.W,(xxx).L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_00f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 81;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
{uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15];
|
|
lower = (uae_s32)(uae_s8)x_get_byte (dsta); upper = (uae_s32)(uae_s8)x_get_byte (dsta + 1);
|
|
if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s8)reg;
|
|
SET_ZFLG (upper == reg || lower == reg);
|
|
SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower);
|
|
if ((extra & 0x800) && GET_CFLG ()) { Exception (6); goto l_200031; }
|
|
}
|
|
regs.irc = get_word_020_prefetch (8);
|
|
}}} m68k_incpci (8);
|
|
l_200031: ;
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CHK2.B #<data>.W,(d16,PC) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_00fa_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = 2;
|
|
OpcodeFamily = 81;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_getpci () + 4;
|
|
dsta += (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15];
|
|
lower = (uae_s32)(uae_s8)x_get_byte (dsta); upper = (uae_s32)(uae_s8)x_get_byte (dsta + 1);
|
|
if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s8)reg;
|
|
SET_ZFLG (upper == reg || lower == reg);
|
|
SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower);
|
|
if ((extra & 0x800) && GET_CFLG ()) { Exception (6); goto l_200032; }
|
|
}
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}} m68k_incpci (6);
|
|
l_200032: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CHK2.B #<data>.W,(d8,PC,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_00fb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = 3;
|
|
OpcodeFamily = 81;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr tmppc;
|
|
uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ tmppc = m68k_getpci ();
|
|
dsta = x_get_disp_ea_020 (tmppc, 0);
|
|
{uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15];
|
|
lower = (uae_s32)(uae_s8)x_get_byte (dsta); upper = (uae_s32)(uae_s8)x_get_byte (dsta + 1);
|
|
if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s8)reg;
|
|
SET_ZFLG (upper == reg || lower == reg);
|
|
SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower);
|
|
if ((extra & 0x800) && GET_CFLG ()) { Exception (6); goto l_200033; }
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_200033: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BTST.L Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0100_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 21;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
src &= 31;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVPMR.W (d16,An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0108_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 29;
|
|
CurrentInstrCycles = 8;
|
|
{ uaecptr memp = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_u16 val;
|
|
MovepByteNbr=1; val = ((x_get_byte (memp) & 0xff) << 8);
|
|
MovepByteNbr=2; val += (x_get_byte (memp + 2) & 0xff);
|
|
MovepByteNbr=0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((val) & 0xffff);
|
|
}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BTST.B Dn,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0110_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 21;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BTST.B Dn,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0118_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 21;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BTST.B Dn,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0120_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 21;
|
|
CurrentInstrCycles = 6;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}}} m68k_incpci (2);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BTST.B Dn,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0128_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 21;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BTST.B Dn,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0130_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 21;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BTST.B Dn,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0138_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 21;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BTST.B Dn,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0139_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 21;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BTST.B Dn,(d16,PC) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_013a_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = 2;
|
|
OpcodeFamily = 21;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_getpci () + 2;
|
|
dsta += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BTST.B Dn,(d8,PC,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_013b_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = 3;
|
|
OpcodeFamily = 21;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr tmppc;
|
|
uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
dsta = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BTST.B Dn,#<data>.B */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_013c_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 21;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s8 dst = (uae_u8)get_word_020_prefetch (2);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BCHG.L Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0140_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 22;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
src &= 31;
|
|
dst ^= (1 << src);
|
|
SET_ZFLG (((uae_u32)dst & (1 << src)) >> src);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (dst);
|
|
}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVPMR.L (d16,An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0148_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 29;
|
|
CurrentInstrCycles = 16;
|
|
{ uaecptr memp = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_u32 val;
|
|
MovepByteNbr=1; val = ((x_get_byte (memp) & 0xff) << 24);
|
|
MovepByteNbr=2; val += ((x_get_byte (memp + 2) & 0xff) << 16);
|
|
MovepByteNbr=3; val += ((x_get_byte (memp + 4) & 0xff) << 8);
|
|
MovepByteNbr=4; val += (x_get_byte (memp + 6) & 0xff);
|
|
MovepByteNbr=0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (val);
|
|
}} m68k_incpci (4);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BCHG.B Dn,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0150_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 22;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
dst ^= (1 << src);
|
|
SET_ZFLG (((uae_u32)dst & (1 << src)) >> src);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BCHG.B Dn,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0158_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 22;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
src &= 7;
|
|
dst ^= (1 << src);
|
|
SET_ZFLG (((uae_u32)dst & (1 << src)) >> src);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BCHG.B Dn,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0160_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 22;
|
|
CurrentInstrCycles = 10;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
src &= 7;
|
|
dst ^= (1 << src);
|
|
SET_ZFLG (((uae_u32)dst & (1 << src)) >> src);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BCHG.B Dn,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0168_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 22;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
dst ^= (1 << src);
|
|
SET_ZFLG (((uae_u32)dst & (1 << src)) >> src);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BCHG.B Dn,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0170_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 22;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
dst ^= (1 << src);
|
|
SET_ZFLG (((uae_u32)dst & (1 << src)) >> src);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, dst);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BCHG.B Dn,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0178_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 22;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
dst ^= (1 << src);
|
|
SET_ZFLG (((uae_u32)dst & (1 << src)) >> src);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BCHG.B Dn,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0179_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 22;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
dst ^= (1 << src);
|
|
SET_ZFLG (((uae_u32)dst & (1 << src)) >> src);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BCLR.L Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0180_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 23;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
src &= 31;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
dst &= ~(1 << src);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (dst);
|
|
}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVPRM.W Dn,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0188_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 28;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
uaecptr memp = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
MovepByteNbr=1; x_put_byte (memp, src >> 8);
|
|
MovepByteNbr=2; x_put_byte (memp + 2, src);
|
|
MovepByteNbr=0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BCLR.B Dn,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0190_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 23;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
dst &= ~(1 << src);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BCLR.B Dn,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0198_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 23;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
dst &= ~(1 << src);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BCLR.B Dn,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_01a0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 23;
|
|
CurrentInstrCycles = 10;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
dst &= ~(1 << src);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BCLR.B Dn,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_01a8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 23;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
dst &= ~(1 << src);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BCLR.B Dn,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_01b0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 23;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
dst &= ~(1 << src);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, dst);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BCLR.B Dn,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_01b8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 23;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
dst &= ~(1 << src);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BCLR.B Dn,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_01b9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 23;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
dst &= ~(1 << src);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BSET.L Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_01c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 24;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
src &= 31;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
dst |= (1 << src);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (dst);
|
|
}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVPRM.L Dn,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_01c8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 28;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
uaecptr memp = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
MovepByteNbr=1; x_put_byte (memp, src >> 24);
|
|
MovepByteNbr=2; x_put_byte (memp + 2, src >> 16);
|
|
MovepByteNbr=3; x_put_byte (memp + 4, src >> 8);
|
|
MovepByteNbr=4; x_put_byte (memp + 6, src);
|
|
MovepByteNbr=0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}} m68k_incpci (4);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BSET.B Dn,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_01d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 24;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
dst |= (1 << src);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BSET.B Dn,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_01d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 24;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
dst |= (1 << src);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BSET.B Dn,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_01e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 24;
|
|
CurrentInstrCycles = 10;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
dst |= (1 << src);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BSET.B Dn,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_01e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 24;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
dst |= (1 << src);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BSET.B Dn,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_01f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 24;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
dst |= (1 << src);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, dst);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BSET.B Dn,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_01f8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 24;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
dst |= (1 << src);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BSET.B Dn,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_01f9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 24;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
dst |= (1 << src);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.B #<data>.B,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0200_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.B #<data>.B,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0210_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.B #<data>.B,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0218_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.B #<data>.B,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0220_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 14;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 14 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.B #<data>.B,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0228_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.B #<data>.B,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0230_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, src);
|
|
}}}}}return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.B #<data>.B,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0238_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.B #<data>.B,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0239_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (8);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ANDSR.B #<data>.W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_023c_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 5;
|
|
CurrentInstrCycles = 8;
|
|
{ MakeSR ();
|
|
{ uae_s16 src = get_word_020_prefetch (2);
|
|
src |= 0xFF00;
|
|
regs.sr &= src;
|
|
MakeFromSR();
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.W #<data>.W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0240_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.W #<data>.W,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0250_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.W #<data>.W,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0258_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
m68k_areg (regs, dstreg) += 2;
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.W #<data>.W,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0260_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 10;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 2;
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.W #<data>.W,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0268_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.W #<data>.W,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0270_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dsta, src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.W #<data>.W,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0278_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.W #<data>.W,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0279_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (8);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ANDSR.W #<data>.W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_027c_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 5;
|
|
CurrentInstrCycles = 8;
|
|
{if (!regs.s) { Exception (8); goto l_200090; }
|
|
{ MakeSR ();
|
|
{ uae_s16 src = get_word_020_prefetch (2);
|
|
regs.sr &= src;
|
|
MakeFromSR();
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
l_200090: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.L #<data>.L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0280_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.L #<data>.L,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0290_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (6);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.L #<data>.L,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0298_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) += 4;
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (6);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.L #<data>.L,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_02a0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 18;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 4;
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (6);
|
|
return 18 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.L #<data>.L,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_02a8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (6);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (8);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.L #<data>.L,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_02b0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (6);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (dsta, src);
|
|
}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.L #<data>.L,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_02b8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (6);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (8);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.L #<data>.L,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_02b9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (6);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (10);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (10);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CHK2.W #<data>.W,(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_02d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 81;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15];
|
|
lower = (uae_s32)(uae_s16)x_get_word (dsta); upper = (uae_s32)(uae_s16)x_get_word (dsta + 2);
|
|
if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s16)reg;
|
|
SET_ZFLG (upper == reg || lower == reg);
|
|
SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower);
|
|
if ((extra & 0x800) && GET_CFLG ()) { Exception (6); goto l_200099; }
|
|
}
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
l_200099: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CHK2.W #<data>.W,(d16,An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_02e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 81;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15];
|
|
lower = (uae_s32)(uae_s16)x_get_word (dsta); upper = (uae_s32)(uae_s16)x_get_word (dsta + 2);
|
|
if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s16)reg;
|
|
SET_ZFLG (upper == reg || lower == reg);
|
|
SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower);
|
|
if ((extra & 0x800) && GET_CFLG ()) { Exception (6); goto l_200100; }
|
|
}
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}} m68k_incpci (6);
|
|
l_200100: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CHK2.W #<data>.W,(d8,An,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_02f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 81;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15];
|
|
lower = (uae_s32)(uae_s16)x_get_word (dsta); upper = (uae_s32)(uae_s16)x_get_word (dsta + 2);
|
|
if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s16)reg;
|
|
SET_ZFLG (upper == reg || lower == reg);
|
|
SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower);
|
|
if ((extra & 0x800) && GET_CFLG ()) { Exception (6); goto l_200101; }
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_200101: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CHK2.W #<data>.W,(xxx).W */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_02f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 81;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15];
|
|
lower = (uae_s32)(uae_s16)x_get_word (dsta); upper = (uae_s32)(uae_s16)x_get_word (dsta + 2);
|
|
if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s16)reg;
|
|
SET_ZFLG (upper == reg || lower == reg);
|
|
SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower);
|
|
if ((extra & 0x800) && GET_CFLG ()) { Exception (6); goto l_200102; }
|
|
}
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}} m68k_incpci (6);
|
|
l_200102: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CHK2.W #<data>.W,(xxx).L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_02f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 81;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
{uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15];
|
|
lower = (uae_s32)(uae_s16)x_get_word (dsta); upper = (uae_s32)(uae_s16)x_get_word (dsta + 2);
|
|
if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s16)reg;
|
|
SET_ZFLG (upper == reg || lower == reg);
|
|
SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower);
|
|
if ((extra & 0x800) && GET_CFLG ()) { Exception (6); goto l_200103; }
|
|
}
|
|
regs.irc = get_word_020_prefetch (8);
|
|
}}} m68k_incpci (8);
|
|
l_200103: ;
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CHK2.W #<data>.W,(d16,PC) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_02fa_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = 2;
|
|
OpcodeFamily = 81;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_getpci () + 4;
|
|
dsta += (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15];
|
|
lower = (uae_s32)(uae_s16)x_get_word (dsta); upper = (uae_s32)(uae_s16)x_get_word (dsta + 2);
|
|
if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s16)reg;
|
|
SET_ZFLG (upper == reg || lower == reg);
|
|
SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower);
|
|
if ((extra & 0x800) && GET_CFLG ()) { Exception (6); goto l_200104; }
|
|
}
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}} m68k_incpci (6);
|
|
l_200104: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CHK2.W #<data>.W,(d8,PC,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_02fb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = 3;
|
|
OpcodeFamily = 81;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr tmppc;
|
|
uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ tmppc = m68k_getpci ();
|
|
dsta = x_get_disp_ea_020 (tmppc, 0);
|
|
{uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15];
|
|
lower = (uae_s32)(uae_s16)x_get_word (dsta); upper = (uae_s32)(uae_s16)x_get_word (dsta + 2);
|
|
if ((extra & 0x8000) == 0) reg = (uae_s32)(uae_s16)reg;
|
|
SET_ZFLG (upper == reg || lower == reg);
|
|
SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower);
|
|
if ((extra & 0x800) && GET_CFLG ()) { Exception (6); goto l_200105; }
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_200105: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* SUB.B #<data>.B,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0400_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((newv) & 0xff);
|
|
}}}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.B #<data>.B,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0410_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.B #<data>.B,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0418_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.B #<data>.B,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0420_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 14;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 14 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.B #<data>.B,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0428_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.B #<data>.B,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0430_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}}}return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.B #<data>.B,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0438_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.B #<data>.B,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0439_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (8);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.W #<data>.W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0440_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((newv) & 0xffff);
|
|
}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.W #<data>.W,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0450_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.W #<data>.W,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0458_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
m68k_areg (regs, dstreg) += 2;
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.W #<data>.W,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0460_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 10;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 2;
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.W #<data>.W,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0468_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.W #<data>.W,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0470_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.W #<data>.W,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0478_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.W #<data>.W,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0479_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (8);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.L #<data>.L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0480_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.L #<data>.L,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0490_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.L #<data>.L,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0498_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) += 4;
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.L #<data>.L,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_04a0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 18;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 4;
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 18 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.L #<data>.L,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_04a8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (6);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (8);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.L #<data>.L,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_04b0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (6);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.L #<data>.L,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_04b8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (6);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (8);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.L #<data>.L,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_04b9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (6);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (10);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (10);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CHK2.L #<data>.W,(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_04d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 81;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15];
|
|
lower = x_get_long (dsta); upper = x_get_long (dsta + 4);
|
|
SET_ZFLG (upper == reg || lower == reg);
|
|
SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower);
|
|
if ((extra & 0x800) && GET_CFLG ()) { Exception (6); goto l_200130; }
|
|
}
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
l_200130: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CHK2.L #<data>.W,(d16,An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_04e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 81;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15];
|
|
lower = x_get_long (dsta); upper = x_get_long (dsta + 4);
|
|
SET_ZFLG (upper == reg || lower == reg);
|
|
SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower);
|
|
if ((extra & 0x800) && GET_CFLG ()) { Exception (6); goto l_200131; }
|
|
}
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}} m68k_incpci (6);
|
|
l_200131: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CHK2.L #<data>.W,(d8,An,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_04f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 81;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15];
|
|
lower = x_get_long (dsta); upper = x_get_long (dsta + 4);
|
|
SET_ZFLG (upper == reg || lower == reg);
|
|
SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower);
|
|
if ((extra & 0x800) && GET_CFLG ()) { Exception (6); goto l_200132; }
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_200132: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CHK2.L #<data>.W,(xxx).W */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_04f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 81;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15];
|
|
lower = x_get_long (dsta); upper = x_get_long (dsta + 4);
|
|
SET_ZFLG (upper == reg || lower == reg);
|
|
SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower);
|
|
if ((extra & 0x800) && GET_CFLG ()) { Exception (6); goto l_200133; }
|
|
}
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}} m68k_incpci (6);
|
|
l_200133: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CHK2.L #<data>.W,(xxx).L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_04f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 81;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
{uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15];
|
|
lower = x_get_long (dsta); upper = x_get_long (dsta + 4);
|
|
SET_ZFLG (upper == reg || lower == reg);
|
|
SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower);
|
|
if ((extra & 0x800) && GET_CFLG ()) { Exception (6); goto l_200134; }
|
|
}
|
|
regs.irc = get_word_020_prefetch (8);
|
|
}}} m68k_incpci (8);
|
|
l_200134: ;
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CHK2.L #<data>.W,(d16,PC) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_04fa_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = 2;
|
|
OpcodeFamily = 81;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_getpci () + 4;
|
|
dsta += (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15];
|
|
lower = x_get_long (dsta); upper = x_get_long (dsta + 4);
|
|
SET_ZFLG (upper == reg || lower == reg);
|
|
SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower);
|
|
if ((extra & 0x800) && GET_CFLG ()) { Exception (6); goto l_200135; }
|
|
}
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}} m68k_incpci (6);
|
|
l_200135: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CHK2.L #<data>.W,(d8,PC,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_04fb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = 3;
|
|
OpcodeFamily = 81;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr tmppc;
|
|
uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ tmppc = m68k_getpci ();
|
|
dsta = x_get_disp_ea_020 (tmppc, 0);
|
|
{uae_s32 upper,lower,reg = regs.regs[(extra >> 12) & 15];
|
|
lower = x_get_long (dsta); upper = x_get_long (dsta + 4);
|
|
SET_ZFLG (upper == reg || lower == reg);
|
|
SET_CFLG_ALWAYS (lower <= upper ? reg < lower || reg > upper : reg > upper || reg < lower);
|
|
if ((extra & 0x800) && GET_CFLG ()) { Exception (6); goto l_200136; }
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_200136: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* ADD.B #<data>.B,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0600_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) + ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((newv) & 0xff);
|
|
}}}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.B #<data>.B,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0610_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) + ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.B #<data>.B,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0618_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
{{uae_u32 newv = ((uae_u8)(dst)) + ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.B #<data>.B,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0620_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 14;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
{{uae_u32 newv = ((uae_u8)(dst)) + ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 14 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.B #<data>.B,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0628_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) + ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.B #<data>.B,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0630_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) + ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}}}return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.B #<data>.B,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0638_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) + ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.B #<data>.B,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0639_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) + ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (8);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.W #<data>.W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0640_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((newv) & 0xffff);
|
|
}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.W #<data>.W,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0650_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.W #<data>.W,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0658_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
m68k_areg (regs, dstreg) += 2;
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.W #<data>.W,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0660_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 10;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 2;
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.W #<data>.W,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0668_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.W #<data>.W,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0670_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.W #<data>.W,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0678_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.W #<data>.W,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0679_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (8);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.L #<data>.L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0680_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.L #<data>.L,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0690_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.L #<data>.L,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0698_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) += 4;
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.L #<data>.L,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_06a0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 18;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 4;
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 18 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.L #<data>.L,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_06a8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (6);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (8);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.L #<data>.L,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_06b0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (6);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.L #<data>.L,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_06b8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (6);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (8);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.L #<data>.L,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_06b9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (6);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (10);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (10);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* RTM.L Dn */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_06c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 101;
|
|
CurrentInstrCycles = 4;
|
|
{ m68k_incpci (2);
|
|
op_illg (opcode);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* RTM.L An */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_06c8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 101;
|
|
CurrentInstrCycles = 4;
|
|
{ m68k_incpci (2);
|
|
op_illg (opcode);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CALLM.L (An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_06d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 100;
|
|
CurrentInstrCycles = 4;
|
|
{ m68k_incpci (2);
|
|
op_illg (opcode);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CALLM.L (d16,An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_06e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 100;
|
|
CurrentInstrCycles = 4;
|
|
{ m68k_incpci (2);
|
|
op_illg (opcode);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CALLM.L (d8,An,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_06f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 100;
|
|
CurrentInstrCycles = 4;
|
|
{ m68k_incpci (2);
|
|
op_illg (opcode);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CALLM.L (xxx).W */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_06f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 100;
|
|
CurrentInstrCycles = 4;
|
|
{ m68k_incpci (2);
|
|
op_illg (opcode);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CALLM.L (xxx).L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_06f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 100;
|
|
CurrentInstrCycles = 4;
|
|
{ m68k_incpci (2);
|
|
op_illg (opcode);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CALLM.L (d16,PC) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_06fa_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 100;
|
|
CurrentInstrCycles = 4;
|
|
{ m68k_incpci (2);
|
|
op_illg (opcode);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CALLM.L (d8,PC,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_06fb_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 100;
|
|
CurrentInstrCycles = 4;
|
|
{ m68k_incpci (2);
|
|
op_illg (opcode);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BTST.L #<data>.W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0800_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 21;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
src &= 31;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BTST.B #<data>.W,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0810_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 21;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BTST.B #<data>.W,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0818_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 21;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BTST.B #<data>.W,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0820_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 21;
|
|
CurrentInstrCycles = 6;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}} m68k_incpci (4);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BTST.B #<data>.W,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0828_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 21;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BTST.B #<data>.W,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0830_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 21;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BTST.B #<data>.W,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0838_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 21;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BTST.B #<data>.W,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0839_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 21;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
regs.irc = get_word_020_prefetch (8);
|
|
}}}} m68k_incpci (8);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BTST.B #<data>.W,(d16,PC) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_083a_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = 2;
|
|
OpcodeFamily = 21;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_getpci () + 4;
|
|
dsta += (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BTST.B #<data>.W,(d8,PC,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_083b_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = 3;
|
|
OpcodeFamily = 21;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr tmppc;
|
|
uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ tmppc = m68k_getpci ();
|
|
dsta = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BCHG.L #<data>.W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0840_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 22;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
src &= 31;
|
|
dst ^= (1 << src);
|
|
SET_ZFLG (((uae_u32)dst & (1 << src)) >> src);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (dst);
|
|
}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BCHG.B #<data>.W,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0850_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 22;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
dst ^= (1 << src);
|
|
SET_ZFLG (((uae_u32)dst & (1 << src)) >> src);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BCHG.B #<data>.W,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0858_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 22;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
src &= 7;
|
|
dst ^= (1 << src);
|
|
SET_ZFLG (((uae_u32)dst & (1 << src)) >> src);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BCHG.B #<data>.W,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0860_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 22;
|
|
CurrentInstrCycles = 10;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
src &= 7;
|
|
dst ^= (1 << src);
|
|
SET_ZFLG (((uae_u32)dst & (1 << src)) >> src);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BCHG.B #<data>.W,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0868_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 22;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
dst ^= (1 << src);
|
|
SET_ZFLG (((uae_u32)dst & (1 << src)) >> src);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BCHG.B #<data>.W,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0870_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 22;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
dst ^= (1 << src);
|
|
SET_ZFLG (((uae_u32)dst & (1 << src)) >> src);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, dst);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BCHG.B #<data>.W,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0878_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 22;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
dst ^= (1 << src);
|
|
SET_ZFLG (((uae_u32)dst & (1 << src)) >> src);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BCHG.B #<data>.W,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0879_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 22;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
dst ^= (1 << src);
|
|
SET_ZFLG (((uae_u32)dst & (1 << src)) >> src);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (8);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BCLR.L #<data>.W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0880_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 23;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
src &= 31;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
dst &= ~(1 << src);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (dst);
|
|
}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BCLR.B #<data>.W,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0890_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 23;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
dst &= ~(1 << src);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BCLR.B #<data>.W,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0898_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 23;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
dst &= ~(1 << src);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BCLR.B #<data>.W,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_08a0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 23;
|
|
CurrentInstrCycles = 10;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
dst &= ~(1 << src);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BCLR.B #<data>.W,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_08a8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 23;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
dst &= ~(1 << src);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BCLR.B #<data>.W,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_08b0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 23;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
dst &= ~(1 << src);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, dst);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BCLR.B #<data>.W,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_08b8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 23;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
dst &= ~(1 << src);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BCLR.B #<data>.W,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_08b9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 23;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
dst &= ~(1 << src);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (8);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BSET.L #<data>.W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_08c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 24;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
src &= 31;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
dst |= (1 << src);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (dst);
|
|
}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BSET.B #<data>.W,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_08d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 24;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
dst |= (1 << src);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BSET.B #<data>.W,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_08d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 24;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
dst |= (1 << src);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BSET.B #<data>.W,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_08e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 24;
|
|
CurrentInstrCycles = 10;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
dst |= (1 << src);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BSET.B #<data>.W,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_08e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 24;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
dst |= (1 << src);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BSET.B #<data>.W,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_08f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 24;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
dst |= (1 << src);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, dst);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BSET.B #<data>.W,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_08f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 24;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
dst |= (1 << src);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BSET.B #<data>.W,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_08f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 24;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= 7;
|
|
SET_ZFLG (1 ^ ((dst >> src) & 1));
|
|
dst |= (1 << src);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_byte (dsta, dst);
|
|
}}}} m68k_incpci (8);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.B #<data>.B,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0a00_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.B #<data>.B,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0a10_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.B #<data>.B,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0a18_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.B #<data>.B,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0a20_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 14;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 14 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.B #<data>.B,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0a28_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.B #<data>.B,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0a30_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, src);
|
|
}}}}}return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.B #<data>.B,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0a38_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.B #<data>.B,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0a39_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (8);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EORSR.B #<data>.W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0a3c_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 6;
|
|
CurrentInstrCycles = 8;
|
|
{ MakeSR ();
|
|
{ uae_s16 src = get_word_020_prefetch (2);
|
|
src &= 0xFF;
|
|
regs.sr ^= src;
|
|
MakeFromSR();
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.W #<data>.W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0a40_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.W #<data>.W,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0a50_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.W #<data>.W,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0a58_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
m68k_areg (regs, dstreg) += 2;
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.W #<data>.W,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0a60_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 10;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 2;
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.W #<data>.W,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0a68_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.W #<data>.W,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0a70_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dsta, src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.W #<data>.W,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0a78_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.W #<data>.W,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0a79_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (8);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EORSR.W #<data>.W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0a7c_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 6;
|
|
CurrentInstrCycles = 8;
|
|
{if (!regs.s) { Exception (8); goto l_200221; }
|
|
{ MakeSR ();
|
|
{ uae_s16 src = get_word_020_prefetch (2);
|
|
regs.sr ^= src;
|
|
MakeFromSR();
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
l_200221: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.L #<data>.L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0a80_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.L #<data>.L,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0a90_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (6);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.L #<data>.L,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0a98_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) += 4;
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (6);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.L #<data>.L,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0aa0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 18;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 4;
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (6);
|
|
return 18 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.L #<data>.L,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0aa8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (6);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (8);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.L #<data>.L,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0ab0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (6);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (dsta, src);
|
|
}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.L #<data>.L,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0ab8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (6);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (8);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.L #<data>.L,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0ab9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (6);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (10);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (10);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CAS.B #<data>.W,(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0ad0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 84;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{ int ru = (src >> 6) & 7;
|
|
int rc = src & 7;
|
|
{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(m68k_dreg (regs, rc)));
|
|
{ int flgs = ((uae_s8)(m68k_dreg (regs, rc))) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u8)(m68k_dreg (regs, rc))) > ((uae_u8)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
if (GET_ZFLG ()) {
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, (m68k_dreg (regs, ru)));
|
|
}else{
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg(regs, rc) = (m68k_dreg(regs, rc) & ~0xff) | (dst & 0xff);
|
|
}}}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CAS.B #<data>.W,(An)+ */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0ad8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 84;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
{ int ru = (src >> 6) & 7;
|
|
int rc = src & 7;
|
|
{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(m68k_dreg (regs, rc)));
|
|
{ int flgs = ((uae_s8)(m68k_dreg (regs, rc))) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u8)(m68k_dreg (regs, rc))) > ((uae_u8)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
if (GET_ZFLG ()) {
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, (m68k_dreg (regs, ru)));
|
|
}else{
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg(regs, rc) = (m68k_dreg(regs, rc) & ~0xff) | (dst & 0xff);
|
|
}}}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CAS.B #<data>.W,-(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0ae0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 84;
|
|
CurrentInstrCycles = 10;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
{ int ru = (src >> 6) & 7;
|
|
int rc = src & 7;
|
|
{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(m68k_dreg (regs, rc)));
|
|
{ int flgs = ((uae_s8)(m68k_dreg (regs, rc))) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u8)(m68k_dreg (regs, rc))) > ((uae_u8)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
if (GET_ZFLG ()) {
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, (m68k_dreg (regs, ru)));
|
|
}else{
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg(regs, rc) = (m68k_dreg(regs, rc) & ~0xff) | (dst & 0xff);
|
|
}}}}}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CAS.B #<data>.W,(d16,An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0ae8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 84;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{ int ru = (src >> 6) & 7;
|
|
int rc = src & 7;
|
|
{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(m68k_dreg (regs, rc)));
|
|
{ int flgs = ((uae_s8)(m68k_dreg (regs, rc))) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u8)(m68k_dreg (regs, rc))) > ((uae_u8)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
if (GET_ZFLG ()) {
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, (m68k_dreg (regs, ru)));
|
|
}else{
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_dreg(regs, rc) = (m68k_dreg(regs, rc) & ~0xff) | (dst & 0xff);
|
|
}}}}}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
#endif
|
|
|
|
#ifdef PART_2
|
|
/* CAS.B #<data>.W,(d8,An,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0af0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 84;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{ int ru = (src >> 6) & 7;
|
|
int rc = src & 7;
|
|
{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(m68k_dreg (regs, rc)));
|
|
{ int flgs = ((uae_s8)(m68k_dreg (regs, rc))) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u8)(m68k_dreg (regs, rc))) > ((uae_u8)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
if (GET_ZFLG ()) {
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, (m68k_dreg (regs, ru)));
|
|
}else{
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg(regs, rc) = (m68k_dreg(regs, rc) & ~0xff) | (dst & 0xff);
|
|
}}}}}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CAS.B #<data>.W,(xxx).W */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0af8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 84;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{ int ru = (src >> 6) & 7;
|
|
int rc = src & 7;
|
|
{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(m68k_dreg (regs, rc)));
|
|
{ int flgs = ((uae_s8)(m68k_dreg (regs, rc))) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u8)(m68k_dreg (regs, rc))) > ((uae_u8)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
if (GET_ZFLG ()) {
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, (m68k_dreg (regs, ru)));
|
|
}else{
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_dreg(regs, rc) = (m68k_dreg(regs, rc) & ~0xff) | (dst & 0xff);
|
|
}}}}}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CAS.B #<data>.W,(xxx).L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0af9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 84;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{ int ru = (src >> 6) & 7;
|
|
int rc = src & 7;
|
|
{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(m68k_dreg (regs, rc)));
|
|
{ int flgs = ((uae_s8)(m68k_dreg (regs, rc))) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u8)(m68k_dreg (regs, rc))) > ((uae_u8)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
if (GET_ZFLG ()) {
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_byte (dsta, (m68k_dreg (regs, ru)));
|
|
}else{
|
|
regs.irc = get_word_020_prefetch (8);
|
|
m68k_dreg(regs, rc) = (m68k_dreg(regs, rc) & ~0xff) | (dst & 0xff);
|
|
}}}}}}}} m68k_incpci (8);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CMP.B #<data>.B,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0c00_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.B #<data>.B,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0c10_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.B #<data>.B,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0c18_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.B #<data>.B,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0c20_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 10;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.B #<data>.B,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0c28_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.B #<data>.B,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0c30_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.B #<data>.B,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0c38_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.B #<data>.B,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0c39_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
}}}}}}} m68k_incpci (8);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.B #<data>.B,(d16,PC) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0c3a_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = 2;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_getpci () + 4;
|
|
dsta += (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CMP.B #<data>.B,(d8,PC,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0c3b_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = 3;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr tmppc;
|
|
uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ tmppc = m68k_getpci ();
|
|
dsta = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CMP.W #<data>.W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0c40_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.W #<data>.W,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0c50_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.W #<data>.W,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0c58_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
m68k_areg (regs, dstreg) += 2;
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.W #<data>.W,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0c60_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 6;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 2;
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.W #<data>.W,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0c68_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.W #<data>.W,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0c70_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.W #<data>.W,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0c78_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.W #<data>.W,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0c79_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
}}}}}}} m68k_incpci (8);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.W #<data>.W,(d16,PC) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0c7a_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = 2;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_getpci () + 4;
|
|
dsta += (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CMP.W #<data>.W,(d8,PC,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0c7b_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = 3;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr tmppc;
|
|
uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ tmppc = m68k_getpci ();
|
|
dsta = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CMP.L #<data>.L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0c80_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.L #<data>.L,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0c90_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.L #<data>.L,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0c98_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) += 4;
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.L #<data>.L,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0ca0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 10;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 4;
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.L #<data>.L,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0ca8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (6);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
}}}}}}} m68k_incpci (8);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.L #<data>.L,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0cb0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (6);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.L #<data>.L,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0cb8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (6);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
}}}}}}} m68k_incpci (8);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.L #<data>.L,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0cb9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (6);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (10);
|
|
}}}}}}} m68k_incpci (10);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.L #<data>.L,(d16,PC) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0cba_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = 2;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_getpci () + 6;
|
|
dsta += (uae_s32)(uae_s16)get_word_020_prefetch (6);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
}}}}}}} m68k_incpci (8);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CMP.L #<data>.L,(d8,PC,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0cbb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = 3;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr tmppc;
|
|
uaecptr dsta;
|
|
m68k_incpci (6);
|
|
{ tmppc = m68k_getpci ();
|
|
dsta = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CAS.W #<data>.W,(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0cd0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 84;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{ int ru = (src >> 6) & 7;
|
|
int rc = src & 7;
|
|
{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(m68k_dreg (regs, rc)));
|
|
{ int flgs = ((uae_s16)(m68k_dreg (regs, rc))) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u16)(m68k_dreg (regs, rc))) > ((uae_u16)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
if (GET_ZFLG ()) {
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, (m68k_dreg (regs, ru)));
|
|
}else{
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg(regs, rc) = (m68k_dreg(regs, rc) & ~0xffff) | (dst & 0xffff);
|
|
}}}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CAS.W #<data>.W,(An)+ */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0cd8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 84;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
m68k_areg (regs, dstreg) += 2;
|
|
{ int ru = (src >> 6) & 7;
|
|
int rc = src & 7;
|
|
{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(m68k_dreg (regs, rc)));
|
|
{ int flgs = ((uae_s16)(m68k_dreg (regs, rc))) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u16)(m68k_dreg (regs, rc))) > ((uae_u16)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
if (GET_ZFLG ()) {
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, (m68k_dreg (regs, ru)));
|
|
}else{
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg(regs, rc) = (m68k_dreg(regs, rc) & ~0xffff) | (dst & 0xffff);
|
|
}}}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CAS.W #<data>.W,-(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0ce0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 84;
|
|
CurrentInstrCycles = 10;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 2;
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
{ int ru = (src >> 6) & 7;
|
|
int rc = src & 7;
|
|
{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(m68k_dreg (regs, rc)));
|
|
{ int flgs = ((uae_s16)(m68k_dreg (regs, rc))) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u16)(m68k_dreg (regs, rc))) > ((uae_u16)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
if (GET_ZFLG ()) {
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, (m68k_dreg (regs, ru)));
|
|
}else{
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg(regs, rc) = (m68k_dreg(regs, rc) & ~0xffff) | (dst & 0xffff);
|
|
}}}}}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CAS.W #<data>.W,(d16,An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0ce8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 84;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{ int ru = (src >> 6) & 7;
|
|
int rc = src & 7;
|
|
{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(m68k_dreg (regs, rc)));
|
|
{ int flgs = ((uae_s16)(m68k_dreg (regs, rc))) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u16)(m68k_dreg (regs, rc))) > ((uae_u16)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
if (GET_ZFLG ()) {
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, (m68k_dreg (regs, ru)));
|
|
}else{
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_dreg(regs, rc) = (m68k_dreg(regs, rc) & ~0xffff) | (dst & 0xffff);
|
|
}}}}}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CAS.W #<data>.W,(d8,An,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0cf0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 84;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{ int ru = (src >> 6) & 7;
|
|
int rc = src & 7;
|
|
{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(m68k_dreg (regs, rc)));
|
|
{ int flgs = ((uae_s16)(m68k_dreg (regs, rc))) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u16)(m68k_dreg (regs, rc))) > ((uae_u16)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
if (GET_ZFLG ()) {
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dsta, (m68k_dreg (regs, ru)));
|
|
}else{
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg(regs, rc) = (m68k_dreg(regs, rc) & ~0xffff) | (dst & 0xffff);
|
|
}}}}}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CAS.W #<data>.W,(xxx).W */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0cf8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 84;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{ int ru = (src >> 6) & 7;
|
|
int rc = src & 7;
|
|
{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(m68k_dreg (regs, rc)));
|
|
{ int flgs = ((uae_s16)(m68k_dreg (regs, rc))) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u16)(m68k_dreg (regs, rc))) > ((uae_u16)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
if (GET_ZFLG ()) {
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, (m68k_dreg (regs, ru)));
|
|
}else{
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_dreg(regs, rc) = (m68k_dreg(regs, rc) & ~0xffff) | (dst & 0xffff);
|
|
}}}}}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CAS.W #<data>.W,(xxx).L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0cf9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 84;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{ int ru = (src >> 6) & 7;
|
|
int rc = src & 7;
|
|
{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(m68k_dreg (regs, rc)));
|
|
{ int flgs = ((uae_s16)(m68k_dreg (regs, rc))) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u16)(m68k_dreg (regs, rc))) > ((uae_u16)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
if (GET_ZFLG ()) {
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_word (dsta, (m68k_dreg (regs, ru)));
|
|
}else{
|
|
regs.irc = get_word_020_prefetch (8);
|
|
m68k_dreg(regs, rc) = (m68k_dreg(regs, rc) & ~0xffff) | (dst & 0xffff);
|
|
}}}}}}}} m68k_incpci (8);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CAS2.W #<data>.L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0cfc_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 85;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 extra;
|
|
extra = get_long_020_prefetch (2);
|
|
uae_u32 rn1 = regs.regs[(extra >> 28) & 15];
|
|
uae_u32 rn2 = regs.regs[(extra >> 12) & 15];
|
|
uae_u16 dst1 = x_get_word (rn1), dst2 = x_get_word (rn2);
|
|
{uae_u32 newv = ((uae_u16)(dst1)) - ((uae_u16)(m68k_dreg (regs, (extra >> 16) & 7)));
|
|
{ int flgs = ((uae_s16)(m68k_dreg (regs, (extra >> 16) & 7))) < 0;
|
|
int flgo = ((uae_s16)(dst1)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u16)(m68k_dreg (regs, (extra >> 16) & 7))) > ((uae_u16)(dst1)));
|
|
SET_NFLG (flgn != 0);
|
|
if (GET_ZFLG ()) {
|
|
{uae_u32 newv = ((uae_u16)(dst2)) - ((uae_u16)(m68k_dreg (regs, extra & 7)));
|
|
{ int flgs = ((uae_s16)(m68k_dreg (regs, extra & 7))) < 0;
|
|
int flgo = ((uae_s16)(dst2)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u16)(m68k_dreg (regs, extra & 7))) > ((uae_u16)(dst2)));
|
|
SET_NFLG (flgn != 0);
|
|
if (GET_ZFLG ()) {
|
|
x_put_word (rn1, m68k_dreg (regs, (extra >> 22) & 7));
|
|
x_put_word (rn2, m68k_dreg (regs, (extra >> 6) & 7));
|
|
}}
|
|
}}}} if (! GET_ZFLG ()) {
|
|
m68k_dreg (regs, (extra >> 6) & 7) = (m68k_dreg (regs, (extra >> 6) & 7) & ~0xffff) | (dst2 & 0xffff);
|
|
m68k_dreg (regs, (extra >> 22) & 7) = (m68k_dreg (regs, (extra >> 22) & 7) & ~0xffff) | (dst1 & 0xffff);
|
|
}
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MOVES.B #<data>.W,(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0e10_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 103;
|
|
CurrentInstrCycles = 8;
|
|
{if (!regs.s) { Exception (8); goto l_200275; }
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
if (extra & 0x800)
|
|
{ uae_u32 src = regs.regs[(extra >> 12) & 15];
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
x_put_byte (dsta, src);
|
|
}}else{{ uaecptr srca;
|
|
srca = m68k_areg (regs, dstreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
if (extra & 0x8000) {
|
|
m68k_areg (regs, (extra >> 12) & 7) = (uae_s32)(uae_s8)src;
|
|
} else {
|
|
m68k_dreg (regs, (extra >> 12) & 7) = (m68k_dreg (regs, (extra >> 12) & 7) & ~0xff) | ((src) & 0xff);
|
|
}
|
|
}}} regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
l_200275: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MOVES.B #<data>.W,(An)+ */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0e18_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 103;
|
|
CurrentInstrCycles = 8;
|
|
{if (!regs.s) { Exception (8); goto l_200276; }
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
if (extra & 0x800)
|
|
{ uae_u32 src = regs.regs[(extra >> 12) & 15];
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
x_put_byte (dsta, src);
|
|
}}else{{ uaecptr srca;
|
|
srca = m68k_areg (regs, dstreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
if (extra & 0x8000) {
|
|
m68k_areg (regs, (extra >> 12) & 7) = (uae_s32)(uae_s8)src;
|
|
} else {
|
|
m68k_dreg (regs, (extra >> 12) & 7) = (m68k_dreg (regs, (extra >> 12) & 7) & ~0xff) | ((src) & 0xff);
|
|
}
|
|
}}} regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
l_200276: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MOVES.B #<data>.W,-(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0e20_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 103;
|
|
CurrentInstrCycles = 12;
|
|
{if (!regs.s) { Exception (8); goto l_200277; }
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
if (extra & 0x800)
|
|
{ uae_u32 src = regs.regs[(extra >> 12) & 15];
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
x_put_byte (dsta, src);
|
|
}}else{{ uaecptr srca;
|
|
srca = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, dstreg) = srca;
|
|
if (extra & 0x8000) {
|
|
m68k_areg (regs, (extra >> 12) & 7) = (uae_s32)(uae_s8)src;
|
|
} else {
|
|
m68k_dreg (regs, (extra >> 12) & 7) = (m68k_dreg (regs, (extra >> 12) & 7) & ~0xff) | ((src) & 0xff);
|
|
}
|
|
}}} regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
l_200277: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MOVES.B #<data>.W,(d16,An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0e28_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 103;
|
|
CurrentInstrCycles = 8;
|
|
{if (!regs.s) { Exception (8); goto l_200278; }
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
if (extra & 0x800)
|
|
{ uae_u32 src = regs.regs[(extra >> 12) & 15];
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
}}else{{ uaecptr srca;
|
|
srca = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
if (extra & 0x8000) {
|
|
m68k_areg (regs, (extra >> 12) & 7) = (uae_s32)(uae_s8)src;
|
|
} else {
|
|
m68k_dreg (regs, (extra >> 12) & 7) = (m68k_dreg (regs, (extra >> 12) & 7) & ~0xff) | ((src) & 0xff);
|
|
}
|
|
}}} regs.irc = get_word_020_prefetch (6);
|
|
}}} m68k_incpci (6);
|
|
l_200278: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MOVES.B #<data>.W,(d8,An,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0e30_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 103;
|
|
CurrentInstrCycles = 8;
|
|
{if (!regs.s) { Exception (8); goto l_200279; }
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
if (extra & 0x800)
|
|
{ uae_u32 src = regs.regs[(extra >> 12) & 15];
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
x_put_byte (dsta, src);
|
|
}}}else{{ uaecptr srca;
|
|
m68k_incpci (4);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 1);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
if (extra & 0x8000) {
|
|
m68k_areg (regs, (extra >> 12) & 7) = (uae_s32)(uae_s8)src;
|
|
} else {
|
|
m68k_dreg (regs, (extra >> 12) & 7) = (m68k_dreg (regs, (extra >> 12) & 7) & ~0xff) | ((src) & 0xff);
|
|
}
|
|
}}}} regs.irc = get_word_020_prefetch (0);
|
|
}}}l_200279: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MOVES.B #<data>.W,(xxx).W */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0e38_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 103;
|
|
CurrentInstrCycles = 8;
|
|
{if (!regs.s) { Exception (8); goto l_200280; }
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
if (extra & 0x800)
|
|
{ uae_u32 src = regs.regs[(extra >> 12) & 15];
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
}}else{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
if (extra & 0x8000) {
|
|
m68k_areg (regs, (extra >> 12) & 7) = (uae_s32)(uae_s8)src;
|
|
} else {
|
|
m68k_dreg (regs, (extra >> 12) & 7) = (m68k_dreg (regs, (extra >> 12) & 7) & ~0xff) | ((src) & 0xff);
|
|
}
|
|
}}} regs.irc = get_word_020_prefetch (6);
|
|
}}} m68k_incpci (6);
|
|
l_200280: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MOVES.B #<data>.W,(xxx).L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0e39_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 103;
|
|
CurrentInstrCycles = 8;
|
|
{if (!regs.s) { Exception (8); goto l_200281; }
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
if (extra & 0x800)
|
|
{ uae_u32 src = regs.regs[(extra >> 12) & 15];
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
}}else{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (4);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
if (extra & 0x8000) {
|
|
m68k_areg (regs, (extra >> 12) & 7) = (uae_s32)(uae_s8)src;
|
|
} else {
|
|
m68k_dreg (regs, (extra >> 12) & 7) = (m68k_dreg (regs, (extra >> 12) & 7) & ~0xff) | ((src) & 0xff);
|
|
}
|
|
}}} regs.irc = get_word_020_prefetch (8);
|
|
}}} m68k_incpci (8);
|
|
l_200281: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MOVES.W #<data>.W,(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0e50_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 103;
|
|
CurrentInstrCycles = 8;
|
|
{if (!regs.s) { Exception (8); goto l_200282; }
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
if (extra & 0x800)
|
|
{ uae_u32 src = regs.regs[(extra >> 12) & 15];
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
x_put_word (dsta, src);
|
|
}}else{{ uaecptr srca;
|
|
srca = m68k_areg (regs, dstreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
if (extra & 0x8000) {
|
|
m68k_areg (regs, (extra >> 12) & 7) = (uae_s32)(uae_s16)src;
|
|
} else {
|
|
m68k_dreg (regs, (extra >> 12) & 7) = (m68k_dreg (regs, (extra >> 12) & 7) & ~0xffff) | ((src) & 0xffff);
|
|
}
|
|
}}} regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
l_200282: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MOVES.W #<data>.W,(An)+ */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0e58_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 103;
|
|
CurrentInstrCycles = 8;
|
|
{if (!regs.s) { Exception (8); goto l_200283; }
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
if (extra & 0x800)
|
|
{ uae_u32 src = regs.regs[(extra >> 12) & 15];
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += 2;
|
|
x_put_word (dsta, src);
|
|
}}else{{ uaecptr srca;
|
|
srca = m68k_areg (regs, dstreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, dstreg) += 2;
|
|
if (extra & 0x8000) {
|
|
m68k_areg (regs, (extra >> 12) & 7) = (uae_s32)(uae_s16)src;
|
|
} else {
|
|
m68k_dreg (regs, (extra >> 12) & 7) = (m68k_dreg (regs, (extra >> 12) & 7) & ~0xffff) | ((src) & 0xffff);
|
|
}
|
|
}}} regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
l_200283: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MOVES.W #<data>.W,-(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0e60_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 103;
|
|
CurrentInstrCycles = 12;
|
|
{if (!regs.s) { Exception (8); goto l_200284; }
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
if (extra & 0x800)
|
|
{ uae_u32 src = regs.regs[(extra >> 12) & 15];
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 2;
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
x_put_word (dsta, src);
|
|
}}else{{ uaecptr srca;
|
|
srca = m68k_areg (regs, dstreg) - 2;
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, dstreg) = srca;
|
|
if (extra & 0x8000) {
|
|
m68k_areg (regs, (extra >> 12) & 7) = (uae_s32)(uae_s16)src;
|
|
} else {
|
|
m68k_dreg (regs, (extra >> 12) & 7) = (m68k_dreg (regs, (extra >> 12) & 7) & ~0xffff) | ((src) & 0xffff);
|
|
}
|
|
}}} regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
l_200284: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MOVES.W #<data>.W,(d16,An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0e68_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 103;
|
|
CurrentInstrCycles = 8;
|
|
{if (!regs.s) { Exception (8); goto l_200285; }
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
if (extra & 0x800)
|
|
{ uae_u32 src = regs.regs[(extra >> 12) & 15];
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
}}else{{ uaecptr srca;
|
|
srca = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
if (extra & 0x8000) {
|
|
m68k_areg (regs, (extra >> 12) & 7) = (uae_s32)(uae_s16)src;
|
|
} else {
|
|
m68k_dreg (regs, (extra >> 12) & 7) = (m68k_dreg (regs, (extra >> 12) & 7) & ~0xffff) | ((src) & 0xffff);
|
|
}
|
|
}}} regs.irc = get_word_020_prefetch (6);
|
|
}}} m68k_incpci (6);
|
|
l_200285: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MOVES.W #<data>.W,(d8,An,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0e70_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 103;
|
|
CurrentInstrCycles = 8;
|
|
{if (!regs.s) { Exception (8); goto l_200286; }
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
if (extra & 0x800)
|
|
{ uae_u32 src = regs.regs[(extra >> 12) & 15];
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
x_put_word (dsta, src);
|
|
}}}else{{ uaecptr srca;
|
|
m68k_incpci (4);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 1);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
if (extra & 0x8000) {
|
|
m68k_areg (regs, (extra >> 12) & 7) = (uae_s32)(uae_s16)src;
|
|
} else {
|
|
m68k_dreg (regs, (extra >> 12) & 7) = (m68k_dreg (regs, (extra >> 12) & 7) & ~0xffff) | ((src) & 0xffff);
|
|
}
|
|
}}}} regs.irc = get_word_020_prefetch (0);
|
|
}}}l_200286: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MOVES.W #<data>.W,(xxx).W */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0e78_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 103;
|
|
CurrentInstrCycles = 8;
|
|
{if (!regs.s) { Exception (8); goto l_200287; }
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
if (extra & 0x800)
|
|
{ uae_u32 src = regs.regs[(extra >> 12) & 15];
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
}}else{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
if (extra & 0x8000) {
|
|
m68k_areg (regs, (extra >> 12) & 7) = (uae_s32)(uae_s16)src;
|
|
} else {
|
|
m68k_dreg (regs, (extra >> 12) & 7) = (m68k_dreg (regs, (extra >> 12) & 7) & ~0xffff) | ((src) & 0xffff);
|
|
}
|
|
}}} regs.irc = get_word_020_prefetch (6);
|
|
}}} m68k_incpci (6);
|
|
l_200287: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MOVES.W #<data>.W,(xxx).L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0e79_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 103;
|
|
CurrentInstrCycles = 8;
|
|
{if (!regs.s) { Exception (8); goto l_200288; }
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
if (extra & 0x800)
|
|
{ uae_u32 src = regs.regs[(extra >> 12) & 15];
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
}}else{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (4);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
if (extra & 0x8000) {
|
|
m68k_areg (regs, (extra >> 12) & 7) = (uae_s32)(uae_s16)src;
|
|
} else {
|
|
m68k_dreg (regs, (extra >> 12) & 7) = (m68k_dreg (regs, (extra >> 12) & 7) & ~0xffff) | ((src) & 0xffff);
|
|
}
|
|
}}} regs.irc = get_word_020_prefetch (8);
|
|
}}} m68k_incpci (8);
|
|
l_200288: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MOVES.L #<data>.W,(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0e90_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 103;
|
|
CurrentInstrCycles = 16;
|
|
{if (!regs.s) { Exception (8); goto l_200289; }
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
if (extra & 0x800)
|
|
{ uae_u32 src = regs.regs[(extra >> 12) & 15];
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
x_put_long (dsta, src);
|
|
}}else{{ uaecptr srca;
|
|
srca = m68k_areg (regs, dstreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
if (extra & 0x8000) {
|
|
m68k_areg (regs, (extra >> 12) & 7) = src;
|
|
} else {
|
|
m68k_dreg (regs, (extra >> 12) & 7) = (src);
|
|
}
|
|
}}} regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
l_200289: ;
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MOVES.L #<data>.W,(An)+ */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0e98_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 103;
|
|
CurrentInstrCycles = 16;
|
|
{if (!regs.s) { Exception (8); goto l_200290; }
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
if (extra & 0x800)
|
|
{ uae_u32 src = regs.regs[(extra >> 12) & 15];
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += 4;
|
|
x_put_long (dsta, src);
|
|
}}else{{ uaecptr srca;
|
|
srca = m68k_areg (regs, dstreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, dstreg) += 4;
|
|
if (extra & 0x8000) {
|
|
m68k_areg (regs, (extra >> 12) & 7) = src;
|
|
} else {
|
|
m68k_dreg (regs, (extra >> 12) & 7) = (src);
|
|
}
|
|
}}} regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
l_200290: ;
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MOVES.L #<data>.W,-(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0ea0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 103;
|
|
CurrentInstrCycles = 20;
|
|
{if (!regs.s) { Exception (8); goto l_200291; }
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
if (extra & 0x800)
|
|
{ uae_u32 src = regs.regs[(extra >> 12) & 15];
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 4;
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
x_put_long (dsta, src);
|
|
}}else{{ uaecptr srca;
|
|
srca = m68k_areg (regs, dstreg) - 4;
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, dstreg) = srca;
|
|
if (extra & 0x8000) {
|
|
m68k_areg (regs, (extra >> 12) & 7) = src;
|
|
} else {
|
|
m68k_dreg (regs, (extra >> 12) & 7) = (src);
|
|
}
|
|
}}} regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
l_200291: ;
|
|
return 20 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MOVES.L #<data>.W,(d16,An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0ea8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 103;
|
|
CurrentInstrCycles = 16;
|
|
{if (!regs.s) { Exception (8); goto l_200292; }
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
if (extra & 0x800)
|
|
{ uae_u32 src = regs.regs[(extra >> 12) & 15];
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
x_put_long (dsta, src);
|
|
}}else{{ uaecptr srca;
|
|
srca = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
if (extra & 0x8000) {
|
|
m68k_areg (regs, (extra >> 12) & 7) = src;
|
|
} else {
|
|
m68k_dreg (regs, (extra >> 12) & 7) = (src);
|
|
}
|
|
}}} regs.irc = get_word_020_prefetch (6);
|
|
}}} m68k_incpci (6);
|
|
l_200292: ;
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MOVES.L #<data>.W,(d8,An,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0eb0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 103;
|
|
CurrentInstrCycles = 16;
|
|
{if (!regs.s) { Exception (8); goto l_200293; }
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
if (extra & 0x800)
|
|
{ uae_u32 src = regs.regs[(extra >> 12) & 15];
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
x_put_long (dsta, src);
|
|
}}}else{{ uaecptr srca;
|
|
m68k_incpci (4);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 1);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
if (extra & 0x8000) {
|
|
m68k_areg (regs, (extra >> 12) & 7) = src;
|
|
} else {
|
|
m68k_dreg (regs, (extra >> 12) & 7) = (src);
|
|
}
|
|
}}}} regs.irc = get_word_020_prefetch (0);
|
|
}}}l_200293: ;
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MOVES.L #<data>.W,(xxx).W */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0eb8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 103;
|
|
CurrentInstrCycles = 16;
|
|
{if (!regs.s) { Exception (8); goto l_200294; }
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
if (extra & 0x800)
|
|
{ uae_u32 src = regs.regs[(extra >> 12) & 15];
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
x_put_long (dsta, src);
|
|
}}else{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
if (extra & 0x8000) {
|
|
m68k_areg (regs, (extra >> 12) & 7) = src;
|
|
} else {
|
|
m68k_dreg (regs, (extra >> 12) & 7) = (src);
|
|
}
|
|
}}} regs.irc = get_word_020_prefetch (6);
|
|
}}} m68k_incpci (6);
|
|
l_200294: ;
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MOVES.L #<data>.W,(xxx).L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0eb9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 103;
|
|
CurrentInstrCycles = 16;
|
|
{if (!regs.s) { Exception (8); goto l_200295; }
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
if (extra & 0x800)
|
|
{ uae_u32 src = regs.regs[(extra >> 12) & 15];
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
x_put_long (dsta, src);
|
|
}}else{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (4);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
if (extra & 0x8000) {
|
|
m68k_areg (regs, (extra >> 12) & 7) = src;
|
|
} else {
|
|
m68k_dreg (regs, (extra >> 12) & 7) = (src);
|
|
}
|
|
}}} regs.irc = get_word_020_prefetch (8);
|
|
}}} m68k_incpci (8);
|
|
l_200295: ;
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CAS.L #<data>.W,(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0ed0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 84;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{ int ru = (src >> 6) & 7;
|
|
int rc = src & 7;
|
|
{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(m68k_dreg (regs, rc)));
|
|
{ int flgs = ((uae_s32)(m68k_dreg (regs, rc))) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(m68k_dreg (regs, rc))) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
if (GET_ZFLG ()) {
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, (m68k_dreg (regs, ru)));
|
|
}else{
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg(regs, rc) = dst;
|
|
}}}}}}}} m68k_incpci (4);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CAS.L #<data>.W,(An)+ */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0ed8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 84;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) += 4;
|
|
{ int ru = (src >> 6) & 7;
|
|
int rc = src & 7;
|
|
{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(m68k_dreg (regs, rc)));
|
|
{ int flgs = ((uae_s32)(m68k_dreg (regs, rc))) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(m68k_dreg (regs, rc))) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
if (GET_ZFLG ()) {
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, (m68k_dreg (regs, ru)));
|
|
}else{
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg(regs, rc) = dst;
|
|
}}}}}}}} m68k_incpci (4);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CAS.L #<data>.W,-(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0ee0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 84;
|
|
CurrentInstrCycles = 18;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 4;
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
{ int ru = (src >> 6) & 7;
|
|
int rc = src & 7;
|
|
{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(m68k_dreg (regs, rc)));
|
|
{ int flgs = ((uae_s32)(m68k_dreg (regs, rc))) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(m68k_dreg (regs, rc))) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
if (GET_ZFLG ()) {
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, (m68k_dreg (regs, ru)));
|
|
}else{
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg(regs, rc) = dst;
|
|
}}}}}}}} m68k_incpci (4);
|
|
return 18 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CAS.L #<data>.W,(d16,An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0ee8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 84;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{ int ru = (src >> 6) & 7;
|
|
int rc = src & 7;
|
|
{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(m68k_dreg (regs, rc)));
|
|
{ int flgs = ((uae_s32)(m68k_dreg (regs, rc))) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(m68k_dreg (regs, rc))) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
if (GET_ZFLG ()) {
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, (m68k_dreg (regs, ru)));
|
|
}else{
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_dreg(regs, rc) = dst;
|
|
}}}}}}}} m68k_incpci (6);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CAS.L #<data>.W,(d8,An,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0ef0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 84;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{ int ru = (src >> 6) & 7;
|
|
int rc = src & 7;
|
|
{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(m68k_dreg (regs, rc)));
|
|
{ int flgs = ((uae_s32)(m68k_dreg (regs, rc))) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(m68k_dreg (regs, rc))) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
if (GET_ZFLG ()) {
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (dsta, (m68k_dreg (regs, ru)));
|
|
}else{
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg(regs, rc) = dst;
|
|
}}}}}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CAS.L #<data>.W,(xxx).W */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0ef8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 84;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{ int ru = (src >> 6) & 7;
|
|
int rc = src & 7;
|
|
{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(m68k_dreg (regs, rc)));
|
|
{ int flgs = ((uae_s32)(m68k_dreg (regs, rc))) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(m68k_dreg (regs, rc))) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
if (GET_ZFLG ()) {
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, (m68k_dreg (regs, ru)));
|
|
}else{
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_dreg(regs, rc) = dst;
|
|
}}}}}}}} m68k_incpci (6);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CAS.L #<data>.W,(xxx).L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0ef9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 84;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{ int ru = (src >> 6) & 7;
|
|
int rc = src & 7;
|
|
{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(m68k_dreg (regs, rc)));
|
|
{ int flgs = ((uae_s32)(m68k_dreg (regs, rc))) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(m68k_dreg (regs, rc))) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
if (GET_ZFLG ()) {
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_long (dsta, (m68k_dreg (regs, ru)));
|
|
}else{
|
|
regs.irc = get_word_020_prefetch (8);
|
|
m68k_dreg(regs, rc) = dst;
|
|
}}}}}}}} m68k_incpci (8);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CAS2.L #<data>.L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_0efc_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 85;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 extra;
|
|
extra = get_long_020_prefetch (2);
|
|
uae_u32 rn1 = regs.regs[(extra >> 28) & 15];
|
|
uae_u32 rn2 = regs.regs[(extra >> 12) & 15];
|
|
uae_u32 dst1 = x_get_long (rn1), dst2 = x_get_long (rn2);
|
|
{uae_u32 newv = ((uae_u32)(dst1)) - ((uae_u32)(m68k_dreg (regs, (extra >> 16) & 7)));
|
|
{ int flgs = ((uae_s32)(m68k_dreg (regs, (extra >> 16) & 7))) < 0;
|
|
int flgo = ((uae_s32)(dst1)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(m68k_dreg (regs, (extra >> 16) & 7))) > ((uae_u32)(dst1)));
|
|
SET_NFLG (flgn != 0);
|
|
if (GET_ZFLG ()) {
|
|
{uae_u32 newv = ((uae_u32)(dst2)) - ((uae_u32)(m68k_dreg (regs, extra & 7)));
|
|
{ int flgs = ((uae_s32)(m68k_dreg (regs, extra & 7))) < 0;
|
|
int flgo = ((uae_s32)(dst2)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(m68k_dreg (regs, extra & 7))) > ((uae_u32)(dst2)));
|
|
SET_NFLG (flgn != 0);
|
|
if (GET_ZFLG ()) {
|
|
x_put_long (rn1, m68k_dreg (regs, (extra >> 22) & 7));
|
|
x_put_long (rn2, m68k_dreg (regs, (extra >> 6) & 7));
|
|
}}
|
|
}}}} if (! GET_ZFLG ()) {
|
|
m68k_dreg (regs, (extra >> 6) & 7) = dst2;
|
|
m68k_dreg (regs, (extra >> 22) & 7) = dst1;
|
|
}
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MOVE.B Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_1000_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
m68k_incpci (2);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_1010_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
m68k_incpci (2);
|
|
}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (An)+,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_1018_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
m68k_incpci (2);
|
|
}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B -(An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_1020_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
m68k_incpci (2);
|
|
}}}}return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (d16,An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_1028_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
m68k_incpci (4);
|
|
}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (d8,An,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_1030_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (xxx).W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_1038_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
m68k_incpci (4);
|
|
}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (xxx).L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_1039_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
m68k_incpci (6);
|
|
}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (d16,PC),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_103a_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
m68k_incpci (4);
|
|
}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (d8,PC,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_103b_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B #<data>.B,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_103c_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
m68k_incpci (4);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B Dn,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_1080_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (An),(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_1090_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (An)+,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_1098_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B -(An),(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_10a0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (d16,An),(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_10a8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (d8,An,Xn),(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_10b0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (xxx).W,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_10b8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (xxx).L,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_10b9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (d16,PC),(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_10ba_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (d8,PC,Xn),(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_10bb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B #<data>.B,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_10bc_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B Dn,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_10c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (An),(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_10d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (An)+,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_10d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B -(An),(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_10e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (d16,An),(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_10e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (d8,An,Xn),(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_10f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (xxx).W,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_10f8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (xxx).L,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_10f9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (d16,PC),(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_10fa_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (d8,PC,Xn),(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_10fb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B #<data>.B,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_10fc_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B Dn,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_1100_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (An),-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_1110_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (An)+,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_1118_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B -(An),-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_1120_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (d16,An),-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_1128_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (d8,An,Xn),-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_1130_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (xxx).W,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_1138_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (xxx).L,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_1139_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (d16,PC),-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_113a_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (d8,PC,Xn),-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_113b_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B #<data>.B,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_113c_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B Dn,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_1140_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (An),(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_1150_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (An)+,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_1158_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B -(An),(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_1160_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (d16,An),(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_1168_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (d8,An,Xn),(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_1170_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (xxx).W,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_1178_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (xxx).L,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_1179_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (6);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (8);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (d16,PC),(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_117a_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (d8,PC,Xn),(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_117b_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B #<data>.B,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_117c_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B Dn,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_1180_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, src);
|
|
}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (An),(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_1190_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (An)+,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_1198_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B -(An),(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_11a0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, src);
|
|
}}}}}return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (d16,An),(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_11a8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (d8,An,Xn),(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_11b0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 1);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, src);
|
|
}}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (xxx).W,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_11b8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (xxx).L,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_11b9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (6);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (d16,PC),(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_11ba_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (d8,PC,Xn),(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_11bb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 1);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, src);
|
|
}}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B #<data>.B,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_11bc_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, src);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B Dn,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_11c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (An),(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_11d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (An)+,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_11d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B -(An),(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_11e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (d16,An),(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_11e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (d8,An,Xn),(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_11f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (xxx).W,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_11f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (xxx).L,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_11f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (6);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (8);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (d16,PC),(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_11fa_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (d8,PC,Xn),(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_11fb_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B #<data>.B,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_11fc_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B Dn,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_13c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (An),(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_13d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (An)+,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_13d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B -(An),(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_13e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (d16,An),(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_13e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (8);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (d8,An,Xn),(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_13f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (xxx).W,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_13f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (8);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (xxx).L,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_13f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (6);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (10);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (10);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (d16,PC),(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_13fa_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (8);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B (d8,PC,Xn),(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_13fb_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.B #<data>.B,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_13fc_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_byte (dsta, src);
|
|
m68k_incpci (8);
|
|
}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2000_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
m68k_incpci (2);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L An,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2008_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_areg (regs, srcreg);
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
m68k_incpci (2);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2010_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
m68k_incpci (2);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (An)+,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2018_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) += 4;
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
m68k_incpci (2);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L -(An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2020_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 4;
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
m68k_incpci (2);
|
|
}}}}return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (d16,An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2028_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
m68k_incpci (4);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (d8,An,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2030_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (xxx).W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2038_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
m68k_incpci (4);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (xxx).L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2039_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
m68k_incpci (6);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (d16,PC),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_203a_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
m68k_incpci (4);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (d8,PC,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_203b_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L #<data>.L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_203c_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
m68k_incpci (6);
|
|
}}}return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVEA.L Dn,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2040_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 31;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (src);
|
|
m68k_incpci (2);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVEA.L An,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2048_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 31;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_areg (regs, srcreg);
|
|
{ regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (src);
|
|
m68k_incpci (2);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVEA.L (An),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2050_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 31;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (src);
|
|
m68k_incpci (2);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVEA.L (An)+,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2058_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 31;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) += 4;
|
|
{ regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (src);
|
|
m68k_incpci (2);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVEA.L -(An),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2060_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 31;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 4;
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (src);
|
|
m68k_incpci (2);
|
|
}}}}return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVEA.L (d16,An),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2068_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 31;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ regs.irc = get_word_020_prefetch (4);
|
|
m68k_areg (regs, dstreg) = (src);
|
|
m68k_incpci (4);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVEA.L (d8,An,Xn),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2070_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 31;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ regs.irc = get_word_020_prefetch (0);
|
|
m68k_areg (regs, dstreg) = (src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVEA.L (xxx).W,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2078_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 31;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ regs.irc = get_word_020_prefetch (4);
|
|
m68k_areg (regs, dstreg) = (src);
|
|
m68k_incpci (4);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVEA.L (xxx).L,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2079_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 31;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ regs.irc = get_word_020_prefetch (6);
|
|
m68k_areg (regs, dstreg) = (src);
|
|
m68k_incpci (6);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVEA.L (d16,PC),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_207a_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 31;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ regs.irc = get_word_020_prefetch (4);
|
|
m68k_areg (regs, dstreg) = (src);
|
|
m68k_incpci (4);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVEA.L (d8,PC,Xn),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_207b_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 31;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ regs.irc = get_word_020_prefetch (0);
|
|
m68k_areg (regs, dstreg) = (src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVEA.L #<data>.L,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_207c_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 31;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ regs.irc = get_word_020_prefetch (6);
|
|
m68k_areg (regs, dstreg) = (src);
|
|
m68k_incpci (6);
|
|
}}}return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L Dn,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2080_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L An,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2088_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s32 src = m68k_areg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (An),(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2090_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (An)+,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2098_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) += 4;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L -(An),(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_20a0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 18;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 4;
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}return 18 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (d16,An),(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_20a8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (d8,An,Xn),(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_20b0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (dsta, src);
|
|
}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (xxx).W,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_20b8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (xxx).L,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_20b9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (d16,PC),(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_20ba_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (d8,PC,Xn),(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_20bb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (dsta, src);
|
|
}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L #<data>.L,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_20bc_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L Dn,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_20c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += 4;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L An,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_20c8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s32 src = m68k_areg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += 4;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (An),(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_20d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += 4;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (An)+,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_20d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) += 4;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += 4;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L -(An),(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_20e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 18;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 4;
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += 4;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}return 18 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (d16,An),(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_20e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += 4;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (d8,An,Xn),(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_20f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += 4;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (dsta, src);
|
|
}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (xxx).W,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_20f8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += 4;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (xxx).L,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_20f9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += 4;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (d16,PC),(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_20fa_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += 4;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (d8,PC,Xn),(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_20fb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += 4;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (dsta, src);
|
|
}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L #<data>.L,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_20fc_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += 4;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L Dn,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2100_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 4;
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L An,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2108_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s32 src = m68k_areg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 4;
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (An),-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2110_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 4;
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (An)+,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2118_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) += 4;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 4;
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L -(An),-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2120_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 18;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 4;
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 4;
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}return 18 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (d16,An),-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2128_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 4;
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (d8,An,Xn),-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2130_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 4;
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (dsta, src);
|
|
}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (xxx).W,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2138_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 4;
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (xxx).L,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2139_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 4;
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (d16,PC),-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_213a_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 4;
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (d8,PC,Xn),-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_213b_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 4;
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (dsta, src);
|
|
}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L #<data>.L,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_213c_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 4;
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L Dn,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2140_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L An,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2148_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s32 src = m68k_areg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (An),(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2150_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (An)+,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2158_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) += 4;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L -(An),(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2160_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 18;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 4;
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 18 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (d16,An),(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2168_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (d8,An,Xn),(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2170_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (xxx).W,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2178_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (xxx).L,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2179_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (6);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (8);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (d16,PC),(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_217a_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (d8,PC,Xn),(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_217b_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L #<data>.L,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_217c_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (6);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (8);
|
|
}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L Dn,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2180_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (dsta, src);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L An,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2188_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s32 src = m68k_areg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (dsta, src);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (An),(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2190_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (dsta, src);
|
|
}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (An)+,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_2198_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) += 4;
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (dsta, src);
|
|
}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
|
|
#ifdef PART_3
|
|
/* MOVE.L -(An),(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_21a0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 18;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 4;
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (dsta, src);
|
|
}}}}}return 18 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (d16,An),(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_21a8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (dsta, src);
|
|
}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (d8,An,Xn),(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_21b0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 1);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (dsta, src);
|
|
}}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (xxx).W,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_21b8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (dsta, src);
|
|
}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (xxx).L,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_21b9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (6);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (dsta, src);
|
|
}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (d16,PC),(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_21ba_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (dsta, src);
|
|
}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (d8,PC,Xn),(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_21bb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 1);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (dsta, src);
|
|
}}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L #<data>.L,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_21bc_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (6);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (dsta, src);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L Dn,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_21c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L An,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_21c8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s32 src = m68k_areg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (An),(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_21d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (An)+,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_21d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) += 4;
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L -(An),(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_21e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 18;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 4;
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 18 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (d16,An),(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_21e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (d8,An,Xn),(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_21f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (xxx).W,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_21f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (xxx).L,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_21f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (6);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (8);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (d16,PC),(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_21fa_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (d8,PC,Xn),(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_21fb_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L #<data>.L,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_21fc_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (6);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (8);
|
|
}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L Dn,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_23c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L An,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_23c8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s32 src = m68k_areg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (An),(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_23d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (An)+,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_23d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) += 4;
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L -(An),(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_23e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 18;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 4;
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 18 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (d16,An),(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_23e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (8);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (d8,An,Xn),(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_23f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (xxx).W,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_23f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (8);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (xxx).L,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_23f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (6);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (10);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (10);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (d16,PC),(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_23fa_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (8);
|
|
}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L (d8,PC,Xn),(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_23fb_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.L #<data>.L,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_23fc_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (6);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (10);
|
|
x_put_long (dsta, src);
|
|
m68k_incpci (10);
|
|
}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3000_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
m68k_incpci (2);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W An,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3008_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_areg (regs, srcreg);
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
m68k_incpci (2);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3010_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
m68k_incpci (2);
|
|
}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (An)+,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3018_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
m68k_incpci (2);
|
|
}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W -(An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3020_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
m68k_incpci (2);
|
|
}}}}return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (d16,An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3028_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
m68k_incpci (4);
|
|
}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (d8,An,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3030_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (xxx).W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3038_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
m68k_incpci (4);
|
|
}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (xxx).L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3039_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
m68k_incpci (6);
|
|
}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (d16,PC),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_303a_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
m68k_incpci (4);
|
|
}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (d8,PC,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_303b_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W #<data>.W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_303c_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
m68k_incpci (4);
|
|
}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVEA.W Dn,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3040_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 31;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ src = (uae_s32)(uae_s16)src;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (uae_s32)(uae_s16)(src);
|
|
m68k_incpci (2);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVEA.W An,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3048_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 31;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_areg (regs, srcreg);
|
|
{ src = (uae_s32)(uae_s16)src;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (uae_s32)(uae_s16)(src);
|
|
m68k_incpci (2);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVEA.W (An),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3050_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 31;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ src = (uae_s32)(uae_s16)src;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (uae_s32)(uae_s16)(src);
|
|
m68k_incpci (2);
|
|
}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVEA.W (An)+,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3058_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 31;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
{ src = (uae_s32)(uae_s16)src;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (uae_s32)(uae_s16)(src);
|
|
m68k_incpci (2);
|
|
}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVEA.W -(An),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3060_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 31;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ src = (uae_s32)(uae_s16)src;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (uae_s32)(uae_s16)(src);
|
|
m68k_incpci (2);
|
|
}}}}return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVEA.W (d16,An),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3068_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 31;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ src = (uae_s32)(uae_s16)src;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_areg (regs, dstreg) = (uae_s32)(uae_s16)(src);
|
|
m68k_incpci (4);
|
|
}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVEA.W (d8,An,Xn),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3070_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 31;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ src = (uae_s32)(uae_s16)src;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_areg (regs, dstreg) = (uae_s32)(uae_s16)(src);
|
|
}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVEA.W (xxx).W,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3078_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 31;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ src = (uae_s32)(uae_s16)src;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_areg (regs, dstreg) = (uae_s32)(uae_s16)(src);
|
|
m68k_incpci (4);
|
|
}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVEA.W (xxx).L,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3079_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 31;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ src = (uae_s32)(uae_s16)src;
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_areg (regs, dstreg) = (uae_s32)(uae_s16)(src);
|
|
m68k_incpci (6);
|
|
}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVEA.W (d16,PC),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_307a_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 31;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ src = (uae_s32)(uae_s16)src;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_areg (regs, dstreg) = (uae_s32)(uae_s16)(src);
|
|
m68k_incpci (4);
|
|
}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVEA.W (d8,PC,Xn),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_307b_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 31;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ src = (uae_s32)(uae_s16)src;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_areg (regs, dstreg) = (uae_s32)(uae_s16)(src);
|
|
}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVEA.W #<data>.W,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_307c_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 31;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ src = (uae_s32)(uae_s16)src;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_areg (regs, dstreg) = (uae_s32)(uae_s16)(src);
|
|
m68k_incpci (4);
|
|
}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W Dn,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3080_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W An,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3088_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_areg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (An),(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3090_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (An)+,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3098_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W -(An),(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_30a0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (d16,An),(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_30a8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (d8,An,Xn),(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_30b0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dsta, src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (xxx).W,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_30b8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (xxx).L,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_30b9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (d16,PC),(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_30ba_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (d8,PC,Xn),(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_30bb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dsta, src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W #<data>.W,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_30bc_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W Dn,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_30c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += 2;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W An,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_30c8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_areg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += 2;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (An),(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_30d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += 2;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (An)+,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_30d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += 2;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W -(An),(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_30e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += 2;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (d16,An),(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_30e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += 2;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (d8,An,Xn),(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_30f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += 2;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dsta, src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (xxx).W,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_30f8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += 2;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (xxx).L,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_30f9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += 2;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (d16,PC),(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_30fa_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += 2;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (d8,PC,Xn),(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_30fb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += 2;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dsta, src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W #<data>.W,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_30fc_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
m68k_areg (regs, dstreg) += 2;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W Dn,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3100_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 2;
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W An,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3108_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_areg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 2;
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (An),-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3110_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 2;
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (An)+,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3118_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 2;
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W -(An),-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3120_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 2;
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (d16,An),-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3128_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 2;
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (d8,An,Xn),-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3130_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 2;
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dsta, src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (xxx).W,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3138_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 2;
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (xxx).L,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3139_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 2;
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (d16,PC),-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_313a_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 2;
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (d8,PC,Xn),-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_313b_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 2;
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dsta, src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W #<data>.W,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_313c_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 2;
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W Dn,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3140_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W An,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3148_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_areg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (An),(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3150_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (An)+,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3158_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W -(An),(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3160_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (d16,An),(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3168_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (d8,An,Xn),(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3170_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (xxx).W,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3178_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (xxx).L,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3179_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (6);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (8);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (d16,PC),(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_317a_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (d8,PC,Xn),(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_317b_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W #<data>.W,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_317c_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W Dn,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3180_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dsta, src);
|
|
}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W An,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3188_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_areg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dsta, src);
|
|
}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (An),(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3190_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dsta, src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (An)+,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_3198_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dsta, src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W -(An),(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_31a0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dsta, src);
|
|
}}}}}return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (d16,An),(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_31a8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dsta, src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (d8,An,Xn),(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_31b0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 1);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dsta, src);
|
|
}}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (xxx).W,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_31b8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dsta, src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (xxx).L,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_31b9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (6);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dsta, src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (d16,PC),(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_31ba_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dsta, src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (d8,PC,Xn),(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_31bb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 1);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dsta, src);
|
|
}}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W #<data>.W,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_31bc_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dsta, src);
|
|
}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W Dn,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_31c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W An,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_31c8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_areg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (An),(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_31d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (An)+,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_31d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W -(An),(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_31e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (d16,An),(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_31e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (d8,An,Xn),(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_31f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (xxx).W,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_31f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (xxx).L,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_31f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (6);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (8);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (d16,PC),(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_31fa_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (d8,PC,Xn),(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_31fb_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (2);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W #<data>.W,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_31fc_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W Dn,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_33c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W An,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_33c8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_areg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (An),(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_33d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (An)+,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_33d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W -(An),(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_33e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (6);
|
|
}}}}return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (d16,An),(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_33e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (8);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (d8,An,Xn),(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_33f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (xxx).W,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_33f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (8);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (xxx).L,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_33f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (6);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (10);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (10);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (d16,PC),(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_33fa_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (8);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W (d8,PC,Xn),(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_33fb_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (4);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVE.W #<data>.W,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_33fc_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
x_put_word (dsta, src);
|
|
m68k_incpci (8);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEGX.B Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4000_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 16;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uae_u32 newv = 0 - src - (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(0)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s8)(newv)) == 0));
|
|
SET_NFLG (((uae_s8)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xff) | ((newv) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEGX.B (An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4010_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 16;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_u32 newv = 0 - src - (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(0)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s8)(newv)) == 0));
|
|
SET_NFLG (((uae_s8)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, newv);
|
|
}}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEGX.B (An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4018_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 16;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
{ uae_u32 newv = 0 - src - (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(0)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s8)(newv)) == 0));
|
|
SET_NFLG (((uae_s8)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, newv);
|
|
}}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEGX.B -(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4020_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 16;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uae_u32 newv = 0 - src - (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(0)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s8)(newv)) == 0));
|
|
SET_NFLG (((uae_s8)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, newv);
|
|
}}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEGX.B (d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4028_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 16;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_u32 newv = 0 - src - (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(0)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s8)(newv)) == 0));
|
|
SET_NFLG (((uae_s8)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, newv);
|
|
}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEGX.B (d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4030_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 16;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_u32 newv = 0 - src - (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(0)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s8)(newv)) == 0));
|
|
SET_NFLG (((uae_s8)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (srca, newv);
|
|
}}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEGX.B (xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4038_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 16;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_u32 newv = 0 - src - (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(0)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s8)(newv)) == 0));
|
|
SET_NFLG (((uae_s8)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, newv);
|
|
}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEGX.B (xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4039_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 16;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_u32 newv = 0 - src - (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(0)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s8)(newv)) == 0));
|
|
SET_NFLG (((uae_s8)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (srca, newv);
|
|
}}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEGX.W Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4040_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 16;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uae_u32 newv = 0 - src - (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(0)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s16)(newv)) == 0));
|
|
SET_NFLG (((uae_s16)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xffff) | ((newv) & 0xffff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEGX.W (An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4050_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 16;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_u32 newv = 0 - src - (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(0)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s16)(newv)) == 0));
|
|
SET_NFLG (((uae_s16)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (srca, newv);
|
|
}}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEGX.W (An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4058_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 16;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
{ uae_u32 newv = 0 - src - (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(0)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s16)(newv)) == 0));
|
|
SET_NFLG (((uae_s16)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (srca, newv);
|
|
}}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEGX.W -(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4060_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 16;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uae_u32 newv = 0 - src - (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(0)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s16)(newv)) == 0));
|
|
SET_NFLG (((uae_s16)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (srca, newv);
|
|
}}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEGX.W (d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4068_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 16;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_u32 newv = 0 - src - (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(0)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s16)(newv)) == 0));
|
|
SET_NFLG (((uae_s16)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (srca, newv);
|
|
}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEGX.W (d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4070_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 16;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_u32 newv = 0 - src - (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(0)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s16)(newv)) == 0));
|
|
SET_NFLG (((uae_s16)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (srca, newv);
|
|
}}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEGX.W (xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4078_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 16;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_u32 newv = 0 - src - (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(0)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s16)(newv)) == 0));
|
|
SET_NFLG (((uae_s16)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (srca, newv);
|
|
}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEGX.W (xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4079_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 16;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_u32 newv = 0 - src - (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(0)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s16)(newv)) == 0));
|
|
SET_NFLG (((uae_s16)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (srca, newv);
|
|
}}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEGX.L Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4080_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 16;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uae_u32 newv = 0 - src - (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(0)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s32)(newv)) == 0));
|
|
SET_NFLG (((uae_s32)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (newv);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEGX.L (An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4090_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 16;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_u32 newv = 0 - src - (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(0)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s32)(newv)) == 0));
|
|
SET_NFLG (((uae_s32)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (srca, newv);
|
|
}}}}} m68k_incpci (2);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEGX.L (An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4098_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 16;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) += 4;
|
|
{ uae_u32 newv = 0 - src - (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(0)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s32)(newv)) == 0));
|
|
SET_NFLG (((uae_s32)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (srca, newv);
|
|
}}}}} m68k_incpci (2);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEGX.L -(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_40a0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 16;
|
|
CurrentInstrCycles = 18;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 4;
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uae_u32 newv = 0 - src - (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(0)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s32)(newv)) == 0));
|
|
SET_NFLG (((uae_s32)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (srca, newv);
|
|
}}}}} m68k_incpci (2);
|
|
return 18 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEGX.L (d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_40a8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 16;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_u32 newv = 0 - src - (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(0)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s32)(newv)) == 0));
|
|
SET_NFLG (((uae_s32)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (srca, newv);
|
|
}}}}} m68k_incpci (4);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEGX.L (d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_40b0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 16;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_u32 newv = 0 - src - (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(0)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s32)(newv)) == 0));
|
|
SET_NFLG (((uae_s32)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (srca, newv);
|
|
}}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEGX.L (xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_40b8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 16;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_u32 newv = 0 - src - (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(0)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s32)(newv)) == 0));
|
|
SET_NFLG (((uae_s32)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (srca, newv);
|
|
}}}}} m68k_incpci (4);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEGX.L (xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_40b9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 16;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_u32 newv = 0 - src - (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(0)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s32)(newv)) == 0));
|
|
SET_NFLG (((uae_s32)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (srca, newv);
|
|
}}}}} m68k_incpci (6);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVSR2.W Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_40c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 32;
|
|
CurrentInstrCycles = 4;
|
|
{if (!regs.s) { Exception (8); goto l_200632; }
|
|
{{ MakeSR ();
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xffff) | ((regs.sr) & 0xffff);
|
|
}}} m68k_incpci (2);
|
|
l_200632: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVSR2.W (An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_40d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 32;
|
|
CurrentInstrCycles = 4;
|
|
{if (!regs.s) { Exception (8); goto l_200633; }
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
MakeSR ();
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (srca, regs.sr);
|
|
}}} m68k_incpci (2);
|
|
l_200633: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVSR2.W (An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_40d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 32;
|
|
CurrentInstrCycles = 4;
|
|
{if (!regs.s) { Exception (8); goto l_200634; }
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
MakeSR ();
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (srca, regs.sr);
|
|
}}} m68k_incpci (2);
|
|
l_200634: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVSR2.W -(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_40e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 32;
|
|
CurrentInstrCycles = 6;
|
|
{if (!regs.s) { Exception (8); goto l_200635; }
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 2;
|
|
m68k_areg (regs, srcreg) = srca;
|
|
MakeSR ();
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (srca, regs.sr);
|
|
}}} m68k_incpci (2);
|
|
l_200635: ;
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVSR2.W (d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_40e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 32;
|
|
CurrentInstrCycles = 4;
|
|
{if (!regs.s) { Exception (8); goto l_200636; }
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
MakeSR ();
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (srca, regs.sr);
|
|
}}} m68k_incpci (4);
|
|
l_200636: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVSR2.W (d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_40f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 32;
|
|
CurrentInstrCycles = 4;
|
|
{if (!regs.s) { Exception (8); goto l_200637; }
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
MakeSR ();
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (srca, regs.sr);
|
|
}}}}l_200637: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVSR2.W (xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_40f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 32;
|
|
CurrentInstrCycles = 4;
|
|
{if (!regs.s) { Exception (8); goto l_200638; }
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
MakeSR ();
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (srca, regs.sr);
|
|
}}} m68k_incpci (4);
|
|
l_200638: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVSR2.W (xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_40f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 32;
|
|
CurrentInstrCycles = 4;
|
|
{if (!regs.s) { Exception (8); goto l_200639; }
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
MakeSR ();
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (srca, regs.sr);
|
|
}}} m68k_incpci (6);
|
|
l_200639: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CHK.L Dn,Dn */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4100_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 80;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
m68k_incpci (2);
|
|
if (dst > src) {
|
|
SET_NFLG (0);
|
|
Exception (6);
|
|
goto l_200640;
|
|
}
|
|
if ((uae_s32)dst < 0) {
|
|
SET_NFLG (1);
|
|
Exception (6);
|
|
goto l_200640;
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}l_200640: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CHK.L (An),Dn */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4110_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 80;
|
|
CurrentInstrCycles = 14;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
m68k_incpci (2);
|
|
if (dst > src) {
|
|
SET_NFLG (0);
|
|
Exception (6);
|
|
goto l_200641;
|
|
}
|
|
if ((uae_s32)dst < 0) {
|
|
SET_NFLG (1);
|
|
Exception (6);
|
|
goto l_200641;
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_200641: ;
|
|
return 14 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CHK.L (An)+,Dn */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4118_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 80;
|
|
CurrentInstrCycles = 14;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) += 4;
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
m68k_incpci (2);
|
|
if (dst > src) {
|
|
SET_NFLG (0);
|
|
Exception (6);
|
|
goto l_200642;
|
|
}
|
|
if ((uae_s32)dst < 0) {
|
|
SET_NFLG (1);
|
|
Exception (6);
|
|
goto l_200642;
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_200642: ;
|
|
return 14 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CHK.L -(An),Dn */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4120_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 80;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 4;
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
m68k_incpci (2);
|
|
if (dst > src) {
|
|
SET_NFLG (0);
|
|
Exception (6);
|
|
goto l_200643;
|
|
}
|
|
if ((uae_s32)dst < 0) {
|
|
SET_NFLG (1);
|
|
Exception (6);
|
|
goto l_200643;
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_200643: ;
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CHK.L (d16,An),Dn */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4128_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 80;
|
|
CurrentInstrCycles = 14;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
m68k_incpci (4);
|
|
if (dst > src) {
|
|
SET_NFLG (0);
|
|
Exception (6);
|
|
goto l_200644;
|
|
}
|
|
if ((uae_s32)dst < 0) {
|
|
SET_NFLG (1);
|
|
Exception (6);
|
|
goto l_200644;
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_200644: ;
|
|
return 14 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CHK.L (d8,An,Xn),Dn */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4130_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 80;
|
|
CurrentInstrCycles = 14;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
if (dst > src) {
|
|
SET_NFLG (0);
|
|
Exception (6);
|
|
goto l_200645;
|
|
}
|
|
if ((uae_s32)dst < 0) {
|
|
SET_NFLG (1);
|
|
Exception (6);
|
|
goto l_200645;
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}l_200645: ;
|
|
return 14 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CHK.L (xxx).W,Dn */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4138_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 80;
|
|
CurrentInstrCycles = 14;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
m68k_incpci (4);
|
|
if (dst > src) {
|
|
SET_NFLG (0);
|
|
Exception (6);
|
|
goto l_200646;
|
|
}
|
|
if ((uae_s32)dst < 0) {
|
|
SET_NFLG (1);
|
|
Exception (6);
|
|
goto l_200646;
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_200646: ;
|
|
return 14 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CHK.L (xxx).L,Dn */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4139_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 80;
|
|
CurrentInstrCycles = 14;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
m68k_incpci (6);
|
|
if (dst > src) {
|
|
SET_NFLG (0);
|
|
Exception (6);
|
|
goto l_200647;
|
|
}
|
|
if ((uae_s32)dst < 0) {
|
|
SET_NFLG (1);
|
|
Exception (6);
|
|
goto l_200647;
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_200647: ;
|
|
return 14 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CHK.L (d16,PC),Dn */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_413a_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 80;
|
|
CurrentInstrCycles = 14;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
m68k_incpci (4);
|
|
if (dst > src) {
|
|
SET_NFLG (0);
|
|
Exception (6);
|
|
goto l_200648;
|
|
}
|
|
if ((uae_s32)dst < 0) {
|
|
SET_NFLG (1);
|
|
Exception (6);
|
|
goto l_200648;
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_200648: ;
|
|
return 14 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CHK.L (d8,PC,Xn),Dn */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_413b_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 80;
|
|
CurrentInstrCycles = 14;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
if (dst > src) {
|
|
SET_NFLG (0);
|
|
Exception (6);
|
|
goto l_200649;
|
|
}
|
|
if ((uae_s32)dst < 0) {
|
|
SET_NFLG (1);
|
|
Exception (6);
|
|
goto l_200649;
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}l_200649: ;
|
|
return 14 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CHK.L #<data>.L,Dn */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_413c_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 80;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
m68k_incpci (6);
|
|
if (dst > src) {
|
|
SET_NFLG (0);
|
|
Exception (6);
|
|
goto l_200650;
|
|
}
|
|
if ((uae_s32)dst < 0) {
|
|
SET_NFLG (1);
|
|
Exception (6);
|
|
goto l_200650;
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}l_200650: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* CHK.W Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4180_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 80;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
m68k_incpci (2);
|
|
if (dst > src) {
|
|
SET_NFLG (0);
|
|
Exception (6);
|
|
goto l_200651;
|
|
}
|
|
if ((uae_s32)dst < 0) {
|
|
SET_NFLG (1);
|
|
Exception (6);
|
|
goto l_200651;
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}l_200651: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CHK.W (An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4190_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 80;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
m68k_incpci (2);
|
|
if (dst > src) {
|
|
SET_NFLG (0);
|
|
Exception (6);
|
|
goto l_200652;
|
|
}
|
|
if ((uae_s32)dst < 0) {
|
|
SET_NFLG (1);
|
|
Exception (6);
|
|
goto l_200652;
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_200652: ;
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CHK.W (An)+,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4198_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 80;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
m68k_incpci (2);
|
|
if (dst > src) {
|
|
SET_NFLG (0);
|
|
Exception (6);
|
|
goto l_200653;
|
|
}
|
|
if ((uae_s32)dst < 0) {
|
|
SET_NFLG (1);
|
|
Exception (6);
|
|
goto l_200653;
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_200653: ;
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CHK.W -(An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_41a0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 80;
|
|
CurrentInstrCycles = 12;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
m68k_incpci (2);
|
|
if (dst > src) {
|
|
SET_NFLG (0);
|
|
Exception (6);
|
|
goto l_200654;
|
|
}
|
|
if ((uae_s32)dst < 0) {
|
|
SET_NFLG (1);
|
|
Exception (6);
|
|
goto l_200654;
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_200654: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CHK.W (d16,An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_41a8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 80;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
m68k_incpci (4);
|
|
if (dst > src) {
|
|
SET_NFLG (0);
|
|
Exception (6);
|
|
goto l_200655;
|
|
}
|
|
if ((uae_s32)dst < 0) {
|
|
SET_NFLG (1);
|
|
Exception (6);
|
|
goto l_200655;
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_200655: ;
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CHK.W (d8,An,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_41b0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 80;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
if (dst > src) {
|
|
SET_NFLG (0);
|
|
Exception (6);
|
|
goto l_200656;
|
|
}
|
|
if ((uae_s32)dst < 0) {
|
|
SET_NFLG (1);
|
|
Exception (6);
|
|
goto l_200656;
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}l_200656: ;
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CHK.W (xxx).W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_41b8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 80;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
m68k_incpci (4);
|
|
if (dst > src) {
|
|
SET_NFLG (0);
|
|
Exception (6);
|
|
goto l_200657;
|
|
}
|
|
if ((uae_s32)dst < 0) {
|
|
SET_NFLG (1);
|
|
Exception (6);
|
|
goto l_200657;
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_200657: ;
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CHK.W (xxx).L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_41b9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 80;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
m68k_incpci (6);
|
|
if (dst > src) {
|
|
SET_NFLG (0);
|
|
Exception (6);
|
|
goto l_200658;
|
|
}
|
|
if ((uae_s32)dst < 0) {
|
|
SET_NFLG (1);
|
|
Exception (6);
|
|
goto l_200658;
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_200658: ;
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CHK.W (d16,PC),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_41ba_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 80;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
m68k_incpci (4);
|
|
if (dst > src) {
|
|
SET_NFLG (0);
|
|
Exception (6);
|
|
goto l_200659;
|
|
}
|
|
if ((uae_s32)dst < 0) {
|
|
SET_NFLG (1);
|
|
Exception (6);
|
|
goto l_200659;
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_200659: ;
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CHK.W (d8,PC,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_41bb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 80;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
if (dst > src) {
|
|
SET_NFLG (0);
|
|
Exception (6);
|
|
goto l_200660;
|
|
}
|
|
if ((uae_s32)dst < 0) {
|
|
SET_NFLG (1);
|
|
Exception (6);
|
|
goto l_200660;
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}l_200660: ;
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CHK.W #<data>.W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_41bc_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 80;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
m68k_incpci (4);
|
|
if (dst > src) {
|
|
SET_NFLG (0);
|
|
Exception (6);
|
|
goto l_200661;
|
|
}
|
|
if ((uae_s32)dst < 0) {
|
|
SET_NFLG (1);
|
|
Exception (6);
|
|
goto l_200661;
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}l_200661: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* LEA.L (An),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_41d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 56;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (srca);
|
|
}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* LEA.L (d16,An),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_41e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 56;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ regs.irc = get_word_020_prefetch (4);
|
|
m68k_areg (regs, dstreg) = (srca);
|
|
}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* LEA.L (d8,An,Xn),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_41f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 56;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ regs.irc = get_word_020_prefetch (0);
|
|
m68k_areg (regs, dstreg) = (srca);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* LEA.L (xxx).W,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_41f8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 56;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ regs.irc = get_word_020_prefetch (4);
|
|
m68k_areg (regs, dstreg) = (srca);
|
|
}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* LEA.L (xxx).L,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_41f9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 56;
|
|
CurrentInstrCycles = 12;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ regs.irc = get_word_020_prefetch (6);
|
|
m68k_areg (regs, dstreg) = (srca);
|
|
}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* LEA.L (d16,PC),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_41fa_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 56;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ regs.irc = get_word_020_prefetch (4);
|
|
m68k_areg (regs, dstreg) = (srca);
|
|
}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* LEA.L (d8,PC,Xn),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_41fb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 56;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ regs.irc = get_word_020_prefetch (0);
|
|
m68k_areg (regs, dstreg) = (srca);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CLR.B Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4200_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 18;
|
|
CurrentInstrCycles = 4;
|
|
{{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(0)) == 0);
|
|
SET_NFLG (((uae_s8)(0)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xff) | ((0) & 0xff);
|
|
}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CLR.B (An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4210_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 18;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(0)) == 0);
|
|
SET_NFLG (((uae_s8)(0)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, 0);
|
|
}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CLR.B (An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4218_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 18;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(0)) == 0);
|
|
SET_NFLG (((uae_s8)(0)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, 0);
|
|
}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CLR.B -(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4220_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 18;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
m68k_areg (regs, srcreg) = srca;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(0)) == 0);
|
|
SET_NFLG (((uae_s8)(0)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, 0);
|
|
}} m68k_incpci (2);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CLR.B (d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4228_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 18;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(0)) == 0);
|
|
SET_NFLG (((uae_s8)(0)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, 0);
|
|
}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CLR.B (d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4230_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 18;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(0)) == 0);
|
|
SET_NFLG (((uae_s8)(0)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (srca, 0);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CLR.B (xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4238_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 18;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(0)) == 0);
|
|
SET_NFLG (((uae_s8)(0)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, 0);
|
|
}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CLR.B (xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4239_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 18;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(0)) == 0);
|
|
SET_NFLG (((uae_s8)(0)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (srca, 0);
|
|
}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CLR.W Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4240_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 18;
|
|
CurrentInstrCycles = 4;
|
|
{{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(0)) == 0);
|
|
SET_NFLG (((uae_s16)(0)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xffff) | ((0) & 0xffff);
|
|
}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CLR.W (An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4250_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 18;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(0)) == 0);
|
|
SET_NFLG (((uae_s16)(0)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (srca, 0);
|
|
}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CLR.W (An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4258_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 18;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(0)) == 0);
|
|
SET_NFLG (((uae_s16)(0)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (srca, 0);
|
|
}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CLR.W -(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4260_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 18;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 2;
|
|
m68k_areg (regs, srcreg) = srca;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(0)) == 0);
|
|
SET_NFLG (((uae_s16)(0)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (srca, 0);
|
|
}} m68k_incpci (2);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CLR.W (d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4268_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 18;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(0)) == 0);
|
|
SET_NFLG (((uae_s16)(0)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (srca, 0);
|
|
}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CLR.W (d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4270_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 18;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(0)) == 0);
|
|
SET_NFLG (((uae_s16)(0)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (srca, 0);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CLR.W (xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4278_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 18;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(0)) == 0);
|
|
SET_NFLG (((uae_s16)(0)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (srca, 0);
|
|
}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CLR.W (xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4279_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 18;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(0)) == 0);
|
|
SET_NFLG (((uae_s16)(0)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (srca, 0);
|
|
}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CLR.L Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4280_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 18;
|
|
CurrentInstrCycles = 4;
|
|
{{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(0)) == 0);
|
|
SET_NFLG (((uae_s32)(0)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (0);
|
|
}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CLR.L (An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4290_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 18;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(0)) == 0);
|
|
SET_NFLG (((uae_s32)(0)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (srca, 0);
|
|
}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CLR.L (An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4298_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 18;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
m68k_areg (regs, srcreg) += 4;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(0)) == 0);
|
|
SET_NFLG (((uae_s32)(0)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (srca, 0);
|
|
}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CLR.L -(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_42a0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 18;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 4;
|
|
m68k_areg (regs, srcreg) = srca;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(0)) == 0);
|
|
SET_NFLG (((uae_s32)(0)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (srca, 0);
|
|
}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CLR.L (d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_42a8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 18;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(0)) == 0);
|
|
SET_NFLG (((uae_s32)(0)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (srca, 0);
|
|
}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CLR.L (d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_42b0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 18;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(0)) == 0);
|
|
SET_NFLG (((uae_s32)(0)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (srca, 0);
|
|
}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CLR.L (xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_42b8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 18;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(0)) == 0);
|
|
SET_NFLG (((uae_s32)(0)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (srca, 0);
|
|
}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CLR.L (xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_42b9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 18;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(0)) == 0);
|
|
SET_NFLG (((uae_s32)(0)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (srca, 0);
|
|
}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVSR2.B Dn */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_42c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 32;
|
|
CurrentInstrCycles = 4;
|
|
{{ MakeSR ();
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xffff) | ((regs.sr & 0xff) & 0xffff);
|
|
}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MVSR2.B (An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_42d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 32;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
MakeSR ();
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (srca, regs.sr & 0xff);
|
|
}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MVSR2.B (An)+ */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_42d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 32;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
MakeSR ();
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (srca, regs.sr & 0xff);
|
|
}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MVSR2.B -(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_42e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 32;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 2;
|
|
m68k_areg (regs, srcreg) = srca;
|
|
MakeSR ();
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (srca, regs.sr & 0xff);
|
|
}} m68k_incpci (2);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MVSR2.B (d16,An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_42e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 32;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
MakeSR ();
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (srca, regs.sr & 0xff);
|
|
}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MVSR2.B (d8,An,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_42f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 32;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
MakeSR ();
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (srca, regs.sr & 0xff);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MVSR2.B (xxx).W */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_42f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 32;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
MakeSR ();
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (srca, regs.sr & 0xff);
|
|
}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MVSR2.B (xxx).L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_42f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 32;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
MakeSR ();
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (srca, regs.sr & 0xff);
|
|
}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* NEG.B Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4400_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 15;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{{uae_u32 dst = ((uae_u8)(0)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(0)) < 0;
|
|
int flgn = ((uae_s8)(dst)) < 0;
|
|
SET_ZFLG (((uae_s8)(dst)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(0)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xff) | ((dst) & 0xff);
|
|
}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
|
|
#ifdef PART_4
|
|
/* NEG.B (An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4410_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 15;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{{uae_u32 dst = ((uae_u8)(0)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(0)) < 0;
|
|
int flgn = ((uae_s8)(dst)) < 0;
|
|
SET_ZFLG (((uae_s8)(dst)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(0)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, dst);
|
|
}}}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEG.B (An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4418_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 15;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
{{uae_u32 dst = ((uae_u8)(0)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(0)) < 0;
|
|
int flgn = ((uae_s8)(dst)) < 0;
|
|
SET_ZFLG (((uae_s8)(dst)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(0)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, dst);
|
|
}}}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEG.B -(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4420_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 15;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{{uae_u32 dst = ((uae_u8)(0)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(0)) < 0;
|
|
int flgn = ((uae_s8)(dst)) < 0;
|
|
SET_ZFLG (((uae_s8)(dst)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(0)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, dst);
|
|
}}}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEG.B (d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4428_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 15;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{{uae_u32 dst = ((uae_u8)(0)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(0)) < 0;
|
|
int flgn = ((uae_s8)(dst)) < 0;
|
|
SET_ZFLG (((uae_s8)(dst)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(0)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, dst);
|
|
}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEG.B (d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4430_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 15;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{{uae_u32 dst = ((uae_u8)(0)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(0)) < 0;
|
|
int flgn = ((uae_s8)(dst)) < 0;
|
|
SET_ZFLG (((uae_s8)(dst)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(0)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (srca, dst);
|
|
}}}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEG.B (xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4438_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 15;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{{uae_u32 dst = ((uae_u8)(0)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(0)) < 0;
|
|
int flgn = ((uae_s8)(dst)) < 0;
|
|
SET_ZFLG (((uae_s8)(dst)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(0)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, dst);
|
|
}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEG.B (xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4439_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 15;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{{uae_u32 dst = ((uae_u8)(0)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(0)) < 0;
|
|
int flgn = ((uae_s8)(dst)) < 0;
|
|
SET_ZFLG (((uae_s8)(dst)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(0)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (srca, dst);
|
|
}}}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEG.W Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4440_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 15;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{{uae_u32 dst = ((uae_u16)(0)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(0)) < 0;
|
|
int flgn = ((uae_s16)(dst)) < 0;
|
|
SET_ZFLG (((uae_s16)(dst)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(0)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xffff) | ((dst) & 0xffff);
|
|
}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEG.W (An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4450_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 15;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{{uae_u32 dst = ((uae_u16)(0)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(0)) < 0;
|
|
int flgn = ((uae_s16)(dst)) < 0;
|
|
SET_ZFLG (((uae_s16)(dst)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(0)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (srca, dst);
|
|
}}}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEG.W (An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4458_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 15;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
{{uae_u32 dst = ((uae_u16)(0)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(0)) < 0;
|
|
int flgn = ((uae_s16)(dst)) < 0;
|
|
SET_ZFLG (((uae_s16)(dst)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(0)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (srca, dst);
|
|
}}}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEG.W -(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4460_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 15;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{{uae_u32 dst = ((uae_u16)(0)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(0)) < 0;
|
|
int flgn = ((uae_s16)(dst)) < 0;
|
|
SET_ZFLG (((uae_s16)(dst)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(0)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (srca, dst);
|
|
}}}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEG.W (d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4468_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 15;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{{uae_u32 dst = ((uae_u16)(0)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(0)) < 0;
|
|
int flgn = ((uae_s16)(dst)) < 0;
|
|
SET_ZFLG (((uae_s16)(dst)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(0)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (srca, dst);
|
|
}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEG.W (d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4470_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 15;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{{uae_u32 dst = ((uae_u16)(0)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(0)) < 0;
|
|
int flgn = ((uae_s16)(dst)) < 0;
|
|
SET_ZFLG (((uae_s16)(dst)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(0)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (srca, dst);
|
|
}}}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEG.W (xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4478_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 15;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{{uae_u32 dst = ((uae_u16)(0)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(0)) < 0;
|
|
int flgn = ((uae_s16)(dst)) < 0;
|
|
SET_ZFLG (((uae_s16)(dst)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(0)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (srca, dst);
|
|
}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEG.W (xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4479_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 15;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{{uae_u32 dst = ((uae_u16)(0)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(0)) < 0;
|
|
int flgn = ((uae_s16)(dst)) < 0;
|
|
SET_ZFLG (((uae_s16)(dst)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(0)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (srca, dst);
|
|
}}}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEG.L Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4480_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 15;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{{uae_u32 dst = ((uae_u32)(0)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(0)) < 0;
|
|
int flgn = ((uae_s32)(dst)) < 0;
|
|
SET_ZFLG (((uae_s32)(dst)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(0)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (dst);
|
|
}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEG.L (An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4490_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 15;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{{uae_u32 dst = ((uae_u32)(0)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(0)) < 0;
|
|
int flgn = ((uae_s32)(dst)) < 0;
|
|
SET_ZFLG (((uae_s32)(dst)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(0)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (srca, dst);
|
|
}}}}}} m68k_incpci (2);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEG.L (An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4498_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 15;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) += 4;
|
|
{{uae_u32 dst = ((uae_u32)(0)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(0)) < 0;
|
|
int flgn = ((uae_s32)(dst)) < 0;
|
|
SET_ZFLG (((uae_s32)(dst)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(0)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (srca, dst);
|
|
}}}}}} m68k_incpci (2);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEG.L -(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_44a0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 15;
|
|
CurrentInstrCycles = 18;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 4;
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{{uae_u32 dst = ((uae_u32)(0)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(0)) < 0;
|
|
int flgn = ((uae_s32)(dst)) < 0;
|
|
SET_ZFLG (((uae_s32)(dst)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(0)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (srca, dst);
|
|
}}}}}} m68k_incpci (2);
|
|
return 18 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEG.L (d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_44a8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 15;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{{uae_u32 dst = ((uae_u32)(0)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(0)) < 0;
|
|
int flgn = ((uae_s32)(dst)) < 0;
|
|
SET_ZFLG (((uae_s32)(dst)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(0)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (srca, dst);
|
|
}}}}}} m68k_incpci (4);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEG.L (d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_44b0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 15;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{{uae_u32 dst = ((uae_u32)(0)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(0)) < 0;
|
|
int flgn = ((uae_s32)(dst)) < 0;
|
|
SET_ZFLG (((uae_s32)(dst)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(0)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (srca, dst);
|
|
}}}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEG.L (xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_44b8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 15;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{{uae_u32 dst = ((uae_u32)(0)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(0)) < 0;
|
|
int flgn = ((uae_s32)(dst)) < 0;
|
|
SET_ZFLG (((uae_s32)(dst)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(0)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (srca, dst);
|
|
}}}}}} m68k_incpci (4);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NEG.L (xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_44b9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 15;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{{uae_u32 dst = ((uae_u32)(0)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(0)) < 0;
|
|
int flgn = ((uae_s32)(dst)) < 0;
|
|
SET_ZFLG (((uae_s32)(dst)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(0)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (srca, dst);
|
|
}}}}}} m68k_incpci (6);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MV2SR.B Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_44c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 33;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
MakeSR ();
|
|
regs.sr &= 0xFF00;
|
|
regs.sr |= src & 0xFF;
|
|
MakeFromSR();
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MV2SR.B (An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_44d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 33;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
MakeSR ();
|
|
regs.sr &= 0xFF00;
|
|
regs.sr |= src & 0xFF;
|
|
MakeFromSR();
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MV2SR.B (An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_44d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 33;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
MakeSR ();
|
|
regs.sr &= 0xFF00;
|
|
regs.sr |= src & 0xFF;
|
|
MakeFromSR();
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MV2SR.B -(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_44e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 33;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
MakeSR ();
|
|
regs.sr &= 0xFF00;
|
|
regs.sr |= src & 0xFF;
|
|
MakeFromSR();
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MV2SR.B (d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_44e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 33;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
MakeSR ();
|
|
regs.sr &= 0xFF00;
|
|
regs.sr |= src & 0xFF;
|
|
MakeFromSR();
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MV2SR.B (d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_44f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 33;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
MakeSR ();
|
|
regs.sr &= 0xFF00;
|
|
regs.sr |= src & 0xFF;
|
|
MakeFromSR();
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MV2SR.B (xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_44f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 33;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
MakeSR ();
|
|
regs.sr &= 0xFF00;
|
|
regs.sr |= src & 0xFF;
|
|
MakeFromSR();
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MV2SR.B (xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_44f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 33;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
MakeSR ();
|
|
regs.sr &= 0xFF00;
|
|
regs.sr |= src & 0xFF;
|
|
MakeFromSR();
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MV2SR.B (d16,PC) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_44fa_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 33;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
MakeSR ();
|
|
regs.sr &= 0xFF00;
|
|
regs.sr |= src & 0xFF;
|
|
MakeFromSR();
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MV2SR.B (d8,PC,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_44fb_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 33;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
MakeSR ();
|
|
regs.sr &= 0xFF00;
|
|
regs.sr |= src & 0xFF;
|
|
MakeFromSR();
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MV2SR.B #<data>.B */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_44fc_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 33;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
MakeSR ();
|
|
regs.sr &= 0xFF00;
|
|
regs.sr |= src & 0xFF;
|
|
MakeFromSR();
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NOT.B Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4600_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 19;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uae_u32 dst = ~src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(dst)) == 0);
|
|
SET_NFLG (((uae_s8)(dst)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xff) | ((dst) & 0xff);
|
|
}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NOT.B (An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4610_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 19;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_u32 dst = ~src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(dst)) == 0);
|
|
SET_NFLG (((uae_s8)(dst)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, dst);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NOT.B (An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4618_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 19;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
{ uae_u32 dst = ~src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(dst)) == 0);
|
|
SET_NFLG (((uae_s8)(dst)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, dst);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NOT.B -(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4620_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 19;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uae_u32 dst = ~src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(dst)) == 0);
|
|
SET_NFLG (((uae_s8)(dst)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, dst);
|
|
}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NOT.B (d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4628_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 19;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_u32 dst = ~src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(dst)) == 0);
|
|
SET_NFLG (((uae_s8)(dst)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, dst);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NOT.B (d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4630_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 19;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_u32 dst = ~src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(dst)) == 0);
|
|
SET_NFLG (((uae_s8)(dst)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (srca, dst);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NOT.B (xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4638_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 19;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_u32 dst = ~src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(dst)) == 0);
|
|
SET_NFLG (((uae_s8)(dst)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, dst);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NOT.B (xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4639_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 19;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_u32 dst = ~src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(dst)) == 0);
|
|
SET_NFLG (((uae_s8)(dst)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (srca, dst);
|
|
}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NOT.W Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4640_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 19;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uae_u32 dst = ~src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(dst)) == 0);
|
|
SET_NFLG (((uae_s16)(dst)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xffff) | ((dst) & 0xffff);
|
|
}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NOT.W (An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4650_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 19;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_u32 dst = ~src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(dst)) == 0);
|
|
SET_NFLG (((uae_s16)(dst)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (srca, dst);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NOT.W (An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4658_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 19;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
{ uae_u32 dst = ~src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(dst)) == 0);
|
|
SET_NFLG (((uae_s16)(dst)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (srca, dst);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NOT.W -(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4660_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 19;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uae_u32 dst = ~src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(dst)) == 0);
|
|
SET_NFLG (((uae_s16)(dst)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (srca, dst);
|
|
}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NOT.W (d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4668_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 19;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_u32 dst = ~src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(dst)) == 0);
|
|
SET_NFLG (((uae_s16)(dst)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (srca, dst);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NOT.W (d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4670_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 19;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_u32 dst = ~src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(dst)) == 0);
|
|
SET_NFLG (((uae_s16)(dst)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (srca, dst);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NOT.W (xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4678_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 19;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_u32 dst = ~src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(dst)) == 0);
|
|
SET_NFLG (((uae_s16)(dst)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (srca, dst);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NOT.W (xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4679_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 19;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_u32 dst = ~src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(dst)) == 0);
|
|
SET_NFLG (((uae_s16)(dst)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (srca, dst);
|
|
}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NOT.L Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4680_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 19;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uae_u32 dst = ~src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(dst)) == 0);
|
|
SET_NFLG (((uae_s32)(dst)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (dst);
|
|
}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NOT.L (An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4690_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 19;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_u32 dst = ~src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(dst)) == 0);
|
|
SET_NFLG (((uae_s32)(dst)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (srca, dst);
|
|
}}}} m68k_incpci (2);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NOT.L (An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4698_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 19;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) += 4;
|
|
{ uae_u32 dst = ~src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(dst)) == 0);
|
|
SET_NFLG (((uae_s32)(dst)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (srca, dst);
|
|
}}}} m68k_incpci (2);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NOT.L -(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_46a0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 19;
|
|
CurrentInstrCycles = 18;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 4;
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uae_u32 dst = ~src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(dst)) == 0);
|
|
SET_NFLG (((uae_s32)(dst)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (srca, dst);
|
|
}}}} m68k_incpci (2);
|
|
return 18 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NOT.L (d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_46a8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 19;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_u32 dst = ~src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(dst)) == 0);
|
|
SET_NFLG (((uae_s32)(dst)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (srca, dst);
|
|
}}}} m68k_incpci (4);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NOT.L (d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_46b0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 19;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_u32 dst = ~src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(dst)) == 0);
|
|
SET_NFLG (((uae_s32)(dst)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (srca, dst);
|
|
}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NOT.L (xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_46b8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 19;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_u32 dst = ~src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(dst)) == 0);
|
|
SET_NFLG (((uae_s32)(dst)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (srca, dst);
|
|
}}}} m68k_incpci (4);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NOT.L (xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_46b9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 19;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_u32 dst = ~src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(dst)) == 0);
|
|
SET_NFLG (((uae_s32)(dst)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (srca, dst);
|
|
}}}} m68k_incpci (6);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MV2SR.W Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_46c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 33;
|
|
CurrentInstrCycles = 4;
|
|
{if (!regs.s) { Exception (8); goto l_200760; }
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
regs.sr = src;
|
|
MakeFromSR();
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}} m68k_incpci (2);
|
|
l_200760: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MV2SR.W (An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_46d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 33;
|
|
CurrentInstrCycles = 8;
|
|
{if (!regs.s) { Exception (8); goto l_200761; }
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
regs.sr = src;
|
|
MakeFromSR();
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}}} m68k_incpci (2);
|
|
l_200761: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MV2SR.W (An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_46d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 33;
|
|
CurrentInstrCycles = 8;
|
|
{if (!regs.s) { Exception (8); goto l_200762; }
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
regs.sr = src;
|
|
MakeFromSR();
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}}} m68k_incpci (2);
|
|
l_200762: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MV2SR.W -(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_46e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 33;
|
|
CurrentInstrCycles = 10;
|
|
{if (!regs.s) { Exception (8); goto l_200763; }
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
regs.sr = src;
|
|
MakeFromSR();
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}}} m68k_incpci (2);
|
|
l_200763: ;
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MV2SR.W (d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_46e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 33;
|
|
CurrentInstrCycles = 8;
|
|
{if (!regs.s) { Exception (8); goto l_200764; }
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
regs.sr = src;
|
|
MakeFromSR();
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}} m68k_incpci (4);
|
|
l_200764: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MV2SR.W (d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_46f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 33;
|
|
CurrentInstrCycles = 8;
|
|
{if (!regs.s) { Exception (8); goto l_200765; }
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
regs.sr = src;
|
|
MakeFromSR();
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}l_200765: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MV2SR.W (xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_46f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 33;
|
|
CurrentInstrCycles = 8;
|
|
{if (!regs.s) { Exception (8); goto l_200766; }
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
regs.sr = src;
|
|
MakeFromSR();
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}} m68k_incpci (4);
|
|
l_200766: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MV2SR.W (xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_46f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 33;
|
|
CurrentInstrCycles = 8;
|
|
{if (!regs.s) { Exception (8); goto l_200767; }
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
regs.sr = src;
|
|
MakeFromSR();
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}} m68k_incpci (6);
|
|
l_200767: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MV2SR.W (d16,PC) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_46fa_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 33;
|
|
CurrentInstrCycles = 8;
|
|
{if (!regs.s) { Exception (8); goto l_200768; }
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
regs.sr = src;
|
|
MakeFromSR();
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}} m68k_incpci (4);
|
|
l_200768: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MV2SR.W (d8,PC,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_46fb_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 33;
|
|
CurrentInstrCycles = 8;
|
|
{if (!regs.s) { Exception (8); goto l_200769; }
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
regs.sr = src;
|
|
MakeFromSR();
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}l_200769: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MV2SR.W #<data>.W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_46fc_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 33;
|
|
CurrentInstrCycles = 8;
|
|
{if (!regs.s) { Exception (8); goto l_200770; }
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
regs.sr = src;
|
|
MakeFromSR();
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
l_200770: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NBCD.B Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4800_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 17;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG () ? 1 : 0);
|
|
uae_u16 newv_hi = - (src & 0xF0);
|
|
uae_u16 newv;
|
|
int cflg, tmp_newv;
|
|
if (newv_lo > 9) { newv_lo -= 6; }
|
|
tmp_newv = newv = newv_hi + newv_lo;
|
|
cflg = (newv & 0x1F0) > 0x90;
|
|
if (cflg) newv -= 0x60;
|
|
SET_CFLG (cflg);
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s8)(newv)) == 0));
|
|
SET_NFLG (((uae_s8)(newv)) < 0);
|
|
SET_VFLG ((tmp_newv & 0x80) != 0 && (newv & 0x80) == 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xff) | ((newv) & 0xff);
|
|
}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* LINK.L An,#<data>.L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4808_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 47;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr olda;
|
|
olda = m68k_areg (regs, 7) - 4;
|
|
m68k_areg (regs, 7) = olda;
|
|
{ uae_s32 src = m68k_areg (regs, srcreg);
|
|
{ uae_s32 offs;
|
|
offs = get_long_020_prefetch (2);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (olda, src);
|
|
m68k_areg (regs, srcreg) = (m68k_areg (regs, 7));
|
|
m68k_areg (regs, 7) += offs;
|
|
}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* NBCD.B (An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4810_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 17;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG () ? 1 : 0);
|
|
uae_u16 newv_hi = - (src & 0xF0);
|
|
uae_u16 newv;
|
|
int cflg, tmp_newv;
|
|
if (newv_lo > 9) { newv_lo -= 6; }
|
|
tmp_newv = newv = newv_hi + newv_lo;
|
|
cflg = (newv & 0x1F0) > 0x90;
|
|
if (cflg) newv -= 0x60;
|
|
SET_CFLG (cflg);
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s8)(newv)) == 0));
|
|
SET_NFLG (((uae_s8)(newv)) < 0);
|
|
SET_VFLG ((tmp_newv & 0x80) != 0 && (newv & 0x80) == 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, newv);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NBCD.B (An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4818_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 17;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG () ? 1 : 0);
|
|
uae_u16 newv_hi = - (src & 0xF0);
|
|
uae_u16 newv;
|
|
int cflg, tmp_newv;
|
|
if (newv_lo > 9) { newv_lo -= 6; }
|
|
tmp_newv = newv = newv_hi + newv_lo;
|
|
cflg = (newv & 0x1F0) > 0x90;
|
|
if (cflg) newv -= 0x60;
|
|
SET_CFLG (cflg);
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s8)(newv)) == 0));
|
|
SET_NFLG (((uae_s8)(newv)) < 0);
|
|
SET_VFLG ((tmp_newv & 0x80) != 0 && (newv & 0x80) == 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, newv);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NBCD.B -(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4820_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 17;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG () ? 1 : 0);
|
|
uae_u16 newv_hi = - (src & 0xF0);
|
|
uae_u16 newv;
|
|
int cflg, tmp_newv;
|
|
if (newv_lo > 9) { newv_lo -= 6; }
|
|
tmp_newv = newv = newv_hi + newv_lo;
|
|
cflg = (newv & 0x1F0) > 0x90;
|
|
if (cflg) newv -= 0x60;
|
|
SET_CFLG (cflg);
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s8)(newv)) == 0));
|
|
SET_NFLG (((uae_s8)(newv)) < 0);
|
|
SET_VFLG ((tmp_newv & 0x80) != 0 && (newv & 0x80) == 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, newv);
|
|
}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NBCD.B (d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4828_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 17;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG () ? 1 : 0);
|
|
uae_u16 newv_hi = - (src & 0xF0);
|
|
uae_u16 newv;
|
|
int cflg, tmp_newv;
|
|
if (newv_lo > 9) { newv_lo -= 6; }
|
|
tmp_newv = newv = newv_hi + newv_lo;
|
|
cflg = (newv & 0x1F0) > 0x90;
|
|
if (cflg) newv -= 0x60;
|
|
SET_CFLG (cflg);
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s8)(newv)) == 0));
|
|
SET_NFLG (((uae_s8)(newv)) < 0);
|
|
SET_VFLG ((tmp_newv & 0x80) != 0 && (newv & 0x80) == 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, newv);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NBCD.B (d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4830_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 17;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG () ? 1 : 0);
|
|
uae_u16 newv_hi = - (src & 0xF0);
|
|
uae_u16 newv;
|
|
int cflg, tmp_newv;
|
|
if (newv_lo > 9) { newv_lo -= 6; }
|
|
tmp_newv = newv = newv_hi + newv_lo;
|
|
cflg = (newv & 0x1F0) > 0x90;
|
|
if (cflg) newv -= 0x60;
|
|
SET_CFLG (cflg);
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s8)(newv)) == 0));
|
|
SET_NFLG (((uae_s8)(newv)) < 0);
|
|
SET_VFLG ((tmp_newv & 0x80) != 0 && (newv & 0x80) == 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (srca, newv);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NBCD.B (xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4838_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 17;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG () ? 1 : 0);
|
|
uae_u16 newv_hi = - (src & 0xF0);
|
|
uae_u16 newv;
|
|
int cflg, tmp_newv;
|
|
if (newv_lo > 9) { newv_lo -= 6; }
|
|
tmp_newv = newv = newv_hi + newv_lo;
|
|
cflg = (newv & 0x1F0) > 0x90;
|
|
if (cflg) newv -= 0x60;
|
|
SET_CFLG (cflg);
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s8)(newv)) == 0));
|
|
SET_NFLG (((uae_s8)(newv)) < 0);
|
|
SET_VFLG ((tmp_newv & 0x80) != 0 && (newv & 0x80) == 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, newv);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NBCD.B (xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4839_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 17;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_u16 newv_lo = - (src & 0xF) - (GET_XFLG () ? 1 : 0);
|
|
uae_u16 newv_hi = - (src & 0xF0);
|
|
uae_u16 newv;
|
|
int cflg, tmp_newv;
|
|
if (newv_lo > 9) { newv_lo -= 6; }
|
|
tmp_newv = newv = newv_hi + newv_lo;
|
|
cflg = (newv & 0x1F0) > 0x90;
|
|
if (cflg) newv -= 0x60;
|
|
SET_CFLG (cflg);
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s8)(newv)) == 0));
|
|
SET_NFLG (((uae_s8)(newv)) < 0);
|
|
SET_VFLG ((tmp_newv & 0x80) != 0 && (newv & 0x80) == 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (srca, newv);
|
|
}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SWAP.W Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4840_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 34;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uae_u32 dst = ((src >> 16)&0xFFFF) | ((src&0xFFFF)<<16);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(dst)) == 0);
|
|
SET_NFLG (((uae_s32)(dst)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (dst);
|
|
}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BKPTQ.L #<data> */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4848_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 99;
|
|
CurrentInstrCycles = 4;
|
|
{ m68k_incpci (2);
|
|
op_illg (opcode);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* PEA.L (An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4850_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 57;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, 7) - 4;
|
|
m68k_areg (regs, 7) = dsta;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, srca);
|
|
}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* PEA.L (d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4868_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 57;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, 7) - 4;
|
|
m68k_areg (regs, 7) = dsta;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, srca);
|
|
}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* PEA.L (d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4870_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 57;
|
|
CurrentInstrCycles = 12;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, 7) - 4;
|
|
m68k_areg (regs, 7) = dsta;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (dsta, srca);
|
|
}}}}return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* PEA.L (xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4878_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 57;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, 7) - 4;
|
|
m68k_areg (regs, 7) = dsta;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, srca);
|
|
}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* PEA.L (xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4879_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 57;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, 7) - 4;
|
|
m68k_areg (regs, 7) = dsta;
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, srca);
|
|
}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* PEA.L (d16,PC) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_487a_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 57;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, 7) - 4;
|
|
m68k_areg (regs, 7) = dsta;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, srca);
|
|
}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* PEA.L (d8,PC,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_487b_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 57;
|
|
CurrentInstrCycles = 12;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, 7) - 4;
|
|
m68k_areg (regs, 7) = dsta;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (dsta, srca);
|
|
}}}}return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EXT.W Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4880_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 36;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uae_u16 dst = (uae_s16)(uae_s8)src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(dst)) == 0);
|
|
SET_NFLG (((uae_s16)(dst)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xffff) | ((dst) & 0xffff);
|
|
}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVMLE.W #<data>.W,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4890_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 38;
|
|
CurrentInstrCycles = 4;
|
|
{ uae_u16 mask = get_word_020_prefetch (2);
|
|
{ uaecptr srca;
|
|
srca = m68k_areg (regs, dstreg);
|
|
{ uae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff;
|
|
while (dmask) { x_put_word (srca, m68k_dreg (regs, movem_index1[dmask])); srca += 2; dmask = movem_next[dmask]; }
|
|
while (amask) { x_put_word (srca, m68k_areg (regs, movem_index1[amask])); srca += 2; amask = movem_next[amask]; }
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVMLE.W #<data>.W,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_48a0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 38;
|
|
CurrentInstrCycles = 6;
|
|
{ uae_u16 mask = get_word_020_prefetch (2);
|
|
{ uaecptr srca;
|
|
srca = m68k_areg (regs, dstreg) - 0;
|
|
{ uae_u16 amask = mask & 0xff, dmask = (mask >> 8) & 0xff;
|
|
int type = get_cpu_model () >= 68020;
|
|
while (amask) {
|
|
srca -= 2;
|
|
if (!type || movem_index2[amask] != dstreg)
|
|
x_put_word (srca, m68k_areg (regs, movem_index2[amask]));
|
|
else
|
|
x_put_word (srca, m68k_areg (regs, movem_index2[amask]) - 2);
|
|
amask = movem_next[amask];
|
|
}
|
|
while (dmask) { srca -= 2; x_put_word (srca, m68k_dreg (regs, movem_index2[dmask])); dmask = movem_next[dmask]; }
|
|
m68k_areg (regs, dstreg) = srca;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVMLE.W #<data>.W,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_48a8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 38;
|
|
CurrentInstrCycles = 4;
|
|
{ uae_u16 mask = get_word_020_prefetch (2);
|
|
{ uaecptr srca;
|
|
srca = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff;
|
|
while (dmask) { x_put_word (srca, m68k_dreg (regs, movem_index1[dmask])); srca += 2; dmask = movem_next[dmask]; }
|
|
while (amask) { x_put_word (srca, m68k_areg (regs, movem_index1[amask])); srca += 2; amask = movem_next[amask]; }
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVMLE.W #<data>.W,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_48b0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 38;
|
|
CurrentInstrCycles = 4;
|
|
{ uae_u16 mask = get_word_020_prefetch (2);
|
|
{ uaecptr srca;
|
|
m68k_incpci (4);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff;
|
|
while (dmask) { x_put_word (srca, m68k_dreg (regs, movem_index1[dmask])); srca += 2; dmask = movem_next[dmask]; }
|
|
while (amask) { x_put_word (srca, m68k_areg (regs, movem_index1[amask])); srca += 2; amask = movem_next[amask]; }
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVMLE.W #<data>.W,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_48b8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 38;
|
|
CurrentInstrCycles = 4;
|
|
{ uae_u16 mask = get_word_020_prefetch (2);
|
|
{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff;
|
|
while (dmask) { x_put_word (srca, m68k_dreg (regs, movem_index1[dmask])); srca += 2; dmask = movem_next[dmask]; }
|
|
while (amask) { x_put_word (srca, m68k_areg (regs, movem_index1[amask])); srca += 2; amask = movem_next[amask]; }
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVMLE.W #<data>.W,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_48b9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 38;
|
|
CurrentInstrCycles = 4;
|
|
{ uae_u16 mask = get_word_020_prefetch (2);
|
|
{ uaecptr srca;
|
|
srca = get_long_020_prefetch (4);
|
|
{ uae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff;
|
|
while (dmask) { x_put_word (srca, m68k_dreg (regs, movem_index1[dmask])); srca += 2; dmask = movem_next[dmask]; }
|
|
while (amask) { x_put_word (srca, m68k_areg (regs, movem_index1[amask])); srca += 2; amask = movem_next[amask]; }
|
|
regs.irc = get_word_020_prefetch (8);
|
|
}}} m68k_incpci (8);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EXT.L Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_48c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 36;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uae_u32 dst = (uae_s32)(uae_s16)src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(dst)) == 0);
|
|
SET_NFLG (((uae_s32)(dst)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (dst);
|
|
}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVMLE.L #<data>.W,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_48d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 38;
|
|
CurrentInstrCycles = 8;
|
|
{ uae_u16 mask = get_word_020_prefetch (2);
|
|
{ uaecptr srca;
|
|
srca = m68k_areg (regs, dstreg);
|
|
{ uae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff;
|
|
while (dmask) { x_put_long (srca, m68k_dreg (regs, movem_index1[dmask])); srca += 4; dmask = movem_next[dmask]; }
|
|
while (amask) { x_put_long (srca, m68k_areg (regs, movem_index1[amask])); srca += 4; amask = movem_next[amask]; }
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVMLE.L #<data>.W,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_48e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 38;
|
|
CurrentInstrCycles = 10;
|
|
{ uae_u16 mask = get_word_020_prefetch (2);
|
|
{ uaecptr srca;
|
|
srca = m68k_areg (regs, dstreg) - 0;
|
|
{ uae_u16 amask = mask & 0xff, dmask = (mask >> 8) & 0xff;
|
|
int type = get_cpu_model () >= 68020;
|
|
while (amask) {
|
|
srca -= 4;
|
|
if (!type || movem_index2[amask] != dstreg)
|
|
x_put_long (srca, m68k_areg (regs, movem_index2[amask]));
|
|
else
|
|
x_put_long (srca, m68k_areg (regs, movem_index2[amask]) - 4);
|
|
amask = movem_next[amask];
|
|
}
|
|
while (dmask) { srca -= 4; x_put_long (srca, m68k_dreg (regs, movem_index2[dmask])); dmask = movem_next[dmask]; }
|
|
m68k_areg (regs, dstreg) = srca;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVMLE.L #<data>.W,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_48e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 38;
|
|
CurrentInstrCycles = 8;
|
|
{ uae_u16 mask = get_word_020_prefetch (2);
|
|
{ uaecptr srca;
|
|
srca = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff;
|
|
while (dmask) { x_put_long (srca, m68k_dreg (regs, movem_index1[dmask])); srca += 4; dmask = movem_next[dmask]; }
|
|
while (amask) { x_put_long (srca, m68k_areg (regs, movem_index1[amask])); srca += 4; amask = movem_next[amask]; }
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVMLE.L #<data>.W,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_48f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 38;
|
|
CurrentInstrCycles = 8;
|
|
{ uae_u16 mask = get_word_020_prefetch (2);
|
|
{ uaecptr srca;
|
|
m68k_incpci (4);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff;
|
|
while (dmask) { x_put_long (srca, m68k_dreg (regs, movem_index1[dmask])); srca += 4; dmask = movem_next[dmask]; }
|
|
while (amask) { x_put_long (srca, m68k_areg (regs, movem_index1[amask])); srca += 4; amask = movem_next[amask]; }
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVMLE.L #<data>.W,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_48f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 38;
|
|
CurrentInstrCycles = 8;
|
|
{ uae_u16 mask = get_word_020_prefetch (2);
|
|
{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff;
|
|
while (dmask) { x_put_long (srca, m68k_dreg (regs, movem_index1[dmask])); srca += 4; dmask = movem_next[dmask]; }
|
|
while (amask) { x_put_long (srca, m68k_areg (regs, movem_index1[amask])); srca += 4; amask = movem_next[amask]; }
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVMLE.L #<data>.W,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_48f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 38;
|
|
CurrentInstrCycles = 8;
|
|
{ uae_u16 mask = get_word_020_prefetch (2);
|
|
{ uaecptr srca;
|
|
srca = get_long_020_prefetch (4);
|
|
{ uae_u16 dmask = mask & 0xff, amask = (mask >> 8) & 0xff;
|
|
while (dmask) { x_put_long (srca, m68k_dreg (regs, movem_index1[dmask])); srca += 4; dmask = movem_next[dmask]; }
|
|
while (amask) { x_put_long (srca, m68k_areg (regs, movem_index1[amask])); srca += 4; amask = movem_next[amask]; }
|
|
regs.irc = get_word_020_prefetch (8);
|
|
}}} m68k_incpci (8);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EXT.B Dn */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_49c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 36;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uae_u32 dst = (uae_s32)(uae_s8)src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(dst)) == 0);
|
|
SET_NFLG (((uae_s32)(dst)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (dst);
|
|
}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TST.B Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4a00_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TST.B (An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4a10_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TST.B (An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4a18_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TST.B -(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4a20_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}} m68k_incpci (2);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TST.B (d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4a28_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TST.B (d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4a30_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TST.B (xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4a38_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TST.B (xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4a39_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TST.B (d16,PC) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4a3a_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TST.B (d8,PC,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4a3b_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TST.B #<data>.B */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4a3c_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TST.W Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4a40_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TST.W An */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4a48_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_areg (regs, srcreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TST.W (An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4a50_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TST.W (An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4a58_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TST.W -(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4a60_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}} m68k_incpci (2);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TST.W (d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4a68_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TST.W (d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4a70_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TST.W (xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4a78_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TST.W (xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4a79_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TST.W (d16,PC) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4a7a_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TST.W (d8,PC,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4a7b_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TST.W #<data>.W */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4a7c_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TST.L Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4a80_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TST.L An */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4a88_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_areg (regs, srcreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TST.L (An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4a90_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TST.L (An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4a98_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) += 4;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TST.L -(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4aa0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 4;
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TST.L (d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4aa8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TST.L (d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4ab0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TST.L (xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4ab8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TST.L (xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4ab9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TST.L (d16,PC) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4aba_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TST.L (d8,PC,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4abb_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TST.L #<data>.L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4abc_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 20;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TAS.B Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4ac0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 98;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
src |= 0x80;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xff) | ((src) & 0xff);
|
|
}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TAS.B (An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4ad0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 98;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
src |= 0x80;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, src);
|
|
}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TAS.B (An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4ad8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 98;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
src |= 0x80;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, src);
|
|
}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TAS.B -(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4ae0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 98;
|
|
CurrentInstrCycles = 12;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
src |= 0x80;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, src);
|
|
}}} m68k_incpci (2);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TAS.B (d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4ae8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 98;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
src |= 0x80;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, src);
|
|
}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TAS.B (d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4af0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 98;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
src |= 0x80;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (srca, src);
|
|
}}}}return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TAS.B (xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4af8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 98;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
src |= 0x80;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, src);
|
|
}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TAS.B (xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4af9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 98;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
src |= 0x80;
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (srca, src);
|
|
}}} m68k_incpci (6);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MULL.L #<data>.W,Dn */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4c00_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 87;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
m68k_incpci (4);
|
|
if (!m68k_mull(opcode, dst, extra)) goto l_200847;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}l_200847: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MULL.L #<data>.W,(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4c10_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 87;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_incpci (4);
|
|
if (!m68k_mull(opcode, dst, extra)) goto l_200848;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_200848: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MULL.L #<data>.W,(An)+ */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4c18_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 87;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) += 4;
|
|
m68k_incpci (4);
|
|
if (!m68k_mull(opcode, dst, extra)) goto l_200849;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_200849: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MULL.L #<data>.W,-(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4c20_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 87;
|
|
CurrentInstrCycles = 10;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 4;
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
m68k_incpci (4);
|
|
if (!m68k_mull(opcode, dst, extra)) goto l_200850;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_200850: ;
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MULL.L #<data>.W,(d16,An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4c28_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 87;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_incpci (6);
|
|
if (!m68k_mull(opcode, dst, extra)) goto l_200851;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_200851: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MULL.L #<data>.W,(d8,An,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4c30_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 87;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
if (!m68k_mull(opcode, dst, extra)) goto l_200852;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}l_200852: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MULL.L #<data>.W,(xxx).W */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4c38_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 87;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_incpci (6);
|
|
if (!m68k_mull(opcode, dst, extra)) goto l_200853;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_200853: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MULL.L #<data>.W,(xxx).L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4c39_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 87;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_incpci (8);
|
|
if (!m68k_mull(opcode, dst, extra)) goto l_200854;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_200854: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MULL.L #<data>.W,(d16,PC) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4c3a_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = 2;
|
|
OpcodeFamily = 87;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_getpci () + 4;
|
|
dsta += (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_incpci (6);
|
|
if (!m68k_mull(opcode, dst, extra)) goto l_200855;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_200855: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MULL.L #<data>.W,(d8,PC,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4c3b_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = 3;
|
|
OpcodeFamily = 87;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr tmppc;
|
|
uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ tmppc = m68k_getpci ();
|
|
dsta = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
if (!m68k_mull(opcode, dst, extra)) goto l_200856;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}l_200856: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MULL.L #<data>.W,#<data>.L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4c3c_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 87;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uae_s32 dst;
|
|
dst = get_long_020_prefetch (4);
|
|
m68k_incpci (8);
|
|
if (!m68k_mull(opcode, dst, extra)) goto l_200857;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}l_200857: ;
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* DIVL.L #<data>.W,Dn */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4c40_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 86;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
m68k_incpci (4);
|
|
if (!m68k_divl(opcode, dst, extra)) goto l_200858;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}l_200858: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* DIVL.L #<data>.W,(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4c50_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 86;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_incpci (4);
|
|
if (!m68k_divl(opcode, dst, extra)) goto l_200859;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_200859: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* DIVL.L #<data>.W,(An)+ */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4c58_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 86;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) += 4;
|
|
m68k_incpci (4);
|
|
if (!m68k_divl(opcode, dst, extra)) goto l_200860;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_200860: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* DIVL.L #<data>.W,-(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4c60_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 86;
|
|
CurrentInstrCycles = 10;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 4;
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
m68k_incpci (4);
|
|
if (!m68k_divl(opcode, dst, extra)) goto l_200861;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_200861: ;
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* DIVL.L #<data>.W,(d16,An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4c68_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 86;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_incpci (6);
|
|
if (!m68k_divl(opcode, dst, extra)) goto l_200862;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_200862: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* DIVL.L #<data>.W,(d8,An,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4c70_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 86;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
if (!m68k_divl(opcode, dst, extra)) goto l_200863;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}l_200863: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* DIVL.L #<data>.W,(xxx).W */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4c78_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 86;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_incpci (6);
|
|
if (!m68k_divl(opcode, dst, extra)) goto l_200864;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_200864: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* DIVL.L #<data>.W,(xxx).L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4c79_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 86;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_incpci (8);
|
|
if (!m68k_divl(opcode, dst, extra)) goto l_200865;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_200865: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* DIVL.L #<data>.W,(d16,PC) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4c7a_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = 2;
|
|
OpcodeFamily = 86;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_getpci () + 4;
|
|
dsta += (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_incpci (6);
|
|
if (!m68k_divl(opcode, dst, extra)) goto l_200866;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_200866: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* DIVL.L #<data>.W,(d8,PC,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4c7b_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = 3;
|
|
OpcodeFamily = 86;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr tmppc;
|
|
uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ tmppc = m68k_getpci ();
|
|
dsta = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
if (!m68k_divl(opcode, dst, extra)) goto l_200867;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}l_200867: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* DIVL.L #<data>.W,#<data>.L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4c7c_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 86;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uae_s32 dst;
|
|
dst = get_long_020_prefetch (4);
|
|
m68k_incpci (8);
|
|
if (!m68k_divl(opcode, dst, extra)) goto l_200868;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}l_200868: ;
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MVMEL.W #<data>.W,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4c90_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 37;
|
|
CurrentInstrCycles = 4;
|
|
{ uae_u16 mask = get_word_020_prefetch (2);
|
|
uae_u32 dmask = mask & 0xff, amask = (mask >> 8) & 0xff;
|
|
{ uaecptr srca;
|
|
srca = m68k_areg (regs, dstreg);
|
|
{ while (dmask) {
|
|
m68k_dreg (regs, movem_index1[dmask]) = (uae_s32)(uae_s16)x_get_word (srca); srca += 2; dmask = movem_next[dmask];
|
|
}
|
|
while (amask) {
|
|
m68k_areg (regs, movem_index1[amask]) = (uae_s32)(uae_s16)x_get_word (srca); srca += 2; amask = movem_next[amask];
|
|
}
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVMEL.W #<data>.W,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4c98_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 37;
|
|
CurrentInstrCycles = 8;
|
|
{ uae_u16 mask = get_word_020_prefetch (2);
|
|
uae_u32 dmask = mask & 0xff, amask = (mask >> 8) & 0xff;
|
|
{ uaecptr srca;
|
|
srca = m68k_areg (regs, dstreg);
|
|
{ while (dmask) {
|
|
m68k_dreg (regs, movem_index1[dmask]) = (uae_s32)(uae_s16)x_get_word (srca); srca += 2; dmask = movem_next[dmask];
|
|
}
|
|
while (amask) {
|
|
m68k_areg (regs, movem_index1[amask]) = (uae_s32)(uae_s16)x_get_word (srca); srca += 2; amask = movem_next[amask];
|
|
}
|
|
m68k_areg (regs, dstreg) = srca;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVMEL.W #<data>.W,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4ca8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 37;
|
|
CurrentInstrCycles = 4;
|
|
{ uae_u16 mask = get_word_020_prefetch (2);
|
|
uae_u32 dmask = mask & 0xff, amask = (mask >> 8) & 0xff;
|
|
{ uaecptr srca;
|
|
srca = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ while (dmask) {
|
|
m68k_dreg (regs, movem_index1[dmask]) = (uae_s32)(uae_s16)x_get_word (srca); srca += 2; dmask = movem_next[dmask];
|
|
}
|
|
while (amask) {
|
|
m68k_areg (regs, movem_index1[amask]) = (uae_s32)(uae_s16)x_get_word (srca); srca += 2; amask = movem_next[amask];
|
|
}
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVMEL.W #<data>.W,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4cb0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 37;
|
|
CurrentInstrCycles = 4;
|
|
{ uae_u16 mask = get_word_020_prefetch (2);
|
|
uae_u32 dmask = mask & 0xff, amask = (mask >> 8) & 0xff;
|
|
{ uaecptr srca;
|
|
m68k_incpci (4);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ while (dmask) {
|
|
m68k_dreg (regs, movem_index1[dmask]) = (uae_s32)(uae_s16)x_get_word (srca); srca += 2; dmask = movem_next[dmask];
|
|
}
|
|
while (amask) {
|
|
m68k_areg (regs, movem_index1[amask]) = (uae_s32)(uae_s16)x_get_word (srca); srca += 2; amask = movem_next[amask];
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVMEL.W #<data>.W,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4cb8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 37;
|
|
CurrentInstrCycles = 4;
|
|
{ uae_u16 mask = get_word_020_prefetch (2);
|
|
uae_u32 dmask = mask & 0xff, amask = (mask >> 8) & 0xff;
|
|
{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ while (dmask) {
|
|
m68k_dreg (regs, movem_index1[dmask]) = (uae_s32)(uae_s16)x_get_word (srca); srca += 2; dmask = movem_next[dmask];
|
|
}
|
|
while (amask) {
|
|
m68k_areg (regs, movem_index1[amask]) = (uae_s32)(uae_s16)x_get_word (srca); srca += 2; amask = movem_next[amask];
|
|
}
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVMEL.W #<data>.W,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4cb9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 37;
|
|
CurrentInstrCycles = 4;
|
|
{ uae_u16 mask = get_word_020_prefetch (2);
|
|
uae_u32 dmask = mask & 0xff, amask = (mask >> 8) & 0xff;
|
|
{ uaecptr srca;
|
|
srca = get_long_020_prefetch (4);
|
|
{ while (dmask) {
|
|
m68k_dreg (regs, movem_index1[dmask]) = (uae_s32)(uae_s16)x_get_word (srca); srca += 2; dmask = movem_next[dmask];
|
|
}
|
|
while (amask) {
|
|
m68k_areg (regs, movem_index1[amask]) = (uae_s32)(uae_s16)x_get_word (srca); srca += 2; amask = movem_next[amask];
|
|
}
|
|
regs.irc = get_word_020_prefetch (8);
|
|
}}} m68k_incpci (8);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVMEL.W #<data>.W,(d16,PC) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4cba_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = 2;
|
|
OpcodeFamily = 37;
|
|
CurrentInstrCycles = 4;
|
|
{ uae_u16 mask = get_word_020_prefetch (2);
|
|
uae_u32 dmask = mask & 0xff, amask = (mask >> 8) & 0xff;
|
|
{ uaecptr srca;
|
|
srca = m68k_getpci () + 4;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ while (dmask) {
|
|
m68k_dreg (regs, movem_index1[dmask]) = (uae_s32)(uae_s16)x_get_word (srca); srca += 2; dmask = movem_next[dmask];
|
|
}
|
|
while (amask) {
|
|
m68k_areg (regs, movem_index1[amask]) = (uae_s32)(uae_s16)x_get_word (srca); srca += 2; amask = movem_next[amask];
|
|
}
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVMEL.W #<data>.W,(d8,PC,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4cbb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = 3;
|
|
OpcodeFamily = 37;
|
|
CurrentInstrCycles = 4;
|
|
{ uae_u16 mask = get_word_020_prefetch (2);
|
|
uae_u32 dmask = mask & 0xff, amask = (mask >> 8) & 0xff;
|
|
{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (4);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ while (dmask) {
|
|
m68k_dreg (regs, movem_index1[dmask]) = (uae_s32)(uae_s16)x_get_word (srca); srca += 2; dmask = movem_next[dmask];
|
|
}
|
|
while (amask) {
|
|
m68k_areg (regs, movem_index1[amask]) = (uae_s32)(uae_s16)x_get_word (srca); srca += 2; amask = movem_next[amask];
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVMEL.L #<data>.W,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4cd0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 37;
|
|
CurrentInstrCycles = 8;
|
|
{ uae_u16 mask = get_word_020_prefetch (2);
|
|
uae_u32 dmask = mask & 0xff, amask = (mask >> 8) & 0xff;
|
|
{ uaecptr srca;
|
|
srca = m68k_areg (regs, dstreg);
|
|
{ while (dmask) {
|
|
m68k_dreg (regs, movem_index1[dmask]) = x_get_long (srca); srca += 4; dmask = movem_next[dmask];
|
|
}
|
|
while (amask) {
|
|
m68k_areg (regs, movem_index1[amask]) = x_get_long (srca); srca += 4; amask = movem_next[amask];
|
|
}
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVMEL.L #<data>.W,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4cd8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 37;
|
|
CurrentInstrCycles = 12;
|
|
{ uae_u16 mask = get_word_020_prefetch (2);
|
|
uae_u32 dmask = mask & 0xff, amask = (mask >> 8) & 0xff;
|
|
{ uaecptr srca;
|
|
srca = m68k_areg (regs, dstreg);
|
|
{ while (dmask) {
|
|
m68k_dreg (regs, movem_index1[dmask]) = x_get_long (srca); srca += 4; dmask = movem_next[dmask];
|
|
}
|
|
while (amask) {
|
|
m68k_areg (regs, movem_index1[amask]) = x_get_long (srca); srca += 4; amask = movem_next[amask];
|
|
}
|
|
m68k_areg (regs, dstreg) = srca;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}} m68k_incpci (4);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVMEL.L #<data>.W,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4ce8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 37;
|
|
CurrentInstrCycles = 8;
|
|
{ uae_u16 mask = get_word_020_prefetch (2);
|
|
uae_u32 dmask = mask & 0xff, amask = (mask >> 8) & 0xff;
|
|
{ uaecptr srca;
|
|
srca = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ while (dmask) {
|
|
m68k_dreg (regs, movem_index1[dmask]) = x_get_long (srca); srca += 4; dmask = movem_next[dmask];
|
|
}
|
|
while (amask) {
|
|
m68k_areg (regs, movem_index1[amask]) = x_get_long (srca); srca += 4; amask = movem_next[amask];
|
|
}
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVMEL.L #<data>.W,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4cf0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 37;
|
|
CurrentInstrCycles = 8;
|
|
{ uae_u16 mask = get_word_020_prefetch (2);
|
|
uae_u32 dmask = mask & 0xff, amask = (mask >> 8) & 0xff;
|
|
{ uaecptr srca;
|
|
m68k_incpci (4);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ while (dmask) {
|
|
m68k_dreg (regs, movem_index1[dmask]) = x_get_long (srca); srca += 4; dmask = movem_next[dmask];
|
|
}
|
|
while (amask) {
|
|
m68k_areg (regs, movem_index1[amask]) = x_get_long (srca); srca += 4; amask = movem_next[amask];
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVMEL.L #<data>.W,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4cf8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 37;
|
|
CurrentInstrCycles = 8;
|
|
{ uae_u16 mask = get_word_020_prefetch (2);
|
|
uae_u32 dmask = mask & 0xff, amask = (mask >> 8) & 0xff;
|
|
{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ while (dmask) {
|
|
m68k_dreg (regs, movem_index1[dmask]) = x_get_long (srca); srca += 4; dmask = movem_next[dmask];
|
|
}
|
|
while (amask) {
|
|
m68k_areg (regs, movem_index1[amask]) = x_get_long (srca); srca += 4; amask = movem_next[amask];
|
|
}
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVMEL.L #<data>.W,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4cf9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 37;
|
|
CurrentInstrCycles = 8;
|
|
{ uae_u16 mask = get_word_020_prefetch (2);
|
|
uae_u32 dmask = mask & 0xff, amask = (mask >> 8) & 0xff;
|
|
{ uaecptr srca;
|
|
srca = get_long_020_prefetch (4);
|
|
{ while (dmask) {
|
|
m68k_dreg (regs, movem_index1[dmask]) = x_get_long (srca); srca += 4; dmask = movem_next[dmask];
|
|
}
|
|
while (amask) {
|
|
m68k_areg (regs, movem_index1[amask]) = x_get_long (srca); srca += 4; amask = movem_next[amask];
|
|
}
|
|
regs.irc = get_word_020_prefetch (8);
|
|
}}} m68k_incpci (8);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVMEL.L #<data>.W,(d16,PC) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4cfa_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = 2;
|
|
OpcodeFamily = 37;
|
|
CurrentInstrCycles = 8;
|
|
{ uae_u16 mask = get_word_020_prefetch (2);
|
|
uae_u32 dmask = mask & 0xff, amask = (mask >> 8) & 0xff;
|
|
{ uaecptr srca;
|
|
srca = m68k_getpci () + 4;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ while (dmask) {
|
|
m68k_dreg (regs, movem_index1[dmask]) = x_get_long (srca); srca += 4; dmask = movem_next[dmask];
|
|
}
|
|
while (amask) {
|
|
m68k_areg (regs, movem_index1[amask]) = x_get_long (srca); srca += 4; amask = movem_next[amask];
|
|
}
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVMEL.L #<data>.W,(d8,PC,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4cfb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = 3;
|
|
OpcodeFamily = 37;
|
|
CurrentInstrCycles = 8;
|
|
{ uae_u16 mask = get_word_020_prefetch (2);
|
|
uae_u32 dmask = mask & 0xff, amask = (mask >> 8) & 0xff;
|
|
{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (4);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ while (dmask) {
|
|
m68k_dreg (regs, movem_index1[dmask]) = x_get_long (srca); srca += 4; dmask = movem_next[dmask];
|
|
}
|
|
while (amask) {
|
|
m68k_areg (regs, movem_index1[amask]) = x_get_long (srca); srca += 4; amask = movem_next[amask];
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TRAPQ.L #<data> */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4e40_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 15);
|
|
OpcodeFamily = 39;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 src = srcreg;
|
|
m68k_incpci (2);
|
|
Exception (src + 32);
|
|
}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* LINK.W An,#<data>.W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4e50_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 47;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr olda;
|
|
olda = m68k_areg (regs, 7) - 4;
|
|
m68k_areg (regs, 7) = olda;
|
|
{ uae_s32 src = m68k_areg (regs, srcreg);
|
|
{ uae_s16 offs = get_word_020_prefetch (2);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (olda, src);
|
|
m68k_areg (regs, srcreg) = (m68k_areg (regs, 7));
|
|
m68k_areg (regs, 7) += offs;
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* UNLK.L An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4e58_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 48;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s32 src = m68k_areg (regs, srcreg);
|
|
m68k_areg (regs, 7) = src;
|
|
{ uaecptr olda;
|
|
olda = m68k_areg (regs, 7);
|
|
{ uae_s32 old = x_get_long (olda);
|
|
m68k_areg (regs, 7) += 4;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, srcreg) = (old);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVR2USP.L An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4e60_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 40;
|
|
CurrentInstrCycles = 4;
|
|
{if (!regs.s) { Exception (8); goto l_200888; }
|
|
{{ uae_s32 src = m68k_areg (regs, srcreg);
|
|
regs.usp = src;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}} m68k_incpci (2);
|
|
l_200888: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MVUSP2R.L An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4e68_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 41;
|
|
CurrentInstrCycles = 4;
|
|
{if (!regs.s) { Exception (8); goto l_200889; }
|
|
{{ regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, srcreg) = (regs.usp);
|
|
}}} m68k_incpci (2);
|
|
l_200889: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* RESET.L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4e70_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 42;
|
|
CurrentInstrCycles = 4;
|
|
{if (!regs.s) { Exception (8); goto l_200890; }
|
|
{ cpureset ();
|
|
m68k_incpci (2);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}l_200890: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* NOP.L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4e71_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 43;
|
|
CurrentInstrCycles = 4;
|
|
{ regs.irc = get_word_020_prefetch (2);
|
|
} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* STOP.L #<data>.W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4e72_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 44;
|
|
CurrentInstrCycles = 8;
|
|
{if (!regs.s) { Exception (8); goto l_200892; }
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
regs.sr = src;
|
|
MakeFromSR();
|
|
m68k_setstopped ();
|
|
m68k_incpci (4);
|
|
}}}l_200892: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* RTE.L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4e73_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 45;
|
|
CurrentInstrCycles = 16;
|
|
{if (!regs.s) { Exception (8); goto l_200893; }
|
|
{ uae_u16 newsr; uae_u32 newpc;
|
|
for (;;) {
|
|
uaecptr a = m68k_areg (regs, 7);
|
|
uae_u16 sr = x_get_word (a);
|
|
uae_u32 pc = x_get_long (a + 2);
|
|
uae_u16 format = x_get_word (a + 2 + 4);
|
|
int frame = format >> 12;
|
|
int offset = 8;
|
|
newsr = sr; newpc = pc;
|
|
if (frame == 0x0) { m68k_areg (regs, 7) += offset; break; }
|
|
else if (frame == 0x1) { m68k_areg (regs, 7) += offset; }
|
|
else if (frame == 0x2) { m68k_areg (regs, 7) += offset + 4; break; }
|
|
else if (frame == 0x4) { m68k_areg (regs, 7) += offset + 8; break; }
|
|
else if (frame == 0x8) { m68k_areg (regs, 7) += offset + 50; break; }
|
|
else if (frame == 0x7) { m68k_areg (regs, 7) += offset + 52; break; }
|
|
else if (frame == 0x9) { m68k_areg (regs, 7) += offset + 12; break; }
|
|
else if (frame == 0xa) { m68k_areg (regs, 7) += offset + 24; break; }
|
|
else if (frame == 0xb) { m68k_areg (regs, 7) += offset + 84; break; }
|
|
else { m68k_areg (regs, 7) += offset; Exception (14); goto l_200893; }
|
|
regs.sr = newsr;
|
|
MakeFromSR();
|
|
}
|
|
regs.sr = newsr;
|
|
MakeFromSR();
|
|
if (newpc & 1) {
|
|
exception3i (0x4E73, newpc);
|
|
goto l_200893;
|
|
}
|
|
m68k_setpci (newpc);
|
|
fill_prefetch_020 ();
|
|
}}l_200893: ;
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* RTD.L #<data>.W */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4e74_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 46;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr pca;
|
|
pca = m68k_areg (regs, 7);
|
|
{ uae_s32 pc = x_get_long (pca);
|
|
m68k_areg (regs, 7) += 4;
|
|
{ uae_s16 offs = get_word_020_prefetch (2);
|
|
m68k_areg (regs, 7) += offs;
|
|
if (pc & 1) {
|
|
exception3i (0x4E74, pc);
|
|
goto l_200894;
|
|
}
|
|
m68k_setpci (pc);
|
|
fill_prefetch_020 ();
|
|
}}}}l_200894: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* RTS.L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4e75_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 49;
|
|
CurrentInstrCycles = 8;
|
|
{ uaecptr pc = m68k_getpci ();
|
|
m68k_do_rtsi ();
|
|
if (m68k_getpci () & 1) {
|
|
uaecptr faultpc = m68k_getpci ();
|
|
m68k_setpci (pc);
|
|
exception3i (0x4E75, faultpc);
|
|
goto l_200895;
|
|
}
|
|
fill_prefetch_020 ();
|
|
}l_200895: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TRAPV.L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4e76_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 50;
|
|
CurrentInstrCycles = 4;
|
|
{ m68k_incpci (2);
|
|
if (GET_VFLG ()) {
|
|
Exception (7);
|
|
goto l_200896;
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}l_200896: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* RTR.L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4e77_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 51;
|
|
CurrentInstrCycles = 12;
|
|
{ uaecptr oldpc = m68k_getpci ();
|
|
MakeSR ();
|
|
{ uaecptr sra;
|
|
sra = m68k_areg (regs, 7);
|
|
{ uae_s16 sr = x_get_word (sra);
|
|
m68k_areg (regs, 7) += 2;
|
|
{ uaecptr pca;
|
|
pca = m68k_areg (regs, 7);
|
|
{ uae_s32 pc = x_get_long (pca);
|
|
m68k_areg (regs, 7) += 4;
|
|
regs.sr &= 0xFF00; sr &= 0xFF;
|
|
regs.sr |= sr;
|
|
m68k_setpci (pc);
|
|
MakeFromSR();
|
|
if (m68k_getpci () & 1) {
|
|
uaecptr faultpc = m68k_getpci ();
|
|
m68k_setpci (oldpc);
|
|
exception3i (0x4E77, faultpc);
|
|
goto l_200897;
|
|
}
|
|
fill_prefetch_020 ();
|
|
}}}}}l_200897: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVEC2.L #<data>.W */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4e7a_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 82;
|
|
CurrentInstrCycles = 8;
|
|
{if (!regs.s) { Exception (8); goto l_200898; }
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ int regno = (src >> 12) & 15;
|
|
uae_u32 *regp = regs.regs + regno;
|
|
if (! m68k_movec2(src & 0xFFF, regp)) goto l_200898;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}} m68k_incpci (4);
|
|
l_200898: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* MOVE2C.L #<data>.W */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4e7b_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 83;
|
|
CurrentInstrCycles = 8;
|
|
{if (!regs.s) { Exception (8); goto l_200899; }
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ int regno = (src >> 12) & 15;
|
|
uae_u32 *regp = regs.regs + regno;
|
|
if (! m68k_move2c(src & 0xFFF, regp)) goto l_200899;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}} m68k_incpci (4);
|
|
l_200899: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* JSR.L (An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4e90_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 52;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uaecptr oldpc = m68k_getpci () + 2;
|
|
if (srca & 1) {
|
|
exception3i (opcode, srca);
|
|
goto l_200900;
|
|
}
|
|
m68k_setpci (srca);
|
|
m68k_areg (regs, 7) -= 4;
|
|
x_put_long (m68k_areg (regs, 7), oldpc);
|
|
fill_prefetch_020 ();
|
|
}}}l_200900: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* JSR.L (d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4ea8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 52;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uaecptr oldpc = m68k_getpci () + 4;
|
|
if (srca & 1) {
|
|
exception3i (opcode, srca);
|
|
goto l_200901;
|
|
}
|
|
m68k_setpci (srca);
|
|
m68k_areg (regs, 7) -= 4;
|
|
x_put_long (m68k_areg (regs, 7), oldpc);
|
|
fill_prefetch_020 ();
|
|
}}}l_200901: ;
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* JSR.L (d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4eb0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 52;
|
|
CurrentInstrCycles = 14;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uaecptr oldpc = m68k_getpci () + 0;
|
|
if (srca & 1) {
|
|
exception3i (opcode, srca);
|
|
goto l_200902;
|
|
}
|
|
m68k_setpci (srca);
|
|
m68k_areg (regs, 7) -= 4;
|
|
x_put_long (m68k_areg (regs, 7), oldpc);
|
|
fill_prefetch_020 ();
|
|
}}}}l_200902: ;
|
|
return 14 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* JSR.L (xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4eb8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 52;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uaecptr oldpc = m68k_getpci () + 4;
|
|
if (srca & 1) {
|
|
exception3i (opcode, srca);
|
|
goto l_200903;
|
|
}
|
|
m68k_setpci (srca);
|
|
m68k_areg (regs, 7) -= 4;
|
|
x_put_long (m68k_areg (regs, 7), oldpc);
|
|
fill_prefetch_020 ();
|
|
}}}l_200903: ;
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* JSR.L (xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4eb9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 52;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uaecptr oldpc = m68k_getpci () + 6;
|
|
if (srca & 1) {
|
|
exception3i (opcode, srca);
|
|
goto l_200904;
|
|
}
|
|
m68k_setpci (srca);
|
|
m68k_areg (regs, 7) -= 4;
|
|
x_put_long (m68k_areg (regs, 7), oldpc);
|
|
fill_prefetch_020 ();
|
|
}}}l_200904: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* JSR.L (d16,PC) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4eba_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 52;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uaecptr oldpc = m68k_getpci () + 4;
|
|
if (srca & 1) {
|
|
exception3i (opcode, srca);
|
|
goto l_200905;
|
|
}
|
|
m68k_setpci (srca);
|
|
m68k_areg (regs, 7) -= 4;
|
|
x_put_long (m68k_areg (regs, 7), oldpc);
|
|
fill_prefetch_020 ();
|
|
}}}l_200905: ;
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* JSR.L (d8,PC,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4ebb_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 52;
|
|
CurrentInstrCycles = 14;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uaecptr oldpc = m68k_getpci () + 0;
|
|
if (srca & 1) {
|
|
exception3i (opcode, srca);
|
|
goto l_200906;
|
|
}
|
|
m68k_setpci (srca);
|
|
m68k_areg (regs, 7) -= 4;
|
|
x_put_long (m68k_areg (regs, 7), oldpc);
|
|
fill_prefetch_020 ();
|
|
}}}}l_200906: ;
|
|
return 14 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* JMP.L (An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4ed0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 53;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
if (srca & 1) {
|
|
exception3i (opcode, srca);
|
|
goto l_200907;
|
|
}
|
|
m68k_setpci (srca);
|
|
fill_prefetch_020 ();
|
|
}}l_200907: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* JMP.L (d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4ee8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 53;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
if (srca & 1) {
|
|
exception3i (opcode, srca);
|
|
goto l_200908;
|
|
}
|
|
m68k_setpci (srca);
|
|
fill_prefetch_020 ();
|
|
}}l_200908: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* JMP.L (d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4ef0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 53;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
if (srca & 1) {
|
|
exception3i (opcode, srca);
|
|
goto l_200909;
|
|
}
|
|
m68k_setpci (srca);
|
|
fill_prefetch_020 ();
|
|
}}}l_200909: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* JMP.L (xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4ef8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 53;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
if (srca & 1) {
|
|
exception3i (opcode, srca);
|
|
goto l_200910;
|
|
}
|
|
m68k_setpci (srca);
|
|
fill_prefetch_020 ();
|
|
}}l_200910: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* JMP.L (xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4ef9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 53;
|
|
CurrentInstrCycles = 12;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
if (srca & 1) {
|
|
exception3i (opcode, srca);
|
|
goto l_200911;
|
|
}
|
|
m68k_setpci (srca);
|
|
fill_prefetch_020 ();
|
|
}}l_200911: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* JMP.L (d16,PC) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4efa_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 53;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
if (srca & 1) {
|
|
exception3i (opcode, srca);
|
|
goto l_200912;
|
|
}
|
|
m68k_setpci (srca);
|
|
fill_prefetch_020 ();
|
|
}}l_200912: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* JMP.L (d8,PC,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_4efb_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 53;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
if (srca & 1) {
|
|
exception3i (opcode, srca);
|
|
goto l_200913;
|
|
}
|
|
m68k_setpci (srca);
|
|
fill_prefetch_020 ();
|
|
}}}l_200913: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDQ.B #<data>,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5000_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) + ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((newv) & 0xff);
|
|
}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDQ.B #<data>,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5010_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) + ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDQ.B #<data>,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5018_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
{{uae_u32 newv = ((uae_u8)(dst)) + ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDQ.B #<data>,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5020_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 10;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
{{uae_u32 newv = ((uae_u8)(dst)) + ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDQ.B #<data>,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5028_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) + ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDQ.B #<data>,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5030_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) + ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDQ.B #<data>,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5038_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) + ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDQ.B #<data>,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5039_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) + ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDQ.W #<data>,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5040_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((newv) & 0xffff);
|
|
}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDAQ.W #<data>,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5048_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 12;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst + src;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDQ.W #<data>,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5050_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDQ.W #<data>,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5058_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
m68k_areg (regs, dstreg) += 2;
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDQ.W #<data>,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5060_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 10;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 2;
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDQ.W #<data>,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5068_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDQ.W #<data>,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5070_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDQ.W #<data>,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5078_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDQ.W #<data>,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5079_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDQ.L #<data>,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5080_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDAQ.L #<data>,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5088_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 12;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst + src;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDQ.L #<data>,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5090_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDQ.L #<data>,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5098_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) += 4;
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDQ.L #<data>,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_50a0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 18;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 4;
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 18 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
|
|
#ifdef PART_5
|
|
/* ADDQ.L #<data>,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_50a8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDQ.L #<data>,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_50b0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDQ.L #<data>,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_50b8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDQ.L #<data>,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_50b9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B Dn (T) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_50c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{{{ int val = cctrue (0) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xff) | ((val) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DBcc.W Dn,#<data>.W (T) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_50c8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 58;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 offs = get_word_020_prefetch (2);
|
|
uaecptr oldpc = m68k_getpci ();
|
|
if (!cctrue (0)) {
|
|
m68k_incpci ((uae_s32)offs + 2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xffff) | (((src - 1)) & 0xffff);
|
|
if (src) {
|
|
if (offs & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)offs + 2);
|
|
goto l_200941;
|
|
}
|
|
fill_prefetch_020 ();
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
} else {
|
|
}
|
|
m68k_setpci (oldpc + 4);
|
|
continue_020_prefetch();
|
|
}}}l_200941: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (An) (T) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_50d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{{ int val = cctrue (0) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (An)+ (T) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_50d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
{{ int val = cctrue (0) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B -(An) (T) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_50e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{{ int val = cctrue (0) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (d16,An) (T) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_50e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{{ int val = cctrue (0) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (d8,An,Xn) (T) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_50f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{{ int val = cctrue (0) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (srca, val);
|
|
}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (xxx).W (T) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_50f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{{ int val = cctrue (0) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (xxx).L (T) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_50f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{{ int val = cctrue (0) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TRAPcc.L #<data>.W (T) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_50fa_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 dummy = get_word_020_prefetch (2);
|
|
if (cctrue (0)) { Exception (7); goto l_200949; }
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}} m68k_incpci (4);
|
|
l_200949: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TRAPcc.L #<data>.L (T) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_50fb_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 dummy;
|
|
dummy = get_long_020_prefetch (2);
|
|
if (cctrue (0)) { Exception (7); goto l_200950; }
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}} m68k_incpci (6);
|
|
l_200950: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TRAPcc.L (T) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_50fc_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 4;
|
|
{ if (cctrue (0)) { Exception (7); goto l_200951; }
|
|
regs.irc = get_word_020_prefetch (2);
|
|
} m68k_incpci (2);
|
|
l_200951: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* SUBQ.B #<data>,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5100_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((newv) & 0xff);
|
|
}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBQ.B #<data>,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5110_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBQ.B #<data>,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5118_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBQ.B #<data>,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5120_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 10;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBQ.B #<data>,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5128_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBQ.B #<data>,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5130_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBQ.B #<data>,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5138_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBQ.B #<data>,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5139_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBQ.W #<data>,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5140_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((newv) & 0xffff);
|
|
}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBAQ.W #<data>,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5148_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 8;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst - src;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBQ.W #<data>,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5150_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBQ.W #<data>,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5158_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
m68k_areg (regs, dstreg) += 2;
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBQ.W #<data>,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5160_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 10;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 2;
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBQ.W #<data>,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5168_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBQ.W #<data>,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5170_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBQ.W #<data>,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5178_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBQ.W #<data>,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5179_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBQ.L #<data>,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5180_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBAQ.L #<data>,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5188_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 8;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst - src;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBQ.L #<data>,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5190_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBQ.L #<data>,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5198_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) += 4;
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBQ.L #<data>,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_51a0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 18;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 4;
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 18 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBQ.L #<data>,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_51a8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBQ.L #<data>,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_51b0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBQ.L #<data>,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_51b8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBQ.L #<data>,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_51b9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_u32 src = srcreg;
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B Dn (F) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_51c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{{{ int val = cctrue (1) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xff) | ((val) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DBcc.W Dn,#<data>.W (F) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_51c8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 58;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 offs = get_word_020_prefetch (2);
|
|
uaecptr oldpc = m68k_getpci ();
|
|
if (!cctrue (1)) {
|
|
m68k_incpci ((uae_s32)offs + 2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xffff) | (((src - 1)) & 0xffff);
|
|
if (src) {
|
|
if (offs & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)offs + 2);
|
|
goto l_200979;
|
|
}
|
|
fill_prefetch_020 ();
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
} else {
|
|
}
|
|
m68k_setpci (oldpc + 4);
|
|
continue_020_prefetch();
|
|
}}}l_200979: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (An) (F) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_51d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{{ int val = cctrue (1) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (An)+ (F) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_51d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
{{ int val = cctrue (1) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B -(An) (F) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_51e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{{ int val = cctrue (1) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (d16,An) (F) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_51e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{{ int val = cctrue (1) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (d8,An,Xn) (F) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_51f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{{ int val = cctrue (1) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (srca, val);
|
|
}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (xxx).W (F) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_51f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{{ int val = cctrue (1) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (xxx).L (F) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_51f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{{ int val = cctrue (1) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TRAPcc.L #<data>.W (F) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_51fa_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 dummy = get_word_020_prefetch (2);
|
|
if (cctrue (1)) { Exception (7); goto l_200987; }
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}} m68k_incpci (4);
|
|
l_200987: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TRAPcc.L #<data>.L (F) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_51fb_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 dummy;
|
|
dummy = get_long_020_prefetch (2);
|
|
if (cctrue (1)) { Exception (7); goto l_200988; }
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}} m68k_incpci (6);
|
|
l_200988: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TRAPcc.L (F) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_51fc_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 4;
|
|
{ if (cctrue (1)) { Exception (7); goto l_200989; }
|
|
regs.irc = get_word_020_prefetch (2);
|
|
} m68k_incpci (2);
|
|
l_200989: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* Scc.B Dn (HI) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_52c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{{{ int val = cctrue (2) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xff) | ((val) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DBcc.W Dn,#<data>.W (HI) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_52c8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 58;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 offs = get_word_020_prefetch (2);
|
|
uaecptr oldpc = m68k_getpci ();
|
|
if (!cctrue (2)) {
|
|
m68k_incpci ((uae_s32)offs + 2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xffff) | (((src - 1)) & 0xffff);
|
|
if (src) {
|
|
if (offs & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)offs + 2);
|
|
goto l_200991;
|
|
}
|
|
fill_prefetch_020 ();
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
} else {
|
|
}
|
|
m68k_setpci (oldpc + 4);
|
|
continue_020_prefetch();
|
|
}}}l_200991: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (An) (HI) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_52d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{{ int val = cctrue (2) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (An)+ (HI) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_52d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
{{ int val = cctrue (2) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B -(An) (HI) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_52e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{{ int val = cctrue (2) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (d16,An) (HI) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_52e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{{ int val = cctrue (2) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (d8,An,Xn) (HI) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_52f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{{ int val = cctrue (2) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (srca, val);
|
|
}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (xxx).W (HI) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_52f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{{ int val = cctrue (2) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (xxx).L (HI) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_52f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{{ int val = cctrue (2) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TRAPcc.L #<data>.W (HI) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_52fa_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 dummy = get_word_020_prefetch (2);
|
|
if (cctrue (2)) { Exception (7); goto l_200999; }
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}} m68k_incpci (4);
|
|
l_200999: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TRAPcc.L #<data>.L (HI) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_52fb_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 dummy;
|
|
dummy = get_long_020_prefetch (2);
|
|
if (cctrue (2)) { Exception (7); goto l_201000; }
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}} m68k_incpci (6);
|
|
l_201000: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TRAPcc.L (HI) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_52fc_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 4;
|
|
{ if (cctrue (2)) { Exception (7); goto l_201001; }
|
|
regs.irc = get_word_020_prefetch (2);
|
|
} m68k_incpci (2);
|
|
l_201001: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* Scc.B Dn (LS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_53c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{{{ int val = cctrue (3) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xff) | ((val) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DBcc.W Dn,#<data>.W (LS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_53c8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 58;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 offs = get_word_020_prefetch (2);
|
|
uaecptr oldpc = m68k_getpci ();
|
|
if (!cctrue (3)) {
|
|
m68k_incpci ((uae_s32)offs + 2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xffff) | (((src - 1)) & 0xffff);
|
|
if (src) {
|
|
if (offs & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)offs + 2);
|
|
goto l_201003;
|
|
}
|
|
fill_prefetch_020 ();
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
} else {
|
|
}
|
|
m68k_setpci (oldpc + 4);
|
|
continue_020_prefetch();
|
|
}}}l_201003: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (An) (LS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_53d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{{ int val = cctrue (3) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (An)+ (LS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_53d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
{{ int val = cctrue (3) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B -(An) (LS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_53e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{{ int val = cctrue (3) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (d16,An) (LS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_53e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{{ int val = cctrue (3) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (d8,An,Xn) (LS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_53f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{{ int val = cctrue (3) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (srca, val);
|
|
}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (xxx).W (LS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_53f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{{ int val = cctrue (3) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (xxx).L (LS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_53f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{{ int val = cctrue (3) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TRAPcc.L #<data>.W (LS) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_53fa_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 dummy = get_word_020_prefetch (2);
|
|
if (cctrue (3)) { Exception (7); goto l_201011; }
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}} m68k_incpci (4);
|
|
l_201011: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TRAPcc.L #<data>.L (LS) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_53fb_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 dummy;
|
|
dummy = get_long_020_prefetch (2);
|
|
if (cctrue (3)) { Exception (7); goto l_201012; }
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}} m68k_incpci (6);
|
|
l_201012: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TRAPcc.L (LS) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_53fc_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 4;
|
|
{ if (cctrue (3)) { Exception (7); goto l_201013; }
|
|
regs.irc = get_word_020_prefetch (2);
|
|
} m68k_incpci (2);
|
|
l_201013: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* Scc.B Dn (CC) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_54c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{{{ int val = cctrue (4) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xff) | ((val) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DBcc.W Dn,#<data>.W (CC) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_54c8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 58;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 offs = get_word_020_prefetch (2);
|
|
uaecptr oldpc = m68k_getpci ();
|
|
if (!cctrue (4)) {
|
|
m68k_incpci ((uae_s32)offs + 2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xffff) | (((src - 1)) & 0xffff);
|
|
if (src) {
|
|
if (offs & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)offs + 2);
|
|
goto l_201015;
|
|
}
|
|
fill_prefetch_020 ();
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
} else {
|
|
}
|
|
m68k_setpci (oldpc + 4);
|
|
continue_020_prefetch();
|
|
}}}l_201015: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (An) (CC) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_54d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{{ int val = cctrue (4) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (An)+ (CC) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_54d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
{{ int val = cctrue (4) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B -(An) (CC) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_54e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{{ int val = cctrue (4) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (d16,An) (CC) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_54e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{{ int val = cctrue (4) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (d8,An,Xn) (CC) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_54f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{{ int val = cctrue (4) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (srca, val);
|
|
}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (xxx).W (CC) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_54f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{{ int val = cctrue (4) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (xxx).L (CC) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_54f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{{ int val = cctrue (4) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TRAPcc.L #<data>.W (CC) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_54fa_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 dummy = get_word_020_prefetch (2);
|
|
if (cctrue (4)) { Exception (7); goto l_201023; }
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}} m68k_incpci (4);
|
|
l_201023: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TRAPcc.L #<data>.L (CC) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_54fb_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 dummy;
|
|
dummy = get_long_020_prefetch (2);
|
|
if (cctrue (4)) { Exception (7); goto l_201024; }
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}} m68k_incpci (6);
|
|
l_201024: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TRAPcc.L (CC) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_54fc_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 4;
|
|
{ if (cctrue (4)) { Exception (7); goto l_201025; }
|
|
regs.irc = get_word_020_prefetch (2);
|
|
} m68k_incpci (2);
|
|
l_201025: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* Scc.B Dn (CS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_55c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{{{ int val = cctrue (5) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xff) | ((val) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DBcc.W Dn,#<data>.W (CS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_55c8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 58;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 offs = get_word_020_prefetch (2);
|
|
uaecptr oldpc = m68k_getpci ();
|
|
if (!cctrue (5)) {
|
|
m68k_incpci ((uae_s32)offs + 2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xffff) | (((src - 1)) & 0xffff);
|
|
if (src) {
|
|
if (offs & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)offs + 2);
|
|
goto l_201027;
|
|
}
|
|
fill_prefetch_020 ();
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
} else {
|
|
}
|
|
m68k_setpci (oldpc + 4);
|
|
continue_020_prefetch();
|
|
}}}l_201027: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (An) (CS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_55d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{{ int val = cctrue (5) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (An)+ (CS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_55d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
{{ int val = cctrue (5) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B -(An) (CS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_55e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{{ int val = cctrue (5) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (d16,An) (CS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_55e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{{ int val = cctrue (5) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (d8,An,Xn) (CS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_55f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{{ int val = cctrue (5) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (srca, val);
|
|
}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (xxx).W (CS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_55f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{{ int val = cctrue (5) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (xxx).L (CS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_55f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{{ int val = cctrue (5) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TRAPcc.L #<data>.W (CS) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_55fa_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 dummy = get_word_020_prefetch (2);
|
|
if (cctrue (5)) { Exception (7); goto l_201035; }
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}} m68k_incpci (4);
|
|
l_201035: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TRAPcc.L #<data>.L (CS) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_55fb_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 dummy;
|
|
dummy = get_long_020_prefetch (2);
|
|
if (cctrue (5)) { Exception (7); goto l_201036; }
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}} m68k_incpci (6);
|
|
l_201036: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TRAPcc.L (CS) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_55fc_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 4;
|
|
{ if (cctrue (5)) { Exception (7); goto l_201037; }
|
|
regs.irc = get_word_020_prefetch (2);
|
|
} m68k_incpci (2);
|
|
l_201037: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* Scc.B Dn (NE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_56c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{{{ int val = cctrue (6) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xff) | ((val) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DBcc.W Dn,#<data>.W (NE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_56c8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 58;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 offs = get_word_020_prefetch (2);
|
|
uaecptr oldpc = m68k_getpci ();
|
|
if (!cctrue (6)) {
|
|
m68k_incpci ((uae_s32)offs + 2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xffff) | (((src - 1)) & 0xffff);
|
|
if (src) {
|
|
if (offs & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)offs + 2);
|
|
goto l_201039;
|
|
}
|
|
fill_prefetch_020 ();
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
} else {
|
|
}
|
|
m68k_setpci (oldpc + 4);
|
|
continue_020_prefetch();
|
|
}}}l_201039: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (An) (NE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_56d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{{ int val = cctrue (6) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (An)+ (NE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_56d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
{{ int val = cctrue (6) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B -(An) (NE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_56e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{{ int val = cctrue (6) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (d16,An) (NE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_56e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{{ int val = cctrue (6) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (d8,An,Xn) (NE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_56f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{{ int val = cctrue (6) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (srca, val);
|
|
}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (xxx).W (NE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_56f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{{ int val = cctrue (6) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (xxx).L (NE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_56f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{{ int val = cctrue (6) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TRAPcc.L #<data>.W (NE) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_56fa_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 dummy = get_word_020_prefetch (2);
|
|
if (cctrue (6)) { Exception (7); goto l_201047; }
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}} m68k_incpci (4);
|
|
l_201047: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TRAPcc.L #<data>.L (NE) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_56fb_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 dummy;
|
|
dummy = get_long_020_prefetch (2);
|
|
if (cctrue (6)) { Exception (7); goto l_201048; }
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}} m68k_incpci (6);
|
|
l_201048: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TRAPcc.L (NE) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_56fc_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 4;
|
|
{ if (cctrue (6)) { Exception (7); goto l_201049; }
|
|
regs.irc = get_word_020_prefetch (2);
|
|
} m68k_incpci (2);
|
|
l_201049: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* Scc.B Dn (EQ) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_57c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{{{ int val = cctrue (7) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xff) | ((val) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DBcc.W Dn,#<data>.W (EQ) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_57c8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 58;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 offs = get_word_020_prefetch (2);
|
|
uaecptr oldpc = m68k_getpci ();
|
|
if (!cctrue (7)) {
|
|
m68k_incpci ((uae_s32)offs + 2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xffff) | (((src - 1)) & 0xffff);
|
|
if (src) {
|
|
if (offs & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)offs + 2);
|
|
goto l_201051;
|
|
}
|
|
fill_prefetch_020 ();
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
} else {
|
|
}
|
|
m68k_setpci (oldpc + 4);
|
|
continue_020_prefetch();
|
|
}}}l_201051: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (An) (EQ) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_57d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{{ int val = cctrue (7) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (An)+ (EQ) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_57d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
{{ int val = cctrue (7) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B -(An) (EQ) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_57e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{{ int val = cctrue (7) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (d16,An) (EQ) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_57e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{{ int val = cctrue (7) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (d8,An,Xn) (EQ) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_57f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{{ int val = cctrue (7) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (srca, val);
|
|
}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (xxx).W (EQ) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_57f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{{ int val = cctrue (7) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (xxx).L (EQ) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_57f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{{ int val = cctrue (7) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TRAPcc.L #<data>.W (EQ) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_57fa_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 dummy = get_word_020_prefetch (2);
|
|
if (cctrue (7)) { Exception (7); goto l_201059; }
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}} m68k_incpci (4);
|
|
l_201059: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TRAPcc.L #<data>.L (EQ) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_57fb_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 dummy;
|
|
dummy = get_long_020_prefetch (2);
|
|
if (cctrue (7)) { Exception (7); goto l_201060; }
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}} m68k_incpci (6);
|
|
l_201060: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TRAPcc.L (EQ) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_57fc_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 4;
|
|
{ if (cctrue (7)) { Exception (7); goto l_201061; }
|
|
regs.irc = get_word_020_prefetch (2);
|
|
} m68k_incpci (2);
|
|
l_201061: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* Scc.B Dn (VC) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_58c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{{{ int val = cctrue (8) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xff) | ((val) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DBcc.W Dn,#<data>.W (VC) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_58c8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 58;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 offs = get_word_020_prefetch (2);
|
|
uaecptr oldpc = m68k_getpci ();
|
|
if (!cctrue (8)) {
|
|
m68k_incpci ((uae_s32)offs + 2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xffff) | (((src - 1)) & 0xffff);
|
|
if (src) {
|
|
if (offs & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)offs + 2);
|
|
goto l_201063;
|
|
}
|
|
fill_prefetch_020 ();
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
} else {
|
|
}
|
|
m68k_setpci (oldpc + 4);
|
|
continue_020_prefetch();
|
|
}}}l_201063: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (An) (VC) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_58d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{{ int val = cctrue (8) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (An)+ (VC) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_58d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
{{ int val = cctrue (8) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B -(An) (VC) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_58e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{{ int val = cctrue (8) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (d16,An) (VC) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_58e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{{ int val = cctrue (8) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (d8,An,Xn) (VC) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_58f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{{ int val = cctrue (8) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (srca, val);
|
|
}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (xxx).W (VC) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_58f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{{ int val = cctrue (8) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (xxx).L (VC) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_58f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{{ int val = cctrue (8) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TRAPcc.L #<data>.W (VC) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_58fa_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 dummy = get_word_020_prefetch (2);
|
|
if (cctrue (8)) { Exception (7); goto l_201071; }
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}} m68k_incpci (4);
|
|
l_201071: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TRAPcc.L #<data>.L (VC) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_58fb_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 dummy;
|
|
dummy = get_long_020_prefetch (2);
|
|
if (cctrue (8)) { Exception (7); goto l_201072; }
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}} m68k_incpci (6);
|
|
l_201072: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TRAPcc.L (VC) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_58fc_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 4;
|
|
{ if (cctrue (8)) { Exception (7); goto l_201073; }
|
|
regs.irc = get_word_020_prefetch (2);
|
|
} m68k_incpci (2);
|
|
l_201073: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* Scc.B Dn (VS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_59c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{{{ int val = cctrue (9) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xff) | ((val) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DBcc.W Dn,#<data>.W (VS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_59c8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 58;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 offs = get_word_020_prefetch (2);
|
|
uaecptr oldpc = m68k_getpci ();
|
|
if (!cctrue (9)) {
|
|
m68k_incpci ((uae_s32)offs + 2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xffff) | (((src - 1)) & 0xffff);
|
|
if (src) {
|
|
if (offs & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)offs + 2);
|
|
goto l_201075;
|
|
}
|
|
fill_prefetch_020 ();
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
} else {
|
|
}
|
|
m68k_setpci (oldpc + 4);
|
|
continue_020_prefetch();
|
|
}}}l_201075: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (An) (VS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_59d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{{ int val = cctrue (9) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (An)+ (VS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_59d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
{{ int val = cctrue (9) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B -(An) (VS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_59e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{{ int val = cctrue (9) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (d16,An) (VS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_59e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{{ int val = cctrue (9) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (d8,An,Xn) (VS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_59f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{{ int val = cctrue (9) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (srca, val);
|
|
}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (xxx).W (VS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_59f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{{ int val = cctrue (9) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (xxx).L (VS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_59f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{{ int val = cctrue (9) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TRAPcc.L #<data>.W (VS) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_59fa_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 dummy = get_word_020_prefetch (2);
|
|
if (cctrue (9)) { Exception (7); goto l_201083; }
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}} m68k_incpci (4);
|
|
l_201083: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TRAPcc.L #<data>.L (VS) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_59fb_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 dummy;
|
|
dummy = get_long_020_prefetch (2);
|
|
if (cctrue (9)) { Exception (7); goto l_201084; }
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}} m68k_incpci (6);
|
|
l_201084: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TRAPcc.L (VS) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_59fc_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 4;
|
|
{ if (cctrue (9)) { Exception (7); goto l_201085; }
|
|
regs.irc = get_word_020_prefetch (2);
|
|
} m68k_incpci (2);
|
|
l_201085: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* Scc.B Dn (PL) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5ac0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{{{ int val = cctrue (10) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xff) | ((val) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DBcc.W Dn,#<data>.W (PL) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5ac8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 58;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 offs = get_word_020_prefetch (2);
|
|
uaecptr oldpc = m68k_getpci ();
|
|
if (!cctrue (10)) {
|
|
m68k_incpci ((uae_s32)offs + 2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xffff) | (((src - 1)) & 0xffff);
|
|
if (src) {
|
|
if (offs & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)offs + 2);
|
|
goto l_201087;
|
|
}
|
|
fill_prefetch_020 ();
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
} else {
|
|
}
|
|
m68k_setpci (oldpc + 4);
|
|
continue_020_prefetch();
|
|
}}}l_201087: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (An) (PL) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5ad0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{{ int val = cctrue (10) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (An)+ (PL) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5ad8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
{{ int val = cctrue (10) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B -(An) (PL) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5ae0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{{ int val = cctrue (10) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (d16,An) (PL) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5ae8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{{ int val = cctrue (10) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (d8,An,Xn) (PL) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5af0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{{ int val = cctrue (10) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (srca, val);
|
|
}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (xxx).W (PL) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5af8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{{ int val = cctrue (10) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (xxx).L (PL) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5af9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{{ int val = cctrue (10) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TRAPcc.L #<data>.W (PL) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5afa_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 dummy = get_word_020_prefetch (2);
|
|
if (cctrue (10)) { Exception (7); goto l_201095; }
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}} m68k_incpci (4);
|
|
l_201095: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TRAPcc.L #<data>.L (PL) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5afb_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 dummy;
|
|
dummy = get_long_020_prefetch (2);
|
|
if (cctrue (10)) { Exception (7); goto l_201096; }
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}} m68k_incpci (6);
|
|
l_201096: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TRAPcc.L (PL) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5afc_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 4;
|
|
{ if (cctrue (10)) { Exception (7); goto l_201097; }
|
|
regs.irc = get_word_020_prefetch (2);
|
|
} m68k_incpci (2);
|
|
l_201097: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* Scc.B Dn (MI) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5bc0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{{{ int val = cctrue (11) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xff) | ((val) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DBcc.W Dn,#<data>.W (MI) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5bc8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 58;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 offs = get_word_020_prefetch (2);
|
|
uaecptr oldpc = m68k_getpci ();
|
|
if (!cctrue (11)) {
|
|
m68k_incpci ((uae_s32)offs + 2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xffff) | (((src - 1)) & 0xffff);
|
|
if (src) {
|
|
if (offs & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)offs + 2);
|
|
goto l_201099;
|
|
}
|
|
fill_prefetch_020 ();
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
} else {
|
|
}
|
|
m68k_setpci (oldpc + 4);
|
|
continue_020_prefetch();
|
|
}}}l_201099: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (An) (MI) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5bd0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{{ int val = cctrue (11) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (An)+ (MI) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5bd8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
{{ int val = cctrue (11) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B -(An) (MI) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5be0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{{ int val = cctrue (11) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (d16,An) (MI) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5be8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{{ int val = cctrue (11) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (d8,An,Xn) (MI) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5bf0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{{ int val = cctrue (11) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (srca, val);
|
|
}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (xxx).W (MI) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5bf8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{{ int val = cctrue (11) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (xxx).L (MI) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5bf9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{{ int val = cctrue (11) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TRAPcc.L #<data>.W (MI) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5bfa_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 dummy = get_word_020_prefetch (2);
|
|
if (cctrue (11)) { Exception (7); goto l_201107; }
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}} m68k_incpci (4);
|
|
l_201107: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TRAPcc.L #<data>.L (MI) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5bfb_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 dummy;
|
|
dummy = get_long_020_prefetch (2);
|
|
if (cctrue (11)) { Exception (7); goto l_201108; }
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}} m68k_incpci (6);
|
|
l_201108: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TRAPcc.L (MI) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5bfc_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 4;
|
|
{ if (cctrue (11)) { Exception (7); goto l_201109; }
|
|
regs.irc = get_word_020_prefetch (2);
|
|
} m68k_incpci (2);
|
|
l_201109: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* Scc.B Dn (GE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5cc0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{{{ int val = cctrue (12) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xff) | ((val) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DBcc.W Dn,#<data>.W (GE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5cc8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 58;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 offs = get_word_020_prefetch (2);
|
|
uaecptr oldpc = m68k_getpci ();
|
|
if (!cctrue (12)) {
|
|
m68k_incpci ((uae_s32)offs + 2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xffff) | (((src - 1)) & 0xffff);
|
|
if (src) {
|
|
if (offs & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)offs + 2);
|
|
goto l_201111;
|
|
}
|
|
fill_prefetch_020 ();
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
} else {
|
|
}
|
|
m68k_setpci (oldpc + 4);
|
|
continue_020_prefetch();
|
|
}}}l_201111: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (An) (GE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5cd0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{{ int val = cctrue (12) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (An)+ (GE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5cd8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
{{ int val = cctrue (12) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B -(An) (GE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5ce0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{{ int val = cctrue (12) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (d16,An) (GE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5ce8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{{ int val = cctrue (12) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (d8,An,Xn) (GE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5cf0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{{ int val = cctrue (12) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (srca, val);
|
|
}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (xxx).W (GE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5cf8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{{ int val = cctrue (12) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (xxx).L (GE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5cf9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{{ int val = cctrue (12) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TRAPcc.L #<data>.W (GE) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5cfa_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 dummy = get_word_020_prefetch (2);
|
|
if (cctrue (12)) { Exception (7); goto l_201119; }
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}} m68k_incpci (4);
|
|
l_201119: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TRAPcc.L #<data>.L (GE) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5cfb_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 dummy;
|
|
dummy = get_long_020_prefetch (2);
|
|
if (cctrue (12)) { Exception (7); goto l_201120; }
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}} m68k_incpci (6);
|
|
l_201120: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TRAPcc.L (GE) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5cfc_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 4;
|
|
{ if (cctrue (12)) { Exception (7); goto l_201121; }
|
|
regs.irc = get_word_020_prefetch (2);
|
|
} m68k_incpci (2);
|
|
l_201121: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* Scc.B Dn (LT) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5dc0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{{{ int val = cctrue (13) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xff) | ((val) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DBcc.W Dn,#<data>.W (LT) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5dc8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 58;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 offs = get_word_020_prefetch (2);
|
|
uaecptr oldpc = m68k_getpci ();
|
|
if (!cctrue (13)) {
|
|
m68k_incpci ((uae_s32)offs + 2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xffff) | (((src - 1)) & 0xffff);
|
|
if (src) {
|
|
if (offs & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)offs + 2);
|
|
goto l_201123;
|
|
}
|
|
fill_prefetch_020 ();
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
} else {
|
|
}
|
|
m68k_setpci (oldpc + 4);
|
|
continue_020_prefetch();
|
|
}}}l_201123: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (An) (LT) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5dd0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{{ int val = cctrue (13) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (An)+ (LT) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5dd8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
{{ int val = cctrue (13) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B -(An) (LT) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5de0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{{ int val = cctrue (13) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (d16,An) (LT) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5de8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{{ int val = cctrue (13) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (d8,An,Xn) (LT) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5df0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{{ int val = cctrue (13) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (srca, val);
|
|
}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (xxx).W (LT) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5df8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{{ int val = cctrue (13) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (xxx).L (LT) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5df9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{{ int val = cctrue (13) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TRAPcc.L #<data>.W (LT) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5dfa_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 dummy = get_word_020_prefetch (2);
|
|
if (cctrue (13)) { Exception (7); goto l_201131; }
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}} m68k_incpci (4);
|
|
l_201131: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TRAPcc.L #<data>.L (LT) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5dfb_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 dummy;
|
|
dummy = get_long_020_prefetch (2);
|
|
if (cctrue (13)) { Exception (7); goto l_201132; }
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}} m68k_incpci (6);
|
|
l_201132: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TRAPcc.L (LT) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5dfc_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 4;
|
|
{ if (cctrue (13)) { Exception (7); goto l_201133; }
|
|
regs.irc = get_word_020_prefetch (2);
|
|
} m68k_incpci (2);
|
|
l_201133: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* Scc.B Dn (GT) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5ec0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{{{ int val = cctrue (14) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xff) | ((val) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DBcc.W Dn,#<data>.W (GT) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5ec8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 58;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 offs = get_word_020_prefetch (2);
|
|
uaecptr oldpc = m68k_getpci ();
|
|
if (!cctrue (14)) {
|
|
m68k_incpci ((uae_s32)offs + 2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xffff) | (((src - 1)) & 0xffff);
|
|
if (src) {
|
|
if (offs & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)offs + 2);
|
|
goto l_201135;
|
|
}
|
|
fill_prefetch_020 ();
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
} else {
|
|
}
|
|
m68k_setpci (oldpc + 4);
|
|
continue_020_prefetch();
|
|
}}}l_201135: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (An) (GT) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5ed0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{{ int val = cctrue (14) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (An)+ (GT) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5ed8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
{{ int val = cctrue (14) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B -(An) (GT) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5ee0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{{ int val = cctrue (14) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (d16,An) (GT) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5ee8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{{ int val = cctrue (14) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (d8,An,Xn) (GT) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5ef0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{{ int val = cctrue (14) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (srca, val);
|
|
}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (xxx).W (GT) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5ef8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{{ int val = cctrue (14) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (xxx).L (GT) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5ef9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{{ int val = cctrue (14) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TRAPcc.L #<data>.W (GT) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5efa_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 dummy = get_word_020_prefetch (2);
|
|
if (cctrue (14)) { Exception (7); goto l_201143; }
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}} m68k_incpci (4);
|
|
l_201143: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TRAPcc.L #<data>.L (GT) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5efb_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 dummy;
|
|
dummy = get_long_020_prefetch (2);
|
|
if (cctrue (14)) { Exception (7); goto l_201144; }
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}} m68k_incpci (6);
|
|
l_201144: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TRAPcc.L (GT) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5efc_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 4;
|
|
{ if (cctrue (14)) { Exception (7); goto l_201145; }
|
|
regs.irc = get_word_020_prefetch (2);
|
|
} m68k_incpci (2);
|
|
l_201145: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* Scc.B Dn (LE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5fc0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{{{ int val = cctrue (15) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xff) | ((val) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DBcc.W Dn,#<data>.W (LE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5fc8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 58;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 offs = get_word_020_prefetch (2);
|
|
uaecptr oldpc = m68k_getpci ();
|
|
if (!cctrue (15)) {
|
|
m68k_incpci ((uae_s32)offs + 2);
|
|
m68k_dreg (regs, srcreg) = (m68k_dreg (regs, srcreg) & ~0xffff) | (((src - 1)) & 0xffff);
|
|
if (src) {
|
|
if (offs & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)offs + 2);
|
|
goto l_201147;
|
|
}
|
|
fill_prefetch_020 ();
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
} else {
|
|
}
|
|
m68k_setpci (oldpc + 4);
|
|
continue_020_prefetch();
|
|
}}}l_201147: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (An) (LE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5fd0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{{ int val = cctrue (15) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (An)+ (LE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5fd8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
{{ int val = cctrue (15) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B -(An) (LE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5fe0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{{ int val = cctrue (15) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (2);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (d16,An) (LE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5fe8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{{ int val = cctrue (15) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (d8,An,Xn) (LE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5ff0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{{ int val = cctrue (15) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (srca, val);
|
|
}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (xxx).W (LE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5ff8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{{ int val = cctrue (15) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Scc.B (xxx).L (LE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5ff9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 59;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{{ int val = cctrue (15) ? 0xff : 0;
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (srca, val);
|
|
}}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* TRAPcc.L #<data>.W (LE) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5ffa_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 dummy = get_word_020_prefetch (2);
|
|
if (cctrue (15)) { Exception (7); goto l_201155; }
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}} m68k_incpci (4);
|
|
l_201155: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TRAPcc.L #<data>.L (LE) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5ffb_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 dummy;
|
|
dummy = get_long_020_prefetch (2);
|
|
if (cctrue (15)) { Exception (7); goto l_201156; }
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}} m68k_incpci (6);
|
|
l_201156: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* TRAPcc.L (LE) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_5ffc_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 102;
|
|
CurrentInstrCycles = 4;
|
|
{ if (cctrue (15)) { Exception (7); goto l_201157; }
|
|
regs.irc = get_word_020_prefetch (2);
|
|
} m68k_incpci (2);
|
|
l_201157: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* Bcc.W #<data>.W (T) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6000_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
if (!cctrue (0)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201158;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (4);
|
|
continue_020_prefetch();
|
|
}}l_201158: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BccQ.B #<data> (T) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6001_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255);
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
if (!cctrue (0)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201159;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (2);
|
|
continue_020_prefetch();
|
|
}}l_201159: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Bcc.L #<data>.L (T) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_60ff_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
if (!cctrue (0)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201160;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (6);
|
|
continue_020_prefetch();
|
|
}}l_201160: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BSR.W #<data>.W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6100_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 54;
|
|
CurrentInstrCycles = 10;
|
|
{ uae_s32 s;
|
|
{ uae_s16 src = get_word_020_prefetch (2);
|
|
s = (uae_s32)src + 2;
|
|
if (src & 1) {
|
|
exception3b (opcode, m68k_getpci () + s, 0, 1, m68k_getpci () + s);
|
|
goto l_201161;
|
|
}
|
|
m68k_do_bsri (m68k_getpci () + 4, s);
|
|
fill_prefetch_020 ();
|
|
}}l_201161: ;
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BSRQ.B #<data> */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6101_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255);
|
|
OpcodeFamily = 54;
|
|
CurrentInstrCycles = 10;
|
|
{ uae_s32 s;
|
|
{ uae_u32 src = srcreg;
|
|
s = (uae_s32)src + 2;
|
|
if (src & 1) {
|
|
exception3b (opcode, m68k_getpci () + s, 0, 1, m68k_getpci () + s);
|
|
goto l_201162;
|
|
}
|
|
m68k_do_bsri (m68k_getpci () + 2, s);
|
|
fill_prefetch_020 ();
|
|
}}l_201162: ;
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BSR.L #<data>.L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_61ff_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 54;
|
|
CurrentInstrCycles = 10;
|
|
{ uae_s32 s;
|
|
{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
s = (uae_s32)src + 2;
|
|
if (src & 1) {
|
|
exception3b (opcode, m68k_getpci () + s, 0, 1, m68k_getpci () + s);
|
|
goto l_201163;
|
|
}
|
|
m68k_do_bsri (m68k_getpci () + 6, s);
|
|
fill_prefetch_020 ();
|
|
}}l_201163: ;
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Bcc.W #<data>.W (HI) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6200_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
if (!cctrue (2)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201164;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (4);
|
|
continue_020_prefetch();
|
|
}}l_201164: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BccQ.B #<data> (HI) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6201_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255);
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
if (!cctrue (2)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201165;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (2);
|
|
continue_020_prefetch();
|
|
}}l_201165: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Bcc.L #<data>.L (HI) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_62ff_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
if (!cctrue (2)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201166;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (6);
|
|
continue_020_prefetch();
|
|
}}l_201166: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Bcc.W #<data>.W (LS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6300_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
if (!cctrue (3)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201167;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (4);
|
|
continue_020_prefetch();
|
|
}}l_201167: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BccQ.B #<data> (LS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6301_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255);
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
if (!cctrue (3)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201168;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (2);
|
|
continue_020_prefetch();
|
|
}}l_201168: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
|
|
#ifdef PART_6
|
|
/* Bcc.L #<data>.L (LS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_63ff_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
if (!cctrue (3)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201169;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (6);
|
|
continue_020_prefetch();
|
|
}}l_201169: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Bcc.W #<data>.W (CC) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6400_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
if (!cctrue (4)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201170;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (4);
|
|
continue_020_prefetch();
|
|
}}l_201170: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BccQ.B #<data> (CC) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6401_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255);
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
if (!cctrue (4)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201171;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (2);
|
|
continue_020_prefetch();
|
|
}}l_201171: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Bcc.L #<data>.L (CC) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_64ff_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
if (!cctrue (4)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201172;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (6);
|
|
continue_020_prefetch();
|
|
}}l_201172: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Bcc.W #<data>.W (CS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6500_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
if (!cctrue (5)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201173;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (4);
|
|
continue_020_prefetch();
|
|
}}l_201173: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BccQ.B #<data> (CS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6501_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255);
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
if (!cctrue (5)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201174;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (2);
|
|
continue_020_prefetch();
|
|
}}l_201174: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Bcc.L #<data>.L (CS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_65ff_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
if (!cctrue (5)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201175;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (6);
|
|
continue_020_prefetch();
|
|
}}l_201175: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Bcc.W #<data>.W (NE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6600_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
if (!cctrue (6)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201176;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (4);
|
|
continue_020_prefetch();
|
|
}}l_201176: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BccQ.B #<data> (NE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6601_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255);
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
if (!cctrue (6)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201177;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (2);
|
|
continue_020_prefetch();
|
|
}}l_201177: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Bcc.L #<data>.L (NE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_66ff_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
if (!cctrue (6)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201178;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (6);
|
|
continue_020_prefetch();
|
|
}}l_201178: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Bcc.W #<data>.W (EQ) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6700_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
if (!cctrue (7)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201179;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (4);
|
|
continue_020_prefetch();
|
|
}}l_201179: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BccQ.B #<data> (EQ) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6701_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255);
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
if (!cctrue (7)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201180;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (2);
|
|
continue_020_prefetch();
|
|
}}l_201180: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Bcc.L #<data>.L (EQ) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_67ff_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
if (!cctrue (7)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201181;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (6);
|
|
continue_020_prefetch();
|
|
}}l_201181: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Bcc.W #<data>.W (VC) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6800_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
if (!cctrue (8)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201182;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (4);
|
|
continue_020_prefetch();
|
|
}}l_201182: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BccQ.B #<data> (VC) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6801_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255);
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
if (!cctrue (8)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201183;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (2);
|
|
continue_020_prefetch();
|
|
}}l_201183: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Bcc.L #<data>.L (VC) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_68ff_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
if (!cctrue (8)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201184;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (6);
|
|
continue_020_prefetch();
|
|
}}l_201184: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Bcc.W #<data>.W (VS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6900_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
if (!cctrue (9)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201185;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (4);
|
|
continue_020_prefetch();
|
|
}}l_201185: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BccQ.B #<data> (VS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6901_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255);
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
if (!cctrue (9)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201186;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (2);
|
|
continue_020_prefetch();
|
|
}}l_201186: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Bcc.L #<data>.L (VS) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_69ff_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
if (!cctrue (9)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201187;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (6);
|
|
continue_020_prefetch();
|
|
}}l_201187: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Bcc.W #<data>.W (PL) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6a00_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
if (!cctrue (10)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201188;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (4);
|
|
continue_020_prefetch();
|
|
}}l_201188: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BccQ.B #<data> (PL) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6a01_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255);
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
if (!cctrue (10)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201189;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (2);
|
|
continue_020_prefetch();
|
|
}}l_201189: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Bcc.L #<data>.L (PL) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6aff_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
if (!cctrue (10)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201190;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (6);
|
|
continue_020_prefetch();
|
|
}}l_201190: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Bcc.W #<data>.W (MI) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6b00_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
if (!cctrue (11)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201191;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (4);
|
|
continue_020_prefetch();
|
|
}}l_201191: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BccQ.B #<data> (MI) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6b01_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255);
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
if (!cctrue (11)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201192;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (2);
|
|
continue_020_prefetch();
|
|
}}l_201192: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Bcc.L #<data>.L (MI) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6bff_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
if (!cctrue (11)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201193;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (6);
|
|
continue_020_prefetch();
|
|
}}l_201193: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Bcc.W #<data>.W (GE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6c00_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
if (!cctrue (12)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201194;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (4);
|
|
continue_020_prefetch();
|
|
}}l_201194: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BccQ.B #<data> (GE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6c01_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255);
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
if (!cctrue (12)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201195;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (2);
|
|
continue_020_prefetch();
|
|
}}l_201195: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Bcc.L #<data>.L (GE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6cff_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
if (!cctrue (12)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201196;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (6);
|
|
continue_020_prefetch();
|
|
}}l_201196: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Bcc.W #<data>.W (LT) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6d00_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
if (!cctrue (13)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201197;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (4);
|
|
continue_020_prefetch();
|
|
}}l_201197: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BccQ.B #<data> (LT) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6d01_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255);
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
if (!cctrue (13)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201198;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (2);
|
|
continue_020_prefetch();
|
|
}}l_201198: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Bcc.L #<data>.L (LT) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6dff_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
if (!cctrue (13)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201199;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (6);
|
|
continue_020_prefetch();
|
|
}}l_201199: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Bcc.W #<data>.W (GT) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6e00_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
if (!cctrue (14)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201200;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (4);
|
|
continue_020_prefetch();
|
|
}}l_201200: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BccQ.B #<data> (GT) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6e01_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255);
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
if (!cctrue (14)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201201;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (2);
|
|
continue_020_prefetch();
|
|
}}l_201201: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Bcc.L #<data>.L (GT) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6eff_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
if (!cctrue (14)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201202;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (6);
|
|
continue_020_prefetch();
|
|
}}l_201202: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Bcc.W #<data>.W (LE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6f00_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
if (!cctrue (15)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201203;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (4);
|
|
continue_020_prefetch();
|
|
}}l_201203: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BccQ.B #<data> (LE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6f01_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255);
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_u32 src = srcreg;
|
|
if (!cctrue (15)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201204;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (2);
|
|
continue_020_prefetch();
|
|
}}l_201204: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* Bcc.L #<data>.L (LE) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_6fff_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 55;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
if (!cctrue (15)) goto didnt_jump;
|
|
if (src & 1) {
|
|
exception3i (opcode, m68k_getpci () + 2 + (uae_s32)src);
|
|
goto l_201205;
|
|
}
|
|
m68k_incpci ((uae_s32)src + 2);
|
|
fill_prefetch_020 ();
|
|
return 10 * CYCLE_UNIT / 2;
|
|
didnt_jump:;
|
|
m68k_incpci (6);
|
|
continue_020_prefetch();
|
|
}}l_201205: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MOVEQ.L #<data>,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_7000_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (uae_s32)(uae_s8)(opcode & 255);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 30;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 src = srcreg;
|
|
{ CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
m68k_incpci (2);
|
|
}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.B Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8000_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.B (An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8010_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.B (An)+,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8018_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.B -(An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8020_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.B (d16,An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8028_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.B (d8,An,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8030_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.B (xxx).W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8038_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.B (xxx).L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8039_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
}}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.B (d16,PC),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_803a_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.B (d8,PC,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_803b_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.B #<data>.B,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_803c_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.W Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8040_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.W (An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8050_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.W (An)+,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8058_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.W -(An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8060_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
}}}} m68k_incpci (2);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.W (d16,An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8068_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.W (d8,An,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8070_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.W (xxx).W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8078_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.W (xxx).L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8079_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
}}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.W (d16,PC),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_807a_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.W (d8,PC,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_807b_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.W #<data>.W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_807c_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.L Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8080_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.L (An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8090_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.L (An)+,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8098_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) += 4;
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.L -(An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_80a0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 12;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 4;
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
}}}} m68k_incpci (2);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.L (d16,An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_80a8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.L (d8,An,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_80b0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
}}}}}return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.L (xxx).W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_80b8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.L (xxx).L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_80b9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
}}}} m68k_incpci (6);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.L (d16,PC),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_80ba_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.L (d8,PC,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_80bb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
}}}}}return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.L #<data>.L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_80bc_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DIVU.W Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_80c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 60;
|
|
CurrentInstrCycles = 110;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
if (src == 0) {
|
|
divbyzero_special (0, dst);
|
|
m68k_incpci (2);
|
|
Exception (5);
|
|
goto l_201240;
|
|
} else {
|
|
uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src;
|
|
uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src;
|
|
if (newv > 0xffff) {
|
|
SET_VFLG (1);
|
|
SET_NFLG (1);
|
|
} else {
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_NFLG (((uae_s16)(newv)) < 0);
|
|
newv = (newv & 0xffff) | ((uae_u32)rem << 16);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}
|
|
m68k_incpci (2);
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}l_201240: ;
|
|
return 110 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DIVU.W (An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_80d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 60;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
if (src == 0) {
|
|
divbyzero_special (0, dst);
|
|
m68k_incpci (2);
|
|
Exception (5);
|
|
goto l_201241;
|
|
} else {
|
|
uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src;
|
|
uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src;
|
|
if (newv > 0xffff) {
|
|
SET_VFLG (1);
|
|
SET_NFLG (1);
|
|
} else {
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_NFLG (((uae_s16)(newv)) < 0);
|
|
newv = (newv & 0xffff) | ((uae_u32)rem << 16);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}
|
|
m68k_incpci (2);
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_201241: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DIVU.W (An)+,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_80d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 60;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
if (src == 0) {
|
|
divbyzero_special (0, dst);
|
|
m68k_incpci (2);
|
|
Exception (5);
|
|
goto l_201242;
|
|
} else {
|
|
uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src;
|
|
uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src;
|
|
if (newv > 0xffff) {
|
|
SET_VFLG (1);
|
|
SET_NFLG (1);
|
|
} else {
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_NFLG (((uae_s16)(newv)) < 0);
|
|
newv = (newv & 0xffff) | ((uae_u32)rem << 16);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}
|
|
m68k_incpci (2);
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_201242: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DIVU.W -(An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_80e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 60;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
if (src == 0) {
|
|
divbyzero_special (0, dst);
|
|
m68k_incpci (2);
|
|
Exception (5);
|
|
goto l_201243;
|
|
} else {
|
|
uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src;
|
|
uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src;
|
|
if (newv > 0xffff) {
|
|
SET_VFLG (1);
|
|
SET_NFLG (1);
|
|
} else {
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_NFLG (((uae_s16)(newv)) < 0);
|
|
newv = (newv & 0xffff) | ((uae_u32)rem << 16);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}
|
|
m68k_incpci (2);
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_201243: ;
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DIVU.W (d16,An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_80e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 60;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
if (src == 0) {
|
|
divbyzero_special (0, dst);
|
|
m68k_incpci (4);
|
|
Exception (5);
|
|
goto l_201244;
|
|
} else {
|
|
uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src;
|
|
uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src;
|
|
if (newv > 0xffff) {
|
|
SET_VFLG (1);
|
|
SET_NFLG (1);
|
|
} else {
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_NFLG (((uae_s16)(newv)) < 0);
|
|
newv = (newv & 0xffff) | ((uae_u32)rem << 16);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}
|
|
m68k_incpci (4);
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_201244: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DIVU.W (d8,An,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_80f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 60;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
if (src == 0) {
|
|
divbyzero_special (0, dst);
|
|
m68k_incpci (0);
|
|
Exception (5);
|
|
goto l_201245;
|
|
} else {
|
|
uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src;
|
|
uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src;
|
|
if (newv > 0xffff) {
|
|
SET_VFLG (1);
|
|
SET_NFLG (1);
|
|
} else {
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_NFLG (((uae_s16)(newv)) < 0);
|
|
newv = (newv & 0xffff) | ((uae_u32)rem << 16);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}l_201245: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DIVU.W (xxx).W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_80f8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 60;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
if (src == 0) {
|
|
divbyzero_special (0, dst);
|
|
m68k_incpci (4);
|
|
Exception (5);
|
|
goto l_201246;
|
|
} else {
|
|
uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src;
|
|
uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src;
|
|
if (newv > 0xffff) {
|
|
SET_VFLG (1);
|
|
SET_NFLG (1);
|
|
} else {
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_NFLG (((uae_s16)(newv)) < 0);
|
|
newv = (newv & 0xffff) | ((uae_u32)rem << 16);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}
|
|
m68k_incpci (4);
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_201246: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DIVU.W (xxx).L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_80f9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 60;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
if (src == 0) {
|
|
divbyzero_special (0, dst);
|
|
m68k_incpci (6);
|
|
Exception (5);
|
|
goto l_201247;
|
|
} else {
|
|
uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src;
|
|
uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src;
|
|
if (newv > 0xffff) {
|
|
SET_VFLG (1);
|
|
SET_NFLG (1);
|
|
} else {
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_NFLG (((uae_s16)(newv)) < 0);
|
|
newv = (newv & 0xffff) | ((uae_u32)rem << 16);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}
|
|
m68k_incpci (6);
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_201247: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DIVU.W (d16,PC),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_80fa_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 60;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
if (src == 0) {
|
|
divbyzero_special (0, dst);
|
|
m68k_incpci (4);
|
|
Exception (5);
|
|
goto l_201248;
|
|
} else {
|
|
uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src;
|
|
uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src;
|
|
if (newv > 0xffff) {
|
|
SET_VFLG (1);
|
|
SET_NFLG (1);
|
|
} else {
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_NFLG (((uae_s16)(newv)) < 0);
|
|
newv = (newv & 0xffff) | ((uae_u32)rem << 16);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}
|
|
m68k_incpci (4);
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_201248: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DIVU.W (d8,PC,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_80fb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 60;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
if (src == 0) {
|
|
divbyzero_special (0, dst);
|
|
m68k_incpci (0);
|
|
Exception (5);
|
|
goto l_201249;
|
|
} else {
|
|
uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src;
|
|
uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src;
|
|
if (newv > 0xffff) {
|
|
SET_VFLG (1);
|
|
SET_NFLG (1);
|
|
} else {
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_NFLG (((uae_s16)(newv)) < 0);
|
|
newv = (newv & 0xffff) | ((uae_u32)rem << 16);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}l_201249: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DIVU.W #<data>.W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_80fc_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 60;
|
|
CurrentInstrCycles = 114;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
CLEAR_CZNV ();
|
|
if (src == 0) {
|
|
divbyzero_special (0, dst);
|
|
m68k_incpci (4);
|
|
Exception (5);
|
|
goto l_201250;
|
|
} else {
|
|
uae_u32 newv = (uae_u32)dst / (uae_u32)(uae_u16)src;
|
|
uae_u32 rem = (uae_u32)dst % (uae_u32)(uae_u16)src;
|
|
if (newv > 0xffff) {
|
|
SET_VFLG (1);
|
|
SET_NFLG (1);
|
|
} else {
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_NFLG (((uae_s16)(newv)) < 0);
|
|
newv = (newv & 0xffff) | ((uae_u32)rem << 16);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}
|
|
m68k_incpci (4);
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}l_201250: ;
|
|
return 114 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SBCD.B Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8100_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 10;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{ uae_u16 newv_lo = (dst & 0xF) - (src & 0xF) - (GET_XFLG () ? 1 : 0);
|
|
uae_u16 newv_hi = (dst & 0xF0) - (src & 0xF0);
|
|
uae_u16 newv, tmp_newv;
|
|
int bcd = 0;
|
|
newv = tmp_newv = newv_hi + newv_lo;
|
|
if (newv_lo & 0xF0) { newv -= 6; bcd = 6; };
|
|
if ((((dst & 0xFF) - (src & 0xFF) - (GET_XFLG () ? 1 : 0)) & 0x100) > 0xFF) { newv -= 0x60; }
|
|
SET_CFLG ((((dst & 0xFF) - (src & 0xFF) - bcd - (GET_XFLG () ? 1 : 0)) & 0x300) > 0xFF);
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s8)(newv)) == 0));
|
|
SET_NFLG (((uae_s8)(newv)) < 0);
|
|
SET_VFLG ((tmp_newv & 0x80) != 0 && (newv & 0x80) == 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((newv) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SBCD.B -(An),-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8108_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 10;
|
|
CurrentInstrCycles = 14;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
{ uae_u16 newv_lo = (dst & 0xF) - (src & 0xF) - (GET_XFLG () ? 1 : 0);
|
|
uae_u16 newv_hi = (dst & 0xF0) - (src & 0xF0);
|
|
uae_u16 newv, tmp_newv;
|
|
int bcd = 0;
|
|
newv = tmp_newv = newv_hi + newv_lo;
|
|
if (newv_lo & 0xF0) { newv -= 6; bcd = 6; };
|
|
if ((((dst & 0xFF) - (src & 0xFF) - (GET_XFLG () ? 1 : 0)) & 0x100) > 0xFF) { newv -= 0x60; }
|
|
SET_CFLG ((((dst & 0xFF) - (src & 0xFF) - bcd - (GET_XFLG () ? 1 : 0)) & 0x300) > 0xFF);
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s8)(newv)) == 0));
|
|
SET_NFLG (((uae_s8)(newv)) < 0);
|
|
SET_VFLG ((tmp_newv & 0x80) != 0 && (newv & 0x80) == 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}} m68k_incpci (2);
|
|
return 14 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.B Dn,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8110_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.B Dn,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8118_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.B Dn,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8120_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 10;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.B Dn,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8128_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.B Dn,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8130_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.B Dn,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8138_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.B Dn,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8139_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* PACK.L Dn,Dn */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8140_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 96;
|
|
CurrentInstrCycles = 8;
|
|
{ uae_u16 val = m68k_dreg (regs, srcreg) + get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & 0xffffff00) | ((val >> 4) & 0xf0) | (val & 0xf);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* PACK.L -(An),-(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8148_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 96;
|
|
CurrentInstrCycles = 8;
|
|
{ uae_u16 val;
|
|
m68k_areg (regs, srcreg) -= areg_byteinc[srcreg];
|
|
val = (uae_u16)(x_get_byte (m68k_areg (regs, srcreg)) & 0xff);
|
|
m68k_areg (regs, srcreg) -= areg_byteinc[srcreg];
|
|
val = (val | ((uae_u16)(x_get_byte (m68k_areg (regs, srcreg)) & 0xff) << 8)) + get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) -= areg_byteinc[dstreg];
|
|
x_put_byte (m68k_areg (regs, dstreg),((val >> 4) & 0xf0) | (val & 0xf));
|
|
regs.irc = get_word_020_prefetch (4);
|
|
} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* OR.W Dn,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8150_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.W Dn,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8158_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
m68k_areg (regs, dstreg) += 2;
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.W Dn,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8160_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 10;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 2;
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.W Dn,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8168_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.W Dn,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8170_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dsta, src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.W Dn,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8178_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.W Dn,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8179_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* UNPK.L Dn,Dn */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8180_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 97;
|
|
CurrentInstrCycles = 8;
|
|
{ uae_u16 val = m68k_dreg (regs, srcreg);
|
|
val = (((val << 4) & 0xf00) | (val & 0xf)) + get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & 0xffff0000) | (val & 0xffff);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* UNPK.L -(An),-(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8188_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 97;
|
|
CurrentInstrCycles = 8;
|
|
{ uae_u16 val;
|
|
m68k_areg (regs, srcreg) -= areg_byteinc[srcreg];
|
|
val = (uae_u16)(x_get_byte (m68k_areg (regs, srcreg)) & 0xff);
|
|
val = (((val << 4) & 0xf00) | (val & 0xf)) + get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) -= 2 * areg_byteinc[dstreg];
|
|
x_put_byte (m68k_areg (regs, dstreg) + areg_byteinc[dstreg], val);
|
|
x_put_byte (m68k_areg (regs, dstreg), val >> 8);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* OR.L Dn,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8190_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (2);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.L Dn,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_8198_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) += 4;
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (2);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.L Dn,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_81a0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 18;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 4;
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (2);
|
|
return 18 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.L Dn,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_81a8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.L Dn,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_81b0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (dsta, src);
|
|
}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.L Dn,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_81b8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* OR.L Dn,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_81b9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 1;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
src |= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (6);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DIVS.W Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_81c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 61;
|
|
CurrentInstrCycles = 142;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
if (src == 0) {
|
|
divbyzero_special (1, dst);
|
|
m68k_incpci (2);
|
|
Exception (5);
|
|
goto l_201278;
|
|
}
|
|
CLEAR_CZNV ();
|
|
if (dst == 0x80000000 && src == -1) {
|
|
SET_VFLG (1);
|
|
SET_NFLG (1);
|
|
} else {
|
|
uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src;
|
|
uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src;
|
|
if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) {
|
|
SET_VFLG (1);
|
|
SET_NFLG (1);
|
|
} else {
|
|
if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_NFLG (((uae_s16)(newv)) < 0);
|
|
newv = (newv & 0xffff) | ((uae_u32)rem << 16);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}
|
|
}
|
|
m68k_incpci (2);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}l_201278: ;
|
|
return 142 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DIVS.W (An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_81d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 61;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
if (src == 0) {
|
|
divbyzero_special (1, dst);
|
|
m68k_incpci (2);
|
|
Exception (5);
|
|
goto l_201279;
|
|
}
|
|
CLEAR_CZNV ();
|
|
if (dst == 0x80000000 && src == -1) {
|
|
SET_VFLG (1);
|
|
SET_NFLG (1);
|
|
} else {
|
|
uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src;
|
|
uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src;
|
|
if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) {
|
|
SET_VFLG (1);
|
|
SET_NFLG (1);
|
|
} else {
|
|
if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_NFLG (((uae_s16)(newv)) < 0);
|
|
newv = (newv & 0xffff) | ((uae_u32)rem << 16);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}
|
|
}
|
|
m68k_incpci (2);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_201279: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DIVS.W (An)+,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_81d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 61;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
if (src == 0) {
|
|
divbyzero_special (1, dst);
|
|
m68k_incpci (2);
|
|
Exception (5);
|
|
goto l_201280;
|
|
}
|
|
CLEAR_CZNV ();
|
|
if (dst == 0x80000000 && src == -1) {
|
|
SET_VFLG (1);
|
|
SET_NFLG (1);
|
|
} else {
|
|
uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src;
|
|
uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src;
|
|
if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) {
|
|
SET_VFLG (1);
|
|
SET_NFLG (1);
|
|
} else {
|
|
if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_NFLG (((uae_s16)(newv)) < 0);
|
|
newv = (newv & 0xffff) | ((uae_u32)rem << 16);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}
|
|
}
|
|
m68k_incpci (2);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_201280: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DIVS.W -(An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_81e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 61;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
if (src == 0) {
|
|
divbyzero_special (1, dst);
|
|
m68k_incpci (2);
|
|
Exception (5);
|
|
goto l_201281;
|
|
}
|
|
CLEAR_CZNV ();
|
|
if (dst == 0x80000000 && src == -1) {
|
|
SET_VFLG (1);
|
|
SET_NFLG (1);
|
|
} else {
|
|
uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src;
|
|
uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src;
|
|
if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) {
|
|
SET_VFLG (1);
|
|
SET_NFLG (1);
|
|
} else {
|
|
if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_NFLG (((uae_s16)(newv)) < 0);
|
|
newv = (newv & 0xffff) | ((uae_u32)rem << 16);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}
|
|
}
|
|
m68k_incpci (2);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_201281: ;
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DIVS.W (d16,An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_81e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 61;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
if (src == 0) {
|
|
divbyzero_special (1, dst);
|
|
m68k_incpci (4);
|
|
Exception (5);
|
|
goto l_201282;
|
|
}
|
|
CLEAR_CZNV ();
|
|
if (dst == 0x80000000 && src == -1) {
|
|
SET_VFLG (1);
|
|
SET_NFLG (1);
|
|
} else {
|
|
uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src;
|
|
uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src;
|
|
if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) {
|
|
SET_VFLG (1);
|
|
SET_NFLG (1);
|
|
} else {
|
|
if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_NFLG (((uae_s16)(newv)) < 0);
|
|
newv = (newv & 0xffff) | ((uae_u32)rem << 16);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}
|
|
}
|
|
m68k_incpci (4);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_201282: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DIVS.W (d8,An,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_81f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 61;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
if (src == 0) {
|
|
divbyzero_special (1, dst);
|
|
m68k_incpci (0);
|
|
Exception (5);
|
|
goto l_201283;
|
|
}
|
|
CLEAR_CZNV ();
|
|
if (dst == 0x80000000 && src == -1) {
|
|
SET_VFLG (1);
|
|
SET_NFLG (1);
|
|
} else {
|
|
uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src;
|
|
uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src;
|
|
if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) {
|
|
SET_VFLG (1);
|
|
SET_NFLG (1);
|
|
} else {
|
|
if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_NFLG (((uae_s16)(newv)) < 0);
|
|
newv = (newv & 0xffff) | ((uae_u32)rem << 16);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}l_201283: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DIVS.W (xxx).W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_81f8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 61;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
if (src == 0) {
|
|
divbyzero_special (1, dst);
|
|
m68k_incpci (4);
|
|
Exception (5);
|
|
goto l_201284;
|
|
}
|
|
CLEAR_CZNV ();
|
|
if (dst == 0x80000000 && src == -1) {
|
|
SET_VFLG (1);
|
|
SET_NFLG (1);
|
|
} else {
|
|
uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src;
|
|
uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src;
|
|
if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) {
|
|
SET_VFLG (1);
|
|
SET_NFLG (1);
|
|
} else {
|
|
if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_NFLG (((uae_s16)(newv)) < 0);
|
|
newv = (newv & 0xffff) | ((uae_u32)rem << 16);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}
|
|
}
|
|
m68k_incpci (4);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_201284: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DIVS.W (xxx).L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_81f9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 61;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
if (src == 0) {
|
|
divbyzero_special (1, dst);
|
|
m68k_incpci (6);
|
|
Exception (5);
|
|
goto l_201285;
|
|
}
|
|
CLEAR_CZNV ();
|
|
if (dst == 0x80000000 && src == -1) {
|
|
SET_VFLG (1);
|
|
SET_NFLG (1);
|
|
} else {
|
|
uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src;
|
|
uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src;
|
|
if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) {
|
|
SET_VFLG (1);
|
|
SET_NFLG (1);
|
|
} else {
|
|
if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_NFLG (((uae_s16)(newv)) < 0);
|
|
newv = (newv & 0xffff) | ((uae_u32)rem << 16);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}
|
|
}
|
|
m68k_incpci (6);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_201285: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DIVS.W (d16,PC),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_81fa_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 61;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
if (src == 0) {
|
|
divbyzero_special (1, dst);
|
|
m68k_incpci (4);
|
|
Exception (5);
|
|
goto l_201286;
|
|
}
|
|
CLEAR_CZNV ();
|
|
if (dst == 0x80000000 && src == -1) {
|
|
SET_VFLG (1);
|
|
SET_NFLG (1);
|
|
} else {
|
|
uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src;
|
|
uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src;
|
|
if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) {
|
|
SET_VFLG (1);
|
|
SET_NFLG (1);
|
|
} else {
|
|
if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_NFLG (((uae_s16)(newv)) < 0);
|
|
newv = (newv & 0xffff) | ((uae_u32)rem << 16);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}
|
|
}
|
|
m68k_incpci (4);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}l_201286: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DIVS.W (d8,PC,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_81fb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 61;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
if (src == 0) {
|
|
divbyzero_special (1, dst);
|
|
m68k_incpci (0);
|
|
Exception (5);
|
|
goto l_201287;
|
|
}
|
|
CLEAR_CZNV ();
|
|
if (dst == 0x80000000 && src == -1) {
|
|
SET_VFLG (1);
|
|
SET_NFLG (1);
|
|
} else {
|
|
uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src;
|
|
uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src;
|
|
if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) {
|
|
SET_VFLG (1);
|
|
SET_NFLG (1);
|
|
} else {
|
|
if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_NFLG (((uae_s16)(newv)) < 0);
|
|
newv = (newv & 0xffff) | ((uae_u32)rem << 16);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}l_201287: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* DIVS.W #<data>.W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_81fc_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 61;
|
|
CurrentInstrCycles = 146;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
if (src == 0) {
|
|
divbyzero_special (1, dst);
|
|
m68k_incpci (4);
|
|
Exception (5);
|
|
goto l_201288;
|
|
}
|
|
CLEAR_CZNV ();
|
|
if (dst == 0x80000000 && src == -1) {
|
|
SET_VFLG (1);
|
|
SET_NFLG (1);
|
|
} else {
|
|
uae_s32 newv = (uae_s32)dst / (uae_s32)(uae_s16)src;
|
|
uae_u16 rem = (uae_s32)dst % (uae_s32)(uae_s16)src;
|
|
if ((newv & 0xffff8000) != 0 && (newv & 0xffff8000) != 0xffff8000) {
|
|
SET_VFLG (1);
|
|
SET_NFLG (1);
|
|
} else {
|
|
if (((uae_s16)rem < 0) != ((uae_s32)dst < 0)) rem = -rem;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_NFLG (((uae_s16)(newv)) < 0);
|
|
newv = (newv & 0xffff) | ((uae_u32)rem << 16);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}
|
|
}
|
|
m68k_incpci (4);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}l_201288: ;
|
|
return 146 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.B Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9000_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((newv) & 0xff);
|
|
}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.B (An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9010_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((newv) & 0xff);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.B (An)+,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9018_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((newv) & 0xff);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.B -(An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9020_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((newv) & 0xff);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.B (d16,An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9028_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((newv) & 0xff);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.B (d8,An,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9030_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((newv) & 0xff);
|
|
}}}}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.B (xxx).W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9038_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((newv) & 0xff);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.B (xxx).L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9039_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((newv) & 0xff);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.B (d16,PC),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_903a_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((newv) & 0xff);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.B (d8,PC,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_903b_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((newv) & 0xff);
|
|
}}}}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.B #<data>.B,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_903c_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((newv) & 0xff);
|
|
}}}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.W Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9040_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((newv) & 0xffff);
|
|
}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.W An,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9048_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_areg (regs, srcreg);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((newv) & 0xffff);
|
|
}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.W (An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9050_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((newv) & 0xffff);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.W (An)+,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9058_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((newv) & 0xffff);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.W -(An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9060_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((newv) & 0xffff);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.W (d16,An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9068_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((newv) & 0xffff);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.W (d8,An,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9070_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((newv) & 0xffff);
|
|
}}}}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.W (xxx).W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9078_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((newv) & 0xffff);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.W (xxx).L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9079_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((newv) & 0xffff);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.W (d16,PC),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_907a_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((newv) & 0xffff);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.W (d8,PC,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_907b_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((newv) & 0xffff);
|
|
}}}}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.W #<data>.W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_907c_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((newv) & 0xffff);
|
|
}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.L Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9080_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.L An,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9088_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_areg (regs, srcreg);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.L (An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9090_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.L (An)+,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9098_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) += 4;
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.L -(An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_90a0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 12;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 4;
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.L (d16,An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_90a8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.L (d8,An,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_90b0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}}}}}return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.L (xxx).W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_90b8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.L (xxx).L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_90b9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.L (d16,PC),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_90ba_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.L (d8,PC,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_90bb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}}}}}return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.L #<data>.L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_90bc_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBA.W Dn,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_90c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 8;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst - src;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBA.W An,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_90c8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 8;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_areg (regs, srcreg);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst - src;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBA.W (An),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_90d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 8;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst - src;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBA.W (An)+,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_90d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 8;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst - src;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBA.W -(An),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_90e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 8;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst - src;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBA.W (d16,An),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_90e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 8;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst - src;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBA.W (d8,An,Xn),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_90f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 8;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst - src;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBA.W (xxx).W,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_90f8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 8;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst - src;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBA.W (xxx).L,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_90f9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 8;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst - src;
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBA.W (d16,PC),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_90fa_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 8;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst - src;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBA.W (d8,PC,Xn),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_90fb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 8;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst - src;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBA.W #<data>.W,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_90fc_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 8;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst - src;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBX.B Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9100_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 9;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 newv = dst - src - (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s8)(newv)) == 0));
|
|
SET_NFLG (((uae_s8)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((newv) & 0xff);
|
|
}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBX.B -(An),-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9108_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 9;
|
|
CurrentInstrCycles = 14;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
{ uae_u32 newv = dst - src - (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s8)(newv)) == 0));
|
|
SET_NFLG (((uae_s8)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 14 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.B Dn,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9110_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.B Dn,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9118_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.B Dn,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9120_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 10;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.B Dn,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9128_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.B Dn,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9130_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.B Dn,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9138_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.B Dn,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9139_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBX.W Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9140_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 9;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 newv = dst - src - (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s16)(newv)) == 0));
|
|
SET_NFLG (((uae_s16)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((newv) & 0xffff);
|
|
}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBX.W -(An),-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9148_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 9;
|
|
CurrentInstrCycles = 14;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 2;
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
{ uae_u32 newv = dst - src - (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s16)(newv)) == 0));
|
|
SET_NFLG (((uae_s16)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 14 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.W Dn,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9150_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.W Dn,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9158_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
m68k_areg (regs, dstreg) += 2;
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.W Dn,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9160_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 10;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 2;
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.W Dn,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9168_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.W Dn,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9170_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.W Dn,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9178_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.W Dn,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9179_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBX.L Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9180_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 9;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 newv = dst - src - (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s32)(newv)) == 0));
|
|
SET_NFLG (((uae_s32)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBX.L -(An),-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9188_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 9;
|
|
CurrentInstrCycles = 26;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 4;
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 4;
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
{ uae_u32 newv = dst - src - (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgo) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgn) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s32)(newv)) == 0));
|
|
SET_NFLG (((uae_s32)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 26 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.L Dn,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9190_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.L Dn,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_9198_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) += 4;
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.L Dn,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_91a0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 18;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 4;
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 18 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.L Dn,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_91a8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.L Dn,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_91b0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.L Dn,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_91b8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUB.L Dn,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_91b9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 7;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgo) & (flgn ^ flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBA.L Dn,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_91c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 8;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst - src;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBA.L An,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_91c8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 8;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_areg (regs, srcreg);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst - src;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBA.L (An),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_91d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 8;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst - src;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBA.L (An)+,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_91d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 8;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) += 4;
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst - src;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBA.L -(An),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_91e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 8;
|
|
CurrentInstrCycles = 12;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 4;
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst - src;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (2);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBA.L (d16,An),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_91e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 8;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst - src;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBA.L (d8,An,Xn),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_91f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 8;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst - src;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}}}return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBA.L (xxx).W,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_91f8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 8;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst - src;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBA.L (xxx).L,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_91f9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 8;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst - src;
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (6);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBA.L (d16,PC),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_91fa_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 8;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst - src;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBA.L (d8,PC,Xn),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_91fb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 8;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst - src;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}}}return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* SUBA.L #<data>.L,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_91fc_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 8;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst - src;
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.B Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b000_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.B (An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b010_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.B (An)+,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b018_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.B -(An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b020_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.B (d16,An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b028_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.B (d8,An,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b030_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.B (xxx).W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b038_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.B (xxx).L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b039_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.B (d16,PC),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b03a_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.B (d8,PC,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b03b_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.B #<data>.B,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b03c_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.W Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b040_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.W An,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b048_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_areg (regs, srcreg);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.W (An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b050_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.W (An)+,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b058_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.W -(An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b060_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.W (d16,An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b068_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.W (d8,An,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b070_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.W (xxx).W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b078_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.W (xxx).L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b079_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.W (d16,PC),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b07a_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.W (d8,PC,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b07b_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.W #<data>.W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b07c_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.L Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b080_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.L An,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b088_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_areg (regs, srcreg);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.L (An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b090_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.L (An)+,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b098_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) += 4;
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.L -(An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b0a0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 12;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 4;
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
|
|
#ifdef PART_7
|
|
/* CMP.L (d16,An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b0a8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.L (d8,An,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b0b0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}}}}return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.L (xxx).W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b0b8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.L (xxx).L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b0b9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.L (d16,PC),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b0ba_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.L (d8,PC,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b0bb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}}}}return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMP.L #<data>.L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b0bc_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 25;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMPA.W Dn,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b0c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 27;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMPA.W An,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b0c8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 27;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_areg (regs, srcreg);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMPA.W (An),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b0d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 27;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMPA.W (An)+,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b0d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 27;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMPA.W -(An),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b0e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 27;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMPA.W (d16,An),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b0e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 27;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMPA.W (d8,An,Xn),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b0f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 27;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}}}}return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMPA.W (xxx).W,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b0f8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 27;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMPA.W (xxx).L,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b0f9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 27;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMPA.W (d16,PC),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b0fa_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 27;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMPA.W (d8,PC,Xn),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b0fb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 27;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}}}}return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMPA.W #<data>.W,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b0fc_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 27;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.B Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b100_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMPM.B (An)+,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b108_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 26;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
{{uae_u32 newv = ((uae_u8)(dst)) - ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u8)(src)) > ((uae_u8)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}}}}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.B Dn,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b110_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.B Dn,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b118_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.B Dn,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b120_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 10;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.B Dn,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b128_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.B Dn,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b130_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.B Dn,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b138_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.B Dn,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b139_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.W Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b140_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMPM.W (An)+,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b148_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 26;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
m68k_areg (regs, dstreg) += 2;
|
|
{{uae_u32 newv = ((uae_u16)(dst)) - ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u16)(src)) > ((uae_u16)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}}}}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.W Dn,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b150_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.W Dn,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b158_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
m68k_areg (regs, dstreg) += 2;
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.W Dn,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b160_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 10;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 2;
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.W Dn,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b168_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.W Dn,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b170_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dsta, src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.W Dn,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b178_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.W Dn,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b179_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.L Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b180_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMPM.L (An)+,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b188_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 26;
|
|
CurrentInstrCycles = 16;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) += 4;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) += 4;
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}}}}}}} m68k_incpci (2);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.L Dn,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b190_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (2);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.L Dn,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b198_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) += 4;
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (2);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.L Dn,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b1a0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 18;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 4;
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (2);
|
|
return 18 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.L Dn,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b1a8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.L Dn,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b1b0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (dsta, src);
|
|
}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.L Dn,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b1b8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EOR.L Dn,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b1b9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 3;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
src ^= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (6);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMPA.L Dn,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b1c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 27;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMPA.L An,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b1c8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 27;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_areg (regs, srcreg);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMPA.L (An),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b1d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 27;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMPA.L (An)+,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b1d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 27;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) += 4;
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMPA.L -(An),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b1e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 27;
|
|
CurrentInstrCycles = 12;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 4;
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMPA.L (d16,An),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b1e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 27;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMPA.L (d8,An,Xn),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b1f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 27;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}}}}return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMPA.L (xxx).W,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b1f8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 27;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMPA.L (xxx).L,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b1f9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 27;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMPA.L (d16,PC),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b1fa_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 27;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMPA.L (d8,PC,Xn),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b1fb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 27;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}}}}return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* CMPA.L #<data>.L,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_b1fc_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 27;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) - ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs != flgo) && (flgn != flgo));
|
|
SET_CFLG (((uae_u32)(src)) > ((uae_u32)(dst)));
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.B Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c000_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.B (An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c010_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.B (An)+,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c018_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.B -(An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c020_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.B (d16,An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c028_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.B (d8,An,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c030_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.B (xxx).W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c038_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.B (xxx).L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c039_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
}}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.B (d16,PC),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c03a_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.B (d8,PC,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c03b_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.B #<data>.B,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c03c_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((src) & 0xff);
|
|
}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.W Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c040_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.W (An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c050_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.W (An)+,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c058_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.W -(An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c060_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
}}}} m68k_incpci (2);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.W (d16,An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c068_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.W (d8,An,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c070_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.W (xxx).W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c078_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.W (xxx).L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c079_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
}}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.W (d16,PC),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c07a_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.W (d8,PC,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c07b_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.W #<data>.W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c07c_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((src) & 0xffff);
|
|
}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.L Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c080_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.L (An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c090_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.L (An)+,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c098_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) += 4;
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.L -(An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c0a0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 12;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 4;
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
}}}} m68k_incpci (2);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.L (d16,An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c0a8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.L (d8,An,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c0b0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
}}}}}return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.L (xxx).W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c0b8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.L (xxx).L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c0b9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
}}}} m68k_incpci (6);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.L (d16,PC),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c0ba_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.L (d8,PC,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c0bb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
}}}}}return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.L #<data>.L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c0bc_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MULU.W Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c0c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 62;
|
|
CurrentInstrCycles = 58;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_NFLG (((uae_s32)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
m68k_incpci (2);
|
|
}}}}return 58 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MULU.W (An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c0d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 62;
|
|
CurrentInstrCycles = 38;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_NFLG (((uae_s32)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
m68k_incpci (2);
|
|
}}}}}return 38 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MULU.W (An)+,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c0d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 62;
|
|
CurrentInstrCycles = 38;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_NFLG (((uae_s32)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
m68k_incpci (2);
|
|
}}}}}return 38 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MULU.W -(An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c0e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 62;
|
|
CurrentInstrCycles = 40;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_NFLG (((uae_s32)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
m68k_incpci (2);
|
|
}}}}}return 40 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MULU.W (d16,An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c0e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 62;
|
|
CurrentInstrCycles = 38;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_NFLG (((uae_s32)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
m68k_incpci (4);
|
|
}}}}}return 38 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MULU.W (d8,An,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c0f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 62;
|
|
CurrentInstrCycles = 38;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_NFLG (((uae_s32)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}}}return 38 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MULU.W (xxx).W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c0f8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 62;
|
|
CurrentInstrCycles = 38;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_NFLG (((uae_s32)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
m68k_incpci (4);
|
|
}}}}}return 38 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MULU.W (xxx).L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c0f9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 62;
|
|
CurrentInstrCycles = 38;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_NFLG (((uae_s32)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
m68k_incpci (6);
|
|
}}}}}return 38 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MULU.W (d16,PC),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c0fa_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 62;
|
|
CurrentInstrCycles = 38;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_NFLG (((uae_s32)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
m68k_incpci (4);
|
|
}}}}}return 38 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MULU.W (d8,PC,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c0fb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 62;
|
|
CurrentInstrCycles = 38;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_NFLG (((uae_s32)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}}}return 38 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MULU.W #<data>.W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c0fc_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 62;
|
|
CurrentInstrCycles = 62;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 newv = (uae_u32)(uae_u16)dst * (uae_u32)(uae_u16)src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_NFLG (((uae_s32)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
m68k_incpci (4);
|
|
}}}}return 62 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ABCD.B Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c100_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 14;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{ uae_u16 newv_lo = (src & 0xF) + (dst & 0xF) + (GET_XFLG () ? 1 : 0);
|
|
uae_u16 newv_hi = (src & 0xF0) + (dst & 0xF0);
|
|
uae_u16 newv, tmp_newv;
|
|
int cflg;
|
|
newv = tmp_newv = newv_hi + newv_lo; if (newv_lo > 9) { newv += 6; }
|
|
cflg = (newv & 0x3F0) > 0x90;
|
|
if (cflg) newv += 0x60;
|
|
SET_CFLG (cflg);
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s8)(newv)) == 0));
|
|
SET_NFLG (((uae_s8)(newv)) < 0);
|
|
SET_VFLG ((tmp_newv & 0x80) == 0 && (newv & 0x80) != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((newv) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ABCD.B -(An),-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c108_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 14;
|
|
CurrentInstrCycles = 14;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
{ uae_u16 newv_lo = (src & 0xF) + (dst & 0xF) + (GET_XFLG () ? 1 : 0);
|
|
uae_u16 newv_hi = (src & 0xF0) + (dst & 0xF0);
|
|
uae_u16 newv, tmp_newv;
|
|
int cflg;
|
|
newv = tmp_newv = newv_hi + newv_lo; if (newv_lo > 9) { newv += 6; }
|
|
cflg = (newv & 0x3F0) > 0x90;
|
|
if (cflg) newv += 0x60;
|
|
SET_CFLG (cflg);
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s8)(newv)) == 0));
|
|
SET_NFLG (((uae_s8)(newv)) < 0);
|
|
SET_VFLG ((tmp_newv & 0x80) == 0 && (newv & 0x80) != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}} m68k_incpci (2);
|
|
return 14 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.B Dn,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c110_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.B Dn,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c118_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.B Dn,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c120_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 10;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.B Dn,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c128_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.B Dn,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c130_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.B Dn,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c138_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.B Dn,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c139_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s8)(src)) == 0);
|
|
SET_NFLG (((uae_s8)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, src);
|
|
}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EXG.L Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c140_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 35;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (dst);
|
|
m68k_dreg (regs, dstreg) = (src);
|
|
}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EXG.L An,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c148_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 35;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_areg (regs, srcreg);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, srcreg) = (dst);
|
|
m68k_areg (regs, dstreg) = (src);
|
|
}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.W Dn,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c150_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.W Dn,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c158_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
m68k_areg (regs, dstreg) += 2;
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.W Dn,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c160_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 10;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 2;
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.W Dn,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c168_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.W Dn,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c170_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dsta, src);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.W Dn,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c178_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.W Dn,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c179_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(src)) == 0);
|
|
SET_NFLG (((uae_s16)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, src);
|
|
}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* EXG.L Dn,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c188_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 35;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, srcreg) = (dst);
|
|
m68k_areg (regs, dstreg) = (src);
|
|
}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.L Dn,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c190_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (2);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.L Dn,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c198_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) += 4;
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (2);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.L Dn,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c1a0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 18;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 4;
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (2);
|
|
return 18 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.L Dn,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c1a8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.L Dn,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c1b0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (dsta, src);
|
|
}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.L Dn,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c1b8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (4);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* AND.L Dn,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c1b9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 2;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
src &= dst;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(src)) == 0);
|
|
SET_NFLG (((uae_s32)(src)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, src);
|
|
}}}} m68k_incpci (6);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MULS.W Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c1c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 63;
|
|
CurrentInstrCycles = 58;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_NFLG (((uae_s32)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}} m68k_incpci (2);
|
|
return 58 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MULS.W (An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c1d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 63;
|
|
CurrentInstrCycles = 38;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_NFLG (((uae_s32)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (2);
|
|
return 38 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MULS.W (An)+,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c1d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 63;
|
|
CurrentInstrCycles = 38;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_NFLG (((uae_s32)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (2);
|
|
return 38 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MULS.W -(An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c1e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 63;
|
|
CurrentInstrCycles = 40;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_NFLG (((uae_s32)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (2);
|
|
return 40 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MULS.W (d16,An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c1e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 63;
|
|
CurrentInstrCycles = 38;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_NFLG (((uae_s32)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (4);
|
|
return 38 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MULS.W (d8,An,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c1f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 63;
|
|
CurrentInstrCycles = 38;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_NFLG (((uae_s32)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}}}return 38 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MULS.W (xxx).W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c1f8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 63;
|
|
CurrentInstrCycles = 38;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_NFLG (((uae_s32)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (4);
|
|
return 38 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MULS.W (xxx).L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c1f9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 63;
|
|
CurrentInstrCycles = 38;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_NFLG (((uae_s32)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (6);
|
|
return 38 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MULS.W (d16,PC),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c1fa_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 63;
|
|
CurrentInstrCycles = 38;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_NFLG (((uae_s32)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (4);
|
|
return 38 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MULS.W (d8,PC,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c1fb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 63;
|
|
CurrentInstrCycles = 38;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_NFLG (((uae_s32)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}}}return 38 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* MULS.W #<data>.W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_c1fc_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 63;
|
|
CurrentInstrCycles = 62;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 newv = (uae_s32)(uae_s16)dst * (uae_s32)(uae_s16)src;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_NFLG (((uae_s32)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}} m68k_incpci (4);
|
|
return 62 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.B Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d000_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) + ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((newv) & 0xff);
|
|
}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.B (An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d010_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) + ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((newv) & 0xff);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.B (An)+,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d018_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) += areg_byteinc[srcreg];
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) + ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((newv) & 0xff);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.B -(An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d020_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) + ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((newv) & 0xff);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.B (d16,An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d028_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) + ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((newv) & 0xff);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.B (d8,An,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d030_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) + ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((newv) & 0xff);
|
|
}}}}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.B (xxx).W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d038_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) + ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((newv) & 0xff);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.B (xxx).L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d039_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) + ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((newv) & 0xff);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.B (d16,PC),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d03a_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) + ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((newv) & 0xff);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.B (d8,PC,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d03b_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) + ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((newv) & 0xff);
|
|
}}}}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.B #<data>.B,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d03c_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = (uae_u8)get_word_020_prefetch (2);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) + ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((newv) & 0xff);
|
|
}}}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.W Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d040_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((newv) & 0xffff);
|
|
}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.W An,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d048_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_areg (regs, srcreg);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((newv) & 0xffff);
|
|
}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.W (An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d050_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((newv) & 0xffff);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.W (An)+,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d058_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((newv) & 0xffff);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.W -(An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d060_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 6;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((newv) & 0xffff);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 6 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.W (d16,An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d068_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((newv) & 0xffff);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.W (d8,An,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d070_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((newv) & 0xffff);
|
|
}}}}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.W (xxx).W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d078_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((newv) & 0xffff);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.W (xxx).L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d079_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((newv) & 0xffff);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.W (d16,PC),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d07a_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((newv) & 0xffff);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.W (d8,PC,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d07b_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 4;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((newv) & 0xffff);
|
|
}}}}}}}}return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.W #<data>.W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d07c_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((newv) & 0xffff);
|
|
}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.L Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d080_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.L An,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d088_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_areg (regs, srcreg);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.L (An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d090_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.L (An)+,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d098_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) += 4;
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.L -(An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d0a0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 12;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 4;
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.L (d16,An),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d0a8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.L (d8,An,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d0b0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}}}}}return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.L (xxx).W,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d0b8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.L (xxx).L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d0b9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.L (d16,PC),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d0ba_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.L (d8,PC,Xn),Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d0bb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}}}}}return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.L #<data>.L,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d0bc_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDA.W Dn,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d0c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 12;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst + src;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDA.W An,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d0c8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 12;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_areg (regs, srcreg);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst + src;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDA.W (An),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d0d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 12;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst + src;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDA.W (An)+,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d0d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 12;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst + src;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDA.W -(An),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d0e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 12;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst + src;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDA.W (d16,An),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d0e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 12;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst + src;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDA.W (d8,An,Xn),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d0f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 12;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst + src;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDA.W (xxx).W,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d0f8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 12;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst + src;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDA.W (xxx).L,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d0f9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 12;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst + src;
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDA.W (d16,PC),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d0fa_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 12;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst + src;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDA.W (d8,PC,Xn),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d0fb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 12;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s16 src = x_get_word (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst + src;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDA.W #<data>.W,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d0fc_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 12;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = get_word_020_prefetch (2);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst + src;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDX.B Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d100_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 13;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s8 dst = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 newv = dst + src + (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgo) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s8)(newv)) == 0));
|
|
SET_NFLG (((uae_s8)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((newv) & 0xff);
|
|
}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDX.B -(An),-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d108_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 13;
|
|
CurrentInstrCycles = 14;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - areg_byteinc[srcreg];
|
|
{ uae_s8 src = x_get_byte (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
{ uae_u32 newv = dst + src + (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgo) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s8)(newv)) == 0));
|
|
SET_NFLG (((uae_s8)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 14 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.B Dn,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d110_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) + ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.B Dn,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d118_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) += areg_byteinc[dstreg];
|
|
{{uae_u32 newv = ((uae_u8)(dst)) + ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.B Dn,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d120_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 10;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - areg_byteinc[dstreg];
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
{{uae_u32 newv = ((uae_u8)(dst)) + ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.B Dn,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d128_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) + ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.B Dn,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d130_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) + ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.B Dn,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d138_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) + ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.B Dn,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d139_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s8 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
{ uae_s8 dst = x_get_byte (dsta);
|
|
{{uae_u32 newv = ((uae_u8)(dst)) + ((uae_u8)(src));
|
|
{ int flgs = ((uae_s8)(src)) < 0;
|
|
int flgo = ((uae_s8)(dst)) < 0;
|
|
int flgn = ((uae_s8)(newv)) < 0;
|
|
SET_ZFLG (((uae_s8)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u8)(~dst)) < ((uae_u8)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_byte (dsta, newv);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDX.W Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d140_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 13;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 dst = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 newv = dst + src + (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgo) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s16)(newv)) == 0));
|
|
SET_NFLG (((uae_s16)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((newv) & 0xffff);
|
|
}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDX.W -(An),-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d148_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 13;
|
|
CurrentInstrCycles = 14;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 src = x_get_word (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 2;
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
{ uae_u32 newv = dst + src + (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgo) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s16)(newv)) == 0));
|
|
SET_NFLG (((uae_s16)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 14 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.W Dn,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d150_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.W Dn,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d158_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
m68k_areg (regs, dstreg) += 2;
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.W Dn,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d160_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 10;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 2;
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.W Dn,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d168_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.W Dn,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d170_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.W Dn,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d178_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.W Dn,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d179_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
{ uae_s16 dst = x_get_word (dsta);
|
|
{{uae_u32 newv = ((uae_u16)(dst)) + ((uae_u16)(src));
|
|
{ int flgs = ((uae_s16)(src)) < 0;
|
|
int flgo = ((uae_s16)(dst)) < 0;
|
|
int flgn = ((uae_s16)(newv)) < 0;
|
|
SET_ZFLG (((uae_s16)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u16)(~dst)) < ((uae_u16)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dsta, newv);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDX.L Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d180_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 13;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s32 dst = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 newv = dst + src + (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgo) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s32)(newv)) == 0));
|
|
SET_NFLG (((uae_s32)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDX.L -(An),-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d188_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 13;
|
|
CurrentInstrCycles = 26;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 4;
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 4;
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
{ uae_u32 newv = dst + src + (GET_XFLG () ? 1 : 0);
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (flgs ^ ((flgs ^ flgo) & (flgo ^ flgn)));
|
|
COPY_CARRY ();
|
|
SET_ZFLG (GET_ZFLG () & (((uae_s32)(newv)) == 0));
|
|
SET_NFLG (((uae_s32)(newv)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 26 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.L Dn,(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d190_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.L Dn,(An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d198_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) += 4;
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.L Dn,-(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d1a0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 18;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) - 4;
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
m68k_areg (regs, dstreg) = dsta;
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (2);
|
|
return 18 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.L Dn,(d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d1a8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.L Dn,(d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d1b0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (2);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}}}return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.L Dn,(xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d1b8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (4);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADD.L Dn,(xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d1b9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
OpcodeFamily = 11;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (2);
|
|
{ uae_s32 dst = x_get_long (dsta);
|
|
{{uae_u32 newv = ((uae_u32)(dst)) + ((uae_u32)(src));
|
|
{ int flgs = ((uae_s32)(src)) < 0;
|
|
int flgo = ((uae_s32)(dst)) < 0;
|
|
int flgn = ((uae_s32)(newv)) < 0;
|
|
SET_ZFLG (((uae_s32)(newv)) == 0);
|
|
SET_VFLG ((flgs ^ flgn) & (flgo ^ flgn));
|
|
SET_CFLG (((uae_u32)(~dst)) < ((uae_u32)(src)));
|
|
COPY_CARRY ();
|
|
SET_NFLG (flgn != 0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_long (dsta, newv);
|
|
}}}}}}} m68k_incpci (6);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDA.L Dn,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d1c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 12;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_dreg (regs, srcreg);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst + src;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDA.L An,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d1c8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 12;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 src = m68k_areg (regs, srcreg);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst + src;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDA.L (An),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d1d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 12;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst + src;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDA.L (An)+,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d1d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 12;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) += 4;
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst + src;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDA.L -(An),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d1e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 12;
|
|
CurrentInstrCycles = 12;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) - 4;
|
|
{ uae_s32 src = x_get_long (srca);
|
|
m68k_areg (regs, srcreg) = srca;
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst + src;
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (2);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDA.L (d16,An),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d1e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 12;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst + src;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDA.L (d8,An,Xn),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d1f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 12;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ srca = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst + src;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}}}return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDA.L (xxx).W,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d1f8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 12;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst + src;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDA.L (xxx).L,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d1f9_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 12;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = get_long_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst + src;
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (6);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDA.L (d16,PC),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d1fa_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 12;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr srca;
|
|
srca = m68k_getpci () + 2;
|
|
srca += (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst + src;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}} m68k_incpci (4);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDA.L (d8,PC,Xn),An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d1fb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 12;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr tmppc;
|
|
uaecptr srca;
|
|
m68k_incpci (2);
|
|
{ tmppc = m68k_getpci ();
|
|
srca = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_s32 src = x_get_long (srca);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst + src;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}}}}return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ADDA.L #<data>.L,An */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_d1fc_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = (opcode >> 9) & 7;
|
|
OpcodeFamily = 12;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s32 src;
|
|
src = get_long_020_prefetch (2);
|
|
{ uae_s32 dst = m68k_areg (regs, dstreg);
|
|
{ uae_u32 newv = dst + src;
|
|
regs.irc = get_word_020_prefetch (6);
|
|
m68k_areg (regs, dstreg) = (newv);
|
|
}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ASRQ.B #<data>,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e000_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 64;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 cnt = srcreg;
|
|
{ uae_s8 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = (uae_u8)data;
|
|
uae_u32 sign = (0x80 & val) >> 7;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt >= 8) {
|
|
val = 0xff & (uae_u32)-sign;
|
|
SET_CFLG (sign);
|
|
COPY_CARRY ();
|
|
} else {
|
|
val >>= cnt - 1;
|
|
SET_CFLG (val & 1);
|
|
COPY_CARRY ();
|
|
val >>= 1;
|
|
val |= (0xff << (8 - cnt)) & (uae_u32)-sign;
|
|
val &= 0xff;
|
|
}
|
|
SET_ZFLG (((uae_s8)(val)) == 0);
|
|
SET_NFLG (((uae_s8)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((val) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* LSRQ.B #<data>,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e008_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 66;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 cnt = srcreg;
|
|
{ uae_s8 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = (uae_u8)data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt >= 8) {
|
|
SET_CFLG ((cnt == 8) & (val >> 7));
|
|
COPY_CARRY ();
|
|
val = 0;
|
|
} else {
|
|
val >>= cnt - 1;
|
|
SET_CFLG (val & 1);
|
|
COPY_CARRY ();
|
|
val >>= 1;
|
|
}
|
|
SET_ZFLG (((uae_s8)(val)) == 0);
|
|
SET_NFLG (((uae_s8)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((val) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROXRQ.B #<data>,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e010_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 71;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 cnt = srcreg;
|
|
{ uae_s8 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = (uae_u8)data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
{ cnt--;
|
|
{
|
|
uae_u32 carry;
|
|
uae_u32 hival = (val << 1) | GET_XFLG ();
|
|
hival <<= (7 - cnt);
|
|
val >>= cnt;
|
|
carry = val & 1;
|
|
val >>= 1;
|
|
val |= hival;
|
|
SET_XFLG (carry);
|
|
val &= 0xff;
|
|
} }
|
|
SET_CFLG (GET_XFLG ());
|
|
SET_ZFLG (((uae_s8)(val)) == 0);
|
|
SET_NFLG (((uae_s8)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((val) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* RORQ.B #<data>,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e018_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 69;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 cnt = srcreg;
|
|
{ uae_s8 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = (uae_u8)data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
{ uae_u32 hival;
|
|
cnt &= 7;
|
|
hival = val << (8 - cnt);
|
|
val >>= cnt;
|
|
val |= hival;
|
|
val &= 0xff;
|
|
SET_CFLG ((val & 0x80) >> 7);
|
|
}
|
|
SET_ZFLG (((uae_s8)(val)) == 0);
|
|
SET_NFLG (((uae_s8)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((val) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ASR.B Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e020_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 64;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 cnt = m68k_dreg (regs, srcreg);
|
|
{ uae_s8 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = (uae_u8)data;
|
|
uae_u32 sign = (0x80 & val) >> 7;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt >= 8) {
|
|
val = 0xff & (uae_u32)-sign;
|
|
SET_CFLG (sign);
|
|
COPY_CARRY ();
|
|
} else if (cnt > 0) {
|
|
val >>= cnt - 1;
|
|
SET_CFLG (val & 1);
|
|
COPY_CARRY ();
|
|
val >>= 1;
|
|
val |= (0xff << (8 - cnt)) & (uae_u32)-sign;
|
|
val &= 0xff;
|
|
}
|
|
SET_ZFLG (((uae_s8)(val)) == 0);
|
|
SET_NFLG (((uae_s8)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((val) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* LSR.B Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e028_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 66;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 cnt = m68k_dreg (regs, srcreg);
|
|
{ uae_s8 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = (uae_u8)data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt >= 8) {
|
|
SET_CFLG ((cnt == 8) & (val >> 7));
|
|
COPY_CARRY ();
|
|
val = 0;
|
|
} else if (cnt > 0) {
|
|
val >>= cnt - 1;
|
|
SET_CFLG (val & 1);
|
|
COPY_CARRY ();
|
|
val >>= 1;
|
|
}
|
|
SET_ZFLG (((uae_s8)(val)) == 0);
|
|
SET_NFLG (((uae_s8)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((val) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROXR.B Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e030_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 71;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 cnt = m68k_dreg (regs, srcreg);
|
|
{ uae_s8 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = (uae_u8)data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt >= 36) cnt -= 36;
|
|
if (cnt >= 18) cnt -= 18;
|
|
if (cnt >= 9) cnt -= 9;
|
|
if (cnt > 0) {
|
|
cnt--;
|
|
{
|
|
uae_u32 carry;
|
|
uae_u32 hival = (val << 1) | GET_XFLG ();
|
|
hival <<= (7 - cnt);
|
|
val >>= cnt;
|
|
carry = val & 1;
|
|
val >>= 1;
|
|
val |= hival;
|
|
SET_XFLG (carry);
|
|
val &= 0xff;
|
|
} }
|
|
SET_CFLG (GET_XFLG ());
|
|
SET_ZFLG (((uae_s8)(val)) == 0);
|
|
SET_NFLG (((uae_s8)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((val) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROR.B Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e038_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 69;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 cnt = m68k_dreg (regs, srcreg);
|
|
{ uae_s8 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = (uae_u8)data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt > 0) { uae_u32 hival;
|
|
cnt &= 7;
|
|
hival = val << (8 - cnt);
|
|
val >>= cnt;
|
|
val |= hival;
|
|
val &= 0xff;
|
|
SET_CFLG ((val & 0x80) >> 7);
|
|
}
|
|
SET_ZFLG (((uae_s8)(val)) == 0);
|
|
SET_NFLG (((uae_s8)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((val) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ASRQ.W #<data>,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e040_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 64;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 cnt = srcreg;
|
|
{ uae_s16 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = (uae_u16)data;
|
|
uae_u32 sign = (0x8000 & val) >> 15;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt >= 16) {
|
|
val = 0xffff & (uae_u32)-sign;
|
|
SET_CFLG (sign);
|
|
COPY_CARRY ();
|
|
} else {
|
|
val >>= cnt - 1;
|
|
SET_CFLG (val & 1);
|
|
COPY_CARRY ();
|
|
val >>= 1;
|
|
val |= (0xffff << (16 - cnt)) & (uae_u32)-sign;
|
|
val &= 0xffff;
|
|
}
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((val) & 0xffff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
|
|
#ifdef PART_8
|
|
/* LSRQ.W #<data>,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e048_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 66;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 cnt = srcreg;
|
|
{ uae_s16 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = (uae_u16)data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt >= 16) {
|
|
SET_CFLG ((cnt == 16) & (val >> 15));
|
|
COPY_CARRY ();
|
|
val = 0;
|
|
} else {
|
|
val >>= cnt - 1;
|
|
SET_CFLG (val & 1);
|
|
COPY_CARRY ();
|
|
val >>= 1;
|
|
}
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((val) & 0xffff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROXRQ.W #<data>,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e050_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 71;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 cnt = srcreg;
|
|
{ uae_s16 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = (uae_u16)data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
{ cnt--;
|
|
{
|
|
uae_u32 carry;
|
|
uae_u32 hival = (val << 1) | GET_XFLG ();
|
|
hival <<= (15 - cnt);
|
|
val >>= cnt;
|
|
carry = val & 1;
|
|
val >>= 1;
|
|
val |= hival;
|
|
SET_XFLG (carry);
|
|
val &= 0xffff;
|
|
} }
|
|
SET_CFLG (GET_XFLG ());
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((val) & 0xffff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* RORQ.W #<data>,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e058_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 69;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 cnt = srcreg;
|
|
{ uae_s16 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = (uae_u16)data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
{ uae_u32 hival;
|
|
cnt &= 15;
|
|
hival = val << (16 - cnt);
|
|
val >>= cnt;
|
|
val |= hival;
|
|
val &= 0xffff;
|
|
SET_CFLG ((val & 0x8000) >> 15);
|
|
}
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((val) & 0xffff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ASR.W Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e060_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 64;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 cnt = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = (uae_u16)data;
|
|
uae_u32 sign = (0x8000 & val) >> 15;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt >= 16) {
|
|
val = 0xffff & (uae_u32)-sign;
|
|
SET_CFLG (sign);
|
|
COPY_CARRY ();
|
|
} else if (cnt > 0) {
|
|
val >>= cnt - 1;
|
|
SET_CFLG (val & 1);
|
|
COPY_CARRY ();
|
|
val >>= 1;
|
|
val |= (0xffff << (16 - cnt)) & (uae_u32)-sign;
|
|
val &= 0xffff;
|
|
}
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((val) & 0xffff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* LSR.W Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e068_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 66;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 cnt = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = (uae_u16)data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt >= 16) {
|
|
SET_CFLG ((cnt == 16) & (val >> 15));
|
|
COPY_CARRY ();
|
|
val = 0;
|
|
} else if (cnt > 0) {
|
|
val >>= cnt - 1;
|
|
SET_CFLG (val & 1);
|
|
COPY_CARRY ();
|
|
val >>= 1;
|
|
}
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((val) & 0xffff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROXR.W Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e070_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 71;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 cnt = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = (uae_u16)data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt >= 34) cnt -= 34;
|
|
if (cnt >= 17) cnt -= 17;
|
|
if (cnt > 0) {
|
|
cnt--;
|
|
{
|
|
uae_u32 carry;
|
|
uae_u32 hival = (val << 1) | GET_XFLG ();
|
|
hival <<= (15 - cnt);
|
|
val >>= cnt;
|
|
carry = val & 1;
|
|
val >>= 1;
|
|
val |= hival;
|
|
SET_XFLG (carry);
|
|
val &= 0xffff;
|
|
} }
|
|
SET_CFLG (GET_XFLG ());
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((val) & 0xffff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROR.W Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e078_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 69;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 cnt = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = (uae_u16)data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt > 0) { uae_u32 hival;
|
|
cnt &= 15;
|
|
hival = val << (16 - cnt);
|
|
val >>= cnt;
|
|
val |= hival;
|
|
val &= 0xffff;
|
|
SET_CFLG ((val & 0x8000) >> 15);
|
|
}
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((val) & 0xffff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ASRQ.L #<data>,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e080_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 64;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 cnt = srcreg;
|
|
{ uae_s32 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = data;
|
|
uae_u32 sign = (0x80000000 & val) >> 31;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt >= 32) {
|
|
val = 0xffffffff & (uae_u32)-sign;
|
|
SET_CFLG (sign);
|
|
COPY_CARRY ();
|
|
} else {
|
|
val >>= cnt - 1;
|
|
SET_CFLG (val & 1);
|
|
COPY_CARRY ();
|
|
val >>= 1;
|
|
val |= (0xffffffff << (32 - cnt)) & (uae_u32)-sign;
|
|
val &= 0xffffffff;
|
|
}
|
|
SET_ZFLG (((uae_s32)(val)) == 0);
|
|
SET_NFLG (((uae_s32)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* LSRQ.L #<data>,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e088_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 66;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 cnt = srcreg;
|
|
{ uae_s32 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt >= 32) {
|
|
SET_CFLG ((cnt == 32) & (val >> 31));
|
|
COPY_CARRY ();
|
|
val = 0;
|
|
} else {
|
|
val >>= cnt - 1;
|
|
SET_CFLG (val & 1);
|
|
COPY_CARRY ();
|
|
val >>= 1;
|
|
}
|
|
SET_ZFLG (((uae_s32)(val)) == 0);
|
|
SET_NFLG (((uae_s32)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROXRQ.L #<data>,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e090_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 71;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 cnt = srcreg;
|
|
{ uae_s32 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
{ cnt--;
|
|
{
|
|
uae_u32 carry;
|
|
uae_u32 hival = (val << 1) | GET_XFLG ();
|
|
hival <<= (31 - cnt);
|
|
val >>= cnt;
|
|
carry = val & 1;
|
|
val >>= 1;
|
|
val |= hival;
|
|
SET_XFLG (carry);
|
|
val &= 0xffffffff;
|
|
} }
|
|
SET_CFLG (GET_XFLG ());
|
|
SET_ZFLG (((uae_s32)(val)) == 0);
|
|
SET_NFLG (((uae_s32)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* RORQ.L #<data>,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e098_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 69;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 cnt = srcreg;
|
|
{ uae_s32 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
{ uae_u32 hival;
|
|
cnt &= 31;
|
|
hival = val << (32 - cnt);
|
|
val >>= cnt;
|
|
val |= hival;
|
|
val &= 0xffffffff;
|
|
SET_CFLG ((val & 0x80000000) >> 31);
|
|
}
|
|
SET_ZFLG (((uae_s32)(val)) == 0);
|
|
SET_NFLG (((uae_s32)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ASR.L Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e0a0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 64;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 cnt = m68k_dreg (regs, srcreg);
|
|
{ uae_s32 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = data;
|
|
uae_u32 sign = (0x80000000 & val) >> 31;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt >= 32) {
|
|
val = 0xffffffff & (uae_u32)-sign;
|
|
SET_CFLG (sign);
|
|
COPY_CARRY ();
|
|
} else if (cnt > 0) {
|
|
val >>= cnt - 1;
|
|
SET_CFLG (val & 1);
|
|
COPY_CARRY ();
|
|
val >>= 1;
|
|
val |= (0xffffffff << (32 - cnt)) & (uae_u32)-sign;
|
|
val &= 0xffffffff;
|
|
}
|
|
SET_ZFLG (((uae_s32)(val)) == 0);
|
|
SET_NFLG (((uae_s32)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* LSR.L Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e0a8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 66;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 cnt = m68k_dreg (regs, srcreg);
|
|
{ uae_s32 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt >= 32) {
|
|
SET_CFLG ((cnt == 32) & (val >> 31));
|
|
COPY_CARRY ();
|
|
val = 0;
|
|
} else if (cnt > 0) {
|
|
val >>= cnt - 1;
|
|
SET_CFLG (val & 1);
|
|
COPY_CARRY ();
|
|
val >>= 1;
|
|
}
|
|
SET_ZFLG (((uae_s32)(val)) == 0);
|
|
SET_NFLG (((uae_s32)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROXR.L Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e0b0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 71;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 cnt = m68k_dreg (regs, srcreg);
|
|
{ uae_s32 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt >= 33) cnt -= 33;
|
|
if (cnt > 0) {
|
|
cnt--;
|
|
{
|
|
uae_u32 carry;
|
|
uae_u32 hival = (val << 1) | GET_XFLG ();
|
|
hival <<= (31 - cnt);
|
|
val >>= cnt;
|
|
carry = val & 1;
|
|
val >>= 1;
|
|
val |= hival;
|
|
SET_XFLG (carry);
|
|
val &= 0xffffffff;
|
|
} }
|
|
SET_CFLG (GET_XFLG ());
|
|
SET_ZFLG (((uae_s32)(val)) == 0);
|
|
SET_NFLG (((uae_s32)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROR.L Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e0b8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 69;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 cnt = m68k_dreg (regs, srcreg);
|
|
{ uae_s32 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt > 0) { uae_u32 hival;
|
|
cnt &= 31;
|
|
hival = val << (32 - cnt);
|
|
val >>= cnt;
|
|
val |= hival;
|
|
val &= 0xffffffff;
|
|
SET_CFLG ((val & 0x80000000) >> 31);
|
|
}
|
|
SET_ZFLG (((uae_s32)(val)) == 0);
|
|
SET_NFLG (((uae_s32)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ASRW.W (An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e0d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 72;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = m68k_areg (regs, srcreg);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u32 val = (uae_u16)data;
|
|
uae_u32 sign = 0x8000 & val;
|
|
uae_u32 cflg = val & 1;
|
|
val = (val >> 1) | sign;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (cflg);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ASRW.W (An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e0d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 72;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = m68k_areg (regs, srcreg);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
{ uae_u32 val = (uae_u16)data;
|
|
uae_u32 sign = 0x8000 & val;
|
|
uae_u32 cflg = val & 1;
|
|
val = (val >> 1) | sign;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (cflg);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ASRW.W -(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e0e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 72;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr dataa;
|
|
dataa = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
m68k_areg (regs, srcreg) = dataa;
|
|
{ uae_u32 val = (uae_u16)data;
|
|
uae_u32 sign = 0x8000 & val;
|
|
uae_u32 cflg = val & 1;
|
|
val = (val >> 1) | sign;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (cflg);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ASRW.W (d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e0e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 72;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u32 val = (uae_u16)data;
|
|
uae_u32 sign = 0x8000 & val;
|
|
uae_u32 cflg = val & 1;
|
|
val = (val >> 1) | sign;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (cflg);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ASRW.W (d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e0f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 72;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
m68k_incpci (2);
|
|
{ dataa = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u32 val = (uae_u16)data;
|
|
uae_u32 sign = 0x8000 & val;
|
|
uae_u32 cflg = val & 1;
|
|
val = (val >> 1) | sign;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (cflg);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dataa, val);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ASRW.W (xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e0f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 72;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u32 val = (uae_u16)data;
|
|
uae_u32 sign = 0x8000 & val;
|
|
uae_u32 cflg = val & 1;
|
|
val = (val >> 1) | sign;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (cflg);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ASRW.W (xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e0f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 72;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = get_long_020_prefetch (2);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u32 val = (uae_u16)data;
|
|
uae_u32 sign = 0x8000 & val;
|
|
uae_u32 cflg = val & 1;
|
|
val = (val >> 1) | sign;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (cflg);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ASLQ.B #<data>,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e100_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 65;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 cnt = srcreg;
|
|
{ uae_s8 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = (uae_u8)data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt >= 8) {
|
|
SET_VFLG (val != 0);
|
|
SET_CFLG (cnt == 8 ? val & 1 : 0);
|
|
COPY_CARRY ();
|
|
val = 0;
|
|
} else {
|
|
uae_u32 mask = (0xff << (7 - cnt)) & 0xff;
|
|
SET_VFLG ((val & mask) != mask && (val & mask) != 0);
|
|
val <<= cnt - 1;
|
|
SET_CFLG ((val & 0x80) >> 7);
|
|
COPY_CARRY ();
|
|
val <<= 1;
|
|
val &= 0xff;
|
|
}
|
|
SET_ZFLG (((uae_s8)(val)) == 0);
|
|
SET_NFLG (((uae_s8)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((val) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* LSLQ.B #<data>,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e108_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 67;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 cnt = srcreg;
|
|
{ uae_s8 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = (uae_u8)data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt >= 8) {
|
|
SET_CFLG (cnt == 8 ? val & 1 : 0);
|
|
COPY_CARRY ();
|
|
val = 0;
|
|
} else {
|
|
val <<= (cnt - 1);
|
|
SET_CFLG ((val & 0x80) >> 7);
|
|
COPY_CARRY ();
|
|
val <<= 1;
|
|
val &= 0xff;
|
|
}
|
|
SET_ZFLG (((uae_s8)(val)) == 0);
|
|
SET_NFLG (((uae_s8)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((val) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROXLQ.B #<data>,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e110_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 70;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 cnt = srcreg;
|
|
{ uae_s8 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = (uae_u8)data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
{ cnt--;
|
|
{
|
|
uae_u32 carry;
|
|
uae_u32 loval = val >> (7 - cnt);
|
|
carry = loval & 1;
|
|
val = (((val << 1) | GET_XFLG ()) << cnt) | (loval >> 1);
|
|
SET_XFLG (carry);
|
|
val &= 0xff;
|
|
} }
|
|
SET_CFLG (GET_XFLG ());
|
|
SET_ZFLG (((uae_s8)(val)) == 0);
|
|
SET_NFLG (((uae_s8)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((val) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROLQ.B #<data>,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e118_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 68;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 cnt = srcreg;
|
|
{ uae_s8 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = (uae_u8)data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
{ uae_u32 loval;
|
|
cnt &= 7;
|
|
loval = val >> (8 - cnt);
|
|
val <<= cnt;
|
|
val |= loval;
|
|
val &= 0xff;
|
|
SET_CFLG (val & 1);
|
|
}
|
|
SET_ZFLG (((uae_s8)(val)) == 0);
|
|
SET_NFLG (((uae_s8)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((val) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ASL.B Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e120_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 65;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 cnt = m68k_dreg (regs, srcreg);
|
|
{ uae_s8 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = (uae_u8)data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt >= 8) {
|
|
SET_VFLG (val != 0);
|
|
SET_CFLG (cnt == 8 ? val & 1 : 0);
|
|
COPY_CARRY ();
|
|
val = 0;
|
|
} else if (cnt > 0) {
|
|
uae_u32 mask = (0xff << (7 - cnt)) & 0xff;
|
|
SET_VFLG ((val & mask) != mask && (val & mask) != 0);
|
|
val <<= cnt - 1;
|
|
SET_CFLG ((val & 0x80) >> 7);
|
|
COPY_CARRY ();
|
|
val <<= 1;
|
|
val &= 0xff;
|
|
}
|
|
SET_ZFLG (((uae_s8)(val)) == 0);
|
|
SET_NFLG (((uae_s8)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((val) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* LSL.B Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e128_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 67;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 cnt = m68k_dreg (regs, srcreg);
|
|
{ uae_s8 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = (uae_u8)data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt >= 8) {
|
|
SET_CFLG (cnt == 8 ? val & 1 : 0);
|
|
COPY_CARRY ();
|
|
val = 0;
|
|
} else if (cnt > 0) {
|
|
val <<= (cnt - 1);
|
|
SET_CFLG ((val & 0x80) >> 7);
|
|
COPY_CARRY ();
|
|
val <<= 1;
|
|
val &= 0xff;
|
|
}
|
|
SET_ZFLG (((uae_s8)(val)) == 0);
|
|
SET_NFLG (((uae_s8)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((val) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROXL.B Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e130_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 70;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 cnt = m68k_dreg (regs, srcreg);
|
|
{ uae_s8 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = (uae_u8)data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt >= 36) cnt -= 36;
|
|
if (cnt >= 18) cnt -= 18;
|
|
if (cnt >= 9) cnt -= 9;
|
|
if (cnt > 0) {
|
|
cnt--;
|
|
{
|
|
uae_u32 carry;
|
|
uae_u32 loval = val >> (7 - cnt);
|
|
carry = loval & 1;
|
|
val = (((val << 1) | GET_XFLG ()) << cnt) | (loval >> 1);
|
|
SET_XFLG (carry);
|
|
val &= 0xff;
|
|
} }
|
|
SET_CFLG (GET_XFLG ());
|
|
SET_ZFLG (((uae_s8)(val)) == 0);
|
|
SET_NFLG (((uae_s8)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((val) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROL.B Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e138_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 68;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s8 cnt = m68k_dreg (regs, srcreg);
|
|
{ uae_s8 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = (uae_u8)data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt > 0) {
|
|
uae_u32 loval;
|
|
cnt &= 7;
|
|
loval = val >> (8 - cnt);
|
|
val <<= cnt;
|
|
val |= loval;
|
|
val &= 0xff;
|
|
SET_CFLG (val & 1);
|
|
}
|
|
SET_ZFLG (((uae_s8)(val)) == 0);
|
|
SET_NFLG (((uae_s8)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xff) | ((val) & 0xff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ASLQ.W #<data>,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e140_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 65;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 cnt = srcreg;
|
|
{ uae_s16 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = (uae_u16)data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt >= 16) {
|
|
SET_VFLG (val != 0);
|
|
SET_CFLG (cnt == 16 ? val & 1 : 0);
|
|
COPY_CARRY ();
|
|
val = 0;
|
|
} else {
|
|
uae_u32 mask = (0xffff << (15 - cnt)) & 0xffff;
|
|
SET_VFLG ((val & mask) != mask && (val & mask) != 0);
|
|
val <<= cnt - 1;
|
|
SET_CFLG ((val & 0x8000) >> 15);
|
|
COPY_CARRY ();
|
|
val <<= 1;
|
|
val &= 0xffff;
|
|
}
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((val) & 0xffff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* LSLQ.W #<data>,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e148_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 67;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 cnt = srcreg;
|
|
{ uae_s16 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = (uae_u16)data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt >= 16) {
|
|
SET_CFLG (cnt == 16 ? val & 1 : 0);
|
|
COPY_CARRY ();
|
|
val = 0;
|
|
} else {
|
|
val <<= (cnt - 1);
|
|
SET_CFLG ((val & 0x8000) >> 15);
|
|
COPY_CARRY ();
|
|
val <<= 1;
|
|
val &= 0xffff;
|
|
}
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((val) & 0xffff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROXLQ.W #<data>,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e150_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 70;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 cnt = srcreg;
|
|
{ uae_s16 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = (uae_u16)data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
{ cnt--;
|
|
{
|
|
uae_u32 carry;
|
|
uae_u32 loval = val >> (15 - cnt);
|
|
carry = loval & 1;
|
|
val = (((val << 1) | GET_XFLG ()) << cnt) | (loval >> 1);
|
|
SET_XFLG (carry);
|
|
val &= 0xffff;
|
|
} }
|
|
SET_CFLG (GET_XFLG ());
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((val) & 0xffff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROLQ.W #<data>,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e158_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 68;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 cnt = srcreg;
|
|
{ uae_s16 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = (uae_u16)data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
{ uae_u32 loval;
|
|
cnt &= 15;
|
|
loval = val >> (16 - cnt);
|
|
val <<= cnt;
|
|
val |= loval;
|
|
val &= 0xffff;
|
|
SET_CFLG (val & 1);
|
|
}
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((val) & 0xffff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ASL.W Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e160_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 65;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 cnt = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = (uae_u16)data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt >= 16) {
|
|
SET_VFLG (val != 0);
|
|
SET_CFLG (cnt == 16 ? val & 1 : 0);
|
|
COPY_CARRY ();
|
|
val = 0;
|
|
} else if (cnt > 0) {
|
|
uae_u32 mask = (0xffff << (15 - cnt)) & 0xffff;
|
|
SET_VFLG ((val & mask) != mask && (val & mask) != 0);
|
|
val <<= cnt - 1;
|
|
SET_CFLG ((val & 0x8000) >> 15);
|
|
COPY_CARRY ();
|
|
val <<= 1;
|
|
val &= 0xffff;
|
|
}
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((val) & 0xffff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* LSL.W Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e168_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 67;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 cnt = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = (uae_u16)data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt >= 16) {
|
|
SET_CFLG (cnt == 16 ? val & 1 : 0);
|
|
COPY_CARRY ();
|
|
val = 0;
|
|
} else if (cnt > 0) {
|
|
val <<= (cnt - 1);
|
|
SET_CFLG ((val & 0x8000) >> 15);
|
|
COPY_CARRY ();
|
|
val <<= 1;
|
|
val &= 0xffff;
|
|
}
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((val) & 0xffff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROXL.W Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e170_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 70;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 cnt = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = (uae_u16)data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt >= 34) cnt -= 34;
|
|
if (cnt >= 17) cnt -= 17;
|
|
if (cnt > 0) {
|
|
cnt--;
|
|
{
|
|
uae_u32 carry;
|
|
uae_u32 loval = val >> (15 - cnt);
|
|
carry = loval & 1;
|
|
val = (((val << 1) | GET_XFLG ()) << cnt) | (loval >> 1);
|
|
SET_XFLG (carry);
|
|
val &= 0xffff;
|
|
} }
|
|
SET_CFLG (GET_XFLG ());
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((val) & 0xffff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROL.W Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e178_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 68;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s16 cnt = m68k_dreg (regs, srcreg);
|
|
{ uae_s16 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = (uae_u16)data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt > 0) {
|
|
uae_u32 loval;
|
|
cnt &= 15;
|
|
loval = val >> (16 - cnt);
|
|
val <<= cnt;
|
|
val |= loval;
|
|
val &= 0xffff;
|
|
SET_CFLG (val & 1);
|
|
}
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (m68k_dreg (regs, dstreg) & ~0xffff) | ((val) & 0xffff);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ASLQ.L #<data>,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e180_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 65;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 cnt = srcreg;
|
|
{ uae_s32 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt >= 32) {
|
|
SET_VFLG (val != 0);
|
|
SET_CFLG (cnt == 32 ? val & 1 : 0);
|
|
COPY_CARRY ();
|
|
val = 0;
|
|
} else {
|
|
uae_u32 mask = (0xffffffff << (31 - cnt)) & 0xffffffff;
|
|
SET_VFLG ((val & mask) != mask && (val & mask) != 0);
|
|
val <<= cnt - 1;
|
|
SET_CFLG ((val & 0x80000000) >> 31);
|
|
COPY_CARRY ();
|
|
val <<= 1;
|
|
val &= 0xffffffff;
|
|
}
|
|
SET_ZFLG (((uae_s32)(val)) == 0);
|
|
SET_NFLG (((uae_s32)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* LSLQ.L #<data>,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e188_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 67;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 cnt = srcreg;
|
|
{ uae_s32 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt >= 32) {
|
|
SET_CFLG (cnt == 32 ? val & 1 : 0);
|
|
COPY_CARRY ();
|
|
val = 0;
|
|
} else {
|
|
val <<= (cnt - 1);
|
|
SET_CFLG ((val & 0x80000000) >> 31);
|
|
COPY_CARRY ();
|
|
val <<= 1;
|
|
val &= 0xffffffff;
|
|
}
|
|
SET_ZFLG (((uae_s32)(val)) == 0);
|
|
SET_NFLG (((uae_s32)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROXLQ.L #<data>,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e190_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 70;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 cnt = srcreg;
|
|
{ uae_s32 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
{ cnt--;
|
|
{
|
|
uae_u32 carry;
|
|
uae_u32 loval = val >> (31 - cnt);
|
|
carry = loval & 1;
|
|
val = (((val << 1) | GET_XFLG ()) << cnt) | (loval >> 1);
|
|
SET_XFLG (carry);
|
|
val &= 0xffffffff;
|
|
} }
|
|
SET_CFLG (GET_XFLG ());
|
|
SET_ZFLG (((uae_s32)(val)) == 0);
|
|
SET_NFLG (((uae_s32)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROLQ.L #<data>,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e198_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = imm8_table[((opcode >> 9) & 7)];
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 68;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_u32 cnt = srcreg;
|
|
{ uae_s32 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
{ uae_u32 loval;
|
|
cnt &= 31;
|
|
loval = val >> (32 - cnt);
|
|
val <<= cnt;
|
|
val |= loval;
|
|
val &= 0xffffffff;
|
|
SET_CFLG (val & 1);
|
|
}
|
|
SET_ZFLG (((uae_s32)(val)) == 0);
|
|
SET_NFLG (((uae_s32)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ASL.L Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e1a0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 65;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 cnt = m68k_dreg (regs, srcreg);
|
|
{ uae_s32 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt >= 32) {
|
|
SET_VFLG (val != 0);
|
|
SET_CFLG (cnt == 32 ? val & 1 : 0);
|
|
COPY_CARRY ();
|
|
val = 0;
|
|
} else if (cnt > 0) {
|
|
uae_u32 mask = (0xffffffff << (31 - cnt)) & 0xffffffff;
|
|
SET_VFLG ((val & mask) != mask && (val & mask) != 0);
|
|
val <<= cnt - 1;
|
|
SET_CFLG ((val & 0x80000000) >> 31);
|
|
COPY_CARRY ();
|
|
val <<= 1;
|
|
val &= 0xffffffff;
|
|
}
|
|
SET_ZFLG (((uae_s32)(val)) == 0);
|
|
SET_NFLG (((uae_s32)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* LSL.L Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e1a8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 67;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 cnt = m68k_dreg (regs, srcreg);
|
|
{ uae_s32 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt >= 32) {
|
|
SET_CFLG (cnt == 32 ? val & 1 : 0);
|
|
COPY_CARRY ();
|
|
val = 0;
|
|
} else if (cnt > 0) {
|
|
val <<= (cnt - 1);
|
|
SET_CFLG ((val & 0x80000000) >> 31);
|
|
COPY_CARRY ();
|
|
val <<= 1;
|
|
val &= 0xffffffff;
|
|
}
|
|
SET_ZFLG (((uae_s32)(val)) == 0);
|
|
SET_NFLG (((uae_s32)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROXL.L Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e1b0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 70;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 cnt = m68k_dreg (regs, srcreg);
|
|
{ uae_s32 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt >= 33) cnt -= 33;
|
|
if (cnt > 0) {
|
|
cnt--;
|
|
{
|
|
uae_u32 carry;
|
|
uae_u32 loval = val >> (31 - cnt);
|
|
carry = loval & 1;
|
|
val = (((val << 1) | GET_XFLG ()) << cnt) | (loval >> 1);
|
|
SET_XFLG (carry);
|
|
val &= 0xffffffff;
|
|
} }
|
|
SET_CFLG (GET_XFLG ());
|
|
SET_ZFLG (((uae_s32)(val)) == 0);
|
|
SET_NFLG (((uae_s32)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROL.L Dn,Dn */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e1b8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = ((opcode >> 9) & 7);
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 68;
|
|
CurrentInstrCycles = 4;
|
|
{{ uae_s32 cnt = m68k_dreg (regs, srcreg);
|
|
{ uae_s32 data = m68k_dreg (regs, dstreg);
|
|
{ uae_u32 val = data;
|
|
int ccnt = cnt & 63;
|
|
cnt &= 63;
|
|
CLEAR_CZNV ();
|
|
if (cnt > 0) {
|
|
uae_u32 loval;
|
|
cnt &= 31;
|
|
loval = val >> (32 - cnt);
|
|
val <<= cnt;
|
|
val |= loval;
|
|
val &= 0xffffffff;
|
|
SET_CFLG (val & 1);
|
|
}
|
|
SET_ZFLG (((uae_s32)(val)) == 0);
|
|
SET_NFLG (((uae_s32)(val)) < 0);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
m68k_dreg (regs, dstreg) = (val);
|
|
}}}} m68k_incpci (2);
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ASLW.W (An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e1d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 73;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = m68k_areg (regs, srcreg);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u32 val = (uae_u16)data;
|
|
uae_u32 sign = 0x8000 & val;
|
|
uae_u32 sign2;
|
|
val <<= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
sign2 = 0x8000 & val;
|
|
SET_CFLG (sign != 0);
|
|
COPY_CARRY ();
|
|
SET_VFLG (GET_VFLG () | (sign2 != sign));
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ASLW.W (An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e1d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 73;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = m68k_areg (regs, srcreg);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
{ uae_u32 val = (uae_u16)data;
|
|
uae_u32 sign = 0x8000 & val;
|
|
uae_u32 sign2;
|
|
val <<= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
sign2 = 0x8000 & val;
|
|
SET_CFLG (sign != 0);
|
|
COPY_CARRY ();
|
|
SET_VFLG (GET_VFLG () | (sign2 != sign));
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ASLW.W -(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e1e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 73;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr dataa;
|
|
dataa = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
m68k_areg (regs, srcreg) = dataa;
|
|
{ uae_u32 val = (uae_u16)data;
|
|
uae_u32 sign = 0x8000 & val;
|
|
uae_u32 sign2;
|
|
val <<= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
sign2 = 0x8000 & val;
|
|
SET_CFLG (sign != 0);
|
|
COPY_CARRY ();
|
|
SET_VFLG (GET_VFLG () | (sign2 != sign));
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ASLW.W (d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e1e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 73;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u32 val = (uae_u16)data;
|
|
uae_u32 sign = 0x8000 & val;
|
|
uae_u32 sign2;
|
|
val <<= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
sign2 = 0x8000 & val;
|
|
SET_CFLG (sign != 0);
|
|
COPY_CARRY ();
|
|
SET_VFLG (GET_VFLG () | (sign2 != sign));
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ASLW.W (d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e1f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 73;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
m68k_incpci (2);
|
|
{ dataa = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u32 val = (uae_u16)data;
|
|
uae_u32 sign = 0x8000 & val;
|
|
uae_u32 sign2;
|
|
val <<= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
sign2 = 0x8000 & val;
|
|
SET_CFLG (sign != 0);
|
|
COPY_CARRY ();
|
|
SET_VFLG (GET_VFLG () | (sign2 != sign));
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dataa, val);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ASLW.W (xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e1f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 73;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u32 val = (uae_u16)data;
|
|
uae_u32 sign = 0x8000 & val;
|
|
uae_u32 sign2;
|
|
val <<= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
sign2 = 0x8000 & val;
|
|
SET_CFLG (sign != 0);
|
|
COPY_CARRY ();
|
|
SET_VFLG (GET_VFLG () | (sign2 != sign));
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ASLW.W (xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e1f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 73;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = get_long_020_prefetch (2);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u32 val = (uae_u16)data;
|
|
uae_u32 sign = 0x8000 & val;
|
|
uae_u32 sign2;
|
|
val <<= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
sign2 = 0x8000 & val;
|
|
SET_CFLG (sign != 0);
|
|
COPY_CARRY ();
|
|
SET_VFLG (GET_VFLG () | (sign2 != sign));
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* LSRW.W (An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e2d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 74;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = m68k_areg (regs, srcreg);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u32 val = (uae_u16)data;
|
|
uae_u32 carry = val & 1;
|
|
val >>= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* LSRW.W (An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e2d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 74;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = m68k_areg (regs, srcreg);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
{ uae_u32 val = (uae_u16)data;
|
|
uae_u32 carry = val & 1;
|
|
val >>= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* LSRW.W -(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e2e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 74;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr dataa;
|
|
dataa = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
m68k_areg (regs, srcreg) = dataa;
|
|
{ uae_u32 val = (uae_u16)data;
|
|
uae_u32 carry = val & 1;
|
|
val >>= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* LSRW.W (d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e2e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 74;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u32 val = (uae_u16)data;
|
|
uae_u32 carry = val & 1;
|
|
val >>= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* LSRW.W (d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e2f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 74;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
m68k_incpci (2);
|
|
{ dataa = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u32 val = (uae_u16)data;
|
|
uae_u32 carry = val & 1;
|
|
val >>= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dataa, val);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* LSRW.W (xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e2f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 74;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u32 val = (uae_u16)data;
|
|
uae_u32 carry = val & 1;
|
|
val >>= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* LSRW.W (xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e2f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 74;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = get_long_020_prefetch (2);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u32 val = (uae_u16)data;
|
|
uae_u32 carry = val & 1;
|
|
val >>= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* LSLW.W (An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e3d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 75;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = m68k_areg (regs, srcreg);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 0x8000;
|
|
val <<= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry >> 15);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* LSLW.W (An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e3d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 75;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = m68k_areg (regs, srcreg);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 0x8000;
|
|
val <<= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry >> 15);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* LSLW.W -(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e3e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 75;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr dataa;
|
|
dataa = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
m68k_areg (regs, srcreg) = dataa;
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 0x8000;
|
|
val <<= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry >> 15);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* LSLW.W (d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e3e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 75;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 0x8000;
|
|
val <<= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry >> 15);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* LSLW.W (d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e3f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 75;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
m68k_incpci (2);
|
|
{ dataa = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 0x8000;
|
|
val <<= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry >> 15);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dataa, val);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* LSLW.W (xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e3f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 75;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 0x8000;
|
|
val <<= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry >> 15);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* LSLW.W (xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e3f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 75;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = get_long_020_prefetch (2);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 0x8000;
|
|
val <<= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry >> 15);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROXRW.W (An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e4d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 79;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = m68k_areg (regs, srcreg);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 1;
|
|
val >>= 1;
|
|
if (GET_XFLG ()) val |= 0x8000;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROXRW.W (An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e4d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 79;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = m68k_areg (regs, srcreg);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 1;
|
|
val >>= 1;
|
|
if (GET_XFLG ()) val |= 0x8000;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROXRW.W -(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e4e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 79;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr dataa;
|
|
dataa = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
m68k_areg (regs, srcreg) = dataa;
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 1;
|
|
val >>= 1;
|
|
if (GET_XFLG ()) val |= 0x8000;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROXRW.W (d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e4e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 79;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 1;
|
|
val >>= 1;
|
|
if (GET_XFLG ()) val |= 0x8000;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROXRW.W (d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e4f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 79;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
m68k_incpci (2);
|
|
{ dataa = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 1;
|
|
val >>= 1;
|
|
if (GET_XFLG ()) val |= 0x8000;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dataa, val);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROXRW.W (xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e4f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 79;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 1;
|
|
val >>= 1;
|
|
if (GET_XFLG ()) val |= 0x8000;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROXRW.W (xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e4f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 79;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = get_long_020_prefetch (2);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 1;
|
|
val >>= 1;
|
|
if (GET_XFLG ()) val |= 0x8000;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROXLW.W (An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e5d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 78;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = m68k_areg (regs, srcreg);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 0x8000;
|
|
val <<= 1;
|
|
if (GET_XFLG ()) val |= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry >> 15);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROXLW.W (An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e5d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 78;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = m68k_areg (regs, srcreg);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 0x8000;
|
|
val <<= 1;
|
|
if (GET_XFLG ()) val |= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry >> 15);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROXLW.W -(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e5e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 78;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr dataa;
|
|
dataa = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
m68k_areg (regs, srcreg) = dataa;
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 0x8000;
|
|
val <<= 1;
|
|
if (GET_XFLG ()) val |= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry >> 15);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROXLW.W (d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e5e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 78;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 0x8000;
|
|
val <<= 1;
|
|
if (GET_XFLG ()) val |= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry >> 15);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROXLW.W (d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e5f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 78;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
m68k_incpci (2);
|
|
{ dataa = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 0x8000;
|
|
val <<= 1;
|
|
if (GET_XFLG ()) val |= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry >> 15);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dataa, val);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROXLW.W (xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e5f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 78;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 0x8000;
|
|
val <<= 1;
|
|
if (GET_XFLG ()) val |= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry >> 15);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROXLW.W (xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e5f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 78;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = get_long_020_prefetch (2);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 0x8000;
|
|
val <<= 1;
|
|
if (GET_XFLG ()) val |= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry >> 15);
|
|
COPY_CARRY ();
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* RORW.W (An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e6d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 77;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = m68k_areg (regs, srcreg);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 1;
|
|
val >>= 1;
|
|
if (carry) val |= 0x8000;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* RORW.W (An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e6d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 77;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = m68k_areg (regs, srcreg);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 1;
|
|
val >>= 1;
|
|
if (carry) val |= 0x8000;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* RORW.W -(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e6e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 77;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr dataa;
|
|
dataa = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
m68k_areg (regs, srcreg) = dataa;
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 1;
|
|
val >>= 1;
|
|
if (carry) val |= 0x8000;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* RORW.W (d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e6e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 77;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 1;
|
|
val >>= 1;
|
|
if (carry) val |= 0x8000;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* RORW.W (d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e6f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 77;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
m68k_incpci (2);
|
|
{ dataa = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 1;
|
|
val >>= 1;
|
|
if (carry) val |= 0x8000;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dataa, val);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* RORW.W (xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e6f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 77;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 1;
|
|
val >>= 1;
|
|
if (carry) val |= 0x8000;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* RORW.W (xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e6f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 77;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = get_long_020_prefetch (2);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 1;
|
|
val >>= 1;
|
|
if (carry) val |= 0x8000;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROLW.W (An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e7d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 76;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = m68k_areg (regs, srcreg);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 0x8000;
|
|
val <<= 1;
|
|
if (carry) val |= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry >> 15);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROLW.W (An)+ */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e7d8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 76;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = m68k_areg (regs, srcreg);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
m68k_areg (regs, srcreg) += 2;
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 0x8000;
|
|
val <<= 1;
|
|
if (carry) val |= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry >> 15);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (2);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROLW.W -(An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e7e0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 76;
|
|
CurrentInstrCycles = 10;
|
|
{{ uaecptr dataa;
|
|
dataa = m68k_areg (regs, srcreg) - 2;
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
m68k_areg (regs, srcreg) = dataa;
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 0x8000;
|
|
val <<= 1;
|
|
if (carry) val |= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry >> 15);
|
|
regs.irc = get_word_020_prefetch (2);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (2);
|
|
return 10 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROLW.W (d16,An) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e7e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 76;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = m68k_areg (regs, srcreg) + (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 0x8000;
|
|
val <<= 1;
|
|
if (carry) val |= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry >> 15);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROLW.W (d8,An,Xn) */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e7f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 76;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
m68k_incpci (2);
|
|
{ dataa = x_get_disp_ea_020 (m68k_areg (regs, srcreg), 0);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 0x8000;
|
|
val <<= 1;
|
|
if (carry) val |= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry >> 15);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
x_put_word (dataa, val);
|
|
}}}}}return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROLW.W (xxx).W */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e7f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 76;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = (uae_s32)(uae_s16)get_word_020_prefetch (2);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 0x8000;
|
|
val <<= 1;
|
|
if (carry) val |= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry >> 15);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* ROLW.W (xxx).L */
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e7f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 76;
|
|
CurrentInstrCycles = 8;
|
|
{{ uaecptr dataa;
|
|
dataa = get_long_020_prefetch (2);
|
|
{ uae_s16 data = x_get_word (dataa);
|
|
{ uae_u16 val = data;
|
|
uae_u32 carry = val & 0x8000;
|
|
val <<= 1;
|
|
if (carry) val |= 1;
|
|
CLEAR_CZNV ();
|
|
SET_ZFLG (((uae_s16)(val)) == 0);
|
|
SET_NFLG (((uae_s16)(val)) < 0);
|
|
SET_CFLG (carry >> 15);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
x_put_word (dataa, val);
|
|
}}}} m68k_incpci (6);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
/* BFTST.L #<data>.W,Dn */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e8c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 88;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp = m68k_dreg(regs, dstreg);
|
|
offset &= 0x1f;
|
|
tmp = (tmp << offset) | (tmp >> (32 - offset));
|
|
bdata[0] = tmp & ((1 << (32 - width)) - 1);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFTST.L #<data>.W,(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e8d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 88;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFTST.L #<data>.W,(d16,An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e8e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 88;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFTST.L #<data>.W,(d8,An,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e8f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 88;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFTST.L #<data>.W,(xxx).W */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e8f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 88;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFTST.L #<data>.W,(xxx).L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e8f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 88;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
}}}} m68k_incpci (8);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFTST.L #<data>.W,(d16,PC) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e8fa_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = 2;
|
|
OpcodeFamily = 88;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_getpci () + 4;
|
|
dsta += (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFTST.L #<data>.W,(d8,PC,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e8fb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = 3;
|
|
OpcodeFamily = 88;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr tmppc;
|
|
uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ tmppc = m68k_getpci ();
|
|
dsta = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFEXTU.L #<data>.W,Dn */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e9c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 89;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp = m68k_dreg(regs, dstreg);
|
|
offset &= 0x1f;
|
|
tmp = (tmp << offset) | (tmp >> (32 - offset));
|
|
bdata[0] = tmp & ((1 << (32 - width)) - 1);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
m68k_dreg (regs, (extra >> 12) & 7) = tmp;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFEXTU.L #<data>.W,(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e9d0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 89;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
m68k_dreg (regs, (extra >> 12) & 7) = tmp;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFEXTU.L #<data>.W,(d16,An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e9e8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 89;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
m68k_dreg (regs, (extra >> 12) & 7) = tmp;
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFEXTU.L #<data>.W,(d8,An,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e9f0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 89;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
m68k_dreg (regs, (extra >> 12) & 7) = tmp;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFEXTU.L #<data>.W,(xxx).W */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e9f8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 89;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
m68k_dreg (regs, (extra >> 12) & 7) = tmp;
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFEXTU.L #<data>.W,(xxx).L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e9f9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 89;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
m68k_dreg (regs, (extra >> 12) & 7) = tmp;
|
|
regs.irc = get_word_020_prefetch (8);
|
|
}}}} m68k_incpci (8);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFEXTU.L #<data>.W,(d16,PC) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e9fa_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = 2;
|
|
OpcodeFamily = 89;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_getpci () + 4;
|
|
dsta += (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
m68k_dreg (regs, (extra >> 12) & 7) = tmp;
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFEXTU.L #<data>.W,(d8,PC,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_e9fb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = 3;
|
|
OpcodeFamily = 89;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr tmppc;
|
|
uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ tmppc = m68k_getpci ();
|
|
dsta = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
m68k_dreg (regs, (extra >> 12) & 7) = tmp;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFCHG.L #<data>.W,Dn */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_eac0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 90;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp = m68k_dreg(regs, dstreg);
|
|
offset &= 0x1f;
|
|
tmp = (tmp << offset) | (tmp >> (32 - offset));
|
|
bdata[0] = tmp & ((1 << (32 - width)) - 1);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
tmp = tmp ^ (0xffffffffu >> (32 - width));
|
|
tmp = bdata[0] | (tmp << (32 - width));
|
|
m68k_dreg(regs, dstreg) = (tmp >> offset) | (tmp << (32 - offset));
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFCHG.L #<data>.W,(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_ead0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 90;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
tmp = tmp ^ (0xffffffffu >> (32 - width));
|
|
x_put_bitfield(dsta, bdata, tmp, offset, width);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFCHG.L #<data>.W,(d16,An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_eae8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 90;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
tmp = tmp ^ (0xffffffffu >> (32 - width));
|
|
x_put_bitfield(dsta, bdata, tmp, offset, width);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFCHG.L #<data>.W,(d8,An,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_eaf0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 90;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
tmp = tmp ^ (0xffffffffu >> (32 - width));
|
|
x_put_bitfield(dsta, bdata, tmp, offset, width);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFCHG.L #<data>.W,(xxx).W */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_eaf8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 90;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
tmp = tmp ^ (0xffffffffu >> (32 - width));
|
|
x_put_bitfield(dsta, bdata, tmp, offset, width);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFCHG.L #<data>.W,(xxx).L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_eaf9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 90;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
tmp = tmp ^ (0xffffffffu >> (32 - width));
|
|
x_put_bitfield(dsta, bdata, tmp, offset, width);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
}}}} m68k_incpci (8);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFEXTS.L #<data>.W,Dn */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_ebc0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 91;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp = m68k_dreg(regs, dstreg);
|
|
offset &= 0x1f;
|
|
tmp = (tmp << offset) | (tmp >> (32 - offset));
|
|
bdata[0] = tmp & ((1 << (32 - width)) - 1);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp = (uae_s32)tmp >> (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
m68k_dreg (regs, (extra >> 12) & 7) = tmp;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFEXTS.L #<data>.W,(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_ebd0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 91;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp = (uae_s32)tmp >> (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
m68k_dreg (regs, (extra >> 12) & 7) = tmp;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFEXTS.L #<data>.W,(d16,An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_ebe8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 91;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp = (uae_s32)tmp >> (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
m68k_dreg (regs, (extra >> 12) & 7) = tmp;
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFEXTS.L #<data>.W,(d8,An,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_ebf0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 91;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp = (uae_s32)tmp >> (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
m68k_dreg (regs, (extra >> 12) & 7) = tmp;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFEXTS.L #<data>.W,(xxx).W */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_ebf8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 91;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp = (uae_s32)tmp >> (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
m68k_dreg (regs, (extra >> 12) & 7) = tmp;
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFEXTS.L #<data>.W,(xxx).L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_ebf9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 91;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp = (uae_s32)tmp >> (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
m68k_dreg (regs, (extra >> 12) & 7) = tmp;
|
|
regs.irc = get_word_020_prefetch (8);
|
|
}}}} m68k_incpci (8);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFEXTS.L #<data>.W,(d16,PC) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_ebfa_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = 2;
|
|
OpcodeFamily = 91;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_getpci () + 4;
|
|
dsta += (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp = (uae_s32)tmp >> (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
m68k_dreg (regs, (extra >> 12) & 7) = tmp;
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFEXTS.L #<data>.W,(d8,PC,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_ebfb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = 3;
|
|
OpcodeFamily = 91;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr tmppc;
|
|
uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ tmppc = m68k_getpci ();
|
|
dsta = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp = (uae_s32)tmp >> (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
m68k_dreg (regs, (extra >> 12) & 7) = tmp;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFCLR.L #<data>.W,Dn */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_ecc0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 92;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp = m68k_dreg(regs, dstreg);
|
|
offset &= 0x1f;
|
|
tmp = (tmp << offset) | (tmp >> (32 - offset));
|
|
bdata[0] = tmp & ((1 << (32 - width)) - 1);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
tmp = 0;
|
|
tmp = bdata[0] | (tmp << (32 - width));
|
|
m68k_dreg(regs, dstreg) = (tmp >> offset) | (tmp << (32 - offset));
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFCLR.L #<data>.W,(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_ecd0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 92;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
tmp = 0;
|
|
x_put_bitfield(dsta, bdata, tmp, offset, width);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFCLR.L #<data>.W,(d16,An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_ece8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 92;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
tmp = 0;
|
|
x_put_bitfield(dsta, bdata, tmp, offset, width);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFCLR.L #<data>.W,(d8,An,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_ecf0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 92;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
tmp = 0;
|
|
x_put_bitfield(dsta, bdata, tmp, offset, width);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFCLR.L #<data>.W,(xxx).W */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_ecf8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 92;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
tmp = 0;
|
|
x_put_bitfield(dsta, bdata, tmp, offset, width);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFCLR.L #<data>.W,(xxx).L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_ecf9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 92;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
tmp = 0;
|
|
x_put_bitfield(dsta, bdata, tmp, offset, width);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
}}}} m68k_incpci (8);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFFFO.L #<data>.W,Dn */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_edc0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 93;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp = m68k_dreg(regs, dstreg);
|
|
offset &= 0x1f;
|
|
tmp = (tmp << offset) | (tmp >> (32 - offset));
|
|
bdata[0] = tmp & ((1 << (32 - width)) - 1);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
{ uae_u32 mask = 1 << (width - 1);
|
|
while (mask) { if (tmp & mask) break; mask >>= 1; offset++; }}
|
|
m68k_dreg (regs, (extra >> 12) & 7) = offset;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFFFO.L #<data>.W,(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_edd0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 93;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
{ uae_u32 mask = 1 << (width - 1);
|
|
while (mask) { if (tmp & mask) break; mask >>= 1; offset++; }}
|
|
m68k_dreg (regs, (extra >> 12) & 7) = offset;
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFFFO.L #<data>.W,(d16,An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_ede8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 93;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
{ uae_u32 mask = 1 << (width - 1);
|
|
while (mask) { if (tmp & mask) break; mask >>= 1; offset++; }}
|
|
m68k_dreg (regs, (extra >> 12) & 7) = offset;
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFFFO.L #<data>.W,(d8,An,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_edf0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 93;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
{ uae_u32 mask = 1 << (width - 1);
|
|
while (mask) { if (tmp & mask) break; mask >>= 1; offset++; }}
|
|
m68k_dreg (regs, (extra >> 12) & 7) = offset;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFFFO.L #<data>.W,(xxx).W */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_edf8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 93;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
{ uae_u32 mask = 1 << (width - 1);
|
|
while (mask) { if (tmp & mask) break; mask >>= 1; offset++; }}
|
|
m68k_dreg (regs, (extra >> 12) & 7) = offset;
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFFFO.L #<data>.W,(xxx).L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_edf9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 93;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
{ uae_u32 mask = 1 << (width - 1);
|
|
while (mask) { if (tmp & mask) break; mask >>= 1; offset++; }}
|
|
m68k_dreg (regs, (extra >> 12) & 7) = offset;
|
|
regs.irc = get_word_020_prefetch (8);
|
|
}}}} m68k_incpci (8);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFFFO.L #<data>.W,(d16,PC) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_edfa_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = 2;
|
|
OpcodeFamily = 93;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_getpci () + 4;
|
|
dsta += (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
{ uae_u32 mask = 1 << (width - 1);
|
|
while (mask) { if (tmp & mask) break; mask >>= 1; offset++; }}
|
|
m68k_dreg (regs, (extra >> 12) & 7) = offset;
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFFFO.L #<data>.W,(d8,PC,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_edfb_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = 3;
|
|
OpcodeFamily = 93;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr tmppc;
|
|
uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ tmppc = m68k_getpci ();
|
|
dsta = x_get_disp_ea_020 (tmppc, 0);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
{ uae_u32 mask = 1 << (width - 1);
|
|
while (mask) { if (tmp & mask) break; mask >>= 1; offset++; }}
|
|
m68k_dreg (regs, (extra >> 12) & 7) = offset;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFSET.L #<data>.W,Dn */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_eec0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 94;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp = m68k_dreg(regs, dstreg);
|
|
offset &= 0x1f;
|
|
tmp = (tmp << offset) | (tmp >> (32 - offset));
|
|
bdata[0] = tmp & ((1 << (32 - width)) - 1);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
tmp = 0xffffffffu >> (32 - width);
|
|
tmp = bdata[0] | (tmp << (32 - width));
|
|
m68k_dreg(regs, dstreg) = (tmp >> offset) | (tmp << (32 - offset));
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFSET.L #<data>.W,(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_eed0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 94;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
tmp = 0xffffffffu >> (32 - width);
|
|
x_put_bitfield(dsta, bdata, tmp, offset, width);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFSET.L #<data>.W,(d16,An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_eee8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 94;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
tmp = 0xffffffffu >> (32 - width);
|
|
x_put_bitfield(dsta, bdata, tmp, offset, width);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFSET.L #<data>.W,(d8,An,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_eef0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 94;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
tmp = 0xffffffffu >> (32 - width);
|
|
x_put_bitfield(dsta, bdata, tmp, offset, width);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFSET.L #<data>.W,(xxx).W */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_eef8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 94;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
tmp = 0xffffffffu >> (32 - width);
|
|
x_put_bitfield(dsta, bdata, tmp, offset, width);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFSET.L #<data>.W,(xxx).L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_eef9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 94;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
tmp = 0xffffffffu >> (32 - width);
|
|
x_put_bitfield(dsta, bdata, tmp, offset, width);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
}}}} m68k_incpci (8);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFINS.L #<data>.W,Dn */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_efc0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 95;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp = m68k_dreg(regs, dstreg);
|
|
offset &= 0x1f;
|
|
tmp = (tmp << offset) | (tmp >> (32 - offset));
|
|
bdata[0] = tmp & ((1 << (32 - width)) - 1);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
tmp = m68k_dreg (regs, (extra >> 12) & 7);
|
|
tmp = tmp & (0xffffffffu >> (32 - width));
|
|
SET_NFLG (tmp & (1 << (width - 1)) ? 1 : 0);
|
|
SET_ZFLG (tmp == 0);
|
|
tmp = bdata[0] | (tmp << (32 - width));
|
|
m68k_dreg(regs, dstreg) = (tmp >> offset) | (tmp << (32 - offset));
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFINS.L #<data>.W,(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_efd0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 95;
|
|
CurrentInstrCycles = 8;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
tmp = m68k_dreg (regs, (extra >> 12) & 7);
|
|
tmp = tmp & (0xffffffffu >> (32 - width));
|
|
SET_NFLG (tmp & (1 << (width - 1)) ? 1 : 0);
|
|
SET_ZFLG (tmp == 0);
|
|
x_put_bitfield(dsta, bdata, tmp, offset, width);
|
|
regs.irc = get_word_020_prefetch (4);
|
|
}}}} m68k_incpci (4);
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFINS.L #<data>.W,(d16,An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_efe8_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 95;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = m68k_areg (regs, dstreg) + (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
tmp = m68k_dreg (regs, (extra >> 12) & 7);
|
|
tmp = tmp & (0xffffffffu >> (32 - width));
|
|
SET_NFLG (tmp & (1 << (width - 1)) ? 1 : 0);
|
|
SET_ZFLG (tmp == 0);
|
|
x_put_bitfield(dsta, bdata, tmp, offset, width);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFINS.L #<data>.W,(d8,An,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_eff0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 95;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
m68k_incpci (4);
|
|
{ dsta = x_get_disp_ea_020 (m68k_areg (regs, dstreg), 0);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
tmp = m68k_dreg (regs, (extra >> 12) & 7);
|
|
tmp = tmp & (0xffffffffu >> (32 - width));
|
|
SET_NFLG (tmp & (1 << (width - 1)) ? 1 : 0);
|
|
SET_ZFLG (tmp == 0);
|
|
x_put_bitfield(dsta, bdata, tmp, offset, width);
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}}}}return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFINS.L #<data>.W,(xxx).W */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_eff8_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 95;
|
|
CurrentInstrCycles = 12;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = (uae_s32)(uae_s16)get_word_020_prefetch (4);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
tmp = m68k_dreg (regs, (extra >> 12) & 7);
|
|
tmp = tmp & (0xffffffffu >> (32 - width));
|
|
SET_NFLG (tmp & (1 << (width - 1)) ? 1 : 0);
|
|
SET_ZFLG (tmp == 0);
|
|
x_put_bitfield(dsta, bdata, tmp, offset, width);
|
|
regs.irc = get_word_020_prefetch (6);
|
|
}}}} m68k_incpci (6);
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* BFINS.L #<data>.W,(xxx).L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_eff9_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 95;
|
|
CurrentInstrCycles = 16;
|
|
{{ uae_s16 extra = get_word_020_prefetch (2);
|
|
{ uaecptr dsta;
|
|
dsta = get_long_020_prefetch (4);
|
|
{ uae_u32 bdata[2];
|
|
uae_s32 offset = extra & 0x800 ? m68k_dreg(regs, (extra >> 6) & 7) : (extra >> 6) & 0x1f;
|
|
int width = (((extra & 0x20 ? m68k_dreg(regs, extra & 7) : extra) -1) & 0x1f) +1;
|
|
uae_u32 tmp;
|
|
dsta += offset >> 3;
|
|
tmp = x_get_bitfield (dsta, bdata, offset, width);
|
|
SET_NFLG_ALWAYS (((uae_s32)tmp) < 0 ? 1 : 0);
|
|
tmp >>= (32 - width);
|
|
SET_ZFLG (tmp == 0); SET_VFLG (0); SET_CFLG (0);
|
|
tmp = m68k_dreg (regs, (extra >> 12) & 7);
|
|
tmp = tmp & (0xffffffffu >> (32 - width));
|
|
SET_NFLG (tmp & (1 << (width - 1)) ? 1 : 0);
|
|
SET_ZFLG (tmp == 0);
|
|
x_put_bitfield(dsta, bdata, tmp, offset, width);
|
|
regs.irc = get_word_020_prefetch (8);
|
|
}}}} m68k_incpci (8);
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FPP.L #<data>.W,Dn */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f200_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 104;
|
|
CurrentInstrCycles = 8;
|
|
{
|
|
#ifdef FPUEMU
|
|
{ uae_s16 extra = get_word_020_prefetch (2);
|
|
m68k_incpci (4);
|
|
fpuop_arithmetic(opcode, extra);
|
|
if (regs.fp_exception) goto l_201788;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}
|
|
#endif
|
|
}l_201788: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FPP.L #<data>.W,An */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f208_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 104;
|
|
CurrentInstrCycles = 8;
|
|
{
|
|
#ifdef FPUEMU
|
|
{ uae_s16 extra = get_word_020_prefetch (2);
|
|
m68k_incpci (4);
|
|
fpuop_arithmetic(opcode, extra);
|
|
if (regs.fp_exception) goto l_201789;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}
|
|
#endif
|
|
}l_201789: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FPP.L #<data>.W,(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f210_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 104;
|
|
CurrentInstrCycles = 8;
|
|
{
|
|
#ifdef FPUEMU
|
|
{ uae_s16 extra = get_word_020_prefetch (2);
|
|
m68k_incpci (4);
|
|
fpuop_arithmetic(opcode, extra);
|
|
if (regs.fp_exception) goto l_201790;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}
|
|
#endif
|
|
}l_201790: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FPP.L #<data>.W,(An)+ */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f218_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 104;
|
|
CurrentInstrCycles = 8;
|
|
{
|
|
#ifdef FPUEMU
|
|
{ uae_s16 extra = get_word_020_prefetch (2);
|
|
m68k_incpci (4);
|
|
fpuop_arithmetic(opcode, extra);
|
|
if (regs.fp_exception) goto l_201791;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}
|
|
#endif
|
|
}l_201791: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FPP.L #<data>.W,-(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f220_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 104;
|
|
CurrentInstrCycles = 8;
|
|
{
|
|
#ifdef FPUEMU
|
|
{ uae_s16 extra = get_word_020_prefetch (2);
|
|
m68k_incpci (4);
|
|
fpuop_arithmetic(opcode, extra);
|
|
if (regs.fp_exception) goto l_201792;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}
|
|
#endif
|
|
}l_201792: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FPP.L #<data>.W,(d16,An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f228_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 104;
|
|
CurrentInstrCycles = 8;
|
|
{
|
|
#ifdef FPUEMU
|
|
{ uae_s16 extra = get_word_020_prefetch (2);
|
|
m68k_incpci (4);
|
|
fpuop_arithmetic(opcode, extra);
|
|
if (regs.fp_exception) goto l_201793;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}
|
|
#endif
|
|
}l_201793: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FPP.L #<data>.W,(d8,An,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f230_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 104;
|
|
CurrentInstrCycles = 8;
|
|
{
|
|
#ifdef FPUEMU
|
|
{ uae_s16 extra = get_word_020_prefetch (2);
|
|
m68k_incpci (4);
|
|
fpuop_arithmetic(opcode, extra);
|
|
if (regs.fp_exception) goto l_201794;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}
|
|
#endif
|
|
}l_201794: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FPP.L #<data>.W,(xxx).W */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f238_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 104;
|
|
CurrentInstrCycles = 8;
|
|
{
|
|
#ifdef FPUEMU
|
|
{ uae_s16 extra = get_word_020_prefetch (2);
|
|
m68k_incpci (4);
|
|
fpuop_arithmetic(opcode, extra);
|
|
if (regs.fp_exception) goto l_201795;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}
|
|
#endif
|
|
}l_201795: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FPP.L #<data>.W,(xxx).L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f239_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 104;
|
|
CurrentInstrCycles = 8;
|
|
{
|
|
#ifdef FPUEMU
|
|
{ uae_s16 extra = get_word_020_prefetch (2);
|
|
m68k_incpci (4);
|
|
fpuop_arithmetic(opcode, extra);
|
|
if (regs.fp_exception) goto l_201796;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}
|
|
#endif
|
|
}l_201796: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FPP.L #<data>.W,(d16,PC) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f23a_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = 2;
|
|
OpcodeFamily = 104;
|
|
CurrentInstrCycles = 8;
|
|
{
|
|
#ifdef FPUEMU
|
|
{ uae_s16 extra = get_word_020_prefetch (2);
|
|
m68k_incpci (4);
|
|
fpuop_arithmetic(opcode, extra);
|
|
if (regs.fp_exception) goto l_201797;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}
|
|
#endif
|
|
}l_201797: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FPP.L #<data>.W,(d8,PC,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f23b_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = 3;
|
|
OpcodeFamily = 104;
|
|
CurrentInstrCycles = 8;
|
|
{
|
|
#ifdef FPUEMU
|
|
{ uae_s16 extra = get_word_020_prefetch (2);
|
|
m68k_incpci (4);
|
|
fpuop_arithmetic(opcode, extra);
|
|
if (regs.fp_exception) goto l_201798;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}
|
|
#endif
|
|
}l_201798: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FPP.L #<data>.W,#<data>.L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f23c_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 104;
|
|
CurrentInstrCycles = 8;
|
|
{
|
|
#ifdef FPUEMU
|
|
{ uae_s16 extra = get_word_020_prefetch (2);
|
|
m68k_incpci (4);
|
|
fpuop_arithmetic(opcode, extra);
|
|
if (regs.fp_exception) goto l_201799;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}
|
|
#endif
|
|
}l_201799: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FScc.L #<data>.W,Dn */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f240_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 106;
|
|
CurrentInstrCycles = 8;
|
|
{
|
|
#ifdef FPUEMU
|
|
{ uae_s16 extra = get_word_020_prefetch (2);
|
|
m68k_incpci (4);
|
|
fpuop_scc (opcode, extra);
|
|
if (regs.fp_exception) goto l_201800;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}
|
|
#endif
|
|
}l_201800: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FDBcc.L #<data>.W,Dn */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f248_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 105;
|
|
CurrentInstrCycles = 8;
|
|
{
|
|
#ifdef FPUEMU
|
|
{ uae_s16 extra = get_word_020_prefetch (2);
|
|
m68k_incpci (4);
|
|
fpuop_dbcc (opcode, extra);
|
|
if (regs.fp_exception) goto l_201801;
|
|
if (regs.fp_branch) {
|
|
regs.fp_branch = false;
|
|
fill_prefetch();
|
|
goto l_201801;
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}
|
|
#endif
|
|
}l_201801: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FScc.L #<data>.W,(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f250_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 106;
|
|
CurrentInstrCycles = 8;
|
|
{
|
|
#ifdef FPUEMU
|
|
{ uae_s16 extra = get_word_020_prefetch (2);
|
|
m68k_incpci (4);
|
|
fpuop_scc (opcode, extra);
|
|
if (regs.fp_exception) goto l_201802;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}
|
|
#endif
|
|
}l_201802: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FScc.L #<data>.W,(An)+ */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f258_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 106;
|
|
CurrentInstrCycles = 8;
|
|
{
|
|
#ifdef FPUEMU
|
|
{ uae_s16 extra = get_word_020_prefetch (2);
|
|
m68k_incpci (4);
|
|
fpuop_scc (opcode, extra);
|
|
if (regs.fp_exception) goto l_201803;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}
|
|
#endif
|
|
}l_201803: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FScc.L #<data>.W,-(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f260_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 106;
|
|
CurrentInstrCycles = 8;
|
|
{
|
|
#ifdef FPUEMU
|
|
{ uae_s16 extra = get_word_020_prefetch (2);
|
|
m68k_incpci (4);
|
|
fpuop_scc (opcode, extra);
|
|
if (regs.fp_exception) goto l_201804;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}
|
|
#endif
|
|
}l_201804: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FScc.L #<data>.W,(d16,An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f268_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 106;
|
|
CurrentInstrCycles = 8;
|
|
{
|
|
#ifdef FPUEMU
|
|
{ uae_s16 extra = get_word_020_prefetch (2);
|
|
m68k_incpci (4);
|
|
fpuop_scc (opcode, extra);
|
|
if (regs.fp_exception) goto l_201805;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}
|
|
#endif
|
|
}l_201805: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FScc.L #<data>.W,(d8,An,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f270_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 dstreg = opcode & 7;
|
|
OpcodeFamily = 106;
|
|
CurrentInstrCycles = 8;
|
|
{
|
|
#ifdef FPUEMU
|
|
{ uae_s16 extra = get_word_020_prefetch (2);
|
|
m68k_incpci (4);
|
|
fpuop_scc (opcode, extra);
|
|
if (regs.fp_exception) goto l_201806;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}
|
|
#endif
|
|
}l_201806: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FScc.L #<data>.W,(xxx).W */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f278_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 106;
|
|
CurrentInstrCycles = 8;
|
|
{
|
|
#ifdef FPUEMU
|
|
{ uae_s16 extra = get_word_020_prefetch (2);
|
|
m68k_incpci (4);
|
|
fpuop_scc (opcode, extra);
|
|
if (regs.fp_exception) goto l_201807;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}
|
|
#endif
|
|
}l_201807: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FScc.L #<data>.W,(xxx).L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f279_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 106;
|
|
CurrentInstrCycles = 8;
|
|
{
|
|
#ifdef FPUEMU
|
|
{ uae_s16 extra = get_word_020_prefetch (2);
|
|
m68k_incpci (4);
|
|
fpuop_scc (opcode, extra);
|
|
if (regs.fp_exception) goto l_201808;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}
|
|
#endif
|
|
}l_201808: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FTRAPcc.L #<data>.W */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f27a_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 107;
|
|
CurrentInstrCycles = 12;
|
|
{
|
|
#ifdef FPUEMU
|
|
uaecptr oldpc = m68k_getpci ();
|
|
uae_u16 extra = get_word_020_prefetch (2);
|
|
{ uae_s16 dummy = get_word_020_prefetch (4);
|
|
m68k_incpci (6);
|
|
fpuop_trapcc (opcode, oldpc, extra);
|
|
if (regs.fp_exception) goto l_201809;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}
|
|
#endif
|
|
}l_201809: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FTRAPcc.L #<data>.L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f27b_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 107;
|
|
CurrentInstrCycles = 16;
|
|
{
|
|
#ifdef FPUEMU
|
|
uaecptr oldpc = m68k_getpci ();
|
|
uae_u16 extra = get_word_020_prefetch (2);
|
|
{ uae_s32 dummy;
|
|
dummy = get_long_020_prefetch (4);
|
|
m68k_incpci (8);
|
|
fpuop_trapcc (opcode, oldpc, extra);
|
|
if (regs.fp_exception) goto l_201810;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}
|
|
#endif
|
|
}l_201810: ;
|
|
return 16 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FTRAPcc.L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f27c_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 107;
|
|
CurrentInstrCycles = 8;
|
|
{
|
|
#ifdef FPUEMU
|
|
uaecptr oldpc = m68k_getpci ();
|
|
uae_u16 extra = get_word_020_prefetch (2);
|
|
m68k_incpci (4);
|
|
fpuop_trapcc (opcode, oldpc, extra);
|
|
if (regs.fp_exception) goto l_201811;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
|
|
#endif
|
|
}l_201811: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FBccQ.L #<data>,#<data>.W */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f280_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 63);
|
|
OpcodeFamily = 108;
|
|
CurrentInstrCycles = 8;
|
|
{
|
|
#ifdef FPUEMU
|
|
m68k_incpci (2);
|
|
{ uaecptr pc = m68k_getpci ();
|
|
{ uae_s16 extra = get_word_020_prefetch (0);
|
|
m68k_incpci (2);
|
|
fpuop_bcc (opcode, pc,extra);
|
|
if (regs.fp_exception) goto l_201812;
|
|
if (regs.fp_branch) {
|
|
regs.fp_branch = false;
|
|
fill_prefetch();
|
|
goto l_201812;
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}
|
|
#endif
|
|
}l_201812: ;
|
|
return 8 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FBccQ.L #<data>,#<data>.L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f2c0_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 63);
|
|
OpcodeFamily = 108;
|
|
CurrentInstrCycles = 12;
|
|
{
|
|
#ifdef FPUEMU
|
|
m68k_incpci (2);
|
|
{ uaecptr pc = m68k_getpci ();
|
|
{ uae_s32 extra;
|
|
extra = get_long_020_prefetch (0);
|
|
m68k_incpci (4);
|
|
fpuop_bcc (opcode, pc,extra);
|
|
if (regs.fp_exception) goto l_201813;
|
|
if (regs.fp_branch) {
|
|
regs.fp_branch = false;
|
|
fill_prefetch();
|
|
goto l_201813;
|
|
}
|
|
regs.irc = get_word_020_prefetch (0);
|
|
}}
|
|
#endif
|
|
}l_201813: ;
|
|
return 12 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FSAVE.L (An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f310_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 109;
|
|
CurrentInstrCycles = 4;
|
|
{if (!regs.s) { Exception (8); goto l_201814; }
|
|
{
|
|
#ifdef FPUEMU
|
|
m68k_incpci (2);
|
|
fpuop_save (opcode);
|
|
if (regs.fp_exception) goto l_201814;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
|
|
#endif
|
|
}}l_201814: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FSAVE.L -(An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f320_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 109;
|
|
CurrentInstrCycles = 4;
|
|
{if (!regs.s) { Exception (8); goto l_201815; }
|
|
{
|
|
#ifdef FPUEMU
|
|
m68k_incpci (2);
|
|
fpuop_save (opcode);
|
|
if (regs.fp_exception) goto l_201815;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
|
|
#endif
|
|
}}l_201815: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FSAVE.L (d16,An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f328_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 109;
|
|
CurrentInstrCycles = 4;
|
|
{if (!regs.s) { Exception (8); goto l_201816; }
|
|
{
|
|
#ifdef FPUEMU
|
|
m68k_incpci (2);
|
|
fpuop_save (opcode);
|
|
if (regs.fp_exception) goto l_201816;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
|
|
#endif
|
|
}}l_201816: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FSAVE.L (d8,An,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f330_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 109;
|
|
CurrentInstrCycles = 4;
|
|
{if (!regs.s) { Exception (8); goto l_201817; }
|
|
{
|
|
#ifdef FPUEMU
|
|
m68k_incpci (2);
|
|
fpuop_save (opcode);
|
|
if (regs.fp_exception) goto l_201817;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
|
|
#endif
|
|
}}l_201817: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FSAVE.L (xxx).W */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f338_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 109;
|
|
CurrentInstrCycles = 4;
|
|
{if (!regs.s) { Exception (8); goto l_201818; }
|
|
{
|
|
#ifdef FPUEMU
|
|
m68k_incpci (2);
|
|
fpuop_save (opcode);
|
|
if (regs.fp_exception) goto l_201818;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
|
|
#endif
|
|
}}l_201818: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FSAVE.L (xxx).L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f339_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 109;
|
|
CurrentInstrCycles = 4;
|
|
{if (!regs.s) { Exception (8); goto l_201819; }
|
|
{
|
|
#ifdef FPUEMU
|
|
m68k_incpci (2);
|
|
fpuop_save (opcode);
|
|
if (regs.fp_exception) goto l_201819;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
|
|
#endif
|
|
}}l_201819: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FRESTORE.L (An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f350_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 110;
|
|
CurrentInstrCycles = 4;
|
|
{if (!regs.s) { Exception (8); goto l_201820; }
|
|
{
|
|
#ifdef FPUEMU
|
|
m68k_incpci (2);
|
|
fpuop_restore (opcode);
|
|
if (regs.fp_exception) goto l_201820;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
|
|
#endif
|
|
}}l_201820: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FRESTORE.L (An)+ */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f358_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 110;
|
|
CurrentInstrCycles = 4;
|
|
{if (!regs.s) { Exception (8); goto l_201821; }
|
|
{
|
|
#ifdef FPUEMU
|
|
m68k_incpci (2);
|
|
fpuop_restore (opcode);
|
|
if (regs.fp_exception) goto l_201821;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
|
|
#endif
|
|
}}l_201821: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FRESTORE.L (d16,An) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f368_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 110;
|
|
CurrentInstrCycles = 4;
|
|
{if (!regs.s) { Exception (8); goto l_201822; }
|
|
{
|
|
#ifdef FPUEMU
|
|
m68k_incpci (2);
|
|
fpuop_restore (opcode);
|
|
if (regs.fp_exception) goto l_201822;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
|
|
#endif
|
|
}}l_201822: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FRESTORE.L (d8,An,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f370_20)(uae_u32 opcode)
|
|
{
|
|
uae_u32 srcreg = (opcode & 7);
|
|
OpcodeFamily = 110;
|
|
CurrentInstrCycles = 4;
|
|
{if (!regs.s) { Exception (8); goto l_201823; }
|
|
{
|
|
#ifdef FPUEMU
|
|
m68k_incpci (2);
|
|
fpuop_restore (opcode);
|
|
if (regs.fp_exception) goto l_201823;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
|
|
#endif
|
|
}}l_201823: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FRESTORE.L (xxx).W */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f378_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 110;
|
|
CurrentInstrCycles = 4;
|
|
{if (!regs.s) { Exception (8); goto l_201824; }
|
|
{
|
|
#ifdef FPUEMU
|
|
m68k_incpci (2);
|
|
fpuop_restore (opcode);
|
|
if (regs.fp_exception) goto l_201824;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
|
|
#endif
|
|
}}l_201824: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FRESTORE.L (xxx).L */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f379_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 110;
|
|
CurrentInstrCycles = 4;
|
|
{if (!regs.s) { Exception (8); goto l_201825; }
|
|
{
|
|
#ifdef FPUEMU
|
|
m68k_incpci (2);
|
|
fpuop_restore (opcode);
|
|
if (regs.fp_exception) goto l_201825;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
|
|
#endif
|
|
}}l_201825: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FRESTORE.L (d16,PC) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f37a_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 110;
|
|
CurrentInstrCycles = 4;
|
|
{if (!regs.s) { Exception (8); goto l_201826; }
|
|
{
|
|
#ifdef FPUEMU
|
|
m68k_incpci (2);
|
|
fpuop_restore (opcode);
|
|
if (regs.fp_exception) goto l_201826;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
|
|
#endif
|
|
}}l_201826: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
/* FRESTORE.L (d8,PC,Xn) */
|
|
#ifndef CPUEMU_68000_ONLY
|
|
uae_u32 REGPARAM2 CPUFUNC(op_f37b_20)(uae_u32 opcode)
|
|
{
|
|
OpcodeFamily = 110;
|
|
CurrentInstrCycles = 4;
|
|
{if (!regs.s) { Exception (8); goto l_201827; }
|
|
{
|
|
#ifdef FPUEMU
|
|
m68k_incpci (2);
|
|
fpuop_restore (opcode);
|
|
if (regs.fp_exception) goto l_201827;
|
|
regs.irc = get_word_020_prefetch (0);
|
|
|
|
#endif
|
|
}}l_201827: ;
|
|
return 4 * CYCLE_UNIT / 2;
|
|
}
|
|
|
|
#endif
|
|
#endif
|
|
|