HomeMatic-Forum / FHZ-Forum

Code: Alles auswählen

http:// Roomba_Wifi_Remote_IP /roomba.cgi?button=CLEAN

Code: Alles auswählen

string url;
url="http://192.168.XXX.XX/roomba.cgi?button=CLEAN";
dom.GetObject("CUxD.CUX2801001:1.CMD_EXEC").State("wget -q -O - '"#url#"'");

Code: Alles auswählen

        

load tclrega.so

        #
        # Read Roomba data
        # 

       # Variablen:
       #   Roomba-Distance    Zahl
       #   Roomba-Temperature Zahl (°C)
       #   Roomba-Charge      Zahl 
       #   Roomba-Capacity    Zahl

        #

        set url http://ROOMBA-IP/rwr.xml
        exec /usr/bin/wget -q -O /usr/local/addons/roomba/aktuell.xml $url

        set f [open "/usr/local/addons/roomba/aktuell.xml"]
        set input [read $f]
        close $f

        regexp "<response>(.*?)</response>" $input dummy current  ; #get current state

        regexp "<r12>(.*?)</r12>" $current dummy distance  ; #get distance
        regexp "<r17>(.*?)</r17>" $current dummy temperature  ; #get temperature
        regexp "<r18>(.*?)</r18>" $current dummy charge  ; #get charge
        regexp "<r19>(.*?)</r19>" $current dummy capacity  ; #get capacity


        #
        # set ReGaHss variables
        #
        
	set rega_cmd ""
        append rega_cmd "var c0 = dom.GetObject('Roomba-Distance');"
        append rega_cmd "var c1 = dom.GetObject('Roomba-Temperature');"
        append rega_cmd "var c2 = dom.GetObject('Roomba-Charge');"
        append rega_cmd "var c3 = dom.GetObject('Roomba-Capacity');"

        append rega_cmd "c0.State('$distance');"
        append rega_cmd "c1.State('$temperature');"
        append rega_cmd "c2.State('$charge');"
        append rega_cmd "c3.State('$capacity');"

        rega_script $rega_cmd