172 {$ENDIF}

   172 {$ENDIF}

   173 if ParamCount=6 then

   173 if ParamCount=6 then

   174    begin

   174    begin

   175    val(ParamStr(1), cScreenWidth, c);

   175    val(ParamStr(1), cScreenWidth, c);

   176    val(ParamStr(2), cScreenHeight, c);

   176    val(ParamStr(2), cScreenHeight, c);

   178    val(ParamStr(4), ipcPort, c);

   179    val(ParamStr(4), ipcPort, c);

   179    cFullScreen:= ParamStr(5) = '1';

   180    cFullScreen:= ParamStr(5) = '1';

   180    isSoundEnabled:= ParamStr(6) = '1';

   181    isSoundEnabled:= ParamStr(6) = '1';

   181    end else OutError(errmsgShouldntRun, true);

   182    end else OutError(errmsgShouldntRun, true);

   182 end;

   183 end;

   195 ////////////////////////////////////////////////////////////////////////////////

   196 ////////////////////////////////////////////////////////////////////////////////

   196 /////////////////////////////// m a i n ////////////////////////////////////////

   197 /////////////////////////////// m a i n ////////////////////////////////////////

   197 ////////////////////////////////////////////////////////////////////////////////

   198 ////////////////////////////////////////////////////////////////////////////////

   198 

   199 

   199 begin

   200 begin

   201 WriteLnToConsole('  -= by unC0Rr =-  ');

   202 WriteLnToConsole('  -= by unC0Rr =-  ');

   202 GetParams;

   203 GetParams;

   203 Randomize;

   204 Randomize;

   204 

   205 

   205 WriteToConsole('Init SDL... ');

   206 WriteToConsole('Init SDL... ');