RESI-DALI-SIO — integracija DALI rasvjete

Resi DALI

Modbus RTU

Autor

Posljednje ažuriranje: 04. 2026

Potreban je vanjski pristupnik (gateway)
Resi RESI-DALI-PS — stranica proizvoda

Predložak Resi DALI namijenjen je svakodnevnom radu i pandan je alatu za puštanje u rad Resi Dali - Konfiguracija. Povezuje TapHome s potpuno adresiranom sabirnicom DALI rasvjete preko Modbus-DALI pristupnika (gateway) RESI-DALI-SIO ili RESI-DALI-ETH i u svakodnevnom radu podržava do 64 pojedinačno adresirane DALI predspojne naprave (kratke adrese 0–63) i 16 DALI grupa (0–15), uz dijagnostiku DALI 1.0 za svaku predspojnu napravu (stanje, kvar žarulje i kvar napajanja).

Komunikacija s pristupnikom koristi Modbus RTU na 9600 baud 8N1. Vrijednosti svjetline upisuju se u H:510 LAMP LEVEL (za svaku predspojnu napravu) i H:520 GROUP LEVEL (za svaku grupu); konfiguracijske naredbe i upiti za pojedinu predspojnu napravu prenose se kroz H:511 LAMP COMMAND / H:512 LAMP COMMAND + REPEAT, a spremnost odgovora provjerava se očitavanjem registra pristupnika H:550 DALI STATUS.

Ovaj predložak pretpostavlja da su kratke DALI adrese već programirane na sabirnici. Ako predspojne naprave još nemaju adresu, najprije pomoću srodnog predloška Resi Dali - Konfiguracija (ili besplatnog alata proizvođača MODBUSConfigurator / DCA) pokrenite čarobnjak za nasumično adresiranje DALI 2.0 — vidi Odnos s predloškom za puštanje u rad niže.

Hardversko spajanje

RESI-DALI-SIO (RS-485) i RESI-DALI-ETH (Ethernet) su master pristupnici za DIN šinu koji se nalaze između serijskog/Ethernet nadređenog sustava i sabirnice DALI rasvjete. SIO se isporučuje u kućištu CEM17 (17,5 × 90 × 56,4 mm), a ETH u širem kućištu CEM35 (35,8 × 90 × 56,4 mm) zbog konektora RJ45. Nijedan pristupnik sam ne napaja sabirnicu DALI: obavezno je zasebno napajanje sabirnice DALI (RESI-DALI-PS ili bilo koje sukladno DALI napajanje od 200 mA).

Spajanje RESI-DALI-SIO (RS-485)

Shema spajanja RESI-DALI-SIO — vanjsko DALI napajanje (gore) i u kombinaciji s RESI-DALI-PS (dolje)

Stezaljke na lijevoj strani RESI-DALI-SIO (odozgo prema dolje): GND, +12..48V=, RS485 DATA+ (A+), RS485 DATA- (B-), RS485 GND, RS232 TX, RS232 RX, RS232 GND. Stezaljke sabirnice DALI na suprotnoj strani su D+ / N/C / D- (tropolni blok USLIM, srednji pin N/C ostaje nespojen).

Za instalaciju TapHome koristite sučelje RS-485:

RS485 DATA+ (A+) → A+/D+ na sabirnici RS-485 sustava TapHome
RS485 DATA- (B-) → B-/D- na sabirnici RS-485 sustava TapHome
RS485 GND → GND na napajanju TapHome (preporučeno za stabilnu komunikaciju)
+12..48V= / GND → primarno napajanje 12–48 V DC

Spajanje RESI-DALI-ETH (Ethernet)

Shema spajanja RESI-DALI-ETH — vanjsko DALI napajanje (gore) i u kombinaciji s RESI-DALI-PS (dolje)

Ethernet varijanta ima iste stezaljke sabirnice DALI (D+ / N/C / D-) i ulaze primarnog napajanja (GND, +12..48V=), uz jedan konektor RJ45 za Ethernet 10/100 Mbit. Tvorničke IP postavke su 192.168.0.191 / 255.255.255.0 / 192.168.0.1 s Modbus Unit ID 255; ugrađeno web-sučelje koristi pristupne podatke RESI / RESI.

Budući da je ovo predložak za Modbus RTU, TapHome s RESI-DALI-ETH ne komunicira izravno protokolom Modbus/TCP. Umjesto toga koristite ga u transparentnom načinu RTU preko Etherneta ili SIO postavite iza pretvarača serijske veze u IP (Moxa NPort, USR-TCP232) — vidi Konfiguracija → Postavljanje RTU preko TCP-a niže.

Napajanje sabirnice DALI (RESI-DALI-PS)

RESI-DALI-PS — samostalno napajanje sabirnice DALI (gore) i u kombinaciji s pristupnikom SIO/ETH (dolje)

RESI-DALI-PS daje do 200 mA na sabirnici DALI (struja kratkog spoja ~225 mA, napon sabirnice obično 14–18 V) i podržava do 64 predspojne naprave DALI 1.0 ili DALI 2.0 na jednoj liniji. Primarna strana prihvaća isto napajanje 12–48 V DC kao jedinica SIO/ETH. Pristupnik i napajanje spajaju se na isti par D+ / D-: napajanje napaja sabirnicu, a pristupnik čita i upisuje DALI okvire.

Tri LED diode na napajanju pomažu pri dijagnostici kvarova: POWER (primarno napajanje 12–48 V u redu, u normalnom radu stalno svijetli), DALI (kratko treperi tijekom prometa na sabirnici DALI), ERR (stalno svijetli pri kvaru napajanja, kratkom spoju DALI ili preopterećenju sabirnice — u normalnom radu mora biti ugašena).

Topologija sabirnice DALI

Linija DALI ima nekoliko strogih ograničenja koja izravno utječu na stabilnost rada:

Presjek vodiča	Najveća duljina DALI kabela
1,5 mm²	300 m
1,0 mm²	238 m
0,75 mm²	174 m
0,5 mm²	116 m

Ograničenje proizlazi iz najvećeg dopuštenog pada napona od 2 V na DALI kabelu. Ostala pravila:

Najviše 64 predspojne naprave DALI 1.0 i do 64 predspojne naprave DALI 2.0 po sabirnici (odvojeni prostori kratkih adresa).
Samo stablasta topologija — bez prstenova i petlji.
Stvarni broj predspojnih naprava ovisi i o nazivnoj struji napajanja (na RESI-DALI-PS obično 200 mA; računajte ~2 mA po predspojnoj napravi plus rezervu).

RESI-DALI-PS (ili odgovarajuće DALI napajanje) je obavezno. Bez njega pristupnik ne može pogoniti sabirnicu i za svako čitanje predspojne naprave isteći će vrijeme čekanja uz poruku “Gear not present!”. Ako se na dugu liniju doda drugo napajanje, umetnite DALI prigušnicu ili podijelite sabirnicu na galvanski odvojene segmente.

Konfiguracija

Uključivanje Modbus komunikacije

Serijski parametri nadređenog sustava na RESI-DALI-SIO biraju se četveropoložajnom DIP sklopkom na modulu. Predložak TapHome fiksno koristi 9600 baud 8N1, pa DIP sklopke moraju tome odgovarati.

DIP1	DIP2	Brzina prijenosa
OFF	OFF	9600 bd (potrebno za TapHome)
ON	OFF	19200 bd
OFF	ON	38400 bd
ON	ON	Koristi brzinu prijenosa programiranu u memoriji FLASH (tvornički 57600 bd)

DIP4	Izvor Modbus Unit ID-a
OFF	Uvažava se FLASH registar `H:65221` — potrebno ako je tijekom puštanja u rad programiran Slave ID različit od zadanog
ON	Hardverska rezervna vrijednost — Unit ID prisilno je `255`, vrijednost u memoriji FLASH se zanemaruje

DIP3 je rezervirani bit specifičan za proizvod; ostavite ga u tvorničkom položaju. Za gore odabrane kombinacije brzine prijenosa DIP1/DIP2 paritet je uvijek isključen (None), a broj stop bitova je 1 (format okvira 8N1).

Zaključenje RS-485: sabirnicu zaključite s 120 Ω na oba kraja. TapHome Core osigurava jedno zaključenje na svojim stezaljkama BUS; ako je pristupnik RESI posljednji uređaj na liniji, dodajte zasebni zaključni otpornik od 120 Ω između A+ / B- na njegovim stezaljkama RS-485.

Slave ID

Tvornički zadani Modbus Unit ID je 255 (FLASH registar H:65221 vraća 0xFFFF, što pristupnik ograničava na 255). Predložak na razini modula daje servisni atribut Slave ID koji očitava taj registar, pa se postavljena adresa nakon uvoza može provjeriti.

