DEADSOFTWARE

Menu: Add map reopen feature
[d2df-editor.git] / src / editor / g_language.pas
index d8ee27f00c4b829c3086222d8bc208d2aba7b68c..e1f7638b11d531df0f5009927a7941c0df16b977 100644 (file)
@@ -1,6 +1,6 @@
 Unit g_language;
 
 Unit g_language;
 
-{$MODE Delphi}
+{$INCLUDE ../shared/a_modes.inc}
 
 Interface
 
 
 Interface
 
@@ -62,6 +62,7 @@ Type
     I_ARRAY_ITEM_PLASMA_RIFLE,
     I_ARRAY_ITEM_BFG,
     I_ARRAY_ITEM_SUPER_MINIGUN,
     I_ARRAY_ITEM_PLASMA_RIFLE,
     I_ARRAY_ITEM_BFG,
     I_ARRAY_ITEM_SUPER_MINIGUN,
+    I_ARRAY_ITEM_FLAMETHROWER,
     I_ARRAY_ITEM_CLIP,
     I_ARRAY_ITEM_AMMO_BOX,
     I_ARRAY_ITEM_4_SHELLS,
     I_ARRAY_ITEM_CLIP,
     I_ARRAY_ITEM_AMMO_BOX,
     I_ARRAY_ITEM_4_SHELLS,
@@ -70,6 +71,7 @@ Type
     I_ARRAY_ITEM_ROCKET_BOX,
     I_ARRAY_ITEM_CELL,
     I_ARRAY_ITEM_LARGE_CELL,
     I_ARRAY_ITEM_ROCKET_BOX,
     I_ARRAY_ITEM_CELL,
     I_ARRAY_ITEM_LARGE_CELL,
+    I_ARRAY_ITEM_FUELCAN,
     I_ARRAY_ITEM_BACKPACK,
     I_ARRAY_ITEM_KEY_RED,
     I_ARRAY_ITEM_KEY_GREEN,
     I_ARRAY_ITEM_BACKPACK,
     I_ARRAY_ITEM_KEY_RED,
     I_ARRAY_ITEM_KEY_GREEN,
@@ -302,12 +304,15 @@ Type
     I_MSG_DEL_TEXTURE,
     I_MSG_DEL_TEXTURE_PROMT,
     I_MSG_DEL_TEXTURE_CANT,
     I_MSG_DEL_TEXTURE,
     I_MSG_DEL_TEXTURE_PROMT,
     I_MSG_DEL_TEXTURE_CANT,
+    I_MSG_DEL_RECENT,
+    I_MSG_DEL_RECENT_PROMT,
     I_MSG_CLEAR_MAP,
     I_MSG_CLEAR_MAP_PROMT,
     I_MSG_DELETE_MAP,
     I_MSG_DELETE_MAP_PROMT,
     I_MSG_MAP_DELETED,
     I_MSG_MAP_DELETED_PROMT,
     I_MSG_CLEAR_MAP,
     I_MSG_CLEAR_MAP_PROMT,
     I_MSG_DELETE_MAP,
     I_MSG_DELETE_MAP_PROMT,
     I_MSG_MAP_DELETED,
     I_MSG_MAP_DELETED_PROMT,
+    I_MSG_REOPEN_MAP_PROMT,
     I_MSG_EXEC_ERROR,
     I_MSG_SOUND_ERROR,
     I_MSG_WAD_ERROR,
     I_MSG_EXEC_ERROR,
     I_MSG_SOUND_ERROR,
     I_MSG_WAD_ERROR,
@@ -333,6 +338,7 @@ Type
     I_MENU_FILE_SAVE,
     I_MENU_FILE_SAVE_AS,
     I_MENU_FILE_OPEN_WAD,
     I_MENU_FILE_SAVE,
     I_MENU_FILE_SAVE_AS,
     I_MENU_FILE_OPEN_WAD,
