Bitcoin und Ethereum Ticker in Fhem

[hankyzoolander]

Hallo,
möchte hier meine Httpmod`s für Bitcoin und Ethereum vorstellen.
Vielleicht braucht es ja jemand.

Bitcoin:

Code Auswählen Erweitern

define Bitcoin httpmod http://www.finanzen.net/devisen/bitcoin-euro-kurs 10
attr Bitcoin readingsName_bitcoin bitcoin
attr Bitcoin readingsRegex_bitcoin text-sm-right\stext-nowrap">(\d.\d?\d\d)
stateFormat bitcoin€
Room HTTP MOD

Ethereum:

Code Auswählen Erweitern

define Ethereum httpmod http://www.finanzen.net/devisen/ethereum-euro-kurs 60
attr Ethereum readingsName_ethereum ethereum
attr Ethereum readingsRegex_ethereum text-sm-right\stext-nowrap">(\d\d\d.\d\d)
stateFormat ethereum€
Room HTTP MOD


Es wär natürlich absolut der Brüller wenn jemand in der Lage wär die entsprechenden Icons zu Basteln.

[hankyzoolander]

Hab mich mal an den Icons versucht.

Allerdings kein Plan warum das Bitcoin Icon nur grau dargestellt wird.
Wenn das jemand besser kann, nur zu.

Edit:.
Habe statt Füllung jetzt mal auf Kontur gestellt.
So wär das Ethereum Icon in Ordnung. Allerdings ist es grau statt schwarz.
In der attr ist @black hinterlegt.

[abc2006]

Hi,
das angegebene Beispiel(für Bitcoin) funktioniert bei mir nicht.
Es wird kein reading "bitcoin" erstellt ...

Grüße,
Stephan


edit: unnötig gewordenen Code, der vom Forum nicht erkannt wurde, gelöscht

[ComputerZOO]

Echt jetzt?

[abc2006]

Ja, sonst hätt ich nicht geschrieben...

Aber, ich habs gelöst (und umgebaut auf die neuen Attribute):

Code Auswählen Erweitern


define BTC HTTPMOD https://www.bitcoin.de/de/btceur/market 30
attr BTC reading01Name BTC
attr BTC reading01Regex id="ticker_price">(.*)<
attr BTC stateFormat BTC


edit: da war ich wohl zu schnell. Danke, dev0.

Grüße

[dev0]

Code Auswählen Erweitern


define BTC https://www.bitcoin.de/de/btceur/market 30


Das kann so nicht funktionieren.

[jostmario]

Hallo,

hat das zufällig auch jemand für diverse andere Kryptowährungen.
wie bekomme ich ethereum eingebaut.

Gruß Josty

[jostmario]

Hallo,

wie bekomme ich das € zeichen aus dem Reading gefiltert um ein Plot zu erstellen ?

Gruß Josty

[DeeSPe]

wie bekomme ich das € zeichen aus dem Reading gefiltert um ein Plot zu erstellen ?

Das würde ich über ein userReading lösen (und das dann loggen/plotten), da das Zahlenformat auch nicht konform ist.
Mit dem Beispiel von oben:

Code Auswählen Erweitern


define BTC HTTPMOD https://www.bitcoin.de/de/btceur/market 30
attr BTC reading01Name BTC
attr BTC reading01Regex id="ticker_price">(.*)<
attr BTC stateFormat BTC


Wäre das dann:

Code Auswählen Erweitern


attr BTC userReadings btc:BTC.* {my $v = ReadingsVal($name,"BTC",0);; $v =~ s/[\s\.€]//g;; $v =~ s/,/./;; $v}


Gruß
Dan

[viegener]

@jostmario: Du kannst es mal mit folgendem Regex bei BTC versuchen

Code Auswählen Erweitern

id="ticker_price">([0-9,.]+)[^0-9,.]+

Im state ist es ja durch das stateformat enthalten und aus dem reading BTC  lässt sich ein plot machen

[jostmario]

Hallo

in dem Userreading

Code Auswählen Erweitern

attr BTC userReadings btc:BTC.* {my $v = ReadingsVal($name,"BTC",0);; $v =~ s/[\s\.€]//g;; $v =~ s/,/./;; $v}
schreibt er jetzt ins Log

Code Auswählen Erweitern

2017-11-14_14:27:49 Bitcoin bitcoin: 5671.85
dadurch das es Punkt statt Komma ist kann er wohl auch nicht Plotten.

Gruß Josty

[DeeSPe]

Code Auswählen Erweitern

2017-11-14_14:27:49 Bitcoin bitcoin: 5671.85
dadurch das es Punkt statt Komma ist kann er wohl auch nicht Plotten.

Der Punkt ist aber das "richtige" Komma bei Zahlen in Perl.

Gruß
Dan

[jostmario]

Hallo,

hmm das Logfile sieht so aus

Code Auswählen Erweitern

2017-11-14_14:37:07 Bitcoin bitcoin: 5671.85
2017-11-14_14:37:12 Bitcoin bitcoin: 5671.85
2017-11-14_14:37:37 Bitcoin bitcoin: 5671.85
2017-11-14_14:37:41 Bitcoin bitcoin: 5671.85
2017-11-14_14:37:47 Bitcoin bitcoin: 5671.85
2017-11-14_14:37:53 Bitcoin bitcoin: 5671.85
2017-11-14_14:37:59 Bitcoin bitcoin: 5671.85
2017-11-14_14:38:15 Bitcoin bitcoin: 5671.85
2017-11-14_14:38:19 Bitcoin bitcoin: 5671.85
2017-11-14_14:38:26 Bitcoin bitcoin: 5671.85
2017-11-14_14:39:52 Bitcoin bitcoin: 5671.85
2017-11-14_14:39:58 Bitcoin bitcoin: 5671.85
2017-11-14_14:40:06 Bitcoin bitcoin: 1000
2017-11-14_14:40:13 Bitcoin bitcoin: 5671.85
2017-11-14_14:40:19 Bitcoin bitcoin: 5671.85
2017-11-14_14:40:26 Bitcoin bitcoin: 5671.85
2017-11-14_14:40:32 Bitcoin bitcoin: 5671.85
2017-11-14_14:40:38 Bitcoin bitcoin: 5671.85

und das Plot so wie im Anhang.
er plotet quasi nur meine selbst eingefügte 1000

Gruß Josty

[DeeSPe]

Dann probier mal ob das geht:

Code Auswählen Erweitern

attr BTC userReadings btc:BTC.* {my $v = ReadingsVal($name,"BTC",0);; $v =~ s/[\s\.€]//g;; $v}

Gruß
Dan

[DeeSPe]

So aber!

Code Auswählen Erweitern

attr BTC userReadings btc:BTC.* {my $v = ReadingsVal($name,"BTC",0);; $v =~ s/[\s\.€]//g;; $v =~ s/,/./;; round($v,2)}

Gruß
Dan