Ankündigung

Einklappen
Keine Ankündigung bisher.

kWh Zähler für Aktoren mit Stromerkennung

Einklappen
X
 
  • Filter
  • Zeit
  • Anzeigen
Alles löschen
neue Beiträge

    [eibPC] kWh Zähler für Aktoren mit Stromerkennung

    ich habe einen dieser neuen ABB Aktoren mit Stromerkennung im Einsatz und möchte die kWh Berechnen
    Läuft auch ohne ABB Aktoren, siehe Test ganz unten im Programm.
    Eigentlicher Code: Zeile 1 bis 32. Der Rest ist Demo oder Test.
    Programm wird als Makro seinen Weg in die Enertex.lib finden und dann einfach über einen Aufruf
    kWh(GA,Name)
    einzubauen sein. Hier aber mal zum Vestehen...

    [highlight=epc]
    [EibPC]
    //------------------------------------------------------------------------------
    //
    // Ein Integrator für einen 2 Byte Zähler.
    // Es handelt sich hierbei um ABB Aktoren mit Stromerkennung (Typen SA/S x.16.5S)
    // Der mA Wert wird in eine Variable kWh gespeichert, welche vom Typ f32 ist.
    //
    // Annahme: Der Aktor gibt dies alles über GA='1/2/3'u16 aus (Leseanforderung muss
    // möglich sein). Alle 15 Min schickt der EibPC eine Leseanforderung an
    // diese Adresse.
    //------------------------------------------------------------------------------

    // Sekundenzähler
    t=0f32
    if cycle(0,1) then t=t+1f32 endif
    // Integrationsintervall
    t0=0f32
    // Steuervariable
    Int=AUS
    // Stromwert
    Strom=0u16
    // Zähler
    kWh=0f32
    // Der Integrator
    // kwH=Strom*Delta_Zeit
    // mit Delta_Zeit=t-t0
    // Dimension kWh: I(A)/1000*220V* Delta_Zeit s/3600 *1/1000= I*Delta_Zeit*6.111111111111111e-8
    if event('1/2/3'u16) then Int=EIN;kWh=kWh+convert(Strom,0f32)*(t-t0)*6.111111111111111e-8f32 endif
    // Speichern der Werte
    if Int then t0=t;Int=AUS;Strom='1/2/3'u16 endif
    // Alle 15 min in jedem Fall den Zähler auslesen
    if cycle(15,0) then read('1/2/3'u16) endif

    //--------------------------------------------------------------------------------

    // Verarbeitung für weitere Zwecke, z.B. Rauschreiben auf KNX Anzeige
    if change(kWh) then write('2/2/3'c14,convert(kWh,$$c14)) endif
    // Test Scenarios
    if t==1f32 then write('1/2/3'u16,20000u16) endif
    if t==11f32 then write('1/2/3'u16,10000u16) endif
    if t==21f32 then write('1/2/3'u16,30000u16) endif
    if t==26f32 then write('1/2/3'u16,000u16) endif
    h='2/2/3'c14
    [/highlight]
    Angehängte Dateien
    offizielles Supportforum für den Enertex® EibPC: https://knx-user-forum.de/eibpc/
    Enertex Produkte kaufen

    #2
    Ich glaube ich komme nun nicht mehr umhin, auch einen eibPC zu bestellen!!
    (Bitte "kWh", nicht "kwH" oder "kwh")

    Kommentar


      #3
      Zitat von MarkusL Beitrag anzeigen
      Ich glaube ich komme nun nicht mehr umhin, auch einen eibPC zu bestellen!!
      Das Bestellformular ist ja leicht zu finden im Forum ...
      (Bitte "kWh", nicht "kwH" oder "kwh")
      Hab ich doch so geschrieben.
      offizielles Supportforum für den Enertex® EibPC: https://knx-user-forum.de/eibpc/
      Enertex Produkte kaufen

      Kommentar


        #4
        OK, sorry!
        Ich hatte das Script in einen externen Editor kopiert um die ganzen Zeilen zu sehen. Da war eine komische Schriftart eingestellt, die die Unterschiede zwischen großen und kleinem W kaum erkennen lässt. Nun sehe ich dass alles stimmt (Bleibt nur Kommentar in #25).

        Kommentar


          #5
          Zitat von enertegus Beitrag anzeigen
          Das Bestellformular ist ja leicht zu finden im Forum ...
          Stimmt und so habe ich es auch gerade ausgefüllt und abgeschickt.

          Da habe ich Weichnachten was zu "spielen".

          Kommentar


            #6
            Zitat von MarkusL Beitrag anzeigen
            Stimmt und so habe ich es auch gerade ausgefüllt und abgeschickt.
            Meiner ist laut Mail schon unterwegs......

            Kommentar


              #7
              Klasse! Viel Spaß Micha!

              @Michael: Wäre mal interessant zu erfahren, wieviele die Forumsaktion genutzt haben; bzw. wie groß die Fangemeinde inzwischen geworden ist.
              (Wahrscheinlich aber ist die Zahl aus firmenpolitischen Gründen eher geheim.

              Kommentar


                #8
                Zitat von MarkusL Beitrag anzeigen
                @Michael: Wäre mal interessant zu erfahren, wieviele die Forumsaktion genutzt haben; bzw. wie groß die Fangemeinde inzwischen geworden ist.
                (Wahrscheinlich aber ist die Zahl aus firmenpolitischen Gründen eher geheim.
                Bisher schon mehr als geplant (ich hab eine Wette verloren).
                offizielles Supportforum für den Enertex® EibPC: https://knx-user-forum.de/eibpc/
                Enertex Produkte kaufen

                Kommentar


                  #9
                  Zitat von enertegus Beitrag anzeigen
                  Bisher schon mehr als geplant (ich hab eine Wette verloren).
                  Ob ich wohl was aus meiner Auftragsbestätigungs-Nummer ableiten kann?

                  Kommentar


                    #10
                    Zitat von enertegus Beitrag anzeigen
                    Bisher schon mehr als geplant (ich hab eine Wette verloren).
                    Hey Chef,

                    da Du Dich hier unter Zeugen dazu bekennst diese Wette verloren zu haben muss es ja wohl auch einen Gewinner geben,...
                    Was war gleich nochmal der Wetteinsatz??
                    Enertex Bayern GmbH - www.eibpc.com

                    Kommentar


                      #11
                      na dann Glückwunsch, Steffi!!!

                      Uwe
                      ....und versuchen Sie nicht erst anhand der Farbe der Stichflamme zu erkennen, was Sie falsch gemacht haben!

                      Kommentar


                        #12
                        Zitat von Uwe! Beitrag anzeigen
                        na dann Glückwunsch, Steffi!!!
                        Uwe
                        warum kann ich nur den Mund nicht halten .
                        offizielles Supportforum für den Enertex® EibPC: https://knx-user-forum.de/eibpc/
                        Enertex Produkte kaufen

                        Kommentar


                          #13
                          weil Du ne ehrliche Haut bist!
                          ....und versuchen Sie nicht erst anhand der Farbe der Stichflamme zu erkennen, was Sie falsch gemacht haben!

                          Kommentar


                            #14
                            Zitat von enertegus Beitrag anzeigen
                            [highlight=vb]
                            ...
                            // Der Integrator
                            // kwH=Strom*Delta_Zeit
                            // mit Delta_Zeit=t-t0
                            // Dimension kWh: I(A)/1000*220V* Delta_Zeit s/3600 *1/1000= I*Delta_Zeit*6.111111111111111e-8
                            if event('1/2/3'u16) then Int=EIN;kWh=kWh+convert(Strom,0f32)*(t-t0)*6.111111111111111e-8f32 endif
                            ...
                            [/highlight]
                            Bei Berücksichtigung von 230V (anstatt 220V) sollte der Korrekturfaktor 6.38888889e-8 sein.

                            Kommentar


                              #15
                              Zitat von MarkusL Beitrag anzeigen
                              Bei Berücksichtigung von 230V (anstatt 220V) sollte der Korrekturfaktor 6.38888889e-8 sein.
                              Ist so auch im Makro realsiert, aber danke für den Hinweis.
                              offizielles Supportforum für den Enertex® EibPC: https://knx-user-forum.de/eibpc/
                              Enertex Produkte kaufen

                              Kommentar

                              Lädt...
                              X