anchor.diff:     else if (shPlay.trat <> nil) then
        Result := Result + 'HLEN prjezd,';
     end;
  -
  - Result := Result + '-,';
   end;
   
   ////////////////////////////////////////////////////////////////////////////////
  
positive.code:    if (TTCPORsRef(SenderPnl.Data).maus) then Result := Result + 'MAUS vlak,';
    end;
  
   if (Self.IsVlakPresun()) then
    Result := Result + 'PESU vlak<,'
   else if ((spr.rychlost = 0) and (spr.stanice = SenderOR)) then
     Result := Result + 'PESU vlak>,';
  
   if (spr.ukradeno) then
  
negative.code:     DCC : false;
      stanicni_kolej : false;
      cislo_koleje : '';
      vlakPresun: -1;
      zpomalovani_ready : false;
      currentHoukEv : -1;
     );
  