added libsocket and updated watt32, but network still not work

[d2df-sdl.git] / src / wrappers / sdl2 / sdl2allegro.inc

diff --git a/src/wrappers/sdl2/sdl2allegro.inc b/src/wrappers/sdl2/sdl2allegro.inc
index a5de6da8d5ad15f3f407d13b8c4aca4570fdb319..4ea4320db52376e87b653f284d8d7975647c9ea3 100644 (file)
--- a/src/wrappers/sdl2/sdl2allegro.inc
+++ b/src/wrappers/sdl2/sdl2allegro.inc
@@ -374,6 +374,9 @@ implementation
     {$IFDEF GO32V2}
       go32,
     {$ENDIF}
+    {$IFDEF USE_WATT32}
+      Watt32,
+    {$ENDIF}
     e_Log, g_options, SysUtils, Math, Classes, ctypes;
 
   const
@@ -877,7 +880,10 @@ implementation
 
   procedure AllegroTimerCallback; cdecl;
   begin
-    inc(ticks)
+    inc(ticks);
+    {$IFDEF USE_WATT32}
+      userTimerTick(1);
+    {$ENDIF}
   end;
   procedure AllegroTimerCallbackEND; begin end;
 
@@ -1188,6 +1194,10 @@ implementation
     release_screen;
     if useVsync then
       vsync;
+
+    {$IFDEF USE_WATT32}
+      tcp_tick(nil);
+    {$ENDIF}
   end;
 
 (********** EVENTS **********)
@@ -1267,7 +1277,11 @@ implementation
       event.key.keysym._mod := 0; (* df not use it? *)
       result := 1;
       Exit
-    end
+    end;
+
+    {$IFDEF USE_WATT32}
+      tcp_tick(nil);
+    {$ENDIF}
   end;
 
 (********** MOUSE **********)