[r68]: / trunk / Monarco / IoDrvMonarco / ICmpIoDrv / IoDrvReadInputs / svnobj  Maximize  Restore  History

Download this file

68 lines (68 with data), 6.8 kB

Gx_l£!0…jüo*c°&Q î&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
fIoDrvReadInputs_Count := IoDrvReadInputs_Count + 1;VIF pConnectorMapList = 0 OR nCount = 0 THENR	IoDrvReadInputs := Errors.ERR_PARAMETER;	RETURN;END_IF2FOR i:=0 TO nCount - 1 DOf	IF (pConnectorMapList[i].dwNumOfChannels = 0) THEN		CONTINUE;	END_IF”	FOR j:= 0 TO UDINT_TO_UINT(pConnectorMapList[i].dwNumOfChannels) - 1 DO		’		pbyIecAddress := pConnectorMapList[i].pChannelMapList[j].pbyIecAddress;¤		wDestIndex := pConnectorMapList[i].pChannelMapList[j].wIecAddressBitOffset / 8;					// Digital In¨		IF (pConnectorMapList[i].pChannelMapList[j].pParameter^.dwDriverSpecific = 0) THEN|			IF (pConnectorMapList[i].pChannelMapList[j].wSize = 1) THENæ				IF (_TestFB.byDigitalIn AND SHL(WORD#1, pConnectorMapList[i].pChannelMapList[j].wParameterBitOffset)) <> 0 THENH				{IF defined (pou:SysCpuSetBit2)} ô					SysCpuSetBit2(ADR(pbyIecAddress[wDestIndex]), pConnectorMapList[i].pChannelMapList[j].wIecAddressBitOffset MOD 8);			!"    			{ELSE}    "ò					SysCpuSetBit(ADR(pbyIecAddress[wDestIndex]), pConnectorMapList[i].pChannelMapList[j].wIecAddressBitOffset MOD 8);			#&    			{END_IF}    $				ELSE%L				{IF defined (pou:SysCpuResetBit2)}&ø					SysCpuResetBit2(ADR(pbyIecAddress[wDestIndex]), pConnectorMapList[i].pChannelMapList[j].wIecAddressBitOffset MOD 8);			'ö					SysCpuResetBit(ADR(pbyIecAddress[wDestIndex]), pConnectorMapList[i].pChannelMapList[j].wIecAddressBitOffset MOD 8);			($				END_IF 			 			)~			ELSIF pConnectorMapList[i].pChannelMapList[j].wSize = 8 THEN*Ž				pbyIecAddress[wDestIndex] := WORD_TO_BYTE( SHR(_TestFB.byDigitalIn, pConnectorMapList[i].pChannelMapList[j].wParameterBitOffset) );+			END_IF,		END_IF-		// Analog In.¨		IF (pConnectorMapList[i].pChannelMapList[j].pParameter^.dwDriverSpecific = 1) THEN/²			dwChannel := pConnectorMapList[i].pChannelMapList[j].pParameter^.dwParameterId - 1100;0.			pw := pbyIecAddress;1P			pw^ := _TestFB.awAnalogIn[dwChannel];2	END_FOR3END_FOR4BIoDrvReadInputs := Errors.ERR_OK;5Interface6L{a9ed5b7e-75c5-4651-af16-d2c27e98cb94}7:{attribute 'conditionalshow'}8<METHOD IoDrvReadInputs : UDINT9VAR_INPUT:j	pConnectorMapList : POINTER TO IoConfigConnectorMap;;	nCount : DINT;<END_VAR=VAR>	i, j : DINT;?@	pbyIecAddress: POINTER TO BYTE;@&	wDestIndex : WORD;A&	bySrcValue : BYTE;B$	wSrcIndex : WORD;C.	pby : POINTER TO BYTE;D:	wParameterByteOffset : WORD;E*	pw: POINTER TO WORD;F$	dwChannel: UDINT;G"	bDigitalIn: INT;ÐÐÐE/ÐÐ	
­ÚÐ-
ÐÐ	
­ÚÐ-ÐÐ	
­ÚÐ-ÐÐ	
­ÚÐ-ÐÐ	
­ÚÐ-ÐÐ	
­LÚÐ-ÐÐ	
­ÚÐ-ÐÐ	
­;ÚÐ-ÐÐ	
­<ÚÐ-ÐÐ	
­=ÚÐ-ÐÐ	
­kÚÐ-ÐÐ	
­­ÚÐ-ÐÐ	
­®ÚÐ-ÐÐ	
­˜ÚÐ-ÐÐ	
­ÁÚÐ-ÐÐ	
­ÙÚÐ-ÐÐ	
­ÚÚÐ-ÐÐ	
­ÛÚÐ-ÐÐ	
­ÜÚÐ-ÐÐ	
­ÝÚÐ-ÐÐ	
­ÞÚÐ- ÐÐ	
­ßÚÐ-!ÐÐ	
­àÚÐ-"ÐÐ	
­áÚÐ-#ÐÐ	
­âÚÐ-$ÐÐ	
­ãÚÐ-%ÐÐ	
­äÚÐ-&ÐÐ	
­åÚÐ-!ÐÐ	
­æÚÐ-'ÐÐ	
­çÚÐ-#ÐÐ	
­èÚÐ-(ÐÐ	
­éÚÐ-)ÐÐ	
­êÚÐ-*ÐÐ	
­íÚÐ-+ÐÐ	
­ÄÚÐ-,ÐÐ	
­¿ÚÐ-ÐÐ	
­ïÚÐ--ÐÐ	
­³ÚÐ-.ÐÐ	
­¶ÚÐ-/ÐÐ	
­ºÚÐ-0ÐÐ	
­¼ÚÐ-1ÐÐ	
­¬ÚÐ-,ÐÐ	
­ÀÚÐ-ÐÐ	
­µÚÐ-2ÐÐ	
­MÚÐ-3ÐÐ	
­$ÚÐ-ÐÐ	
­ÚÐ-4Ð56ÐEÐÐ	
­oÚÐ-7ÐÐ	
­ÚÐ-8ÐÐ	
­ÚÐ-9ÐÐ	
­ÚÐ-:ÐÐ	
­ÚÐ-;ÐÐ	
­ÚÐ-<ÐÐ	
­
ÚÐ-=ÐÐ	
­ ÚÐ->ÐÐ	
­}ÚÐ-?ÐÐ	
­ÚÐ-@ÐÐ	
­¦ÚÐ-AÐÐ	
­ÚÐ-BÐÐ	
­§ÚÐ-CÐÐ	
­¨ÚÐ-DÐÐ	
­½ÚÐ-EÐÐ	
­¾ÚÐ-FÐÐ	
­ÇÚÐ-GÐÐ	
­ÚÐ-<ÐÐ	
­ÚÐ-