made TRIGGER_SCRIPT work

[d2df-sdl.git] / src / game / g_triggers.pas

diff --git a/src/game/g_triggers.pas b/src/game/g_triggers.pas
index 97c135b207d454b9bf6d87af002df3286fbd6f23..162861306ae12742371fae18fcc1e59e3dad27f4 100644 (file)
--- a/src/game/g_triggers.pas
+++ b/src/game/g_triggers.pas
@@ -88,7 +88,7 @@ uses
   g_player, g_map, Math, g_gfx, g_game, g_textures,
   g_console, g_monsters, g_items, g_phys, g_weapons,
   wadreader, g_main, SysUtils, e_log, g_language,
-  g_options, g_net, g_netmsg;
+  g_options, g_net, g_netmsg, g_scripts;
 
 const
   TRIGGER_SIGNATURE = $52475254; // 'TRGR'
@@ -209,7 +209,6 @@ begin
           MH_SEND_Sound(X, Y, 'SOUND_GAME_SWITCH1');
       end;
 
-
     with gWalls[PanelID] do
     begin
       if gPlayers <> nil then
@@ -1946,6 +1945,13 @@ begin
           end;
           TimeOut := Data.FXWait;
         end;
+
+      TRIGGER_SCRIPT:
+        begin
+          g_Scripts_ProcExec(Data.SCRProc, [ID, ActivateUID, Data.SCRArg], 'map');
+          TimeOut := 1;
+          Result := True;
+        end;
     end;
   end;