-
Hi,
I have an AVM FritzBox as router. It can signal incoming phonecalls via TCP Port 1012. Thus I did modify a perla script that I found and it is running on my RaspberryPi. It listens to the FritzBox via TCP and forwards the message via UDP to Talk2watch and thus my Pebble
You can find the script here:
https://dl.dropboxusercontent.com/u/...ritz2pebble.pl
It is based on: Anrufmonitor nutzen - Fritz!Box
Code:#!/usr/bin/perl -w # # fritz2pebble.pl # # Synopsis: # Script is run as a service daemon. It connects to the Fritz!Box Fon Ata # (port 1012) and receives the calling string (number of the party calling # in). This number is passed on to onto Talk2Watch for BB10another. # # Requirements: # - must be able to reach tcp port 1012 on your FB # - activate call monitor on FB by dialing #96*5* # - required perl package # # Licence: GPL2 # # History: # ver. 0.1 - 20060401 - Lars G. Sander, Zuerich # First public release. # ver. 0.2 - 20060510 - Ulrich Dangel <[email protected]> # Added telefon book support # ver. 0.3 - 20140109 - Marcel Meissel, Frankenthal, Germany # Modified to send number to Talk2Watch App on BB10 device use IO::Socket::INET; use strict; # your fritz box (ip or hostname) my $FRITZBOX="192.168.2.1"; my $TELEFONBUCH="$ENV{HOME}/addressbook"; my $BB10IP="192.168.2.95"; # my $BB10IP2="192.168.1.118"; my $BB10UDPPort="8989"; my $BB10FBName="FritzBox Home"; my $BB10MSG="Anruf von: "; #-------- NO USER SERVICABLE PARTS BELOW -------# sub read_book { my %book = (); open(IN, "<", $TELEFONBUCH) || return (); while(<IN>){ chomp; my @elements = split(":",$_); $book{$elements[0]}=$elements[1]; } close(IN); return %book; } my %book = &read_book; my $sock = new IO::Socket::INET ( PeerAddr => $FRITZBOX, PeerPort => '1012', Proto => 'tcp' ); die "Could not create socket: $!\n" unless $sock; while(<$sock>) { if ($_ =~ /RING/){ my @C = split(/;/); my $nr=""; if (exists($book{$C[3]})) { $nr=$book{$C[3]}; } else { $nr=$C[3]; } # my @args = ($EXTPRO, "Anruf: ", $nr); # system(@args); my @args = ("SMS\$\$" , $BB10FBName, "\$\$", $BB10MSG, $nr); print (@args); my $BB10Sock = new IO::Socket::INET(PeerAddr => $BB10IP, PeerPort => $BB10UDPPort, Proto => 'udp', Timeout => 1) or die('could not connect.'); print $BB10Sock @args; # my $BB10Sock2 = new IO::Socket::INET(PeerAddr => $BB10IP2, PeerPort => $BB10UDPPort, Proto => 'udp', Timeout => 1) or die('could not connect.'); # print $BB10Sock2 @args; } }
01-09-14 07:25 AM - Very few bugs once you have the latest firmware and don't have the android pebble app installed on your phone. The android pebble app conflicts with Talk2Watch if you have them both installed.
Strongly recommend getting a Pebble and use it with this app
Okay, thank you.
As far as I know there is a metal version now from Pebble, is that right?
- Developer of PinGuin01-09-14 12:02 PM - DJ's video here provides a good overview on how to create a script: Third party Pebble watch app Talk2Watch updated with many new features | CrackBerry.comHi. I'm using T2W with my pebble and my Q10. I'm looking for understand how I can use the scripst. Ther is an example or ein tutorial for that? Can someone explain how use this feature?
Sorry for my English.
Grazie
Posted via CB1001-09-14 04:36 PM
Talk2Watch - an advanced Pebble BlackBerry 10 app
Similar Threads
-
I thought the Q10 couldn't get any better....then I updated to 10.2
By butterbean1983 in forum BlackBerry Q10Replies: 31Last Post: 11-02-13, 02:08 AM -
Spellotine! NEW for BlackBerry
By SpacePixel in forum BlackBerry 10 GamesReplies: 3Last Post: 10-31-13, 06:20 PM -
An Apology!
By QTen in forum General BlackBerry News, Discussion & RumorsReplies: 15Last Post: 10-31-13, 06:17 PM -
10.2 update for my Z10 in Brazil
By Tahan Alberto in forum General BlackBerry News, Discussion & RumorsReplies: 5Last Post: 10-31-13, 01:18 PM -
What is a Headless app?
By Alfredofid in forum BlackBerry Z10Replies: 4Last Post: 10-31-13, 01:02 PM