Promjena Slave ID-a dio je puštanja u rad i obavlja se srodnim predloškom Resi Dali - Konfiguracija: ovaj predložak za rad namjerno ne upisuje u H:65221 i ne pokreće softverski reset, pa može ostati aktivan u projektu bez opasnosti od slučajne promjene konfiguracije pristupnika.

Postavljanje RTU preko TCP-a

Budući da predložak koristi vezu Modbus RTU, nudi se i parametar uvoza IpAddress za instalacije u kojima TapHome pristupniku pristupa preko pretvarača serijske veze u IP (Moxa NPort, USR-TCP232) ili preko RESI-DALI-ETH u transparentnom načinu RTU preko Etherneta. U tom slučaju u IpAddress upišite IP adresu pretvarača / jedinice ETH, a sve ostale postavke ostavite iste kao kod varijante RS-485. Za čisti Modbus/TCP prikladniji bi bio predložak temeljen na TCP-u — ovaj predložak za Modbus RTU očekuje upravo RTU promet u okvirima.

Samo jedan Modbus master istodobno. Ni DALI ni Modbus RTU ne arbitriraju između istodobnih mastera. Ako pristupnik očitava i PLC, nadzorni sustav zgrade (BMS) ili alat na računalu (na primjer MODBUSConfigurator), upiti prema predspojnim napravama će se sudarati i TapHome će povremeno javljati greške “Gear not responding!”.

Odnos s predloškom za puštanje u rad

Ista definicija Dali.xml isporučuje se s pristupnikom RESI kao dva komplementarna predloška TapHome koja rade u različitim fazama životnog ciklusa istog hardvera:

Predložak	Faza	Što radi	Kada ga koristiti
Resi Dali - Konfiguracija (`resi-dali-daliconfig`)	Jednokratno puštanje u rad	Čarobnjak za nasumično adresiranje DALI 2.0, provjera vrste uređaja na svakoj adresi, skupni testovi uključivanja/isključivanja, Set Slave ID, Reset Gateway	Nova instalacija: dodjela kratkih adresa 0–63 predspojnim napravama, provjera koje su adrese zauzete
Resi DALI (`resi-dali-dali`, ovaj predložak)	Svakodnevni rad	Prigušivanje svake predspojne naprave (64), prigušivanje grupa (16 grupa), dijagnostika DALI 1.0 za svaku predspojnu napravu, upravljanje članstvom u grupama	Nakon puštanja u rad: upravljanje rasvjetom za krajnjeg korisnika

Uobičajeni tijek projekta:

Ožičite i napajajte sabirnicu DALI (RESI-DALI-PS) i pristupnik.
Uvezite predložak Resi Dali - Konfiguracija i pokrećite Resetiraj kratke adrese → Pokreni → Skeniraj / SEARCHADDR / COMPARE / PROGRAM SHORT ADDRESS / Provjera dok svaka vidljiva predspojna naprava ne dobije kratku adresu. Provjerite pomoću Gear 0..63 i Turn On / Off All Lamps.
Uklonite modul Resi Dali - Konfiguracija iz projekta.
Uvezite predložak Resi DALI (ovaj) za rad. Uređaje Gear N i Group N povežite sa scenama, rasporedima i smart rules u sustavu TapHome.

Oba predloška mogu privremeno postojati i istodobno (npr. pri dodavanju nove predspojne naprave u postojeću instalaciju), ali Modbus promet smije slati samo jedan od njih. Predložak za rad namjerno izostavlja radnje za promjenu konfiguracije pristupnika (Reset Gateway, Set Slave ID, skupni ALL LEVEL), pa može ostati u projektu bez opasnosti da prepiše postavke iz puštanja u rad.

Za puštanje u rad umjesto predloška TapHome Resi Dali - Konfiguracija može se koristiti i besplatni alat proizvođača MODBUSConfigurator DCA (Windows, dostupan na web-stranici RESI). Predložak za rad Resi DALI radi jednako, bez obzira na to kojim su alatom dodijeljene kratke adrese.

Mogućnosti uređaja

Predložak u sustavu TapHome daje 80 DALI uređaja, organiziranih u dvije usporedne skupine: 64 dimera Gear (po jedan za svaku kratku DALI adresu) i 16 dimera Group (po jedan za svaku DALI grupu). Cjelinu dopunjuje jedan servisni atribut na razini modula.

Prigušivanje svake predspojne naprave — Gear 0 … Gear 63

Svaki od 64 servisna uređaja Gear 0, Gear 1, … Gear 63 je dimer u sustavu TapHome koji upravlja jednom DALI predspojnom napravom na odgovarajućoj kratkoj adresi. Vrijednosti svjetline upisuju se u H:510 LAMP LEVEL (TapHome 0–100 % linearno se preslikava u DALI raspon razine snage (arc power) ograničen vlastitim MIN LEVEL i MAX LEVEL predspojne naprave); stvarna razina čita se iz H:511 DALI naredbom QUERY ACTUAL LEVEL (0xA0) i ponovno preračunava u 0–100 %.

Kad predložak uveze predspojnu napravu, inicijalizacijska skripta najprije je provjerava naredbom QUERY STATUS (0x91); odgovor 0x8000 „nema odgovora” označava predspojnu napravu kao nije prisutna (ponovni pokušaji slijede u razmacima koji se eksponencijalno produljuju od 1 do 60 s) i u zapisniku TapHome ispisuje “Gear not present!”. Ako predspojna naprava odgovori, inicijalizacijska skripta zatim čita QUERY LAMP FAILURE (0x92), QUERY POWER FAILURE (0x9B), QUERY MIN LEVEL (0xA2) i QUERY MAX LEVEL (0xA1) i rezultate sprema u interno stanje za periodičku skriptu čitanja.

Svaka predspojna naprava daje 10 servisnih atributa koji na zahtjev čitaju upitne naredbe DALI 1.0 / 2.0:

Servisni atribut	DALI naredba	Javlja
Kratka adresa	(interno)	Kratka adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška
Device Type	`QUERY DEVICE TYPE` (`0x99`)	`DT{n}` (npr. `DT0` fluorescentna, `DT6` LED, `DT8` boja / podesiva bijela) ili `--` kad nema odgovora
Physical Min Level	`QUERY PHYSICAL MIN LEVEL` (`0x9A`)	Hardverski određena najmanja razina prigušivanja u %
Max Level	`QUERY MAX LEVEL` (`0xA1`)	Postavljena gornja granica pri preslikavanju 0–100 % u DALI razinu snage
Min Level	`QUERY MIN LEVEL` (`0xA2`)	Postavljena donja granica pri preslikavanju 0–100 % u DALI razinu snage
Power Up Level	`QUERY POWER ON LEVEL` (`0xA3`)	Svjetlina koja se vraća nakon ponovnog uključenja napajanja sabirnice DALI
System Failure Level	`QUERY SYSTEM FAILURE LEVEL` (`0xA4`)	Svjetlina na koju se prelazi kad sabirnica izgubi komunikaciju dulje od 500 ms
Grupe	`QUERY GROUPS 0-7` (`0xC0`) + `QUERY GROUPS 8-15` (`0xC1`)	Zarezima odvojen popis DALI grupa kojima predspojna naprava pripada (`None` ili npr. `0,3,7`)
Support Lamp Failure	bit mogućnosti `QUERY LAMP FAILURE` (`0x92`)	`Yes` / `No` / `--` — uvjetuje grešku “Lamp failure!” u periodičkoj skripti čitanja
Support Power Failure	bit mogućnosti `QUERY POWER FAILURE` (`0x9B`)	`Yes` / `No` / `--` — uvjetuje grešku “Power failure!” u periodičkoj skripti čitanja

Periodička skripta čitanja na svakoj predspojnoj napravi čita trenutačnu razinu snage (0xA0) i, ako je podržano, prati zastavice kvara žarulje i kvara napajanja. One se u sustavu TapHome prikazuju kao upozorenja/greške, pa se neispravna fluorescentna cijev ili LED driver koji se isključio zbog kvara pojavljuju u zapisniku aktivnosti bez ručnog provjeravanja.

Konfiguracijske radnje za svaku predspojnu napravu

Četiri servisne radnje na svakom uređaju Gear N upisuju DALI konfiguracijske naredbe (automatski ponovljene unutar 100 ms preko H:512 LAMP COMMAND + REPEAT, kako je potrebno za DALI naredbe koje upisuju u trajnu memoriju):