+    I_MENU_FILE_REOPEN,
     I_MENU_FILE_SAVE_MINI,
     I_MENU_FILE_DELETE,
     I_MENU_FILE_PACK_MAP,
     I_MENU_FILE_SAVE_MINI,
     I_MENU_FILE_DELETE,
     I_MENU_FILE_PACK_MAP,
@@ -408,7 +414,9 @@ Type
     I_CAP_SAVE,
     I_CAP_MINI,
     I_CAP_SELECT,
     I_CAP_SAVE,
     I_CAP_MINI,
     I_CAP_SELECT,
-    
+    I_CAP_OPEN,
+    I_CAP_REMOVE,
+
     I_CTRL_PROP_KEY,
     I_CTRL_PROP_VALUE,
     I_CTRL_PANELS,
     I_CTRL_PROP_KEY,
     I_CTRL_PROP_VALUE,
     I_CTRL_PANELS,
@@ -477,6 +485,7 @@ Type
     I_CTRL_ES_GRID,
     I_CTRL_ES_TEXTURE,
     I_CTRL_ES_PANEL_SIZE,
     I_CTRL_ES_GRID,
     I_CTRL_ES_TEXTURE,
     I_CTRL_ES_PANEL_SIZE,
+    I_CTRL_ES_CHECKERBOARD,
 
     I_CTRL_PACK_TEXTURES,
     I_CTRL_PACK_SKY,
 
     I_CTRL_PACK_TEXTURES,
     I_CTRL_PACK_SKY,
@@ -706,7 +715,7 @@ Const
     ('ARRAY ITEM LARGE MEDKIT',        'Medikit',
                                        'Большая аптечка'),
     ('ARRAY ITEM BLACK MEDKIT',        'Berserk Pack',
     ('ARRAY ITEM LARGE MEDKIT',        'Medikit',
                                        'Большая аптечка'),
     ('ARRAY ITEM BLACK MEDKIT',        'Berserk Pack',
-                                       'Черная аптечка'),
+                                       'Чёрная аптечка'),
     ('ARRAY ITEM GREEN ARMOR',         'Green Armor',
                                        'Зелёная броня'),
     ('ARRAY ITEM BLUE ARMOR',          'Blue Armor',
     ('ARRAY ITEM GREEN ARMOR',         'Green Armor',
                                        'Зелёная броня'),
     ('ARRAY ITEM BLUE ARMOR',          'Blue Armor',
@@ -737,6 +746,8 @@ Const
                                        'BFG9000'),
     ('ARRAY ITEM SUPER MINIGUN',       'Super Chaingun',
                                        'Суперпулемёт'),
                                        'BFG9000'),
     ('ARRAY ITEM SUPER MINIGUN',       'Super Chaingun',
                                        'Суперпулемёт'),
+    ('ARRAY ITEM FLAMETHROWER',        'Flamethrower',
+                                       'Огнемёт'),
     ('ARRAY ITEM CLIP',                'Clip',
                                        'Патроны'),
     ('ARRAY ITEM AMMO BOX',            'Box of Bullets',
     ('ARRAY ITEM CLIP',                'Clip',
                                        'Патроны'),
     ('ARRAY ITEM AMMO BOX',            'Box of Bullets',
@@ -753,12 +764,14 @@ Const
                                        'Батарейка'),
     ('ARRAY ITEM LARGE CELL',          'Energy Cell Pack',
                                        'Батарея'),
                                        'Батарейка'),
     ('ARRAY ITEM LARGE CELL',          'Energy Cell Pack',
                                        'Батарея'),
