system: add option --game-wad and --edtor-wad

[d2df-editor.git] / src / editor / Editor.lpr

diff --git a/src/editor/Editor.lpr b/src/editor/Editor.lpr
index 052fbb8208ff350fd50036d09ce796b92bd4459e..b96ed23cf0adbf4d55c0d167410ffcd8685dead4 100644 (file)
--- a/src/editor/Editor.lpr
+++ b/src/editor/Editor.lpr
@@ -97,6 +97,22 @@ uses
           Inc(i);
           CfgFileName := ParamStr(i);
         end;
+      end
+      else if p = '--game-wad' then
+      begin
+        if i + 1 <= ParamCount then
+        begin
+          Inc(i);
+          GameWad := ParamStr(i);
+        end;
+      end
+      else if p = '--editor-wad' then
+      begin
+        if i + 1 <= ParamCount then
+        begin
+          Inc(i);
+          EditorWad := ParamStr(i);
+        end;
       end;
       Inc(i);
     end;
@@ -138,6 +154,8 @@ begin
 
   EditorDir := ExtractFilePath(Application.ExeName);
   CfgFileName := EditorDir + DirectorySeparator + 'Editor.cfg';
+  GameWad := EditorDir + DirectorySeparator + 'data' + DirectorySeparator + 'game.wad';
+  EditorWad := EditorDir + DirectorySeparator + 'data' + DirectorySeparator + 'editor.wad';
 
   CheckParamOptions;
   InitLogs;