Automation Kay tankou kreye algoritm pwòp kontwòl ou pou eHouse sistèm

Jesyon Konstriksyon eHouse pèmèt ou kreye kouvri pwòp ou a (aplikasyon kouri sou yon PC ki sèvè sistèm eHouse) , ki fè li fasil yo kreye pwòp algoritm pwogramasyon ou endividyèl lè l sèvi avèk modèl lojisyèl EhouseLogAnalizer nou an pou Delphi . Sa a te lojisyèl yo te diskite nan ” Mòso bwa Analyzer entelijan lakay eHouse ” yon ekstansyon nan fonctionnalités a nan eHouse nan sistèm Automation Kay .
Avèk estabilite an nan jounen jodi a ' ; s PC yo , ak fenèt yo ka san pwoblèm ak kontinye operasyon nan eHouse nan jesyon lakay entelijan lojisyèl tou siveye ke aplikasyon an KillExec . ègzekutabl .
Nan ka sispansyon nan erè a aplikasyon an fèmen e te kòmanse ankò san sistèm entèvansyon itilizatè .
Avèk bon mete kanpe nan fenèt ak sistèm kontinwite eHouse ka travay entelijan lojisyèl kay sou PC a pou plizyè mwa .
Ekri bon entelijan lakay lojisyèl sistèm kontwòl mande pou sekans tès eHouse chanje mezi (epi voye evènman kontwòl ki apwopriye si sa nesesè – tan) .
Lè w ap ekri algoritm pwòp kontwòl ou yo kreye lojisyèl – drapo ateste fini an nan evènman an ensanse pa repete voye evènman an menm: pou egzanp , chak segonn 2 a fèmen pèsyèn yo ki deja fèmen .
Aplikasyon yo kapab asiyen nan minutri plizyè:
Premye – Ki mennen tankou mete ajou chofè a done 10 segonn .
Yon lòt – ak valè â € <â € <depann sou variabilité nan fenomèn a:
egzanp . pou kontwòl sou blinds , tant pou tanperati deyò ak nivo limyè pouvwa gen yon kèk minit .
Nan ka jalouzi kontwòl kondwi , pòtay , markiz , fenèt , elatriye . yo ka itilize pye wozo ki konekte nan entrain yo dijital eHouse contrôleur lakay entelijan , prèv ki montre fèmen yo epi yo fè operasyon kontwòl sou eta a nan rantre done RoomManager , ki se pi bon ak pi egzat pase drapo Sofware , ki gen valè ka mete mal kòm yon konsekans pinèz lojisyèl oswa erè akòz kondwi a (pa fèmen nan la , mekanik , bloke , elatriye . ) .

Men kèk egzanp lè l sèvi avèk done ki sòti nan contrôleur nan eHouseLogAnalizer aplikasyon an (nan pasan repetitif opere nan entèval chak kèk segond) .