+    ('ARRAY ITEM FUELCAN',             'Fuel Canister',
+                                       'Канистра'),
     ('ARRAY ITEM BACKPACK',            'Backpack',
                                        'Рюкзак'),
     ('ARRAY ITEM KEY RED',             'Red Key',
                                        'Красный ключ'),
     ('ARRAY ITEM KEY GREEN',           'Green Key',
     ('ARRAY ITEM BACKPACK',            'Backpack',
                                        'Рюкзак'),
     ('ARRAY ITEM KEY RED',             'Red Key',
                                        'Красный ключ'),
     ('ARRAY ITEM KEY GREEN',           'Green Key',
-                                       'Зеленый ключ'),
+                                       'Зелёный ключ'),
     ('ARRAY ITEM KEY BLUE',            'Blue Key',
                                        'Синий ключ'),
     ('ARRAY ITEM BOTTLE',              'Health Globe',
     ('ARRAY ITEM KEY BLUE',            'Blue Key',
                                        'Синий ключ'),
     ('ARRAY ITEM BOTTLE',              'Health Globe',
@@ -773,7 +786,7 @@ Const
     ('ARRAY SHOT PISTOL',              'Pistol shot',
                                        'Выстрел пистолета'),
     ('ARRAY SHOT BULLET',              'Chaingun shot',
     ('ARRAY SHOT PISTOL',              'Pistol shot',
                                        'Выстрел пистолета'),
     ('ARRAY SHOT BULLET',              'Chaingun shot',
-                                       'Выстрел пулемета'),
+                                       'Выстрел пулемёта'),
     ('ARRAY SHOT SHOTGUN',             'Shotgun shot',
                                        'Выстрел ружья'),
     ('ARRAY SHOT SSG',                 'Super Shotgun shot',
     ('ARRAY SHOT SHOTGUN',             'Shotgun shot',
                                        'Выстрел ружья'),
     ('ARRAY SHOT SSG',                 'Super Shotgun shot',
@@ -944,7 +957,7 @@ Const
     ('PROP TR TYPE',                   'Trigger Type',
                                        'Тип триггера'),
     ('PROP TR ENABLED',                'Enabled',
     ('PROP TR TYPE',                   'Trigger Type',
                                        'Тип триггера'),
     ('PROP TR ENABLED',                'Enabled',
-                                       'Включен'),
+                                       'Включён'),
     ('PROP TR TEXTURE PANEL',          'Textured Panel',
                                        'Панель с текстурой'),
     ('PROP TR ACTIVATION',             'Activation Type',
     ('PROP TR TEXTURE PANEL',          'Textured Panel',
                                        'Панель с текстурой'),
     ('PROP TR ACTIVATION',             'Activation Type',
@@ -1210,6 +1223,10 @@ Const
                                        'Удалить текстуру "%s" ?'),
     ('MSG DEL TEXTURE CANT',           'Can''t delete texture in use. Replace it on all panels with this texture.',
                                        'Нельзя удалить используемую текстуру. Замените её на каждой панели с ней.'),
                                        'Удалить текстуру "%s" ?'),
     ('MSG DEL TEXTURE CANT',           'Can''t delete texture in use. Replace it on all panels with this texture.',
                                        'Нельзя удалить используемую текстуру. Замените её на каждой панели с ней.'),
+    ('MSG DEL RECENT',                 'File does not longer exist',
+                                       'Этого файла больше нет'),
+    ('MSG DEL RECENT PROMT',           'Remove entry from recent list?',
+                                       'Убрать запись из истории?'),
     ('MSG CLEAR MAP',                  'New map',
                                        'Новая карта'),
     ('MSG CLEAR MAP PROMT',            'Clear the entire map?',
     ('MSG CLEAR MAP',                  'New map',
                                        'Новая карта'),
     ('MSG CLEAR MAP PROMT',            'Clear the entire map?',
@@ -1222,7 +1239,9 @@ Const
                                        'Карта удалена'),
     ('MSG MAP DELETED PROMT',          'Map "%s" is deleted',
                                        'Карта "%s" удалена'),
                                        'Карта удалена'),
     ('MSG MAP DELETED PROMT',          'Map "%s" is deleted',
                                        'Карта "%s" удалена'),
-    ('MSG EXEC ERROR',                 'Game execution error',
+    ('MSG REOPEN MAP PROMT',           'Reopen this map?',
+                                       'Загрузить карту заново?'),
+    ('MSG EXEC ERROR',                 'Game start error',
                                        'Ошибка запуска игры'),
     ('MSG SOUND ERROR',                'Can''t play sound',
                                        'Не удалось проиграть звук'),
                                        'Ошибка запуска игры'),
     ('MSG SOUND ERROR',                'Can''t play sound',
                                        'Не удалось проиграть звук'),
@@ -1270,6 +1289,8 @@ Const
                                        'Сохранить карту как...'),
     ('MENU FILE OPEN WAD',             'Select Map',
                                        'Выбрать карту'),
                                        'Сохранить карту как...'),
     ('MENU FILE OPEN WAD',             'Select Map',
                                        'Выбрать карту'),
+    ('MENU FILE REOPEN',               'Reopen Map',
+                                       'Открыть заново'),
     ('MENU FILE SAVE MINI',            'Save Mini-map',
                                        'Сохранить мини-карту'),
     ('MENU FILE DELETE',               'Delete Map from WAD...',
     ('MENU FILE SAVE MINI',            'Save Mini-map',
                                        'Сохранить мини-карту'),
     ('MENU FILE DELETE',               'Delete Map from WAD...',
@@ -1292,7 +1313,7 @@ Const
     ('MENU EDIT SELECT ALL',           'Select All',
                                        'Выделить всё'),
     ('MENU EDIT TO FORE',              'Bring to Front',
     ('MENU EDIT SELECT ALL',           'Select All',
                                        'Выделить всё'),
     ('MENU EDIT TO FORE',              'Bring to Front',
-                                       'Передвинуть вперед'),
+                                       'Передвинуть вперёд'),
     ('MENU EDIT TO BACK',              'Send to Back',
                                        'Передвинуть назад'),
 
     ('MENU EDIT TO BACK',              'Send to Back',
                                        'Передвинуть назад'),
 
@@ -1411,6 +1432,10 @@ Const
                                        'Сохранить мини-карту'),
     ('CAP SELECT',                     'Select Map',
                                        'Выберите карту'),
                                        'Сохранить мини-карту'),
     ('CAP SELECT',                     'Select Map',
                                        'Выберите карту'),
+    ('CAP OPEN',                       'Open Map',
+                                       'Открыть карту'),
+    ('CAP REMOVE',                     'Remove Map',
+                                       'Удалить карту'),
 
     ('CTRL PROP KEY',                  'Property',
                                        'Свойство'),
 
     ('CTRL PROP KEY',                  'Property',
                                        'Свойство'),
@@ -1470,7 +1495,7 @@ Const
     ('CTRL KEYS RED',                  'Red Key',
                                        'Красный ключ'),
     ('CTRL KEYS GREEN',                'Green Key',
     ('CTRL KEYS RED',                  'Red Key',
                                        'Красный ключ'),
     ('CTRL KEYS GREEN',                'Green Key',
-                                       'Зеленый ключ'),
+                                       'Зелёный ключ'),
     ('CTRL KEYS BLUE',                 'Blue Key',
                                        'Синий ключ'),
     ('CTRL KEYS TEAM RED',             'Red Team',
     ('CTRL KEYS BLUE',                 'Blue Key',
                                        'Синий ключ'),
     ('CTRL KEYS TEAM RED',             'Red Team',
@@ -1531,7 +1556,7 @@ Const
                                        'Монстры в DM'),
     ('CTRL LAUNCH CLOSE',              'Close the game after exiting the map',
                                        'Закрыть игру после выхода из карты'),
                                        'Монстры в DM'),
     ('CTRL LAUNCH CLOSE',              'Close the game after exiting the map',
                                        'Закрыть игру после выхода из карты'),
-    ('CTRL LAUNCH OPEN',               'Select Doom 2D: Forever .exe',
+    ('CTRL LAUNCH OPEN',               'Select Doom 2D: Forever executable',
                                        'Выберите файл игры Doom 2D: Forever'),
 
     ('CTRL ES GRID',                   'Show Grid',
                                        'Выберите файл игры Doom 2D: Forever'),
 
     ('CTRL ES GRID',                   'Show Grid',
@@ -1540,6 +1565,8 @@ Const
                                        'Показывать текстуру панели'),
     ('CTRL ES PANEL SIZE',             'Show Panel Size',
                                        'Показывать размеры панели '),
                                        'Показывать текстуру панели'),
     ('CTRL ES PANEL SIZE',             'Show Panel Size',
                                        'Показывать размеры панели '),
+    ('CTRL ES CHECKERBOARD',           'Use Checkerboard',
+                                       'Использовать шахматку'),
 
     ('CTRL PACK TEXTURES',             'Textures',
                                        'Текстуры'),
 
     ('CTRL PACK TEXTURES',             'Textures',
                                        'Текстуры'),
@@ -1608,7 +1635,7 @@ Const
                                        'Ширина:'),
     ('LAB SETS HEIGHT',                'Height:',
                                        'Высота:'),
                                        'Ширина:'),
     ('LAB SETS HEIGHT',                'Height:',
                                        'Высота:'),
