Fritzbox 7390 - Bei eingehendem Anruf Lampe anschalten

Begonnen von Invers, 17 Juli 2013, 21:50:06

Vorheriges Thema - Nächstes Thema

Invers

Grüße.
Ich hab leider keine Ahnung, wie ich es bewerkstelligen kann, dass eine Lampe eingeschaltet wird, wenn ein Anruf eingeht
Wäre jemand so nett, mir diesen hoffentlich kleinen Codeschnipsel einsatzbereit zur Verfügung zu stellen?

Ich bin Rootuser, weil ich über die IP m eine Anwesenheit teste.

FHEM: von hier,
Fritte: 7390
Name des Schalters: Licht

Danke im Voraus für die Mühe.
Pi3B+ mit SSD/ Bullseye | FB7590 AX | 12 x Dect200 | CUL433+868 | SDuino | HM-LAN | 3 x Heizung FHT + FKontakte | KeyMatic + 4 FB | HM Wandtaster 2-fach m. LED | 6 x Türkont. TFK-TI | HM-Bew.-Melder innen | 3 x Smoked. HM-SEC-SD-2

Ralph

FHEM auf RaspberryPi3 mit Geekworm USV und SignalDUINO 433MHz und HM-MOD-RPI-PCB mit 3 HM-Sec-SD-2, 5 FHT, 2 RM 100-2 Uni S, 2 HMS100, 6 CUL_WS, 6 CUL_FHTTK, 11 FS20 und 7 FS20V Spannungsüberwachungen

Invers

Die Fundstelle ist brillant. Obwohl ich fast 2 Stunden gesucht hatte, bin ich leider nicht drauf gestossen.
Vielen Dank.

Ich hab das auch gleich probiert, aber es tut sich nichts. Absolut keine Reaktion.
Hat das vielleicht doch etwas mit Root zu tun?
ich abe einfach den Code übernommen und leicht abgeändert. Aber daran sollte es nicht liegen:

## Jemand ruft mich an
define TelefonAN notify Fritz_Box:event:.ring { \
fhem "set LED on";;\
fhem "set STV4 PAUSE";;\
}


## anruf beendet
define TelefonAUS notify Fritz_Box:event:.disconnect { \
fhem "define Latenz at +00:00:10 set LED off";;\
fhem "define Latenz2 at +00:00:10 set STV4 PLAY";;\
}

Pi3B+ mit SSD/ Bullseye | FB7590 AX | 12 x Dect200 | CUL433+868 | SDuino | HM-LAN | 3 x Heizung FHT + FKontakte | KeyMatic + 4 FB | HM Wandtaster 2-fach m. LED | 6 x Türkont. TFK-TI | HM-Bew.-Melder innen | 3 x Smoked. HM-SEC-SD-2

UliM

fhem muss bei Dir als root laufen, siehe http://www.fhemwiki.de/wiki/FritzBox_Parameter_in_fhem_anzeigen#Wichtig
sonst kannst Du auf keine der fFB-Funktionen zugreifen.
RPi4/Raspbian, CUL V3 (ca. 30 HomeMatic-devices), LAN (HarmonyHub, alexa etc.).  Fördermitglied des FHEM e.V.

Invers

So, ich habe nun lange herumprobiert. Erwartungsgemäss klappt gar nichts.
Der Callmonitor liefert einfach keine Ergebnisse.
Da ich leider nur seeeehr wenig Ahnung habe, bitte ich noch einmal um Eure Hilfe in der Hoffnung, dass ihr noch nicht die Nase voll habt.

Ich wäre dankbar, wenn ihr euch mal die Config ansehen würdet, um Fehler zu entdecken. Die unwichtigen Sachen (Steckdosen und Thermometer) habe ich rausgelassen, die laufen ja auch. Die Anwesenheitsnachweise laufen nun nicht mehr, weil Root raus ist (denke ich).

Wie gesagt, es geht um die Anrufsignalisierung der Fritzbox (Callmonitor).
Falls ihr zufällig über weiter, böse Fehler stolpern solltet und mir das sagt, bin ich auch dafür dankbar.
Die Codes habe ich alle zusammengeklickt, bis auf wenige Ausnahmen und dann natürlich angepasst.



Hier also die Dateien:

