Holiday/Away Mode

Discussion in 'C-Touch/HomeGate/SchedulePlus/PICED Software' started by JJE, Jun 4, 2007.

  1. JJE

    JJE

    Joined:
    Dec 9, 2004
    Messages:
    27
    Likes Received:
    0
    Hi all. Just wondering if there was a Holiday/Away function becoming available via PICED that can re-enact last days activities to make the premises looked accupied. ie recall last 24 hrs log data and store as scene/schedule and have the ability to exclude GA from this function. ie roller doors ect. Every house we do we are asked the same question.
    This function would greatly enhance and in some cases justify the expense of a colour touch screen or PAC in a residential situation.
     
    JJE, Jun 4, 2007
    #1
  2. JJE

    Duncan

    Joined:
    Jul 23, 2004
    Messages:
    925
    Likes Received:
    0
    Location:
    Salinas de Garci Mendoza, Bolivia
    Do burglars really sit outside houses and monitor lights going off and on and making some kind of subjective decision on whether its a "realistic" sequence of lights that accurately reflects occupation by actual Human Beans or whether the lights are on some kind of crafty schedule to trick them?
     
    Duncan, Jun 4, 2007
    #2
  3. JJE

    Newman

    Joined:
    Aug 3, 2004
    Messages:
    2,203
    Likes Received:
    0
    Location:
    Adelaide, South Australia
    I believe Phil.H set up something that made a home look occupied in a PAC using a bit of logic and scheduling. Have a search of the forums and see what you can find.
     
    Newman, Jun 4, 2007
    #3
  4. JJE

    paulw11

    Joined:
    Dec 4, 2006
    Messages:
    93
    Likes Received:
    0
    Location:
    Blue Mountains, NSW, Australia
    script plus random

    In a previous installation I "scripted" a sequence that simulated a "normal" evening. Downstairs lights on in the evening, off later at night with bedrom/bathroom lights coming on when the downstairs went off. I added a random shift to the times of these events and factored in sunset time so that it wasn't precisely scripted.

    I am sure that something like this is more than enough to "fool" a burglar, as Duncan pointed out (Assuming that the burglar doesn't just try calling the house/ringing the doorbell/looking through the windows) ;)

    Paul
     
    paulw11, Jun 4, 2007
    #4
  5. JJE

    PSC

    Joined:
    Aug 3, 2004
    Messages:
    626
    Likes Received:
    0
    Location:
    Brisbane, Australia
    Duncan,

    As thieves are more technically advanced in Sydney than they are in Adelaide :p I like to set up a rolling 3 day random lighting schedule. This way it would take 3 weeks for a random lighting scene to activate on the same day.
     
    PSC, Jun 4, 2007
    #5
  6. JJE

    Duncan

    Joined:
    Jul 23, 2004
    Messages:
    925
    Likes Received:
    0
    Location:
    Salinas de Garci Mendoza, Bolivia
    Pete,

    I like your cunning plan. Its cunning.
     
    Duncan, Jun 4, 2007
    #6
  7. JJE

    Phil.H

    Joined:
    Jul 29, 2004
    Messages:
    466
    Likes Received:
    0
    Location:
    Sydney
    As Newman mentioned the PICED logic program I put together several months ago has a semi random lighting program to make a home look occupied. I say it is semi random because I wrote code to bring living area lights on during early evening hours + random variations and for semi random periods then brought on lights in bedroom areas later + random variations again for semi random periods. The code is really simple which makes it good. I recalculate the random variables each day so the chances of the behaviour ever looking the same is really slim - unlike PSC's silly code which he admits repeats itself every couple of weeks. ;)

    I have this running in my house and have even tricked the neighbours for several days at a time. It's handy if even the neighbours think you are around. Loose lips sink ships.

    Will dig up the training program I wrote and post it again. Wish I had a dollar for every copy of this and the serial RS232 program I have sent out... ;)
     
    Last edited by a moderator: Jun 4, 2007
    Phil.H, Jun 4, 2007
    #7
  8. JJE

    PSC

    Joined:
    Aug 3, 2004
    Messages:
    626
    Likes Received:
    0
    Location:
    Brisbane, Australia
    OK, Dr Phil.

    You show me how it can be done using a B&W touch screen... :eek:

    Sometimes you have to make do with the products installed!

    So I think my solution is a good one considering the limited product that I had to work with. :cool: :cool: :cool:

    Anyway, your neighbours told me they know when you're home because your propeller cap is hanging outside your front door... :p
     
    PSC, Jun 4, 2007
    #8
  9. JJE

    PSC

    Joined:
    Aug 3, 2004
    Messages:
    626
    Likes Received:
    0
    Location:
    Brisbane, Australia
    Yeah, and then you could live in a more prestigious suburb by the beach ;)
     
    PSC, Jun 4, 2007
    #9
  10. JJE

    Phil.H

    Joined:
    Jul 29, 2004
    Messages:
    466
    Likes Received:
    0
    Location:
    Sydney
    OK you threw me when you wrote
    Where do you get random from the (!!!current ;) B&W touch screen ? what you should have said is "random like" or "sorta random". You need to post more accurately. I am sure the context of the thread was PAC and logic. Now I know you are scared of PAC,s I grant you that your code was not "silly" as you didn't have any code. Because you are such a good friend if you ever have a need for PAC logic on one of your projects, don't be scared, give me a call I will program it for you for free. We can even tell everyone you did it :p

    As for my neighbours and my propeller cap, I will pay that one - funny bugger.

    How about best forum joke of the week = 1 hour free logic tuition. ;)
     
    Phil.H, Jun 5, 2007
    #10
  11. JJE

    2SC

    Joined:
    Oct 10, 2006
    Messages:
    344
    Likes Received:
    0
    Location:
    Athens, Greece
    Shall we start an other post? :D
     
    2SC, Jun 6, 2007
    #11
  12. JJE

    Phil.H

    Joined:
    Jul 29, 2004
    Messages:
    466
    Likes Received:
    0
    Location:
    Sydney
    2SC,

    If you start a new thread, try not to win the first prize. I think PSC could really use the logic tuition :D
     
    Phil.H, Jun 6, 2007
    #12
  13. JJE

    2SC

    Joined:
    Oct 10, 2006
    Messages:
    344
    Likes Received:
    0
    Location:
    Athens, Greece
    Phil,
    would should write:

    "If you start a new thread, try not to win the first prize. I think PSC really need the logic tuition." :p
     
    2SC, Jun 6, 2007
    #13
  14. JJE

    PSC

    Joined:
    Aug 3, 2004
    Messages:
    626
    Likes Received:
    0
    Location:
    Brisbane, Australia
    4750+

    Hey!

    What's wrong with my 4750+ lines of code Phil??? :confused:
     
    PSC, Jun 6, 2007
    #14
  15. JJE

    ashleigh Moderator

    Joined:
    Aug 4, 2004
    Messages:
    2,391
    Likes Received:
    24
    Location:
    Adelaide, South Australia
    Nothing Peter except that Darren would show you how to do the same job in 12 lines (or 9 if you took some dirty short cuts) :)
     
    ashleigh, Jun 6, 2007
    #15
  16. JJE

    Phil.H

    Joined:
    Jul 29, 2004
    Messages:
    466
    Likes Received:
    0
    Location:
    Sydney
    The code below will run happily in a module that is enabled all the time. A more efficient way would be to enable and disable a module based on the security system being armed or selecting away mode on a switch ctouch etc.
    There are many ways to do this but below should give you an idea about random timing. There are more precise ways of writing this code but this is pretty efficient and understandable for training purposes ;)

    Code:
    
    {Declare your variables}
    
    RandomTime1, RandomTime1a, RandomTime2, RandomTime2a : integer;
    
    FlagSecurityArmed : boolean;
    
    
    
    {Always a good idea to initialise your variables}
    
    RandomTime1 := random ("0:30:00") + "0:10:00";
    RandomTime2 := random ("0:30:00") + "0:10:00";
    RandomTime1a := random ("0:30:00") + "0:10:00";
    RandomTime2a := random ("0:30:00") + "0:10:00";
    
    FlagSecurityArmed := false;
    
    
    
    {Module}
    
    if not ispac then
    begin
      WriteLn ('RandomTime1 = ',RandomTime1);
      WriteLn ('RandomTime1a = ',RandomTime1a);
    End;
    
    {The code below simply recalculates the random values of RandomTime1, 
    1a, 2 & 2a at 11pm each day}
    
    if (Time = "23:00:00")then
    begin
      RandomTime1 := random ("0:30:00") + "0:10:00";
      RandomTime1a := random ("0:30:00") + "0:10:00";
      RandomTime2 := random ("0:30:00") + "0:10:00";
      RandomTime2a := random ("0:30:00") + "0:10:00";
    end;
    
    {Note in the code below we are using RandomTime1 in conjunction with nominated
     time of 1900 hours also note our PulseCBusLevel code uses RandomTime1a in 
    lieu of the standard timer time. Remember if the Result1 group is controlled 
    by any other device inside the pulse duration, the pulse timer
    will be cancelled.}
    
    once (Time = "19:00:00" + RandomTime1) then
    begin
      if FlagSecurityArmed = true then
      begin
        PulseCBusLevel("Backbone", "Lighting", "Result1", 100%, "0s", RandomTime1a, 0%);
      end;
    end;
    
    once (Time = "19:30:00" + RandomTime2) then
    begin
      if FlagSecurityArmed = true then
      begin
        PulseCBusLevel("Backbone", "Lighting", "Result2", 100%, "0s", RandomTime2a, 0%);
      end;
    end;
    
    {The code below shows how you can interact with the random values. In this case we 
    have a C-Bus group address causing the random values to be recalculated. Probably 
    would not do this in the real world but good for training purposes.}
    
    if GetLightingState("PAC1")= ON then
    begin
      RandomTime1 := random ("0:30:00") + "0:05:00";
      RandomTime1a := random ("0:30:00") + "0:05:00";
      SetLightingState("PAC1", OFF);
    
     
    Last edited by a moderator: Jun 6, 2007
    Phil.H, Jun 6, 2007
    #16
  17. JJE

    Phil.H

    Joined:
    Jul 29, 2004
    Messages:
    466
    Likes Received:
    0
    Location:
    Sydney
    ;)
     
    Last edited by a moderator: Jun 6, 2007
    Phil.H, Jun 6, 2007
    #17
Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments (here). After that, you can post your question and our members will help you out.