-    ('LAB SETS MAPMOVE',               'Direction of shifting map objects:',
+    ('LAB SETS MAPMOVE',               'Direction to shift map objects:',
                                        'Направление смещения объектов карты:'),
     ('LAB SETS SNAPPING',              'Preserve snapping',
                                        'Сохранять привязку'),
                                        'Направление смещения объектов карты:'),
     ('LAB SETS SNAPPING',              'Preserve snapping',
                                        'Сохранять привязку'),
@@ -1832,6 +1859,7 @@ begin
   ItemNames[ITEM_WEAPON_PLASMA] := _lc[I_ARRAY_ITEM_PLASMA_RIFLE];
   ItemNames[ITEM_WEAPON_BFG] := _lc[I_ARRAY_ITEM_BFG];
   ItemNames[ITEM_WEAPON_SUPERPULEMET] := _lc[I_ARRAY_ITEM_SUPER_MINIGUN];
   ItemNames[ITEM_WEAPON_PLASMA] := _lc[I_ARRAY_ITEM_PLASMA_RIFLE];
   ItemNames[ITEM_WEAPON_BFG] := _lc[I_ARRAY_ITEM_BFG];
   ItemNames[ITEM_WEAPON_SUPERPULEMET] := _lc[I_ARRAY_ITEM_SUPER_MINIGUN];
