Beiträge von kaennchen

Hallo zusammen,

nachdem ich es einfach nicht hinbekomme, die Reed-Kontakte meines Garagentors auszulesen, ohne dass die vorhandene (billig-)Hardware des Tors völlig abdreht, möchte ich die Entfernung des Schlittens auslesen, um so den Zustand abzufragen. Leider ist es etwas über 2 Meter, sodass der VL53L0X nicht infrage kommt. Also sollte ein VL53L1X her. Für den gibt es zwar Arduino-Treiber, aber (noch) keinen für Tasmota, der im Standard (oder gemu-Fork) einbindbar wäre. Hat sich schon jemand die Mühe gemacht, da etwas zu entwickeln, das ich nur nicht finden konnte? (Besonders wichtig wäre mir die ROI-Konfiguration) oder würde das eventuell angehen wollen?

LG

Kännchen

Ich Doofkopp. Danke!

Zitat von kaennchen

Bei mir jetzt auch merkwürdig. Ich hab die Zuweisung in >E mal als erstes Statement eingetragen und jetzt geht's. Zum Test wieder nach unten (in >E gibt's bei mir noch mehr) gesetzt und es geht immernoch. Ich achte mal drauf und falls mir noch was auffällt, Gebe ich Laut.

Danke für Deine Mühe.

LG

kaennchen

Ha!

Geht nicht. Also wieder nach oben und geht.

Hier wird es nicht übernommen (ich verwende anstatt IPAddress den FriendlyName)

>E
btn=pin[2]
if btn==1
tmr+=1
endif
hn=FriendlyName1

Und hier funktioniert es:

>E
hn=FriendlyName1
btn=pin[2]
if btn==1
tmr+=1
endif

Zitat von gemu2015

merkwürdig, habs gerade noch mal probiert. geht bei mir.

also was ist bei dir anders?

wird denn überhaupt ein Event generiert ?

guck mal ob es einen Event gibt.

Versuchs auch mal mit der Konsole mit IPAddress

>E

print Event

habe gerade noch eine Erweiterung eingebaut

#define USE_SCRIPT_STATUS

erlaubt auch die Abfrage aller Status Variablen

dazu gibt es jetzt eine >U Sektion

Alles anzeigen

Bei mir jetzt auch merkwürdig. Ich hab die Zuweisung in >E mal als erstes Statement eingetragen und jetzt geht's. Zum Test wieder nach unten (in >E gibt's bei mir noch mehr) gesetzt und es geht immernoch. Ich achte mal drauf und falls mir noch was auffällt, Gebe ich Laut.

Danke für Deine Mühe.

LG

kaennchen

Zitat von gemu2015

Hallo kaennchen

Sorry mein letzter post war ein Schnellschuss ohne es selbst auszuprobieren.

durch die Rekursionssperre kann man solche Werte nicht abrufen.

habe deshalb einen Befehl eingeführt mit dem man die Rekursionssperre umgehen kann.

=> normaler Kommandoaufruf mit Rekursionssperre

+> Kommandoaufruf ohne Rekursionssperre

-> Kommandoaufruf ohne Log und MQTT

mit +> kann man jetzt also Tasmota Kommandos aufrufen die ein RESULT Event erzeugen.

(aber Achtung darf niemals im Segment >E aufgerufen werden)

also

; Strings auf 30 Zeichen, sonst passt ip nicht rein

>D 30

ip=""

; Ip anfordern

>B

+>IPAddress

; E wird direkt von obigem Befehl rekursiv aufgerufen

>E

; ip Adress aus json kopieren

ip=IPAddress1

; und anzeigen

print %ip%

Alles anzeigen

Das hört sich super an, aber irgendwie funktioniert es mit der Ausgabe nicht so richtig:

Mein Code (Schnipsel):

>D 30
hn="*"

>B
+>IPAddress

>E
hn=IPAddress1
=>print %hn%

Und die Ausgabe:

10:04:15 Script: nv=21, tv=3, vns=114, ram=519
10:04:15  start
10:04:15 MQT: qiot/things/admin/gttaster1/RESULT = {"IPAddress1":"(IP unset) (192.168.142.190)"}
10:04:15  *

Zitat von gemu2015

>D

s1=0

s2=0

>B

; d8 gpio15 auf input mit pullup

spinm(15 2)

; d0 gpio16 auf input mit pullup

spinm(16 2)

>F

; rohen pin status abholen

s1=pin[15]

s2=pin[16]

; wenn sich status ändert ....

if chg[s1]>0

then

endif