Auszug aus dem Logfile:
(Fehler Can't connect to 192.168.0.1:1012: Connection timed out)


2013.07.19 08:27:21 3: telnetPort: port 7072 opened
2013.07.19 08:27:21 3: WEB: port 8083 opened
2013.07.19 08:27:21 3: WEBphone: port 8084 opened
2013.07.19 08:27:21 3: WEBtablet: port 8085 opened
2013.07.19 08:27:22 3: Opening CUL_0 device /dev/ttyACM0
2013.07.19 08:27:22 3: Setting CUL_0 baudrate to 9600
2013.07.19 08:27:22 3: CUL_0 device opened
2013.07.19 08:27:22 3: CUL_0: Possible commands: BCFiAZEGMRTVWXefmltux
2013.07.19 08:27:22 3: Opening fbaha device localhost:2002
2013.07.19 08:27:22 3: fbaha device opened
2013.07.19 08:27:22 1: FBAHA fbaha registered with handle: 00000006
2013.07.19 08:27:23 3: [STV] defined with host: 192.168.178.22 port: 55000 MAC: 9C:C7:A6:9A:C7:DF
2013.07.19 08:27:23 3: Opening FB7390 device 192.168.0.1:1012
2013.07.19 08:27:26 3: Can't connect to 192.168.0.1:1012: Connection timed out
2013.07.19 08:27:26 3: [STV] defined with host: 192.168.178.22 port: 52235 MAC:
2013.07.19 08:27:26 3: Opening MyCallMonitor device 192.168.0.1:1012
2013.07.19 08:27:29 3: Can't connect to 192.168.0.1:1012: Connection timed out
2013.07.19 08:27:29 1: Including ./log/fhem.save
2013.07.19 08:37:29 3: Watchdog watchdog_Abwesenheit triggered





fhem.cfg:

attr global autoload_undefined_devices 1
attr global logfile ./log/fhem-%Y-%m.log
attr global modpath .
attr global motd SecurityCheck:\\\\\
\\\\\
WEB,WEBphone,WEBtablet has no basicAuth attribute.\\\\\
telnetPort has no password/globalpassword attribute.\\\\\
\\\\\
Restart fhem for a new check if the problem is fixed,\\\\\
or set the global attribute motd to none to supress this message.\\\\\

attr global sendStatistics manually
attr global statefile ./log/fhem.save
attr global userattr devStateIcon devStateStyle icon sortby webCmd
attr global verbose 3

# attr global motd .

define telnetPort telnet 7072 global
define WEB FHEMWEB 8083 global
attr WEB stylesheetPrefix dark

define WEBphone FHEMWEB 8084 global
attr WEBphone stylesheetPrefix smallscreen

define WEBtablet FHEMWEB 8085 global
attr WEBtablet stylesheetPrefix dark

# Fake FileLog entry, to access the fhem log from FHEMWEB
define Logfile FileLog ./log/fhem-%Y-%m.log fakelog

define autocreate autocreate
attr autocreate autosave 1
attr autocreate device_room %TYPE
attr autocreate filelog ./log/%NAME-%Y.log
attr autocreate weblink 1
attr autocreate weblink_room Plots

# Disable this to avoid looking for new USB devices on startup
define initialUsbCheck notify global:INITIALIZED usb create


# If the above notify did not helped, then you probably have to enable some of
# the following lines.  Verify first that /dev/xxx ist correct.

#define FHZ FHZ /dev/USB0
#define CUL CUL /dev/ttyACM0@9600 1234
#attr CUL rfmode HomeMatic

#define EUL TCM 310 /dev/ttyACM0@57600
#define BscBor TCM 120 /dev/ttyUSB0@9600
#define BscSmartConnect TCM 310 /dev/ttyUSB0@57600
#FB_checkPw does not for FB-OS > 5.22
#attr WEB basicAuth {use FritzBoxUtils;;FB_checkPw("localhost","$password") }
#attr WEBphone basicAuth {use FritzBoxUtils;;FB_checkPw("localhost","$password") }
#attr WEBtablet basicAuth {use FritzBoxUtils;;FB_checkPw("localhost","$password") }
#attr telnetPort globalpassword {use FritzBoxUtils;;FB_checkPw("localhost","$password") }

#---------------------------------------------------------

define CUL_0 CUL /dev/ttyACM0@9600 1034
define fbaha FBAHA localhost:2002


#=========================================================

# ------------- Anwesenheitskontrolle ------------------
define Handy PRESENCE lan-ping 192.168.178.21 60

define watchdog_Abwesenheit watchdog Handy:absent 00:10 Handy:present setstate watchdog_Anwesenheit defined;;\
set Uhr off
attr watchdog_Abwesenheit regexp1WontReactivate 1

define watchdog_Anwesenheit watchdog Handy:present 00:01 Handy:absent setstate watchdog_Abwesenheit defined;;\
set Uhr on
attr watchdog_Anwesenheit regexp1WontReactivate 1


# ------------- Twilieght für LED und Stehlampe ------------------
define myTwilight Twilight 52.53264390 13.60628510 1 638242

define LED_sunset_an at *{sunset("civil","-1200")} set LED on
attr LED_sunset_an room WZ
#define FileLog_LED FileLog ./log/LED-%Y.log LED
#attr FileLog_LED logtype text
#attr FileLog_LED room Logs

define Stehlampe_sunset_an at *{sunset("REAL","900")} set Stehlampe on
attr Stehlampe_sunset_an room WZ
#define FileLog_Stehlampe FileLog ./log/Stehlampe-%Y.log Stehlampe
#attr FileLog_Stehlampe logtype text
#attr FileLog_Stehlampe room Logs


# -------- Wetterdaten erfassen ---------
define MeinWetter Weather 638242 3600 de
attr MeinWetter room Wettervorhersage

# -- Logfile alle Wetter Daten --
define FileLog_MeinWetter FileLog ./log/meinwetter-%Y-%m.log MeinWetter
attr FileLog_MeinWetter logtype text
attr FileLog_MeinWetter room Logs

# attr MeinWetter localicons 1

# -- Wetter Icons hinzufügen --
define weblink_meinwetter weblink htmlCode {WeatherAsHtml("MeinWetter")}
attr weblink_meinwetter room Wettervorhersage



# IGNORE ---------------------------------------------------------
define CUL_TX_21 CUL_TX 21
attr CUL_TX_21 ignore 1
define CUL_TX_73 CUL_TX 73
attr CUL_TX_73 ignore 1

# Samsung TV -----------------------------------------------------

define STV1 dummy
attr STV1 group TV
attr STV1 webCmd HDMI:TV:CHUP:CHDOWN:POWEROFF

define STV2 dummy
attr STV2 group TV
attr STV2 webCmd MENU:UP:ENTER:VOLUP:VOLDOWN

define STV3 dummy
attr STV3 group TV
attr STV3 webCmd LEFT:DOWN:RIGHT:EXIT:VOLUME=20

define n_STV notify STV.* { samsungtv($EVENT);; fhem("setstate $NAME .");; -1;;}


define TV STV 192.168.178.22 55000
define rc1 remotecontrol
attr rc1 rc_iconpath icons/remotecontrol
attr rc1 rc_iconprefix black_btn_
attr rc1 room TestRemote
attr rc1 row00 POWEROFF,TV,HDMI
attr rc1 row01 :blank,:blank,:blank
attr rc1 row02 1,2,3
attr rc1 row03 4,5,6
attr rc1 row04 7,8,9
attr rc1 row05 :blank,0,PRECH
attr rc1 row06 :blank,:blank,:blank
attr rc1 row07 VOLUP:UP,MUTE,CHUP
attr rc1 row08 :VOL,:blank,:PROG
attr rc1 row09 VOLDOWN:DOWN,CH_LIST,CHDOWN
attr rc1 row10 MENU,:blank,GUIDE
attr rc1 row11 :blank,:blank,:blank
attr rc1 row12 TOOLS,UP,INFO
attr rc1 row13 LEFT,ENTER,RIGHT
attr rc1 row14 RETURN,DOWN,EXIT
define weblink_rc1 weblink htmlCode {fhem("get rc1 htmlcode", 1)}
attr weblink_rc1 group rc
attr weblink_rc1 room TestRemote


define FB7390 FB_CALLMONITOR 192.168.0.1:1012

#define CallMonitor_notify notify FB7390:event.*ring #{if(ReadingsVal("FB7390","internal_number","") eq "12345") { #FHTnominal("AZO_FHT80B") } }

## Jemand ruft mich an
define TelefonAN notify Fritz_Box:event:.ring { \
fhem "set LED on";;\
fhem "set STV4 PAUSE";;\
}

## anruf beendet
define TelefonAUS notify Fritz_Box:event:.disconnect { \
fhem "define Latenz at +00:00:10 set LED off";;\
fhem "define Latenz2 at +00:00:10 set STV4 PLAY";;\
}


define SamsungTV STV 192.168.178.22

#
# Test FB_CALLMONITOR....
#

define MyCallMonitor FB_CALLMONITOR 192.168.0.1:1012
attr MyCallMonitor event-on-change-reading event
attr MyCallMonitor group Wohnzimmer
attr MyCallMonitor room Haus


define n_MyCallMonitor notify MyCallMonitor {\
my $extNr = ReadingsVal("MyCallMonitor", "external_number", "none");;\
my $intNr = ReadingsVal("MyCallMonitor", "internal_number", "none");;\
my $conNr = ReadingsVal("MyCallMonitor", "used_connection", "none");;\
my $event = ReadingsVal("MyCallMonitor", "event", "none");;\
my $MSN = "" ;;\
SELECT:{\
if ($intNr eq "99902526"){$MSN = "MSN 1";; last SELECT;; }\
if ($intNr eq "99902528"){$MSN = "MSN 2";; last SELECT;; }\
if ($intNr eq "99499001"){$MSN = "MSN 3";; last SELECT;; }\
if ($intNr eq "99287621"){$MSN = "MSN 4";; last SELECT;; }\
}\
if($event eq "ring"){\
fhem "set SamsungTV mute on";;\
fhem "set SamsungTV call 'von:_'.$extNr.' '.$extNr.' '.$intNr";;\
} elsif($event eq "call"){\
;;\
} elsif($event eq "disconnect"){\
fhem "set SamsungTV mute off";;\
} else {\
;;\
}\
}


und die myUtils

##############################################
# $Id: 99_Utils.pm 3417 2013-07-14 09:15:15Z rudolfkoenig $
package main;

use strict;
use warnings;
use POSIX;

sub
Utils_Initialize($$)
{
  my ($hash) = @_;
}

sub
time_str2num($)
{
  my ($str) = @_;
  my @a = split("[- :]", $str);
  return mktime($a[5],$a[4],$a[3],$a[2],$a[1]-1,$a[0]-1900,0,0,-1);
}

sub
min($@)
{
  my ($min, @vars) = @_;
  for (@vars) {
    $min = $_ if $_ lt $min;
  }          
  return $min;
}

sub
max($@)
{
  my ($max, @vars) = @_;
  for (@vars) {
    $max = $_ if $_ gt $max;
  }          
  return $max;
}

sub
minNum($@)
{            
  my ($min, @vars) = @_;
  for (@vars) {
    $min = $_ if $_ < $min;
  }          
  return $min;
}

sub
maxNum($@)
{            
  my ($max, @vars) = @_;
  for (@vars) {
    $max = $_ if $_ > $max;
  }          
  return $max;
}


sub
abstime2rel($)
{
  my ($h,$m,$s) = split(":", shift);
  $m = 0 if(!$m);
  $s = 0 if(!$s);
  my $t1 = 3600*$h+60*$m+$s;

  my @now = localtime;
  my $t2 = 3600*$now[2]+60*$now[1]+$now[0];
  my $diff = $t1-$t2;
  $diff += 86400 if($diff <= 0);

  return sprintf("%02d:%02d:%02d", $diff/3600, ($diff/60)%60, $diff%60);
}


#99_myUtils.pm

#am Anfang hinzugefügt:
use CGI qw(:standard);
use IO::Socket;
use MIME::Base64;

sub samsungtv($);


#### Samsung-TV steuern ########################################################################################################
# called by n_STV
sub
samsungtv($) {
my $cmd = shift;
my @ARGV = split(" ",$cmd);
#### Configuration
#Debug "samsungtv ARGV 0:".$ARGV[0]. ($ARGV[1] ? " 1:".$ARGV[1] : "");
my $tv = "UE55ES8090"; # Might need changing to match your TV type
my $port = "55000";    #TCP port of Samsung TV
my $tvip = "192.168.178.22"; # IP Address of TV
my $myip = "192.168.178.20"; # Doesn't seem to be really used
my $mymac = "1C:6F:65:C5:AD:FC"; # Used for the access control/validation

    my $appstring = "iphone..iapp.samsung"; # What the iPhone app reports
    my $tvappstring = "iphone.".$tv.".iapp.samsung"; # TV type
    my $remotename = "Perl Samsung Remote"; # What gets reported when it asks for permission/also shows in General->Wireless Remote Control menu

    # command-line help

    if ($ARGV[0] eq "--help") {
       print "Usage: samsungremote KEY [KEYS]\n";
       print "Normal remote keys: 0 1 2 3 4 5 6 7 8 9 UP DOWN LEFT RIGHT ENTER MENU PRECH GUIDE INFO RETURN CH_LIST EXIT SOURCE AD PICTURE_SIZE VOLUP VOLDOWN MUTE TOOLS POWEROFF CHUP CHDOWN CONTENTS W_LINK RSS MTS SRS CAPTION TOPMENU SLEEP ESAVING PLAY PAUSE REWIND FF REC STOP TV HDMI PIP_ONOFF ASPECT \n";
       exit;
    }


    my $sock = new IO::Socket::INET (
    PeerAddr => $tvip,
    PeerPort => '55000',
    Proto => 'tcp',
    );
    die "Could not create socket: $!\n" unless $sock;

    my $messagepart1 = chr(0x64) . chr(0x00) . chr(length(encode_base64($myip, ""))) . chr(0x00) . encode_base64($myip, "") . chr(length(encode_base64($mymac, ""))) . chr(0x00) . encode_base64($mymac, "") . chr(length(encode_base64($remotename, ""))) . chr(0x00) . encode_base64($remotename, "");
    my $part1 = chr(0x00) . chr(length($appstring)) . chr(0x00) . $appstring . chr(length($messagepart1)) . chr(0x00) . $messagepart1;
    print $sock $part1;

    my $messagepart2 = chr(0xc8) . chr(0x00);
    my $part2 = chr(0x00) . chr(length($appstring)) . chr(0x00) . $appstring . chr(length($messagepart2)) . chr(0x00) . $messagepart2;
    print $sock $part2;

    # Preceding sections all first time only

    if (defined(param("text"))) {
       # Send text, e.g. in YouTube app's search, N.B. NOT BBC iPlayer app.
       my $text = param("text");
       my $messagepart3 = chr(0x01) . chr(0x00) . chr(length(encode_base64($text, ""))) . chr(0x00) . encode_base64($text, "");
       my $part3 = chr(0x01) . chr(length($appstring)) . chr(0x00) . $appstring . chr(length($messagepart3)) . chr(0x00) . $messagepart3;
       print $sock $part3;
    }
    else {
      foreach my $argnum (0 .. $#ARGV) {
        # Send remote key(s)
# Debug "samsungtv.pl sending ".uc($ARGV[$argnum]);
        my $key = "KEY_" . uc($ARGV[$argnum]);
        my $messagepart3 = chr(0x00) . chr(0x00) . chr(0x00) . chr(length(encode_base64($key, ""))) . chr(0x00) . encode_base64($key, "");
        my $part3 = chr(0x00) . chr(length($tvappstring)) . chr(0x00) . $tvappstring . chr(length($messagepart3)) . chr(0x00) . $messagepart3;
        print $sock $part3;
#        sleep(1);
        select(undef, undef, undef, 0.5);
       }
    }

    close($sock);

}


#### Samsung-TV remote frontend ########################################################################################################
# called by weblink htmlCode {samsungremote("<remotedevice>")}
sub
samsungremote_init() {
  my @row;
  $row[0]="POWEROFF,TV,HDMI";
  $row[1]="---";
  $row[2]="1,2,3";
  $row[3]="4,5,6";
  $row[4]="7,8,9";
  $row[5]=",0,PRECH";
  $row[6]="---";
  $row[7]="VOLUP,MUTE,CHUP";
  $row[8]="VOLDOWN,CH_LIST,CHDOWN";
  $row[9]="MENU,,GUIDE";
  $row[10]="---";
  $row[11]="TOOLS,UP,INFO";
  $row[12]="LEFT,ENTER,RIGHT";
  $row[13]="RETURN,DOWN,EXIT";
  # unused available commands
  # AD PICTURE_SIZE  SOURCE
  # CONTENTS W_LINK
  # RSS MTS SRS CAPTION TOPMENU SLEEP ESAVING
  # PLAY PAUSE REWIND FF REC STOP
  # PIP_ONOFF ASPECT
  return @row;
}
sub
samsungremote($) {
  my $stvdev = shift;
  my $stvhtml;
  my @row = samsungremote_init();
  $stvhtml='<table border="2" rules="none">';
  foreach my $rownr (0..$#row) {
    if ( ($row[$rownr] eq "---") && !$FW_tp ) {
  $stvhtml .= "<tr><td colspan=\"3\" style=\"height:6px\"></td></tr>\n";
  next;
}
    $stvhtml .= "<tr>\n";
    my @btn = split (",",$row[$rownr]);
 foreach my $btnnr (0..$#btn) {
   $stvhtml .= "<td>";
if ($btn[$btnnr] ne "") {
#  $stvhtml .=  "<a href=\"$FW_ME$FW_subdir?cmd.$stvdev=set $stvdev $btn[$btnnr]\"><img src=\"$FW_ME/icons/black_btn_".$btn[$btnnr]."\"></a>";
 my $cmd   = "cmd.$stvdev=set $stvdev $btn[$btnnr]";
 my $img   = "<img src=\"$FW_ME/icons/black_btn_$btn[$btnnr]\">";
   $stvhtml .= "<a onClick=\"FW_cmd('$FW_ME$FW_subdir?XHR=1&$cmd')\">$img</a>";
}
   $stvhtml .= "</td>\n";
 }
    $stvhtml .= "</tr>\n";
  }
  $stvhtml .= "</table>\n";
  return $stvhtml;
}
Pi3B+ mit SSD/ Bullseye | FB7590 AX | 12 x Dect200 | CUL433+868 | SDuino | HM-LAN | 3 x Heizung FHT + FKontakte | KeyMatic + 4 FB | HM Wandtaster 2-fach m. LED | 6 x Türkont. TFK-TI | HM-Bew.-Melder innen | 3 x Smoked. HM-SEC-SD-2

Gerhard

Hi Invers,

in diese Zeile: define MyCallMonitor FB_CALLMONITOR 192.168.0.1:1012 sollte die IP von deiner 7390 stehen, vermute ich mal: 192.168.178.1

Gerhard
FB6890LTE, cubietruck, orangePi, raspberry 2/3/4, HM/HMIP, shelly > 50, etc.

Invers

Danke, Gerhard, für die schnelle Antwort.
Das hatte ich auch zuerst vermutet, aber das hat dann bewirkt, dass ich fhem nicht mehr aufrufen konnte. Ich musste die Box neu starten, dann ging es wieder und ich habe daraufhin die IP wieder geändert. Vielleicht war das ja ein Zufall. Man soll vielleicht nachts um 1 nicht mehr so viel probieren. Wenn du sicher bist, dass du richtig liegst, versuche ich es noch einmal damit.
Pi3B+ mit SSD/ Bullseye | FB7590 AX | 12 x Dect200 | CUL433+868 | SDuino | HM-LAN | 3 x Heizung FHT + FKontakte | KeyMatic + 4 FB | HM Wandtaster 2-fach m. LED | 6 x Türkont. TFK-TI | HM-Bew.-Melder innen | 3 x Smoked. HM-SEC-SD-2

Invers

So, Update:

@ Gerhard: Niemals wieder werde ich deine Worte anzweifeln. LOL Danke.

Der Callmonitor funktioniert nun. Es war gestern tatsächlich ein Zufall, dass sich die Fritte verabschiedet hatte.
Problem "Schalten bei Anruf" also gelöst.

Eine Sache musste ich umstellen:
Alles, was sich auf samsungTV bezog, musste ich in STV3 ändern, wo ich den Befehl MUTE über attr hinzugefügt habe. MUTE on oder off geht nicht.

Nun erhebt sich natürlich die Frage, warum alles mit samsungTV nicht geht, sondern nur mit STV1, STV2, STV3.
Da muss noch was sein.

Gibt es dazu noch Ideen?
Pi3B+ mit SSD/ Bullseye | FB7590 AX | 12 x Dect200 | CUL433+868 | SDuino | HM-LAN | 3 x Heizung FHT + FKontakte | KeyMatic + 4 FB | HM Wandtaster 2-fach m. LED | 6 x Türkont. TFK-TI | HM-Bew.-Melder innen | 3 x Smoked. HM-SEC-SD-2

Gerhard

Hi Invers,

also, es ist sicher daß da die ip deiner FB mit dem Port 1012 stehen nuß!

übrigens nicht vergessen:

In order to use this module with fhem you must enable the CallMonitor feature via telephone shortcode.

#96*5* - for activating
#96*4* - for deactivating

Just dial the shortcode for activating on one of your phones, after 3 seconds just hang up. The feature is now activated.
After activating the CallMonitor-Support in your FritzBox, this module is able to generate an event for each call.


Gruß, Gerhard
FB6890LTE, cubietruck, orangePi, raspberry 2/3/4, HM/HMIP, shelly > 50, etc.

Invers

OK, Gerhard, der Callmonitor der Box ist an.
Port 1012 hab ich ja gesetzt und es geht ja nun auch. Es war die Korrektur der IP, die ich machen musste.
nur die Steuerung über
define SamsungTV STV 192.168.178.22
und zugehörige Routinen laufen gar nicht.

Auch die beiden Codeschnipsel

## Jemand ruft mich an
define TelefonAN notify Fritz_Box:event:.ring { \
fhem "set LED on";;\
fhem "set STV4 PAUSE";;\
}

und
## anruf beendet
define TelefonAUS notify Fritz_Box:event:.disconnect { \
fhem "define Latenz at +00:00:10 set LED off";;\
fhem "define Latenz2 at +00:00:10 set STV4 PLAY";;\
}


laufen nicht.

Ich hab dann statt samsungTV halt auf STV3 umgebastelt. Das läuft.
Pi3B+ mit SSD/ Bullseye | FB7590 AX | 12 x Dect200 | CUL433+868 | SDuino | HM-LAN | 3 x Heizung FHT + FKontakte | KeyMatic + 4 FB | HM Wandtaster 2-fach m. LED | 6 x Türkont. TFK-TI | HM-Bew.-Melder innen | 3 x Smoked. HM-SEC-SD-2

Gerhard

Invers,

wie ich in deinen fhem.cfg sehe ist STV zwei mal definiert:
 1. define TV STV 192.168.178.22 55000
 2. define SamsungTV STV 192.168.178.22

bitte nur einmal benutzen, und zwar mit 55000

;)