Add to Group (parametar ID grupe 0–15) — šalje ADD TO GROUP (0x60+grp), pa se predspojna naprava pridružuje odabranoj DALI grupi i slušat će sljedeće skupne upise grupe.
Remove from Group (parametar ID grupe 0–15) — šalje REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings — šalje DALI RESET (0x20); vraća sve NVM parametre predspojne naprave (najveću/najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels — preuzima trenutačnu razinu snage i sprema je kao Power On Level i System Failure Level, ovim slijedom: STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D), svaki s razmakom od 10 ms.

Prigušivanje grupa — Group 0 … Group 15

Svaki od 16 servisnih uređaja Group 0, Group 1, … Group 15 je dimer u sustavu TapHome samo za upis koji jednu vrijednost razine snage skupno šalje svakoj predspojnoj napravi u toj DALI grupi, preko H:520 GROUP LEVEL (TapHome 0–100 % množi se s 0xFE → DALI razina snage 0–254). DALI pristupniku ne omogućuje povratno očitanje razine grupe (sabirnica prenosi samo skupni upis), pa TapHome kao „trenutačnu” razinu zadržava posljednju upisanu vrijednost. Uređaji grupa nemaju inicijalizacijske skripte ni skripte čitanja.

Svaki uređaj Group N daje dvije servisne radnje za skupno upravljanje članstvom:

Add All Lamps to Group — skupno šalje ADD TO GROUP (0x60+grp) preko H:532 ALL COMMAND + REPEAT. Svaka predspojna naprava na sabirnici pridružuje se grupi bez obzira na svoju trenutačnu kratku adresu.
Remove All Lamps from Group — skupno šalje REMOVE FROM GROUP (0x70+grp). Svaka predspojna naprava napušta grupu.

Prigušivanje grupa koristite za „svjetla u kuhinji”, „ugradbena svjetla u dnevnom boravku” ili bilo koju zonu u kojoj više predspojnih naprava treba pratiti jedan dimer. Upisi u grupu znatno su učinkovitiji od usporednog upravljanja pojedinačnim predspojnim napravama: jedna Modbus transakcija istodobno dolazi do najviše 64 predspojne naprave.

Dijagnostika na razini modula

Modul daje jedan servisni atribut:

Slave ID — čita Modbus Unit ID spremljen u FLASH registru H:65221. Aktivan je samo kad je DIP4 = OFF; uz DIP4 = ON pristupnik prisilno koristi adresu 255 bez obzira na vrijednost u memoriji FLASH. Koristite ga za provjeru adrese pristupnika prije dodavanja novih uređaja, osobito nakon puštanja u rad pri kojem je upisan ID različit od zadanog.

Rješavanje problema

“Gear not present!” na predspojnoj napravi s poznatom adresom

Provjerite napon sabirnice DALI na predspojnoj napravi: 11,5–22,5 V (tipično 14–16 V). Niže vrijednosti obično znače kratki spoj ili sabirnicu predugu za presjek kabela (vidi Topologija sabirnice DALI).
Provjerite LED diodu ERR na RESI-DALI-PS: ako svijetli, sabirnica je u kratkom spoju, preopterećena ili je neispravno samo napajanje.
Ponovno pokrenite provjeru Gear N u srodnom predlošku Resi Dali - Konfiguracija: predložak za rad ponavlja pokušaj samo svakih 1–60 s s eksponencijalnim produljenjem, a predložak za puštanje u rad odmah daje rezultat uspjeh/neuspjeh za svaku adresu.
Provjerite ima li predspojna naprava doista kratku adresu. Ako je zamijenjena ili tvornički resetirana na sabirnici, bit će bez adrese i treba je ponovno pustiti u rad preko predloška Resi Dali - Konfiguracija.

Prigušivanje grupe nema učinka

Provjerite je li barem jedna predspojna naprava član grupe: na svakoj predspojnoj napravi koja bi trebala biti član otvorite Gear N → Grupe i provjerite pojavljuje li se ID grupe na popisu odvojenom zarezima.
Ako članstvo nedostaje, pokrenite radnju Add to Group na svakoj predspojnoj napravi pojedinačno ili na uređaju grupe upotrijebite Add All Lamps to Group za skupno slanje na cijelu sabirnicu.
Imajte na umu da je Group N samo za upis: klizač dimera u sustavu TapHome pamti posljednju upisanu vrijednost, ali ne prikazuje stvarno stanje sabirnice. Ako su predspojne naprave isključene s napajanja, naredba razine grupe na njih nema učinka, a greška se ne javlja.

Kvar žarulje / kvar napajanja se ne javlja

Otvorite servisne atribute predspojne naprave i provjerite Support Lamp Failure / Support Power Failure. Ako je bilo koji od njih No, driver predspojne naprave ne podržava taj upit DALI 1.0: periodička skripta čitanja tada blokira odgovarajuću grešku i za tu predspojnu napravu nikada neće upozoriti.
Na predspojnoj napravi pokrenite Reset to Default Settings i ponovno uvezite uređaj. Inicijalizacijska skripta u sljedećem ciklusu čitanja ponovno provjerava oba bita mogućnosti.

Povremene Modbus greške nakon puštanja u rad

Provjerite da nijedan drugi Modbus master (MODBUSConfigurator, PLC, BMS) istodobno ne očitava pristupnik. DALI i Modbus ne arbitriraju između mastera.
Provjerite je li RS485 GND spojen između pristupnika i zajedničke mase napajanja TapHome: nespojeni GND najčešća je greška RS-485 na dugim linijama.
Za RTU preko TCP-a kroz serijski pretvarač provjerite radi li pretvarač u načinu RTU s okvirima (a ne kao sirovi TCP socket) i poštuje li razmak između znakova na serijskoj strani vremenske zahtjeve za 9600 baud 8N1.
Ako su se smetnje pojavile nakon promjene Slave ID-a predloškom Resi Dali - Konfiguracija, ponovno uvezite ovaj predložak za rad s novim parametrom uvoza SlaveId: prethodno uvezeni modul i dalje očitava staru adresu.

Dostupni uređaji

Resi DALI Modul

Servisni atributi

Slave ID

Čita Modbus Unit ID spremljen u FLASH registru H:65221 — aktivan samo kad je DIP4=OFF (tvornički zadano 255). Koristi se za provjeru adrese pristupnika prije dodavanja novih uređaja.

Gear 0 Dimer

DALI predspojna naprava na kratkoj adresi 0 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 0

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 1 Dimer

DALI predspojna naprava na kratkoj adresi 1 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 1

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 2 Dimer

DALI predspojna naprava na kratkoj adresi 2 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 2

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 3 Dimer

DALI predspojna naprava na kratkoj adresi 3 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 3

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 4 Dimer

DALI predspojna naprava na kratkoj adresi 4 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 4

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 5 Dimer

DALI predspojna naprava na kratkoj adresi 5 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 5

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 6 Dimer

DALI predspojna naprava na kratkoj adresi 6 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 6

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 7 Dimer

DALI predspojna naprava na kratkoj adresi 7 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 7

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 8 Dimer

DALI predspojna naprava na kratkoj adresi 8 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 8

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 9 Dimer

DALI predspojna naprava na kratkoj adresi 9 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 9

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 10 Dimer

DALI predspojna naprava na kratkoj adresi 10 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 10

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 11 Dimer

DALI predspojna naprava na kratkoj adresi 11 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 11

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 12 Dimer

DALI predspojna naprava na kratkoj adresi 12 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 12

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 13 Dimer

DALI predspojna naprava na kratkoj adresi 13 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 13

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 14 Dimer

DALI predspojna naprava na kratkoj adresi 14 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 14

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 15 Dimer

DALI predspojna naprava na kratkoj adresi 15 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 15

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 16 Dimer

DALI predspojna naprava na kratkoj adresi 16 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 16

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 17 Dimer

DALI predspojna naprava na kratkoj adresi 17 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 17

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 18 Dimer

DALI predspojna naprava na kratkoj adresi 18 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 18

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 19 Dimer

DALI predspojna naprava na kratkoj adresi 19 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 19

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 20 Dimer

DALI predspojna naprava na kratkoj adresi 20 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 20

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 21 Dimer

DALI predspojna naprava na kratkoj adresi 21 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 21

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 22 Dimer

DALI predspojna naprava na kratkoj adresi 22 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 22

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 23 Dimer

DALI predspojna naprava na kratkoj adresi 23 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 23

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 24 Dimer

DALI predspojna naprava na kratkoj adresi 24 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 24

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 25 Dimer

DALI predspojna naprava na kratkoj adresi 25 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 25

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 26 Dimer

