rnd-20090719-2-src
[rocksndiamonds.git] / src / game_sp / MainForm.c
index f2fe86fd80244d2203b14e5fb455699a2302a2cb..8022080ac4759e95f5c6901bbba39ddad32a3694 100644 (file)
@@ -661,11 +661,12 @@ void DrawFieldNoAnimated(int X, int Y);
 // ---    End
 // --- End
 
-static char *VB_Name = "MainForm";
-static boolean VB_GlobalNameSpace = False;
-static boolean VB_Creatable = False;
-static boolean VB_PredeclaredId = True;
-static boolean VB_Exposed = False;
+// static char *VB_Name = "MainForm";
+// static boolean VB_GlobalNameSpace = False;
+// static boolean VB_Creatable = False;
+// static boolean VB_PredeclaredId = True;
+// static boolean VB_Exposed = False;
+
 // --- Option Explicit
 // --- Option Compare Text
 
@@ -699,6 +700,8 @@ TickCountObject T;
 
 const char *AppTitle = "MegaPlex";
 
+#if 0
+
 static char *GetSpeedDescriptionFPS(currency FrameDelayUS)
 {
   static char *GetSpeedDescriptionFPS;
@@ -775,8 +778,6 @@ static int GetSpeedIndex(long DelayUS)
   return GetSpeedIndex;
 }
 
-#if 0
-
 static long Get_LastOpenFilter()
 {
   static long LastOpenFilter;
@@ -817,6 +818,9 @@ static void Let_LastSaveFilter(long NewVal)
 
 static void CountDown(long HalfSeconds, int bDisplayBar)
 {
+
+#if 0
+
   long i;
   int k;
   long dT, Delta;
@@ -856,8 +860,13 @@ static void CountDown(long HalfSeconds, int bDisplayBar)
 
   shpProgress.Visible = False;
   // lblFrameCount = 0
+
+#endif
+
 }
 
+#if 0
+
 static char *GetValidTempPath()
 {
   static char *GetValidTempPath;
@@ -904,8 +913,6 @@ static char *GetValidTempPath()
   return GetValidTempPath;
 }
 
-#if 0
-
 static char *GetMyTempFileName()
 {
   static char *GetMyTempFileName;
@@ -1298,8 +1305,6 @@ static void Form_KeyUp(int KeyCode, int Shift)
   picPane_KeyUp(KeyCode, Shift);
 }
 
-#endif
-
 static void Form_Load()
 {
 #if 0
@@ -1360,8 +1365,6 @@ static void Form_Load()
 #endif
 }
 
-#if 0
-
 static void FillLevelList(char *Path, int LevelIndex)
 {
   long FNum, LevLen, i, iMax;
@@ -1617,6 +1620,8 @@ static void DrawFrame(int Delta)
   }
 }
 
+#if 0
+
 static void RestoreFrame()
 {
   int i, LX, tY, RX, BY;
@@ -1638,8 +1643,6 @@ static void RestoreFrame()
   }
 }
 
-#if 0
-
 static void Form_Unload(int Cancel)
 {
   EndFlag = True;
@@ -2407,7 +2410,9 @@ void menPlay_Click()
 #endif
 
   LastFrame = 0;
-  LastTick = T.TickNow;
+#if 0
+  LastTick = T.TickNow();
+#endif
 
 #if 0
 
@@ -2425,10 +2430,13 @@ void menPlay_Click()
 #endif
 
   subFetchAndInitLevelB();
+
   // Trace "MainForm", "CountDown 1"
   CountDown(2, (0 == DemoFlag));
   // Trace "MainForm", "Call GoPlay"
+
   GoPlay();
+
   // Trace "MainForm", "GoPlay returned"
 
 #if 0
@@ -2454,8 +2462,11 @@ void menPlay_Click()
 
   bPlaying = False;
   // Trace "MainForm", "Call subFetchAndInitLevel"
+
   subFetchAndInitLevel();
+
   // Trace "MainForm", "subFetchAndInitLevel returned"
+
   Stage.Blt();
 
 #if 0