From 83ec09c960872cb171bb1659317eba0130327d40 Mon Sep 17 00:00:00 2001
From: brandman211 <brandman211@gmail.com>
Date: Sat, 29 Dec 2012 09:55:37 +0000
Subject: [PATCH] Added GB(C/A) and A2800 framerates to GetSeconds, fixing the
 related movie lengths in the PlayMovie dialog. Assigned A7800 to and Coleco
 to use A2800's NTSC framerate. No clue about PAL for anything.

---
 BizHawk.Emulation/BizHawk.Emulation.csproj |  2 +-
 BizHawk.MultiClient/movie/Movie.cs         | 11 +++++++++++
 2 files changed, 12 insertions(+), 1 deletion(-)

diff --git a/BizHawk.Emulation/BizHawk.Emulation.csproj b/BizHawk.Emulation/BizHawk.Emulation.csproj
index 27650cbee4..237fca502a 100644
--- a/BizHawk.Emulation/BizHawk.Emulation.csproj
+++ b/BizHawk.Emulation/BizHawk.Emulation.csproj
@@ -161,7 +161,7 @@
     <Compile Include="Consoles\Coleco\MemoryMap.cs" />
     <Compile Include="Consoles\Coleco\TMS9918A.cs" />
     <Compile Include="Consoles\Intellivision\Cartridge.cs" />
-    <Compile Include="Consoles\Intellivision\ICart.cs" />
+    <Compile Include="Consoles\Coleco\ICart.cs" />
     <Compile Include="Consoles\Intellivision\Intellicart.cs" />
     <Compile Include="Consoles\Intellivision\Intellivision.cs" />
     <Compile Include="Consoles\Intellivision\MemoryMap.cs" />
diff --git a/BizHawk.MultiClient/movie/Movie.cs b/BizHawk.MultiClient/movie/Movie.cs
index 9293368ddc..15bd2ccadb 100644
--- a/BizHawk.MultiClient/movie/Movie.cs
+++ b/BizHawk.MultiClient/movie/Movie.cs
@@ -1023,6 +1023,8 @@ namespace BizHawk.MultiClient
 			const double VBOY = (20000000 / (259 * 384 * 4));  //~50.273
 			const double LYNX = 59.8;
 			const double WSWAN = (3072000.0 / (159 * 256));
+			const double GB = 59.7275005696058;
+			const double A26 = 59.9227510135505;
 			double seconds = 0;
 			double frames = (double)frameCount;
 			if (frames < 1)
@@ -1042,6 +1044,7 @@ namespace BizHawk.MultiClient
 				case "FDS":
 				case "NES":
 				case "SNES":
+				case "SGB":
 					if (pal)
 						return frames / NES_PAL;
 					else
@@ -1049,6 +1052,14 @@ namespace BizHawk.MultiClient
 				case "PCE":
 				case "PCECD":
 					return frames / PCE;
+				case "GB":
+				case "GBC":
+				case "GBA":
+					return frames / GB;
+				case "A26":
+				case "A78":
+				case "Coleco":
+					return frames / A26;
 
 				//One Day!
 				case "VBOY":