[r68]: / trunk / Monarco / Monarco_FB / utility / checkCRC / svnobj  Maximize  Restore  History

Download this file

24 lines (24 with data), 2.1 kB

Gx_l>!0…jüo©}{¿€æ @System.StringL{f8a58466-d7f6-439f-bbb8-d4600e41d099}ImplementationL{3b83b776-fb25-43b8-99f2-3c507c9143fc}TextDocumentL{f3878285-8e4f-490b-bb1b-9acbb7eb04db}TextLinesL{a5de0b0b-1cb5-4913-ac21-9d70293ec00d}	Id
longTagText
BCRC 			:= THIS^.GetCRC(abyRxBuf);:CRCHi			:= WORD_TO_BYTE(CRC);JCRCLo 			:= WORD_TO_BYTE(SHR(CRC,8));€// check to self calculated CRC against the sent CRC, Equal = OKðIF (CRCHi = abyRxBuf[ParamList.MONARCO_STRUCT_SIZE - 2]) AND (CRCLo = abyRxBuf[ParamList.MONARCO_STRUCT_SIZE - 1]) THEN $	checkCRC := TRUE;ELSE&	checkCRC := FALSE;END_IF;InterfaceL{a9ed5b7e-75c5-4651-af16-d2c27e98cb94},METHOD checkCRC : BOOLVAR_INPUT„	abyRxBuf		: ARRAY [0..(ParamList.MONARCO_STRUCT_SIZE-1)] OF BYTE;END_VARVAR	CRC				: WORD; 	CRCLo			: BYTE;  	CRCHi			: BYTE;ÐÐÐE
ÐÐ	
­?ÚÐ-
ÐÐ	
­@ÚÐ-ÐÐ	
­AÚÐ-ÐÐ	
­BÚÐ-ÐÐ	
­CÚÐ-ÐÐ	
­DÚÐ-ÐÐ	
­EÚÐ-ÐÐ	
­FÚÐ-ÐÐ	
­GÚÐ-ÐÐ	
­ ÚÐ-ÐÐE
ÐÐ	
­6ÚÐ-ÐÐ	
­7ÚÐ-ÐÐ	
­8ÚÐ-ÐÐ	
­9ÚÐ-ÐÐ	
­:ÚÐ-ÐÐ	
­;ÚÐ-ÐÐ	
­<ÚÐ-ÐÐ	
­=ÚÐ- ÐÐ	
­>ÚÐ-ÐÐ	
­ÚÐ-