DALI predspojna naprava na kratkoj adresi 26 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 26

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 27 Dimer

DALI predspojna naprava na kratkoj adresi 27 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 27

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 28 Dimer

DALI predspojna naprava na kratkoj adresi 28 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 28

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 29 Dimer

DALI predspojna naprava na kratkoj adresi 29 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 29

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 30 Dimer

DALI predspojna naprava na kratkoj adresi 30 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 30

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 31 Dimer

DALI predspojna naprava na kratkoj adresi 31 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 31

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 32 Dimer

DALI predspojna naprava na kratkoj adresi 32 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 32

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 33 Dimer

DALI predspojna naprava na kratkoj adresi 33 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 33

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 34 Dimer

DALI predspojna naprava na kratkoj adresi 34 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 34

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 35 Dimer

DALI predspojna naprava na kratkoj adresi 35 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 35

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 36 Dimer

DALI predspojna naprava na kratkoj adresi 36 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 36

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 37 Dimer

DALI predspojna naprava na kratkoj adresi 37 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 37

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 38 Dimer

DALI predspojna naprava na kratkoj adresi 38 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 38

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 39 Dimer

DALI predspojna naprava na kratkoj adresi 39 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 39

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 40 Dimer

DALI predspojna naprava na kratkoj adresi 40 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 40

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 41 Dimer

DALI predspojna naprava na kratkoj adresi 41 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 41

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 42 Dimer

DALI predspojna naprava na kratkoj adresi 42 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 42

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 43 Dimer

DALI predspojna naprava na kratkoj adresi 43 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 43

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 44 Dimer

DALI predspojna naprava na kratkoj adresi 44 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 44

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 45 Dimer

DALI predspojna naprava na kratkoj adresi 45 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 45

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 46 Dimer

DALI predspojna naprava na kratkoj adresi 46 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 46

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 47 Dimer

DALI predspojna naprava na kratkoj adresi 47 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 47

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 48 Dimer

DALI predspojna naprava na kratkoj adresi 48 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 48

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 49 Dimer

DALI predspojna naprava na kratkoj adresi 49 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 49

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 50 Dimer

DALI predspojna naprava na kratkoj adresi 50 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 50

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 51 Dimer

DALI predspojna naprava na kratkoj adresi 51 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 51

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 52 Dimer

DALI predspojna naprava na kratkoj adresi 52 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 52

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 53 Dimer

DALI predspojna naprava na kratkoj adresi 53 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 53

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 54 Dimer

DALI predspojna naprava na kratkoj adresi 54 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 54

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 55 Dimer

DALI predspojna naprava na kratkoj adresi 55 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 55

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 56 Dimer

DALI predspojna naprava na kratkoj adresi 56 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 56

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 57 Dimer

DALI predspojna naprava na kratkoj adresi 57 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 57

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 58 Dimer

DALI predspojna naprava na kratkoj adresi 58 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 58

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 59 Dimer

DALI predspojna naprava na kratkoj adresi 59 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 59

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 60 Dimer

DALI predspojna naprava na kratkoj adresi 60 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 60

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 61 Dimer

DALI predspojna naprava na kratkoj adresi 61 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 61

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 62 Dimer

DALI predspojna naprava na kratkoj adresi 62 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 62

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Gear 63 Dimer

DALI predspojna naprava na kratkoj adresi 63 — dimer u sustavu TapHome čija se vrijednost 0–100 % preslikava u DALI razinu snage (arc power) preko H:510 LAMP LEVEL (upis) i QUERY ACTUAL LEVEL preko H:511 (čitanje), ograničenu vlastitim MIN / MAX LEVEL predspojne naprave.

Registar: H:511 → H:510 UInt16 Jedinica: % numeric

Servisni atributi

Kratka adresa	Kratka DALI adresa (0–63) kojoj ovaj uređaj šalje naredbe — fiksirana pri uvozu predloška i koristi se u višem bajtu svakog Modbus upisa.
Device Type	Bajt vrste DALI uređaja koji vraća QUERY DEVICE TYPE (0x99) — javlja DT0 (fluorescentna), DT6 (LED driver), DT8 (boja / podesiva bijela) itd. ili -- kad nema odgovora.
Physical Min Level	Hardverski određena najmanja razina prigušivanja koju javlja predspojna naprava — čita se iz QUERY PHYSICAL MIN LEVEL (0x9A), u postocima.
Max Level	Postavljeni DALI MAX LEVEL — čita se iz QUERY MAX LEVEL (0xA1); koristi se kao gornja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Min Level	Postavljeni DALI MIN LEVEL — čita se iz QUERY MIN LEVEL (0xA2); koristi se kao donja granica pri preslikavanju TapHome 0–100 % u DALI razinu snage (arc power).
Power Up Level	Svjetlina koja se vraća nakon ponovne uspostave napajanja sabirnice DALI — čita se iz QUERY POWER ON LEVEL (0xA3).
System Failure Level	Svjetlina na koju se prelazi kad sabirnica DALI izgubi komunikaciju dulje od 500 ms — čita se iz QUERY SYSTEM FAILURE LEVEL (0xA4).
Grupe	Zarezima odvojen popis DALI grupa (0–15) kojima pripada predspojna naprava — dekodiran iz QUERY GROUPS 0-7 (0xC0) i QUERY GROUPS 8-15 (0xC1); prikazuje None ili npr. 0,3,7.
Support Lamp Failure	Podržava li žarulja / driver otkrivanje kvara žarulje — Yes / No / --. Uvjetuje grešku Lamp failure! u periodičkoj skripti čitanja.
Support Power Failure	Podržava li žarulja / driver otkrivanje kvara napajanja — Yes / No / --. Uvjetuje grešku Power failure! u periodičkoj skripti čitanja.

Servisne radnje

Add to Group	Dodaje ovu predspojnu napravu u DALI grupu (0–15) naredbom ADD TO GROUP (0x60+grp) — automatski se ponavlja unutar 100 ms, kako je potrebno za DALI konfiguracijske naredbe.
Remove from Group	Uklanja ovu predspojnu napravu iz DALI grupe (0–15) naredbom REMOVE FROM GROUP (0x70+grp).
Reset to Default Settings	Šalje DALI RESET (0x20) — vraća sve NVM parametre predspojne naprave (najveću / najmanju razinu, razinu pri uključenju i pri kvaru sustava, članstvo u grupama, scene) na tvorničke vrijednosti proizvođača.
Set Startup Levels	Preuzima trenutačnu razinu snage (arc power) i sprema je kao Power On Level i System Failure Level — slijed STORE ACTUAL LEVEL IN DTR (0x21) → STORE DTR AS POWER ON LEVEL (0x2C) → STORE DTR AS SYSTEM FAILURE LEVEL (0x2D).

Gear 63

Čitanje (modul)

var x := 0; var rx := 0;
if Status > 0
    Status := Status -1;
    adderror("Gear not responding!");
    return(0);
end

checkStatus := checkStatus -1;
if checkStatus < 1
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if x != 0x8000
        if x != 0xFF
        Status := RANDINT(10, 60);
            adderror("Gear not present!");
        else
            Status := 0;
            checkStatus := 60;
        end
    else
        Status := RANDINT(10, 60);
        adderror("Gear not responding!");
    end
end
    
if suppLampFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Lamp failure!"), 0), 0);
end

if suppPowerFailure
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, if (x != 0xFF, adderror("Power failure!"), 0), 0);       
end

Inicijalizacija

var x := 0; var rx := 0;
modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x91);
sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
x := modbusr(SH, 511, uint16);
if x != 0x8000
    if x != 0xFF
    Status := RANDINT(1, 60);
    else
        Status := 0;
    end
else
    Status := RANDINT(1, 60);
end

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, minLevel := x );
    
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000, maxLevel := x );
end

Čitanje razine

var x := 0; var rx := 0;
if Status = 0
    if minLevel = 0
        modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
        sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
        x := modbusr(SH, 511, uint16);
        if (x != 0x8000, minLevel := x );
    end
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    x := modbusr(SH, 511, uint16);
    if (x != 0x8000 or rx, checkStatus := 60);
    if (x != 0x8000 and x != 0xff, return( if(x = 0, 0, linear(x , minLevel, 0.01, maxLevel, 1))  ), return (Le));
else
    return(NaN);
end

Zapis razine

var level := 0;
if(Le > 0, level := round(linear(Le, 0.01, minLevel, 1, maxLevel)));
modbusw(SH, 510, uint16, (ShortAddress << 8) + level );

Servisni atributi

${xml_short_address}

ShortAddress

${xml_device_type}

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x99);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return("DT" + x));
end

return("--")

