anchor.diff:  
     if ComboSPICMD.ItemIndex = SPI_CMD_25 then
     begin
  -UsbAsp25_ReadSR(hUSBDev, sreg); //Читаем регистр
  +    UsbAsp25_ReadSR(hUSBDev, sreg); //Читаем регистр
       UsbAsp25_ReadSR(hUSBDev, sreg2, $35);
       LogPrint(STR_OLD_SREG+IntToBin(sreg, 8)+'(0x'+(IntToHex(sreg, 2)+'), ')
                                            +IntToBin(sreg2, 8)+'(0x'+(IntToHex(sreg2, 2)+')'));
  
positive.code: unit main;
  
  //TODO: Облагородить лог
  
  //TODO: at45 установка размера странцы
  //TODO: at45 Проверка размера страницы перед операциями
  
negative.code:     UsbAsp95_WriteSR(hUSBDev, sreg); //Сбрасываем регистр
  
      //Пока отлипнет ромка
      while UsbAsp25_Busy(hUSBDev) do
      begin
        Application.ProcessMessages;
        if MainForm.ButtonCancel.Tag <> 0 then
        begin
          LogPrint(STR_USER_CANCEL, clRed);
          Exit;
        end;
      end;
  
      UsbAsp95_ReadSR(hUSBDev, sreg); //Читаем регистр
  