anchor.diff:      begin
         if ChunkSize > (ChipSize - Address) then ChunkSize := ChipSize - Address;
   
  -      if ChipSize > 16777215 then
  +      if ChipSize > 16777216 then
           BytesRead := BytesRead + UsbAsp25_Read32bitAddr(hUSBDev, $13, Address, datachunk, ChunkSize)
         else
           BytesRead := BytesRead + UsbAsp25_Read(hUSBDev, $03, Address, datachunk, ChunkSize);
  
positive.code:       if WriteType = WT_PAGE then
        begin
  
          if WriteSize > 16777215 then //Память больше 128Мбит
          begin
            if addr32bit4byte then //4 байтная адресация включена
              BytesWrite := BytesWrite + UsbAsp25_Write32bitAddr(hUSBDev, $02, Address, datachunk, PageSize)
  
negative.code:   try
  
      //Проверяем тип адресации 256+Mbit
      if WriteSize > 16777216 then
      begin
        UsbAsp25_ReadSR(hUSBDev, sreg, $15);
        if isBitSet(sreg, 0) then addr32bit4byte := true;
  