hedgewars/hwengine.pas
changeset 2671 7e0f88013fe8
parent 2669 4eec706e86b0
child 2674 2fce032f2f95
--- a/hedgewars/hwengine.pas	Thu Dec 24 13:38:20 2009 +0000
+++ b/hedgewars/hwengine.pas	Sun Jan 03 15:40:41 2010 +0000
@@ -161,7 +161,7 @@
 {$IFDEF TOUCHINPUT}
 type TDirection = (nodir, left, right);
 var x, y, dx, dy, mouseState: LongInt;
-    tiltValue: LongInt;
+//    tiltValue: LongInt;
     direction: TDirection = nodir;
     movedbybuttons: boolean = false;
 {$ENDIF}
@@ -194,8 +194,9 @@
 {$IFDEF DEBUGFILE}
                         AddFileLog('*********************************************       motion');
 {$ENDIF}
-                        mouseState:= SDL_GetMouseState(0, @x, @y);
-                        SDL_GetRelativeMouseState(0, @dx, @dy);
+						SDL_SelectMouse(event.motion.which);
+                        mouseState:= SDL_GetMouseState(@x, @y);
+                        SDL_GetRelativeMouseState(event.motion.which, @dx, @dy);
                         
                         direction:= nodir;
 
@@ -231,8 +232,9 @@
 {$IFDEF DEBUGFILE}
                         AddFileLog('*********************************************       touch down');
 {$ENDIF}
-                        mouseState:= SDL_GetMouseState(0, @x, @y);                       
-
+						SDL_SelectMouse(event.motion.which);
+                        mouseState:= SDL_GetMouseState(@x, @y);
+                        SDL_GetRelativeMouseState(event.motion.which, @dx, @dy);
                         {* attack *}
                         if (x > 50) and (x <= 270) and (y <= 50) then
                         begin
@@ -269,8 +271,10 @@
                         AddFileLog('*********************************************       touch up');
 {$ENDIF}
 
-                        mouseState:= SDL_GetMouseState(0, @x, @y);
-                        uKeys.leftClick:= true;
+						SDL_SelectMouse(event.motion.which);
+                        mouseState:= SDL_GetMouseState(@x, @y);
+                        SDL_GetRelativeMouseState(event.motion.which, @dx, @dy);
+						uKeys.leftClick:= true;
 
                         {* open ammo menu *}
                         if (y > 430) and (x > 270) then
@@ -399,7 +403,7 @@
      val(ParamStr(5), ipcPort);
      cFullScreen:= ParamStr(6) = '1';
      isSoundEnabled:= ParamStr(7) = '1';
-     isSoundHardware:= ParamStr(8) = '1';
+     cVSyncInUse:= ParamStr(8) = '1';
      cLocaleFName:= ParamStr(9);
      val(ParamStr(10), cInitVolume);
      val(ParamStr(11), cTimerInterval);
@@ -564,16 +568,14 @@
 
 SDL_EnableUNICODE(1);
 
-WriteToConsole('Init SDL_image... ');
-SDLTry(IMG_Init(IMG_INIT_PNG) <> 0, true);
-WriteLnToConsole(msgOK);
-
 WriteToConsole('Init SDL_ttf... ');
 SDLTry(TTF_Init <> -1, true);
 WriteLnToConsole(msgOK);
 
 ShowMainWindow;
 
+AddProgress;
+
 ControllerInit; // has to happen before InitKbdKeyTable to map keys
 InitKbdKeyTable;
 
@@ -598,8 +600,6 @@
 if isSoundEnabled then
 	InitSound;
 
-StoreInit;
-
 isDeveloperMode:= false;
 
 TryDo(InitStepsFlags = cifAllInited, 'Some parameters not set (flags = ' + inttostr(InitStepsFlags) + ')', true);