[r2]: / aunit-prj,aunit,aunit_rtu / CODESYS_Control_for_Linux_ARM_SL / Plc Logic / Application / DIN / svnobj  Maximize  Restore  History

Download this file

17 lines (16 with data), 2.7 kB 

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
FUNCTION_BLOCK DIN
VAR_INPUT CONSTANT
	pin_num : INT;
END_VAR
VAR_OUTPUT
	out : BOOL;
VAR
	hShMemRead: RTS_IEC_HANDLE;
	ResultRead: RTS_IEC_RESULT;
	ReadResult: RTS_IEC_RESULT;
	iRead: __UXINT;
	ulSize: UDINT := SIZEOF(GVL.input);#
// Read structure from Shared Memory. 
iRead := SysSharedMemoryRead(hShMemRead, pin_num, ADR(GVL.input[pin_num]), SIZEOF(GVL.input[pin_num]), ADR(ReadResult));
iRead := SysSharedMemoryClose(hShm := hShMemRead);
out := GVL.input[pin_num];