+  ItemNames[ITEM_WEAPON_FLAMETHROWER] := _lc[I_ARRAY_ITEM_FLAMETHROWER];
   ItemNames[ITEM_AMMO_BULLETS] := _lc[I_ARRAY_ITEM_CLIP];
   ItemNames[ITEM_AMMO_BULLETS_BOX] := _lc[I_ARRAY_ITEM_AMMO_BOX];
   ItemNames[ITEM_AMMO_SHELLS] := _lc[I_ARRAY_ITEM_4_SHELLS];
   ItemNames[ITEM_AMMO_BULLETS] := _lc[I_ARRAY_ITEM_CLIP];
   ItemNames[ITEM_AMMO_BULLETS_BOX] := _lc[I_ARRAY_ITEM_AMMO_BOX];
   ItemNames[ITEM_AMMO_SHELLS] := _lc[I_ARRAY_ITEM_4_SHELLS];
@@ -1840,6 +1868,7 @@ begin
   ItemNames[ITEM_AMMO_ROCKET_BOX] := _lc[I_ARRAY_ITEM_ROCKET_BOX];
   ItemNames[ITEM_AMMO_CELL] := _lc[I_ARRAY_ITEM_CELL];
   ItemNames[ITEM_AMMO_CELL_BIG] := _lc[I_ARRAY_ITEM_LARGE_CELL];
   ItemNames[ITEM_AMMO_ROCKET_BOX] := _lc[I_ARRAY_ITEM_ROCKET_BOX];
   ItemNames[ITEM_AMMO_CELL] := _lc[I_ARRAY_ITEM_CELL];
   ItemNames[ITEM_AMMO_CELL_BIG] := _lc[I_ARRAY_ITEM_LARGE_CELL];
