Пластиковые карты с открытой памятью. Востриков А.А - 85 стр.

UptoLike

85
mov Symb, al
@1:
end; { of asm }
If Got Then
Begin
RXBuf[Cnt]:=Symb;
Inc(Cnt);
End; { of If }
End; { of While }
If In_Buf.FT>$0F Then COMFrameLen:=In_Buf.FT
Else COMFrameLen:=64;
If Cnt<$10 Then Receive_Frame:=False
Else Receive_Frame:=CheckLinkCRC;
End; { of Receive_Frame }