Kochanie jak jest na zewnątrz bo nie wiem jak się ubrać ?? Moja ukochana zadaje to pytanie codziennie. Postanowiłem więc coś z tym zrobić. Stacji meteo jeszcze nie kupię ale chętnie skorzystam z cudzej . nie nie ukradnę komuś stacji meteo ale skorzystam z wyników które udostępnia. Na celownik bierzemy stacje meteo rozmieszczone przy drogach krajowych i autostradach.
Pobieranie danych pięknie dopracował kolega andre.
Skrypty działają po wklejeniu do wirtualnego urządzenia:
idst – oznacza numer stacji meteo
Temperatura :
fibaro:log(‚<h3><b style=”color:yellow;”>Proszę czekać</h3></b>’)
HC2 = Net.FHttp(„www.traxelektronik.pl”)
dane, status, errorcode = HC2:POST(„/pogoda/stacja.php?idst=106″,””)
godz = string.find(dane,”godz.”)
godztxt = string.sub(dane,godz+9,godz+15)
gdzie = (string.find(dane,”2m”))
temp2m = (string.gsub((string.sub(dane,gdzie+86,gdzie+90)),'”‚,’ ‚))
fibaro:log(‚<a href=”http://www.traxelektronik.pl/pogoda/stacja.php?idst=106″><h3><b style=”color:yellow;”>Temperatura : ‚..temp2m..”°C z godziny: „..godztxt..”</h3></b></a>”)
fibaro:sleep(1000)
Wilgotność:
fibaro:log(‚<h3><b style=”color:yellow;”>Proszę czekać</h3></b>’)
HC2 = Net.FHttp(„www.traxelektronik.pl”)
dane, status, errorcode = HC2:POST(„/pogoda/stacja.php?idst=106″,””)
godz = string.find(dane,”godz.”)
godztxt = string.sub(dane,godz+9,godz+15)
gdzie = (string.find(dane,”Wil”))
tempWil = (string.gsub((string.sub(dane,gdzie+107,gdzie+117)),'”‚,’ ‚))
fibaro:log(‚<h3><b style=”color:yellow;”>Wilgotność : ‚..tempWil..”% z godziny: „..godztxt..”</h3></b>”)
fibaro:sleep(1000)
Prędkość wiatru
fibaro:log(‚<h3><b style=”color:yellow;”>Proszę czekać</h3></b>’)
HC2 = Net.FHttp(„www.traxelektronik.pl”)
dane, status, errorcode = HC2:POST(„/pogoda/stacja.php?idst=106″,””)
godz = string.find(dane,”godz.”)
godztxt = string.sub(dane,godz+9,godz+15)
gdzie = (string.find(dane,”dko”))
tempdko = (string.gsub((string.sub(dane,gdzie+98,gdzie+102)),'”‚,’ ‚))
fibaro:log(‚<h3><b style=”color:yellow;”>Prędkość Wiatru : ‚..tempdko..” m/s z godziny: „..godztxt..”</h3></b>”)
fibaro:sleep(1000)
Kierunek wiatru
fibaro:log(‚<h3><b style=”color:yellow;”>Proszę czekać</h3></b>’)
HC2 = Net.FHttp(„www.traxelektronik.pl”)
dane, status, errorcode = HC2:POST(„/pogoda/stacja.php?idst=106″,””)
godz = string.find(dane,”godz.”)
godztxt = string.sub(dane,godz+9,godz+15)
gdzie = (string.find(dane,”ierunek”))
tempierunek = (string.gsub((string.sub(dane,gdzie+109,gdzie+125)),'”‚,’ ‚))
fibaro:log(‚<h3><b style=”color:yellow;”>Kierunek Wiatru : ‚..tempierunek..”° z godziny: „..godztxt..”</h3></b>”)
fibaro:sleep(1000)
Temperatura odczuwalna
fibaro:log(‚<h3><b style=”color:yellow;”>Proszę czekać</h3></b>’)
HC2 = Net.FHttp(„www.traxelektronik.pl”)
dane, status, errorcode = HC2:POST(„/pogoda/stacja.php?idst=106″,””)
godz = string.find(dane,”godz.”)
godztxt = string.sub(dane,godz+9,godz+15)
gdzie = (string.find(dane,”odczu”))
tempodczu = (string.gsub((string.sub(dane,gdzie+95,gdzie+105)),'”‚,’ ‚))
fibaro:log(‚<h3><b style=”color:yellow;”>Temperatura Odczuwalna : ‚..tempodczu..”°C z godziny: „..godztxt..”</h3></b>”)
fibaro:sleep(1000)