Belə sistem eHouse üçün öz idarəetmə alqoritmlərinin yaradılması kimi Home Automation

Tikinti Management eHouse öz overlay (ərizə olan eHouse sistemi server PC çalışan) yaratmaq imkan verir , asan Delphi üçün proqram EhouseLogAnalizer şablon istifadə edərək, öz fərdi proqramlaşdırma alqoritmlər yaratmaq edir . Bu proqram müzakirə olunub ” Qeydlər Analyzer Ağıllı ev eHouse ” Sistem eHouse funksionallığı uzadılması Home Automation .
Bu gün sabitlik ilə ; s PC , və Windows də KillExec proqram tərəfindən nəzarət ağıllı ev idarə proqram eHouse sorunsuz və fasiləsiz iş ola bilər . exe .
Tətbiqi səhv dayandırılması halda bağlıdır istifadəçi müdaxilə sistemi olmadan yenidən başladı .
Windows və sistem eHouse davam qurmaq düzgün çox ay üçün PC ağıllı ev proqram iş bilər .
Müvafiq yazılı proqram akıllı ev nəzarət sistemi ardıcıl test eHouse dəyişən ölçmələr (tələb və zəruri hallarda müvafiq nəzarət hadisələr göndərmək – vaxt) .
Proqram yaratmaq üçün öz idarəetmə alqoritmlərinin yazarkən – cəfəng dəfələrlə eyni hadisə göndərmək deyil Tədbir başa təsdiq bayraqları: məsələn , artıq bağlıdır ki, pərdələri yaxın hər 2 saniyə .
Proqramlar neçə Timers təyin edilə bilər:
Ilk – Belə məlumat sürücü 10 saniyə yenilənməsi kimi aparıcı .
Başqa – dəyərləri ilə â € <â € <fenomen dəyişiklikləri asılı olaraq:
məsələn, . pərdələri nəzarət , açıq temperatur və yüngül səviyyəsi tenteler bir neçə dəqiqə ola bilər .
Sürücü nəzarət pərdələri halda , qapıları , markiz , windows , s . qamış Ağıllı ev eHouse nəzarətçiləri digital giriş bağlı istifadə edilə bilər , onların yaxın dəlil və input data RoomManager dövlət nəzarət əməliyyatları etmək , Hansı bayraq Sofware daha yaxşı və doğru danışan kim edir , dəyəri sürücü görə proqram hataları və ya səhvlər nəticəsində (deyil bağlanması ilə kimi səhv müəyyən edilə bilər , mexaniki , blok , s . ) .

Nümunələr (fasilələrlə bir neçə saniyə fəaliyyət təkrar loops ilə) tətbiq eHouseLogAnalizer ildə nəzarətçiləri data istifadə edərək, .

