anchor.diff:     ncOpakVystraha = 12,
      ncZhasnuto = 13,
      ncOpakOcek40 = 14,
  -   ncOpakVystraha40 = 15
  +   ncOpakVystraha40 = 15,
  +   ncOpak40Ocek40 = 16
    );
   
    ENoEvents = class(Exception);
  
positive.code:       bg := $A0A0A0;
    end;
    ncVolno, ncVystraha, ncOcek40, ncVolno40, ncVystraha40, nc40Ocek40,
    ncOpakVolno, ncOpakVystraha, ncOpakOcek40, ncOpakVystraha40: fg := clLime;
    ncPrivol, ncPosunZaj, ncPosunNezaj: fg := clWhite;
    ncVse: fg := clYellow;
   else
  
negative.code:   ncVystraha: Result := ncOpakVystraha;
    ncOcek40: Result := ncOpakOcek40;
    ncVystraha40: Result := ncOpakVystraha40;
    nc40Ocek40: Result := ncOpak40Ocek40;
   else
    Result := navest;
   end;
  