Physical Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9A);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Max Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA1);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Min Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA2);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

Power Up Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA3);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

System Failure Level

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xA4);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, return(round((x / 0xFE) * 100) + " %"));
end

return("--")

${xml_groups}

var x := 0; var rx := 0;
if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC0);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g1 := modbusr(SH, 511, uint16);
    if (g1 = 0x8000, return("--")); 

    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0xC1);
    sleep(5); rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var g2 := modbusr(SH, 511, uint16);
    if (g2 = 0x8000, return("--")); 

    var ret := "";

    if (getbit(g1, 0), ret := ret + "0");
    if (getbit(g1, 1), if (ret = "", ret := "1", ret := ret + ",1"));
    if (getbit(g1, 2), if (ret = "", ret := "2", ret := ret + ",2"));
    if (getbit(g1, 3), if (ret = "", ret := "3", ret := ret + ",3"));
    if (getbit(g1, 4), if (ret = "", ret := "4", ret := ret + ",4"));
    if (getbit(g1, 5), if (ret = "", ret := "5", ret := ret + ",5"));
    if (getbit(g1, 6), if (ret = "", ret := "6", ret := ret + ",6"));
    if (getbit(g1, 7), if (ret = "", ret := "7", ret := ret + ",7"));
    if (getbit(g2, 0), if (ret = "", ret := "8", ret := ret + ",8"));
    if (getbit(g2, 1), if (ret = "", ret := "9", ret := ret + ",9"));
    if (getbit(g2, 2), if (ret = "", ret := "10", ret := ret + ",10"));
    if (getbit(g2, 3), if (ret = "", ret := "11", ret := ret + ",11"));
    if (getbit(g2, 4), if (ret = "", ret := "12", ret := ret + ",12"));
    if (getbit(g2, 5), if (ret = "", ret := "13", ret := ret + ",13"));
    if (getbit(g2, 6), if (ret = "", ret := "14", ret := ret + ",14"));
    if (getbit(g2, 7), if (ret = "", ret := "15", ret := ret + ",15"));

    if (ret = "", return("None"), return(ret));
else
    return("--");
end

Support Lamp Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x92);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppLampFailure := 1, suppLampFailure := 0);

    if (suppLampFailure, return("Yes"), return("No"));
end

return("--")

Support Power Failure

if Status = 0
    modbusw(SH, 511, uint16, (ShortAddress << 8) + 0x9B);
    sleep(5); var rx := getbits(modbusr(SH, 550, uint16), 0, 2); if(rx, 0, sleep(50));
    var x := modbusr(SH, 511, uint16);
    if (x != 0x8000, suppPowerFailure := 1, suppPowerFailure := 0);

    if (suppPowerFailure, return("Yes"), return("No"));
end

return("--")

Servisne radnje

${xml_add_to_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x60 + grp);

${xml_remove_from_group}

Parametri: Group ID (0–15 grp)

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x70 + grp);

${xml_reset_to_default_settings}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x20);

${xml_set_startup_levels}

modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x21);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2c);
sleep(10);
modbusw(SH, 512, uint16, (ShortAddress << 8) + 0x2d);

Group 0 Dimer

DALI grupa 0 (0–15) — TapHome dimer samo za upis koji jednu vrijednost razine snage (arc power) skupno šalje svakoj predspojnoj napravi u ovoj grupi preko H:520 GROUP LEVEL. Sabirnica ne vraća razine grupa, pa TapHome zadržava posljednju upisanu vrijednost.

UInt16 Jedinica: % numeric

Servisne radnje

Add All Lamps to Group	Skupno šalje ADD TO GROUP preko H:532 ALL COMMAND + REPEAT — svaka predspojna naprava na sabirnici pridružuje se ovoj grupi bez obzira na svoju trenutačnu kratku adresu.
Remove All Lamps from Group	Skupno šalje REMOVE FROM GROUP preko H:532 ALL COMMAND + REPEAT — svaka predspojna naprava na sabirnici napušta ovu grupu.

Group 0

Zapis razine

var GroupAddress := 0;
modbusw(SH, 520, uint16, (GroupAddress << 8) + (Le * 0xFE));

Servisne radnje

${xml_add_to_group_all_lamps}

var GroupAddress := 0;
modbusw(SH, 532, uint16, 0x60 + GroupAddress)

${xml_remove_from_group_all_lamps}

var GroupAddress := 0;
modbusw(SH, 532, uint16, 0x70 + GroupAddress)

Group 1 Dimer

DALI grupa 1 (0–15) — TapHome dimer samo za upis koji jednu vrijednost razine snage (arc power) skupno šalje svakoj predspojnoj napravi u ovoj grupi preko H:520 GROUP LEVEL. Sabirnica ne vraća razine grupa, pa TapHome zadržava posljednju upisanu vrijednost.

UInt16 Jedinica: % numeric

Servisne radnje

Add All Lamps to Group	Skupno šalje ADD TO GROUP preko H:532 ALL COMMAND + REPEAT — svaka predspojna naprava na sabirnici pridružuje se ovoj grupi bez obzira na svoju trenutačnu kratku adresu.
Remove All Lamps from Group	Skupno šalje REMOVE FROM GROUP preko H:532 ALL COMMAND + REPEAT — svaka predspojna naprava na sabirnici napušta ovu grupu.

Group 1

Zapis razine

var GroupAddress := 1;
modbusw(SH, 520, uint16, (GroupAddress << 8) + (Le * 0xFE));

Servisne radnje

${xml_add_to_group_all_lamps}

var GroupAddress := 1;
modbusw(SH, 532, uint16, 0x60 + GroupAddress)

${xml_remove_from_group_all_lamps}

var GroupAddress := 1;
modbusw(SH, 532, uint16, 0x70 + GroupAddress)

Group 2 Dimer

DALI grupa 2 (0–15) — TapHome dimer samo za upis koji jednu vrijednost razine snage (arc power) skupno šalje svakoj predspojnoj napravi u ovoj grupi preko H:520 GROUP LEVEL. Sabirnica ne vraća razine grupa, pa TapHome zadržava posljednju upisanu vrijednost.

UInt16 Jedinica: % numeric

Servisne radnje

Add All Lamps to Group	Skupno šalje ADD TO GROUP preko H:532 ALL COMMAND + REPEAT — svaka predspojna naprava na sabirnici pridružuje se ovoj grupi bez obzira na svoju trenutačnu kratku adresu.
Remove All Lamps from Group	Skupno šalje REMOVE FROM GROUP preko H:532 ALL COMMAND + REPEAT — svaka predspojna naprava na sabirnici napušta ovu grupu.

Group 2

Zapis razine

var GroupAddress := 2;
modbusw(SH, 520, uint16, (GroupAddress << 8) + (Le * 0xFE));

Servisne radnje

${xml_add_to_group_all_lamps}

var GroupAddress := 2;
modbusw(SH, 532, uint16, 0x60 + GroupAddress)

${xml_remove_from_group_all_lamps}

var GroupAddress := 2;
modbusw(SH, 532, uint16, 0x70 + GroupAddress)

Group 3 Dimer

DALI grupa 3 (0–15) — TapHome dimer samo za upis koji jednu vrijednost razine snage (arc power) skupno šalje svakoj predspojnoj napravi u ovoj grupi preko H:520 GROUP LEVEL. Sabirnica ne vraća razine grupa, pa TapHome zadržava posljednju upisanu vrijednost.

UInt16 Jedinica: % numeric

Servisne radnje

Add All Lamps to Group	Skupno šalje ADD TO GROUP preko H:532 ALL COMMAND + REPEAT — svaka predspojna naprava na sabirnici pridružuje se ovoj grupi bez obzira na svoju trenutačnu kratku adresu.
Remove All Lamps from Group	Skupno šalje REMOVE FROM GROUP preko H:532 ALL COMMAND + REPEAT — svaka predspojna naprava na sabirnici napušta ovu grupu.

Group 3

Zapis razine

var GroupAddress := 3;
modbusw(SH, 520, uint16, (GroupAddress << 8) + (Le * 0xFE));

Servisne radnje

${xml_add_to_group_all_lamps}

var GroupAddress := 3;
modbusw(SH, 532, uint16, 0x60 + GroupAddress)

${xml_remove_from_group_all_lamps}

var GroupAddress := 3;
modbusw(SH, 532, uint16, 0x70 + GroupAddress)

Group 4 Dimer

DALI grupa 4 (0–15) — TapHome dimer samo za upis koji jednu vrijednost razine snage (arc power) skupno šalje svakoj predspojnoj napravi u ovoj grupi preko H:520 GROUP LEVEL. Sabirnica ne vraća razine grupa, pa TapHome zadržava posljednju upisanu vrijednost.

