Diskuse Elektrika.cz

HYBRIDNÍ zóna => Technická podpora výrobce TECO Kolín radí odborníkům => Téma založeno: Slavomír Skopalík 20.11.2012, 19:54



Název: Byl by zajem o utilitku pro sber dat z Foxtrotu?
Přispěvatel: Slavomír Skopalík 20.11.2012, 19:54
Pro sve skourome ucely jsem si dodelal do teto aplikace cteni dat z FOXTROT PLC:

http://www.elektlabs.cz/produkts/DataCross/

V soucasne dobe je pro me ucely zcela funkcni, nicmene pro verejnost by to chtelo jeste trochu dopracovat ;).

Predpokladam, ze do nejakych 50 Tagu by byla urcite zdarma.
Bohuzel jsem neprisel na to, jak prilozit soubory, takze zatim bez obrazku :(.

Utilitka si stahuje pub soubor primo z webu PLC (viz: http://diskuse.elektrika.cz/index.php/topic,23538.0.html ).

Byl by o tuto aplikaci zajem?
Pripadne, pokud mate jakekoliv namety, pripominky a/nebo dotazy budu rad.

Pro ukladani dat mame Firebird SQL databazi + www rozhrani na prohlizeni (puvodne na monitorovani stroju).
Nicmene to zatim neni uplne pripraveno na zverejneni.

V aplikaci je integrovan Pascal Script pomoci nehoz si lze delat s daty temer cokoliv.

Ukazka kodu:

Procedure LogTopeni(idDevice:integer;TagName:string; Lo, Hi, Eps:double);
begin
  Log(TagName+':'+Zapotoci.AsString[TagName]);
  DevDataSignal(idDevice,-1,TagName,'°C', 'Topení',0,
    Zapotoci.AsFloat[TagName],Lo,Nan,Hi,1,Eps,'0.0',TagName);
end;

procedure LogRoomInfo(idDevice:integer);
begin
end;

begin
  LogTopeni(10,'OpenTherm.Cont rol_SetPoint',0,80,0.5);
  LogTopeni(10,'UT_Zpatecka',5,70,0.5);  
  LogTopeni(10,'Boiler_T',5,90,0.5);
  LogTopeni(10,'Outdoor_T', -35,40,0.5);  
  LogTopeni(11,'Acu_T1',2,99,0.1);
  LogTopeni(11,'Acu_T2',2,99,0.1);
  LogTopeni(11,'Acu_T3',2,99,0.1);
  LogTopeni(11,'Acu_T4',2,99,0.1);  
  LogTopeni(11,'Solar_BSK4E', -35,120,0.5);
  LogTopeni(11,'Solar_BSK4W', -35,120,0.5);
  LogTopeni(11,'Solar_BSK8', -35,120,0.5);
  LogRoomInfo(105);
  LogRoomInfo(106);
  LogRoomInfo(107);
  LogRoomInfo(109);
  LogRoomInfo(112);
  LogRoomInfo(113);
  LogRoomInfo(116);
  LogRoomInfo(201);
  LogRoomInfo(202);
  LogRoomInfo(203);
  LogRoomInfo(204);
  LogRoomInfo(205);
  LogRoomInfo(206);
  
end.


Název: Re: Byl by zajem o utilitku pro sber dat z Foxtrotu?
Přispěvatel: Ondrej Buc 28.02.2021, 00:50
 
rieším podobnú problematiku. Mohol by som poprosiť viac info?
Ďakujem