Nu & straks op tv script

Forum over Homeseer scripts (DUTCH forum)

Moderators: TANE, Ruud

Keessie
Starting Member
Starting Member
Posts: 20
Joined: Wed Dec 09, 2009 2:38 pm
Location: Netherlands

Nu & straks op tv script

Post by Keessie »

Vorig jaar wilde ik graag dat homeseer mij vertelde welk programma er op tv bezig is en wat er daarna begint.
Na veel geklooi met xml grabbers kreeg ik dit maar niet voor elkaar.
Zo is het volgende script ontstaan.

In homeseer gebruik ik de nederlandstalige stem Claire, een spraakopdracht moet nog wel in het engels.
Een spraakopdracht voor bijvoorbeeld rtl 4 kijken ziet er als volgt uit:
Homeautomation voice command
Ja zegt u het maar...
Television channel 4
U Kijkt naar RTL 4, nu bezig RTL Weer straks om 8 uur begint goede tijden slechte tijden.

Als je m'n script ook eens wilt testen sla dan volgende script op als tvgids.vb

Code: Select all

Sub main(ByVal Mode As String)
' Nu & Straks op tv 
' (c) Keessie 2011

Dim page
Dim tekst
Dim nubezig
Dim straks
Dim begintijd
Dim zender
Dim uur
Dim min 
zender = hs.stringitem(mode,1,"|")


' Lees Tvgids in van nuoptv.nl
page = hs.GetURL("nuoptv.nl","",FALSE,80)
if len(page) = 0 then hs.writelog ("TVGIDS","Site niet gevonden")
tekst = hs.stringitem(page,2,zender)
tekst = hs.stringitem(tekst,2,"tit wit")
tekst = mid(tekst,19,30)
nubezig = hs.stringitem(tekst,1,"<")
tekst = hs.stringitem(page,3,zender)
tekst = hs.stringitem(tekst,2,"tit wit")
tekst = mid(tekst,19,30)
straks = hs.stringitem(tekst,1,"<")
tekst = hs.stringitem(page,3,zender)
tekst = hs.stringitem(tekst,2,"beg grs")
begintijd = mid(tekst,19,5)

' Maak begin tijd geschikt om uit te spreken.
uur = cint(left(begintijd,2))
min = cint(mid(begintijd,4,2))
if min < 15 and uur < 13 then begintijd = cstr(min) + " over " + cstr(uur)
if min < 15 and uur > 12 then begintijd = cstr(min) + " over " + cstr(uur-12)
if min = 0 and uur < 13 then begintijd = cstr(uur) + " uur"
if min = 0 and uur > 12 then begintijd = cstr(uur-12) + " uur"
if min = 15 and uur < 13 then begintijd = "kwart over " + cstr(uur)
if min = 15 and uur > 12 then begintijd = "kwart over " + cstr(uur-12)
if min > 15 and uur < 12 then begintijd = cstr(30-min) + " voor half " + cstr(uur+1)
if min > 15 and uur > 11 then begintijd = cstr(30-min) + " voor half " + cstr(uur-11)
if min = 30 and uur < 12 then begintijd = "half " + cstr(uur+1)
if min = 30 and uur > 11 then begintijd = "half " + cstr(uur-11)
if min > 30 and min < 45 and uur < 12 then begintijd = cstr(min-30) + " over half " + cstr(uur+1)
if min > 30 and min < 45 and uur > 11 then begintijd = cstr(min-30) + " over half " + cstr(uur-11)
if min = 45 and uur < 13 then begintijd = "kwart voor " + cstr(uur+1)
if min = 45 and uur > 12 then begintijd = "kwart voor " + cstr(uur-11)
if min > 45 and uur < 13 then begintijd = cstr(min-45) + " voor " + cstr(uur+1)
if min > 45 and uur > 12 then begintijd = cstr(min-45) + " voor " + cstr(uur-11)

if zender="een.be" then zender="Belgie 1"
hs.speak ("U kijkt naar " + zender)
hs.speak ("Nu bezig " + nubezig + ", straks om " + begintijd + " begint " + straks)
hs.Setdevicestring ("z5","Nu bezig "+nubezig,true)
end sub
Je kunt het script met hs.runex("TVGids.vb","main","RTL4") dan de programma's van rtl4 voor laten lezen.
Het script plaatst het huidige programma ook devicestring (z5) dit gebruik ik óm weer te geven in het display van Jonn00 control interface."

Inplaats van rtl 4 kun je ook het programma van de volgende zenders ophalen:

