anchor.diff:        begin
          if (pole_dat[1] = 'open') then
           begin
  -         M_console.Lines.Add('InCommandRP404\>Pripojuji se k centrale');
  +         M_console.Lines.Add('Pripojuji se k centrale...');
            return := TrkSystem.Open();
  -         if (return <> 0) then M_console.Lines.Add('InCommandRP262\>Chyba pri pripojovani: chyba '+IntToStr(return))
  -          else M_console.Lines.Add('InCommandRP404\>Pripojeno k centrale');
  +         if (return <> 0) then M_console.Lines.Add('Chyba pri pripojovani: chyba '+IntToStr(return))
  +          else M_console.Lines.Add('Pripojeno k centrale');
           end;
   
          if (pole_dat[1] = 'close') then
           begin
  -         M_console.Lines.Add('InCommandRP262\>Odpojuji se od cntraly');
  +         M_console.Lines.Add('Odpojuji se od cntraly...');
            return := TrkSystem.Close();
  -         if (return <> 0) then M_console.Lines.Add('InCommandRP262\>Chyba pri odpojovani: chyba '+IntToStr(return))
  -          else M_console.Lines.Add('InCommandRP262\>Odpojeno od centraly');
  +         if (return <> 0) then M_console.Lines.Add('Chyba pri odpojovani: chyba '+IntToStr(return))
  +          else M_console.Lines.Add('Odpojeno od centraly');
           end;
         end;
   
        if (pole_dat[0] = 'mtb') and (pole_dat.Count >= 2) then
         begin
          if (pole_dat[1] = 'start') then
  -        begin
  -         if (pole_dat.Count >= 3) then
  -          begin
  -           if (pole_dat[2] = 'hard') then MTB.Start();
  -          end else begin
  -           F_Main.A_MTB_GoExecute(Self);
  -          end;
  -        end;
  +         F_Main.A_MTB_GoExecute(Self);
  +
          if (pole_dat[1] = 'stop') then
  -        begin
  -         if (pole_dat.Count >= 3) then
  -          begin
  -           if (pole_dat[2] = 'hard') then MTB.Stop();
  -          end else begin
  -           F_Main.A_MTB_StopExecute(Self);
  -          end;
  -        end;
  +         F_Main.A_MTB_StopExecute(Self);
   
          if (pole_dat[1] = 'open') then
  -        begin
  -         if (pole_dat.Count >= 3) then
  -          begin
  -           if (pole_dat[2] = 'hard') then MTB.Open;
  -          end else begin
  -           F_Main.A_MTB_OpenExecute(Self);
  -          end;
  -        end;
  +         F_Main.A_MTB_OpenExecute(Self);
  +
          if (pole_dat[1] = 'close') then
  -        begin
  -         if (pole_dat.Count >= 3) then
  -          begin
  -           if (pole_dat[2] = 'hard') then MTB.Close;
  -          end else begin
  -           F_Main.A_MTB_CloseExecute(Self);
  -          end;
  -        end;
  -
  -       M_console.Lines.Add('InCommandRP271\Hotovo');
  +         F_Main.A_MTB_CloseExecute(Self);
         end;
   
        if (pole_dat[0] = 'app-exit') then
  
positive.code:  try
     ExtractStrings([' ','(',')'], [],PChar(LowerCase(E_console.Text)),pole_dat);
  
     M_console.Lines.Strings[M_console.Lines.Count-1] := M_console.Lines.Strings[M_console.Lines.Count-1] + '['+E_console.Text+']';
  
     if (F_Options.CHB_Log_console.Checked) then
       writelog('Console: '+E_console.Text,WR_CONSOLE);
  
negative.code: begin
   Self.M_console.Lines.Add('Spustena konzole - v '+_CONSOLE_V);
   Self.M_console.Lines.Add('------------------------');
   Self.M_console.Lines.Add('> ');
  end;//procedure
  
  procedure TF_Console.B_OK_consoleClick(Sender: TObject);
  var pole_dat:TStrings;
      return:Byte;
      Blk:TBlk;
  begin
  