Vinnerliste

OK, jeg ser sikker på at jeg postet om det her et sted. Utgangspunktet er denne: https://www.linkedin.com/pulse/barneoppdragelse-med-hjelp-fra-office-graph-og-custom-kjøniksen/?fbclid=IwAR37tk-0PGJ-23wgF0biO74BRIqmBgv_HeMusoHeHPvl2vfHITC-ttgsALs ... med god hjelp av denne: https://gotoguy.blog/2017/12/17/access-microsoft-graph-api-using-custom-connector-in-powerapps-and-flows/ ... og jeg lagde min custom connector her:

Sjekk om det står "dobbelt-isolert" iallfall. Tror dette er symbolet: https://www.ea.no/sikkerhetskrav-i-våtrom_180.html https://www.lysbutikken.no/soner_i_baderom

Kanskje lettere å få hjelp om du tar av lokket og viser innmaten også Hvis det er en analog porttelefon med høye nok spenninger burde det gå med Sage-doorbell sensor som folk har fått tak i her på forumet fra @aleks

Alexa burde svart med "it's five o'clock somewhere" innser jeg nå...

Fikk det til å fungere! Hadde skrevet "C:\veien\til\python\program.exe" Byttet jeg ut C:\ med %HOMEDRIVE% og samme med veien til skriptet. Testet aldri videre med .bat skriptet jeg lagde.

Om RPI-en blir ustabil pga wifi eller BT så kan synderen være for liten/dårlig strømforsyning.

Ja, de brukte det argumentet med 101, men det er jo et argument man ikke kan ta seriøst. Jeg tror ikke de gjorde det selv heller, men noe må man jo si. Selv om det beste hadde vært "oi, der gikk vi på en smell" ser nok det dårligere ut med tanke på PR...

Bare å komme med forslag hvis det er noe som dere ser kunne vært greit å ha.

ja, men du sa jo: og så sier du: Hvilke lyder, slapphet og klump på innsiden får du av DanaPad? ? Vi er veldig fornøyd med både lock og pad. Skyhøy WAF, stabil, lavt batteribruk, pent (på utsiden, som var det viktige her). Derfor jeg lurer på hva det er med DanaPad du/dere er så misfornøyd med, for der kjenner jeg oss ikke igjen i det hele tatt...

Ser at dette er en gammel tråd. Men hadde det samme problemet som TS. Fikk hjelp fra homeseer forumet. En som lagde sin egen versjon. Det fungerte hos meg som kjører HS3 Pro på win10. Sub Main(ByVal Parms As String) 'Use the reference ID of the door or window sensor devices in the arrays below 'This script work for devices that have a value of 0 when they are secure and greater than 0 If they are not Dim WindowArray() As Integer = {8152,8129,8086,8123,8158} Dim DoorArray() As Integer = {1017,1018,1146,6370} Dim DoorDev As Integer = 8259 Dim WindowDev As Integer = 8260 Dim Debug As Boolean = True Dim LogName As String = "Door-Window" Dim WindowCount As integer = 0 Dim WindowName As string = "" Dim WindowDevString As string = "" Dim DoorCount As integer = 0 Dim DoorName As String = "" Dim DoorDevString As string = "" Dim dv As Scheduler.Classes.DeviceClass Try 'Windows For Each Window As Integer In WindowArray dv = hs.GetDeviceByRef(Window) WindowName = dv.Name(hs) If Debug Then hs.writelog(LogName, "Window " & WindowName & " | Value " & hs.DeviceValue(Window)) If hs.DeviceValue(Window) > 0 Then WindowCount = WindowCount + 1 WindowDevString = WindowDevString & WindowName & ",<br>" If Debug Then hs.writelog(LogName, WindowName & " Open") End If Next If WindowCount > 0 Then hs.SetDeviceValueByRef(WindowDev,100,True) hs.SetDeviceString(WindowDev, WindowDevString,True) Else hs.SetDeviceValueByRef(WindowDev,0,True) hs.SetDeviceString(WindowDev, "All Windows Closed",True) End If If Debug Then hs.writelog(LogName, "Window Count: " & WindowCount) 'Door For Each Door As Integer In DoorArray dv = hs.GetDeviceByRef(Door) DoorName = dv.Name(hs) If Debug Then hs.writelog(LogName, "Door " & DoorName & " | Value " & hs.DeviceValue(Door)) If hs.DeviceValue(Door) > 0 Then DoorCount = DoorCount + 1 DoorDevString = DoorDevString & DoorName & ",<br>" If Debug Then hs.writelog(LogName, DoorName & " Open") End If Next If DoorCount > 0 Then hs.SetDeviceValueByRef(DoorDev,100,True) hs.SetDeviceString(DoorDev, DoorDevString,True) Else hs.SetDeviceValueByRef(DoorDev,0,True) hs.SetDeviceString(DoorDev, "All Doors Closed",True) End If If Debug Then hs.writelog(LogName, "Door Count: " & DoorCount) Catch ex As Exception hs.WriteLog (LogName, "Error Door: " & ex.Message) End Try End Sub Endre: Dim Debug As Boolean = True til Dim Debug As Boolean = False for å fjerne all log beskjeder.

Elektrikeren holder på her nå og han skjønte ikke hvorfor jeg hadde bedt om en 2+1 bryter, for så lenge det ikke var dusj/badekar på rommet, så var det ikke krav om topolt brudd. Han setter dermed på en vanlig bryter sammen med Fibaro Single Switch.

To-pols bryter kan også puttes i sikringskap, det har jeg for alle våtrom. Nytt hus 2017.

Kjenner ikke til dimmer, bare on/off. Jeg har løst det med å ha en vanlig topolt bryter (som alltid er på) foran en Dimmer 2.