Apple-2-Tools/gsplus
1
0
Fork 0
mirror of https://github.com/digarok/gsplus.git synced 2024-11-24 06:34:02 +00:00
Code Issues Projects Releases Wiki Activity
d8bd306c8a
gsplus/.svn/pristine/a5/a5a1325b497331edafb880aebe4af262187b7b06.svn-base

1627 lines
34 KiB
Plaintext
Raw Normal View History

initial commit
2015-11-05 20:23:46 +00:00
/*
GSport - an Apple //gs Emulator
Copyright (C) 2010 by GSport contributors
Based on the KEGS emulator written by and Copyright (C) 2003 Kent Dickey
This program is free software; you can redistribute it and/or modify it
under the terms of the GNU General Public License as published by the
Free Software Foundation; either version 2 of the License, or (at your
option) any later version.
This program is distributed in the hope that it will be useful, but
WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
for more details.
You should have received a copy of the GNU General Public License along
with this program; if not, write to the Free Software Foundation, Inc.,
59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*/
#ifdef ASM
# ifdef ACC8
.export defs_instr_start_8,data
defs_instr_start_8 .word 0
# else
.export defs_instr_start_16,data
defs_instr_start_16 .word 0
# endif /* ACC8*/
#endif /* ASM */
#undef GET_DLOC_X_IND_RD
#ifdef ASM
# ifdef ACC8
# define GET_DLOC_X_IND_RD() \
ldb 1(scratch1),arg0 ! \
GET_DLOC_X_IND_WR() ! \
bl get_mem_long_8,link ! \
nop
# else
# define GET_DLOC_X_IND_RD() \
ldb 1(scratch1),arg0 ! \
GET_DLOC_X_IND_WR() ! \
bl get_mem_long_16,link ! \
nop
# endif /* ACC8 */
#else /* C*/
# ifdef ACC8
# define GET_DLOC_X_IND_RD() \
GET_1BYTE_ARG; \
GET_DLOC_X_IND_WR(); \
GET_MEMORY8(arg, arg);
# else
# define GET_DLOC_X_IND_RD() \
GET_1BYTE_ARG; \
GET_DLOC_X_IND_WR(); \
GET_MEMORY16(arg, arg, 0);
# endif
#endif
#undef GET_DISP8_S_RD
#ifdef ASM
# ifdef ACC8
# define GET_DISP8_S_RD() \
ldb 1(scratch1),arg0 ! \
GET_DISP8_S_WR() ! \
bl get_mem_b0_8,link ! \
nop
# else
# define GET_DISP8_S_RD() \
ldb 1(scratch1),arg0 ! \
GET_DISP8_S_WR() ! \
bl get_mem_b0_16,link ! \
nop
# endif
#else /* C */
# ifdef ACC8
# define GET_DISP8_S_RD() \
GET_1BYTE_ARG; \
GET_DISP8_S_WR(); \
GET_MEMORY8(arg, arg);
# else
# define GET_DISP8_S_RD() \
GET_1BYTE_ARG; \
GET_DISP8_S_WR(); \
GET_MEMORY16(arg, arg, 0);
# endif
#endif
#ifdef ASM
# define MUST_FIX \
break
#endif
#undef GET_DLOC_RD
#ifdef ASM
# ifdef ACC8
# define GET_DLOC_RD() \
ldb 1(scratch1),arg0 ! \
extru,= direct,31,8,0 ! \
CYCLES_PLUS_1 ! \
INC_KPC_2 ! \
add direct,arg0,addr_latch ! \
extru addr_latch,23,16,arg3 ! \
CYCLES_PLUS_1 ! \
ldwx,s arg3(page_info_ptr),scratch2 ! \
extru addr_latch,31,8,scratch4 ! \
extru addr_latch,31,16,addr_latch ! \
ldbx scratch4(scratch2),ret0 ! \
extru,= scratch2,BANK_IO_BIT,1,0 ! \
bl get_memory_iocheck_stub_asm,link ! \
copy addr_latch,arg0
# else
# define GET_DLOC_RD() \
ldb 1(scratch1),arg0 ! \
extru,= direct,31,8,0 ! \
CYCLES_PLUS_1 ! \
INC_KPC_2 ! \
add direct,arg0,arg0 ! \
bl get_mem_b0_16,link ! \
extru arg0,31,16,arg0
# endif
#else /* C */
# ifdef ACC8
# define GET_DLOC_RD() \
GET_1BYTE_ARG; \
if(direct & 0xff) { \
CYCLES_PLUS_1; \
} \
INC_KPC_2; \
GET_MEMORY8((direct + arg) & 0xffff, arg);
# else
# define GET_DLOC_RD() \
GET_1BYTE_ARG; \
if(direct & 0xff) { \
CYCLES_PLUS_1; \
} \
INC_KPC_2; \
GET_MEMORY16((direct + arg) & 0xffff, arg, 1);
# endif
#endif
#undef GET_DLOC_L_IND_RD
#ifdef ASM
# ifdef ACC8
# define GET_DLOC_L_IND_RD() \
ldb 1(scratch1),arg0 ! \
GET_DLOC_L_IND_WR() ! \
bl get_mem_long_8,link ! \
nop
# else
# define GET_DLOC_L_IND_RD() \
ldb 1(scratch1),arg0 ! \
GET_DLOC_L_IND_WR() ! \
bl get_mem_long_16,link ! \
nop
# endif
#else /* C */
# ifdef ACC8
# define GET_DLOC_L_IND_RD() \
GET_1BYTE_ARG; \
GET_DLOC_L_IND_WR(); \
GET_MEMORY8(arg, arg);
# else
# define GET_DLOC_L_IND_RD() \
GET_1BYTE_ARG; \
GET_DLOC_L_IND_WR(); \
GET_MEMORY16(arg, arg, 0);
# endif
#endif
#undef GET_IMM_MEM
#ifdef ASM
# ifdef ACC8
# define GET_IMM_MEM() \
ldb 1(scratch1),ret0 ! \
INC_KPC_2
# else
# define GET_IMM_MEM() \
ldb 2(scratch1),scratch2 ! \
INC_KPC_3 ! \
ldb 1(scratch1),ret0 ! \
CYCLES_PLUS_1 ! \
dep scratch2,23,8,ret0
# endif
#else
# ifdef ACC8
# define GET_IMM_MEM() \
GET_1BYTE_ARG; \
INC_KPC_2;
# else
# define GET_IMM_MEM() \
GET_2BYTE_ARG; \
CYCLES_PLUS_1; \
INC_KPC_3;
# endif
#endif
#undef GET_ABS_RD
#ifdef ASM
# ifdef ACC8
# define GET_ABS_RD() \
ldb 2(scratch1),arg3 ! \
INC_KPC_3 ! \
ldb 1(scratch1),addr_latch ! \
CYCLES_PLUS_2 ! \
dep dbank,23,24,arg3 ! \
ldwx,s arg3(page_info_ptr),scratch2 ! \
copy addr_latch,scratch4 ! \
dep arg3,23,24,addr_latch ! \
ldbx scratch4(scratch2),ret0 ! \
extru,= scratch2,BANK_IO_BIT,1,0 ! \
bl get_memory_iocheck_stub_asm,link ! \
copy addr_latch,arg0
# else
# define GET_ABS_RD() \
ldb 1(scratch1),arg0 ! \
CYCLES_PLUS_1 ! \
ldb 2(scratch1),scratch2 ! \
INC_KPC_3 ! \
dep dbank,15,16,arg0 ! \
bl get_mem_long_16,link ! \
dep scratch2,23,8,arg0
# endif
#else
# ifdef ACC8
# define GET_ABS_RD() \
GET_2BYTE_ARG; \
CYCLES_PLUS_1; \
GET_MEMORY8((dbank << 16) + arg, arg); \
INC_KPC_3;
# else
# define GET_ABS_RD() \
GET_2BYTE_ARG; \
CYCLES_PLUS_1; \
GET_MEMORY16((dbank << 16) + arg, arg, 0); \
INC_KPC_3;
# endif
#endif
#undef GET_LONG_RD
#ifdef ASM
# ifdef ACC8
# define GET_LONG_RD() \
ldb 1(scratch1),arg0 ! \
INC_KPC_4 ! \
ldb 2(scratch1),scratch2 ! \
CYCLES_PLUS_2 ! \
ldb 3(scratch1),scratch1 ! \
dep scratch2,23,8,arg0 ! \
bl get_mem_long_8,link ! \
dep scratch1,15,8,arg0
# else
# define GET_LONG_RD() \
ldb 1(scratch1),arg0 ! \
INC_KPC_4 ! \
ldb 2(scratch1),scratch2 ! \
CYCLES_PLUS_2 ! \
ldb 3(scratch1),scratch1 ! \
dep scratch2,23,8,arg0 ! \
bl get_mem_long_16,link ! \
dep scratch1,15,8,arg0
# endif
#else /* C */
# ifdef ACC8
# define GET_LONG_RD() \
GET_3BYTE_ARG; \
CYCLES_PLUS_2; \
GET_MEMORY8(arg, arg); \
INC_KPC_4;
# else
# define GET_LONG_RD() \
GET_3BYTE_ARG; \
CYCLES_PLUS_2; \
GET_MEMORY16(arg, arg, 0); \
INC_KPC_4;
# endif
#endif
#undef GET_DLOC_IND_Y_RD
#undef GET_DLOC_IND_Y_WR_SPECIAL2
#define GET_DLOC_IND_Y_WR_SPECIAL2() \
add direct,arg0,arg0 ! \
bl get_mem_b0_direct_page_16,link ! \
extru arg0,31,16,arg0 ! \
dep dbank,15,8,ret0 ! \
extru,= direct,31,8,0 ! \
CYCLES_PLUS_1 ! \
add yreg,ret0,arg0 /* don't change this instr */
/* or add any after */
/* to preserve ret0 & arg0 */
#ifdef ASM
# ifdef ACC8
# define GET_DLOC_IND_Y_RD() \
ldb 1(scratch1),arg0 ! \
INC_KPC_2 ! \
GET_DLOC_IND_Y_WR_SPECIAL2() ! \
xor arg0,ret0,scratch1 ! \
extru,= psr,27,1,0 ! \
extru,= scratch1,23,8,0 ! \
CYCLES_PLUS_1 ! \
bl get_mem_long_8,link ! \
nop
# else
# define GET_DLOC_IND_Y_RD() \
ldb 1(scratch1),arg0 ! \
INC_KPC_2 ! \
GET_DLOC_IND_Y_WR_SPECIAL2() ! \
xor arg0,ret0,scratch1 ! \
extru,= psr,27,1,0 ! \
extru,= scratch1,23,8,0 ! \
CYCLES_PLUS_1 ! \
bl get_mem_long_16,link ! \
nop
# endif
#else /* C */
# ifdef ACC8
# define GET_DLOC_IND_Y_RD() \
GET_1BYTE_ARG; \
GET_MEMORY_DIRECT_PAGE16((direct + arg) & 0xffff, tmp1); \
tmp1 += (dbank << 16); \
if(direct & 0xff) { \
CYCLES_PLUS_1; \
} \
tmp2 = tmp1 + yreg; \
if(((psr & 0x10) == 0) || ((tmp1 ^ tmp2) & 0xff00)) { \
CYCLES_PLUS_1; \
} \
INC_KPC_2; \
GET_MEMORY8(tmp2, arg);
# else
# define GET_DLOC_IND_Y_RD() \
GET_1BYTE_ARG; \
GET_MEMORY_DIRECT_PAGE16((direct + arg) & 0xffff, tmp1); \
tmp1 += (dbank << 16); \
if(direct & 0xff) { \
CYCLES_PLUS_1; \
} \
tmp2 = tmp1 + yreg; \
if(((psr & 0x10) == 0) || ((tmp1 ^ tmp2) & 0xff00)) { \
CYCLES_PLUS_1; \
} \
INC_KPC_2; \
GET_MEMORY16(tmp2, arg, 0);
# endif
#endif
#undef GET_DLOC_IND_RD
#ifdef ASM
# ifdef ACC8
# define GET_DLOC_IND_RD() \
ldb 1(scratch1),arg0 ! \
extru,= direct,31,8,0 ! \
CYCLES_PLUS_1 ! \
INC_KPC_2 ! \
add direct,arg0,arg0 ! \
bl get_mem_b0_direct_page_16,link ! \
extru arg0,31,16,arg0 ! \
copy ret0,arg0 ! \
bl get_mem_long_8,link ! \
dep dbank,15,16,arg0
# else
# define GET_DLOC_IND_RD() \
ldb 1(scratch1),arg0 ! \
extru,= direct,31,8,0 ! \
CYCLES_PLUS_1 ! \
INC_KPC_2 ! \
add direct,arg0,arg0 ! \
bl get_mem_b0_direct_page_16,link ! \
extru arg0,31,16,arg0 ! \
copy ret0,arg0 ! \
bl get_mem_long_16,link ! \
dep dbank,15,16,arg0
# endif
#else
# ifdef ACC8
# define GET_DLOC_IND_RD() \
GET_1BYTE_ARG; \
INC_KPC_2; \
if(direct & 0xff) { \
CYCLES_PLUS_1; \
} \
GET_MEMORY_DIRECT_PAGE16((direct + arg) & 0xffff, arg); \
GET_MEMORY8((dbank << 16) + arg, arg);
# else
# define GET_DLOC_IND_RD() \
GET_1BYTE_ARG; \
INC_KPC_2; \
if(direct & 0xff) { \
CYCLES_PLUS_1; \
} \
GET_MEMORY_DIRECT_PAGE16((direct + arg) & 0xffff, arg); \
GET_MEMORY16((dbank << 16) + arg, arg, 0);
# endif
#endif
#undef GET_DLOC_X_RD
#ifdef ASM
# ifdef ACC8
# define GET_DLOC_X_RD() \
ldb 1(scratch1),arg0 ! \
GET_DLOC_INDEX_WR_A(xreg) ! \
bl get_mem_b0_8,link ! \
GET_DLOC_INDEX_WR_B(xreg)
# else
# define GET_DLOC_X_RD() \
ldb 1(scratch1),arg0 ! \
GET_DLOC_INDEX_WR_A(xreg) ! \
bl get_mem_b0_16,link ! \
GET_DLOC_INDEX_WR_B(xreg)
# endif
#else
# ifdef ACC8
# define GET_DLOC_X_RD() \
GET_1BYTE_ARG; \
CYCLES_PLUS_1; \
if(direct & 0xff) { \
CYCLES_PLUS_1; \
} \
INC_KPC_2; \
arg = (arg + xreg + direct) & 0xffff; \
if(psr & 0x100) { \
if((direct & 0xff) == 0) { \
arg = (direct & 0xff00) | (arg & 0xff); \
} \
} \
GET_MEMORY8(arg & 0xffff, arg);
# else
# define GET_DLOC_X_RD() \
GET_1BYTE_ARG; \
CYCLES_PLUS_1; \
if(direct & 0xff) { \
CYCLES_PLUS_1; \
} \
INC_KPC_2; \
arg = (arg + xreg + direct) & 0xffff; \
if(psr & 0x100) { \
if((direct & 0xff) == 0) { \
arg = (direct & 0xff00) | (arg & 0xff); \
} \
} \
GET_MEMORY16(arg, arg, 1);
# endif
#endif
#undef GET_DISP8_S_IND_Y_RD
#ifdef ASM
# ifdef ACC8
# define GET_DISP8_S_IND_Y_RD() \
ldb 1(scratch1),arg0 ! \
GET_DISP8_S_IND_Y_WR() ! \
bl get_mem_long_8,link ! \
nop
# else
# define GET_DISP8_S_IND_Y_RD() \
ldb 1(scratch1),arg0 ! \
GET_DISP8_S_IND_Y_WR() ! \
bl get_mem_long_16,link ! \
nop
# endif
#else
# ifdef ACC8
# define GET_DISP8_S_IND_Y_RD() \
GET_1BYTE_ARG; \
GET_DISP8_S_IND_Y_WR(); \
GET_MEMORY8(arg, arg);
# else
# define GET_DISP8_S_IND_Y_RD() \
GET_1BYTE_ARG; \
GET_DISP8_S_IND_Y_WR(); \
GET_MEMORY16(arg, arg, 0);
# endif
#endif
#undef GET_DLOC_L_IND_Y_RD
#ifdef ASM
# ifdef ACC8
# define GET_DLOC_L_IND_Y_RD() \
ldb 1(scratch1),arg0 ! \
GET_DLOC_L_IND_Y_WR() ! \
bl get_mem_long_8,link ! \
nop
# else
# define GET_DLOC_L_IND_Y_RD() \
ldb 1(scratch1),arg0 ! \
GET_DLOC_L_IND_Y_WR() ! \
bl get_mem_long_16,link ! \
nop
# endif
#else /* C */
# ifdef ACC8
# define GET_DLOC_L_IND_Y_RD() \
GET_1BYTE_ARG; \
GET_DLOC_L_IND_Y_WR(); \
GET_MEMORY8(arg, arg);
# else
# define GET_DLOC_L_IND_Y_RD() \
GET_1BYTE_ARG; \
GET_DLOC_L_IND_Y_WR(); \
GET_MEMORY16(arg, arg, 0);
# endif
#endif
#undef GET_ABS_INDEX_ADDR_FOR_RD
#ifdef ASM
/* to get cycle right: add 1 cycle */
/* if (x is 16bit) || (carry into high byte), add another cycle */
/* So, if x==16bit, add 1. If x==8bit then add 1 if carry */
# define GET_ABS_INDEX_ADDR_FOR_RD(index_reg) \
ldb 1(scratch1),ret0 ! \
CYCLES_PLUS_1 ! \
ldb 2(scratch1),scratch1 ! \
dep dbank,15,16,ret0 ! \
INC_KPC_3 ! \
dep scratch1,23,8,ret0 ! \
add ret0,index_reg,arg0 ! \
xor arg0,ret0,scratch1 ! \
extru,= psr,27,1,0 ! \
extru,= scratch1,23,8,0 ! \
CYCLES_PLUS_1
#else /* C */
# define GET_ABS_INDEX_ADDR_FOR_RD(index_reg) \
GET_2BYTE_ARG; \
CYCLES_PLUS_1; \
INC_KPC_3; \
tmp1 = (dbank << 16) + arg; \
arg = tmp1 + index_reg; \
if(((psr & 0x10) == 0) || ((tmp1 ^ arg) & 0xff00)) { \
CYCLES_PLUS_1; \
}
#endif
#undef GET_ABS_Y_RD
#ifdef ASM
# ifdef ACC8
# define GET_ABS_Y_RD() \
GET_ABS_INDEX_ADDR_FOR_RD(yreg) ! \
bl get_mem_long_8,link ! \
extru arg0,31,24,arg0
# else
# define GET_ABS_Y_RD() \
GET_ABS_INDEX_ADDR_FOR_RD(yreg) ! \
bl get_mem_long_16,link ! \
extru arg0,31,24,arg0
# endif
#else /* C */
# ifdef ACC8
# define GET_ABS_Y_RD() \
GET_ABS_INDEX_ADDR_FOR_RD(yreg); \
GET_MEMORY8(arg, arg);
# else
# define GET_ABS_Y_RD() \
GET_ABS_INDEX_ADDR_FOR_RD(yreg); \
GET_MEMORY16(arg, arg, 0);
# endif
#endif
#undef GET_ABS_X_RD
#undef GET_ABS_X_RD_WR
#ifdef ASM
# ifdef ACC8
# define GET_ABS_X_RD() \
GET_ABS_INDEX_ADDR_FOR_RD(xreg) ! \
bl get_mem_long_8,link ! \
extru arg0,31,24,arg0
# define GET_ABS_X_RD_WR() \
ldb 1(scratch1),ret0 ! \
INC_KPC_3 ! \
ldb 2(scratch1),scratch1 ! \
dep dbank,15,16,ret0 ! \
CYCLES_PLUS_2 ! \
dep scratch1,23,8,ret0 ! \
add ret0,xreg,arg0 ! \
bl get_mem_long_8,link ! \
extru arg0,31,24,arg0
# else
# define GET_ABS_X_RD() \
GET_ABS_INDEX_ADDR_FOR_RD(xreg) ! \
bl get_mem_long_16,link ! \
extru arg0,31,24,arg0
# define GET_ABS_X_RD_WR() \
ldb 1(scratch1),ret0 ! \
INC_KPC_3 ! \
ldb 2(scratch1),scratch1 ! \
dep dbank,15,16,ret0 ! \
CYCLES_PLUS_2 ! \
dep scratch1,23,8,ret0 ! \
add ret0,xreg,arg0 ! \
bl get_mem_long_16,link ! \
extru arg0,31,24,arg0
# endif
#else /* C */
# ifdef ACC8
# define GET_ABS_X_RD() \
GET_ABS_INDEX_ADDR_FOR_RD(xreg); \
GET_MEMORY8(arg, arg);
# define GET_ABS_X_RD_WR() \
GET_2BYTE_ARG; \
INC_KPC_3; \
CYCLES_PLUS_2; \
arg = (dbank << 16) + ((arg + xreg) & 0xffff); \
GET_MEMORY8(arg, arg);
# else
# define GET_ABS_X_RD() \
GET_ABS_INDEX_ADDR_FOR_RD(xreg); \
GET_MEMORY16(arg, arg, 0);
# define GET_ABS_X_RD_WR() \
GET_2BYTE_ARG; \
INC_KPC_3; \
CYCLES_PLUS_2; \
arg = (dbank << 16) + ((arg + xreg) & 0xffff); \
GET_MEMORY16(arg, arg, 0);
# endif
#endif
#undef GET_LONG_X_RD
#ifdef ASM
# ifdef ACC8
# define GET_LONG_X_RD() \
ldb 1(scratch1),ret0 ! \
ldb 2(scratch1),scratch2 ! \
CYCLES_PLUS_2 ! \
ldb 3(scratch1),scratch1 ! \
INC_KPC_4 ! \
dep scratch2,23,8,ret0 ! \
dep scratch1,15,8,ret0 ! \
add ret0,xreg,arg0 ! \
bl get_mem_long_8,link ! \
extru arg0,31,24,arg0
# else
# define GET_LONG_X_RD() \
ldb 1(scratch1),ret0 ! \
ldb 2(scratch1),scratch2 ! \
CYCLES_PLUS_2 ! \
ldb 3(scratch1),scratch1 ! \
INC_KPC_4 ! \
dep scratch2,23,8,ret0 ! \
dep scratch1,15,8,ret0 ! \
add ret0,xreg,arg0 ! \
bl get_mem_long_16,link ! \
extru arg0,31,24,arg0
# endif
#else /* C */
# ifdef ACC8
# define GET_LONG_X_RD() \
GET_3BYTE_ARG; \
arg = (arg + xreg) & 0xffffff; \
INC_KPC_4; \
CYCLES_PLUS_2; \
GET_MEMORY8(arg, arg);
# else
# define GET_LONG_X_RD() \
GET_3BYTE_ARG; \
arg = (arg + xreg) & 0xffffff; \
INC_KPC_4; \
CYCLES_PLUS_2; \
GET_MEMORY16(arg, arg, 0);
# endif
#endif
#define SET_NEG_ZERO16(val) \
zero = val; \
neg = (val) >> 15;
# define SET_NEG_ZERO8(val) \
zero = val; \
neg = (val) >> 7;
#define SET_CARRY8(val) \
psr = (psr & ~1) + (((val) >> 8) & 1);
#define SET_CARRY16(val) \
psr = (psr & ~1) + (((val) >> 16) & 1);
#if 0
# define NEGZERO8(val) SET_NEG_ZERO8(val)
#else
# define NEGZERO16(val) SET_NEG_ZERO16(val)
#endif
#define SET_INDEX_REG(src, dest) \
if(psr & 0x10) { \
dest = (src) & 0xff; \
SET_NEG_ZERO8(dest); \
} else { \
dest = (src) & 0xffff; \
SET_NEG_ZERO16(dest); \
}
#define LD_INDEX_INST(index_reg, in_bank) \
if(psr & 0x10) { \
GET_MEMORY8(arg, arg); \
} else { \
GET_MEMORY16(arg, arg, in_bank);\
} \
SET_INDEX_REG(arg, index_reg);
#define LDX_INST(in_bank) LD_INDEX_INST(xreg, in_bank)
#define LDY_INST(in_bank) LD_INDEX_INST(yreg, in_bank)
#undef ORA_INST
#ifdef ASM
# ifdef ACC8
# define ORA_INST() \
ldi 0xff,scratch1 ! \
or acc,ret0,arg0 ! \
and arg0,scratch1,zero ! \
extru arg0,24,1,neg ! \
b dispatch ! \
dep arg0,31,8,acc
# else
# define ORA_INST() \
zdepi -1,31,16,scratch1 ! \
or acc,ret0,arg0 ! \
and arg0,scratch1,zero ! \
extru arg0,16,1,neg ! \
b dispatch ! \
dep arg0,31,16,acc
# endif
#else /* C */
# ifdef ACC8
# define ORA_INST() \
tmp1 = (acc | arg) & 0xff; \
acc = (acc & 0xff00) + tmp1; \
SET_NEG_ZERO8(tmp1);
# else
# define ORA_INST() \
acc = (acc | arg); \
SET_NEG_ZERO16(acc);
# endif
#endif
#undef AND_INST
#ifdef ASM
# ifdef ACC8
# define AND_INST() \
ldi 0xff,scratch1 ! \
and acc,ret0,arg0 ! \
and arg0,scratch1,zero ! \
extru arg0,24,1,neg ! \
b dispatch ! \
dep arg0,31,8,acc
# else
# define AND_INST() \
zdepi -1,31,16,scratch1 ! \
and acc,ret0,arg0 ! \
and arg0,scratch1,zero ! \
extru arg0,16,1,neg ! \
b dispatch ! \
dep arg0,31,16,acc
# endif
#else /* C */
# ifdef ACC8
# define AND_INST() \
tmp1 = (acc & arg) & 0xff; \
acc = (acc & 0xff00) + tmp1; \
SET_NEG_ZERO8(tmp1);
# else
# define AND_INST() \
acc = (acc & arg); \
SET_NEG_ZERO16(acc);
# endif
#endif
#undef EOR_INST
#ifdef ASM
# ifdef ACC8
# define EOR_INST() \
ldi 0xff,scratch1 ! \
xor acc,ret0,arg0 ! \
and arg0,scratch1,zero ! \
extru arg0,24,1,neg ! \
b dispatch ! \
dep arg0,31,8,acc
# else
# define EOR_INST() \
zdepi -1,31,16,scratch1 ! \
xor acc,ret0,arg0 ! \
and arg0,scratch1,zero ! \
extru arg0,16,1,neg ! \
b dispatch ! \
dep arg0,31,16,acc
# endif
#else /* C */
# ifdef ACC8
# define EOR_INST() \
tmp1 = (acc ^ arg) & 0xff; \
acc = (acc & 0xff00) + tmp1; \
SET_NEG_ZERO8(tmp1);
# else
# define EOR_INST() \
acc = (acc ^ arg); \
SET_NEG_ZERO16(acc);
# endif
#endif
# undef LDA_INST
#ifdef ASM
# ifdef ACC8
# define LDA_INST() \
extru ret0,31,8,zero ! \
extru ret0,24,1,neg ! \
b dispatch ! \
dep zero,31,8,acc
# else
# define LDA_INST() \
extru ret0,31,16,zero ! \
extru ret0,16,1,neg ! \
b dispatch ! \
dep zero,31,16,acc
# endif
#else /* C*/
# ifdef ACC8
# define LDA_INST() \
acc = (acc & 0xff00) + (arg & 0xff); \
SET_NEG_ZERO8(arg & 0xff);
# else
# define LDA_INST() \
acc = (arg & 0xffff); \
SET_NEG_ZERO16(acc);
# endif
#endif
# undef ADC_INST
#ifdef ASM
# ifdef ACC8
# define ADC_INST() \
b adc_binary_8 ! \
extru acc,31,8,arg0
# else
# define ADC_INST() \
b adc_binary_16 ! \
extru acc,31,16,arg0
# endif
#else /* C */
# ifdef ACC8
# define ADC_INST() \
tmp1 = do_adc_sbc8(acc & 0xff, arg & 0xff, psr, 0); \
acc = (acc & 0xff00) + (tmp1 & 0xff); \
psr = (tmp1 >> 16); \
zero = !(psr & 0x2); \
neg = (psr >> 7) & 1;
# else
# define ADC_INST() \
tmp1 = do_adc_sbc16(acc, arg & 0xffff, psr, 0); \
acc = (tmp1 & 0xffff); \
psr = (tmp1 >> 16); \
zero = !(psr & 0x2); \
neg = (psr >> 7) & 1;
# endif
#endif
# undef SBC_INST
#ifdef ASM
# ifdef ACC8
# define SBC_INST() \
uaddcm 0,ret0,ret0 ! \
b sbc_binary_8 ! \
extru acc,31,8,arg0
# else
# define SBC_INST() \
uaddcm 0,ret0,ret0 ! \
b sbc_binary_16 ! \
extru acc,31,16,arg0
# endif
#else /* C */
# ifdef ACC8
# define SBC_INST() \
tmp1 = do_adc_sbc8(acc & 0xff, arg & 0xff, psr, 1); \
acc = (acc & 0xff00) + (tmp1 & 0xff); \
psr = (tmp1 >> 16); \
zero = !(psr & 0x2); \
neg = (psr >> 7) & 1;
# else
# define SBC_INST() \
tmp1 = do_adc_sbc16(acc, arg & 0xffff, psr, 1); \
acc = (tmp1 & 0xffff); \
psr = (tmp1 >> 16); \
zero = !(psr & 0x2); \
neg = (psr >> 7) & 1;
# endif
#endif
# undef CMP_INST
#ifdef ASM
# ifdef ACC8
# define CMP_INST() ! \
extru acc,31,8,scratch1 ! \
subi 0x100,ret0,ret0 ! \
ldi 0xff,scratch2 ! \
add ret0,scratch1,ret0 ! \
extru ret0,23,1,scratch1 ! \
and ret0,scratch2,zero ! \
extru ret0,24,1,neg ! \
b dispatch ! \
dep scratch1,31,1,psr
# else
# define CMP_INST() ! \
ldil l%0x10000,scratch3 ! \
zdepi -1,31,16,scratch2 ! \
sub scratch3,ret0,ret0 ! \
add ret0,acc,ret0 ! \
extru ret0,15,1,scratch1 ! \
and ret0,scratch2,zero ! \
extru ret0,16,1,neg ! \
b dispatch ! \
dep scratch1,31,1,psr
# endif
#else /* C */
# ifdef ACC8
# define CMP_INST() \
arg = (acc & 0xff) + (0x100 - arg); \
SET_CARRY8(arg); \
arg = arg & 0xff; \
SET_NEG_ZERO8(arg & 0xff);
# else
# define CMP_INST() \
arg = (acc & 0xffff) + (0x10000 - arg); \
SET_CARRY16(arg); \
arg = arg & 0xffff; \
SET_NEG_ZERO16(arg & 0xffff);
# endif
#endif
# undef BIT_INST
#ifdef ASM
# ifdef ACC8
# define BIT_INST() \
ldi 0xff,scratch1 ! \
and acc,ret0,arg0 ! \
extru ret0,24,1,neg ! \
and arg0,scratch1,zero ! \
extru ret0,25,1,scratch2 ! \
b dispatch ! \
dep scratch2,25,1,psr
# else
# define BIT_INST() \
zdepi -1,31,16,scratch1 ! \
and acc,ret0,arg0 ! \
extru ret0,16,1,neg ! \
and arg0,scratch1,zero ! \
extru ret0,17,1,scratch2 ! \
b dispatch ! \
dep scratch2,25,1,psr
# endif
#else /* C */
# ifdef ACC8
# define BIT_INST() \
neg = arg >> 7; \
zero = (acc & arg & 0xff); \
psr = (psr & (~0x40)) | (arg & 0x40);
# else
# define BIT_INST() \
neg = arg >> 15; \
zero = (acc & arg & 0xffff); \
psr = (psr & (~0x40)) | ((arg >> 8) & 0x40);
# endif
#endif
# undef STA_INST
#ifdef ASM
# ifdef ACC8
# define STA_INST() \
extru acc,31,8,arg1 ! \
ldil l%dispatch,link ! \
b set_mem_long_8 ! \
ldo r%dispatch(link),link
# else
# define STA_INST() \
extru acc,31,16,arg1 ! \
ldil l%dispatch,link ! \
b set_mem_long_16 ! \
ldo r%dispatch(link),link
# endif
#else /* C*/
# ifdef ACC8
# define STA_INST(in_bank) \
SET_MEMORY8(arg, acc);
# else
# define STA_INST(in_bank) \
SET_MEMORY16(arg, acc, in_bank);
# endif
#endif
#undef TSB_INST
#ifdef ASM
# ifdef ACC8
/* Uses addr_latch as full apple addr to write data to */
# define TSB_INST() \
or acc,ret0,arg1 ! \
CYCLES_PLUS_1 ! \
extru arg1,31,8,arg1 ! \
and ret0,acc,zero ! \
copy addr_latch,arg0 ! \
extru zero,31,8,zero ! \
ldil l%dispatch,link ! \
b set_mem_long_8 ! \
ldo r%dispatch(link),link
# else
/* Uses addr_latch as full apple addr to write data to */
# define TSB_INST() \
or acc,ret0,arg1 ! \
CYCLES_PLUS_1 ! \
extru arg1,31,16,arg1 ! \
and ret0,acc,zero ! \
copy addr_latch,arg0 ! \
extru zero,31,16,zero ! \
ldil l%dispatch,link ! \
b set_mem_long_16 ! \
ldo r%dispatch(link),link
# endif
#else /* C*/
# ifdef ACC8
# define TSB_INST(in_bank) \
tmp1 = arg | acc; \
CYCLES_PLUS_1; \
zero = arg & acc; \
SET_MEMORY8(addr_latch, tmp1);
# else
# define TSB_INST(in_bank) \
tmp1 = arg | acc; \
CYCLES_PLUS_1; \
zero = arg & acc; \
SET_MEMORY16(addr_latch, tmp1, in_bank);
# endif
#endif
#undef ASL_INST
#ifdef ASM
# ifdef ACC8
/* Uses addr_latch as full apple addr to write data to */
# define ASL_INST() \
ldi 0xff,scratch1 ! \
copy addr_latch,arg0 ! \
sh1add ret0,0,scratch3 ! \
CYCLES_PLUS_1 ! \
extru scratch3,24,1,neg ! \
and scratch3,scratch1,zero ! \
extru scratch3,23,1,scratch2 ! \
copy zero,arg1 ! \
dep scratch2,31,1,psr /* set carry */ ! \
ldil l%dispatch,link ! \
b set_mem_long_8 ! \
ldo r%dispatch(link),link
# else
/* Uses addr_latch as full apple addr to write data to */
# define ASL_INST() \
zdepi -1,31,16,scratch1 ! \
copy addr_latch,arg0 ! \
sh1add ret0,0,scratch3 ! \
CYCLES_PLUS_1 ! \
extru scratch3,16,1,neg ! \
and scratch3,scratch1,zero ! \
extru scratch3,15,1,scratch2 ! \
copy zero,arg1 ! \
dep scratch2,31,1,psr /* set carry */ ! \
ldil l%dispatch,link ! \
b set_mem_long_16 ! \
ldo r%dispatch(link),link
# endif
#else /* C */
# ifdef ACC8
# define ASL_INST(in_bank) \
psr = (psr & 0x1fe) + ((arg >> 7) & 1); \
tmp1 = (arg << 1) & 0xff; \
CYCLES_PLUS_1; \
SET_NEG_ZERO8(tmp1); \
SET_MEMORY8(addr_latch, tmp1);
# else
# define ASL_INST(in_bank) \
psr = (psr & 0x1fe) + ((arg >> 15) & 1);\
tmp1 = (arg << 1) & 0xffff; \
CYCLES_PLUS_1; \
SET_NEG_ZERO16(tmp1); \
SET_MEMORY16(addr_latch, tmp1, in_bank);
# endif
#endif
# undef ROL_INST
#ifdef ASM
# ifdef ACC8
/* Uses addr_latch as full apple addr to write data to */
# define ROL_INST() \
extru psr,31,1,scratch2 ! \
ldi 0xff,scratch1 ! \
copy addr_latch,arg0 ! \
sh1add ret0,scratch2,scratch3 ! \
CYCLES_PLUS_1 ! \
extru scratch3,24,1,neg ! \
and scratch3,scratch1,zero ! \
extru scratch3,23,1,scratch2 ! \
copy zero,arg1 ! \
dep scratch2,31,1,psr /* set carry */ ! \
ldil l%dispatch,link ! \
b set_mem_long_8 ! \
ldo r%dispatch(link),link
# else
/* Uses addr_latch as full apple addr to write data to */
# define ROL_INST() \
extru psr,31,1,scratch2 ! \
copy addr_latch,arg0 ! \
zdepi -1,31,16,scratch1 ! \
sh1add ret0,scratch2,scratch3 ! \
CYCLES_PLUS_1 ! \
extru scratch3,16,1,neg ! \
and scratch3,scratch1,zero ! \
extru scratch3,15,1,scratch2 ! \
copy zero,arg1 ! \
dep scratch2,31,1,psr /* set carry */ ! \
ldil l%dispatch,link ! \
b set_mem_long_16 ! \
ldo r%dispatch(link),link
# endif
#else /* C */
# ifdef ACC8
# define ROL_INST(in_bank) \
arg = (arg << 1) | (psr & 1); \
SET_MEMORY8(addr_latch, arg); \
CYCLES_PLUS_1; \
SET_NEG_ZERO8(arg & 0xff); \
SET_CARRY8(arg);
# else
# define ROL_INST(in_bank) \
arg = (arg << 1) | (psr & 1); \
SET_MEMORY16(addr_latch, arg, in_bank); \
CYCLES_PLUS_1; \
SET_NEG_ZERO16(arg & 0xffff); \
SET_CARRY16(arg);
# endif
#endif
# undef LSR_INST
#ifdef ASM
# ifdef ACC8
/* Uses addr_latch as full apple addr to write data to */
# define LSR_INST() \
copy addr_latch,arg0 ! \
extru ret0,30,7,zero ! \
CYCLES_PLUS_1 ! \
ldi 0,neg ! \
dep ret0,31,1,psr /* set carry */ ! \
copy zero,arg1 ! \
ldil l%dispatch,link ! \
b set_mem_long_8 ! \
ldo r%dispatch(link),link
# else
/* Uses addr_latch as full apple addr to write data to */
# define LSR_INST() \
copy addr_latch,arg0 ! \
extru ret0,30,15,zero ! \
CYCLES_PLUS_1 ! \
ldi 0,neg ! \
dep ret0,31,1,psr /* set carry */ ! \
copy zero,arg1 ! \
ldil l%dispatch,link ! \
b set_mem_long_16 ! \
ldo r%dispatch(link),link
# endif
#else /* C */
# ifdef ACC8
# define LSR_INST(in_bank) \
SET_CARRY8(arg << 8); \
arg = (arg >> 1) & 0x7f; \
SET_MEMORY8(addr_latch, arg); \
CYCLES_PLUS_1; \
SET_NEG_ZERO8(arg);
# else
# define LSR_INST(in_bank) \
SET_CARRY16(arg << 16); \
arg = (arg >> 1) & 0x7fff; \
SET_MEMORY16(addr_latch, arg, in_bank); \
CYCLES_PLUS_1; \
SET_NEG_ZERO16(arg);
# endif
#endif
# undef ROR_INST
#ifdef ASM
# ifdef ACC8
# define ROR_INST() ! \
extru psr,31,1,neg ! \
copy addr_latch,arg0 ! \
extru ret0,30,7,zero ! \
CYCLES_PLUS_1 ! \
dep neg,24,1,zero ! \
copy zero,arg1 ! \
dep ret0,31,1,psr ! \
ldil l%dispatch,link ! \
b set_mem_long_8 ! \
ldo r%dispatch(link),link
# else
# define ROR_INST() ! \
extru psr,31,1,neg ! \
copy addr_latch,arg0 ! \
extru ret0,30,15,zero ! \
CYCLES_PLUS_1 ! \
dep neg,16,1,zero ! \
copy zero,arg1 ! \
dep ret0,31,1,psr ! \
ldil l%dispatch,link ! \
b set_mem_long_16 ! \
ldo r%dispatch(link),link
# endif
#else /* C */
# ifdef ACC8
# define ROR_INST(in_bank) \
tmp1 = psr & 1; \
SET_CARRY8(arg << 8); \
arg = ((arg >> 1) & 0x7f) | (tmp1 << 7); \
SET_MEMORY8(addr_latch, arg); \
CYCLES_PLUS_1; \
SET_NEG_ZERO8(arg);
# else
# define ROR_INST(in_bank) \
tmp1 = psr & 1; \
SET_CARRY16(arg << 16); \
arg = ((arg >> 1) & 0x7fff) | (tmp1 << 15); \
SET_MEMORY16(addr_latch, arg, in_bank); \
CYCLES_PLUS_1; \
SET_NEG_ZERO16(arg);
# endif
#endif
# undef TRB_INST
#ifdef ASM
# ifdef ACC8
/* Uses addr_latch as full apple addr to write data to */
# define TRB_INST() \
andcm ret0,acc,arg1 ! \
copy addr_latch,arg0 ! \
and ret0,acc,zero ! \
extru arg1,31,8,arg1 ! \
CYCLES_PLUS_1 ! \
extru zero,31,8,zero ! \
ldil l%dispatch,link ! \
b set_mem_long_8 ! \
ldo r%dispatch(link),link
# else
/* Uses addr_latch as full apple addr to write data to */
# define TRB_INST() \
andcm ret0,acc,arg1 ! \
CYCLES_PLUS_1 ! \
extru arg1,31,16,arg1 ! \
and ret0,acc,zero ! \
copy addr_latch,arg0 ! \
extru zero,31,16,zero ! \
ldil l%dispatch,link ! \
b set_mem_long_16 ! \
ldo r%dispatch(link),link
# endif
#else /* C */
# ifdef ACC8
# define TRB_INST(in_bank) \
arg = arg & 0xff; \
tmp1 = arg & ~acc; \
CYCLES_PLUS_1; \
zero = arg & acc; \
SET_MEMORY8(addr_latch, tmp1);
# else
# define TRB_INST(in_bank) \
tmp1 = arg & ~acc; \
CYCLES_PLUS_1; \
zero = arg & acc; \
SET_MEMORY16(addr_latch, tmp1, in_bank);
# endif
#endif
# undef DEC_INST
#ifdef ASM
# ifdef ACC8
# define DEC_INST() ! \
addi -1,ret0,ret0 ! \
copy addr_latch,arg0 ! \
extru ret0,24,1,neg ! \
CYCLES_PLUS_1 ! \
extru ret0,31,8,zero ! \
ldil l%dispatch,link ! \
copy zero,arg1 ! \
b set_mem_long_8 ! \
ldo r%dispatch(link),link
# else
# define DEC_INST() ! \
addi -1,ret0,ret0 ! \
copy addr_latch,arg0 ! \
extru ret0,16,1,neg ! \
CYCLES_PLUS_1 ! \
extru ret0,31,16,zero ! \
ldil l%dispatch,link ! \
copy zero,arg1 ! \
b set_mem_long_16 ! \
ldo r%dispatch(link),link
# endif
#else /* C */
# ifdef ACC8
# define DEC_INST(in_bank) \
CYCLES_PLUS_1; \
arg = (arg - 1) & 0xff; \
SET_MEMORY8(addr_latch, arg); \
SET_NEG_ZERO8(arg);
# else
# define DEC_INST(in_bank) \
CYCLES_PLUS_1; \
arg = (arg - 1) & 0xffff; \
SET_MEMORY16(addr_latch, arg, in_bank); \
SET_NEG_ZERO16(arg);
# endif
#endif
# undef INC_INST
#ifdef ASM
# ifdef ACC8
# define INC_INST() ! \
addi 1,ret0,ret0 ! \
copy addr_latch,arg0 ! \
extru ret0,24,1,neg ! \
CYCLES_PLUS_1 ! \
extru ret0,31,8,zero ! \
ldil l%dispatch,link ! \
copy zero,arg1 ! \
b set_mem_long_8 ! \
ldo r%dispatch(link),link
# else
# define INC_INST() ! \
addi 1,ret0,ret0 ! \
copy addr_latch,arg0 ! \
extru ret0,16,1,neg ! \
CYCLES_PLUS_1 ! \
extru ret0,31,16,zero ! \
ldil l%dispatch,link ! \
copy zero,arg1 ! \
b set_mem_long_16 ! \
ldo r%dispatch(link),link
# endif
#else /* C */
# ifdef ACC8
# define INC_INST(in_bank) \
CYCLES_PLUS_1; \
arg = (arg + 1) & 0xff; \
SET_MEMORY8(addr_latch, arg); \
SET_NEG_ZERO8(arg);
# else
# define INC_INST(in_bank) \
CYCLES_PLUS_1; \
arg = (arg + 1) & 0xffff; \
SET_MEMORY16(addr_latch, arg, in_bank); \
SET_NEG_ZERO16(arg);
# endif
#endif
# undef STZ_INST
#ifdef ASM
# ifdef ACC8
# define STZ_INST() \
ldi 0,arg1 ! \
ldil l%dispatch,link ! \
b set_mem_long_8 ! \
ldo r%dispatch(link),link
# else
# define STZ_INST() \
ldi 0,arg1 ! \
ldil l%dispatch,link ! \
b set_mem_long_16 ! \
ldo r%dispatch(link),link
# endif
#else /* C */
# ifdef ACC8
# define STZ_INST(in_bank) \
SET_MEMORY8(arg, 0);
# else
# define STZ_INST(in_bank) \
SET_MEMORY16(arg, 0, in_bank);
# endif
#endif
#undef COND_BR1
#undef COND_BR2
#undef COND_BR_UNTAKEN
#ifdef ASM
# define COND_BR1 \
ldb 1(scratch1),arg0
/* be careful about modifying kpc as first instr of COND_Br2 since it */
/* is in the delay slot of a branch! */
# define COND_BR2 \
addi 2,kpc,scratch3 ! \
ldi 0x100,scratch4 ! \
extrs arg0,31,8,ret0 ! \
and scratch4,psr,scratch4 ! \
add scratch3,ret0,ret0 ! \
CYCLES_PLUS_1 ! \
xor scratch3,ret0,scratch3 ! \
and,= scratch4,scratch3,0 ! \
CYCLES_PLUS_1 ! \
b dispatch ! \
dep ret0,31,16,kpc
# define COND_BR_UNTAKEN \
b dispatch ! \
INC_KPC_2
#else /* C */
# define BRANCH_DISP8(cond) \
GET_1BYTE_ARG; \
tmp2 = kpc & 0xff0000; \
kpc += 2; \
tmp1 = kpc; \
if(cond) { \
kpc = kpc + arg - ((arg & 0x80) << 1); \
CYCLES_PLUS_1; \
if((tmp1 ^ kpc) & psr & 0x100) { \
CYCLES_PLUS_1; \
} \
} \
kpc = tmp2 + (kpc & 0xffff);
#endif
#undef STY_INST
#undef STX_INST
#ifdef ASM
# define STY_INST() \
ldil l%dispatch,link ! \
b set_mem_yreg ! \
ldo r%dispatch(link),link
# define STX_INST() \
ldil l%dispatch,link ! \
b set_mem_xreg ! \
ldo r%dispatch(link),link
#else /* C */
# define STY_INST(in_bank) \
if(psr & 0x10) { \
SET_MEMORY8(arg, yreg); \
} else { \
SET_MEMORY16(arg, yreg, in_bank);\
}
# define STX_INST(in_bank) \
if(psr & 0x10) { \
SET_MEMORY8(arg, xreg); \
} else { \
SET_MEMORY16(arg, xreg, in_bank);\
}
#endif
#ifndef ASM
# define C_LDX_ABS_Y() \
GET_ABS_INDEX_ADDR_FOR_RD(yreg); \
LDX_INST(0);
# define C_LDY_ABS_X() \
GET_ABS_INDEX_ADDR_FOR_RD(xreg); \
LDY_INST(0);
# define C_LDX_ABS() \
GET_ABS_ADDR(); \
LDX_INST(0);
# define C_LDY_ABS() \
GET_ABS_ADDR(); \
LDY_INST(0);
# define C_LDX_DLOC() \
GET_DLOC_ADDR(); \
LDX_INST(1);
# define C_LDY_DLOC() \
GET_DLOC_ADDR(); \
LDY_INST(1);
# define C_LDY_DLOC_X() \
GET_DLOC_X_ADDR(); \
LDY_INST(1);
# define C_LDX_DLOC_Y() \
GET_DLOC_Y_ADDR(); \
LDX_INST(1);
# define CP_INDEX_VAL(index_reg) \
arg = 0x100 - arg + index_reg; \
if((psr & 0x10) == 0) { \
arg += 0xff00; \
SET_NEG_ZERO16(arg & 0xffff); \
SET_CARRY16(arg); \
} else { \
SET_NEG_ZERO8(arg & 0xff);\
SET_CARRY8(arg); \
}
# define CP_INDEX_LOAD(index_reg, in_bank) \
if((psr & 0x10) != 0) { \
GET_MEMORY8(arg, arg); \
} else { \
GET_MEMORY16(arg, arg, in_bank);\
} \
CP_INDEX_VAL(index_reg)
# define CPX_INST(in_bank) \
CP_INDEX_LOAD(xreg, in_bank);
# define CPY_INST(in_bank) \
CP_INDEX_LOAD(yreg, in_bank);
# define C_CPX_IMM() \
INC_KPC_2; \
if((psr & 0x10) == 0) { \
GET_2BYTE_ARG; \
CYCLES_PLUS_1; \
INC_KPC_1; \
} else { \
GET_1BYTE_ARG; \
} \
CP_INDEX_VAL(xreg);
# define C_CPY_IMM() \
INC_KPC_2; \
if((psr & 0x10) == 0) { \
GET_2BYTE_ARG; \
CYCLES_PLUS_1; \
INC_KPC_1; \
} else { \
GET_1BYTE_ARG; \
} \
CP_INDEX_VAL(yreg);
# define C_CPX_DLOC() \
GET_DLOC_ADDR(); \
CPX_INST(1);
# define C_CPY_DLOC() \
GET_DLOC_ADDR(); \
CPY_INST(1);
# define C_CPX_ABS() \
GET_ABS_ADDR(); \
CPX_INST(0);
# define C_CPY_ABS() \
GET_ABS_ADDR(); \
CPY_INST(0);
#endif
/* This is here to make sure all the macros expand to no instrs */
/* if defs_instr_end_8 - start != 0, then something did expand */
#ifdef ASM
# ifdef ACC8
.export defs_instr_end_8,data
defs_instr_end_8 .word 0
# else
.export defs_instr_end_16,data
defs_instr_end_16 .word 0
# endif
#endif
Reference in New Issue Copy Permalink