74                                              else MakeFortsMap;

    74                                              else MakeFortsMap;

    75               GameState:= gsStart;

    75               GameState:= gsStart;

    76               end;

    76               end;

    77      gsStart: begin

    77      gsStart: begin

    78               AssignHHCoords;

    78               AssignHHCoords;

    79               AdjustColor(cColorNearBlack);

    80               AdjustColor(cColorNearBlack);

    80               AdjustColor(cWhiteColor);

    81               AdjustColor(cWhiteColor);

    81               StoreLoad;

    82               StoreLoad;

    82               AdjustColor(cConsoleSplitterColor);

    83               AdjustColor(cConsoleSplitterColor);

    83               ResetKbd;

    84               ResetKbd;

   193 begin

   194 begin

   194 WriteLnToConsole('HedgeWars 0.1, svn '+cRevision);

   195 WriteLnToConsole('HedgeWars 0.1, svn '+cRevision);

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

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

   196 GetParams;

   197 GetParams;

   197 Randomize;

   198 Randomize;

   199 

   199 

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

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

   201 SDLTry(SDL_Init(SDL_INIT_VIDEO) >= 0, true);

   201 SDLTry(SDL_Init(SDL_INIT_VIDEO) >= 0, true);

   202 WriteLnToConsole(msgOK);

   202 WriteLnToConsole(msgOK);

   203 

   203