"Nederland 1"
"Nederland 2"
"Nederland 3"
"RTL4"
"RTL5
"SBS6"
"Veronica"
"RTL8"
"Net5"
"een.be"
"Ketnet/Canvas"
"Discovery"
"NGC"
AshaiRey
Senior Member
Senior Member
Posts: 1310
Joined: Mon Feb 02, 2009 5:27 pm
Location: Netherlands
Contact:

Re: Nu & straks op tv script

Post by AshaiRey »

Even een snelle tip
Ook ik gebruik een Nederlandse stem maar sommige dingen komen in het Engels binnen. Omdat ik niet weet welke tekst dat er komt kan ik het ook niet vantevoren vertalen. Engels door een Nederlandse stem uitlaten spreken is waardelos dus die tekst moet je gewoon in het Engels laten doen met een Engelse stem. Dit kan je als volgt doen.
In het speak command kan je van stem wisselen. Het volgende wordt in Engels uitgesproken en gaat automatisch weer terug naar de default.
<voice required='Name=Microsoft Anna'>Do you want me to something?
Bram
Keessie
Starting Member
Starting Member
Posts: 20
Joined: Wed Dec 09, 2009 2:38 pm
Location: Netherlands

Re: Nu & straks op tv script

Post by Keessie »

Bedankt da's wel handige tip :)

Maar wel lastig om vooraf te bepalen welke taal er uitgesproken gaat worden.
Zat nog ff te denken om op bijvoorbeeld imdb te kijken in welke taal een film of serie is maar vaak geven omroepen een buitenlandse serie een nederlandse naam zo wordt Keeping Up Appearances op de nederlandse tv aangekondigd als schone schijn.
User avatar
Harry
Member
Member
Posts: 329
Joined: Mon Apr 10, 2006 1:43 am
Location: Drachten

Re: Nu & straks op tv script

Post by Harry »

krijg hem niet aan de praat , wat vul ik bij
Optional parameters (function,param)
in ?
Keessie
Starting Member
Starting Member
Posts: 20
Joined: Wed Dec 09, 2009 2:38 pm
Location: Netherlands

Re: Nu & straks op tv script

Post by Keessie »

Hallo Harry,

Bij optional parameters kun je bijvoorbeeld ("main","RTL4") invullen.

Wat je ook kunt doen is alle velden leeg maken en dan bij OR script statement volgende opdracht zetten:
&hs.runex("TVGids.vb","main","RTL4")

Ik hoop dat het je nu wel lukt.

Groeten,
Kees
User avatar
Harry
Member
Member
Posts: 329
Joined: Mon Apr 10, 2006 1:43 am
Location: Drachten

Re: Nu & straks op tv script

Post by Harry »

bedankt kees , de opt par versie werkt
als ik de optie OR script statement gebruik niet.

ga nu even kijken hoe ik hem gebruik en toe ga passen .
:-)
mdecharon
Starting Member
Starting Member
Posts: 20
Joined: Sat May 09, 2015 2:51 pm

Re: Nu & straks op tv script

Post by mdecharon »

Mooie en vooral simpele oplossing!

Ook ik heb de laatste tijd veel geprutst met xml gabbers en met weinig succes.

Je script werkt perfect, alleen nu ik ben overgestapt naar Homeseer HS3 blijkt het script niet meer te werken ondanks de aanpassing van &hs.runex naar &hs.RunScriptFunc.

Als ik het volgende uitvoer in HS3: &hs.RunScriptFunc("TVGids.vb","main","RTL4") dan krijg ik onderstaande foutmelding.

Running script(1) &hs.RunScriptFunc("TVGids.vb","main","RTL4"), init error: Kan geen aanhalingstekens gebruiken bij het aanroepen van een Sub-waarde

Is er iemand die mij op weg kan helpen om het script aan te passen voor HS3?

Ik zit er aan te denken om dit script te gebruiken als afstandbediening voor HStouch zodat je per zender kan zien wat er nu en straks op is en op basis daarvan je gewenste programma (lees; zender) aanklikt, waardoor middel ir-signalen er wordt geswitched naar de juiste zender.

Doe ik er dan goed aan om per zender een vb script te maken waarbij elke device (lees; zender) wordt gevuld met de programma informatie en bij het oproepen van mijn scherm in HStouch alles laat verversen of heeft iemand betere suggesties?
Keessie
Starting Member
Starting Member
Posts: 20
Joined: Wed Dec 09, 2009 2:38 pm
Location: Netherlands

Re: Nu & straks op tv script

Post by Keessie »

