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

Frankh

Medlemmer
  • Innlegg

    81
  • Ble med

  • Besøkte siden sist

Alt skrevet av Frankh

  1. Hei, Jeg har laget meg ett script i .vb for å få varmepumpen til å oppføre seg slik jeg vil. Det meste virker nå men jeg klarer ikke å få scriptet til å forandre viftehastigheten. Her er ett utdrag: Sub Main(ByVal Parm As Object) Dim ChangeFanSpeed As Integer = 2326 Dim ChangeMode As Integer = 2327 Dim ChangeTemperature As Integer = 2329 Dim CurrentTemperature As Integer = 2043 Dim temperatureTolerance As Integer = 1 'justerer temperaturen hvis vi er utenfor dette intervallet Dim mediumFanSpeed As String = "Medium_High" Dim highFanSpeed As String = "High" Dim lowFanSpeed As String = "Medium" Dim Success As Boolean = False ' Hent gjeldende temperatur fra sensoren Dim currentTemp As Double = hs.DeviceValueEx(CurrentTemperature) ' Hent ønsket temperatur fra Change Temperature enheten Dim desiredTemperature As Double = hs.DeviceValueEx(2409) ' Sjekk om det er nødvendig å justere temperaturen If currentTemp < desiredTemperature - temperatureTolerance - 2 Then ' endret her ' Sett viftehastighet til High hs.SetDeviceString(ChangeFanSpeed, highFanSpeed, True) ' Sett varmepumpen i varme-modus hs.SetDeviceString(ChangeMode, "Heat", True) ' Sett temperaturen til 30 grader Success = hs4.SendControlForFeatureByValue(ChangeTemperature, 30) ElseIf currentTemp < desiredTemperature - temperatureTolerance Then ' Sett viftehastighet til medium hs.SetDeviceString(ChangeFanSpeed, mediumFanSpeed, True) ' Sett varmepumpen i varme-modus hs.SetDeviceString(ChangeMode, "Heat", True) ' Øk temperaturen Success = hs4.SendControlForFeatureByValue(ChangeTemperature, desiredTemperature + temperatureTolerance) 'hs.SetDeviceValueByRef(ChangeTemperature, desiredTemperature + temperatureTolerance, True) ElseIf currentTemp > desiredTemperature + temperatureTolerance Then ' Sett viftehastighet til low hs.SetDeviceString(ChangeFanSpeed, lowFanSpeed, True) ' Sett varmepumpen i varme-modus hs.SetDeviceString(ChangeMode, "Heat", True) ' Senk temperaturen Success = hs4.SendControlForFeatureByValue(ChangeTemperature, desiredTemperature - temperatureTolerance) 'hs.SetDeviceValueByRef(ChangeTemperature, desiredTemperature - temperatureTolerance, True) Else ' Sett viftehastighet til low hs.SetDeviceString(ChangeFanSpeed, lowFanSpeed, True) ' Sett varmepumpen i varme-modus hs.SetDeviceString(ChangeMode, "Heat", True) ' Sett temperaturen til ønsket temperatur Success = hs4.SendControlForFeatureByValue(ChangeTemperature, desiredTemperature) 'hs.SetDeviceValueByRef(ChangeTemperature, desiredTemperature, True) End If End Sub Når jeg sjekker device så forandrer klokkeslettet seg, men ikke verdien. Noen som ser hva jeg har gjort galt?
  2. Er det noen som har ett telefonnummer som man kan benytte for å få Yale i tale? Jeg har fått kontakt med de på mail, men er jeg så heldig å få svar så er det kun ett svar pr. dag.
  3. Aha, prøve 🙏 EDIT: L3 har ikke denne bryteren som V2N har.
  4. Hei Bruker en Yale doorman L3 med hub. Skulle installere Verisure sin modul som gikk greit. Men da ble Yale appen satt i "Integration mode" som igjen gjorde at jeg måtte benytte Verisure appen som jeg ikke likte. Skulle da resette låsen for å fjerne modulen noe som ikke lar seg gjøre. Låsen vil ikke la seg tilbakestille til fabrikkinnstillinger. Snakket med Yale som sa det måtte være Verisure modulen som laget krøll, og fikk ikke noen annen løsning fra de. Har prøvd å ta ut ett batteri mens jeg holder reset knappen inne, for så å putte på plass batteriet både med og uten modulen i låsen. Noen som har vært opplevd dette og kanskje har en løsning?
  5. Jeg finner den under installerte plugin, men ikke under plugin drop-down lista.
  6. Jeg hadde MORE en liten stund etter at jeg hadde restartet HS for så at den forsvant. Vet ikke hvor jeg skal legge inn token uten knappen?
  7. Noen som vet hvorfor jeg ikke ser MORE knappen under installerte plugin's? Win10 og v4.2 EDIT: Nå fikk jeg MORE knappen men kommer til en side som ikke eksisterer
  8. Jeg kjører siste versjon (4.2.0.0) Ikke beta. Men jeg gjorde som du sa, og i Edge så virket det. Helt fantastisk Dette dreide seg om My Weather plugin. Testa både i Chrome og Explorer uten hell. Takk for hjelpen Frank
  9. Hei, Noen som har vært borti at man ikke får gjort alle option i events? Her forsvinner muligheten for å sette ønsket temperatur ned slik at man ikke kan velge. Ser ikke muligheten for å kunne scrolle i selve eventen.
  10. Mønsteret på denne låsen er: 10 siffer ved bruk av timer 9 siffer ved bruk av dager 8 siffer for permanent PIN 7 siffer på engangs PIN
  11. Ja du har noen utvalg på denne låsen: Four types of PINs One Time PIN (OTP) Permanent Hourly - 1 to 672 hours Daily - 29 to 367 days
  12. @Moskus Syns du skulle påta deg denne Tror jeg forklarte jeg rett, men fortalte kanskje ikke alt. I Standalone modus er det slik at jeg kan sitte på jobb og tildele deg engangskoder selv om låsen befinner seg i ingenmannsland. Vil tippe at den fikk/får X antall koder (6 siffer) generert ved tilkobling. Og uten at jeg har sjekket det vil jeg tippe at den mottar nye koder hvis du er innafor Bluetooth dekning med telefon den er registret mot.
  13. Hei, Vi har en utleieside som er bygget opp rundt Wordpress. Og i den forbindelse ønsker vi å teste ut en smart hengelås (https://developer.igloocompany.co/) mot siden. Låsen virker som standalone, Bluetooth eller via internett. Mens vi ønsker standalone, da låsen vil være der hvor det ikke er internett. Kunden bestiller/leier en gjenstand som har tag "hengelås" skal ny generert kode fra låsen sendes i ordrebekreftelsen. Hengelåsen støtter API, SDK og webhooks. Likeså har jo Wordpress støtte for webhooks og API plugins. Er det innafor å spørre her om det er noen som kan påta seg oppgaven? Må kunne faktureres. Frank H.
  14. Funker som en drøm
  15. Det kan jeg gjøre..
  16. Denne går ellers med jevne mellomrom mar-07 17:00:02 TibberSeer ERROR TibberConsumption, UpdateData ERROR: Value cannot be null. Parameter name: source mar-07 17:00:01 TibberSeer ERROR TibberPrice, UpdateData ERROR: Value cannot be null. Parameter name: source
  17. Win10 HS3 mar-07 16:53:29 TibberSeer ERROR TibberConsumption, UpdateData ERROR: Value cannot be null. Parameter name: source mar-07 16:53:29 TibberSeer Debug TibberConsumption, GetConsumption ERROR: The underlying connection was closed: An unexpected error occurred on a send. mar-07 16:53:29 TibberSeer Debug TibberConsumption, GetConsumption ERROR: The underlying connection was closed: An unexpected error occurred on a send. mar-07 16:53:29 TibberSeer Debug TibberConsumption, GetConsumption ERROR: The underlying connection was closed: An unexpected error occurred on a send. mar-07 16:53:29 TibberSeer Debug TibberConsumption, GetConsumption ERROR: The underlying connection was closed: An unexpected error occurred on a send.
  18. E det mulig?!?! Det var , som var årsaken. Det var 3 timer med forskning for ingenting Hjertelig takk!!
  19. Har prøvd meg på å utvikle det jeg startet på, men her får jeg crash og klarer ikke å finne ut hva jeg gjøre feil. Bruker HS3. Sub Main(ByVal Parms As Object) Dim OG As Double = hs.devicevalueEx(1328) Dim FG As Double = hs.devicevalueEx(1327) Dim CG As Double = hs.devicevalueEx(1060) Dim Tilt As Double = hs.devicevalueEx(1578) Dim femti As Double Dim syttifem As Double Dim niti As Double Dim OGFG As Double OGFG = OG - FG femti = OG - OGFG * 0,5 syttifem = OG - OGFG * 0,75 niti = OG - OGFG * 0,90 If CG >= OG Then hs.setdevicevaluebyref(1578, 0, True) ElseIf CG > OG AndAlso CG < syttifem Then hs.setdevicevaluebyref(1578, 50, True) ElseIf CG > femti AndAlso CG < niti Then hs.setdevicevaluebyref(1578, 75, True) ElseIf CG = niti Then hs.setdevicevaluebyref(1578, 90, True) End If End Sub Og feilmeldingen jeg får er: mar-04 18:41:29 Error Compiling script C:\Program Files (x86)\HomeSeer HS3\scripts\ferment.vb: End of statement expected. mar-04 18:41:29 Error Compiling script C:\Program Files (x86)\HomeSeer HS3\scripts\ferment.vb: End of statement expected. mar-04 18:41:29 Error Compiling script C:\Program Files (x86)\HomeSeer HS3\scripts\ferment.vb: End of statement expected. mar-04 18:41:29 Error Compiling script C:\Program Files (x86)\HomeSeer HS3\scripts\ferment.vb: Namespace or type specified in the Imports 'System.Core' doesn't contain any public member or cannot be found. Make sure the namespace or the type is defined and contains at least one public member. Make sure the imported element name doesn't use any aliases.
  20. Funket som en drøm, egentlig fantastisk.. Nok engang takk @ZoRaC 🍻
  21. Jøss, så enkelt kan det gjøres 😁 Like enkelt som i Excel 😂😂 Hjertelig!!
  22. Heisann, Har vært å lest på math brukt i script, men blir ikke helt klok på hvordan oppsettet blir mtp. dette regnestykket. =SUMMER((B2-B3)-(B1-B3))/((B2-B3))*100 C5 og C6 er virtuelle devicer mens C4 er en reel device. Noen som kan hjelpe meg på vei. Frank
  23. Kom til en hindring til som jeg sliter med. Temperaturen fra TILT'n hentes med MQTT som etter hva jeg skjønner gjør til at jeg ikke finner sensoren i V-STAT. Prøvde meg på en &hs.setDeviceValueByRef(1028,hs.DeviceStringEx(928),True) som jeg ikke tror virker da verdien på TILT-sensoren er STRING og ikke VALUE. Hvordan kan jeg gjøre at en MQTT sensor dukker opp i V-STAT? EDIT: Løste seg ved litt Sim-sala-bim i EDIT/ADD mcsMQTT
  24. Neida, det er dette prosjektet som tråden startet med Altså å styre gjæringstemperaturen på øl og vin. Men liker ideen din om å sette opp til V-stat's eller omså 2 Virtuelle RFXCOM termostater burde vel også gå. Alt ettersom hva man brygger så starter man med temperatur lavere enn romtemperatur, men videre ut i gjæringsperioden kommer gjæringstemperatur til å overstige romtemperatur. Derav trenger jeg å kunne styre både Varmebelte/plate samt Glycolkjøler. Tilt Hydrometer ligger å flyter i vørteren og måler konstant sukkerinnholdet som er det som avgjør hva gjæringstemperaturen bør være. Data fra TILT har jeg nå klart å få inn i HS slik at jeg nå har device både på SG (sukkerinnhold) samt temp i vørteren. EDIT: Kan virke til at V-STAT virker til formålet da man kan sette f.eks. COOLING til å være slave for HEATING. Takk for den @Moskus
  25. Noen som vet om det finnes en termostat (Plugin eller script) som kan kontrollere både kaldt og varmt, altså to kanaler i en og samme termostat?
×
×
  • 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.