anchor.diff:          fPalettes.Free;
         end;
       end;
  +  end else
  +  begin
  +    FreeConsole; // Used to hide the console
  +    Application.Initialize;
  +    Application.MainFormOnTaskbar := True;
  +    Application.CreateForm(TRXXForm1, RXXForm1);
  +    Application.Run;
     end;
   end.
  
positive.code:         writeln('Usage example: RXXPacker.exe gui guimain houses trees units');
          Exit;
        end;
  
  
        ExeDir := ExpandFileName(ExtractFilePath(ParamStr(0)) + '..\..\');
        fRXXPacker := TRXXPacker.Create;
  
negative.code: 
  
  begin
    ForcedConsoleMode :=
    {$IFDEF FPC}
      True
    {$ELSE}
      False
    {$ENDIF}
      ;
    if ForcedConsoleMode or IsConsoleMode then
    begin
      if ParamCount >= 1 then
      begin
  