sa1ops.s

SFC游戏模拟器 snes9x 1.43 的原代码

/*******************************************************************************
  Snes9x - Portable Super Nintendo Entertainment System (TM) emulator.
 
  (c) Copyright 1996 - 2003 Gary Henderson ([e-mail]) and
                            Jerremy Koot ([e-mail])

  (c) Copyright 2002 - 2003 Matthew Kendora and
                            Brad Jorsch ([e-mail])
 

                      
  C4 x86 assembler and some C emulation code
  (c) Copyright 2000 - 2003 zsKnight ([e-mail]),
                            _Demo_ ([e-mail]), and
                            Nach ([e-mail])
                                          
  C4 C++ code
  (c) Copyright 2003 Brad Jorsch

  DSP-1 emulator code
  (c) Copyright 1998 - 2003 Ivar ([e-mail]), _Demo_, Gary Henderson,
                            John Weidman ([e-mail]),
                            neviksti ([e-mail]), and
                            Kris Bleakley ([e-mail])
 
  DSP-2 emulator code
  (c) Copyright 2003 Kris Bleakley, John Weidman, neviksti, Matthew Kendora, and
                     Lord Nightmare ([e-mail]

  OBC1 emulator code
  (c) Copyright 2001 - 2003 zsKnight, pagefault ([e-mail])
  Ported from x86 assembler to C by sanmaiwashi

  SPC7110 and RTC C++ emulator code
  (c) Copyright 2002 Matthew Kendora with research by
                     zsKnight, John Weidman, and Dark Force

  S-RTC C emulator code
  (c) Copyright 2001 John Weidman
  
  Super FX x86 assembler emulator code 
  (c) Copyright 1998 - 2003 zsKnight, _Demo_, and pagefault 

  Super FX C emulator code 
  (c) Copyright 1997 - 1999 Ivar and Gary Henderson.

  S-DD1 decompression code
  (c) Copyright 2003 Jose Luis Bravo

 
  Specific ports contains the works of other authors. See headers in
  individual files.
 
  Snes9x homepage: http://www.snes9x.com
 
  Permission to use, copy, modify and distribute Snes9x in both binary and
  source form, for non-commercial purposes, is hereby granted without fee,
  providing that this license information and copyright notice appear with
  all copies and any derived work.
 
  This software is provided 'as-is', without any express or implied
  warranty. In no event shall the authors be held liable for any damages
  arising from the use of this software.
 
  Snes9x is freeware for PERSONAL USE only. Commercial users should
  seek permission of the copyright holders first. Commercial use includes
  charging money for Snes9x or software derived from Snes9x.
 
  The copyright holders request that bug fixes and improvements to the code
  should be forwarded to them so everyone can benefit from the modifications
  in future versions.
 
  Super NES and Super Nintendo Entertainment System are trademarks of
  Nintendo Co., Limited and its subsidiary companies.
*******************************************************************************/
#define Registers SA1Registers
#undef VAR_CYCLES
#include "sa1struc.h"

#if 0
#define PCS SA1PCS
#define PB SA1PB
#define PP SA1PP
#define PL SA1PL
#define PH SA1PH
#define AA SA1AA
#define AL SA1AL
#define AH SA1AH
#define DD SA1DD
#define DL SA1DL
#define DH SA1DH
#define SS SA1SS
#define SL SA1SL
#define SH SA1SH
#define XX SA1XX
#define XL SA1XL
#define XH SA1XH
#define YY SA1YY
#define YL SA1YL
#define YH SA1YH
#endif

#undef _Carry
#define _Carry SA1_Carry
#undef _Zero
#define _Zero SA1_Zero
#undef _Negative
#define _Negative SA1_Negative
#undef _Overflow
#define _Overflow SA1_Overflow

#include "sa1addr.h"
#include "sa1ops.h"
#include "sa1gs.S"

.data
.zzz:
.string "*** IRQ\n"

.text

.globl S9xSA1MainLoop
S9xSA1MainLoop:
	LOAD_REGISTERS
	testl $IRQ_PENDING_FLAG, SA1Flags
	jz .nosa1irq2
	testb $0xff, SA1IRQActive
	jz .nosa1irq1
	testb $IRQ, FLAGS
	jnz .nosa1irq2
	cmpb $0, WaitingForInterrupt
	je .nosa1wait
	incl PC
	movb $0, WaitingForInterrupt
.nosa1wait:
	call S9xSA1Opcode_IRQ
	jmp .nosa1irq2