if chg[s2]>0

then

endif

Alles anzeigen

Danke, funktioniert prima!

Sag mal, gibt es eigentlich eine "Geheimvariable" in der der Hostname oder die aktuelle IP enthalten ist?

Zitat von gemu2015

du kannst ja auch die switches per script erzeugen und abfragen?

Hört sich interessant an... wie würde ich das angehen?

Mist, ich hänge schon wieder...

Ich habe ein Relais (Relay1/D6) und möchte, dass es NICHT über meine zwei Schalter (Switch1/D8, Switch2/D0) gesteuert wird, weil es per Script geschaltet werden soll.

Ich habe nun (IMO) fast alles probiert, ButtonTopic auf "xyz" gesetzt usw. und so langsam glaube ich, dass das entkoppeln von Switch/Relais nur funktioniert, wenn der Wemos per MQTT verbunden ist.

Kann das jemand bestätigen?

Zitat von gemu2015

Hallo kaennchen

Das geht bei ganz kurzen Impulsen am besten über einen Counter. Definiere einen Counter in Tasmota und frage pc[x] ab in >E

Der counter ist flankengesteuert und funktioniert auch bei extrem kurzen Impulsen.

Selbst wenn du in >F den rohen pin abfragst würde es nicht reichen (alle 100ms)

Tasmota pollt den Pin schneller aber auch dort nur den Pegel wenn du einen Switch definierst. Auch dort können sehr kurze Impulse eventuell nicht erfasst werden.

also den Pin mit Counter 1 in Tasmota definieren und dann im Script

>D

v1=0

>E

v1=pc[1]

if chg[v1]>0

then

endif

Alles anzeigen

Perfekt, so funktioniert es. Ich musste es allerdings in >F packen, weil da kein Event generiert wird.

Danke!

Hallo zusammen,

ich hab gelesen, dass es so gut wie nichts gibt, was mit Rules möglich wäre, aber mit Scripting nicht. Vielleicht kann mir wer helfen, dann liegt es nämlich vermutlich an mir... ; )

Ich möchte einen Button-Press, der nur sehr kurz dauert, abfangen. Wenn ich das Ganze über die Zuweisung an eine Variable variable=sw[1] und onchg[variable] mache, ist der Wert nicht mehr vorhanden (weil der Druck auf den Button - in diesem Fall ein Reed-Kontakt - zu kurz dauert).

In Rules wäre das dann vermutlich "on buttonX#state"; eine HA-Lösung habe ich nicht, also kann ich das auch dort nicht per MQTT verarbeiten. Aber im Scripting müsste das doch irgendwie gehen. Vielleicht in >E ? Wenn ja, wie?

Liebe Grüße,

Kännchen

Eine Frage hätte ich noch... wenn ich Werte instant abfragen möchte, wie komme ich dann an die Daten ran?

Mein Blitzwolf hat z.B. (bei den Rules) ein on "ENERGY#Power" - bekomme ich das (ausser, wenn ich auf die Teleperiod warten kann) irgendwie in eine Variable rein?

pwr=ENERGY#Power geht leider nicht.

Danke & LG Kaennchen

Zitat von gemu2015

da es nur extrem wenig platz für strings gibt und die meisten User kaum strings brauchen habe ich mich bisher mit Stringfunktionen zurückgehalten.

habe deine Funktionen aber eingebaut. wir müssen aber aufpassen dass die Codegrösse nicht zu stark anwächst.

bitte gut testen und Bescheid sagen ob alles geht dann mache ich eine pr.

Erste Sahne! Das funktioniert durchweg asterein! Vielen Dank!

Danke, probiere ich gleich mal aus.

Ich möchte auch gerne was zurückgeben, daher habe ich (mit meinen äußerst beschränkten C-Kenntnissen) folgendes gebaut:

        if (!strncmp(vname,"sl(",3)) {
          lp+=3;
          char str[SCRIPT_MAXSSIZE];
          lp=GetStringResult(lp,OPER_EQU,str,0);
          lp++;
          len=0;
          fvar=strlen(str);
          goto exit;
        }    
        if (!strncmp(vname,"sb(",3)) {
          lp+=3;
          char str[SCRIPT_MAXSSIZE];
          lp=GetStringResult(lp,OPER_EQU,str,0);
          SCRIPT_SKIP_SPACES
          float fvar1;
          lp=GetNumericResult(lp,OPER_EQU,&fvar1,0);
          SCRIPT_SKIP_SPACES
          float fvar2;
          lp=GetNumericResult(lp,OPER_EQU,&fvar2,0);
          lp++;
          len=0;
          if (fvar1<0) {
            fvar1=strlen(str)+fvar1;
          }
          memcpy(sp,&str[(uint8_t)fvar1],(uint8_t)fvar2);
          sp[(uint8_t)fvar2] = '\0';
          goto strexit;
        }

