Ik heb zelf alle variabelen horende bij een scène in een struct om ze met weinig code door het programma te kunnen verplaatsen. Zoals bijvoorbeeld bij het aanroepen of wijziging van scènes. Uiteindelijk zul je ze een keer naar je dmx kanalen moeten schrijven maar dat hoeft slechts op 1 plek in het programmaRoekeloos schreef op woensdag 3 januari 2024 @ 02:50:
Allereerst het DMX verhaal. Dat is nu Artnet via Home Assistant, waarbij ik gebruik maak van scenes, die getriggerd worden door schakelaars die aan de PLC hangen. Bij alle ruimtes is enkel drukken de "hoge" scene aan/uit en lang drukken de "lage" scene, waarachter vaak een scene zit voor die ruimte met meerdere DMX kanalen met verschillende waarden. Als ik dit naar de PLC wil halen, kom ik bij die "dimmer" functieblokken uit, maar ik wil geen schakelaar vasthouden tot de verlichting de gewenste waarde heeft. De enige manier om de huidige opzet te bereiken, is door te werken met heel veel virtual_ints waarin de DMX waarden van de verschillende scenes zijn opgeslagen. Of heeft iemand een ander idee?
Je voegt een struct toe (Add object -> DUT -> Structure) in het voor beeld heet hij DUT
Declaratie van de struct:
TYPE DUT :
STRUCT
iLampPlafondLinks : INT;
iLampPlafondRechts : INT;
bLampBedLinks : BOOL;
bLampBedRechts : BOOL;
END_STRUCT
END_TYPE
In het programma zet je in de declaratie:
PROGRAM PLC_PRG
VAR
stStoredScenes : ARRAY[0..10] OF DUT;
stCurrentVals : DUT;
i : INT;
END_VAR
Programma:
stCurrentVals := stStoredScenes[i];
Speel maar eens met de variablen en kijk wat het doet
/u/1/femme.png?f=community)
Ik heb wat pech met m'n zoneventielen, alhoewel de datasheet zegt dat 24V DC moet lukken is er geen beweging in te krijgen.. Iemand die 24V DC zoneventielen kan aanraden die wel werken?:
[...]
ja hoor, ik heb Eberle TS ultra+ aangeschaft. Past er mooi op en 24V dus kan meteen op output PLC aangesloten worden
Is misschien het aantal ampere dat ze nodig hebben hoger dan geleverd kan worden door jou voeding? Zo heb ik ooit een waterklep gehad die zonder waterdruk prima werkte met weinig ampere maar eenmaal op de waterleiding aangesloten deed hij niets meer. Na het vervangen van de voeding door een exemplaar met meer amperes werkte het prima.:
[...]
Ik heb wat pech met m'n zoneventielen, alhoewel de datasheet zegt dat 24V DC moet lukken is er geen beweging in te krijgen.. Iemand die 24V DC zoneventielen kan aanraden die wel werken?
Ik probeer al een tijdje het Codesys project van @MichVw op een Wago 8212 te deployen obv Codesys 3.5 (dus zonder eCockpit), maar loop steeds vast op errors bij het uploaden van de boot application naar de PLC.
De applicatie compileert gewoon zonder errors, maar ik krijg meldingen van "Unresolved reference: 'CODEMGETCONTENTBYFIRMCODE2' (en ook FIRMCODE3). Lijkt iets in de CmpCodeMeter library te zijn, die heb ik toegevoegd maar maakt geen verschil.
:fill(white):strip_exif()/f/image/KrHTbXiGfuxdX8cZMnZC66J6.png?f=user_large)
Die meldingen linken overigens nergens naar dus geen idee waar het probleem zit.
Wie weet raad? Ik draai eea op Codesys 3.5 SP19 patch 2 (de versie die Wago ondersteunt) maar heb ook de nieuwste geprobeerd. De PLC getest met firmwares 24 en 26, beide geven zelde resultaat...
De applicatie compileert gewoon zonder errors, maar ik krijg meldingen van "Unresolved reference: 'CODEMGETCONTENTBYFIRMCODE2' (en ook FIRMCODE3). Lijkt iets in de CmpCodeMeter library te zijn, die heb ik toegevoegd maar maakt geen verschil.
Die meldingen linken overigens nergens naar dus geen idee waar het probleem zit.
Wie weet raad? Ik draai eea op Codesys 3.5 SP19 patch 2 (de versie die Wago ondersteunt) maar heb ook de nieuwste geprobeerd. De PLC getest met firmwares 24 en 26, beide geven zelde resultaat...
[ Voor 28% gewijzigd door THM0 op 21-03-2024 20:19 ]
Zorg ervoor dat bij de placeholders bij CmpCodeMeter niks ingevuld staat.
/f/image/fBDniC8rp5D8C6GV1QSFfpAz.png?f=fotoalbum_large)
Zodra daar wel iets staat krijg je die foutmeldingen.
:fill(white):strip_exif()/f/image/fBDniC8rp5D8C6GV1QSFfpAz.png?f=user_large)
Zodra daar wel iets staat krijg je die foutmeldingen.
/u/1323808/crop62fb8b30db824_cropped.png?f=community)
/u/911/tux-extreme2.png?f=community)
Hier in huis hebben we drie schakelkasten met zo'n 50 tot 70 PVC buizen per schakelkast en een tuinberging. In de woning zijn wel een aantal zaken zoals bewegingsmelders (KNX) en speakers doorgelust om in ieder geval een paar buizen te besparen
Mijn plan was om behoorlijk wat met PLCs te doen, maar uiteindelijk ben ik nogal afgeknapt op Codesys. Het voelt bijzonder 'vintage' en het is echt een compleet andere manier van programmeren dan ik gewend ben. Op zich prima voor wat simpel spul (KNX aan SMI zonwering koppelen b.v.) maar heel veel complexer ga ik dat niet maken.
De PLCs gebruik ik voor dat soort koppelingen en als een goedkope manier om b.v. deur- en raamcontacten te gebruiken. Maar achteraf had ik daar iets meer euro's tegenaan moeten gooien voor een KNX oplossing, dat had me heel veel uur prutsen met Codesys bespaart Maakt het ook makkelijker om het huis te verkopen als de basis draait op KNX ipv PLCs met custom code.
In mijn geval betekenen vier schakelkasten ook vier PLCs, maar anders was het niet te doen geweest. 120 buizen in één kast is niet grappig en het wordt daar ook niet overzichtelijker door. Een alternatief is de buizen van een verdieping uit laten komen in een (kleine) kast zonder actieve componenten en van daaruit met twee kabelgoten (230V en de rest) door gaan naar een kast waar je alles aan elkaar knoopt.
Mijn plan was om behoorlijk wat met PLCs te doen, maar uiteindelijk ben ik nogal afgeknapt op Codesys. Het voelt bijzonder 'vintage' en het is echt een compleet andere manier van programmeren dan ik gewend ben. Op zich prima voor wat simpel spul (KNX aan SMI zonwering koppelen b.v.) maar heel veel complexer ga ik dat niet maken.
De PLCs gebruik ik voor dat soort koppelingen en als een goedkope manier om b.v. deur- en raamcontacten te gebruiken. Maar achteraf had ik daar iets meer euro's tegenaan moeten gooien voor een KNX oplossing, dat had me heel veel uur prutsen met Codesys bespaart
Maakt het ook makkelijker om het huis te verkopen als de basis draait op KNX ipv PLCs met custom code.In mijn geval betekenen vier schakelkasten ook vier PLCs, maar anders was het niet te doen geweest. 120 buizen in één kast is niet grappig en het wordt daar ook niet overzichtelijker door. Een alternatief is de buizen van een verdieping uit laten komen in een (kleine) kast zonder actieve componenten en van daaruit met twee kabelgoten (230V en de rest) door gaan naar een kast waar je alles aan elkaar knoopt.
[ Voor 4% gewijzigd door bartvb op 10-04-2024 12:45 ]
Wat je zegt over mijn setup en aanpak klopt ook wel.
Alleen loop je toch vrij snel tegen limitaties aan in de PLC-programmering. Je bent gelimiteerd in het aantal opties (packages) en de wijze van programmering (software). Kleine aanpassingen hebben daardoor veel voet in de aarde. Dat (veel? aanname) gebruikers al snel naar andere tools grijpen voor een betere ervaring bij het programmeren van hun domotica, toont dat alleen maar aan.
En door volledig op je PLC te vertrouwen stel je je weer bloot aan andere zaken. Na de aanpassingen liepen we tegen een vreemde melding aan in de PLC waardoor hij de cycle niet meer vol kon houden voor het MQTT gedeelte. Een fout die ik op Google niet kon achterhalen en niet kon verklaren. De PLC crashte daadwerkelijk, dus dan werkt niet alleen je sensorverlichting niet meer, maar staat álles stil: verwarming, verlichting, ventilatie, zonnewering. Dus alles resetten, backup project terugzetten...
:strip_icc():strip_exif()/u/48112/crop64c213aece164_cropped.jpg?f=community)
In principe is er geen verschil tussen een opstelling met PLC's, MQTT. en HA aan de ene kant en een opstelling met het populaire Loxone aan de andere kant. Bij een opstelling met PLC's kan je zien hoe de worst gemaakt wordt. Maar al die lagen van abstractie zijn evenzeer aanwezig bij Loxone. Alleen heb je er daar geen toegang toe.:
[...]
Wat je zegt over mijn setup en aanpak klopt ook wel.
Alleen loop je toch vrij snel tegen limitaties aan in de PLC-programmering. Je bent gelimiteerd in het aantal opties (packages) en de wijze van programmering (software). Kleine aanpassingen hebben daardoor veel voet in de aarde. Dat (veel? aanname) gebruikers al snel naar andere tools grijpen voor een betere ervaring bij het programmeren van hun domotica, toont dat alleen maar aan.
En door volledig op je PLC te vertrouwen stel je je weer bloot aan andere zaken. Na de aanpassingen liepen we tegen een vreemde melding aan in de PLC waardoor hij de cycle niet meer vol kon houden voor het MQTT gedeelte. Een fout die ik op Google niet kon achterhalen en niet kon verklaren. De PLC crashte daadwerkelijk, dus dan werkt niet alleen je sensorverlichting niet meer, maar staat álles stil: verwarming, verlichting, ventilatie, zonnewering. Dus alles resetten, backup project terugzetten...
Ik zie dat dus niet echt als een limitatie. Bij het oplossing van complexe logica moet je de juiste abstractielaag aanspreken. Bij PLC's is dat jouw verantwoordelijkheid. Bij Loxone geeft de fabrikant je enkel toegang tot de toplaag en kiest het op voorhand welke interne abstractielagen beschikbaar zijn en dicteert dat dus ook de opties in de toplaag.
Ik heb hier ooit eens een uitgebreide post over geschreven maar het komt er voor mij op neer dat Domotica met PLC's een werk van liefde is. De verschillende moeilijkheden en de énorm steile leercurve zijn daar een onderdeel van. Het is naar mijn mening eerst aan de eindgebruiker om de juiste keuze te maken voor PLC's of een commerciële oplossing zoals Loxone.
Het is gek om dit te zeggen in het topic over domotica met PLC's maar ik denk dat voor heel wat mensen een oplossing zoals Loxono veel beter is. Voor wie op zoek is naar meer dan een werkende installatie maar ook graag dieper inzicht en kennis wil in (industriële) elektrotechniek en programmatie zijn PLC's dan weer een goede optie.
Het is misschien ook het vermelden waard dat de initiële post van Femme de PLC reduceert tot een doorgeefluik. Dat is absoluut een werkbare optie. Maar het maskeert misschien ook dat het programmeren van extra functies in codesys voor veel (nieuwe) programmeurs geen eitje is en dat je eigenlijk absoluut wat ervaring in C nodig hebt voor je aan dit soort project begint.
:strip_icc():strip_exif()/u/43439/jettweakers.jpg?f=community)
Ik heb toevallig recent dit nog afgerond. Ik heb gekozen voor deze labelprinter: https://www.brother.nl/labels-en-bonnen/pt-p710bth en daarin dan krimpkous te kopen (HSe-221). Deze krimpkous kun je overigens voor veel schappelijkere prijzen vinden bij de bekende chinese websites
Deze specifieke labelprinter kun je ook gebruiken in combinatie met de desktop software welke veel meer mogelijkheden biedt dan de app-based software.
Ik ben daar supertevreden mee
Wist niet dat dit bestond, dat lijkt mij inderdaad een zeer handige oplossing en bovendien betaalbaar.:
[...]
Ik heb toevallig recent dit nog afgerond. Ik heb gekozen voor deze labelprinter: https://www.brother.nl/labels-en-bonnen/pt-p710bth en daarin dan krimpkous te kopen (HSe-221). Deze krimpkous kun je overigens voor veel schappelijkere prijzen vinden bij de bekende chinese websites
Deze specifieke labelprinter kun je ook gebruiken in combinatie met de desktop software welke veel meer mogelijkheden biedt dan de app-based software.
Ik ben daar supertevreden mee
Heb je toevallig enkele foto's van het resultaat rond kleine draden/aders, 1,5mm² en kleiner.
Ik heb zojuist na een aardige strijd HomeAutomation.CoDeSys3 werkend op mijn Wago PFC 750-8212, kan nu een lampje op de PLC schakelen van home assistant
De strijd:
1. Windows 10 VM opzetten want ik heb verder geen windows
2. Draaide voor geen meter in virtualbox op mijn intel macbook (wel eerder gedaan, toen ging het beter, jaren terug).
3. Windows 10 VM opzetten op een linux host, met kvm en virt-manager, draait nu als een trein via microsoft remote desktop.
4. Uitvogelen hoe het zit met de wago codesys licentie die er al bij moeten zitten om niet te hoeven te betalen voor codesys pfc200 targets.
5. Instructies van HomeAutomation.CoDeSys3 proberen te volgen, paar pogingen gedaan, uiteindelijk met de wago codesys en libs/targets gekomen bij een punt dat hij compiled maar toen gaf hij een error. IO er met kbus scan in gegooid en met de hand de inputs/outputs variabel namen gegeven.
6. Overschakelen naar codesys targets, dan moest ik opnieuw de IO er in zetten.
7. Toen maar terug naar de save game van stap 5 en de originele wago firmware/plc runtime weer geflashed.
8. Dit bleek de gouden tip: kuhlivisj in "Domotica met plc's"
9. In wezen werkend, zag data op mqtt, wat dingen er uit gehaald die ik nog niet nodig heb
10. homeassistant autodiscovery werkte ook en ik kon een ledje op een output module toggelen vanuit home assistant.
Bedankt @MichVw en @kuhlivisj
De strijd:
1. Windows 10 VM opzetten want ik heb verder geen windows
2. Draaide voor geen meter in virtualbox op mijn intel macbook (wel eerder gedaan, toen ging het beter, jaren terug).
3. Windows 10 VM opzetten op een linux host, met kvm en virt-manager, draait nu als een trein via microsoft remote desktop.
4. Uitvogelen hoe het zit met de wago codesys licentie die er al bij moeten zitten om niet te hoeven te betalen voor codesys pfc200 targets.
5. Instructies van HomeAutomation.CoDeSys3 proberen te volgen, paar pogingen gedaan, uiteindelijk met de wago codesys en libs/targets gekomen bij een punt dat hij compiled maar toen gaf hij een error. IO er met kbus scan in gegooid en met de hand de inputs/outputs variabel namen gegeven.
6. Overschakelen naar codesys targets, dan moest ik opnieuw de IO er in zetten.
7. Toen maar terug naar de save game van stap 5 en de originele wago firmware/plc runtime weer geflashed.
8. Dit bleek de gouden tip: kuhlivisj in "Domotica met plc's"
9. In wezen werkend, zag data op mqtt, wat dingen er uit gehaald die ik nog niet nodig heb
10. homeassistant autodiscovery werkte ook en ik kon een ledje op een output module toggelen vanuit home assistant.
Bedankt @MichVw en @kuhlivisj
Bijna een eeuwigheid geleden maar ik heb deze week eindelijk wat tijd gevonden om wat updates te pushen naar m'n repo en een nieuwe release te maken:
https://github.com/Michie...eSys3/releases/tag/v1.4.0
voor v1.5.0 zou ik al m'n climate function blocks willen toevoegen, daarna beginnen aan de omzet van éCockpit naar CodeSys..
Ik had nog een vraagje; zijn er mensen die wat meer kennen van het hele 'assistant' gedoe in Home Assistant? (spraak of via chat). Ik heb ergens opgevangen dat het sterk gebruik maakt van areas/ruimtes, is dit correct of kan het ook werken met labels?
Reden waarom ik het vraag is dat de huidige MQTT discovery logica in het project alle entiteiten publiceerd onder één toestel. En je kan maar op toestel niveau een ruimte toewijzen, niet op entiteit niveau.
Als het echt een must is voor dat gedeelte van Home Assistant te ondersteunen moet ik inkijken om de mogelijkheid te ondersteunen om voor iedere instantie van een function block een uniek toestel aan te maken via MQTT discovery...
https://github.com/Michie...eSys3/releases/tag/v1.4.0
voor v1.5.0 zou ik al m'n climate function blocks willen toevoegen, daarna beginnen aan de omzet van éCockpit naar CodeSys..
Ik had nog een vraagje; zijn er mensen die wat meer kennen van het hele 'assistant' gedoe in Home Assistant? (spraak of via chat). Ik heb ergens opgevangen dat het sterk gebruik maakt van areas/ruimtes, is dit correct of kan het ook werken met labels?
Reden waarom ik het vraag is dat de huidige MQTT discovery logica in het project alle entiteiten publiceerd onder één toestel. En je kan maar op toestel niveau een ruimte toewijzen, niet op entiteit niveau.
Als het echt een must is voor dat gedeelte van Home Assistant te ondersteunen moet ik inkijken om de mogelijkheid te ondersteunen om voor iedere instantie van een function block een uniek toestel aan te maken via MQTT discovery...
Als eerste, bedankt voor je werk van deze release.:
Bijna een eeuwigheid geleden maar ik heb deze week eindelijk wat tijd gevonden om wat updates te pushen naar m'n repo en een nieuwe release te maken:
https://github.com/Michie...eSys3/releases/tag/v1.4.0
voor v1.5.0 zou ik al m'n climate function blocks willen toevoegen, daarna beginnen aan de omzet van éCockpit naar CodeSys..
Ik had nog een vraagje; zijn er mensen die wat meer kennen van het hele 'assistant' gedoe in Home Assistant? (spraak of via chat). Ik heb ergens opgevangen dat het sterk gebruik maakt van areas/ruimtes, is dit correct of kan het ook werken met labels?
Reden waarom ik het vraag is dat de huidige MQTT discovery logica in het project alle entiteiten publiceerd onder één toestel. En je kan maar op toestel niveau een ruimte toewijzen, niet op entiteit niveau.
Als het echt een must is voor dat gedeelte van Home Assistant te ondersteunen moet ik inkijken om de mogelijkheid te ondersteunen om voor iedere instantie van een function block een uniek toestel aan te maken via MQTT discovery...
Bij de release die ik op dit moment van jou draai is het ook zo dat bij default alle entiteiten in één area zitten. Echter kan je dit aanpassen. Zo heb ik verschillende entiteit vanuit mijn PLC toegekend aan andere area's. Dit heb ik gedaan door naar de entiteit te gaan en bij instellingen "Use device area" uit te schakelen. Daarna kan je een andere area kiezen.
:strip_exif()/u/113667/ja-man.gif?f=community)
:strip_icc():strip_exif()/u/350783/crop62ff797f3eccf_cropped.jpg?f=community)
ik heb mijn PLC project ondertussen bijna 4jaar stabiel draaien
vele dank aan @MichVw voor het vele werk en goede uitleg!
ondertussen zijn er heel wat 'inputs' en 'outputs' bij gekomen.
waardoor het overzicht wat zoek was.
En in die 4 jaar tijd zijn ook heel wat uitbreidingen en updates bijgekomen (zoals de MQTT discovery, dmx, ...) die ik nooit toegepast heb.
(altijd met de oorspronkelijke versie van blokken/bibliotheken blijven werken)
daarom dacht ik van eens helemaal opnieuw te beginnen (dus compleet nieuw project, met het idee wel veel te kunnen copy pasten zoals mijn 'Pushbuttons' en 'Switches'
Maar bij het importeren/downloaden van de 'labraries' krijg ik 2 bibliotheken niet goed:
:strip_exif()/f/image/8DV6IAvRP1cTbGxJmuaTgBku.jpg?f=fotoalbum_large)
Ik vermoed dat ik zonder die bibliotheken kan zolang ik de DMX functionaliteit niet gebruik als ik het goed heb... (nu zit mijn DMX rechstreeks in HomeAssistant, maar zou ook overwegen dit via de PLC te doen als dit zou werken..)
voor mensen die DALI / RS485 willen gebruiken zullen die bibliotheken ook nodig zijn vermoed ik?
vele dank aan @MichVw voor het vele werk en goede uitleg!
ondertussen zijn er heel wat 'inputs' en 'outputs' bij gekomen.
waardoor het overzicht wat zoek was.
En in die 4 jaar tijd zijn ook heel wat uitbreidingen en updates bijgekomen (zoals de MQTT discovery, dmx, ...) die ik nooit toegepast heb.
(altijd met de oorspronkelijke versie van blokken/bibliotheken blijven werken)
daarom dacht ik van eens helemaal opnieuw te beginnen (dus compleet nieuw project, met het idee wel veel te kunnen copy pasten zoals mijn 'Pushbuttons' en 'Switches'
Maar bij het importeren/downloaden van de 'labraries' krijg ik 2 bibliotheken niet goed:
:no_upscale():strip_icc():strip_exif()/f/image/8DV6IAvRP1cTbGxJmuaTgBku.jpg?f=user_large)
Ik vermoed dat ik zonder die bibliotheken kan zolang ik de DMX functionaliteit niet gebruik als ik het goed heb... (nu zit mijn DMX rechstreeks in HomeAssistant, maar zou ook overwegen dit via de PLC te doen als dit zou werken..)
voor mensen die DALI / RS485 willen gebruiken zullen die bibliotheken ook nodig zijn vermoed ik?
:strip_exif()/u/118705/usericon.gif?f=community)
De Professional Developer versie van Codesys heeft een Git add-on.
Wel even EUR 550,-- ex BTW per jaar aftikken voor de licentie...
Een Modbus interface opzetten en laten werken gaat in twee stappen.
1. Declareer de modbus master
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
| PROGRAM PRG_MODBUS_652
VAR
(* Link Layer execution of Read and Write Commands *)
ModbusMaster : WagoAppPlcModbus.FbMbMasterSerial := (
xConnect := TRUE,
udiBaudrate := 9600,
usiDataBits := 8,
eParity := WagoTypesCom.eTTYParity.None,
eStopBits := WagoTypesCom.eTTYStopBits.One,
eHandshake := WagoTypesCom.eTTYHandshake.None,
ePhysical := WagoTypesCom.eTTYPhysicalLayer.RS485_HalfDuplex,
eFrameType := eMbFrameType.RTU,
tTimeOut := T#500MS
);
END_VAR |
2. Call die master FB in elke cycle
code:
1
2
3
4
5
6
7
| (* Link layer execution *)
ModbusMaster(
I_Port := IoConfig_Globals.RS232_485_Interface,
utQuery:= MasterQuery,
xTrigger := xTrigger,
utResponse:= MasterResponse
); |
De `I_Port` parameter is waar je je pointer naar je 750-652 interface opgeeft. Gebruik je COM1 dan zou die daar staan. De naam van je interface komt uit IoConfig_Globals. Die kan je hier aanpassen als je dat wil.
Belangrijk: De Wago modbus master doet alleen maar de basis send-en-receive functies. Je hebt een controller FB nodig die je modbus netwerk voor je beheert. Die doet dan de timing voor het uitlezen en aansturen van je modbus slaves
[ Voor 4% gewijzigd door Kanze op 09-12-2024 10:00 ]
Heb twee PFC200'S G2 op de kop kunnen tikken voor 470 euro het stuk. Die dingen komen wel in prijs naar beneden precies.
éCockpit doet wat het moet doen maar je merkt wel dat de interface van native codesys een stuk reponsiever werkt. Volgende week eens kijken of een dropin replacement gewoon werkt zoals het hoort.
Het kriebelt om een nieuwe guide te schrijven voor beginners maar het ontbreekt zoals altijd aan tijd
éCockpit doet wat het moet doen maar je merkt wel dat de interface van native codesys een stuk reponsiever werkt. Volgende week eens kijken of een dropin replacement gewoon werkt zoals het hoort.
Het kriebelt om een nieuwe guide te schrijven voor beginners maar het ontbreekt zoals altijd aan tijd
Inhoudtafel
0. Inleiding1. PLC Basis
2. PLC's van Wago
3. Basisopstelling
0. Inleiding
Een gerichte handleiding om een domotica-systeem op te zetten met de hulp van een WAGO PLC in een woonhuis. Ik schrijf hoofdzakelijk over wat essentieel is en probeer de lezer zo veel mogelijk (verloren) tijd te besparen. Als je ergens op vastloopt kom dan zeker posten.1. PLC Basis
1.1 Overzicht
PLC's (Programmable Logic Controllers) zijn compacte computers die in elektrische kasten op een DIN-rail geplaatst kunnen worden. Normaal leven ze in fabrieken maar ze kunnen net zo goed je woonhuis aansturen.Een PLC heeft Ingangen, Uitgangen, Serieële poort(en), en netwerkconnectiviteit. Dat zijn de hardwarefuncties. De software die gebruik maakt van die hardwarefuncties kan je zelf programmeren.
De PLC heeft alle capabiliteiten om je woonhuis aan te sturen. Sommige commerciële domoticasystem zijn trouwens gewoon PLC's in vermomming.
:no_upscale():strip_exif()/f/image/OvuZ6YROJl6CNuYjY1f6Jl0C.webp?f=user_large)
2. PLC's van Wago
2.1 Waarom Wago?
1. Beschikbaarheid en Prijs. Wago is een Duits merk waardoor hun PLC's goed voorradig zijn op de Europese markt. Omdat PLC's industrieel materiaal zijn leert de ervaring bovendien dat ze tweedehands zeer betrouwbaar zijn. Met name de Duitse eBay en alternatieven zijn een goede plaats om aan scherpe prijzen de nodige harware aan te kopen.2. Softwarepakket. Om je PLC te programmeren heb je een softwarepakket van Wago nodig. De PLC beschikt reeds over een hardwarelicentie voor dat pakket. Je hoeft dus geen dure software aan te kopen. Dit is ongebruikelijk in de wereld van industrieële automatisatie en dus een groot voordeel.
### 2.2 Hardware
We focussen op de modellen Wago PFC200 G1, en Wago PFC200 G2, of nieuwer. Generaties G1 en G2 zijn onderverdeeld in een reeks submodellen. De basisversie van elke generatie is reeds overkill voor je woonhuis. De andere submodellen beschikken over speciale thermische of chemische hardeningen en extra industrieële communicatieprotocollen. Geen van die dingen hebben we nodig in een woonhuis.1. PFC200 G1 model 750-8202
2. PFC200 G2 model 750-8212
3. (optioneel) PFC300
Als je een ander model kiest let erop dat het een RS232/485 seriële poort ingebouwd heeft.
2.2.1 PFC200
:strip_exif()/f/image/hbY4XMGJysIspXWlsXhWdQIl.png?f=user_large)
Een PFC200 PLC-systeem bestaat uit 2 onderdelen:
- De Controller (CPU) is het brein van je installatie. Hierop draait de programmatie die je zelf geschreven hebt.
- De Veldbus (Fieldbus) is de interface (aansluitpunt) tussen de controller en je elektrische installatie.
De controller + veldbus op de foto hierboven is al redelijk volledig. Deze elementen zullen ook in jouw installatie zeker aan bod komen:
1. Ingebouwde seriële poort (COM1) voor RS232 en RS485. Het Modbus protocol gebruik RS485 voor signalisatie
2. Twee ethernet poorten (X1/X2). X1 voor aansluiting met het thuisnetwerk. X2 voor koppeling met een andere controller.
3. LED's voor debugging
4. SD-kaart slot voor updates (G1)
5. Status schakelaar
6. Serial-USB poort. Met een speciale USB-kabel (zie 2.3) kan bij netwerkstoring nog geprogrammeerd worden.
8. Controller built-in powersupply 24VDC
9. Redundante veldbus voeding
10. Digitale Ingangen 2-poort
11. Digitale Uitgangen 2-poort
12. Digitale Ingangen 16-poort
13. Veldbus eindmodule
We komen later uitgebreider terug op items 10 tot en met 13.
2.2.2 Digitale of Analoge Kaarten
Digitale kaarten zijn binaire systemen als in Aan of Uit. Analoge kaarten vertalen een stroomsterkte naar een analoog voltage. Dat wordt dan weer geïnterpreteert als een analoge waarde, bijvoorbeeld temperatuur. In deze handleiding gebruiken we geen analoge kaarten omdat ze zeer duur zijn.Later gaan we sensoren koppelen aan onze PLC via Modbus. Die sensoren versturen hun meetwaarden naar de PLC als digitale waarden. Deze opstelling is goedkoper en kent heel weinig calibratieproblemen.
2.3 Software
Er zijn twee softwarepakketen. De keuze hangt af van de generatie.1. PFC200 G1 gebruikt Wago e!Cockpit
2. PFC200 G2 gebruikt Wago Codesys
3. (optioneel) PFC300 gebruikt Wago Codesys
Codesys is een standaard IDE voor PLC's. Wago heeft lange tijd codesys gebruikt als de basis voor haar eigen IDE (Wago éCockpit). Bij de release van G2 is overgschakeld naar zuiver Codesys.
Beide softwarepakketen werken enkel op Windows. Linux of macOS gebruikers kunnen een virtual machine gebruiken. De programmatie van de PLC gaat via je thuisnetwerk. Koop ook de speciale Wago usb-naar-serieel kabel die je direct aansluit op een Windows computer en de PLC.
1. Wago Serial-USB Cable
2.3.1 e!Cockpit (G1)
Zonder een activatiesleutel werkt Wago e!Cockpit voor 30 gebruiksdagen. Dat zijn geen kalenderdagen. Gebruik e!cockpit in een virtual machine die je kan resetten. De evaluatiemodus is 100% functioneel.Update je installatie van e!Cockpit 1.11.2.0 naar 1.11.3.1! Er is een CVE ontdekt in een hulpprogramma wat bij versie 1.11.2.0 mee geïnstalleerd wordt. Dit probleem is verholpen ins 1.11.3.1
De installatie van e!Cockpit installeert ook:
1. WAGO I/O Check
2. WAGO Ethernet Settings
Toestemming nodig voor bekijken van YouTube
Op deze plek staat ingesloten content die van YouTube afkomstig is. Het tonen van deze inhoud kan ertoe leiden dat YouTube persoonlijke gegevens zoals je IP-adres verwerkt en/of cookies op jouw computer of ander apparaat zet. Hiervoor moet je eerst expliciet toestemming geven voor Sociale media.
Bekijk op YouTubeHow to install Wago e!Cockpit
2.3.2 Firmware (G1)
Firmware voor G1 staan op Wago's GithubVoor de update-procedure volg je dit filmpje:
Toestemming nodig voor bekijken van YouTube
Op deze plek staat ingesloten content die van YouTube afkomstig is. Het tonen van deze inhoud kan ertoe leiden dat YouTube persoonlijke gegevens zoals je IP-adres verwerkt en/of cookies op jouw computer of ander apparaat zet. Hiervoor moet je eerst expliciet toestemming geven voor Sociale media.
Bekijk op YouTubeWAGO PFC Series Firmware Update Tutorial
Installeer in e!Cockpit dezelfde firmwareversie als op je PFC200!
2.3.3 Codesys
Wago Codesys heeft geen activatiesleutel of evaluatiemodus.De installatie van Wago Codesys installeert ook Wago Navigator. Een soort Wago App Store. Vanuit Wago Navigator installeer je nu:
1. WAGO I/O Check
2. WAGO Ethernet Settings
:strip_exif()/f/image/shiBXhMkl9elzHDj3vpqyiAQ.png?f=user_large)
2.3.4 Firmware (G2)
Firmware voor G2 staan op Wago's Download Center of Wago NavigatorFirmware PFC is voor PFC200 G2
Voor de update-procedure volg je dit filmpje:
Toestemming nodig voor bekijken van YouTube
Op deze plek staat ingesloten content die van YouTube afkomstig is. Het tonen van deze inhoud kan ertoe leiden dat YouTube persoonlijke gegevens zoals je IP-adres verwerkt en/of cookies op jouw computer of ander apparaat zet. Hiervoor moet je eerst expliciet toestemming geven voor Sociale media.
Bekijk op YouTubeTutorial on Wago PLC Firmware update and Program with Codesys V3 & PFC200 Runtime Without eCockpit
3.0 Basisopstelling
Dit is een basisopstelling voor een woonhuis:1. PFC200 G2 750-8212
2. Digitale Inputkaart (8 ingangen) 750-430
3. Digitale Outputkaart (8 uitgangen) 750-530
4. (Optioneel) Seriële Multifunctionkaart (RS485 Modbus/DMX) 750-652
5. Veldbus Eindkaart 750-600
:no_upscale():strip_icc():strip_exif()/f/image/3PG7U9jkqyo1bBfyY7IK7K6c.jpg?f=user_large)
De seriële multifunctionkaart is optioneel omdat de 750-8212 controller een ingebouwde seriële poort heeft. Ik plaats ze erbij omdat zo bijkomende functies gedemonstreerd kunnen worden.
Draden aansluiten kan door met een platte schroevendraaien het springcontact in de vierkante gaten voorzichtig omhoog te duwen waardoor het klemcontact in het ronde gat eronder open gaat en je de draad kan aansluiten.
3.1 Wago Ethernet Settings & WBM
1. Met Wago Ethernet Settings lees je algemene gegevens uit van de PLC. Kies voor seriële communicatie (USB-kabel COM1) of TCP/IP (Netwerkaansluiting X1).:strip_exif()/f/image/TEv79cHv0A335msVKwluufbQ.png?f=user_large)
:strip_exif()/f/image/3DLOMWEpDyNekSTiqhpAsr1e.png?f=user_large)
2. De PLC draait ook een web-based management (WMB) interface op het eigen IP adres. Hiermee kan je uitgebreider gegevens uitlezen en meer opties configureren. Noteer het paswoord wanneer je het aanpast want je hebt het later nodig om je programma te kunnnen uploaden uit e!cockpit of codesys
Default username: admin
Default password: wago
:strip_exif()/f/image/Q7gS28uuyTfJHH6272Snjgx4.png?f=user_large)
:strip_exif()/f/image/15WWwJLSnCH2hGDwxptjJ9dc.png?f=user_large)
3.2 Wago I/O Check
1. Je logt met Wago I/O Check in op je PLC zoals je dat deed met Wago Ethernet Settings:strip_exif()/f/image/spbOdJWnY6PiAb18HqQAUdeT.png?f=user_large)
2. Wago I/O Check toont je welke expansiekaarten door de PLC werden gedetecteerd. Merk op dat de schematische tekening exact gelijk is aan hoe de basisopstelling er uitziet.
:strip_exif()/f/image/n0YeSoMzyTLjBvA0wP8NBOw8.png?f=user_large)
3. Wago I/O Check in MONITOR-MODE geeft realtime de status van inputs en outputs aan. Als je ergens in huis een knop indruk die op een input is aangesloten zie je in I/O Check het corresponderende lampje op de expansiekaart aangaan. Handig tijdens de elektrische installatie.
(Voorbeeld van een andere PLC)
:strip_exif()/f/image/W1BSg4MKnXkIEeDlmaaYdNQM.png?f=user_large)
4. Wago I/O Check in CONTROL-MODE (Direct) geeft je realtime controle over outputs. Hier dwing ik alle 8 uitgangen van mijn expansiekaart hoog. Handig bij het testen van relais of andere schakelingen in je elektrische installatie
:strip_exif()/f/image/jf9b3kZGp4igvB2TIXni8GqC.png?f=user_large)
5. (Voorproevertje) Sommige expansiekaarten hebben speciale functies die je via I/O Check kan instellen. Deze 750-652 kan seriële data versturen én als DMX master functioneren. DMX is een protocol specifiek voor lichtbesturing.
:strip_exif()/f/image/d51ybuagqanU2kd0akeCiwti.png?f=user_large)
Wago I/O Check is een handige tool om de basisfuncties van je PLC te testen zonder dat er een programma moet worden geschreven. Neem uitgebreid de tijd om hier wat in rond te klikken voor je verder gaat.
[ Voor 164% gewijzigd door Kanze op 15-01-2025 20:49 ]
Hier ben ik wel benieuwd naar, ik sta op het punt om een labelprinter te kopen. Ik kan echter nergens terugvinden dat de pt-p710bth heat shrink labels ondersteund. (de HSe-221) dus. Weet je zeker dat je naar de juiste printer linkt? @Giblet:
[...]
Ik heb toevallig recent dit nog afgerond. Ik heb gekozen voor deze labelprinter: https://www.brother.nl/labels-en-bonnen/pt-p710bth en daarin dan krimpkous te kopen (HSe-221). Deze krimpkous kun je overigens voor veel schappelijkere prijzen vinden bij de bekende chinese websites
Deze specifieke labelprinter kun je ook gebruiken in combinatie met de desktop software welke veel meer mogelijkheden biedt dan de app-based software.
Ik ben daar supertevreden mee
Zo ja kan dat behoorlijk schelen, want de eerstvolgende printer die officieel HSe-221 ondersteunt, de PTP750WVP is 3x zo duur.
Bij mij werkt het als een trein
Ik durf niet te zeggen of de originele brother krimpkousen erin werken, maar de chinese kloons die ik gebruik wel. Mogelijk zijn die behuizingen iets anders (dat werkt in beginsel vrij simpel, een aantal pinnen die wel of niet ingedrukt worden).
We gaan het zien! ik heb de cube plus besteld en bij de bekende chinese webshop een 5 pack labels. Wel heb ik zelf de voorkeur voor zwart op geel.:
[...]
Bij mij werkt het als een trein
Ik durf niet te zeggen of de originele brother krimpkousen erin werken, maar de chinese kloons die ik gebruik wel. Mogelijk zijn die behuizingen iets anders (dat werkt in beginsel vrij simpel, een aantal pinnen die wel of niet ingedrukt worden).
Zowaar stond bij de listing dat de cube plus (pb710BT) idd ondersteund wordt. Maar wel voor de 24mm labels. Niet de 9mm wat de de HSe-221 (in zwart op wit) lijkt te zijn?
Dank voor de reacties tot zover.
Hierbij de screenshots:
Fout: (zie het error bitje wat true word)
/f/image/TlR9sYiNY6GMDU497xlPjXtI.png?f=fotoalbum_large)
Netwerk:
:strip_exif()/f/image/l0DR6kXSxY6m5DY8yucLduPy.png?f=user_large)
Modbus Relatie:
/f/image/5JMjRBVJVwf9BUSOvjg1N2JG.png?f=fotoalbum_large)
Na het maken van de modbus relatie tussen de 750-8212 en de 750-352 worden er een aantal dingen aangemaakt:
- Global Variabel
- TYPE 1
-TYPE 2
- En een INIT PRG:
Vervolgens draait de code uit de HomeAutomation van Michel:
- Variabelen:
- INIT Programma:
- RUN Programma:
Ik vermoed dus dat het in TYPE 1 misgaat. Maar ik zie het even niet. Ik hoop jullie wel?
Hierbij de screenshots:
Fout: (zie het error bitje wat true word)
:strip_exif()/f/image/TlR9sYiNY6GMDU497xlPjXtI.png?f=user_large)
Netwerk:
Modbus Relatie:
:strip_exif()/f/image/5JMjRBVJVwf9BUSOvjg1N2JG.png?f=user_large)
Na het maken van de modbus relatie tussen de 750-8212 en de 750-352 worden er een aantal dingen aangemaakt:
- Global Variabel
code:
1
2
3
| VAR_GLOBAL
DK1_FC_tcp: typDK1_FC_tcp;
END_VAR |
- TYPE 1
code:
1
2
3
4
5
6
7
| TYPE typDK1_FC_tcp_FC_DK1_COM2:
STRUCT
module_aIn_2 : ARRAY[0..3] OF BYTE;
module_aOut_1 : ARRAY[0..3] OF BYTE;
IPort : WagoSysFieldbusModule.FbModule_75x_653 :=( PASizeInput := 3, PASizeOutput := 3);
END_STRUCT
END_TYPE |
-TYPE 2
code:
1
2
3
4
5
| TYPE typDK1_FC_tcp:
STRUCT
FC_DK1_COM2 : typDK1_FC_tcp_FC_DK1_COM2;
END_STRUCT
END_TYPE |
- En een INIT PRG:
code:
1
2
3
4
5
6
7
8
9
| PROGRAM DK1_FC_tcp_IPortInit VAR END_VAR --------------------- (*generated code for slave DK1_FC_tcp for modules with available iport interface*) (*Initialization code for slave module 'FC_DK1_COM2'*) Modbus.DK1_FC_tcp.FC_DK1_COM2.IPort.SetNewPaInputs(ADR(Modbus.DK1_FC_tcp.FC_DK1_COM2.module_aIn_2),Modbus.DK1_FC_tcp.FC_DK1_COM2.IPort.PA_SIZE_INPUT); Modbus.DK1_FC_tcp.FC_DK1_COM2.IPort.GetNewPaOutputs(ADR(Modbus.DK1_FC_tcp.FC_DK1_COM2.module_aOut_1),Modbus.DK1_FC_tcp.FC_DK1_COM2.IPort.PA_SIZE_OUTPUT); |
Vervolgens draait de code uit de HomeAutomation van Michel:
- Variabelen:
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
| PROGRAM FC_PRG_RS485
VAR
(* é!COCKPIT version*)
ModbusMaster : WagoAppPlcModbus.FbMbMasterSerial := (
xConnect := TRUE,
udiBaudrate := 19200,
usiDataBits := 8,
eParity := WagoTypesCom.eTTYParity.None,
eStopBits := WagoTypesCom.eTTYStopBits.One,
eHandshake := WagoTypesCom.eTTYHandshake.None,
ePhysical := WagoTypesCom.eTTYPhysicalLayer.RS485_HalfDuplex,
eFrameType := eMbFrameType.RTU,
tTimeOut := T#500MS);
RtuQuery : WagoAppPlcModbus.typMbQuery;
RtuResponse : WagoAppPlcModbus.typMbResponse;
(* Shared variables for é!COCKPIT and CODESYS 3S Version *)
Trigger : BOOL:=FALSE;
InitRS485 : BOOL:=FALSE;
ActiveRtuQuery : RS485_RtuQuery;
RS485BusController : FB_RS485_BUSCONTROLLER;
(* RS485 *)
FB_RS485_ESERA_1WIRE_GATEWAY_MQTT_HOME : FB_RS485_ESERA_1WIRE_GATEWAY_MQTT;
END_VAR |
- INIT Programma:
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
| IF NOT InitRS485 THEN
InitRS485 := TRUE;
(* INIT RS485 BUS CONTROLLER; é!COCKPIT version *)
RS485BusController.Init(
StartupDelay := T#5S, (* Time to wait after startup to start using the bus, prevents boot delay issues when RS485 are not ready yet on startup *)
SilenceTime := T#50MS, (* Silence time between two requests, important to not get faulty data on bus *)
BusTrigger := ADR(Trigger), (* Pointer to the bool used to initiate bus requests *)
BusData := ADR(RtuResponse.awData), (* Pointer to the array containing the bus response data *)
BusError := ADR(ModbusMaster.xError));(* Pointer to the bus error bool *)
RS485BusController.RegisterDevice(device := FB_RS485_ESERA_1WIRE_GATEWAY_MQTT_HOME);
FB_RS485_ESERA_1WIRE_GATEWAY_MQTT_HOME.InitRS485(
DeviceAddress := 1);
FB_RS485_ESERA_1WIRE_GATEWAY_MQTT_HOME.EnableOwd(
OwdNumber := 1,
DataPollingInterval := T#2M);
END_IF |
- RUN Programma:
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
| RtuQuery.bUnitId := RS485BusController.ActiveRtuQuery.DeviceId;
RtuQuery.bFunctionCode := RS485BusController.ActiveRtuQuery.FunctionCode;
RtuQuery.uiReadAddress := RS485BusController.ActiveRtuQuery.ReadAddress;
RtuQuery.uiReadQuantity := RS485BusController.ActiveRtuQuery.ReadQuantity;
ModbusMaster(
I_Port := modbus.DK1_FC_tcp.FC_DK1_COM2.IPort,
utQuery:= RtuQuery,
xTrigger := Trigger,
utResponse:= RtuResponse);
//modbus.FC_DK1_COM2
(* Shared variables for é!COCKPIT and CODESYS 3S Version *)
RS485BusController();
(* RS485 devices *)
FB_RS485_ESERA_1WIRE_GATEWAY_MQTT_HOME(); |
Ik vermoed dus dat het in TYPE 1 misgaat. Maar ik zie het even niet. Ik hoop jullie wel?
Ik zie dat de ModbusMaster hier specifiek naar een .IPort veld wordt verwezen bij die FB call.
code:
1
2
3
4
5
| ModbusMaster(
I_Port := modbus.DK1_FC_tcp.FC_DK1_COM2.IPort,
utQuery:= RtuQuery,
xTrigger := Trigger,
utResponse:= RtuResponse); |
In mijn eigen code geef ik de reference naar de gehele interface mee
code:
1
2
3
4
5
6
7
| (* Link layer execution *)
ModbusMaster(
I_Port := IoConfig_Globals.RS232_485_Interface, // Hier dus geen .IPport veld aangesproken
utQuery:= MasterQuery,
xTrigger := xTrigger,
utResponse:= MasterResponse
); |
Kan je dat aanpassen? Ik heb geen ervaring met Modbuskaarten in een ethernet coupler.
Het laatste .IPort moet ik wel invullen anders compiled ie überhaupt niet.:toon volledige bericht
[...]
Ik zie dat de ModbusMaster hier specifiek naar een .IPort veld wordt verwezen bij die FB call.
code:
ModbusMaster( I_Port := modbus.DK1_FC_tcp.FC_DK1_COM2.IPort, utQuery:= RtuQuery, xTrigger := Trigger, utResponse:= RtuResponse);
In mijn eigen code geef ik de reference naar de gehele interface mee
code:
(* Link layer execution *) ModbusMaster( I_Port := IoConfig_Globals.RS232_485_Interface, // Hier dus geen .IPport veld aangesproken utQuery:= MasterQuery, xTrigger := xTrigger, utResponse:= MasterResponse );
Kan je dat aanpassen? Ik heb geen ervaring met Modbuskaarten in een ethernet coupler.
De .IPort word aangemaakt in TYPE 1
code:
1
2
3
4
5
6
7
| TYPE typDK1_FC_tcp_FC_DK1_COM2:
STRUCT
module_aIn_2 : ARRAY[0..3] OF BYTE;
module_aOut_1 : ARRAY[0..3] OF BYTE;
IPort : WagoSysFieldbusModule.FbModule_75x_653 :=( PASizeInput := 3, PASizeOutput := 3);
END_STRUCT
END_TYPE |
Vandaar dat ik vermoed dat de gegeven instelling in dit TYPE niet correct is.
Mijn HA instance is een container op een server. Een fysieke connectie is niet mogelijk. Ik heb een kabel voorzien naar de PLC, én in zie het als een uitdaging om dat via de PLC te doen
Als je het dan toch via je PLC wilt doen, koop de geschikte kaart voor je Wago.:
[...]
Mijn HA instance is een container op een server. Een fysieke connectie is niet mogelijk. Ik heb een kabel voorzien naar de PLC, én in zie het als een uitdaging om dat via de PLC te doen
3 Stroomtransfo's (CT klem) en hupla.
Hikvision HCSA, Paxton, Siemens, Raspberry Pi
Of een meter kopen die modbus ondersteund en het op die manier in je PLC inbouwen. Dan kan je tevens de waarden sneller uitlezen dan via de P1.:
[...]
Als je het dan toch via je PLC wilt doen, koop de geschikte kaart voor je Wago.
3 Stroomtransfo's (CT klem) en hupla.
Ondertussen is het gelukt! Er zijn wel wat voordelen aan de P1 poort direct uitlezen ipv met een eigen meter. Je krijgt toegang tot meer data (Maandpiek, stroomonderbreking, dag&dal-uren, ...). Het is ook een zuivere seriële connectie zonder Modbus er bovenop. De meter heeft 1 seconde resolutie waar ik nu toegang toe heb en dat vind ik wel fijn. Als je een SDM630 aan die rate moet pollen hangt er best niets anders op die bus wat ietsofwat snel bereikbaar moet zijn.
De hardware setup is wat complexer als verwacht. Een RS232-connector op COM1 werkt niet op de PLC (maar wel op je home assistant met RS232-USB) omdat de PLC strikt RS232 voltages verwacht en die kan je nooit produceren met een 5V TTL output van je P1.
De oplossing was onderstaande logic-inverter bouwen en die te koppelen aan een MAX485. Dat alles past gelukkig mooi onder die groene kap van de meter dus valt verder niet op.
De PLC publiceert nu de gelezen waarden in MQTT om te gebruiken in HA.
Als er interesse voor is wil ik iets uitgebreider erover schrijven, laat maar weten
De hardware setup is wat complexer als verwacht. Een RS232-connector op COM1 werkt niet op de PLC (maar wel op je home assistant met RS232-USB) omdat de PLC strikt RS232 voltages verwacht en die kan je nooit produceren met een 5V TTL output van je P1.
De oplossing was onderstaande logic-inverter bouwen en die te koppelen aan een MAX485. Dat alles past gelukkig mooi onder die groene kap van de meter dus valt verder niet op.
De PLC publiceert nu de gelezen waarden in MQTT om te gebruiken in HA.
Als er interesse voor is wil ik iets uitgebreider erover schrijven, laat maar weten
P1-Poort lezen via Wago PLC
Doel
We willen een DSMR "slimme meter" uitlezen via de COM1 poort van een Wago PLC. De data van de meter kan dan gepubliceerd worden via MQTT.DSMR
- Bronmateriaal
- Er zijn verschillende versies van het DSMR protocol. De laatste versie (5.0.2) is al sinds 2016 van kracht. In België krijg je in principe een meter met versie 5.0.2. Oudere versies kunnen ook uitgelezen worden maar er zijn hardware verschillen.
- Vanaf DSMR 4.0 zenden meters op de P1 poort elke second een ASCII bericht (Telegram) uit met alle gegevens. De gebruiker moet deze zelf weten uit te lezen en te verwerken.
- Bij sommige netbeheerders (Bijvoorbeeld Fluvius in België) moet je P1 geactiveerd worden via een webportaal van de beheerder.
Hardware
Theorie
- Er staat redelijk wat misinformatie over de P1 poort online. De poort gebruikt geen RS422 en ook geen RS232. Het is een 5V TTL Inverted Logic poort. Dat wil zeggen +V5 is False en GND is True
- Met een PC kan je de poort direct uitlezen via een USB-RS232 kabel en enkele weerstanden. Meer uitleg hier.
- Wago PLC's kunnen RS232 lezen en schrijven via hun COM1 poort maar verwachten voltages die strikt aan de RS232 specificatie voldoen (+15V tot +3V, en -3V tot -15V). Die kan de P1 poort nooit produceren via een RS232-RS232 kabel.
- De oplossing is een signaalomvormer bouwen die de 5V TTL van de P1 poort flipt en via RS485 naar je PLC stuurt. Omdat we overstappen op RS485 is afstand niet meer van belang. RS485 werkt over honderden meters.
:strip_exif()/f/image/PfW0iFdcTGYEklgNuu3f89eW.png?f=user_large)
Praktijk
- Dit is de weg die het signaal gaat afleggen
code:1
P1 RJ12 -> Logic Inverter -> MAX485 -> PLC COM1
- De P1 poort is een RJ12 (6P6C) connector. Je kan die zelf maken met een gewone UTP kabel waarvan je het laatste paar (bruin-wit) niet gebruikt. Ik raad aan om overal T568B aan te houden zodat pinnummer en aderkleuren altijd overeen komen.
- Je kan een andere transistor kiezen zolang hij maar gelijkaardig is. ChatGPT geeft als voorbeelden de BC548, BC549, 2N2222, 2N3904, S8050.
- De diodes zijn optioneel.
- Dit is mijn versie. De rode connector is RS485 A en B. De Groene connector geeft inverter 5V TTL en GND
- Aan de PLC zijde gebruik je een D-SUB connector waarmee je je RS485 aansluit op pinnen 3, 5, en 8, van de PLC. Zie de Wago documentatie.
:no_upscale():strip_icc():strip_exif()/f/image/fB72bfhlFNTdZxm7JIiVlOPi.jpg?f=user_large)
:no_upscale():strip_icc():strip_exif()/f/image/Ab6KLBkxH546z7nTAasyASbl.jpg?f=user_large)
Software
- Data uitlezen doen we via de CAA SerialCom library. Deze heeft alleen ondersteuning voor COM1. Je kan dus helaas niet via een 750-652 of gelijkaardige kaart uitlezen tenzij je je eigen serial library ervoor schrijft.
- Hier is een voorbeeld van hoe het uitlezen kan worden geïmplementeerd. Je moet eerst de poort initiëren en activeren, daarna kan je hem uitlezen. Mijn Belgische meter produceert Telegrammen van exact 1255 bytes. Omdat de stream ASCII is kan je de data die je wil gewoon per byteoffset uit die stream halen
- Het programma hieronder is beta software maar geeft al een idee welke richting je uit kan gaan.
POU_SERIAL_COM1
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
| PROGRAM POU_SERIAL_COM1
VAR
//Visu Variables
xBtnClear : BOOL := FALSE;
xClearAll : BOOL; // flag to clear all
//Current State
iState : INT := 0;
(* Settings to communicate with the COM Port *)
aCom1Params : ARRAY [1..7] OF COM.PARAMETER;
hCom : CAA.HANDLE; (* handle of the port*)
como1 : COM.Open;
comc1 : COM.Close;
comr1 : COM.Read;
sWrite : STRING;
szRead : CAA.SIZE;
uiRead : UINT;
bReadBuffer : ARRAY [1..10001] OF BYTE; (*Used to read data from the serial port*)
sReadText : STRING(10001);
xReadSuccess : BOOL;
// errors
xCom1OpenError : BOOL;
xCom1ReadError : BOOL;
iError : INT;
errRead : INT;
tTimer : TON;
DSMRPaser : fbDSMRParser;
MismatchCounter : UINT := 0;
AlignTimer : TON;
AlignTime : TIME := T#1000ms;
bAligned : BOOL;
// sSend : STRING(255); // send message
sStatus : STRING(25); // status message
Received :STRING(10001);
intReceived :INT;
iCnt : INT;
(* This PLC's MQTT prefix *)
sMqttPrefix : STRING(100) := 'pfc8204/';
END_VAR
-----------------------------------------------------------
// COM_INIT
IF iState = 0 THEN
// Init
sStatus := 'INIT';
iState:= 5; //Goto 5: Set Parameters
IF xClearAll THEN
// reset errors
POU_SERIAL_COM1.xCom1ReadError := FALSE;
//POU_SERIAL_TEST.xCom1WriteError := FALSE;
POU_SERIAL_COM1.xCom1OpenError := FALSE;
xClearAll := FALSE;
END_IF
DSMRPaser.InitMqtt(MQTTPublishPrefix:= ADR(sMqttPrefix), pMqttPublishQueue := ADR(MqttVariables.fbMqttPublishQueue));
END_IF
----------------------
// COM_ACTIVATE
//Set COM port parameters
IF iState = 5 THEN
sStatus := 'Prepare';
// port number
aCom1Params[1].udiParameterId := COM.CAA_Parameter_Constants.udiPort;
aCom1Params[1].udiValue := 1;
// baudrate
aCom1Params[2].udiParameterId := COM.CAA_Parameter_Constants.udiBaudrate;
aCom1Params[2].udiValue := 115200;
// parity
aCom1Params[3].udiParameterId := COM.CAA_Parameter_Constants.udiParity;
aCom1Params[3].udiValue := INT_TO_UINT(COM.PARITY.NONE);
// stopbit
aCom1Params[4].udiParameterId := COM.CAA_Parameter_Constants.udiStopBits;
aCom1Params[4].udiValue := INT_TO_UINT(COM.STOPBIT.ONESTOPBIT);
// timeout
aCom1Params[5].udiParameterId := COM.CAA_Parameter_Constants.udiTimeout;
aCom1Params[5].udiValue := 0;
// byte size
aCom1Params[6].udiParameterId := COM.CAA_Parameter_Constants.udiByteSize;
aCom1Params[6].udiValue := 8;
// mode of transmission
aCom1Params[7].udiParameterId := COM.CAA_Parameter_Constants.udiBinary;
aCom1Params[7].udiValue := 0;
// open COM port
como1(xExecute := TRUE, usiListLength:=UINT_TO_USINT(SIZEOF(aCom1Params)/SIZEOF(COM.PARAMETER)),pParameterList:= ADR(aCom1Params), hCom=> hCom);
// Successful
IF como1.xDone THEN
como1(xExecute := FALSE); // Reset xExecute Flag
iState := 10; // Goto 10: Start Reading
// Error
ELSIF como1.xError THEN
xCom1OpenError := TRUE;
iError := como1.eError;
iState := 1000; // Error occurred
END_IF
END_IF
------------------------------------------
// COM_READ
IF iState = 10 THEN
// Start Reading COM port
IF xClearAll THEN
// reset errors
POU_SERIAL_COM1.xCom1ReadError := FALSE;
//POU_SERIAL_TEST.xCom1WriteError := FALSE;
POU_SERIAL_COM1.xCom1OpenError := FALSE;
xClearAll := FALSE;
END_IF
// read COM port
AlignTimer(IN := TRUE, PT := T#1000MS);
IF AlignTimer.Q THEN
sStatus := 'Read';
comr1(xExecute:= TRUE, hCom:= hCom, pBuffer:= ADR(bReadBuffer), szBuffer:= SIZEOF(bReadBuffer));
IF comr1.xDone THEN
szRead:= comr1.szSize;
uiRead:= ANY_TO_UINT(comr1.szSize);
IF uiRead <> 0 THEN
IF uiRead = 1255 THEN
// Copy text from the read buffer to sReadText
MEM.MemMove(ADR(bReadBuffer), ADR(sReadText), uiRead); // move bReadBuffer to sReadText
MEM.MemFill(ADR(sReadText) + uiRead, 1, 0); // write ASCII 000 to byte after received string
IF sReadText <> '' THEN
//arsReceived[0,iCounter] := GetTime(1); // get timestamp
Received := sReadText; // copy read string to array
intReceived := STRING_TO_INT(Received);
sReadText := ''; // reset read string
DSMRPaser(sTelegram := ADR(Received));
bAligned := TRUE;
END_IF
xReadSuccess:= TRUE;
ELSE
MismatchCounter := MismatchCounter + 1;
bAligned := False;
END_IF
END_IF
AlignTimer(IN := FALSE);
comr1(xExecute:= FALSE); // Reset xExecute Flag
iState:= 15; // Goto 15: Delay after Reading
// error
ELSIF comr1.xError THEN
xCom1ReadError := TRUE;
errRead := comr1.eError;
iError := comr1.eError;
comr1(xExecute:= FALSE);
iState:= 1000; // Error occurred
END_IF
END_IF
END_IF
IF iState = 15 THEN
//Delay after Reading is finished
sStatus := 'Read Wait';
xReadSuccess:= FALSE;
iState := 10; // Goto 10: read
END_IF |
FB DSMRParser
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
| {attribute 'reflection' := ''}
FUNCTION_BLOCK fbDSMRParser
VAR_INPUT
sTelegram : POINTER TO STRING(1500); (* Input string containing DSMR telegram *)
END_VAR
VAR_OUTPUT
END_VAR
VAR
(* MQTT *)
{attribute 'instance-path'}
{attribute 'noinit'}
(* object's full instance name DO NOT REMOVE PRAGMA or MQTT fails*)
InstanceName : STRING;
Startup : BOOL := TRUE;
InitMqttDone : BOOL;
MqttPublishTopicPrefix : POINTER TO STRING;
MqttPublishTopicSuffix : STRING(50);
pMqttPublishQueue : POINTER TO FB_MqttPublishQueue;
(* PRO JSON *)
stP1State : typeP1State;
fbStructToJson : STRUCT_TO_JSON;
sJsonString : STRING(1024);
sPlaceholder : STRING(255);
END_VAR
------------------------
// MEMCOPY(ADR(sPlaceholder), sTelegram + 51, 28);
// THIS^.stP1State.Equipment_ID.AsString := LEFT(sPlaceholder, 28);
//
MEMCOPY(ADR(sPlaceholder), sTelegram + 875, 6);
sPlaceholder := DELETE(sPlaceholder, 1, 3);
THIS^.stP1State.Instantaneous_Power_Consumption.Integer := STRING_TO_INT(LEFT(sPlaceholder, 5)); // Current power consumption (kW) (OBIS code: 1-0:1.7.0)
MEMCOPY(ADR(sPlaceholder), sTelegram + 897, 6);
sPlaceholder := DELETE(sPlaceholder, 1, 3);
THIS^.stP1State.Instantaneous_Power_Production.Integer := STRING_TO_INT(LEFT(sPlaceholder, 5)); // Current power production (kW) (OBIS code: 1-0:2.7.0)
fbStructToJson.JSONString := ADR(sJsonString);
fbStructToJson.JSONStringSize := SIZEOF(sJsonString);
fbStructToJson.JSONVars := ADR(stP1State);
fbStructToJson.NumberOfVars := SIZEOF(stP1State) / SIZEOF(JSONVAR);
fbStructToJson.MaxLevel := 1;
fbStructToJson(Execute := TRUE);
IF InitMqttDone THEN
(* Resets STRUCT_TO_JSON block ready for the next composition *)
fbStructToJson(Execute := FALSE);
(* Send off MQTT *)
pMqttPublishQueue^.AddMessage(
Payload := sJsonString,
Topic := CONCAT(CONCAT(MqttPublishTopicPrefix^, MqttPublishTopicSuffix), '/read/state' ),
Qos := MQTT.QoS.AtMostOnce,
MqttRetain := FALSE
);
END_IF |
[ Voor 19% gewijzigd door Kanze op 12-02-2025 22:01 ]
Ik ben bezig mijn eckelmann controller uit te wisselen voor een Wago 750-8112, maar krijg met geen mogelijkheid modbus via de seriële poort in de benen. Heeft iemand hier een idee?
-Slave is getest met een modbus programma en converter via laptop dus die is goed.
-Communicatie instellingen kloppen (baud, slaveadres, etc).
-Via browser Seriele poort ingesteld op RS485
-Op DBsub9 pin 3 gebruikt voor A en pin 8 gebruikt voor B
-Voor de zekerheid ook voeding op IO klemmen gezet al gaat volgens mij de voeding van de seriele poort via de voeding van de CPU
-Ik heb geen eindmodule geplaatst, geen idee of dit invloed heeft maar het is een verschil dat ik zie vergeleken met een instructie filmpje.
-Het enige grote verschil dat ik zie is dat ze op de video de modbus master van wago gebruiken, ik kan alleen de modbus master van 3s selecteren. Zou dit iets uitmaken?
/f/image/3un8AxLiCNPoqbjwaJEVqb1d.png?f=fotoalbum_large)
Sugusties zijn zeer welkom
-Slave is getest met een modbus programma en converter via laptop dus die is goed.
-Communicatie instellingen kloppen (baud, slaveadres, etc).
-Via browser Seriele poort ingesteld op RS485
-Op DBsub9 pin 3 gebruikt voor A en pin 8 gebruikt voor B
-Voor de zekerheid ook voeding op IO klemmen gezet al gaat volgens mij de voeding van de seriele poort via de voeding van de CPU
-Ik heb geen eindmodule geplaatst, geen idee of dit invloed heeft maar het is een verschil dat ik zie vergeleken met een instructie filmpje.
-Het enige grote verschil dat ik zie is dat ze op de video de modbus master van wago gebruiken, ik kan alleen de modbus master van 3s selecteren. Zou dit iets uitmaken?
:strip_exif()/f/image/3un8AxLiCNPoqbjwaJEVqb1d.png?f=user_large)
Sugusties zijn zeer welkom
In die handleiding van de PFC100 lees ik hieronder dat Wago een specifieke configuratie vraagt voor baudrates onder 115200. Lijkt me sterk dat nét dat het probleem zou zijn maar je weet maar nooit...
/f/image/ppam5RgCAXgGuWBI5ULoPF2P.png?f=fotoalbum_large)
:strip_exif()/f/image/ppam5RgCAXgGuWBI5ULoPF2P.png?f=user_large)
Opgepast bij het uitlezen van je P1 poort dat je rekening houdt met de cycles van je PLC en de timing van de inkomende data. Mijn teller maakt telegrammen van 1255 bytes. Ik had bij de ontvangst een ongewenste offset van 1 byte in mijn code. Het verschil tussen de code met en zonder die ene byte offset zie je onderaan.
/f/image/PsuIeM62C9EfqbVHUq6uhyOs.png?f=fotoalbum_large)
:strip_exif()/f/image/PsuIeM62C9EfqbVHUq6uhyOs.png?f=user_large)
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
| sStatus := 'Read';
comr1(xExecute:= TRUE, hCom:= hCom, pBuffer:= ADR(bReadBuffer), szBuffer:= SIZEOF(bReadBuffer));
IF comr1.xDone THEN
(* How many bytes read from COM1 this cycle *)
szRead := comr1.szSize;
uiRead := ANY_TO_UINT(comr1.szSize);
(* Buffered data during startup is ignored *)
IF uiRead > 1255 THEN
;
(* Complete or Incomplete telegram - 3 options
1. First char "/" and exactly 1255 bytes -> Perfect hit
2. First char "/" but not 1255 bytes -> First Half
3. First char NOT "/" and NOT 1255 bytes -> Second Half *Careful!**)
ELSIF uiRead > 0 AND uiRead <= 1255 THEN
IF bReadBuffer[1] = 47 THEN
MEM.MemMove(ADR(bReadBuffer), ADR(sReadText), uiRead);
uiReadTotal := uiReadTotal + uiRead;
ELSIF sReadText <> '' THEN
MEM.MemMove(ADR(bReadBuffer) + uiReadTotal + 1, ADR(sReadText) + uiReadTotal + 1, uiRead);
uiReadTotal := uiReadTotal + uiRead;
END_IF
IF uiReadTotal = 1255 THEN
Received := sReadText; // copy read string to array
intReceived := STRING_TO_INT(Received);
sReadText := ''; // reset read string
iState := 10;
uiReadTotal := 0;
DSMRParser(sTelegram := ADR(Received));
END_IF
(* No P1 telegram -- 0 bytes *)
ELSE
;
END_IF
comr1(xExecute:= FALSE, hCom:= hCom);
END_IF |
Ik heb wat problemen met m'n 1-wire netwerk.
Als ik de bestaande bus probeer uit te breiden met een extra 30 meter stopt ie ermee..
we spreken dan over een totale bus lengte van 80-90 meter, in de toekomst doe ik er mogelijks nog eens 15 bij.
Hoe hebben jullie je bus stabiel gekregen? weerstanden, welke waardes en waar? hebben jullie de bus geterminate met bepaalde weerstanden, etc..
Ik hoor het graag Bedankt!
Als ik de bestaande bus probeer uit te breiden met een extra 30 meter stopt ie ermee..
we spreken dan over een totale bus lengte van 80-90 meter, in de toekomst doe ik er mogelijks nog eens 15 bij.
Hoe hebben jullie je bus stabiel gekregen? weerstanden, welke waardes en waar? hebben jullie de bus geterminate met bepaalde weerstanden, etc..
Ik hoor het graag
Bedankt!
Probleem opgelost: bekabelingsfoutje bij één van de sensoren en pull up weerstand tussen Vcc en Data erbij van 1.5k.:
Ik heb wat problemen met m'n 1-wire netwerk.
Als ik de bestaande bus probeer uit te breiden met een extra 30 meter stopt ie ermee..
we spreken dan over een totale bus lengte van 80-90 meter, in de toekomst doe ik er mogelijks nog eens 15 bij.
Hoe hebben jullie je bus stabiel gekregen? weerstanden, welke waardes en waar? hebben jullie de bus geterminate met bepaalde weerstanden, etc..
Ik hoor het graag