X-Git-Url: https://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Feditor%2Fg_language.pas;h=4d3ae7ed69acbbee655e126627a2d6ae45f6282f;hb=6440b720d7e55069ae59d8c4340981b594c4499b;hp=75d8787583f6dd9ae23e34dd4069d6bb3bf4dbf2;hpb=ecf69fd49c810dc4fe78092ec1f0204cbb719e01;p=d2df-editor.git

diff --git a/src/editor/g_language.pas b/src/editor/g_language.pas
index 75d8787..4d3ae7e 100644
--- a/src/editor/g_language.pas
+++ b/src/editor/g_language.pas
@@ -234,6 +234,14 @@ Type
     I_PROP_TR_SCORE_CON,
     I_PROP_TR_SCORE_MSG,
     I_PROP_TR_DAMAGE_VALUE,
+    I_PROP_TR_DAMAGE_KIND,
+    I_PROP_TR_DAMAGE_KIND_0,
+    I_PROP_TR_DAMAGE_KIND_3,
+    I_PROP_TR_DAMAGE_KIND_4,
+    I_PROP_TR_DAMAGE_KIND_5,
+    I_PROP_TR_DAMAGE_KIND_6,
+    I_PROP_TR_DAMAGE_KIND_7,
+    I_PROP_TR_DAMAGE_KIND_8,
     I_PROP_TR_HEALTH_MAX,
     I_PROP_TR_SHOT_TYPE,
     I_PROP_TR_SHOT_SOUND,
@@ -534,6 +542,7 @@ Type
     I_LAB_LAUNCH_SECS,
     I_LAB_LAUNCH_SCORE,
     I_LAB_LAUNCH_PATH,
+    I_LAB_LAUNCH_ARGS,
 
     I_LAB_ES_GRID,
     I_LAB_ES_GRID_COLOR,
@@ -648,7 +657,7 @@ Uses
   SysUtils, e_log, f_main, f_about, f_activationtype,
   f_addresource_sky, f_addresource_sound,
   f_addresource_texture, f_choosetype, f_keys, f_mapcheck,
-  f_mapoptions, f_maptest, f_mapoptimization, f_options,
+  f_mapoptions, f_mapoptimization, f_options,
   f_packmap, f_savemap, f_saveminimap, f_selectmap, Forms, utils;
 
 Const
@@ -1091,6 +1100,22 @@ Const
                                        'Сообщение в игру'),
     ('PROP TR DAMAGE VALUE',           'Damage',
                                        'Ущерб'),