.nosa1irq1:
	andl $~IRQ_PENDING_FLAG, SA1Flags	
.nosa1irq2:
	movl $3, %eax
.instruction_loop:
	testb $0xff, SA1Executing
	jz .exit
	pushl %eax
#ifdef DEBUGGER
	testb $TRACE_FLAG, SA1Flags
	jz .NO_SA1_TRACE
	STORE_REGISTERS
	ccall S9xSA1Trace
	LOAD_REGISTERS
.NO_SA1_TRACE:
#endif
	xorl %eax, %eax
	movl SA1Opcodes, %ecx
#ifdef CPU_SHUTDOWN
        movl PC, SA1PCAtOpcodeStart
#endif
	movb (PC), %al
	incl PC
	jmp *(%ecx,%eax,4)
.globl S9xSA1MainAsmLoop
S9xSA1MainAsmLoop:
	popl %eax
	decl %eax
	jnz .instruction_loop
.exit:
	STORE_REGISTERS
	ret

/* ADC */
Op69M1:
	Immediate8 ADC
	Adc8 IMM8

Op69M0:
	Immediate16 ADC2
	Adc16 IMM16

Op65M1:
	Direct8 ADC2
	call S9xSA1GetByte
	Adc8 DIR8

Op65M0:
	Direct8 ADC
	call S9xSA1GetWord
	Adc16 DIR16
	
Op75M1:
	DirectIndexedX8 ADC
	call S9xSA1GetByte
	Adc8 DIX8

Op75M0:
	DirectIndexedX8 ADC2
	call S9xSA1GetWord
	Adc16 DIX16

Op72M1:
	DirectIndirect8 ADC
	call S9xSA1GetByte
	Adc8 DI8

Op72M0:
	DirectIndirect8 ADC2
	call S9xSA1GetWord
	Adc16 DI16

Op61M1:
	DirectIndexedIndirect8 ADC
	call S9xSA1GetByte
	Adc8 DII8

Op61M0:
	DirectIndexedIndirect8 ADC2
	call S9xSA1GetWord
	Adc16 DII16

Op71M1:
	DirectIndirectIndexed8 ADC
	call S9xSA1GetByte
	Adc8 DIIY8

Op71M0:
	DirectIndirectIndexed8 ADC2
	call S9xSA1GetWord
	Adc16 DIIY16

Op67M1:
	DirectIndirectLong8 ADC
	call S9xSA1GetByte
	Adc8 DIL8

Op67M0:
	DirectIndirectLong8 ADC2
	call S9xSA1GetWord
	Adc16 DIL16

Op77M1:
	DirectIndirectIndexedLong8 ADC
	call S9xSA1GetByte
	Adc8 DIIL8

Op77M0:
	DirectIndirectIndexedLong8 ADC2
	call S9xSA1GetWord
	Adc16 DIIL8

Op6DM1:
	Absolute8 ADC
	call S9xSA1GetByte
	Adc8 ABS8

Op6DM0:
	Absolute8 ADC2
	call S9xSA1GetWord
	Adc16 ABS16

Op7DM1:
	AbsoluteIndexedX8 ADC
	call S9xSA1GetByte
	Adc8 ABSX8

Op7DM0:
	AbsoluteIndexedX8 ADC2
	call S9xSA1GetWord
	Adc16 ABSX16

Op79M1:
	AbsoluteIndexedY8 ADC
	call S9xSA1GetByte
	Adc8 ABSY8

Op79M0:
	AbsoluteIndexedY8 ADC2
	call S9xSA1GetWord
	Adc16 ABSY16

Op6FM1:
	AbsoluteLong8 ADC
	call S9xSA1GetByte
	Adc8 ABSL8

Op6FM0:
	AbsoluteLong8 ADC2
	call S9xSA1GetWord
	Adc16 ABSL16

Op7FM1:
	AbsoluteLongIndexedX8 ADC
	call S9xSA1GetByte
	Adc8 ALX8

Op7FM0:
	AbsoluteLongIndexedX8 ADC2
	call S9xSA1GetWord
	Adc16 ALX16

Op63M1:
	StackRelative8 ADC
	call S9xSA1GetByte
	Adc8 SREL8

Op63M0:
	StackRelative8 ADC2
	call S9xSA1GetWord
	Adc16 SREL16

Op73M1:
	StackRelativeIndirectIndexed8 ADC
	call S9xSA1GetByte
	Adc8 SRII8