Als Doku:

sb(svar s n) = substring - retrieve a substring of n characters of svar starting at s. S may be negative.
sl(svar) = string length - retrieve length of svar 

Passt das auch rein?

LG Kaennchen

Hallo Gerhard,

ich möchte Code dynamisch ausführen (den ich per WebSend von einam anderen ESP bekommen habe)

Generell möchte ich den Inhalt einer mir noch nicht bekannten Variable, deren Name ich als Text übermittelt bekomme, einer lokalen Variable zuweisen.

(Pseudocode zur Verdeutlichung)
>D
localvar=55
sendvar=0
tt=""
vonextern=""

>B
vonextern="localvar"
tt="sendvar="+vonextern
=>print tt:%tt%
%tt%
;(sendvar sollte jetzt den Wert 55 haben)
=> print sendvar:A:%sendvar%
tt="sendvar=7"
%tt%
;(sendvar sollte jetzt den Wert 7 haben)
=> print sendvar:B:%sendvar%
sendvar=localvar
=> print sendvar:C:%sendvar%
=#sendtoextern(sendvar)

Stattdessen:

10:07:24  tt:sendvar=localvar
10:07:24  sendvar:A:0.00
10:07:24  sendvar:B:0.00
10:07:24  sendvar:C:55.00

Wird mein Ansinnen dadurch etwas klarer?

Der Schlüssel ist das "%tt%" das m.E. nicht ausgewertet wird.

LG Kaennchen

Hallo Gerhard,

Perfekt! Die SUBs kann ich jetzt auch von der Konsole aus aufrufen.

Kannst du vielleicht mit der dynamischen Code-Ausführung auch was zaubern? (mein vorheriger Post)

LG Kaennchen

Wenn ich gerade dabei bin

Mir ist aufgefallen, dass SUBs wohl nur innerhalb des Skriptes gelten, Variablen aber auch global, von der Konsole aus zugegriffen werden können.

Lässt sich das anpassen? So dass ich eine SUB auch von der Konsole aus (und natürlich per Web/MQTT call) aufrufen kann?

Danke & LG Kaennchen

Zitat von eth

Ich würde mal sagen jein. Beides hat ja erstmal nichts miteinander zu tun. Wenn Du was subscribest wird das Datum vom Broker zugestellt. Der Broker muss das Datum natürlich vorher bekommen haben, durch ein publish. Das wird ja vom Tasmota für die "eingebauten" Sensoren von selbst erledigt. Hier gab es auch das Problemchen, dass empfangene Texte nicht richtig umgesetzt wurden.

Websend braucht gar kein MQTT. Du könntest vom Sender ein Datum einfach mit

websend [192.168.x.xxx] script >varimempfänger=%varimsender%

in die Variable in einem Script übertragen. (Oder andere Kommandos ausführen, wie Du es mit websend [192.168.142.150]/cm?cmnd=status%208 ja gemacht hast. Das Ergebnis hier ist, dass die Werte der lokales Sensoren an den Broker geschickt werden.)

Das fette ist letztendlich ein Scriptbefehl, den Du auch auf der Konsole eintippen kannst (musst natürlich %varimsender% durch einen Wert substituieren).

Ob das ankommt usw. ist natürlich nicht klar.

Zu den Quellen: das Problemchen ist in der xddx_10_scripter.ino von heute morgen gelöst. Zur Not kopierst Du Dir die in Deine lokale Installation (und hoffst dass der Compiler das gut findet..).

Alles anzeigen

Das hatte ich schon probiert, ich möchte aber die Variable vom zweiten ESP holen, nicht dass mir der zweite ESP sie pusht.

Aktuell versuche ich das zu realisieren, indem ich dem ersten ESP sage, er soll den zweiten anweisen, ihm die Info zu schicken.

Ich hänge gerade daran fest, dass ich Code nicht dynamisch ausführen kann.

Beispielconfig:

>D 50
tt=""
gtst=11


>B
tt="print test1:%gtst%"
=>print tt:%tt%
=>%tt%
=>print test2:%gtst%

(ich poste gerne den kompletten Code, sobald ich es hinbekommen habe)

Anstatt dem Erwarteten kommt allerdings:

