Vinnerliste

Vil ønske alle en riktig god jul, alle hjelpsomme brukere og "ledelsen". Det er åpenbart at det er et behov, utrolig høy aktivitet. Takk.

Og da har Logitech snudd ? https://community.logitech.com/s/question/0D55A00008D4bZ4SAJ/harmony-hub-firmware-update-fixes-vulnerabilities

Å vite om det er helg eller ikke er ganske praktisk for hjemmeautomasjon. De aller fleste har andre rutiner i helgene enn de har i ukedagene. Hos oss er derimot rutinene for fridager omtrent prikk lik dager i helgen, så det hadde jo vært praktisk om man istedenfor å sjekke om det er helg, kunne sjekke om det er en fridag. Og nå kan vi det. Basert på @xibriz sitt glimrende PHP-script for å sjekke for offentlige høytider (og omskrevet til VB.NET) har jeg lagt til en rutine ekstra, som bl.a. sjekke om det faktisk er helg eller om det er noen andre unntak lagt inn. Du trenger en virtuell device med "Control Use" for Off og On definert (under Status Grapics -> Status-kolonne). Her er min: Device Ref til denne brukes som parameter i scriptet. Scriptet trigges ved midnatt hver dag for å sjekke om dagen i dager en fridag eller ei. Fridager.vb Sub Main(ByVal deviceReference As String) 'Moskus 2017 Dim devRef As Integer = Integer.Parse(deviceReference.ToString) Dim isCurrentDateHoliday As Boolean = False If Not isCurrentDateHoliday Then isCurrentDateHoliday = IsOfficialHoliday(Now) 'Sjekker offisielle helligdager If Not isCurrentDateHoliday Then isCurrentDateHoliday = IsCustomHoliday(Now) 'Sjekker egen-spesifiserte dager If isCurrentDateHoliday Then hs.CAPIControlHandler(hs.CAPIGetSingleControlByUse(devRef, HomeSeerAPI.ePairControlUse._On)) Else hs.CAPIControlHandler(hs.CAPIGetSingleControlByUse(devRef, HomeSeerAPI.ePairControlUse._Off)) End If End Sub Public Function IsCustomHoliday(ByVal _date As Date) As Boolean _date = _date.Date 'In case time was added 'For eksempel sjekkeom det er en lørdag eller søndag If _date.DayOfWeek = DayOfWeek.Saturday Then Return True If _date.DayOfWeek = DayOfWeek.Sunday Then Return True 'Jeg har alltid fri i romjulen If _date.Month = 12 Then If _date.Day >= 27 AndAlso _date.Day <= 31 Then Return True End If End If 'Andre spesifikke dager kan legges i listen, f.eks. har barnehagen planleggingsdager Dim dateList As New System.Collections.Generic.List(Of Date) dateList.Add(New Date(2017, 4, 18)) If dateList.Contains(_date) Then Return True 'Har vi kommet så langt er det ingen fridager, returner "False" Return False End Function Public Function IsOfficialHoliday(ByVal _date As Date) As Boolean 'translated php script form xibriz: https://www.diskusjon.no/index.php?showtopic=1084239 _date = _date.Date 'in case time was added Dim easterDate As Date = GetEasterDate(_date.Year) 'Sjekker om datoen er 1. Januar If _date = New Date(_date.Year, 1, 1) Then Return True 'Sjekker om datoen er pamlesøndag (1. påskedag - 7 dager) If _date = easterDate.AddDays(-7) Then Return True 'Sjekker om datoen er skjærtorsdag (1. påskedag - 3 dager) If _date = easterDate.AddDays(-3) Then Return True 'Sjekker om datoen er langfredag (1. påskedag - 2 dager) If _date = easterDate.AddDays(-2) Then Return True 'Sjekker om datoen er 1. påskedag If _date = easterDate Then Return True 'Sjekker om datoen er 2. påskedag (1. påskedag + 1 dag) If _date = easterDate.AddDays(1) Then Return True 'Sjekker om datoen er 1. mai (offentlig høytidsdag) If _date = New Date(_date.Year, 5, 1) Then Return True 'Sjekker om datoen er 17. mai (grunnlovsdag) If _date = New Date(_date.Year, 5, 17) Then Return True 'Sjekker om datoen er kristi himmelfartsdag (40. påskedag) If _date = easterDate.AddDays(39) Then Return True 'Sjekker om datoen er 1. pinsedag (50. påskedag) If _date = easterDate.AddDays(49) Then Return True 'Sjekker om datoen er 2 pinsedag (51. påskedag) If _date = easterDate.AddDays(50) Then Return True 'Sjekker om datoen er 1. juledag (25. desember) If _date = New Date(_date.Year, 12, 25) Then Return True 'Sjekker om datoen er 2 juledag (26. desember) If _date = New Date(_date.Year, 12, 26) Then Return True Return False End Function Public Function GetEasterDate(ByVal Year As Integer) As Date 'Originally taken from: http://www.thoughtproject.com/Snippets/Easter/Easter.vb.txt Dim a As Integer Dim b As Integer Dim c As Integer Dim d As Integer Dim e As Integer Dim f As Integer Dim g As Integer Dim h As Integer Dim i As Integer Dim k As Integer Dim l As Integer Dim m As Integer Dim n As Integer Dim p As Integer If Year < 1583 Then Return Nothing Else ' Step 1: Divide the year by 19 and store the ' remainder in variable A. Example: If the year ' is 2000, then A is initialized to 5. a = Year Mod 19 ' Step 2: Divide the year by 100. Store the integer ' result in B and the remainder in C. b = Year \ 100 c = Year Mod 100 ' Step 3: Divide B (calculated above). Store the ' integer result in D and the remainder in E. d = b \ 4 e = b Mod 4 ' Step 4: Divide (b+8)/25 and store the integer ' portion of the result in F. f = (b + 8) \ 25 ' Step 5: Divide (b-f+1)/3 and store the integer ' portion of the result in G. g = (b - f + 1) \ 3 ' Step 6: Divide (19a+b-d-g+15)/30 and store the ' remainder of the result in H. h = (19 * a + b - d - g + 15) Mod 30 ' Step 7: Divide C by 4. Store the integer result ' in I and the remainder in K. i = c \ 4 k = c Mod 4 ' Step 8: Divide (32+2e+2i-h-k) by 7. Store the ' remainder of the result in L. l = (32 + 2 * e + 2 * i - h - k) Mod 7 ' Step 9: Divide (a + 11h + 22l) by 451 and ' store the integer portion of the result in M. m = (a + 11 * h + 22 * l) \ 451 ' Step 10: Divide (h + l - 7m + 114) by 31. Store ' the integer portion of the result in N and the ' remainder in P. n = (h + l - 7 * m + 114) \ 31 p = (h + l - 7 * m + 114) Mod 31 ' At this point p+1 is the day on which Easter falls. ' n is 3 for March or 4 for April. Return DateSerial(Year, n, p + 1) End If End Function Merk: Det kan være du vil fjerne noen linjer i scriptet eller i det minste kommentere dem ut. Det er f.eks. ikke sikkert at du har fri uka etter påske: dateList.Add(New Date(2017, 4, 18)) ... og hvis ikke, kan du fjerne denne linjen. Det er heller ikke sikkert du har fri romjulen, så da bør du fjerne dette: If _date.Month = 12 Then If _date.Day >= 27 AndAlso _date.Day <= 31 Then Return True End If End If Du kan også selvfølgelig legge til dine egne unntak for arbeidsdager hvis du ønsker det. Har du fri hver fredag, så kan du jo bare legge det til. Jeg har nå byttet ut alle sjekker på om det er helg eller ikke til å sjekke om "Fridag" er på eller ikke. Når jeg tenker meg om tror jeg at jeg skal sette "On" til å være "Fridag" og "Off" til å være "Arbeidsdag". Som sagt; så gjort: ... som da blir slik: EDIT: 17. mai var satt til å være 17.01 istedenfor 17.05. Korrigert. Versjon med to devicer, en for dagen i dag og en for dagen i morgen:

