-- NOTICE TO CHANGE DEVICES ID's: 
--[[ 
%% properties 
41 value 
14 value 
15 value
%% globals 
--]] 
 
-- BATHROOM SCENE FUNCTIONALITY: 
-- No extra Global variables needed! 
-- Automatic light depending of opening and closing door 
-- Time to enter - detecting another situations, like cleaning bathroom 
 
-- NOTICE TO CHANGE DEVICES ID's: 
doorID = 41; 
lightID = 14; 
fanID = 15;
 
-- time to enter, longer time will detect as another situation, like: cleaning 
timeToEnter = 5; 
 
local light = fibaro:getValue(lightID, 'value');
local fan = fibaro:getValue(fanID, 'value');
local door = fibaro:getValue(doorID, 'value'); 
local armed, lastArmed = fibaro:get(doorID, 'armed'); 
local trigger = fibaro:getSourceTrigger(); 
 
if (tonumber(fibaro:countScenes())>1) then 
  fibaro:debug('Kill second scene!'); 
  fibaro:abort(); 
end 
 
if (trigger['type']=='property') then 
 
  -- door trigger 
  if (trigger['deviceID']==tostring(doorID)) then 
 
    -- door opened 
    if (door=='1') then 
 
      fibaro:debug('Door opened.'); 
 
      if (armed=='0') then 
        fibaro:call(lightID, 'turnOn'); 
        fibaro:call(fanID, 'turnOn');
        fibaro:call(doorID, 'setArmed', '1'); 
        fibaro:call(doorID, 'setArmed', '0'); 
        fibaro:debug('Light on!'); 
        fibaro:debug('fan on!');
      end 
 
    -- door closed 
    elseif (door=='0') then 
 
      fibaro:debug('Door closed.'); 
 
      if (armed=='1' or (os.time()-lastArmed)>=timeToEnter) then 
        fibaro:call(lightID, 'turnOff');
        fibaro:call(fanID, 'turnOff');
        fibaro:call(doorID, 'setArmed', '0'); 
        fibaro:debug('Light off, room empty!'); 
        fibaro:debug('fan off, room empty!');
      else 
        fibaro:call(doorID, 'setArmed', '1'); 
        fibaro:debug('Someone inside!'); 
      end 
 
    end 
 
  -- light manual 
  elseif (trigger['deviceID']==tostring(lightID) and (os.time()-lastArmed)>0) then 
 
    -- light manual off 
    if (light=='0') then 
      if (door=='1') then 
        -- when door are opened 
        fibaro:call(doorID, 'setArmed', '1'); 
      else 
        -- when door are closed 
        fibaro:call(doorID, 'setArmed', '0'); 
      end 
      fibaro:debug('Light manual off!');
      fibaro:debug('fan manual off!');
    -- light manual on 
    elseif (light=='1') then 
      fibaro:call(doorID, 'setArmed', '1'); 
      fibaro:debug('Light manual on, arming...'); 
    end 
 
  end 
 
end