start moving everything to C

1 files changed, 237 insertions, 0 deletions

diff --git a/source/c4.c b/source/c4.c
new file mode 100644
index 0000000..8774f46
--- /dev/null
+++ b/source/c4.c
@@ -0,0 +1,237 @@
+/*******************************************************************************
+  Snes9x - Portable Super Nintendo Entertainment System (TM) emulator.
+ 
+  (c) Copyright 1996 - 2002 Gary Henderson (gary.henderson@ntlworld.com) and
+                            Jerremy Koot (jkoot@snes9x.com)
+
+  (c) Copyright 2001 - 2004 John Weidman (jweidman@slip.net)
+
+  (c) Copyright 2002 - 2004 Brad Jorsch (anomie@users.sourceforge.net),
+                            funkyass (funkyass@spam.shaw.ca),
+                            Joel Yliluoma (http://iki.fi/bisqwit/)
+                            Kris Bleakley (codeviolation@hotmail.com),
+                            Matthew Kendora,
+                            Nach (n-a-c-h@users.sourceforge.net),
+                            Peter Bortas (peter@bortas.org) and
+                            zones (kasumitokoduck@yahoo.com)
+
+  C4 x86 assembler and some C emulation code
+  (c) Copyright 2000 - 2003 zsKnight (zsknight@zsnes.com),
+                            _Demo_ (_demo_@zsnes.com), and Nach
+
+  C4 C++ code
+  (c) Copyright 2003 Brad Jorsch
+
+  DSP-1 emulator code
+  (c) Copyright 1998 - 2004 Ivar (ivar@snes9x.com), _Demo_, Gary Henderson,
+                            John Weidman, neviksti (neviksti@hotmail.com),
+                            Kris Bleakley, Andreas Naive
+
+  DSP-2 emulator code
+  (c) Copyright 2003 Kris Bleakley, John Weidman, neviksti, Matthew Kendora, and
+                     Lord Nightmare (lord_nightmare@users.sourceforge.net
+
+  OBC1 emulator code
+  (c) Copyright 2001 - 2004 zsKnight, pagefault (pagefault@zsnes.com) and
+                            Kris Bleakley
+  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-DD1 C emulator code
+  (c) Copyright 2003 Brad Jorsch with research by
+                     Andreas Naive and John Weidman
+ 
+  S-RTC C emulator code
+  (c) Copyright 2001 John Weidman
+  
+  ST010 C++ emulator code
+  (c) Copyright 2003 Feather, Kris Bleakley, John Weidman and Matthew Kendora
+
+  Super FX x86 assembler emulator code 
+  (c) Copyright 1998 - 2003 zsKnight, _Demo_, and pagefault 
+
+  Super FX C emulator code 
+  (c) Copyright 1997 - 1999 Ivar, Gary Henderson and John Weidman
+
+
+  SH assembler code partly based on x86 assembler code
+  (c) Copyright 2002 - 2004 Marcus Comstedt (marcus@mc.pp.se) 
+
+ 
+  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.
+*******************************************************************************/
+#include <math.h>
+#include <stdlib.h>
+#include "c4.h"
+#include "memmap.h"
+extern "C" {
+
+short C4WFXVal;
+short C4WFYVal;
+short C4WFZVal;
+short C4WFX2Val;
+short C4WFY2Val;
+short C4WFDist;
+short C4WFScale;
+
+static double tanval;
+static double c4x, c4y, c4z;
+static double c4x2, c4y2, c4z2;
+
+void C4TransfWireFrame ()
+{
+    c4x = (double) C4WFXVal;
+    c4y = (double) C4WFYVal;
+    c4z = (double) C4WFZVal - 0x95;
+    
+    // Rotate X
+    tanval = -(double) C4WFX2Val * 3.14159265 * 2 / 128;
+    c4y2 = c4y * cos (tanval) - c4z * sin (tanval);
+    c4z2 = c4y * sin (tanval) + c4z * cos (tanval);
+    
+    // Rotate Y
+    tanval = -(double)C4WFY2Val*3.14159265*2/128;
+    c4x2 = c4x * cos (tanval) + c4z2 * sin (tanval);
+    c4z = c4x * - sin (tanval) + c4z2 * cos (tanval);
+    
+    // Rotate Z
+    tanval = -(double) C4WFDist * 3.14159265*2 / 128;
+    c4x = c4x2 * cos (tanval) - c4y2 * sin (tanval);
+    c4y = c4x2 * sin (tanval) + c4y2 * cos (tanval);
+    
+    // Scale
+    C4WFXVal = (short) (c4x*(double)C4WFScale/(0x90*(c4z+0x95))*0x95);
+    C4WFYVal = (short) (c4y*(double)C4WFScale/(0x90*(c4z+0x95))*0x95);
+}
+
+void C4TransfWireFrame2 ()
+{
+    c4x = (double)C4WFXVal;
+    c4y = (double)C4WFYVal;
+    c4z = (double)C4WFZVal;
+    
+    // Rotate X
+    tanval = -(double) C4WFX2Val * 3.14159265 * 2 / 128;
+    c4y2 = c4y * cos (tanval) - c4z * sin (tanval);
+    c4z2 = c4y * sin (tanval) + c4z * cos (tanval);
+    
+    // Rotate Y
+    tanval = -(double) C4WFY2Val * 3.14159265 * 2 / 128;
+    c4x2 = c4x * cos (tanval) + c4z2 * sin (tanval);
+    c4z = c4x * -sin (tanval) + c4z2 * cos (tanval);
+    
+    // Rotate Z
+    tanval = -(double)C4WFDist * 3.14159265 * 2 / 128;
+    c4x = c4x2 * cos (tanval) - c4y2 * sin (tanval);
+    c4y = c4x2 * sin (tanval) + c4y2 * cos (tanval);
+    
+    // Scale
+    C4WFXVal =(short)(c4x * (double)C4WFScale / 0x100);
+    C4WFYVal =(short)(c4y * (double)C4WFScale / 0x100);
+}
+
+void C4CalcWireFrame ()
+{
+    C4WFXVal = C4WFX2Val - C4WFXVal;
+    C4WFYVal = C4WFY2Val - C4WFYVal;
+    if (abs (C4WFXVal) > abs (C4WFYVal))
+    {
+        C4WFDist = abs (C4WFXVal) + 1;
+        C4WFYVal = (short) (256 * (double) C4WFYVal / abs (C4WFXVal));
+        if (C4WFXVal < 0)
+            C4WFXVal = -256;
+        else 
+            C4WFXVal = 256;
+    }
+    else
+    {
+        if (C4WFYVal != 0) 
+        {
+            C4WFDist = abs(C4WFYVal)+1;
+            C4WFXVal = (short) (256 * (double)C4WFXVal / abs (C4WFYVal));
+            if (C4WFYVal < 0)
+                C4WFYVal = -256;
+            else 
+                C4WFYVal = 256;
+        }
+        else 
+            C4WFDist = 0;
+    }
+}
+
+short C41FXVal;
+short C41FYVal;
+short C41FAngleRes;
+short C41FDist;
+short C41FDistVal;
+
+void C4Op1F ()
+{
+    if (C41FXVal == 0) 
+    {
+        if (C41FYVal > 0) 
+            C41FAngleRes = 0x80;
+        else 
+            C41FAngleRes = 0x180;
+    }
+    else 
+    {
+        tanval = (double) C41FYVal / C41FXVal;
+        C41FAngleRes = (short) (atan (tanval) / (3.141592675 * 2) * 512);
+        C41FAngleRes = C41FAngleRes;
+        if (C41FXVal< 0) 
+            C41FAngleRes += 0x100;
+        C41FAngleRes &= 0x1FF;
+    }
+}
+
+void C4Op15()
+{
+    tanval = sqrt ((double) C41FYVal * C41FYVal + (double) C41FXVal * C41FXVal);
+    C41FDist = (short) tanval;
+}
+
+void C4Op0D()
+{
+    tanval = sqrt ((double) C41FYVal * C41FYVal + (double) C41FXVal * C41FXVal);
+    tanval = C41FDistVal / tanval;
+    C41FYVal = (short) (C41FYVal * tanval * 0.99);
+    C41FXVal = (short) (C41FXVal * tanval * 0.98);
+}
+
+#ifdef ZSNES_C4
+void C4LoaDMem(char *C4RAM)
+{
+  memmove(C4RAM+(READ_WORD(C4RAM+0x1f45)&0x1fff), 
+          S9xGetMemPointer(READ_3WORD(C4RAM+0x1f40)),
+          READ_WORD(C4RAM+0x1f43));
+}
+#endif
+}//end extern C
+