Gå til innhold
  • Bli medlem
Støtt hjemmeautomasjon.no!

Ruud

Medlemmer
  • Innlegg

    111
  • Ble med

  • Besøkte siden sist

  • Dager vunnet

    1

Innlegg skrevet av Ruud

  1. Nytt ønske: Jeg ønsker meg en Device som sier hvor mange øre det er mellom billigste og dyreste time for døgnet vi er innen i!

     

    Dette skal brukes på HSTouch skjermen til kona slik at hun kan danne seg et bilder over hvor mye strømprisen endre seg i dag, den kan jo variere fra typisk 2,2 øre (20.okt.2018) til 260,1 øre (01.mars.2018)

  2. Jeg trenger ikke datoen men klokkeslettet, dermed endret jeg "ddd dd.MM.yy" til "ddd hh:mm" men det fungerte ikke. 

     

    Her kan du se hele codelinja: Dim newText As String =  hs.DeviceLastChangeRef(649).ToString("ddd hh:mm") & " - " & hs.DeviceValueEx(649) & "°C"

     

    fikk dette i logen: Running script C:\Program Files (x86)\HomeSeer HS3\scripts\Lekestue-MAX-historisk-Uke.vb :Målet forårsaket et unntak under aktivering.Konvertering fra strengen ddd hh:mm til typen Integer er ikke gyldig.

     

  3. Takk Moskus. Det fungerte glimrende. Nå er jeg i en ny setting der jeg kun ønsker klokkeslettet og ikke både dato og klokkeslett?

     

    eks: 

    Now.ToString("ddd") & " " & hs.DeviceLastChangeRef(649) & " - " & hs.DeviceValueEx(649) & "°C"

    gir meg dette: søn. 16.09.2018 07.09.37 - 4,4°C

    Jeg ønsker dette: søn 07.09.37 - 4,4°C

  4. Jeg holder på å rediger et script og "Now.ToLongTimeString" gir meg klokkeslett akkurat nå. Jeg skulle gjerne hatt klokkeslettet fra "Last Change" på en spesifikk divice. noen som vet koden for det eller kan peke meg i retning av riktig lesestoff?

  5. Tusen takk ZoRaC,  Nå er jeg noen hak nærmere men dessverre ikke helt i mål. nå er det bare 3 feil i loggen, vet du hva jeg kan ha gjort feil?

     

    jun-30 21.42.31   Error Compiling script C:\Program Files (x86)\HomeSeer HS3\scripts\max.vb: Typen Float er ikke definert.
    jun-30 21.42.31   Error Compiling script C:\Program Files (x86)\HomeSeer HS3\scripts\max.vb: Typen Float er ikke definert.
    jun-30 21.42.31   Error Compiling script C:\Program Files (x86)\HomeSeer HS3\scripts\max.vb: Navneområdet eller typen som er angitt i importene System.Core, inneholder ikke noe felles medlem eller finnes ikke. Kontroller at navneområdet eller typen er definert og inneholder minst ett felles medlem. Kontroller at det importerte elementnavnet ikke bruker noen aliaser.

     

    Kan jeg ha gjort noe feil når jeg opprettet device 626?

  6. På 29.6.2018 den 8.12, Moskus skrev:

    Personlig hadde jeg hoppet bukk over hs.GetDeviceRefByName fordi det stort sett er enklere å finne Device Ref selv.

     

    Ja men hvordan........ jeg er virkelig dårlig på scripting, jeg kan kun å kopiere ander :)

     

    Sub Main(ByVal parm As Object)

    highTempRef = hs.GetDeviceRefByName(626) 
    currentTempRef = hs.GetDeviceRefByName(608)

    highTemp = hs.DeviceValueEx(highTempRef)
    currentTemp = hs.DeviceValueEx(currentTempRef)

    If currentTemp > highTemp Then
        hs.SetDeviceValueByRef(highTempRef, currentTemp,true)
    End If

     

    Dette fungerer veldig dårlig hos meg!!!!!!!!

  7. Denne funksjonen synes jeg virker håpløs men kanskje er det jeg som ikke kjenner hvordan jeg bruker den.

    I dag sjekket jeg logen i HS og ser at jeg har mange feilmeldinger og andre oppdateringer som er relatert til enten Energy DB eller Energy database.

    Er det noen som skjønar og kan forklarer meg hva dette betyr?

     

     

    Skjermbilde 2018-06-26 kl. 20.46.56.png

  8. På 12.3.2018 den 9.01, Moskus skrev:

    Ja, der ser vi at "consumption" er null. Det er ingen data. :( 

    Du kan prøve å endre resolution fra "HOURLY" til "DAILY" eller "MONTHLY" for å se om det er noe i d et hele tatt.

     

    Her er en mulig forklaring på null consumption:

    Først: Hafslund er trege, de overfører forbruk til tibber kun en gang i uka. Jeg tror de over fører data for en uke (Mandag 00:00 til Søndag 23:59) og jeg tror dette gjøres hver onsdag.

    MONTHLY: Her er det inngen null. Data for februar vises. 

    DAILY: Her vises det data alle dager frem til og med søndag 4. februar, nyere dager er null

    HOURLY: Her vises data frem til og med time 23:00 til 23:59 søndag 4.februar, nyere timer er null

     

    Hvorfor skal Hafslund vente 1 og en halv uke med å levere data?

    Disse data er tilgjengelig for hver avsluttet dag på hafslundnett.no

  9. 11 minutter siden, Moskus skrev:

    Man får vanligvis en feilmelding....?

    Nope, står bare not connected og så har jeg gått utifra at når den melingen forsvinner så er den connectet.

     

    :):):) Utrolig hva man finner ut rett etter at man har spurt om hjelp!!!

    Feil var at den ikke koblet til, som fikset på denne måten i  Windows Client: Høyre klikk, Client option, fyll inn username og password, vola! Da fikk jeg Deployet til telefonen også.

    • Like 1
  10. 22 minutter siden, Moskus skrev:

    Hmmm, de så kjente ut. ;)

    Jepp det er klipp og lim fra ditt fantastiske script: LogStatusToFile.vb

     

    24 minutter siden, Moskus skrev:

    Du kunne nok klart deg med kun "GetCapiString" siden det er en CAPIlabel du skal ha :)

    hmmm.. prøvde å ta vekk funksjonen - GetDeviceString, da sluttet det å virke??

  11. Nå er jeg virkelig flau, men jeg skulle åpne bagasjerommet og sette igang arbeidet, men kommer ikke en cm.

    Jeg søger guiden frem til "Run Windows Client" men det virker ikke, hva i h*^&%%$ er det jeg gjør feil, har liksom prøvd 1000 ganger nå!

     

    HS3 og HSTouch Designer er på samme PC, men det burde vel gå??

    Jeg tror jo at alle plugins som trengs er på plass??

     

    Noen som har tips?

     

    Skjermbilde 2018-03-02 kl. 21.08.44.png

    Skjermbilde 2018-03-02 kl. 21.12.21.png

  12.  

    20 timer siden, ZoRaC skrev:

    Prøv å bytt ut «input.ToString» med «hs.devicevalue(id)» :)

    Fungerte nesten, jeg får nummeret på statusen men jeg ønsker  teksten som hører til nummeret.

    Jeg måtte skrive GetDeviceString(ID)

    det funket hvis jeg også la til 2 funksjoner:

    Function GetDeviceString(ByVal DeviceRef As Integer) As String
            'Henter device string fra HS
            Dim devstring As String = hs.DeviceString(DeviceRef)
            If devstring <> String.Empty Then Return devstring
            'Henter devicestring directe fra CAPI-status, hvis den finnes
            devstring = hs.CAPIGetStatus(DeviceRef).Status
            If devstring <> String.Empty Then Return devstring
            'Henter devicestring fra CAPI beskrivelse (basert på value)
            devstring = GetCapiString(DeviceRef)
            If devstring <> String.Empty Then Return devstring
            'Henter devicestring fra device class
            Dim dev As Scheduler.Classes.DeviceClass = hs.GetDeviceByRef(DeviceRef)
            devstring = dev.devString(Nothing)
            If devstring <> String.Empty Then Return devstring
            Return "String not found for " & DeviceRef & ", value = " & hs.DeviceValueEx(DeviceRef)
        End Function
        Function GetCapiString(ByVal DeviceRef As Integer) As String
            For Each CAPI As HomeSeerAPI.CAPIControl In hs.CAPIGetControl(DeviceRef)
                If CAPI.ControlValue = hs.DeviceValue(DeviceRef) Then Return CAPI.Label.ToString
            Next
            Return String.Empty
        End Function

     

    • Like 1
  13. På 22.5.2016 den 12.54, Moskus skrev:

    Dette scriptet lar deg logge alle bevegelser til en device, slik at det blir enklere å se på web eller HStouch. Bevegelser (eller enhver hendelse) blir da logget slik.

    Hei, jeg ønsker en ny versjon av dette scriptet, jeg prøvde å skrive det om selv men fikk det ikke helt til.

    Jeg har EN device som har mange statuser. Ønsker er å ha en device som viser de 10 siste statusene fra denne ene Devicen.

     

    Endring jeg ønsker er at scriptet skal skrive statusen til denne bestemte Device i stedet for teksten som skrives inn i parameter.

     

    Er et noen som gidder og endre det for meg?

×
×
  • Opprett ny...

Viktig informasjon

Vi har plassert informasjonskapsler/cookies på din enhet for å gjøre denne siden bedre. Du kan justere dine innstillinger for informasjonskapsler, ellers vil vi anta at dette er ok for deg.