Op73M0:
	StackRelativeIndirectIndexed8 ADC2
	call S9xSA1GetWord
	Adc16 SRII16

/* AND */
Op29M1:
	Immediate8 AND
	And8 IMM8

Op29M0:
	Immediate16 AND
	And16 IMM16

Op25M1:
	Direct8 AND
	call S9xSA1GetByte
	And8 DIR8

Op25M0:
	Direct8 AND2
	call S9xSA1GetWord
	And16 DIR16

Op35M1:
	DirectIndexedX8 AND
	call S9xSA1GetByte
	And8 DIX8

Op35M0:
	DirectIndexedX8 AND2
	call S9xSA1GetWord
	And16 DIX16

Op32M1:
	DirectIndirect8 AND
	call S9xSA1GetByte
	And8 DI8

Op32M0:
	DirectIndirect8 AND2
	call S9xSA1GetWord
	And16 DI16

Op21M1:
	DirectIndexedIndirect8 AND
	call S9xSA1GetByte
	And8 DII8

Op21M0:
	DirectIndexedIndirect8 AND2
	call S9xSA1GetWord
	And16 DII16

Op31M1:
	DirectIndirectIndexed8 AND
	call S9xSA1GetByte
	And8 DIIY8

Op31M0:
	DirectIndirectIndexed8 AND2
	call S9xSA1GetWord
	And16 DIIY16

Op27M1:
	DirectIndirectLong8 AND
	call S9xSA1GetByte
	And8 DIL8

Op27M0:
	DirectIndirectLong8 AND2
	call S9xSA1GetWord
	And16 DIL16

Op37M1:
	DirectIndirectIndexedLong8 AND
	call S9xSA1GetByte
	And8 DIIL8

Op37M0:
	DirectIndirectIndexedLong8 AND2
	call S9xSA1GetWord
	And16 DIIL16

Op2DM1:
	Absolute8 AND
	call S9xSA1GetByte
	And8 ABS8

Op2DM0:
	Absolute8 AND2
	call S9xSA1GetWord
	And16 ABS16

Op3DM1:
	AbsoluteIndexedX8 AND
	call S9xSA1GetByte
	And8 ABSX8

Op3DM0:
	AbsoluteIndexedX8 AND2
	call S9xSA1GetWord
	And16 ABSX16

Op39M1:
	AbsoluteIndexedY8 AND
	call S9xSA1GetByte
	And8 ABSY8

Op39M0:
	AbsoluteIndexedY8 AND2
	call S9xSA1GetWord
	And16 ABSY16

Op2FM1:
	AbsoluteLong8 AND
	call S9xSA1GetByte
	And8 ABSL8

Op2FM0:
	AbsoluteLong8 AND2
	call S9xSA1GetWord
	And16 ABSL16

Op3FM1:
	AbsoluteLongIndexedX8 AND
	call S9xSA1GetByte
	And8 ALX8

Op3FM0:
	AbsoluteLongIndexedX8 AND2
	call S9xSA1GetWord
	And16 ALX16

Op23M1:
	StackRelative8 AND
	call S9xSA1GetByte
	And8 SREL8

Op23M0:
	StackRelative8 AND2
	call S9xSA1GetWord
	And16 SREL16

Op33M1:
	StackRelativeIndirectIndexed8 AND
	call S9xSA1GetByte
	And8 SRII8

Op33M0:
	StackRelativeIndirectIndexed8 AND2
	call S9xSA1GetWord
	And16 SRII16

/* ASL */
Op0AM1:
	movb AL, %al
	salb %al
	movb %al, AL
	SetZNC
	jmp S9xSA1MainAsmLoop

Op0AM0:
	movw AA, %ax
	salw %ax
	movw %ax, AA
	setnz SA1_Zero
	setc SA1_Carry
	movb %ah, SA1_Negative
	jmp S9xSA1MainAsmLoop
	
Op06M1:
	Direct8 ASL
	Asl8 DIR8

Op06M0:
	Direct8 ASL2
	Asl16 DIR16

Op16M1:
	DirectIndexedX8 ASL
	Asl8 DIX

Op16M0:
	DirectIndexedX8 ASL2
	Asl16 DIX

Op0EM1:
	Absolute8 ASL
	Asl8 ABS

Op0EM0:
	Absolute8 ASL2
	Asl16 ABS

Op1EM1:
	AbsoluteIndexedX8 ASL
	Asl8 ABSX

