################################################################################################################
# Definition Logikbaustein "Werteingabe Wandler"
################################################################################################################
# Alex Dobusch Gebäudeautomation (c)
# http://www.dobusch.ch/hslogic
# Version 1.000
# 08.05.2006
# ID 11602
# Der Baustein darf ohne Veränderung frei verwendet werden. Für den Baustein an sich darf jedoch ohne meine
# Zustimmung keine Vergütung verlangt werden.
# Wird die Programmierung verändert, muss mein (c) entfernt werden, oder auf die Änderung hingewiesen werden.
#
# Trotz sogfältiger Prüfung können Fehler nicht ausgeschlossen werden. 
# Prüfen Sie daher den Baustein, denn ich kann keinerlei Haftung für ein Fehlverhalten übernehmen.
# Änderungswünsche an hslogic@dobusch.ch
################################################################################################################
# 08.05.2006 Baustein erstellt
################################################################################################################

#################################################
### 5000 Definition für HS-Experte
#################################################
# 5000|Bezeichnung|Remanent|Anz.Eingänge|.n.|Anzahl Ausgänge|.n.
#    Bezeichnung
#     |                                                   Remanent
#     |                                                   | Anz.Eingänge|.n.
#     |                                                   | |                                                                         Anzahl Ausgänge|.n.
#     |                                                   | |                                                                         |
5000|"Alex Dobusch Gebäudeautomation\Werteingabe Wandler"|0|5|"Ist"|"Werteingang"|"Divisor Ist"|"Faktor Soll"|"Nachkommastellen Ist"|2|"Soll"|"Wertausgang"

#################################################
### 5001 Definition des Bausteins
#################################################
# 5001|Anzahl Eingänge|Ausgänge|Zeitspeicher|Speicher|Berechnung bei Init
#    Anzahl Eingänge
#    | Ausgänge
#    | | Zeitspeicher
#    | | | Speicher
#    | | | | Berechnung bei Init
#    | | | | |
5001|5|2|0|0|1         # 5 Eingänge, 2 Ausgänge, 0 Timer, 0 Speicher, Berechnung bei Initialisierung

#################################################
### 5002 Definition der Eingänge EN[x]
#################################################
# 5002|Index Eingang|Default Wert|Datenformat 0=numerisch 1=alphanummerisch
#    Index Eingang
#    | Default Wert
#    | | Datenformat
#    | | |
5002|1|0|0      # Ist
5002|2|0|0      # Werteingang
5002|3|2.55|0   # Divisor Ist
5002|4|2.55|0   # Faktor Soll
5002|5|0|0      # Nachkommastellen Ist

#################################################
###5003 Definition des Speichers SN[x]
#################################################
#5003|Index Speicher|Initwert|Remanent
#    Index Speicher
#    | Initwert
#    | | Remanent
#    | | |
#5003|1|0|0   # Wertausgang

#################################################
### 5004 Definition der Ausgänge AN[x]
#################################################
# 5004|Index Ausgang|Initwert|Runden binär|Typ (1-send/2-sbc)|Datenformat 0=numerisch 1=alphanummerisch
#    Index Ausgang
#    | Initwert
#    | | Runden binär
#    | | | Typ
#    | | | | Datenformat
#    | | | | |
5004|1|0|0|1|0   # Soll
5004|2|0|0|1|0   # Wertausgang

#################################################
### 5012 Definition der Formelzeile(n)
#################################################
# 5012|Ende nach Ausführen|Bedingung|Formel|Zeitformel|Ausgang|Zeitspeicher|Speichervariable|Negierter Ausgang
#      Ende nach Ausführen
#      |  Bedingung
#      |  |                 Formel
#      |  |                 |  Zeitformel
#      |  |                 |  |  Ausgang
#      |  |                 |  |  | Zeitspeicher
#      |  |                 |  |  | | Speichervariable
#      |  |                 |  |  | | | Negierter Ausgang
#      |  |                 |  |  | | | |
# 5012|0|"EC[1] and EN[1]"|"1"|""|1|0|0|2

#----------------------------------------------------------
# Istwert
#----------------------------------------------------------
5012|0|"(EI or EC[1]) and ((EN[3]==1.0) or (EN[3]==0.0))"|"EN[1]"|""|2|0|0|0
# Bedingung: Wenn Init oder 'Ist(E1)' gesetzt
#            und entweder 'Divisor Ist(E3)' ist eins oder null
# Formel: Sende Wert von 'Ist(E1)' an 'Wertausgang(A2)

5012|0|"(EI or EC[1]) and (EN[3]!=1.0) and (EN[3]!=0.0)"|"round(float(EN[1])/float(EN[3]), EN[5])"|""|2|0|0|0
# Bedingung: Wenn Init oder 'Ist(E1)' = gesetzt
#            und entweder 'Divisor Ist(E3)' ist nicht eins oder nicht null
# Formel: Sende Quotient von 'Ist(E1)' und 'Divisor Ist(E3)' an 'Wertausgang(A2)'

#----------------------------------------------------------
# Sollwert
#----------------------------------------------------------
5012|0|"(EI==0) and EC[2] and (round(EN[2]*1000000)!=round(AN[2]*1000000))"|"round(EN[2]*EN[4], EN[5])"|""|1|0|0|0
# Bedingung: Wenn nicht Init
#            und 'Werteingang(E2)' gesetzt
#            und 'Werteingang(E2)' ist ungleich 'Wertausgang(A2)'
# Formel: Sende Produkt von 'Werteingang(E2)' und 'Faktor Soll(E4)' an 'Soll(A1)'