X-Git-Url: https://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fgame%2Fg_triggers.pas;h=2ff21708160b0e1e063545a508f405f87453be4a;hb=6657de7c4f97ab3bba2802f075332c379e22e393;hp=609c309e4936e8b0851fe94cd43612a4d28e9577;hpb=af3c404e11867c6794975f1d45dd98932d804ede;p=d2df-sdl.git diff --git a/src/game/g_triggers.pas b/src/game/g_triggers.pas index 609c309..2ff2170 100644 --- a/src/game/g_triggers.pas +++ b/src/game/g_triggers.pas @@ -1,3 +1,18 @@ +(* Copyright (C) DooM 2D:Forever Developers + * + * This program is free software: you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation, either version 3 of the License, or + * (at your option) any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this program. If not, see . + *) {$MODE DELPHI} unit g_triggers; @@ -73,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' @@ -194,7 +209,6 @@ begin MH_SEND_Sound(X, Y, 'SOUND_GAME_SWITCH1'); end; - with gWalls[PanelID] do begin if gPlayers <> nil then @@ -1931,6 +1945,13 @@ begin end; TimeOut := Data.FXWait; end; + + TRIGGER_SCRIPT: + begin + g_Scripts_ProcExec(Data.SCRProc, [ID, ActivateUID, actType, Data.SCRArg], 'map'); + TimeOut := 0; + Result := True; + end; end; end;