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.