X-Git-Url: http://deadsoftware.ru/gitweb?p=d2df-sdl.git;a=blobdiff_plain;f=src%2Fgame%2Fg_map.pas;h=cb934b81705666abe9dcd89ace6d7ae251fa47cb;hp=6c35e4e00af20320d07888af5b21590dbd3ae7a0;hb=0aed9f9d49f034aad7d8856db00fe42f3303826d;hpb=aed292b6937ad75773102b66d43a8b5d1eeec921 diff --git a/src/game/g_map.pas b/src/game/g_map.pas index 6c35e4e..cb934b8 100644 --- a/src/game/g_map.pas +++ b/src/game/g_map.pas @@ -133,7 +133,7 @@ uses GL, GLExt, g_weapons, g_game, g_sound, e_sound, CONFIG, g_options, MAPREADER, g_triggers, g_player, MAPDEF, Math, g_monsters, g_saveload, g_language, g_netmsg, - utils, sfs, + utils, sfs, g_scripts, ImagingTypes, Imaging, ImagingUtility, ImagingGif, ImagingNetworkGraphics; @@ -907,9 +907,10 @@ var DoorPanel: Integer; ShotPanel: Integer; end; - FileName, mapResName, s, TexName: String; - Data: Pointer; - Len: Integer; + FileName, mapResName, s, TexName, ScrStr: String; + Data, ScrText: Pointer; + ScrEnd: PByte; + Len, ScrLen: Integer; ok, isAnim, trigRef: Boolean; CurTex, ntn: Integer; begin @@ -940,6 +941,19 @@ begin WAD.Free(); Exit; end; + + // try to load the map script + g_Scripts_Reset(RESET_MAP); + ScrText := nil; + ScrLen := 0; + if WAD.GetResource('SCRIPTS/'+mapResName, ScrText, ScrLen) then + begin + g_Console_Add('SCRIPT: Found script for this map. Loading...'); + SetString(ScrStr, ScrText, ScrLen); + g_Scripts_Load(ScrStr); + FreeMem(ScrText); + end; + WAD.Free(); // Çàãðóçêà êàðòû: