ich war auf der Suche nach ein Script was mir die Aktuellen Preise von Diesel von 2 Tankstellen in meinen Ort darstellt.
Habe dieses gefunden:
Code: Alles auswählen
!-----------------------------------------------------------------------------
! Basisdaten definieren
!-----------------------------------------------------------------------------
var apikey = "XXXXXXXX-XXXX-XXXX-XXXX-XXXXXXXXXXXX"; !API KEY EINTRAGEN
var tankid = "XXXXXXXX-XXXX-XXXX-XXXX-XXXXXXXXXXXX"; !TANKSTELLEN ID EINTRAGEN
!-----------------------------------------------------------------------------
! Werte von tankerkoenig holen
!-----------------------------------------------------------------------------
string tankenUrl = "https://creativecommons.tankerkoenig.de/json/detail.php";
string params = "-d id=" + tankid + " -d apikey=" + apikey;
string cmd = "LD_LIBRARY_PATH=/usr/local/addons/cuxd /usr/local/addons/cuxd/curl --trace trace.txt -k -X GET -H \"Content-Type:application/json\" -G " + params + " " + tankenUrl;
var stdout;
var posStart;
var posEnd;
var preis;
var substring;
var posValueStart;
var posValueEnd;
var posValue;
dom.GetObject("CUxD.CUX2801001:2.CMD_SETS").State(cmd);
dom.GetObject("CUxD.CUX2801001:2.CMD_QUERY_RET").State(1);
stdout = dom.GetObject("CUxD.CUX2801001:2.CMD_RETS").State();
!-----------------------------------------------------------------------------
! Preise aus Daten von tankerkoenig auslesen und in CCU Variablen schreiben
!-----------------------------------------------------------------------------
posStart = "{";
posEnd = "}";
substring = stdout.Substr(stdout.Find(posStart), stdout.Find(posEnd));
! --- Preis E10
posValueStart = "\"e10\":";
posValueEnd = ",";
posValue = substring.Find(posValueStart) + posValueStart.Length();
preis = substring.Substr(posValue, 6).StrValueByIndex(posValueEnd, 0) ;
dom.GetObject("EIGENE VARIABLE").Variable(preis.ToFloat()); !EIGENE VARIABLE EINTRAGEN
!-----------
! --- Preis E5
posValueStart = "\"e5\":";
posValueEnd = ",";
posValue = substring.Find(posValueStart) + posValueStart.Length();
preis = substring.Substr(posValue, 6).StrValueByIndex(posValueEnd, 0) ;
dom.GetObject("EIGENE VARIABLE").Variable(preis.ToFloat()); !EIGENE VARIABLE EINTRAGEN
!-----------
! --- Preis Diesel
posValueStart = "\"diesel\":";
posValueEnd = ",";
posValue = substring.Find(posValueStart) + posValueStart.Length();
preis = substring.Substr(posValue, 6).StrValueByIndex(posValueEnd, 0) ;
dom.GetObject("EIGENE VARIABLE").Variable(preis.ToFloat()); !EIGENE VARIABLE EINTRAGEN
!-----------
Hat einer eine Idee woran es liegen könnte?