+  ItemNames[ITEM_AMMO_FUELCAN] := _lc[I_ARRAY_ITEM_FUELCAN];
   ItemNames[ITEM_AMMO_BACKPACK] := _lc[I_ARRAY_ITEM_BACKPACK];
   ItemNames[ITEM_KEY_RED] := _lc[I_ARRAY_ITEM_KEY_RED];
   ItemNames[ITEM_KEY_GREEN] := _lc[I_ARRAY_ITEM_KEY_GREEN];
   ItemNames[ITEM_AMMO_BACKPACK] := _lc[I_ARRAY_ITEM_BACKPACK];
   ItemNames[ITEM_KEY_RED] := _lc[I_ARRAY_ITEM_KEY_RED];
   ItemNames[ITEM_KEY_GREEN] := _lc[I_ARRAY_ITEM_KEY_GREEN];
@@ -1945,6 +1974,8 @@ begin
     lbItemList.Items.Add(ItemNames[ITEM_HELMET]);
     lbItemList.Items.Add(ItemNames[ITEM_JETPACK]);
     lbItemList.Items.Add(ItemNames[ITEM_INVIS]);
     lbItemList.Items.Add(ItemNames[ITEM_HELMET]);
     lbItemList.Items.Add(ItemNames[ITEM_JETPACK]);
     lbItemList.Items.Add(ItemNames[ITEM_INVIS]);
+    lbItemList.Items.Add(ItemNames[ITEM_WEAPON_FLAMETHROWER]);
+    lbItemList.Items.Add(ItemNames[ITEM_AMMO_FUELCAN]);
 
     lbMonsterList.Clear();
     for i := MONSTER_DEMON to MONSTER_MAN do
 
     lbMonsterList.Clear();
     for i := MONSTER_DEMON to MONSTER_MAN do
@@ -2000,6 +2031,7 @@ begin
     miSaveMap.Caption := _lc[I_MENU_FILE_SAVE];
     miSaveMapAs.Caption := _lc[I_MENU_FILE_SAVE_AS];
     miOpenWadMap.Caption := _lc[I_MENU_FILE_OPEN_WAD];
     miSaveMap.Caption := _lc[I_MENU_FILE_SAVE];
     miSaveMapAs.Caption := _lc[I_MENU_FILE_SAVE_AS];
     miOpenWadMap.Caption := _lc[I_MENU_FILE_OPEN_WAD];
+    miReopenMap.Caption := _lc[I_MENU_FILE_REOPEN];
     miSaveMiniMap.Caption := _lc[I_MENU_FILE_SAVE_MINI];
     miDeleteMap.Caption := _lc[I_MENU_FILE_DELETE];
     miPackMap.Caption := _lc[I_MENU_FILE_PACK_MAP];
     miSaveMiniMap.Caption := _lc[I_MENU_FILE_SAVE_MINI];
     miDeleteMap.Caption := _lc[I_MENU_FILE_DELETE];
     miPackMap.Caption := _lc[I_MENU_FILE_PACK_MAP];
@@ -2281,6 +2313,7 @@ begin
     cbShowDots.Caption := _lc[I_CTRL_ES_GRID];
     cbShowTexture.Caption := _lc[I_CTRL_ES_TEXTURE];
     cbShowSize.Caption := _lc[I_CTRL_ES_PANEL_SIZE];
     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];
     LabelBack.Caption := _lc[I_LAB_ES_BACK];
     LabelGrid.Caption := _lc[I_LAB_ES_GRID];
     LabelGridCol.Caption := _lc[I_LAB_ES_GRID_COLOR];
     LabelBack.Caption := _lc[I_LAB_ES_BACK];