Her er det sikkert åpning for tolkning. Men man kan jo tolke at det er ment 1. januar 2019 som siste frist for HAN-port, hvis det er det som menes med å ha tilgang til måleverdiene lokalt. Nå skal det sies at NVE helt sikkert har mulighet til å gi dispensasjon fra forskriften, men da skal det foreligge et vedtak om dette. Og det er det jeg mener bør fremkomme i den teksten som ligger ute på offentlige nettsider. Det er også dette Grøtterud har meddelt i samtale. Slik det fremkommer på nettsiden, virker det som dette er bare noe som er "gjort". Det er også her jeg mener en offentlig instans bør være etterrettelig i sin informasjon, og fremlegge saken i sin helhet, ikke bare endre en tekst uten nærmere forklaring. Det er ganske amatørmessig. Vi ser også at siste endring på den nettsiden er gjort 21. desember; altså i går. Visste de ikke om dette før? Jo, det gjorde de... .. og bakgrunnen for det, er at jeg hadde en samtale med Grøtterud om akkurat dette. Hun var da usikker på hvilken reaksjon de skulle gi. Uansett så var det klart for NVE at Aidon ikke hadde alt klart til 1. januar 2019, og jeg oppfordret de da om å legge ut den informasjonen på nettsidene deres. Dette innspillet skulle hun ta med seg og få effektuert. Dette er over en måned siden, og jeg har sjekket med jevne mellomrom, men ingen informasjon er lagt ut. Hadde de gjort det, så ville man kunne forholde seg til det som ble skrevet og vedtatt. Når de bare endrer en tekst, så.. Ja. jeg har vel sagt mitt..