+    ('PROP TR DAMAGE KIND',            'Damage type',
+                                       'Тип урона'),
+    ('PROP TR DAMAGE KIND 0',          'HIT_SOME',
+                                       'HIT_SOME'),
+    ('PROP TR DAMAGE KIND 3',          'HIT_TRAP',
+                                       'HIT_TRAP'),
+    ('PROP TR DAMAGE KIND 4',          'HIT_FALL',
+                                       'HIT_FALL'),
+    ('PROP TR DAMAGE KIND 5',          'HIT_WATER',
+                                       'HIT_WATER'),
+    ('PROP TR DAMAGE KIND 6',          'HIT_ACID',
+                                       'HIT_ACID'),
+    ('PROP TR DAMAGE KIND 7',          'HIT_ELECTRO',
+                                       'HIT_ELECTRO'),
+    ('PROP TR DAMAGE KIND 8',          'HIT_FLAME',
+                                       'HIT_FLAME'),
     ('PROP TR HEALTH MAX',             'To maximum',
                                        'До максимума'),
     ('PROP TR SHOT TYPE',              'Projectile',
@@ -1288,24 +1313,24 @@ Const
 
     ('MENU FILE',                      'File',
                                        'Файл'),
-    ('MENU FILE NEW',                  'New Map',
-                                       'Новая карта'),
-    ('MENU FILE OPEN',                 'Open Map',
-                                       'Открыть карту'),
-    ('MENU FILE SAVE',                 'Save Map',
-                                       'Сохранить карту'),
-    ('MENU FILE SAVE AS',              'Save Map As...',
-                                       'Сохранить карту как...'),
-    ('MENU FILE OPEN WAD',             'Select Map',
-                                       'Выбрать карту'),
-    ('MENU FILE REOPEN',               'Reopen Map',
+    ('MENU FILE NEW',                  'New',
+                                       'Создать'),
+    ('MENU FILE OPEN',                 'Open...',
+                                       'Открыть...'),
+    ('MENU FILE SAVE',                 'Save',
+                                       'Сохранить'),
+    ('MENU FILE SAVE AS',              'Save As...',
+                                       'Сохранить как...'),
+    ('MENU FILE OPEN WAD',             'Select Map...',
+                                       'Выбрать карту...'),
+    ('MENU FILE REOPEN',               'Revert to Saved',
                                        'Открыть заново'),
-    ('MENU FILE SAVE MINI',            'Save Mini-map',
-                                       'Сохранить мини-карту'),
-    ('MENU FILE DELETE',               'Delete Map from WAD...',
-                                       'Удалить карту из WAD...'),
-    ('MENU FILE PACK MAP',             'Pack Map',
-                                       'Упаковать карту'),
+    ('MENU FILE SAVE MINI',            'Save Minimap...',
+                                       'Сохранить мини-карту...'),
+    ('MENU FILE DELETE',               'Delete from WAD...',
+                                       'Удалить из WAD...'),
+    ('MENU FILE PACK MAP',             'Pack to WAD...',
+                                       'Упаковать в WAD...'),
     ('MENU FILE EXIT',                 'Exit',
                                        'Выход'),
 
@@ -1330,32 +1355,32 @@ Const
                                        'Инструменты'),
     ('MENU TOOLS SNAP GRID',           'Snap to Grid',
                                        'Привязка к сетке'),
-    ('MENU TOOLS MINIMAP',             'Show Mini-map',
-                                       'Мини-карта'),
-    ('MENU TOOLS STEP GRID',           'Switch Grid step',
-                                       'Сменить шаг сетки'),
-    ('MENU TOOLS SHOW EDGES',          'Switch Map edges',
-                                       'Границы карты'),
+    ('MENU TOOLS MINIMAP',             'Show Minimap',
+                                       'Показать Мини-карту'),
+    ('MENU TOOLS STEP GRID',           'Switch Grid Granularity',
+                                       'Переключить шаг сетки'),
+    ('MENU TOOLS SHOW EDGES',          'Show Map Bounds',
+                                       'Показывать границы карты'),
     ('MENU TOOLS LAYERS',              'Layers',
                                        'Слои'),
 
     ('MENU SERV',                      'Service',
                                        'Сервис'),
-    ('MENU SERV TEST',                 'Check the Map',
-                                       'Проверка карты'),
-    ('MENU SERV OPT',                  'Optimize the Map',
-                                       'Оптимизация карты'),
-    ('MENU SERV PREVIEW',              'Map Preview',
+    ('MENU SERV TEST',                 'Analyse Map...',
+                                       'Проверка карты...'),
+    ('MENU SERV OPT',                  'Optimize Map...',
+                                       'Оптимизация карты...'),
+    ('MENU SERV PREVIEW',              'Preview Mode',
                                        'Предварительный просмотр'),
-    ('MENU SERV LAUNCH',               'In-game test',
+    ('MENU SERV LAUNCH',               'Run Test',
                                        'Тест карты в игре'),
 
     ('MENU SETS',                      'Settings',
                                        'Настройка'),
-    ('MENU SETS MAP',                  'Map parameters',
-                                       'Параметры карты'),
-    ('MENU SETS EDITOR',               'Editor settings',
-                                       'Настройки редактора'),
+    ('MENU SETS MAP',                  'Map Properties...',
+                                       'Свойства карты...'),
+    ('MENU SETS EDITOR',               'Preferences...',
+                                       'Настройки...'),
     ('MENU SETS LAUNCH',               'In-game test settings',
                                        'Настройки теста в игре'),
 
@@ -1399,7 +1424,7 @@ Const
                                        'Включить/Отключить отображение сетки'),
     ('MENU TB GRID STEP',              'Switch Grid step',
                                        'Изменить шаг сетки'),
-    ('MENU TB LAUNCH',                 'In-game test',
+    ('MENU TB LAUNCH',                 'Run Test',
                                        'Тест карты в игре'),
 
     ('MENU LAUNCH SETS',               'Settings...',
@@ -1423,21 +1448,21 @@ Const
                                        'Выберите текстуру'),
     ('CAP KEYS',                       'Keys',
                                        'Ключи'),
-    ('CAP TEST',                       'Map Checking',
+    ('CAP TEST',                       'Analyse Map',
                                        'Проверка карты'),
-    ('CAP OPT',                        'Map Optimization',
+    ('CAP OPT',                        'Optimize Map',
                                        'Оптимизация карты'),
-    ('CAP SETS',                       'Map Parameters',
-                                       'Параметры карты'),
+    ('CAP SETS',                       'Map Properties',
+                                       'Свойства карты'),
     ('CAP LAUNCH',                     'In-game test Settings',
                                        'Настройки теста в игре'),
-    ('CAP ES',                         'Editor Settings',
+    ('CAP ES',                         'Editor Preferences',
                                        'Настройки редактора'),
     ('CAP PACK',                       'Pack Map',
                                        'Упаковать карту'),
     ('CAP SAVE',                       'Save Map',
                                        'Сохранить карту'),
-    ('CAP MINI',                       'Save Mini-map',
+    ('CAP MINI',                       'Save Minimap',
                                        'Сохранить мини-карту'),
     ('CAP SELECT',                     'Select Map',
                                        'Выберите карту'),
@@ -1663,6 +1688,8 @@ Const
                                        'Лимит очков:'),
     ('LAB LAUNCH PATH',                'Path to Doom2DF.exe:',
                                        'Путь к Doom2DF.exe:'),
+    ('LAB LAUNCH ARGS',                'Launch Arguments:',
+                                       'Параметры запуска:'),
 
     ('LAB ES GRID',                    'Grid Step:',
                                        'Шаг сетки:'),
@@ -1802,10 +1829,10 @@ Const
     ('WAD SPECIAL TEXS',               '<EXTRA TEXTURES>',
                                        '<СПЕЦТЕКСТУРЫ>'),
 
-    ('FILE FILTER ALL',                'Doom 2D: Forever Maps (*.dfz, *.wad)|*.dfz;*.wad|Doom 2D: Forever 0.30 Maps (*.ini)|*.ini|Все файлы (*.*)|*.*',
-                                       'Карты Doom 2D: Forever (*.dfz, *.wad)|*.dfz;*.wad|Старые карты Doom 2D: Forever 0.30 (*.ini)|*.ini|Все файлы (*.*)|*.*'),
-    ('FILE FILTER WAD',                'Doom 2D: Forever Maps (*.dfz)|*.dfz|Doom 2D: Forever Maps (*.wad)|*.wad|Все файлы (*.*)|*.*',
-                                       'Карты Doom 2D: Forever (*.dfz)|*.dfz|Карты Doom 2D: Forever (*.wad)|*.wad|Все файлы (*.*)|*.*'),
+    ('FILE FILTER ALL',                'Doom 2D: Forever Maps (*.dfz, *.dfzip, *.zip, *.wad)|*.dfz;*.dfzip;*.zip;*.wad|Doom 2D: Forever 0.30 Maps (*.ini)|*.ini|All Files (*.*)|*.*',
+                                       'Карты Doom 2D: Forever (*.dfz, *.dfzip, *.zip, *.wad)|*.dfz;*.dfzip;*.zip;*.wad|Старые карты Doom 2D: Forever 0.30 (*.ini)|*.ini|Все файлы (*.*)|*.*'),
+    ('FILE FILTER WAD',                'Doom 2D: Forever Maps (*.dfz)|*.dfz|Doom 2D: Forever Maps (*.dfzip)|*.dfzip|Doom 2D: Forever Maps (*.zip)|*.zip|Doom 2D: Forever Maps (*.wad)|*.wad|All Files (*.*)|*.*',
+                                       'Карты Doom 2D: Forever (*.dfz)|*.dfz|Карты Doom 2D: Forever (*.dfzip)|*.dfzip|Карты Doom 2D: Forever (*.zip)|*.zip|Карты Doom 2D: Forever (*.wad)|*.wad|Все файлы (*.*)|*.*'),
 
     ('EDITOR TITLE',                   'Doom 2D: Forever Map Editor',
                                        'Редактор карт Doom 2D: Forever'),
@@ -2029,15 +2056,16 @@ begin
 end;
 
 procedure SetupCaptions();
-var
-  i: Integer;
-
+  var i: Integer; s: AnsiString;
 begin
 // Главная форма:
   with MainForm do
   begin
   // Заголовок:
-    FormCaption := _lc[I_EDITOR_TITLE];
+    s := g_GetBuildHash(false);
+    if s = 'custom build' then
+      s := s + ' by ' + g_GetBuilderName() + ' ' + EDITOR_BUILDDATE + ' ' + EDITOR_BUILDTIME;
+    FormCaption := _lc[I_EDITOR_TITLE] + ' (' + s + ')';
     i := Pos('-', Caption);
     if i > 0 then
       begin
@@ -2068,7 +2096,6 @@ begin
     miToFore.Caption := _lc[I_MENU_EDIT_TO_FORE];
     miToBack.Caption := _lc[I_MENU_EDIT_TO_BACK];
   // "Инструменты":
-    miMenuTools.Caption := _lc[I_MENU_TOOLS];
     miSnapToGrid.Caption := _lc[I_MENU_TOOLS_SNAP_GRID];
     miMiniMap.Caption := _lc[I_MENU_TOOLS_MINIMAP];
     miSwitchGrid.Caption := _lc[I_MENU_TOOLS_STEP_GRID];
@@ -2083,17 +2110,14 @@ begin
     miLayer7.Caption := _lc[I_MENU_LAYER_MONSTER];
     miLayer8.Caption := _lc[I_MENU_LAYER_AREA];
     miLayer9.Caption := _lc[I_MENU_LAYER_TRIGGER];
+    miMapOptions.Caption := _lc[I_MENU_SETS_MAP];
+    miOptions.Caption := _lc[I_MENU_SETS_EDITOR];
   // "Сервис":
     miMenuService.Caption := _lc[I_MENU_SERV];
     miCheckMap.Caption := _lc[I_MENU_SERV_TEST];
     miOptimmization.Caption := _lc[I_MENU_SERV_OPT];
     miMapPreview.Caption := _lc[I_MENU_SERV_PREVIEW];
     miTestMap.Caption := _lc[I_MENU_SERV_LAUNCH];
-  // "Настройка":
-    miMenuSettings.Caption := _lc[I_MENU_SETS];
-    miMapOptions.Caption := _lc[I_MENU_SETS_MAP];
-    miOptions.Caption := _lc[I_MENU_SETS_EDITOR];
-    miMapTestSettings.Caption := _lc[I_MENU_SETS_LAUNCH];
   // "Справка":
     miMenuHelp.Caption := _lc[I_MENU_HELP];
     miAbout.Caption := _lc[I_MENU_HELP_ABOUT];
@@ -2118,8 +2142,6 @@ begin
     miLayerP7.Caption := _lc[I_MENU_LAYER_MONSTER];
     miLayerP8.Caption := _lc[I_MENU_LAYER_AREA];
     miLayerP9.Caption := _lc[I_MENU_LAYER_TRIGGER];
-  // Всплывающее меню для кнопки теста карты:
-    miMapTestPMSet.Caption := _lc[I_MENU_LAUNCH_SETS];
 
   // Кнопка применения свойств:
     bApplyProperty.Caption := _lc[I_BTN_APPLY_PROPS];
@@ -2299,18 +2321,33 @@ begin
     bCancel.Caption := _lc[I_BTN_CANCEL];
   end;
 
-// Форма "Настройки теста карты":
-  with MapTestForm do
+// From "Editor settings":
+  with OptionsForm do
   begin
-    Caption := _lc[I_CAP_LAUNCH];
+    Caption := _lc[I_CAP_ES];
     bOK.Caption := _lc[I_BTN_OK];
     bCancel.Caption := _lc[I_BTN_CANCEL];
-  // Режим игры:
+  // TabGeneral:
+    cbShowDots.Caption := _lc[I_CTRL_ES_GRID];
+    cbShowTexture.Caption := _lc[I_CTRL_ES_TEXTURE];
+    cbShowSize.Caption := _lc[I_CTRL_ES_PANEL_SIZE];
+    cbCheckerboard.Caption := _lc[I_CTRL_ES_CHECKERBOARD];
+    LabelGrid.Caption := _lc[I_LAB_ES_GRID];
+    LabelGridCol.Caption := _lc[I_LAB_ES_GRID_COLOR];
+    LabelGridSize.Caption := _lc[I_LAB_ES_GRID_SIZE];
+    LabelBack.Caption := _lc[I_LAB_ES_BACK];
+    LabelPreview.Caption := _lc[I_LAB_ES_PREVIEW];
+    LabelMinimap.Caption := _lc[I_LAB_ES_MINIMAP];
+    LabelLanguage.Caption := _lc[I_LAB_ES_LANGUAGE];
+  // TabFiles:
+    cbCompress.Caption := _lc[I_LAB_ES_COMPRESS];
+    cbBackup.Caption := _lc[I_LAB_ES_BACKUP];
+    LabelRecent.Caption := _lc[I_LAB_ES_RECENT];
+  // TabTesting:
     rbDM.Caption := _lc[I_CTRL_LAUNCH_DM];
     rbTDM.Caption := _lc[I_CTRL_LAUNCH_TDM];
     rbCTF.Caption := _lc[I_CTRL_LAUNCH_CTF];
     rbCOOP.Caption := _lc[I_CTRL_LAUNCH_COOP];
-  // Опции:
     cbTwoPlayers.Caption := _lc[I_CTRL_LAUNCH_2P];
     cbTeamDamage.Caption := _lc[I_CTRL_LAUNCH_FF];
     cbAllowExit.Caption := _lc[I_CTRL_LAUNCH_EXIT];
@@ -2320,32 +2357,9 @@ begin
     LabelTime.Caption := _lc[I_LAB_LAUNCH_TIME];
     LabelSecs.Caption := _lc[I_LAB_LAUNCH_SECS];
     LabelScore.Caption := _lc[I_LAB_LAUNCH_SCORE];
-  // Путь:
     LabelPath.Caption := _lc[I_LAB_LAUNCH_PATH];
     FindD2dDialog.Title := _lc[I_CTRL_LAUNCH_OPEN];
-  end;
-
-// Форма "Настройки редактора":
-  with OptionsForm do
-  begin
-    Caption := _lc[I_CAP_ES];
-    bOK.Caption := _lc[I_BTN_OK];
-    bCancel.Caption := _lc[I_BTN_CANCEL];
-  // Настройки:
-    cbShowDots.Caption := _lc[I_CTRL_ES_GRID];
-    cbShowTexture.Caption := _lc[I_CTRL_ES_TEXTURE];
-    cbShowSize.Caption := _lc[I_CTRL_ES_PANEL_SIZE];
-    cbCheckerboard.Caption := _lc[I_CTRL_ES_CHECKERBOARD];
-    cbCompress.Caption := _lc[I_LAB_ES_COMPRESS];
-    cbBackup.Caption := _lc[I_LAB_ES_BACKUP];
-    LabelGrid.Caption := _lc[I_LAB_ES_GRID];
-    LabelGridCol.Caption := _lc[I_LAB_ES_GRID_COLOR];
-    LabelGridSize.Caption := _lc[I_LAB_ES_GRID_SIZE];
-    LabelBack.Caption := _lc[I_LAB_ES_BACK];
-    LabelPreview.Caption := _lc[I_LAB_ES_PREVIEW];
-    LabelMinimap.Caption := _lc[I_LAB_ES_MINIMAP];
-    LabelRecent.Caption := _lc[I_LAB_ES_RECENT];
-    LabelLanguage.Caption := _lc[I_LAB_ES_LANGUAGE];
+    LabelArgs.Caption := _lc[I_LAB_LAUNCH_ARGS];
   end;
 
 // Форма "Упаковать карту":