UInt16 Jedinica: % numeric

Servisne radnje

Add All Lamps to Group	Skupno šalje ADD TO GROUP preko H:532 ALL COMMAND + REPEAT — svaka predspojna naprava na sabirnici pridružuje se ovoj grupi bez obzira na svoju trenutačnu kratku adresu.
Remove All Lamps from Group	Skupno šalje REMOVE FROM GROUP preko H:532 ALL COMMAND + REPEAT — svaka predspojna naprava na sabirnici napušta ovu grupu.

Group 4

Zapis razine

var GroupAddress := 4;
modbusw(SH, 520, uint16, (GroupAddress << 8) + (Le * 0xFE));

Servisne radnje

${xml_add_to_group_all_lamps}

var GroupAddress := 4;
modbusw(SH, 532, uint16, 0x60 + GroupAddress)

${xml_remove_from_group_all_lamps}

var GroupAddress := 4;
modbusw(SH, 532, uint16, 0x70 + GroupAddress)

Group 5 Dimer

DALI grupa 5 (0–15) — TapHome dimer samo za upis koji jednu vrijednost razine snage (arc power) skupno šalje svakoj predspojnoj napravi u ovoj grupi preko H:520 GROUP LEVEL. Sabirnica ne vraća razine grupa, pa TapHome zadržava posljednju upisanu vrijednost.

UInt16 Jedinica: % numeric

Servisne radnje

Add All Lamps to Group	Skupno šalje ADD TO GROUP preko H:532 ALL COMMAND + REPEAT — svaka predspojna naprava na sabirnici pridružuje se ovoj grupi bez obzira na svoju trenutačnu kratku adresu.
Remove All Lamps from Group	Skupno šalje REMOVE FROM GROUP preko H:532 ALL COMMAND + REPEAT — svaka predspojna naprava na sabirnici napušta ovu grupu.

Group 5

Zapis razine

var GroupAddress := 5;
modbusw(SH, 520, uint16, (GroupAddress << 8) + (Le * 0xFE));

Servisne radnje

${xml_add_to_group_all_lamps}

var GroupAddress := 5;
modbusw(SH, 532, uint16, 0x60 + GroupAddress)

${xml_remove_from_group_all_lamps}

var GroupAddress := 5;
modbusw(SH, 532, uint16, 0x70 + GroupAddress)

Group 6 Dimer

DALI grupa 6 (0–15) — TapHome dimer samo za upis koji jednu vrijednost razine snage (arc power) skupno šalje svakoj predspojnoj napravi u ovoj grupi preko H:520 GROUP LEVEL. Sabirnica ne vraća razine grupa, pa TapHome zadržava posljednju upisanu vrijednost.

UInt16 Jedinica: % numeric

Servisne radnje

Add All Lamps to Group	Skupno šalje ADD TO GROUP preko H:532 ALL COMMAND + REPEAT — svaka predspojna naprava na sabirnici pridružuje se ovoj grupi bez obzira na svoju trenutačnu kratku adresu.
Remove All Lamps from Group	Skupno šalje REMOVE FROM GROUP preko H:532 ALL COMMAND + REPEAT — svaka predspojna naprava na sabirnici napušta ovu grupu.

Group 6

Zapis razine

var GroupAddress := 6;
modbusw(SH, 520, uint16, (GroupAddress << 8) + (Le * 0xFE));

Servisne radnje

${xml_add_to_group_all_lamps}

var GroupAddress := 6;
modbusw(SH, 532, uint16, 0x60 + GroupAddress)

${xml_remove_from_group_all_lamps}

var GroupAddress := 6;
modbusw(SH, 532, uint16, 0x70 + GroupAddress)

Group 7 Dimer

DALI grupa 7 (0–15) — TapHome dimer samo za upis koji jednu vrijednost razine snage (arc power) skupno šalje svakoj predspojnoj napravi u ovoj grupi preko H:520 GROUP LEVEL. Sabirnica ne vraća razine grupa, pa TapHome zadržava posljednju upisanu vrijednost.

UInt16 Jedinica: % numeric

Servisne radnje

Add All Lamps to Group	Skupno šalje ADD TO GROUP preko H:532 ALL COMMAND + REPEAT — svaka predspojna naprava na sabirnici pridružuje se ovoj grupi bez obzira na svoju trenutačnu kratku adresu.
Remove All Lamps from Group	Skupno šalje REMOVE FROM GROUP preko H:532 ALL COMMAND + REPEAT — svaka predspojna naprava na sabirnici napušta ovu grupu.

Group 7

Zapis razine

var GroupAddress := 7;
modbusw(SH, 520, uint16, (GroupAddress << 8) + (Le * 0xFE));

Servisne radnje

${xml_add_to_group_all_lamps}

var GroupAddress := 7;
modbusw(SH, 532, uint16, 0x60 + GroupAddress)

${xml_remove_from_group_all_lamps}

var GroupAddress := 7;
modbusw(SH, 532, uint16, 0x70 + GroupAddress)

Group 8 Dimer

DALI grupa 8 (0–15) — TapHome dimer samo za upis koji jednu vrijednost razine snage (arc power) skupno šalje svakoj predspojnoj napravi u ovoj grupi preko H:520 GROUP LEVEL. Sabirnica ne vraća razine grupa, pa TapHome zadržava posljednju upisanu vrijednost.

UInt16 Jedinica: % numeric

Servisne radnje

Add All Lamps to Group	Skupno šalje ADD TO GROUP preko H:532 ALL COMMAND + REPEAT — svaka predspojna naprava na sabirnici pridružuje se ovoj grupi bez obzira na svoju trenutačnu kratku adresu.
Remove All Lamps from Group	Skupno šalje REMOVE FROM GROUP preko H:532 ALL COMMAND + REPEAT — svaka predspojna naprava na sabirnici napušta ovu grupu.

Group 8

Zapis razine

var GroupAddress := 8;
modbusw(SH, 520, uint16, (GroupAddress << 8) + (Le * 0xFE));

Servisne radnje

${xml_add_to_group_all_lamps}

var GroupAddress := 8;
modbusw(SH, 532, uint16, 0x60 + GroupAddress)

${xml_remove_from_group_all_lamps}

var GroupAddress := 8;
modbusw(SH, 532, uint16, 0x70 + GroupAddress)

Group 9 Dimer

DALI grupa 9 (0–15) — TapHome dimer samo za upis koji jednu vrijednost razine snage (arc power) skupno šalje svakoj predspojnoj napravi u ovoj grupi preko H:520 GROUP LEVEL. Sabirnica ne vraća razine grupa, pa TapHome zadržava posljednju upisanu vrijednost.

UInt16 Jedinica: % numeric

Servisne radnje

Add All Lamps to Group	Skupno šalje ADD TO GROUP preko H:532 ALL COMMAND + REPEAT — svaka predspojna naprava na sabirnici pridružuje se ovoj grupi bez obzira na svoju trenutačnu kratku adresu.
Remove All Lamps from Group	Skupno šalje REMOVE FROM GROUP preko H:532 ALL COMMAND + REPEAT — svaka predspojna naprava na sabirnici napušta ovu grupu.

Group 9

Zapis razine

var GroupAddress := 9;
modbusw(SH, 520, uint16, (GroupAddress << 8) + (Le * 0xFE));

Servisne radnje

${xml_add_to_group_all_lamps}

var GroupAddress := 9;
modbusw(SH, 532, uint16, 0x60 + GroupAddress)

${xml_remove_from_group_all_lamps}

var GroupAddress := 9;
modbusw(SH, 532, uint16, 0x70 + GroupAddress)

Group 10 Dimer

DALI grupa 10 (0–15) — TapHome dimer samo za upis koji jednu vrijednost razine snage (arc power) skupno šalje svakoj predspojnoj napravi u ovoj grupi preko H:520 GROUP LEVEL. Sabirnica ne vraća razine grupa, pa TapHome zadržava posljednju upisanu vrijednost.

UInt16 Jedinica: % numeric

Servisne radnje

Add All Lamps to Group	Skupno šalje ADD TO GROUP preko H:532 ALL COMMAND + REPEAT — svaka predspojna naprava na sabirnici pridružuje se ovoj grupi bez obzira na svoju trenutačnu kratku adresu.
Remove All Lamps from Group	Skupno šalje REMOVE FROM GROUP preko H:532 ALL COMMAND + REPEAT — svaka predspojna naprava na sabirnici napušta ovu grupu.

Group 10

Zapis razine