Op1EM0:
	AbsoluteIndexedX8 ASL2
	Asl16 ABSX

/* BIT */
Op89M1:
	Immediate8 BIT
	andb AL, %al
	movb %al, SA1_Zero
	jmp S9xSA1MainAsmLoop

Op89M0:
	Immediate16 BIT
	andw AA, %ax
	setnz SA1_Zero
	jmp S9xSA1MainAsmLoop

Op24M1:
	Direct8 BIT
	Bit8 DIR

Op24M0:
	Direct8 BIT
	Bit16 DIR

Op34M1:
	DirectIndexedX8 BIT
	Bit8 DIX

Op34M0:
	DirectIndexedX8 BIT2
	Bit16 DIX

Op2CM1:
	Absolute8 BIT
	Bit8 ABS

Op2CM0:
	Absolute8 BIT2
	Bit16 ABS

Op3CM1:
	AbsoluteIndexedX8 BIT
	Bit8 ABSX

Op3CM0:
	AbsoluteIndexedX8 BIT2
	Bit16 ABSX

/* CMP */
OpC9M1:
	Immediate8 CMP
	Cmp8 IMM

OpC9M0:
	Immediate16 CMP
	Cmp16 IMM

OpC5M1:
	Direct8 CMP
	call S9xSA1GetByte
	Cmp8 DIR

OpC5M0:
	Direct8 CMP2
	call S9xSA1GetWord
	Cmp16 DIR

OpD5M1:
	DirectIndexedX8 CMP
	call S9xSA1GetByte
	Cmp8 DIX

OpD5M0:
	DirectIndexedX8 CMP2
	call S9xSA1GetWord
	Cmp16 DIX

OpD2M1:
	DirectIndirect8 CMP
	call S9xSA1GetByte
	Cmp8 DI

OpD2M0:
	DirectIndirect8 CMP2
	call S9xSA1GetWord
	Cmp16 DI

OpC1M1:
	DirectIndexedIndirect8 CMP
	call S9xSA1GetByte
	Cmp8 DII

OpC1M0:
	DirectIndexedIndirect8 CMP2
	call S9xSA1GetWord
	Cmp16 DII

OpD1M1:
	DirectIndirectIndexed8 CMP
	call S9xSA1GetByte
	Cmp8 DIIY

OpD1M0:
	DirectIndirectIndexed8 CMP2
	call S9xSA1GetWord
	Cmp16 DIIY

OpC7M1:
	DirectIndirectLong8 CMP
	call S9xSA1GetByte
	Cmp8 DIL

OpC7M0:
	DirectIndirectLong8 CMP2
	call S9xSA1GetWord
	Cmp16 DIL

OpD7M1:
	DirectIndirectIndexedLong8 CMP
	call S9xSA1GetByte
	Cmp8 DIIL

OpD7M0:
	DirectIndirectIndexedLong8 CMP2
	call S9xSA1GetWord
	Cmp16 DIIL

OpCDM1:
	Absolute8 CMP
	call S9xSA1GetByte
	Cmp8 ABS

OpCDM0:
	Absolute8 CMP2
	call S9xSA1GetWord
	Cmp16 ABS

OpDDM1:
	AbsoluteIndexedX8 CMP
	call S9xSA1GetByte
	Cmp8 ABSX

OpDDM0:
	AbsoluteIndexedX8 CMP2
	call S9xSA1GetWord
	Cmp16 ABSX

OpD9M1:
	AbsoluteIndexedY8 CMP
	call S9xSA1GetByte
	Cmp8 ABSY

OpD9M0:
	AbsoluteIndexedY8 CMP2
	call S9xSA1GetWord
	Cmp16 ABSY

OpCFM1:
	AbsoluteLong8 CMP
	call S9xSA1GetByte
	Cmp8 ABSL

OpCFM0:
	AbsoluteLong8 CMP2
	call S9xSA1GetWord
	Cmp16 ABSL

OpDFM1:
	AbsoluteLongIndexedX8 CMP
	call S9xSA1GetByte
	Cmp8 ALX

OpDFM0:
	AbsoluteLongIndexedX8 CMP2
	call S9xSA1GetWord
	Cmp16 ALX

OpC3M1:
	StackRelative8 CMP
	call S9xSA1GetByte
	Cmp8 SREL

OpC3M0:
	StackRelative8 CMP2
	call S9xSA1GetWord
	Cmp16 SREL

