78               end;

    78               end;

    79      gsStart: begin

    79      gsStart: begin

    80               AssignHHCoords;

    80               AssignHHCoords;

    81               AddMiscGears;

    81               AddMiscGears;

    82               AdjustColor(cColorNearBlack);

    82               AdjustColor(cColorNearBlack);

    83               AdjustColor(cWhiteColor);

    84               AdjustColor(cWhiteColor);

    84               StoreLoad;

    85               StoreLoad;

    85               AdjustColor(cConsoleSplitterColor);

    86               AdjustColor(cConsoleSplitterColor);

    86               ResetKbd;

    87               ResetKbd;

    87               SoundLoad;

    88               SoundLoad;