var GroupAddress := 10;
modbusw(SH, 520, uint16, (GroupAddress << 8) + (Le * 0xFE));

Servisne radnje

${xml_add_to_group_all_lamps}

var GroupAddress := 10;
modbusw(SH, 532, uint16, 0x60 + GroupAddress)

${xml_remove_from_group_all_lamps}

var GroupAddress := 10;
modbusw(SH, 532, uint16, 0x70 + GroupAddress)

Group 11 Dimer

DALI grupa 11 (0–15) — TapHome dimer samo za upis koji jednu vrijednost razine snage (arc power) skupno šalje svakoj predspojnoj napravi u ovoj grupi preko H:520 GROUP LEVEL. Sabirnica ne vraća razine grupa, pa TapHome zadržava posljednju upisanu vrijednost.

UInt16 Jedinica: % numeric

Servisne radnje

Add All Lamps to Group	Skupno šalje ADD TO GROUP preko H:532 ALL COMMAND + REPEAT — svaka predspojna naprava na sabirnici pridružuje se ovoj grupi bez obzira na svoju trenutačnu kratku adresu.
Remove All Lamps from Group	Skupno šalje REMOVE FROM GROUP preko H:532 ALL COMMAND + REPEAT — svaka predspojna naprava na sabirnici napušta ovu grupu.

Group 11

Zapis razine

var GroupAddress := 11;
modbusw(SH, 520, uint16, (GroupAddress << 8) + (Le * 0xFE));

Servisne radnje

${xml_add_to_group_all_lamps}

var GroupAddress := 11;
modbusw(SH, 532, uint16, 0x60 + GroupAddress)

${xml_remove_from_group_all_lamps}

var GroupAddress := 11;
modbusw(SH, 532, uint16, 0x70 + GroupAddress)

Group 12 Dimer

DALI grupa 12 (0–15) — TapHome dimer samo za upis koji jednu vrijednost razine snage (arc power) skupno šalje svakoj predspojnoj napravi u ovoj grupi preko H:520 GROUP LEVEL. Sabirnica ne vraća razine grupa, pa TapHome zadržava posljednju upisanu vrijednost.

UInt16 Jedinica: % numeric

Servisne radnje

Add All Lamps to Group	Skupno šalje ADD TO GROUP preko H:532 ALL COMMAND + REPEAT — svaka predspojna naprava na sabirnici pridružuje se ovoj grupi bez obzira na svoju trenutačnu kratku adresu.
Remove All Lamps from Group	Skupno šalje REMOVE FROM GROUP preko H:532 ALL COMMAND + REPEAT — svaka predspojna naprava na sabirnici napušta ovu grupu.

Group 12

Zapis razine

var GroupAddress := 12;
modbusw(SH, 520, uint16, (GroupAddress << 8) + (Le * 0xFE));

Servisne radnje

${xml_add_to_group_all_lamps}

var GroupAddress := 12;
modbusw(SH, 532, uint16, 0x60 + GroupAddress)

${xml_remove_from_group_all_lamps}

var GroupAddress := 12;
modbusw(SH, 532, uint16, 0x70 + GroupAddress)

Group 13 Dimer

DALI grupa 13 (0–15) — TapHome dimer samo za upis koji jednu vrijednost razine snage (arc power) skupno šalje svakoj predspojnoj napravi u ovoj grupi preko H:520 GROUP LEVEL. Sabirnica ne vraća razine grupa, pa TapHome zadržava posljednju upisanu vrijednost.

UInt16 Jedinica: % numeric

Servisne radnje

Add All Lamps to Group	Skupno šalje ADD TO GROUP preko H:532 ALL COMMAND + REPEAT — svaka predspojna naprava na sabirnici pridružuje se ovoj grupi bez obzira na svoju trenutačnu kratku adresu.
Remove All Lamps from Group	Skupno šalje REMOVE FROM GROUP preko H:532 ALL COMMAND + REPEAT — svaka predspojna naprava na sabirnici napušta ovu grupu.

Group 13

Zapis razine

var GroupAddress := 13;
modbusw(SH, 520, uint16, (GroupAddress << 8) + (Le * 0xFE));

Servisne radnje

${xml_add_to_group_all_lamps}

var GroupAddress := 13;
modbusw(SH, 532, uint16, 0x60 + GroupAddress)

${xml_remove_from_group_all_lamps}

var GroupAddress := 13;
modbusw(SH, 532, uint16, 0x70 + GroupAddress)

Group 14 Dimer

DALI grupa 14 (0–15) — TapHome dimer samo za upis koji jednu vrijednost razine snage (arc power) skupno šalje svakoj predspojnoj napravi u ovoj grupi preko H:520 GROUP LEVEL. Sabirnica ne vraća razine grupa, pa TapHome zadržava posljednju upisanu vrijednost.

UInt16 Jedinica: % numeric

Servisne radnje

Add All Lamps to Group	Skupno šalje ADD TO GROUP preko H:532 ALL COMMAND + REPEAT — svaka predspojna naprava na sabirnici pridružuje se ovoj grupi bez obzira na svoju trenutačnu kratku adresu.
Remove All Lamps from Group	Skupno šalje REMOVE FROM GROUP preko H:532 ALL COMMAND + REPEAT — svaka predspojna naprava na sabirnici napušta ovu grupu.

Group 14

Zapis razine

var GroupAddress := 14;
modbusw(SH, 520, uint16, (GroupAddress << 8) + (Le * 0xFE));

Servisne radnje

${xml_add_to_group_all_lamps}

var GroupAddress := 14;
modbusw(SH, 532, uint16, 0x60 + GroupAddress)

${xml_remove_from_group_all_lamps}

var GroupAddress := 14;
modbusw(SH, 532, uint16, 0x70 + GroupAddress)

Group 15 Dimer

DALI grupa 15 (0–15) — TapHome dimer samo za upis koji jednu vrijednost razine snage (arc power) skupno šalje svakoj predspojnoj napravi u ovoj grupi preko H:520 GROUP LEVEL. Sabirnica ne vraća razine grupa, pa TapHome zadržava posljednju upisanu vrijednost.

UInt16 Jedinica: % numeric

Servisne radnje

Add All Lamps to Group	Skupno šalje ADD TO GROUP preko H:532 ALL COMMAND + REPEAT — svaka predspojna naprava na sabirnici pridružuje se ovoj grupi bez obzira na svoju trenutačnu kratku adresu.
Remove All Lamps from Group	Skupno šalje REMOVE FROM GROUP preko H:532 ALL COMMAND + REPEAT — svaka predspojna naprava na sabirnici napušta ovu grupu.

Group 15

Zapis razine

var GroupAddress := 15;
modbusw(SH, 520, uint16, (GroupAddress << 8) + (Le * 0xFE));

Servisne radnje

${xml_add_to_group_all_lamps}

var GroupAddress := 15;
modbusw(SH, 532, uint16, 0x60 + GroupAddress)

${xml_remove_from_group_all_lamps}

var GroupAddress := 15;
modbusw(SH, 532, uint16, 0x70 + GroupAddress)

Povezivanje: Modbus RTU • 9600 baud• 8N1 • Slave ID: $[SlaveId]

Moguća poboljšanja (23)