Du har jo alltids Aeotec Heavy Duty, den er overkill men det er i grunn ingenting negativt i det. Sjølv har eg dette reléet til vv-tanken. Det er godkjent for 12,5 A, som er nok med ganske god margin. Å bruke "støpselrelé" fungerer jo det, men av samme årsak som at det ikkje lenger er tillatt å kople til 2 kW vv-tank med støpsel så er jo dette lite lurt over tid.

Dette kanskje?

Ja, det er selvfølgelig planen.

Installerte plug-in i går ettermiddag rundt kl 16:00. Første gang den rapporterte om problemer var i går kl 1615 deretter kl 2331 og igjen kl 0820 i dag tidlig. Tidspunktene matcher når jeg logget meg på HS for å sjekke status. Jeg har ikke aktivert noen eventer ennå, kun opprettet en som ble trigget hele tiden og som jeg deaktiverte. Jeg er vant til å bruke BLGData hvor "handlerne" (eventer) lever sitt eget "liv" utenfor "eventmotoren" til HS. Der kan du blant annet sette opp regler for hva som skal skje før og etter en aktivitet i en og samme regel. Slik jeg forstår det så vil ikke dette kunne gjøres i GCalSeer hvor du må ha en event for hva som skal skje ved start av aktivitet og en annen for slutt?

Called it!

Da har Logitech snudd, ny beta som gjenoppretter XMPP er ute: https://community.logitech.com/s/question/0D55A00008D4bZ4SAJ/harmony-hub-firmware-update-fixes-vulnerabilities MeiHarmony-plugin er nedsatt 20% ut året! https://forums.homeseer.com/forum/audio-video-and-infra-red-ir-plug-ins/audio-video-and-infra-red-ir-discussion/meiharmonyhub-sirmeili/1268634-meiharmonyhub-is-back-up-for-sale-now-20-off

Ohhh!!!! Nu har jeg den nyeste version.. Fantastisk!!! Mit EON lade stik er uden knap til åbning af ladeporten. Så en dør sensor på lade boksen og en lille magnet tapet på ladestikket.. Tag stikket ud af ladeboksen og ladeporten åbner:-)

Takk Moskus! Det var bare ikke så intuitivt at det allerede var et "internal" interface der til å begynne med. Trodde derfor at jeg skulle bruke internal.. ?

