Tagessicherung

This commit is contained in:
maier_s
2021-03-29 10:23:01 +02:00
parent 5fe9b1ff76
commit 9b9c5cf7a7
172 changed files with 31945 additions and 0 deletions

View File

@@ -0,0 +1,32 @@
FUNCTION "ByteOfDWord" : Byte
{ S7_Optimized_Access := 'FALSE' }
VERSION : 0.1
VAR_INPUT
I_In : DWord; // Eingangs-DWORD
I_N : Int; // Byte-Nr
END_VAR
BEGIN
(*#################################################################################################
Copyright (c) Fondium Singen GmbH
### Änderungshistorie ###
Datum: Version: Bearbeiter: Beschreibung:
04.03.2021 0.0 St. Maier Neuerstellung
#################################################################################################*)
(*#################################################################################################
Beschreibung:
Der Funktion zerlegt ein Byte(I_In) in seine einzelnen Bits (O_B0 .. O_B7)
#################################################################################################*)
#ByteOfDWord := DWORD_TO_BYTE(SHR(IN := #I_In, N := WORD_TO_INT(SHL(IN := INT_TO_WORD(#I_N), N := 3))));
END_FUNCTION