/ / Nəzarətçi qazan HeatManagera dən data başlamaq
TzewnetrznaPN: = HADC [HM_ZEWNPN] ; / / Xarici Temperatur Şimali
TemperaturaGWC: = HADC [HM_GWC] ; GWC üçün / / Temperatur – Bu recuperator əsas qurğu
TemperaturaKominekPlaszcz: = HADC [HM_KOM1] ; Baca 1 sensoru olan su / / temperaturu
TemperaturaKominekKonvekcja: = HADC [HM_KOMKONV] ; / / Temperatur konveksiya fireplace – Şömine faktiki iş baca ilə sensoru
TemperaturaKominekPlaszcz: = HADC [HM_KOM2] ; / / Yanğın Özüllər temperatur sensor 2 – (Backup)
TemperaturaWewnÄ ™ trzna: = HADC [HM_TWEWN] ; / / Daxili otaq temperaturu – CO üçün
TemperaturaSolar: = HADC [HM_SOLAR] ; / / Temperatur günəş kollektor boru zirvəsi (isti)
TzewnetrznaPD: = HADC [HM_ZEWNPD] ; / / Outside temperatur günorta
Tkociol: = HADC [HM_KOC] ; / / Kazan boru temperatur zirvəsi (isti)
TemperaturaBuforaCODol: = HADC [HM_BANDOL] ; / / Temperatur CO / isti su tank aşağı
TemperaturaRecuIn: = HADC [HM_REQIN] ; / / Input recuperator temperatur təmiz hava
TemperaturaRecuOut: = HADC [HM_REQOUT] ; / / Çıxış temperatur recuperator ev
TemperaturaZaworTrojDrozny: = HADC [HM_NAG] ; / / Temperatur üç nəzarət – belə bir soba kimi və ya radiator yol valve
TemperaturaRecuWyciog: = HADC [HM_REQWYC] ; Ev çirkli hava / / Extract recuperator temperatur
TemperaturaBuforaCOGora: = HADC [HM_BANGORA] ; / / Temperatur istilik / isti su tank qədər
TemperaturaBuforaCOSrodek: = HADC [HM_BANSRO] ; / / Temperatur istilik / isti su tank mərkəzi
Sensorlar olan RoomManager üçün / / Ölçümleri
TzewWschod: = RMGetTempNr (get_index_rm ( ‘ 55 – 2 ‘ ) , 8) ; RM No / / Outdoor Temperatur Sensor şərq . Ünvan 55 8 – 2
TzewZachod: = RMGetTempNr (get_index_rm ( ‘ 55 – 3 ‘ ) , 8) ; No ilə Qərb xaricində / / Temperatur sensoru . Ünvanı 55-RM 8 – 3
TzewPolnoc: = RMGetTempNr (get_index_rm ( ‘ 55 – 4 ‘ ) , 8) ; Şimali xaricində / / Temperatur sensor No . Ünvanı 55-RM 8 – 4
TzewPoludnie: = RMGetTempNr (get_index_rm ( ‘ 55 – 5 ‘ ) , 8) ; Cənubi xaricində / / Temperatur sensor No . Ünvanı 55-RM 8 – 5
LNaslonecznienieWschod: = RMGetInvPercentNr (get_index_rm ( ‘ 55 – 2 ‘ ) , 1) ; Sensor mühit yüngül şərq / / səviyyəsi yoxdur . Ünvanı 55-RM 1 – 2
LNaslonecznienieZachod: = RMGetInvPercentNr (get_index_rm ( ‘ 55 – 3 ‘ ) , 1) ; / / Ambient yüngül səviyyəli sensor Qərb yoxdur . Ünvanı 55-RM 1 – 3
LNaslonecznieniePolnoc: = RMGetInvPercentNr (get_index_rm ( ‘ 55 – 4 ‘ ) , 1) ; / / Ambient yüngül səviyyəli sensor Şimali yoxdur . Ünvanı 55-RM 1 – 4
LNaslonecznieniePoludnie: = RMGetInvPercentNr (get_index_rm ( ‘ 55 – 5 ‘ ) , 1) ; / / Ambient yüngül səviyyəli sensor Cənubi No . Ünvanı 55-RM 1 – 5
SilaWiatru: =: = RMGetPercentNr (get_index_rm ( ‘ 55 – 5 ‘ ) , 7) ; / / Ambient yüngül səviyyəli sensor Cənubi No . Ünvanı 55-RM 1 – 5
Nəzarət alqoritmlər ixtiyari ola bilər və parametrləri və ölçmə hər hansı günə qədər müəyyən fiziki miqdarda istifadə və sensorlar yüklü ola bilər .
Belə yavaş təkrar timer olan / / alqoritmi . hər 10 dəqiqə
Enerji / / Misal – roller Kepenk ve tenteler (günəş görə əhəmiyyətli qənaət nəticəsində 'səmərəli nəzarət ; s şüalarının qış evi qızdırmaq üçün) və pulsuz günəş enerjisi akkumulyasiya
Günəş işığı binasının şərq tərəfində oda / / Azad və ekoloji istilik
sonra / / (RoletyWschod deyil) əgər onlar artıq açıq olduqda
if (LNaslonecznienieWschod> ; 80) sonra / / Əgər günəş – empirically dəyəri yoxlamaq
əgər (Ay < ; ; 5) və ay> ; 8) sonra / / əgər sentyabr aprel ayı
if (TzewWschod> ; 0 C-dən 0) günəş sonra / / temperatur sensor isidilmiş ali
əgər (Time> ; 8) və (Time < ; ; 11) sonra / / səhər Günəşi şərqdən birbaşa işıq saçır zaman
başlamaq
RoletyWschod: = true ; / / Flag panjurlar Şərq açmaq
OtworzRoletyWschod ; Sistem sürücüləri eHouse üçün hadisə göndərilməsi / / Function
ZamknijMarkizyWschod ; Günəşin çox aşağı olduğundan / / bir şey verməyin
son ;
Binanın cənub tərəfində oda / / Azad və ekoloji istilik , günəş ' ; s şüalar
sonra / / (heç RoletyPoludnie) əgər onlar artıq açıq olduqda
if (LNaslonecznieniePolodnie> ; 80) sonra / / Əgər günəş – empirically dəyəri yoxlamaq
əgər (Ay < ; ; 5) və ay> ; 8) sonra / / əgər sentyabr aprel ayı
if (TzewPoludnie> ; 0 C-dən 0) günəş sonra / / temperatur sensor isidilmiş ali
if (saat> ; 10) və (Time < ; ; 14) sonra / / səhər günəş cənub birbaşa işıq saçır zaman
başlamaq
RoletyPoludnie: = true ; / / Bu panjurlar cənub bayrağı açın
OtworzRoletyPolodnie ; Sistem sürücüləri eHouse üçün hadisə göndərilməsi / / Function
ZamknijMarkizyPolodnie ; Günəşin çox aşağı olduğundan / / bir şey verməyin
son ;
Binanın qərb tərəfində oda / / Azad və ekoloji istilik , günəş ' ; s şüalar
sonra / / (RoletyZachod deyil) əgər onlar artıq açıq olduqda
if (LNaslonecznienieZachod> ; 80) sonra / / Əgər günəş – empirically dəyəri yoxlamaq
əgər (Ay < ; ; 5) və ay> ; 8) sonra / / əgər sentyabr aprel ayı
if (TzewZachod> ; 0 C-dən 0) günəş sonra / / temperatur sensor isidilmiş ali
if (saat> ; 14) və (Time < ; ; Günəşin qərbdən birbaşa işıq saçır zaman səhər sonra / / 18)
başlamaq
RoletyZachod: = true ; / / Flag panjurlar Qərb açmaq
OtworzRoletyZachod ; Sistem sürücüləri eHouse üçün hadisə göndərilməsi / / Function
ZamknijMarkizyZachod ; Günəşin çox aşağı olduğundan / / bir şey verməyin
son ;
/ / Ekologiya və İqtisadi yayda günəş işığı ilə pulsuz yer istilik təsir məhdudlaşdırılması – nəzarət tenteler
Tent / / Control – günəş radiasiyası azaltmaq tenteler açmaq və yay evi istilik – şərq
sonra / / (heç MarkizaWschodA) əgər onlar artıq açıq olduqda
if (SilaWiatru < ; ; 5) sonra / / əgər heç bir külək
(əgər (Ay> ; 4) və (Ay < ; ; 9)) sonra / / yay aylarında
if (LNaslonecznienieWschod> ; Günəş işıq saçır 50) sonra / / əgər
əgər (vaxt> ; 6) və (Time < ; ; 12) sonra / / əgər səhər saat
if (TwewnWschodA> ; Oda çox isti 25) sonra / / əgər
başlamaq
MarkizaWschodA: = true ; Açıq otaq A kölgəlik / / Bayrağı
OtworzMarkizeWchodA ; / / Sistem sürücü eHouse üçün hadisə göndər
son ;
/ / Eynilə , Farklı bir dəyər bir dəyişən şərq fasad digər sahələrdə tenteler müstəqil nəzarət üçün kodu kopya edə bilər
Tent / / Control – günəş radiasiyası azaltmaq tenteler açmaq və yay günorta evin istilik
sonra / / (heç MarkizaPoludnieA) əgər onlar artıq açıq olduqda
if (SilaWiatru < ; ; 5) sonra / / əgər heç bir külək
(əgər (Ay> ; 4) və (Ay < ; ; 9)) sonra / / yay aylarında
if (LNaslonecznieniePoludnie> ; Günəş işıq saçır 50) sonra / / əgər
əgər (Time> ; 8) və (Time < ; ; 18) sonra / / sərt günəş cənubdan fəaliyyət saat olan əgər
if (TwewnPoludnieA> ; Oda çox isti 25) sonra / / əgər
başlamaq
MarkizaPoludnieA: = true ; Açıq otaq A kölgəlik / / Bayrağı
OtworzMarkizePoludnieA ; / / Sistem sürücü eHouse üçün hadisə göndər
son ;
/ / Eynilə , siz fərqli bir dəyəri dəyişdirilməsi Cənubi yükseklik digər sahələrdə tenteler müstəqil nəzarət üçün kodu kopya edə bilər
Tent / / Control – açıq tenteler günəş radiasiya azaltmaq və qərb tərəfində yay ev istilik üçün
sonra / / (heç MarkizaZachodA) əgər onlar artıq açıq olduqda
if (SilaWiatru < ; ; 5) sonra / / əgər heç bir külək
(əgər (Ay> ; 4) və (Ay < ; ; 9)) sonra / / yay aylarında
if (LNaslonecznieniePoludnie> ; Günəş işıq saçır 50) sonra / / əgər
əgər (Time> ; 8) və (Time < ; ; 18) sonra / / sərt günəş cənubdan fəaliyyət saat olan əgər
if (TwewnZachodA> ; Oda çox isti 25) sonra / / əgər
başlamaq
MarkizaZachodA: = true ; Açıq otaq A kölgəlik / / Bayrağı
OtworzMarkizeZachodA ; / / Sistem sürücü eHouse üçün hadisə göndər
son ;
/ / Eynilə , Farklı bir dəyər bir dəyişən qərb fasad digər sahələrdə tenteler müstəqil nəzarət üçün kodu kopya edə bilər
/ / Yaxın Marquis çox külək edir
if (LNaslonecznieniePoludnie < ; ; 20) sonra / / günəşin parlaq deyil əgər (empirically Yağış olması və yağış seçilmiş)
if (MarkizaPoludnieA) sonra / / əgər açıq kölgəlik
başlamaq
MarkizaPoludnieA: = false ; / / Bayrağı Change
ZamknijMarkizePoludnieA ; / / Bu mikroprosessor nəzarətçiləri eHouse hadisələr göndər
son ;
if (LNaslonecznienieZachod < ; ; 20) sonra / / günəşin parlaq deyil əgər (empirically seçilmiş)
if (MarkizaZachodA) sonra / / əgər açıq kölgəlik
başlamaq
MarkizaZachodA: = false ; / / Bayrağı Change
ZamknijMarkizeZachodA ; / / Bu mikroprosessor nəzarətçiləri eHouse hadisələr göndər
son ;
if (LNaslonecznienieWschod < ; ; 20) sonra / / günəşin parlaq deyil əgər (empirically seçilmiş)
if (MarkizaWschodA) sonra / / əgər açıq kölgəlik
başlamaq
MarkizaWschodA: = false ; / / Bayrağı Change
ZamknijMarkizeWschodA ; / / Bu mikroprosessor nəzarətçiləri eHouse hadisələr göndər
son ;
if (SilaWiatru> ; 5) sonra / / Wind olan pərdələri yaxın
bir açıq əgər (MarkizaZachodA ya MarkizaWschodA ya MarkizaPoludnieA) sonra / / əgər
başlamaq
ZamknijWszystkieMarkizy ; / / Sistem sürücü eHouse üçün hadisə göndər
MarkizaZachodA: = false ;
MarkizaWschodA: = false ;
MarkizaPoludnieA: = false ;
son ;
/ / Yekun panjurlar avtomatik nəzarət temperatur pəncərə xaricində məhdudlaşdırıcı açılış vasitəsilə xaricində qurtarmaq üçün istilik üçün çox aşağı
/ / Cənubi – cənub yükseklik üçün günəş və soyuq olmaması da panjurlar bağlanması
(RoletyPoludnie) sonra / / açıq olduqda, əgər
if (TzewPoludnie < – 10) then // temperature sensor smaller than the southern – 10C indicating the large cold and lack of sun heating the sensor on the south side