Ik heb zelf ook net Hs3 geinstalleerd, helaas er weinig tijd door drukte op het werk maar zal dit script zo snel mogelijk geschikt maken voor hs3.

Je idee om de gids gegevens te gebruiken voor hs touch lijkt mij ook wel wat zal me daar ook eens in verdiepen.
mdecharon
Starting Member
Starting Member
Posts: 20
Joined: Sat May 09, 2015 2:51 pm

Re: Nu & straks op tv script

Post by mdecharon »

In de tussentijd heb ik de tvgids.tv (http://www.tvgids.tv/nu-en-straks) ontdekt waar naast meer zenders er ook nog eens een tijdsbar is opgenomen.

Als we nou voor elke zender een virtual device (laten) aanmaken met wat nu te zien is met daaronder de tijdsbalk en daar weer onder wat er straks op komt? Elke device activeert weer een event met de juiste ir-codes.

Misschien ook nog wel een leuk idee, een favorietenlijst (favoriete series, documentaires, etc) maken en zodra er een match wordt gevonden met wat er straks op komt 3 min voor aanvang van je favoriete programma automatisch laten zappen naar de juiste zender.
Keessie
Starting Member
Starting Member
Posts: 20
Joined: Wed Dec 09, 2009 2:38 pm
Location: Netherlands

Re: Nu & straks op tv script

Post by Keessie »

Een script dat tvgids inleest en dan elke zender in een virual device zet heb ik al eens gemaakt in hs2.
bakkerac1
Starting Member
Starting Member
Posts: 1
Joined: Sat Apr 11, 2015 12:36 pm

Re: Nu & straks op tv script

Post by bakkerac1 »

Is het niet mogelijk om een Android app om te zetten naar hs3?
BV. SMART TV REMOTE.


Verzonden vanaf mijn iPad met Tapatalk
mdecharon
Starting Member
Starting Member
Posts: 20
Joined: Sat May 09, 2015 2:51 pm

Re: Nu & straks op tv script

Post by mdecharon »

Keessie wrote:Een script dat tvgids inleest en dan elke zender in een virual device zet heb ik al eens gemaakt in hs2.
Is het dan niet makkelijker om dat script om te bouwen voor HS3?

Of zou het script willen delen?
mdecharon
Starting Member
Starting Member
Posts: 20
Joined: Sat May 09, 2015 2:51 pm

Re: Nu & straks op tv script

Post by mdecharon »

Voor alle duidelijkheid: http://www.tvgids.tv/nu-en-straks
Keessie
Starting Member
Starting Member
Posts: 20
Joined: Wed Dec 09, 2009 2:38 pm
Location: Netherlands

Re: Nu & straks op tv script

Post by Keessie »

De eerste versie van mijn tvgids voor HS3 is bijna klaar.

Het script pikt de gegevens van www.tvgids24.nl
Deze site biedt van alle nederlandse en vlaamse zenders de programma gegevens en ook van een groot aantal regionale omroepen, sportkanalen en themakanalen.


Het script haalt de gegevens op van de hele dag en zet deze in een devicestring.

Een tweede functie is het verwijderen van programma's uit de lijst die al zijn uitgezonden, zo staat altijd de huidige uitzending bovenaan.

De derde functie is het oplezen van de huidige uitzending en de volgende uitzending zoals ook de nu en straks op tv hs2 versie van mn script.

Ik ben het script nog aan het testen en moet nog handleiding schrijven dus nog even geduld ;)
mdecharon
Starting Member
Starting Member
Posts: 20
Joined: Sat May 09, 2015 2:51 pm

Re: Nu & straks op tv script

Post by mdecharon »

Keessie wrote:De eerste versie van mijn tvgids voor HS3 is bijna klaar.

Het script pikt de gegevens van http://www.tvgids24.nl
Deze site biedt van alle nederlandse en vlaamse zenders de programma gegevens en ook van een groot aantal regionale omroepen, sportkanalen en themakanalen.


Het script haalt de gegevens op van de hele dag en zet deze in een devicestring.

Een tweede functie is het verwijderen van programma's uit de lijst die al zijn uitgezonden, zo staat altijd de huidige uitzending bovenaan.

De derde functie is het oplezen van de huidige uitzending en de volgende uitzending zoals ook de nu en straks op tv hs2 versie van mn script.

Ik ben het script nog aan het testen en moet nog handleiding schrijven dus nog even geduld ;)
Ik wacht het geduldig af en ben benieuwd naar het reslutaat :)
Post Reply

Return to “Homeseer Scripts Forum”