FB6890LTE, cubietruck, orangePi, raspberry 2/3/4, HM/HMIP, shelly > 50, etc.

Invers

Pi3B+ mit SSD/ Bullseye | FB7590 AX | 12 x Dect200 | CUL433+868 | SDuino | HM-LAN | 3 x Heizung FHT + FKontakte | KeyMatic + 4 FB | HM Wandtaster 2-fach m. LED | 6 x Türkont. TFK-TI | HM-Bew.-Melder innen | 3 x Smoked. HM-SEC-SD-2

Gerhard

Hi Invers,

habe ich richtig verstanden, bei dir funktioniert die MsgBox? d.h. bei Anruf erscheint ein popup call?

Gerhard
FB6890LTE, cubietruck, orangePi, raspberry 2/3/4, HM/HMIP, shelly > 50, etc.

Invers

Mensch, das wäre ja toll. Nö, hast du leider nicht richtig verstanden. Ich habe es probiert und nicht wieder gelöscht, weil ich ja nicht wusste, ob es falsch ist. Nun hau ich es aber raus, bis jemand eine Lösung hat. Sieht ja schlecht aus. Aber vielleicht hat Samsung mal erbarmen, was ich allerdings nicht glaube.
Pi3B+ mit SSD/ Bullseye | FB7590 AX | 12 x Dect200 | CUL433+868 | SDuino | HM-LAN | 3 x Heizung FHT + FKontakte | KeyMatic + 4 FB | HM Wandtaster 2-fach m. LED | 6 x Türkont. TFK-TI | HM-Bew.-Melder innen | 3 x Smoked. HM-SEC-SD-2

Gerhard

Hallo Invers,

morgen mochte ich an dem STV Modul ein paar Änderungen vornrhmen.
Wärst du bereit für mich ein paar tests zu machen?, da ich mur einen D-Serie Fehrnseher habe.

Wenn ja, berichte mir konkret, was mit dem STV Modul funktionierte und was nicht.

bis Morgen, Gerhard

FB6890LTE, cubietruck, orangePi, raspberry 2/3/4, HM/HMIP, shelly > 50, etc.