rnd-20091012-1-src
[rocksndiamonds.git] / src / game_sp / Input.c
index 24438057c0810497bd8b7105d3515075bfff8506..42ad1201ae2c8d4e93d35c27545d02b8a032bd70 100644 (file)
@@ -4,7 +4,8 @@
 
 #include "Input.h"
 
-static char *VB_Name = "modInput";
+// static char *VB_Name = "modInput";
+
 // --- Option Explicit
 
 boolean KeyState[255 + 1];
@@ -40,7 +41,7 @@ int subProcessKeyboardInput()
 {
   int subProcessKeyboardInput;
 
-  int LastKey;
+  static int LastKey = 0;
 
   //  On Error GoTo NoKeyboardAccessEH
   //    Call DKeyboard.Acquire
@@ -125,6 +126,10 @@ int subProcessKeyboardInput()
     }
     else
     {
+#if 1
+      printf("::: Input.c: subProcessKeyboardInput(): kill murphy\n");
+#endif
+
       KillMurphyFlag = 1;
       //        ExplodeFieldSP MurphyPosIndex
       //        LeadOutCounter = &H20
@@ -148,7 +153,7 @@ int subProcessKeyboardInput()
   //  Call DKeyboard.Unacquire
   return subProcessKeyboardInput;
 
-NoKeyboardAccessEH:
+  // NoKeyboardAccessEH:
   Debug.Print("! Keyboard access");
 
   return subProcessKeyboardInput;