/ / Inisyalize done ki nan HeatManagera nan kontwolè kasrol
TzewnetrznaPN: = HADC [HM_ZEWNPN] ; / / Ekstèn Tanperati Nò
TemperaturaGWC: = HADC [HM_GWC] ; / / Tanperati pou gw – Ground chalè echanjeur pou récupérateurs la
TemperaturaKominekPlaszcz: = HADC [HM_KOM1] ; / / Tanperati a nan dlo a nan Capteur a chemine 1
TemperaturaKominekKonvekcja: = HADC [HM_KOMKONV] ; / / Tanperati konveksyon chemine – Capteur a chemine a nan travay aktyèl la nan chemine a
TemperaturaKominekPlaszcz: = HADC [HM_KOM2] ; / / Dlo jacket Ponpye tanperati Capteur 2 – (Skour)
TemperaturaWewnÄ ™ trzna: = HADC [HM_TWEWN] ; / / Entèn chanm tanperati – pou CO
TemperaturaSolar: = HADC [HM_SOLAR] ; / / Tanperati solè pèseptè tiyo somè (cho)
TzewnetrznaPD: = HADC [HM_ZEWNPD] ; / / Deyò tanperati midi
Tkociol: = HADC [HM_KOC] ; / / Chodyèr tib tanperati somè (cho)
TemperaturaBuforaCODol: = HADC [HM_BANDOL] ; / / Tanperati CO / cho tank dlo desann
TemperaturaRecuIn: = HADC [HM_REQIN] ; / / Antre récupérateurs tanperati Netwaye Air
TemperaturaRecuOut: = HADC [HM_REQOUT] ; / / Sòti tanperati lè a récupérateurs lakay
TemperaturaZaworTrojDrozny: = HADC [HM_NAG] ; / / Tanperati kontwole twa – valv fason tankou yon aparèy chofaj oswa pou radyatè
TemperaturaRecuWyciog: = HADC [HM_REQWYC] ; / / Èkstre récupérateurs tanperati nan kay sal lè a
TemperaturaBuforaCOGora: = HADC [HM_BANGORA] ; / / Tanperati chofaj / dlo cho tank moute
TemperaturaBuforaCOSrodek: = HADC [HM_BANSRO] ; / / Tanperati chofaj / dlo cho tank sant
/ / Mezi soti nan detèktè yo nan RoomManager
TzewWschod: = RMGetTempNr (get_index_rm ( ‘ 55 – 2 ‘ ) , 8) ; / / Outdoor Tanperati Sensor bò solèy leve nan RM Pa gen . 8 pou adrès la 55 – 2
TzewZachod: = RMGetTempNr (get_index_rm ( ‘ 55 – 3 ‘ ) , 8) ; / / Tanperati Capteur deyò Wès la ki pa gen okenn . 8 pou RM ak adrès la 55 – 3
TzewPolnoc: = RMGetTempNr (get_index_rm ( ‘ 55 – 4 ‘ ) , 8) ; / / Tanperati Capteur deyò Nò Pa gen . 8 pou RM ak adrès la 55 – 4
TzewPoludnie: = RMGetTempNr (get_index_rm ( ‘ 55 – 5 ‘ ) , 8) ; / / Tanperati Capteur deyò Sid Pa gen . 8 pou RM ak adrès la 55 – 5
LNaslonecznienieWschod: = RMGetInvPercentNr (get_index_rm ( ‘ 55 – 2 ‘ ) , 1) ; / / Nivo a nan anbyen bò solèy leve limyè nan Capteur Pa gen . 1 pou RM ak adrès la 55 – 2
LNaslonecznienieZachod: = RMGetInvPercentNr (get_index_rm ( ‘ 55 – 3 ‘ ) , 1) ; / / Anbyan limyè West Capteur nivo Pa gen . 1 pou RM ak adrès la 55 – 3
LNaslonecznieniePolnoc: = RMGetInvPercentNr (get_index_rm ( ‘ 55 – 4 ‘ ) , 1) ; / / Anbyan limyè Nò Capteur nivo Pa gen . 1 pou RM ak adrès la 55 – 4
LNaslonecznieniePoludnie: = RMGetInvPercentNr (get_index_rm ( ‘ 55 – 5 ‘ ) , 1) ; / / Anbyan limyè Sid Eta Capteur nivo Pa gen . 1 pou RM ak adrès la 55 – 5
SilaWiatru: =: = RMGetPercentNr (get_index_rm ( ‘ 55 – 5 ‘ ) , 7) ; / / Anbyan limyè Sid Eta Capteur nivo Pa gen . 1 pou RM ak adrès la 55 – 5
Algoritm kontwòl kapab abitrè ak ka enkli nenpòt kalite paramèt yo ak mezi byen lwen tèlman yo te itilize ak enstale detèktè sèten kantite fizik .
/ / Algorithm genyen nan yo nan revèy la repetisyon dousman tankou . chak 10 minit
/ / Egzanp nan enèji – efikas kontwòl sou panno roulo ak tant (ki kapab lakòz yon enpòtan koute ekonomi akòz solèy la ' ; s reyon chofe kay la nan sezon fredi) ak akumulasyon nan enèji solè gratis
/ / Gratis ak ekolojik chofaj nan chanm sou bò solèy leve nan bilding lan a limyè solèy
si (pa RoletyWschod) Lè sa a, / / ​​si yo yo pa louvri
si (LNaslonecznienieWschod> ; 80) Lè sa a, / / ​​si solèy la – tcheke valè a pwouve
si (Mwa < ; ; 5) ak mwa> ; 8) Lè sa a, / / ​​si mwa a soti nan mwa septanm ak avril
si (TzewWschod> ; 0) Lè sa a, / / ​​tanperati Capteur nan solèy la chofe pi wo pase 0C
si (Tan> ; 8) ak (Tan < ; ; 11) Lè sa a, / / ​​nan maten an, lè solèy la klere ki sòti dirèkteman nan bò solèy leve a
kòmanse
RoletyWschod: = vre ; / / Flag yo louvri panno East
OtworzRoletyWschod ; / / Fonksyon nan voye yon evènman eHouse nan sistèm chofè
ZamknijMarkizyWschod ; / / Pa bay anyen paske solèy la a twò ba
fen ;
/ / Gratis ak ekolojik chofaj nan chanm yo sou bò sid nan bilding lan , solèy la ' ; s reyon
si (pa RoletyPoludnie) Lè sa a, / / ​​si yo yo pa louvri
si (LNaslonecznieniePolodnie> ; 80) Lè sa a, / / ​​si solèy la – tcheke valè a pwouve
si (Mwa < ; ; 5) ak mwa> ; 8) Lè sa a, / / ​​si mwa a soti nan mwa septanm ak avril
si (TzewPoludnie> ; 0) Lè sa a, / / ​​tanperati Capteur nan solèy la chofe pi wo pase 0C
si (è> ; 10) ak (Tan < ; ; 14) Lè sa a, / / ​​nan maten an, lè solèy la klere ki sòti dirèkteman nan sid la
kòmanse
RoletyPoludnie: = vre ; / / Louvri panno sid drapo a
OtworzRoletyPolodnie ; / / Fonksyon nan voye yon evènman eHouse nan sistèm chofè
ZamknijMarkizyPolodnie ; / / Pa bay anyen paske solèy la a twò ba
fen ;
/ / Gratis ak ekolojik chofaj nan chanm sou bò solèy kouche nan bilding lan , solèy la ' ; s reyon
si (pa RoletyZachod) Lè sa a, / / ​​si yo yo pa louvri
si (LNaslonecznienieZachod> ; 80) Lè sa a, / / ​​si solèy la – tcheke valè a pwouve
si (Mwa < ; ; 5) ak mwa> ; 8) Lè sa a, / / ​​si mwa a soti nan mwa septanm ak avril
si (TzewZachod> ; 0) Lè sa a, / / ​​tanperati Capteur nan solèy la chofe pi wo pase 0C
si (è> ; 14) ak (Tan < ; ; 18) Lè sa a, / / ​​nan maten an, lè solèy la klere ki sòti dirèkteman nan lwès la
kòmanse
RoletyZachod: = vre ; / / Flag yo louvri panno Lwès
OtworzRoletyZachod ; / / Fonksyon nan voye yon evènman eHouse nan sistèm chofè
ZamknijMarkizyZachod ; / / Pa bay anyen paske solèy la a twò ba
fen ;
/ / Ekolojik ak ékonomi Limite enpak la nan chofaj espas gratis nan limyè solèy la nan sezon lete – kontwòl tant
/ / Kontwòl Ònenn – louvri tant diminye solè radyasyon ak chofaj kay la nan sezon lete an – bò solèy leve
si (pa MarkizaWschodA) Lè sa a, / / ​​si yo yo pa louvri
si (SilaWiatru < ; ; 5) Lè sa a, / / ​​si pa gen okenn van
si ((Mwa> ; 4) ak (Mwa < ; ; 9)) Lè sa a, / / ​​ete mwa
si (LNaslonecznienieWschod> ; 50) Lè sa a, / / ​​si solèy la klere
si (tan> ; 6) ak (Tan < ; ; 12) Lè sa a, / / ​​si èdtan nan maten an
si (TwewnWschodA> ; 25) Lè sa a, / / ​​si chanm lan a twò cho
kòmanse
MarkizaWschodA: = vre ; / / Flag Ònenn louvri chanm A
OtworzMarkizeWchodA ; / / Voye yon evènman eHouse nan sistèm chofè
fen ;
/ / Menm jan an , ou ka répliquer kòd la pou kontwòl endepandan de tant nan lòt zòn nan fasad nan lès nan chanje A rive yon valè diferan
/ / Kontwòl Ònenn – louvri tant diminye solè radyasyon ak chofaj kay la nan midi nan ete
si (pa MarkizaPoludnieA) Lè sa a, / / ​​si yo yo pa louvri
si (SilaWiatru < ; ; 5) Lè sa a, / / ​​si pa gen okenn van
si ((Mwa> ; 4) ak (Mwa < ; ; 9)) Lè sa a, / / ​​ete mwa
si (LNaslonecznieniePoludnie> ; 50) Lè sa a, / / ​​si solèy la klere
si (Tan> ; 8) ak (Tan < ; ; 18) Lè sa a, / / ​​si lè a nan ki solèy la pi di opere soti nan sid la
si (TwewnPoludnieA> ; 25) Lè sa a, / / ​​si chanm lan a twò cho
kòmanse
MarkizaPoludnieA: = vre ; / / Flag Ònenn louvri chanm A
OtworzMarkizePoludnieA ; / / Voye yon evènman eHouse nan sistèm chofè
fen ;
/ / Menm jan an , ou ka répliquer kòd la pou kontwòl endepandan de tant nan lòt zòn nan elevasyon ki di sid Yon k ap Chanje nan yon valè diferan
/ / Kontwòl Ònenn – tant ouvè a diminye solè radyasyon ak chofaj kay la nan ete a nan bò lwès
si (pa MarkizaZachodA) Lè sa a, / / ​​si yo yo pa louvri
si (SilaWiatru < ; ; 5) Lè sa a, / / ​​si pa gen okenn van
si ((Mwa> ; 4) ak (Mwa < ; ; 9)) Lè sa a, / / ​​ete mwa
si (LNaslonecznieniePoludnie> ; 50) Lè sa a, / / ​​si solèy la klere
si (Tan> ; 8) ak (Tan < ; ; 18) Lè sa a, / / ​​si lè a nan ki solèy la pi di opere soti nan sid la
si (TwewnZachodA> ; 25) Lè sa a, / / ​​si chanm lan a twò cho
kòmanse
MarkizaZachodA: = vre ; / / Flag Ònenn louvri chanm A
OtworzMarkizeZachodA ; / / Voye yon evènman eHouse nan sistèm chofè
fen ;
/ / Menm jan an , ou ka répliquer kòd la pou kontwòl endepandan de tant nan lòt zòn nan fasad lwès la nan chanje A rive yon valè diferan
/ / Fèmen Marquis a se van twòp
si (LNaslonecznieniePoludnie < ; ; 20) Lè sa a, / / ​​Si Solèy la pa klere (chwazi pwouve Èske w gen Lapli ak lapli)
si (MarkizaPoludnieA) Lè sa a, / / ​​si louvri Ònenn
kòmanse
MarkizaPoludnieA: = fo ; / / Chanje drapo a
ZamknijMarkizePoludnieA ; / / Voye evènman eHouse nan mikro contrôleur
fen ;
si (LNaslonecznienieZachod < ; ; 20) Lè sa a, / / ​​Si Solèy la pa klere (chwazi pwouve)
si (MarkizaZachodA) Lè sa a, / / ​​si louvri Ònenn
kòmanse
MarkizaZachodA: = fo ; / / Chanje drapo a
ZamknijMarkizeZachodA ; / / Voye evènman eHouse nan mikro contrôleur
fen ;
si (LNaslonecznienieWschod < ; ; 20) Lè sa a, / / ​​Si Solèy la pa klere (chwazi pwouve)
si (MarkizaWschodA) Lè sa a, / / ​​si louvri Ònenn
kòmanse
MarkizaWschodA: = fo ; / / Chanje drapo a
ZamknijMarkizeWschodA ; / / Voye evènman eHouse nan mikro contrôleur
fen ;
si (SilaWiatru> ; 5) Lè sa a, / / ​​Van yo fèmen pèsyèn yo
si (MarkizaZachodA oswa MarkizaWschodA oswa MarkizaPoludnieA) Lè sa a, / / ​​si se yon sèl louvri
kòmanse
ZamknijWszystkieMarkizy ; / / Voye yon evènman eHouse nan sistèm chofè
MarkizaZachodA: = fo ;
MarkizaWschodA: = fo ;
MarkizaPoludnieA: = fo ;
fen ;
/ / Panno Fèmti otomatik tanperati kontwòl a twò ba pou chalè a yo sove deyò nan ouvèti yo restriksyon deyò fennèt la
/ / Sid – fèmen panno a frèt a ak mank nan solèy pou elevasyon an nan sid
si (RoletyPoludnie) Lè sa a, / / ​​si li se ouvè
si (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

kòmanse
RoletyPoludnie: = fo ; / / Louvri panno sid drapo a
ZamknijRoletyPolodnie ; / / Fonksyon nan voye yon evènman eHouse nan sistèm chofè
/ / ZamknijMarkizyPolodnie ; / / Pa bay anyen paske solèy la a twò ba
fen ;
/ / East fèmen Kay pèsyèn nan frèt ak mank nan solèy pou fasad oryantal la
si (RoletyWschod) Lè sa a, / / ​​si li se ouvè
si (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

kòmanse
RoletyWschod: = fo ; / / Flag yo louvri panno East
ZamknijRoletyWschod ; / / Fonksyon nan voye yon evènman eHouse nan sistèm chofè
/ / ZamknijMarkizyWschod ; / / Pa bay anyen paske solèy la a twò ba
fen ;
/ / Fèmen pèsyèn lwès bò a frèt la ak mank de solèy nan elevasyon lwès la
si (RoletyZachod) Lè sa a, / / ​​si li se ouvè
si (TzewZachod < – 10) then // temperature sensor below the western – 10C indicating the large cold and lack of sun heating the sensor on the west side

kòmanse
RoletyZachod: = fo ; / / Flag yo louvri panno Lwès
ZamknijRoletyZachod ; / / Fonksyon nan voye yon evènman eHouse nan sistèm chofè
/ / ZamknijMarkizyZachod ; / / Pa bay anyen paske solèy la a twò ba
fen ;