VM140/K8061 pulsingang probleem

Homeseer Forum in het Nederlands (DUTCH forum)

Moderator: Ruud

VM140/K8061 pulsingang probleem

Postby dreambox » Fri Aug 09, 2013 9:59 am

Mijn HS2 systeem draait al zeer geruime tijd zonder problemen.
Ik heb een aantal VM140 eraan hangen voor de sturing van lampen en relais, en natuurlijk PIRS en gewone schakelaars.

Je blijft hobbyen en nu leek het me leuk om ook het opgenomen vermogen weer te geven.

Ik het dit gedaan met het volgende scriptje:

kaart 3 digitale ingang 1 (Device System Garage VerbruiksTeller changed to status *Off*)
Code: Select all
  Public Sub VerhoogTellerVerbruik(ByVal parm As Object)
        Dim s As Integer
        s = Val(hs.DeviceString("T14"))
        s = s + 1
        hs.SetDeviceString("T14", s, True)
    End Sub



En elke minuut:
Code: Select all
 
    Public Sub BerekenVerbruik(ByVal parm As Object)
        Dim TMin, TMax, TDiff
        Dim DMin, DMax As Date
        Dim DDiff
        Dim ActWatt As Integer

        TMin = Val(hs.DeviceString("T15"))
        DMin = hs.DeviceLastChange("T15")
        TMax = Val(hs.DeviceString("T14"))
        DMax = hs.DeviceLastChange("T14")
        DDiff = DateDiff(DateInterval.Second, DMin, DMax)
        TDiff = TMax - TMin
        ActWatt = Val((TDiff / 800) * (3600 / DDiff)) * 1000
        hs.SetDeviceString("T15", Val(hs.DeviceString("T14")), True)
        hs.SetDeviceString("T13", ActWatt, True) 'actueel verbruik
        hs.SetDeviceString("T11", Format(TMax / 800, "0.###"), True) 'Dagverbruik

        '800 pulsen is 1 kwh
       'formule = (tdiff/800)*(3600/ddiff)
    End Sub


Dus zodra ingang 1 op kaart 3 Off wordt runt VerhoogTellerVerbruik, de teller wordt met 1 verhoogt.
Dan heb ik tevens een Recurring every 1 minute(s) event gemaakt welke BerekenVerbruik uitvoert.

Het werkt goed: opgenomen vermogen wordt weergegeven in T13 en het dagverbruik in T11.
So far so good!

ECHTER, indien HS 1 tot 2 dagen draait komt er geen reactie meer vanuit de kaarten, pulsingangen werken niet meer evenals de analoge (dimmer) uitgangen. Even voor de duidelijkheid op kaart 3 zit de pulsteller, kaart 0,1,2 zijn andere in- en uitgangen. Webpagina van HS is wel gewoon toegankelijk.

Ik heb het idee dat het geheugen ofzo volloopt indien men een event vaak uitvoert. Vaak is hier 3000 (vanaf middernacht tot 11 am) keer event VerhoogTellerVerbruik sinds middernacht (3000 pulsen is 3.75 kwh)

Heeft iemand hiermee ervaring?

Alex
dreambox
Starting Member
Starting Member
 
Posts: 47
Joined: June 2010

Re: VM140/K8061 pulsingang probleem

Postby dreambox » Sat Aug 10, 2013 9:09 pm

nobody?
dreambox
Starting Member
Starting Member
 
Posts: 47
Joined: June 2010


Return to Homeseer algemeen Forum

Who is online

Users browsing this forum: No registered users and 1 guest

cron