Förbättra koden i "skalskydd"

Post Reply
Padvag
Ny medlem
Posts: 12
Joined: 10 Sep 2015, 19:47
8
Location: Tibro

Hej
Håller för fullt på att lära mig Lua och har skapat min första scen med mer än en funktion. samt en VD som styr starten.
Hoppas få lite tips runt den.

- Den viktigaste frågan är hur jag med VD:n kan stänga av sirenen när en dörr är öppen. I nuläget fortsätter det låta tills man stänger dörren även om man stängt av i VD:n. (Jag försökte med trigger på VD:n, men det verkade inte göra varken till eller från..)
- Kan man köra ljudet i brandvarnarna likadant som i en siren?
- Gärna också lite tips hur man förbättrar koden. (Det är som sagt det första jag skriver utöver "om rörelse - tänd lampa"

Code: Select all

--[[
%% properties
31 value
87 value
85 value
Skalskydd value
%% globals
--]]

local DorrsensorEntre = tonumber(fibaro:getValue(31, "value"))
local DorrsensorGroventre = tonumber(fibaro:getValue(87, "value"))
local DorrsensorKallare = tonumber(fibaro:getValue(85, "value"))

fibaro:debug("Värde dörrsensor Entré "..DorrsensorEntre)
fibaro:debug("Värde dörrsensor Groventré "..DorrsensorGroventre)
fibaro:debug("Värde dörrsensor Källardörr "..DorrsensorKallare)

local	siren = 7 	-- EnhetsID Siren är 73  

if  (DorrsensorEntre == 1 ) and
    (fibaro:getGlobalValue("Skalskydd") == "Till") or 
  	
  	(DorrsensorGroventre == 1 ) and
    (fibaro:getGlobalValue("Skalskydd") == "Till") or
  	
  	(DorrsensorKallare == 1 )   and
   	(fibaro:getGlobalValue("Skalskydd") == "Till")
  
  then
    fibaro:call(siren, "turnOn")
  	fibaro:debug("Dörr är öppen, sirenen tjuter")
  
	elseif 	
  		(DorrsensorEntre == 0 ) and
  		(DorrsensorGroventre == 0 ) and
   		(DorrsensorKallare == 0 ) or
     	(fibaro:getGlobalValue("Skalskydd") == "Från")
  then 
    fibaro:call(siren, "turnOff")
  	fibaro:debug("Alla dörrar är stängda, sirenen tyst")

end
VD:n har två knappar "Till" resp "Från"

Code: Select all

  fibaro:setGlobal("Skalskydd", "Till")
Tro inte på vad jag säger utan att testa först!
Padvag
Ny medlem
Posts: 12
Joined: 10 Sep 2015, 19:47
8
Location: Tibro

Ingen som kan komma med lite tips?
Tro inte på vad jag säger utan att testa först!
Post Reply