Neerslag monitor script
Re: Neerslag monitor script
In de config folder van HomeSeer staat eenbestand genaamd US.TXT.
Bijna onderaan dit bestand staan de (verkeerde) coordinaten van Amsterdam gegeven.
Je kan het daar permanent aanpassen.
TIP: Je kan natuurlijk hier ook je eigen locatie erbij zetten.
Bijna onderaan dit bestand staan de (verkeerde) coordinaten van Amsterdam gegeven.
Je kan het daar permanent aanpassen.
TIP: Je kan natuurlijk hier ook je eigen locatie erbij zetten.
Bram
Re: Neerslag monitor script
Hoi Alexander
Ik ben je script aan het proberen maar krijg de volgende fout:"
als ik bij alle hs.transmit de waardes invul loopt het script wel door maar krijg ik "ERROR: De externe naam kan niet worden opgehaald: 'gps.buienradar.nl'"
Ik gebruik V1.02
dit is het event: Neerslag.vb("Main","|V20|no|yes")
Alex
Ik ben je script aan het proberen maar krijg de volgende fout:"
Code: Select all
Script compile error: Het argument is niet opgegeven voor de parameter data2 van Public Function Transmit(code As String, cmd As String, dimval As Integer, data2 As Integer, wait As Boolean, [raw As Boolean = False], [update As Boolean = True], [out_interface As Integer = 0]) As Integer.on line 133
Ik gebruik V1.02
dit is het event: Neerslag.vb("Main","|V20|no|yes")
Alex
-
- Member
- Posts: 152
- Joined: Wed Apr 11, 2012 11:21 am
Re: Neerslag monitor script
Ha Alexander,
Ik heb het script draaien, werkt perfect! Alleen ben ik een complete nul op programmeergebied.
Kun jij mij uitleggen hoe ik nu kan zorgen in HSTouch dat alleen de waardes/tijden weergegeven worden als deze groter zijn dan 0?
Of iemand anders uiteraard!
Groet,
Kees
Ik heb het script draaien, werkt perfect! Alleen ben ik een complete nul op programmeergebied.
Kun jij mij uitleggen hoe ik nu kan zorgen in HSTouch dat alleen de waardes/tijden weergegeven worden als deze groter zijn dan 0?
Of iemand anders uiteraard!
Groet,
Kees
Re: Neerslag monitor script
hmm vandaag maar binnen blijven, wordt nogal wat regen voorspelt
-
- Member
- Posts: 152
- Joined: Wed Apr 11, 2012 11:21 am
Re: Neerslag monitor script
Ik zou binnen blijven!
Weet jij hoe ik in hstouch weergeef als er regen komt ?
Groet,
Kees
Weet jij hoe ik in hstouch weergeef als er regen komt ?
Groet,
Kees
Re: Neerslag monitor script
ik gebruik geen hstouch, weet niet eens waarom er regen werd voorspelt. nu weer droog gelukkig
Re: Neerslag monitor script
Het script split de parameter op ; Dus het zou dan Neerslag.vb("Main",";V20;no;yes") moeten zijn.dreambox wrote:dit is het event: Neerslag.vb("Main","|V20|no|yes")
Ik heb helaas geen HS momenteel draaien en daarmee ook geen HSTouch. Script kan natuurlijk wel zo gedaan worden dat deze alleen het device update wanneer er regen voorspelt wordt.keeslamper wrote:Kun jij mij uitleggen hoe ik nu kan zorgen in HSTouch dat alleen de waardes/tijden weergegeven worden als deze groter zijn dan 0?
Alexander
Re: Neerslag monitor script
Ik dacht dat hij het niet wilde met ; en daarom heb ik de split aangepast. Ik zal het vandaag nog eens proberen en hou je op de hoogte.Alexander wrote:dreambox wrote:dit is het event: Neerslag.vb("Main","|V20|no|yes")Alexander wrote:Het script split de parameter op ; Dus het zou dan Neerslag.vb("Main",";V20;no;yes") moeten zijn.
Maar het probleem ontstaat bij hs.transmit , en de parameter worden goed gesplit, ik heb de source aangepast en met tenscript getest.
Alex
Re: Neerslag monitor script
log eens alle variabelen die voor hs.transmit als parameters worden meegegeven. Dan moet er een fout in een waarde zitten hiervan.
Alexander
-
- Member
- Posts: 152
- Joined: Wed Apr 11, 2012 11:21 am
Re: Neerslag monitor script
Alexander,
Is het mogelijk dat ik 1 knop in mijn scherm weergeef die afhankelijk van alle statussen van de Neerslag Monitors rood/groen is? Dus dat ik in 1 oogopslag kan zien of ik de komende twee uur droog naar buiten kan?
Ik zat te denken om allemaal virtual devices te maken en dan 1 script die alle waardes checkt. Maar volgens mij is dat heel erg omslachtig! Heb jij daar een idee over?
Groet,
Kees
Is het mogelijk dat ik 1 knop in mijn scherm weergeef die afhankelijk van alle statussen van de Neerslag Monitors rood/groen is? Dus dat ik in 1 oogopslag kan zien of ik de komende twee uur droog naar buiten kan?
Ik zat te denken om allemaal virtual devices te maken en dan 1 script die alle waardes checkt. Maar volgens mij is dat heel erg omslachtig! Heb jij daar een idee over?
Groet,
Kees
Re: Neerslag monitor script
Alexander,
ik krijg dezelfde fout als Alex:
Script compile error: Argument not specified for parameter 'data2' of 'Public Function Transmit(code As String, cmd As String, dimval As Integer, data2 As Integer, wait As Boolean, [raw As Boolean = False], [update As Boolean = True], [out_interface As Integer = 0]) As Integer'.on line 133
Ik draai ook versie 1.02.
Had jij daar nog een verklaring voor?
Run script: neerslagmonitor.vb("Main",";V1;no;yes")
En zo gebruik ik hem.
Groet, Floris
ik krijg dezelfde fout als Alex:
Script compile error: Argument not specified for parameter 'data2' of 'Public Function Transmit(code As String, cmd As String, dimval As Integer, data2 As Integer, wait As Boolean, [raw As Boolean = False], [update As Boolean = True], [out_interface As Integer = 0]) As Integer'.on line 133
Ik draai ook versie 1.02.
Had jij daar nog een verklaring voor?
Run script: neerslagmonitor.vb("Main",";V1;no;yes")
En zo gebruik ik hem.
Groet, Floris
Re: Neerslag monitor script
Ik had een vraag aan Digit:
het binnenhalen van de data werkt,.
Ik wil graag weten hoe je de grafiek maakt.
Kan je hier wat over vertellen?
Groet, Floris
het binnenhalen van de data werkt,.
Ik wil graag weten hoe je de grafiek maakt.
Kan je hier wat over vertellen?
Groet, Floris
Re: Neerslag monitor script
Ja hoor.
Dat grafiekje heb ik ooit gemaakt als onderdeel van mijn VB.Net touchscreen applicatie die in de woonkamer draait en wordt veelvuldig gebruikt.
BBQ-tje? Regenpak aan naar school? Wordt het nog droog voor de winkels sluiten? enz...
De grafiek zelf wordt gemaakt met de Microsoft Chart Controls for Microsoft .NET en de code waarmee ik die control voed is als volgt:
Deze code roep ik aan zodra de control in beeld verschijnt en daarna (zolang visible) middels een timer om de 5 minuten.
Dat grafiekje heb ik ooit gemaakt als onderdeel van mijn VB.Net touchscreen applicatie die in de woonkamer draait en wordt veelvuldig gebruikt.
BBQ-tje? Regenpak aan naar school? Wordt het nog droog voor de winkels sluiten? enz...
De grafiek zelf wordt gemaakt met de Microsoft Chart Controls for Microsoft .NET en de code waarmee ik die control voed is als volgt:
Code: Select all
Private Sub GetNeerslag()
Chart1.Series("Series1").Points.Clear()
Dim NeerslagSource As String
Try
Dim NeerslagURL As String = "http://gps.buienradar.nl/getrr.php?lat=" & GPSLat.ToString.Replace(",", ".") & "&lon=" & GPSLong.ToString.Replace(",", ".")
NeerslagSource = GetURL(NeerslagURL)
Catch ex As Exception
'better luck next time
Exit Sub
End Try
Dim NeerslagLines() As String
NeerslagLines = NeerslagSource.Split(Chr(13) & Chr(10))
Dim NeerslagLine As String
Dim ValueTime() As String
Dim XValues(NeerslagLines.Count) As String
Dim YValues(NeerslagLines.Count) As Double
Dim YVal, mmpu As Double
Try
For i = 0 To NeerslagLines.Count - 1
NeerslagLine = NeerslagLines(i)
If NeerslagLine.Trim <> "" Then
ValueTime = NeerslagLine.Split(Chr(124))
YVal = CDbl(ValueTime(0))
XValues(i) = ValueTime(1)
mmpu = Math.Round(Math.Pow(10, (YVal - 109) / 32), 1)
YValues(i) = mmpu
End If
Next
Catch ex As Exception
'handle it
End Try
Chart1.Series("Series1").Points.DataBindXY(XValues, YValues)
End Sub
Re: Neerslag monitor script
Dank je wel.
Kan je dit in een device zetten?
Dan kan je hem gewoon gebruiken namelijk.
Kan je dit in een device zetten?
Dan kan je hem gewoon gebruiken namelijk.
Re: Neerslag monitor script
Geen idee, daarvoor doe ik te weinig met Homeseer.
Misschien dat anderen je verder kunnen helpen ?
Misschien dat anderen je verder kunnen helpen ?