anchor.diff:  var
     errorstate: HAL_SD_ErrorTypedef;
   begin
  +  errorstate:=SD_OK;
  +
     while (not __HAL_SD_SDMMC_GET_FLAG(hsd, SDMMC_FLAG_CCRCFAIL or SDMMC_FLAG_CMDREND or SDMMC_FLAG_CTIMEOUT)) do ;
   
     if (__HAL_SD_SDMMC_GET_FLAG(hsd, SDMMC_FLAG_CTIMEOUT)) then
  
positive.code:   tmp: longword;
    errorstate: HAL_SD_ErrorTypedef;
  begin
    pCardInfo.CardType := (hsd.CardType);
    pCardInfo.RCA := (hsd.RCA);
  
  
negative.code:   errorstate: HAL_SD_ErrorTypedef;
    response_r1: longword;
  begin
    errorstate:=SD_OK;
  
    while (not __HAL_SD_SDMMC_GET_FLAG(hsd, SDMMC_FLAG_CCRCFAIL or SDMMC_FLAG_CMDREND or SDMMC_FLAG_CTIMEOUT)) do
    begin
    end;
  