Fun Runner

Rule :

The following rule will switch on a light and after 20 seconds, the light will switched off.

fun(Pid, Name, Body) -> 
  case Body of 
    "off" -> ok; 
    "on" -> sensor:send([], Name, {"Licht","11111 2","1"}),
                 sensor:send_after(Pid, Name, 20000, [], {"Licht","11111 2","0"});
        _ -> ok 
  end 
end.

When we get an motion detected signal, then we will inform the alarm thing to play a sound.

fun(Pid, Name, [Body]) -> 
  case Body of
    "on" -> sensor:send([], Name, "on");
    _ -> ok
  end
end.