H:531 ALL COMMAND (broadcast DALI command) — Single-shot broadcast DALI command (no repeat). Template uses H:532 (ALL COMMAND + REPEAT) for group membership but never exposes plain ALL OFF / ALL ON / ALL ARC POWER as a service action — turn-on/off-all are not present (sibling daliconfig template has them via H:530)
H:530 ALL LEVEL (broadcast arc power) — Sets brightness for every gear in one Modbus write. Convenient 'turn off all lamps' / 'turn on all lamps' shortcut — implemented in the sibling daliconfig template, missing in this operational template
H:521 GROUP COMMAND (per-group DALI command) — Per-group DALI command (single-shot). Could expose group-level OFF / RECALL MIN / RECALL MAX / GO TO SCENE as service actions on each Group device, but template only writes H:520 GROUP LEVEL
H:522 GROUP COMMAND + REPEAT — Per-group DALI configuration command (auto-repeated within 100 ms). Required for STORE DTR AS GROUP SCENE etc. — not exposed as a service action
H:541 DIRECT 16-BIT FRAME — Raw DALI 1.0 frame send. Used by sibling daliconfig template for the DALI 2.0 random-addressing algorithm; not needed for runtime brightness control
I:10020-I:10027 DALI 24-BIT FRAME — DALI 2.0 24-bit frames — required for DT8 colour control (XY, colour temperature, RGBW), DALI 2.0 control gear queries, and DALI-2 input devices (push-buttons, presence detectors). Template exposes only DALI 1.0 brightness layer per gear
I:10030-I:10047 DALI 25-BIT eDALI FRAME — Lunatone-proprietary 25-bit eDALI frames (auto and user redundant-bit variants). Not used by any DALI 1.0 gear
I:10050-I:10067 DALI 28-BIT / 32-BIT FRAME — Extended DALI 2.0 frames (memory bank access, DALI-2 application controllers). Template scope is single-channel arc power per gear
H:500 (DSI VALUE) DSI 8-bit value send — Send a raw 8-bit DSI/DALI value with no addressing (bus-level diagnostics). Bypassed by every TapHome script
C:0 / H:551 DALI Bus Error — 1 = DALI bus fault / short circuit / missing PSU. Useful diagnostic — could be added as a module-level service attribute. Currently bus errors only surface indirectly through 'Gear not responding!' errors emitted by per-gear readscripts
H:100 DALI PRIORITY SLOT — 0..4 → 12-16 ms forward-frame timing. Default 2 (configuration). Bus-tuning parameter; template runs at default
H:6000 DIP SWITCH / SOFTWARE RESET — Read returns the 4 DIP switch values; write 1 reboots the gateway. Sibling daliconfig template exposes Reset Gateway / Set Slave ID; this runtime template intentionally does not (commissioning concern)
H:65222 / H:65224 / H:65225 BAUD_RATE / PARITY / STOP_BITS (FLASH) — FLASH-stored serial parameters. Template hard-codes 9600 8N1 in connection_details, so these are out of scope
I:0 / I:50-I:53 / scenes DALI 1.0 scenes (recall / store / query) — DALI 1.0 standard supports 16 stored scenes per gear/group recallable via GO TO SCENE (0x10..0x1F) and storable via STORE DTR AS SCENE (0x40..0x4F). Template exposes per-gear ADD/REMOVE FROM GROUP and RESET, but no scene recall/store/remove/query actions
H:512 (RECALL MAX/MIN/GOTO LAST/UP/DOWN/STEP) DALI 1.0 high-level commands per gear — RECALL MAX LEVEL (0x05), RECALL MIN LEVEL (0x06), UP (0x01), DOWN (0x02), STEP UP (0x03), STEP DOWN (0x04), GO TO LAST ACTIVE LEVEL (0x0A) — useful as service actions for visual feedback / smooth dimming. Not exposed; brightness goes only through linear scaling
H:512 (STORE DTR AS MAX/MIN/POWER ON/SYSTEM FAILURE LEVEL) Per-gear configuration write commands — STORE DTR AS MAX LEVEL (0x2A), STORE DTR AS MIN LEVEL (0x2B), STORE DTR AS POWER ON LEVEL (0x2C), STORE DTR AS SYSTEM FAILURE LEVEL (0x2D), STORE DTR AS FADE TIME / FADE RATE — template has 'Set Startup Levels' (combines 0x21, 0x2C, 0x2D) but does NOT expose individual writes for max/min/fade-time/fade-rate
H:511 (QUERY FADE TIME / FADE RATE / RANDOM ADDRESS / EXT VERSION) Additional DALI queries — QUERY FADE TIME / FADE RATE (0xA5), QUERY VERSION NUMBER (0x97), QUERY RANDOM ADDRESS H/M/L (0x98/0xC2/0xC3), QUERY CONTENT DTR/DTR1/DTR2 — not exposed in service attributes, only the 10 attributes listed per gear are populated
H:511 (QUERY CONTROL GEAR / RESET STATE / LIMIT ERROR / LAMP POWER ON / MISSING SHORT ADDRESS) DALI gear health / topology queries — QUERY CONTROL GEAR (0x90), QUERY RESET STATE (0x95), QUERY LIMIT ERROR (0x94), QUERY LAMP POWER ON (0x93), QUERY MISSING SHORT ADDRESS (0x96, broadcast) — diagnostic queries. Could be useful as module-level diagnostics; template exposes only QUERY STATUS / LAMP FAILURE / POWER FAILURE / DEVICE TYPE / MIN-MAX-PHYSICAL MIN-POWER UP-SYSTEM FAILURE LEVEL / GROUPS
H:511 (READ MEMORY LOCATION 0xC5) DALI memory bank read — READ MEMORY LOCATION (0xC5) is required to read DALI 2.0 memory banks (Bank 0 device GTIN, FW version, serial number; Bank 1 for emergency lighting). Not used
ASCII protocol commands Parallel ASCII text protocol — RESI gateway also exposes a CR-terminated text protocol (#LARC, #GARC, #AARC, #LGS, #LCMD, #LCMDA, #DALI CMDxx etc.). Template uses Modbus exclusively — ASCII would only matter for diagnostics/terminal access
DT6 fade time / fade rate / DAPC sequence Smooth dimming primitives — DAPC (Direct Arc Power Control) sequence allows fast continuous level updates for smooth dimming. Each gear has stored fade time / fade rate that affect transitions. Template writes raw arc power without configuring fade behaviour
DT8 colour control (XY, colour temperature, RGBW) DALI DT8 tunable white / RGB / RGBW — DT8 colour control gears (tunable white CCT, XY colour, RGBW) require DALI 2.0 24-bit frames sent via H:541 / I:10020. Template exposes plain ModbusDimmer per gear — for DT8 lamps use a dedicated DT8 template
DT1 emergency lighting DALI DT1 self-contained emergency lights — Emergency-luminaire device type with periodic self-tests (function/duration test) and battery state queries. Out of scope — template is general-purpose dimming

Preuzmite predložak

Izvori

RESI-DALI-SIO/ETH Modbus & ASCII protocol reference
www.resi.cc 2026-04-25
PDF
RESI-xxx-SIO, RESI-xxx-ETH hardware & software manual (DALI chapter)
www.resi.cc 2026-04-25
PDF
RESI-DALI-SIO datasheet (GW-28)
www.resi.cc 2026-04-25
PDF
RESI-DALI-ETH datasheet (GW-29)
www.resi.cc 2026-04-25
PDF
RESI-DALI-PS datasheet (GW-30)
www.resi.cc 2026-04-25
PDF
RESI-DALI-SIO,ETH,PS product page
www.resi.cc 2026-04-25

Pronašli ste problem s ovim predloškom uređaja?

Recite nam što ne radi, što nedostaje ili kako bi se predložak trebao ponašati. Vaše povratne informacije pomažu nam da katalog bude točan.

Provjerio TapHome

Želite ovo koristiti u svojoj centralnoj jedinici TapHome Core?

Otvorite ovaj predložak na portalu Customer Portal kako biste ga primijenili na jedan od svojih domova ili predložili poboljšanje i poslali ga natrag u katalog.

Otvorite na portalu

Resi DALI

Hardversko spajanje#

Spajanje RESI-DALI-SIO (RS-485)

Spajanje RESI-DALI-ETH (Ethernet)

Napajanje sabirnice DALI (RESI-DALI-PS)

Topologija sabirnice DALI

Konfiguracija#

Uključivanje Modbus komunikacije

Slave ID

Postavljanje RTU preko TCP-a

Odnos s predloškom za puštanje u rad#

Mogućnosti uređaja#

Prigušivanje svake predspojne naprave — Gear 0 … Gear 63

Konfiguracijske radnje za svaku predspojnu napravu

Prigušivanje grupa — Group 0 … Group 15

Dijagnostika na razini modula

Rješavanje problema#

“Gear not present!” na predspojnoj napravi s poznatom adresom

Prigušivanje grupe nema učinka

Kvar žarulje / kvar napajanja se ne javlja

Povremene Modbus greške nakon puštanja u rad

Dostupni uređaji

Resi Dali

Gear 0

Gear 1

Gear 2

Gear 3

Gear 4

Gear 5

Gear 6

Gear 7

Gear 8

Gear 9

Gear 10

Gear 11

Gear 12

Gear 13

Gear 14

Gear 15

Gear 16

Gear 17

Gear 18

Gear 19

Gear 20

Gear 21

Gear 22

Gear 23

Gear 24

Gear 25

Gear 26

Gear 27

Gear 28

Gear 29

Gear 30

Gear 31

Gear 32

Gear 33

Gear 34

Gear 35

Gear 36

Gear 37

Gear 38

Gear 39

Gear 40

Gear 41

Gear 42

Gear 43

Gear 44

Gear 45

Gear 46

Gear 47

Gear 48

Gear 49

Gear 50

Gear 51

Gear 52

Gear 53

Gear 54

Gear 55

Gear 56

Hardversko spajanje

Konfiguracija

Odnos s predloškom za puštanje u rad

Mogućnosti uređaja

Rješavanje problema