Der har jeg en fordel, siden jeg nesten ikke reiser... Jobben min er på hjemmekontoret eller hytta. Men da er fruen som regel med. For meg er den store testen når fruen begynner å bruke det. Jeg har prøvd å leie henne ut som tester til Microsoft og andre firmaer, men de bare ler når jeg beskrivër henne nøkternt og sier "det der er ikke mulig". Men hun er bokstavelig talt et vandrende Bermudatriangel for stabilitet i alle systemer. Kan noe krasje, så skjer det garantert når hun bruker det!

Alt begynte da kona mi sa at hun vil ikke se "de tingene"... Challenge accepted sa jeg.. det er relativt "enkelt" prosjekt. Fikk inspirasjon her fra https://www.youtube.com/watch?v=2P-8-zd7sXg Jeg brukte arduino med MySensors for styring av LED dot matrix display, men tror at ESP med mqtt passer kanskje bedre (eller noe annet man er komfortabel med, incl noe industriell). Arduino og display fra ali/ebay koster max 100kr sammen. Jeg drev sag helt gjennom, monterte display så flat som mulig og limet hvit selvlimmende folie fra fronten (fra clasolson eller hobbykjelleren, husker ikke). En pro tip hvis noen skal bygge dette, individuelle displey ikke ligger perfekt flat, så bruk noe gjennomsiktig plast foran de, de er litt synlige da folie ligget på alle av dem. Men, ikke so stor krise, man merker det ikke hvis man ikke leter etter det. Det vanskeligste var å programmere display da mysensors/radio har begrensning på totalt bokstaver den kan sende, men som sagt, tror at ESP på wifi passer bedre her. Også, man må alltid ha plan B (altså, du har valgt en ny tv hylle) om ting ikke går som planlagt.

Jeg bruker Logitech "remote" som er på wifi og styres av HS3, når jeg trykker "god natt" skrur TV seg av. I oktober kjøpte jeg ny Philips TV, ville ha 65-tommer uten å bruke for mye penger. TV var meget bra, men når jeg tok kvelden ble TV nr. 2 skrudd på - som også var Philips. Etter å ha brukt altfor lang tid på feilsøking var det bare å gi opp, heldigvis kunne jeg levere den tilbake. Ny Samsung TV kom på plass og etterhvert fikk jeg lagt inn den på Logitechen. Nå fungerer det bra hos meg, men fra tid til annen slår min Logitech inn hos naboen, som bor i etasjen under meg. Blokk med vel mye vinduer. ?

Ikke en automasjonstabbe, men en bestillingstabbe... Boksen ble stor nok, kan man vel si... ?

Her går det i Danalock nettopp fordi jeg må ha nøkkelhull ifm. sameiet og brannsikkerhet ?

Jeg kjenner godt til fenomenet av at alt fungerer perfekt når jeg er hjemme, men med en gang jeg drar bort en tur, DA skjer det alltid ett eller annet.