OpD3M1:
	StackRelativeIndirectIndexed8 CMP
	call S9xSA1GetByte
	Cmp8 SRII

OpD3M0:
	StackRelativeIndirectIndexed8 CMP2
	call S9xSA1GetWord
	Cmp16 SRII

/* CPX */
OpE0X1:
	Immediate8 CPX
	Cpx8 IMM

OpE0X0:
	Immediate16 CPX
	Cpx16 IMM

OpE4X1:
	Direct8 CPX
	call S9xSA1GetByte
	Cpx8 DIR

OpE4X0:
	Direct8 CPX2
	call S9xSA1GetWord
	Cpx16 DIR

OpECX1:
	Absolute8 CPX
	call S9xSA1GetByte
	Cpx8 ABS

OpECX0:
	Absolute8 CPX2
	call S9xSA1GetWord
	Cpx16 ABS


/* CPY */
OpC0X1:
	Immediate8 CPY
	Cpy8 IMM

OpC0X0:
	Immediate16 CPY
	Cpy16 IMM

OpC4X1:
	Direct8 CPY
	call S9xSA1GetByte
	Cpy8 DIR

OpC4X0:
	Direct8 CPY2
	call S9xSA1GetWord
	Cpy16 DIR

OpCCX1:
	Absolute8 CPY
	call S9xSA1GetByte
	Cpy8 ABS

OpCCX0:
	Absolute8 CPY2
	call S9xSA1GetWord
	Cpy16 ABS

/* DEC */
Op3AM1:
	movb AL, %al
	decb %al
	movb %al, AL
	SetZN
	jmp S9xSA1MainAsmLoop

Op3AM0:
	decw AA
	setnz SA1_Zero
	movb AH, %al
	movb %al, SA1_Negative
	jmp S9xSA1MainAsmLoop

OpC6M1:
	Direct8 DEC
	Dec8 DIR

OpC6M0:
	Direct8 DEC2
	Dec16 DIR

OpD6M1:
	DirectIndexedX8 DEC
	Dec8 DIX

OpD6M0:
	DirectIndexedX8 DEC2
	Dec16 DIX

OpCEM1:
	Absolute8 DEC
	Dec8 ABS

OpCEM0:
	Absolute8 DEC2
	Dec16 ABS

OpDEM1:
	AbsoluteIndexedX8 DEC

	Dec8 ABSX

OpDEM0:
	AbsoluteIndexedX8 DEC2
	Dec16 ABSX

/* EOR */
Op49M1:
	Immediate8 EOR
	Eor8 IMM

Op49M0:
	Immediate16 EOR
	Eor16 IMM

Op45M1:
	Direct8 EOR
	call S9xSA1GetByte
	Eor8 DIR

Op45M0:
	Direct8 EOR2
	call S9xSA1GetWord
	Eor16 DIR

Op55M1:
	DirectIndexedX8 EOR
	call S9xSA1GetByte
	Eor8 DIX

Op55M0:
	DirectIndexedX8 EOR2
	call S9xSA1GetWord
	Eor16 DIX

Op52M1:
	DirectIndirect8 EOR
	call S9xSA1GetByte
	Eor8 DI

Op52M0:
	DirectIndirect8 EOR2
	call S9xSA1GetWord
	Eor16 DI

Op41M1:
	DirectIndexedIndirect8 EOR
	call S9xSA1GetByte
	Eor8 DII

Op41M0:
	DirectIndexedIndirect8 EOR2
	call S9xSA1GetWord
	Eor16 DII

Op51M1:
	DirectIndirectIndexed8 EOR
	call S9xSA1GetByte
	Eor8 DIIY

Op51M0:
	DirectIndirectIndexed8 EOR2
	call S9xSA1GetWord
	Eor16 DIIY

Op47M1:
	DirectIndirectLong8 EOR
	call S9xSA1GetByte
	Eor8 DIL

Op47M0:
	DirectIndirectLong8 EOR2
	call S9xSA1GetWord
	Eor16 DIL

Op57M1:
	DirectIndirectIndexedLong8 EOR
	call S9xSA1GetByte
	Eor8 DIIL

Op57M0:
	DirectIndirectIndexedLong8 EOR2
	call S9xSA1GetWord
	Eor16 DIIL

Op4DM1:
	Absolute8 EOR
	call S9xSA1GetByte
	Eor8 ABS

Op4DM0:
	Absolute8 EOR2
	call S9xSA1GetWord
	Eor16 ABS

Op5DM1: