Anbei etwas Code,vielleicht kanns jemand brauchen.
Die Funktion ist denke ich klar bzw. aus dem Screenshót zu sehen
Gruss
Ralf
fhem.cfg
######################################
#### TV-Viera Wohnzimmer #######
######################################
define _____TV_Wohnzimmer VIERA 192.168.178.9
attr _____TV_Wohnzimmer group 1 - TV Sender im Wohnzimmer wählen
attr _____TV_Wohnzimmer icon it_television
attr _____TV_Wohnzimmer room TV-Programm
attr _____TV_Wohnzimmer sortby 1
attr _____TV_Wohnzimmer webCmd off
####### Fernbedienung einzeilig #########
define _____Fernbedienung_Wohnzimmer remotecontrol
attr _____Fernbedienung_Wohnzimmer group 1 - TV Sender im Wohnzimmer wählen
attr _____Fernbedienung_Wohnzimmer icon it_remote
attr _____Fernbedienung_Wohnzimmer rc_iconpath icons/remotecontrol
attr _____Fernbedienung_Wohnzimmer rc_iconprefix black_btn_
attr _____Fernbedienung_Wohnzimmer room TV-Programm
attr _____Fernbedienung_Wohnzimmer row00 power:POWEROFF2,CHG_INPUT:HDMI,BLUE,MUTE,VOLUP,VOLDOWN,ch_down:CHDOWN,ch_up:CHUP
attr _____Fernbedienung_Wohnzimmer sortby 3
define notify_Fernbedienung_Wohnzimmer notify _____Fernbedienung_Wohnzimmer set _____TV_Wohnzimmer remoteControl $EVENT
### TV-Programm im Wohnzimmer auswaehlen ###
define TVSender dummy
attr TVSender alias _____TV Sender
attr TVSender devStateIcon ARD:ARD ZDF:ZDF 3-Sat:3-Sat
attr TVSender group 1 - TV Sender im Wohnzimmer wählen
attr TVSender icon it_television
attr TVSender room TV-Programm
attr TVSender setList state:Das_Erste,ZDF,RTL,SAT1,VOX,Pro_Sieben,Arte,Kabel_Eins,Bayern,SWR,3Sat,Phoenix,Tele5,Eins_Festival,ZDF_Info,ZDF_Neo,ZDF_Kultur,SIXX,WDR,NDR,RBB,MDR,Hessen,Tagesschau_24,Eins_Plus,NTV,RTL_2,N24,Super_RTL,RTL_Nitro,Bibel_TV,DMAX,Kika,Pro7_Maxx,Sat1_Gold
attr TVSender sortby 2
attr TVSender webCmd state
define n_TVSender notify TVSender:.* {TVSENDERWAHL}
############################
# TV-Programm mit Klack.de #
############################
define TVPROG weblink iframe https://www.klack.de/fernsehprogramm/was-laeuft-gerade/0/-1/free.html
attr TVPROG alias TV-Programm
attr TVPROG htmlattr width="750" height="600" frameborder="0" marginheight="0"
attr TVPROG room TV-Programm
99_myUtilsTVSender.pm
##############################################
# $Id: myUtilsTemplate.pm 7570 2015-01-14 18:31:44Z rudolfkoenig $
#
# Save this file as 99_myUtils.pm, and create your own functions in the new
# file. They are then available in every Perl expression.
package main;
use strict;
use warnings;
use POSIX;
sub
myUtilsTVSender_Initialize($$)
{
my ($hash) = @_;
}
# Enter you functions below _this_ line.
########## TV-Sender setzen##############
sub
TVSENDERWAHL()
{
if (Value("TVSender") eq "Das_Erste" ) {fhem ("set _____TV_Wohnzimmer channel 1") };
if (Value("TVSender") eq "ZDF" ) {fhem ("set _____TV_Wohnzimmer channel 2") };
if (Value("TVSender") eq "RTL" ) {fhem ("set _____TV_Wohnzimmer channel 3") };
if (Value("TVSender") eq "SAT1" ) {fhem ("set _____TV_Wohnzimmer channel 4") };
if (Value("TVSender") eq "VOX" ) {fhem ("set _____TV_Wohnzimmer channel 5") };
if (Value("TVSender") eq "Pro_Sieben" ) {fhem ("set _____TV_Wohnzimmer channel 6") };
if (Value("TVSender") eq "Arte" ) {fhem ("set _____TV_Wohnzimmer channel 7") };
if (Value("TVSender") eq "Kabel_Eins" ) {fhem ("set _____TV_Wohnzimmer channel 8") };
if (Value("TVSender") eq "Bayern" ) {fhem ("set _____TV_Wohnzimmer channel 9") };
if (Value("TVSender") eq "SWR" ) {fhem ("set _____TV_Wohnzimmer channel 10") };
if (Value("TVSender") eq "3Sat" ) {fhem ("set _____TV_Wohnzimmer channel 11") };
if (Value("TVSender") eq "Phoenix" ) {fhem ("set _____TV_Wohnzimmer channel 12") };
if (Value("TVSender") eq "Tele5" ) {fhem ("set _____TV_Wohnzimmer channel 13") };
if (Value("TVSender") eq "Eins_Festival" ) {fhem ("set _____TV_Wohnzimmer channel 14") };
if (Value("TVSender") eq "ZDF_Info" ) {fhem ("set _____TV_Wohnzimmer channel 15") };
if (Value("TVSender") eq "ZDF_Neo" ) {fhem ("set _____TV_Wohnzimmer channel 16") };
if (Value("TVSender") eq "ZDF_Kultur" ) {fhem ("set _____TV_Wohnzimmer channel 17") };
if (Value("TVSender") eq "SIXX" ) {fhem ("set _____TV_Wohnzimmer channel 18") };
if (Value("TVSender") eq "WDR" ) {fhem ("set _____TV_Wohnzimmer channel 19") };
if (Value("TVSender") eq "NDR" ) {fhem ("set _____TV_Wohnzimmer channel 20") };
if (Value("TVSender") eq "RBB" ) {fhem ("set _____TV_Wohnzimmer channel 21") };
if (Value("TVSender") eq "MDR" ) {fhem ("set _____TV_Wohnzimmer channel 22") };
if (Value("TVSender") eq "Hessen" ) {fhem ("set _____TV_Wohnzimmer channel 23") };
if (Value("TVSender") eq "Tagesschau_24" ) {fhem ("set _____TV_Wohnzimmer channel 24") };
if (Value("TVSender") eq "Eins_Plus" ) {fhem ("set _____TV_Wohnzimmer channel 25") };
if (Value("TVSender") eq "NTV" ) {fhem ("set _____TV_Wohnzimmer channel 26") };
if (Value("TVSender") eq "RTL_2" ) {fhem ("set _____TV_Wohnzimmer channel 27") };
if (Value("TVSender") eq "N24" ) {fhem ("set _____TV_Wohnzimmer channel 28") };
if (Value("TVSender") eq "Super_RTL" ) {fhem ("set _____TV_Wohnzimmer channel 29") };
if (Value("TVSender") eq "RTL_Nitro" ) {fhem ("set _____TV_Wohnzimmer channel 30") };
if (Value("TVSender") eq "Bibel_TV" ) {fhem ("set _____TV_Wohnzimmer channel 31") };
if (Value("TVSender") eq "DMAX" ) {fhem ("set _____TV_Wohnzimmer channel 32") };
if (Value("TVSender") eq "Kika" ) {fhem ("set _____TV_Wohnzimmer channel 33") };
if (Value("TVSender") eq "Pro7_Maxx" ) {fhem ("set _____TV_Wohnzimmer channel 34") };
if (Value("TVSender") eq "Sat1_Gold" ) {fhem ("set _____TV_Wohnzimmer channel 35") };
}
1;