13:21:34  tt:print test1:%gtst%
13:21:34  test1:%gtst%
13:21:34  test2:11.00

Mache ich was falsch oder liegt der Fehler im System?

LG Kaennchen

Zitat von eth

Hallo Kaennchen,

ich würde zunächst mal das Subscribe in den >S Abschnitt nehmen. Boote mal das Gerät neu und schaue Dir die Konsole an: das Subscribe wird schon ausgelöst, wenn noch gar keine MQTT Verbindung steht. Wird dann auch immer beim Reconnect ausgelöst.

>S

if mqttc>0 (passiert nur beim Connect)

then

=>Subscribe....

endif

Gemüse meint die DEV-Version vom arendst/tasmota, da ist die Änderung drin, die neben den Numerischen Werten nun auch die Textwerte zurückliefert.

Viel Spass!

Alles anzeigen

Danke für die Infos. Ich nutze MQTT ja (eignetlich) nicht. Ich möchte nur das Ergebnis (genauer: die Antwort) eines WebSend auswerten. Trifft das dann auch noch zu?

Zitat von gemu2015

der aktuelle branch ist universal7 (aber den display branch hast du sicher nicht genommen, der hatte noch keine scripts)

leider unterstützt aber der subscribe nur einen Key mit einem Punkt. (den Teil hatte ich aus rules übernommen)

Danke für die schnelle Antwort, jetzt bin ich komplett verwirrt

Hier hab ich die Sources her: https://github.com/gemu2015/Sonoff-Tasmota/tree/displays

(benötige den ST1106-Treiber, deshalb nutze ich deinen Fork)

Generic Module
Sonoff
Program Version	6.6.0.3(display)
Build Date & Time	2019-08-16T12:31:38
Core/SDK Version	2_5_2/2.2.2-dev(c0eb301)

Der universal7 kompiliert bei mir nicht für den ESP-01 mit irgendwelchen Fehlern - kann gleich nochmal nachsehen.

Kann ich deinen Fork irgendwie mit den Fixes in Theos Tree zusammenbringen? Oder hast Du das ohnehin geplant?

Ich hab's mit dem Displays Branch in Deinem Rep probiert (oder meintest Du eine andere Source?)

Seltsam ist, dass auch der numerische Wert nicht kommt:

11:37:12 HTP: Edit script
11:37:14 Script: performs "subscribe TU, stat/sonoff/RESULT,StatusSNS.TempUnit"
11:37:14 SRC: Rule
11:37:14 CMD: Group 0, Index 1, Command "SUBSCRIBE", Data "TU, stat/sonoff/RESULT,StatusSNS.TempUnit"
11:37:14 MQT: Unsubscribe from stat/sonoff/RESULT/#
11:37:14 MQT: Subscribe to stat/sonoff/RESULT/#
11:37:14 RSL: stat/sonoff/RESULT = {"Subscribe":"TU,stat/sonoff/RESULT/#,StatusSNS.TempUnit"}
11:37:14 Script: performs "subscribe TMP, stat/sonoff/RESULT,StatusSNS.SI7021.Temperature"
11:37:14 SRC: Rule
11:37:14 CMD: Group 0, Index 1, Command "SUBSCRIBE", Data "TMP, stat/sonoff/RESULT,StatusSNS.SI7021.Temperature"
11:37:14 MQT: Unsubscribe from stat/sonoff/RESULT/#
11:37:14 MQT: Subscribe to stat/sonoff/RESULT/#
11:37:14 RSL: stat/sonoff/RESULT = {"Subscribe":"TMP,stat/sonoff/RESULT/#,StatusSNS.SI7021.Temperature"}

11:37:52 CMD: websend [192.168.142.150]/cm?cmnd=status%208
11:37:52 SRC: WebConsole from 192.168.142.153
11:37:52 CMD: Group 0, Index 1, Command "WEBSEND", Data "[192.168.142.150]/cm?cmnd=status%208"
11:37:52 RSL: stat/sonoff/RESULT = {"StatusSNS":{"Time":"2019-08-16T11:37:52","Epoch":1565951872,"SI7021":{"Temperature":22.0,"Humidity":59.1},"TempUnit":"C"}}
11:37:52 RSL: stat/sonoff/RESULT = {"WebSend":"Done"}
11:37:52  e:0.00::

>D
TU=""
TMP=0

>B
=>subscribe TU, stat/%topic%/RESULT,StatusSNS.TempUnit
=>subscribe TMP, stat/%topic%/RESULT,StatusSNS.SI7021.Temperature

>E
=>print e:%TMP%:%TU%: