Latin

Building Automation eHouse – Partum a Fenestra software overlays et consuetudinem algorithms

Domum Automation eHouse cum PC software sino vos ut creare overlays ad edificandum Automation system .
Is sino vos ut Lorem ipsum , individuum algorithms , non sunt implemented in firmware aut coegi software ut imperium serial Domum Automation eHouse .
Ad hunc finem , nos suggero users cum software source codes (in Delphis V) . Possunt congestum newer versions of Delphis uel solebat pro aliis Aliquam libero .
Nos conscie elegit hanc prisca versions ut sunt iam available pro solvo pro amateur progressio .
Operantur sicut firmissimeque in Fenestra XP , Vista , Fenestra VII utrumque XXXII et LXIV frenum .
Hoc software vocatur eHouseLogAnalizer et haec logs template applications, qui legis text lima usque balanus .
Potest tractandam et monitored per applicationes KillWdt . exe .
Key features of application:

  • Coegi dignitate nominibus recitarent
  • Read status et intraveritis nomina omnium agitatores
  • Read mensuras et nomina omnibus aurigis mensuraui inputs
  • Oneratis omnis notitia ad internum progressio memoria , quae potest ulterius discursum ex applicatione

Applicationem utitur status creatae lima ut text lima in directorium ‘ logs / status / ‘ extensionem ‘ . status ‘ .
Lima legitur solum in vicis of mutationes in application eHouse . exe .

Data moderatoris sunt onusti in sequentibus instantiis Records ” ehouse_rm_em_hm ” audio in array RM .

In addition , notitia conservata sunt HeatManager sequenti variabiles:
bonfire_status: chorda ; / / Status of pyram pro HeatManager – Status caminata calefactio panel eHouse . exe
boiler_status: chorda ; / / Status of PRAEFURNIUM pro HM – status PRAEFURNIUM calefactio panel eHouse . exe
Solar_status: chorda ; / / Status de solari – status solaris calefactio panel eHouse . exe
recuperator_status: chorda ; / / Status of RECUPERATIO , VENTILATIO , aer calefactio – status calefactio VENTILATIO et æstus recuperatio
HADC: array [0 . . XV], duplici ; / / Heat temperaturis procurator – temperies mensuras HeatManager
/ / Heat procurator indices pro directo aditus HADC array – Assiduus temperies indices pro directo lectionem temperiei HeatManager
Const HM_GWC = III ; / / GWC – Ground Heat Exchanger
HM_KOM1 = IV ; / / Fireplace Coat I – Ignium Festorum aqua Jacket I
HM_KOMKONV = V ; / / Fireplace konvekcyjne – convection pyram
HM_KOM2 = VI ; / / Ignis RUNCINA II – pyram aqua Jacket II (tergum)
HM_TWEWN = VII ; / / Internum cella temperies – internum cella temperies
HM_SOLAR = IX ; / / COACTOR sol – Solaris systematis
HM_ZEWNPN = VIII ; / / Externum temperies aquilonem – external temperies aquilonem
HM_ZEWNPD = I ; / / Externum temperies meridiem – external temperies meridiem
HM_KOC = X ; / / Temperature PRAEFURNIUM – PRAEFURNIUM temperies
HM_BANDOL = XI ; / / CO / aqua calida tank descendit – calidum watter fundo quiddam
HM_REQIN = XII ; / / Clean aer recuperatorem input – RECUPERATIO aere puro input
HM_REQOUT = XIII ; / / Output recuperatorem domum – heaten RECUPERATIO recens ictu aeris ad cella – temperies
HM_NAG = XIV ; / / Temperature controlatae tres – via CYMBALON enim calefactio et pro radiators – temperies post tres vias intervalli interclusi pro aquae calefacientis vel alia calefactio system
HM_REQWYC = XV ; / / Domus recuperatorem extract sordida – RECUPERATIO ab domo luteo exhauriunt tempero
HM_BANGORA = II ; / / CALEFACTIO / aqua calida tank gora – aqua calida quiddam TOP
HM_BANSRO = 0 ; / / CALEFACTIO / aqua calida repono tank medium – MEDIUM aqua calida quiddam
var HADCNames: array [0 . . XV] of string ; / / Nomina sensoriis (mensuraui inputs) HeatManagera Basic functiones EhouseLogAnalizer:
procedendi init_heat_temperature_names ; / / Initialize et / vel temperie sensoriis nomina legi of HM
procedendi loadnames_rm ; / / Oneratis RoomManagerĂłw nomina (eHouse I)
procedendi readethernetdevs ; / / Legit Ethernet auriga nomina (eHouse II)
get_index_rm functio (str: chordae): integer ; / / Returns index mensamque cum roomManagerami quaestio secundum lima nomen status
functio gb (Chr: chari): boolean ; / / Reddit boolean valorem legere status
adc_hm procedendi (str: chorda ; index: integer) ; / / Converterit chordam scripta temperaturis de legere status HeatManagera
adc_rm procedendi (str: chorda ; index: integer) ; / / Converterit filum de Analog mensuras cum legunt status RoomManagerĂłw
gbs functio (b: boolean): String ; / / Scribe boolean in text forma (0 , I)
RMDeviceIndexByName functio (str: chordae): integer ; / / Returns index mensamque cum RoomManagerami quaestio secundum nomen auriga
RMGetOutputStateNr functio (index: integer ; OutputNr: integer): boolean ; / / Revertere output statu RM [index] et output numerus OutputNR
RMGetOutputState functio (index: integer ; OutputName: chordae): boolean ; / / Returns output statu RM [index] et clamavit OutputName
RMGetInputStateNr functio (index: integer ; InputNr: integer): boolean ; / / Returns status input RM [index] et numerum de ingressu InputNr
RMGetInputState functio (index: integer ; InputName: chordae): boolean ; / / Returns status input RM [index] et nomen introitu InputName
RMGetTempNr functio (index: integer ; InputNr: integer): duplum ; / / Redit RM temperies [index] et numerum de ingressu InputNr
RMGetTemp functio (index: integer ; InputName: chordae): duplum ; / / Redit RM temperies [index] et nomen introitu InputName
RMGetInvPercent functio (index: integer ; InputName: chordae): duplum ; / / Returns recipis mensura reverse C % – x RM [index] et nomen introitu InputName (in relatione ad subministrationem voltage controller)
RMGetInvPercentNr functio (index: integer ; InputNr: integer): duplum ; / / Returns recipis mensura reverse C % – x RM [index] et numerum de ingressu InputNr (in relatione ad subministrationem voltage controller)
RMGetPercent functio (index: integer ; InputName: chordae): duplum ; / / Returns recipis mensura RM [index] et nomen introitu InputName (in relatione ad subministrationem voltage controller)
RMGetPercentNr functio (index: integer ; InputNr: integer): duplum ; / / Returns recipis mensura reverse C % – x RM [index] et nomen introitu InputNr (in relatione ad subministrationem voltage controller)
RMGetDeviceOutputState functio (Devname: chorda ; OutputName: chordae): boolean ; / / Returns statum output auriga vocavit Devname et clamavit OutputName
RMGetDeviceInputState functio (Devname: chorda ; InputName: chordae): boolean ; / / Returns statu auriga input nomen et nomen introitu Devname InputName
HMGetTemp functio (InputName: chordae): duplum ; / / Revertere temperies mensuræ input vocavit HeatManagera InputName
HMGetTempNr functio (InputNr: integer): duplum ; / / Revertere temperies mensuræ input numerus pro HeatManagera InputNr (I . . XVI)
chk_int functio (st: chordae): integer ; / / Tutus convertendi nervi ad integer
procedendi update_status ; / / Update status omnibus aurigis in tabula (debet currere periodice)
procedendi Test_save ; / / Test procedendi scribere exitus a text file pro securus
Initialize auriga et omnes nomina dicuntur semel application est started (FormCreate)
procedendi TForm1 . FormCreate (, mittentis: TObject) ;
incipiunt
semitam: = getcurrentdir () ; / / Adepto current semita progressio oportet sit in presul % eHouse_DIR % \ Bin \
semitam: = stringreplace (semitam , ‘ \ Bin ‘ , ‘ \ ‘ , [Rfignorecase]) ; / / Get semitam application eHouse – obfirmatur application semitam eHouse
loadnames_rm ; / / Oneratis controller nomina ehouse1 – vehes agitatores nomen eHouse I
init_heat_temperature_names ; / / Oneratis sensoriis heatManagera nomen
readethernetdevs ; / / Oneratis moderatoris ethernet eHouse nomina – legentem fabrica nomina eHouse II
timer1 . Intervallum: = MMM ; / / Pone cyclic munus tempusculi in milliseconds – Obfirmatur vicis ut satus reprehendo cyclic notitia
timer1 . Enabled: = verus ; / / Satus automatic oneribusque (status update – includit regularis tenendo of notitia
update_status ; / / Legit primus status
finis ;
Cyclic notitia tenendo fit per functionem Timer1 (Timer1Timer) currit spatium temporis positum est in parameter Timer1 . Intervallum (in milliseconds) .
procedendi TForm1 . Timer1Timer (, mittentis: TObject) ;
var tf: textfile ;
incipiunt
update_status ; / / Converterit status exactoris
Test_save ; / / Enim test scribit omnes exitus a text file
experiri / / creare titulum file quidem applicatione KillExec . exe potest ” vigilate ” application ante fragore
AssignFile (tf , semitam + ‘ logs \ log – analizer . stp ‘ ) ;
/ / SIGNIFICO WDT Ista applicatio operatic recte usura stampfile ” stipes \ log – analizer . stp ”
RESCRIBO (tf) ;
writeln (tf , ‘ I ‘ ) ;
tandem ;
closefile (tf) ;
finis ;
finis ;