başlamaq
RoletyPoludnie: = false ; / / Bu panjurlar cənub bayrağı açın
ZamknijRoletyPolodnie ; Sistem sürücüləri eHouse üçün hadisə göndərilməsi / / Function
/ / ZamknijMarkizyPolodnie ; Günəşin çox aşağı olduğundan / / bir şey verməyin
son ;
Şərq fasad üçün soyuq və günəş olmaması da / / Ev Şərq bağlanması pərdələri
(RoletyWschod) sonra / / açıq olduqda, əgər
if (TzewWschod < – 10) then // temperature sensor lower than the Eastern – 10C indicating the large cold and lack of sun heating the sensor on the east side

başlamaq
RoletyWschod: = false ; / / Flag panjurlar Şərq açmaq
ZamknijRoletyWschod ; Sistem sürücüləri eHouse üçün hadisə göndərilməsi / / Function
/ / ZamknijMarkizyWschod ; Günəşin çox aşağı olduğundan / / bir şey verməyin
son ;
/ / Qərb yükseklik üçün pərdələri qərb tərəfində günəş və soyuq olmaması yaxın
(RoletyZachod) sonra / / açıq olduqda, əgər
if (TzewZachod < – 10) then // temperature sensor below the western – 10C indicating the large cold and lack of sun heating the sensor on the west side

başlamaq
RoletyZachod: = false ; / / Flag panjurlar Qərb açmaq
ZamknijRoletyZachod ; Sistem sürücüləri eHouse üçün hadisə göndərilməsi / / Function
/ / ZamknijMarkizyZachod ; Günəşin çox aşağı olduğundan / / bir şey verməyin
son ;