Kanskje ikke en automatiserings tabbe, men ikke langt unna. For å sette stemningen: Har en idlock 150 som har fungert bra siden jeg fikk den. Men oppdaget at jeg ikke kunne programmere tidsbasert servicekode. Tok kontakt med support og fikk beskjed om å ta batteriene for så prøve på nytt. Gjorde dette, og så langt fungerte alt. Bare velstand. Dette ble fikset igår kveld, siden jeg reiser på jobb idag og også får besøk av håndverker i løpet av dagen. For en som til vanlig har god tid på morgenen, så måtte vi tidlig opp idag sånn at jeg rakk tog og fly. Med stressnivå langt over komfort skalaen, så fikk jeg unger på skole og barnehage. Skal ikke begynne å ramse alt som ligger igjen hjemme, det er en annen historie.. Etter å ha levert unger, så kommer jeg hjem og det er 10 min til taxi kommer. Aktiverer panelet på låsen for å låse opp, og hva skjer? Jo, ingen ting, av det som skal skje ihvertfall! BIP - BIP, rød blinkende LED(for de som ikke kjenner låsen, det vil du ikke ha!) Prøver igjen og igjen, og igjen. Pulsen stiger, stresshormonet raser rundt i blodet i uante mengder. Er bare innbilding, men syns jeg kan høre taxien borti gata. Prøver febrilsk å låse opp døra, jeg begynner å se både tog, fly og helikopter dra avgårde med et tomt sete idag. Finner så ut at jeg har jo inkludert låsen i HS3 for få dager siden! Og den fungerte jo til å låse og låse opp. Problemet løst! Trodde jeg.. Fisket opp telefonen og lette febrilsk etter rett device. Fant den, og trykker på unlock. Roen senker seg og jeg venter på at låsen skal begynne å gå... Ingenting skjer. Ikke en eneste lyd kommer fra låsen. WTF!? Stress og kaos når hittil ukjente høyder. Hva nå?! Prøver igjen touchpanelet, et ukjent antall ganger. Ingenting skjer. Vrir så i dørvrideren for å riste døra skikkelig! Og døra åpner seg.. Den har aldri vært låst...!!! Jeg kom meg inn, og fikk samlet tingene og satt de ut på trappa. Hadde noen minutter før taxien kommer, og dum som jeg var, så startet jeg med litt feilsøking. Ekskluderte låsen fra homeseer og fikk den inkludert på nytt. Må jo få fjernstyringen til å fungere i det minste, sånn at fruen kan komme seg inn og ut mens jeg er borte, hvis det blir mer til. Men, nei. Alt ser greit ut i HS3, men funksjonen fungerer ikke. Ingen reaksjon i låsen. Taxien nærmer seg og har ikke mer tid. Bestemmer meg at det får vente. Stenger døra og skal låse den(som gjøres bare ved å legge en finger eller hand på panelet etter at døren et lukket). BIP-BIP, rød blinkende LED. Skjønner nå hvorfor døren ikke var låst etter turen med ungene. DEN VIL IKKE LÅSE! Prøver igjen og igjen, åpner døren å trykker inn sensorleppen på låsekassen. Da låser den helt fint, men det hjelper jo ikke er den er låst når døra er åpen!! Stress og kaos skyter i været igjen.. Taxien står å venter og jeg får ikke låst. Etter å ha åpnet og lukket døra noen ganger, så får jeg låst. Sjekker at den vil låse seg opp. Fungerer!! Lykke! Men den vil ikke låse igjen.. Prøver samme regla med å åpne og lukke døra. Får tilslutt låst. Nå MÅ jeg dra! Så, da sitter jeg her, på toget, på vei til jobb. Kommer ikke hjem før om 2 uker. Vell viten om at jeg har en tikkende bombe stående i døren hjemme, som fruen skal bruke hver dag mens jeg er borte ? Frykter den kommer til å gå av allerede idag, når døren ikke gjør det fruen forventer.. ? Bare å håpe fruen ikke bytter lås i mellomtiden og "glemmer" å informere/legge ut nøkkel ?

Da jeg hadde hatt HUE-bridgen et par uker begynte jeg å leke med lokaliserings-automatikk, dvs. lys automatisk av ved ingen hjemme. Problemet var at det kun var min mobil som var meldt inn i løsningen, så da jeg gikk tidlig på jobb mens kona fortsatt stod på badet ble det brått mørkt...

Om hvorfor en ikke skal tenke at lysbrytere er bare til pynt og i veien når en har smarthus Rett og slett en tabbe som kan virkelig skade WAF'n. På doen nede har jeg et sånn system, magnet bryter slår på en z wave innskruings plugg i vanlig lampekontakt. Og lysbryteren må stå på for at det skal funke, den har ingen innvirkning på å slå på lyset. Det må gå via homeseer (eneste i huset som er slik). Så når madammen da kommer med dårlig mage og styrter inn på doen, og smeller igjen døren. For så å smelle opp igjen døren, og mens det fortsatt er mørkt på dassen og hun driver å smeller opp og igjen døren og skriker "DETTE SYSTEMET SKAL UT!!!" så slår lyset seg på etter omtrent 5 ++ sekunders delay. Jeg står på vaskerommet ved siden av og småhumrer inni meg, hadde jeg ledd høyt hadde nok jeg røket ut med systemet også så får vel kanskje gjøre akkurat det rommet litt smartere.