Stargate Resources Projects Contact US Polls Forums Quiz
 


 
 
 

Tim Shephard - Schedule   

Schedule Name: SHEPHARD.SCH
  SCHEDULE START   
    
 1:   SCHEDULE START   
   2:     
   3:   EVENT:  Set Initial Conditions 
   4:   If 
   5:     First pass through schedule 
   6:       -OR- 
   7:     Power is Restored 
   8:   Then 
   9:     (T:Master Bed Lamp) LOAD with 0:08:00 
  10:     (T:Bed1 Light) LOAD with 0:30:00 
  11:     (V:Hold Count down)  LOAD with 0 
  12:     (THEN MACRO:SPKs Normal) 
  13:    * Frozen *   (V:Ouside Temp Low)  LOAD with 150 
  14:    * Frozen *   (V:Outside Temp Hi)  LOAD with 0 
  15:    * Frozen *   (V:Month)   load with Month 
  16:    * Frozen *   (V:Date)   load with Date 
  17:    * Frozen *   (V:Year)   load with Year 
  18:     (V:Doorbell open)  LOAD with 0 
  19:     (RELAY:Garage Door) OFF  
  20:    * Frozen *   (T:Doorbell)  CLEAR 
  21:    * Frozen *   (F:Dr/Porch lights)  CLEAR 
  22:     X10:  (B-15  PA Amp) ON 
  23:     (F:IrrigationNow)  CLEAR 
  24:     (F:IrrigationON)  CLEAR 
  25:     (F:IrrigationStop)  CLEAR 
  26:     X10: M - All Units OFF 
  27:     X10:  (B-14  Sprinkler Power) OFF 
  28:   End 
  29:     
  30:    * Frozen * EVENT:  Notify power restored 
  31:    * Frozen * If 
  32:    * Frozen *   Power is Restored 
  33:    * Frozen *   and  (F:Away) is SET 
  34:    * Frozen * Then 
  35:    * Frozen *   (THEN MACRO:Page Tim) 
  36:    * Frozen *   ASCII-Out:'AC Power Restored!' [COM1] 
  37:    * Frozen * End 
  38:     
  39:   EVENT:  Mail Arrival Notice 
  40:   If 
  41:     (DI:Mailbox CL) Goes OFF 
  42:     and  Time is After 11:00 AM .MTWTFS 
  43:     and  Time is Before 6:00 PM .MTWTFS 
  44:     and  (F:MailArrived) is CLEAR 
  45:     and  (F:Away) is CLEAR 
  46:   Then 
  47:     Voice:TONE_D  [Line] SYNC 
  48:     Voice:MAIL IS HERE  [Line] 
  49:     LOG 'Mail Arrived' 
  50:     (F:MailArrived)  SET 
  51:   End 
  52:     
  53:   EVENT:  Mail Notice When Away 
  54:   If 
  55:     (DI:Mailbox CL) Goes OFF 
  56:     and  Time is After 11:00 AM .MTWTFS 
  57:     and  Time is Before 6:00 PM .MTWTFS 
  58:     and  (F:MailArrived) is CLEAR 
  59:     and  (F:Away) is SET 
  60:   Then 
  61:     (THEN MACRO:Page Tim) 
  62:     ASCII-Out:'Mail Arrived' [COM1] 
  63:     LOG 'Mail Arrived' 
  64:     (F:MailArrived)  SET 
  65:   End 
  66:     
  67:   EVENT:  Mailbox Reset Timer 
  68:   If 
  69:     (DI:Mailbox CL) Goes ON 
  70:   Then 
  71:     (T:Mailbox Reset) LOAD with 0:00:05 
  72:   End 
  73:     
  74:   EVENT:  Mailbox announce reset 
  75:   If 
  76:     (T:Mailbox Reset) is Running 
  77:     and  (DI:Mailbox CL) Goes OFF 
  78:     and  (F:MailArrived) is SET 
  79:   Then 
  80:     DELAY  0:00:10 
  81:     (F:MailArrived)  CLEAR 
  82:   End 
  83:     
  84:   EVENT:  Test 
  85:   If 
  86:     XSEQ:( A-2 A-ON ) Received within 5 seconds [Receive Only] 
  87:   Then 
  88:     (THEN MACRO:Page Tim) 
  89:     ASCII-Out:'Outside Temp <Outside Temp>F' [COM1] 
  90:   End 
  91:     
  92:   EVENT:  Help Sat1 Record 
  93:   If 
  94:     IR Seq:'SAT1VCRREC ' Received within 3 seconds  
  95:   Then 
  96:      If 
  97:        (IR PwrSense:VCR1 Power) is OFF 
  98:      Then 
  99:        (IR:VCR1 POWER ) play 1 time(s) [Living Room] 
 100:        DELAY  0:00:01 
 101:       Nest End 
 102:     (IR:VCR1 0 ) play 1 time(s) [Living Room] 
 103:     DELAY  0:00:01 
 104:     (IR:VCR1 4 ) play 1 time(s) [Living Room] 
 105:     DELAY  0:00:01 
 106:     (IR:VCR1 RECORD ) play 1 time(s) [Living Room] 
 107:   End 
 108:     
 109:   EVENT:  Turn off VCR for non use 
 110:   If - Always 
 111:     (IR PwrSense:VCR1 Power) is ON 
 112:     and  (IR PwrSense:TV1 Power) is OFF 
 113:     and  (IR PwrSense:SAT1 Power) is OFF 
 114:   Then 
 115:     DELAY  0:15:00 
 116:      If 
 117:        (IR PwrSense:TV1 Power) is OFF 
 118:        and  (IR PwrSense:SAT1 Power) is OFF 
 119:        and  (IR PwrSense:VCR1 Power) is ON 
 120:      Then 
 121:        (IR:VCR1 POWER ) play 1 time(s) [Living Room] 
 122:       Nest End 
 123:   End 
 124:     
 125:   EVENT:  Turn off SAT for non use 
 126:   If - Always 
 127:     (IR PwrSense:VCR1 Power) is OFF 
 128:     and  (IR PwrSense:TV1 Power) is OFF 
 129:     and  (IR PwrSense:SAT1 Power) is ON 
 130:     and  (DI:Stereo Power) is OFF 
 131:   Then 
 132:     DELAY  0:15:00 
 133:      If 
 134:        (IR PwrSense:TV1 Power) is OFF 
 135:        and  (IR PwrSense:SAT1 Power) is ON 
 136:        and  (IR PwrSense:VCR1 Power) is OFF 
 137:        and  (DI:Stereo Power) is OFF 
 138:      Then 
 139:        (IR:SAT1 POWER ) play 1 time(s) [Living Room] 
 140:       Nest End 
 141:   End 
 142:     
 143:   EVENT:  Turn off A/V if away 
 144:   If 
 145:     (F:Away) is SET 
 146:   Then 
 147:      If 
 148:        (IR PwrSense:TV1 Power) is ON 
 149:      Then 
 150:        DELAY  0:00:05 
 151:         If 
 152:           (IR PwrSense:TV1 Power) is ON 
 153:         Then 
 154:           (IR:TV1 Power ) play 1 time(s) [Living Room] 
 155:          Nest End 
 156:       Nest End 
 157:      If 
 158:        (IR PwrSense:TV2 Power) is ON 
 159:      Then 
 160:        DELAY  0:02:00 
 161:         If 
 162:           (IR PwrSense:TV2 Power) is ON 
 163:         Then 
 164:           (IR:TV2 POWER ) play 1 time(s) [Master Bedroom] 
 165:          Nest End 
 166:       Nest End 
 167:      If 
 168:        (IR PwrSense:VCR1 Power) is OFF 
 169:        and  (IR PwrSense:SAT1 Power) is ON 
 170:      Then 
 171:        (IR:SAT1 POWER ) play 1 time(s) [Living Room] 
 172:       Nest End 
 173:   End 
 174:     
 175:   EVENT:  Help Sat1 Stop 
 176:   If 
 177:     IR Seq:'SAT1VCRSTOP ' Received within 3 seconds  
 178:   Then 
 179:     (IR:VCR1 STOP ) play 1 time(s) [Living Room] 
 180:   End 
 181:     
 182:   EVENT:  Help Sat1 Rewind 
 183:   If 
 184:     IR Seq:'SAT1VCRREWIND ' Received within 3 seconds  
 185:   Then 
 186:     (IR:VCR1 REWIND ) play 1 time(s) [Living Room] 
 187:   End 
 188:     
 189:   EVENT:  Power sensor test 
 190:   If 
 191:     (IR PwrSense:TV1 Power) is ON 
 192:   Then 
 193:     X10:  (P-14  TV Living Room) Set State to ON 
 194:   Else 
 195:     X10:  (P-14  TV Living Room) Set State to OFF 
 196:   End 
 197:     
 198:    * Frozen * EVENT:  Lamp on w/tv at night 
 199:    * Frozen * If 
 200:    * Frozen *   (IR PwrSense:TV1 Power) Goes ON 
 201:    * Frozen *   and  Time is After 9:00 PM SMTWTFS 
 202:    * Frozen * Then 
 203:    * Frozen *   DELAY  0:00:05 
 204:       * Frozen * If 
 205:       * Frozen *   (IR PwrSense:TV1 Power) is ON 
 206:       * Frozen * Then 
 207:       * Frozen *   X10:  (G-9  Fam Rm Lamp) Set Level  40 % 
 208:       * Frozen *  Nest End 
 209:    * Frozen * End 
 210:     
 211:   EVENT:   
 212:   If 
 213:     (IR PwrSense:SAT1 Power) is ON 
 214:   Then 
 215:     X10:  (P-15  SAT) Set State to ON 
 216:   Else 
 217:     X10:  (P-15  SAT) Set State to OFF 
 218:   End 
 219:     
 220:   EVENT:  Power sensor test 
 221:   If 
 222:     (IR PwrSense:VCR1 Power) is ON 
 223:   Then 
 224:     X10:  (P-16  VCR) Set State to ON 
 225:   Else 
 226:     X10:  (P-16  VCR) Set State to OFF 
 227:   End 
 228:     
 229:   EVENT:  Power sensor test 
 230:   If 
 231:     (IR PwrSense:TV2 Power) is ON 
 232:   Then 
 233:     X10:  (P-13  TV Bedroom) Set State to ON 
 234:   Else 
 235:     X10:  (P-13  TV Bedroom) Set State to OFF 
 236:   End 
 237: 
 272:     
 273:   EVENT:  Doorbell Activity 
 274:   If 
 275:     (DI:Fr Door Bell) Toggles  
 276:     and  (DI:Fr Door Bell) is ON 
 277:   Then 
 278:     (V:Daily doorbell)  INCREMENT 
 279:     LOG 'Door bell ring <Daily doorbell>' 
 280:      If 
 281:        (F:Away) is CLEAR 
 282:        and  Date is Before Oct  15 
 283:          -OR- 
 284:        (F:Away) is CLEAR 
 285:        and  Date is After Oct  31 
 286:          -OR- 
 287:        (F:Away) is CLEAR 
 288:        and  Date is Before Nov  26 
 289:          -OR- 
 290:        (F:Away) is CLEAR 
 291:        and  Date is After Dec  25 
 292:      Then 
 293:        X10:  (B-16  Remote chime) ON 
 294:       Nest End 
 295:      If 
 296:        (F:Away) is SET 
 297:          -OR- 
 298:        (F:Vacation Mode) is SET 
 299:      Then 
 300:        Voice:BARK2 BARK2 SILENCEH BARK2  [Line] SYNC 
 301:        (V:Away Doorbell)  INCREMENT 
 302:         If 
 303:           (F:Did it Once) is CLEAR 
 304:         Then 
 305:           (THEN MACRO:Page Tim) 
 306:           ASCII-Out:'Someone rang the doorbell -- \' [COM1] 
 307:           ASCII-Out:'Doorbell was rung \' [COM1] 
 308:           ASCII-Out:'<Daily doorbell> times today.' [COM1] 
 309:           (F:Did it Once)  SET 
 310:           DELAY  0:05:00 
 311:           (F:Did it Once)  CLEAR 
 312:          Nest End 
 313:       Nest End 
 314:      If 
 315:        Date is After Oct  15 
 316:        and  Date is Before Oct  31 
 317:        and  (F:Away) is CLEAR 
 318:      Then 
 319:        Voice:GHOST  [Line] SYNC 
 320:       Nest End 
 321:      If 
 322:        (F:Away) is CLEAR 
 323:        and  (F:Vacation Mode) is CLEAR 
 324:        and  Time is Dark (after SunSet, before SunRise) 
 325:      Then 
 326:         If 
 327:           X10: (G-5  Liv Room Torch) is OFF  
 328:         Then 
 329:           X10:  (G-5  Liv Room Torch) ON 
 330:           DELAY  0:05:00 
 331:           X10:  (G-5  Liv Room Torch) OFF 
 332:          Nest End 
 333:       Nest End 
 334:      If 
 335:        (F:Away) is CLEAR 
 336:        and  Date is After Nov  26 
 337:        and  Date is Before Dec  26 
 338:      Then 
 339:        Voice:DINGDONG TONE_E TONE_E TONE_E SILENCEQ TONE_E TONE_E TONE_E S
ILENCEQ TONE_E TONE_G TONE_C TONE_D TONE_E  [Line] SYNC 
 340:       Nest End 
 341:   End 
 342:     
 343:   EVENT:  Clear Morning Flags 
 344:   If 
 345:     Time is 8:00 AM SMTWTFS 
 346:   Then 
 347:     (F:Master Goodnight)  CLEAR 
 348:     (F:Below 32 degrees)  CLEAR 
 349:     (F:Garbage Out)  CLEAR 
 350:     (F:MailArrived)  CLEAR 
 351:   End 
 352:     
 353:   EVENT:  Process Daily Variables 
 354:   If 
 355:     Time is 12:01 AM SMTWTFS 
 356:   Then 
 357:     (V:YesterdaysHiTemp)  LOAD with (V:Outside Temp Hi) 
 358:     (V:Outside Temp Hi)  LOAD with 0 
 359:     (V:Ouside Temp Low)  LOAD with 150 
 360:     (V:Month)   load with Month 
 361:     (V:Date)   load with Date 
 362:     (V:Year)   load with Year 
 363:       load user_VAR with another variable(V:Daily doorbell)  
 364:     (V:Yesturday DB)   load with user_VAR 
 365:     (V:Daily doorbell)   CLEAR 
 366:   End 
 367:     
 368:   EVENT:  Outside Temp High 
 369:   If 
 370:     (A/D:Outside Temp) > (V:Outside Temp Hi) 
 371:   Then 
 372:     DELAY  0:00:30 
 373:      If 
 374:        (A/D:Outside Temp) > (V:Outside Temp Hi) 
 375:      Then 
 376:        (V:Outside Temp Hi)  LOAD with (A/D:Outside Temp) 
 377:        (F:Temp going up)  SET 
 378:       Nest End 
 379:   End 
 380:     
 381:   EVENT:  Outside Temerature Lows 
 382:   If 
 383:     (A/D:Outside Temp) < (V:Ouside Temp Low) 
 384:   Then 
 385:     DELAY  0:00:30 
 386:      If 
 387:        (A/D:Outside Temp) < (V:Ouside Temp Low) 
 388:      Then 
 389:        (V:Ouside Temp Low)  LOAD with (A/D:Outside Temp) 
 390:        (F:Temp going up)  CLEAR 
 391:       Nest End 
 392:   End 
 393: 
 431:     
 432:   EVENT:  Below Freezing Warnings 
 433:   If 
 434:     (A/D:Outside Temp) <= 32 
 435:     and  (F:Master Goodnight) is CLEAR 
 436:     and  (F:Away) is CLEAR 
 437:     and  (F:Below 32 degrees) is CLEAR 
 438:     and  (F:Vacation Mode) is CLEAR 
 439:   Then 
 440:     (F:Below 32 degrees)  SET 
 441:     Voice:STTRALRT SILENCE2  [Line] 
 442:     Voice:WARNING SILENCE1 OUT SIDE TEMPERAT IS <Outside Temp>DEGREES 
SILENCEH CHECK SPRINKLE SYSTEM AND SPA  [Line] 
 443:   End 
 444:     
 445:   EVENT:  Freeze when away 
 446:   If 
 447:     (A/D:Outside Temp) <= 32 
 448:     and  (F:Away) is SET 
 449:     and  (F:Below 32 degrees) is CLEAR 
 450:       -OR- 
 451:     (F:Vacation Mode) is SET 
 452:     and  (A/D:Outside Temp) <= 32 
 453:     and  (F:Below 32 degrees) is CLEAR 
 454:   Then 
 455:     (THEN MACRO:Page Tim) 
 456:     ASCII-Out:'Warning! Outside temperature \' [COM1] 
 457:     ASCII-Out:'is <Outside Temp>F. Check spa \' [COM1] 
 458:     ASCII-Out:'and sprinkler system.' [COM1] 
 459:   End 
 460:     
 461:   EVENT:  Jeremys Lamp timer 
 462:   If 
 463:     " Motion in Jeremy's Room " 
 464:     and  XSEQ:( A-3 A-ON ) Received within 3 seconds  
 465:   Then 
 466:     DELAY  0:30:00 Re-Triggerable 
 467:     X10:  (B-2  Jeremys Lamp) OFF 
 468:   End 
 469:     
 470:   EVENT:  Jeremy's Speaker Control 
 471:   If 
 472:     " Keep Jeremy's Speakers on During " 
 473:     " Day Only " 
 474:     and  Time is After 9:00 AM SMTWTFS 
 475:     and  Time is Before 9:00 PM SMTWTFS 
 476:   Then 
 477:     (RELAY:Jeremy Spk) ON  
 478:   Else 
 479:     (RELAY:Jeremy Spk) OFF  
 480:   End 
 481:     
 482:   EVENT:  VM Paging 
 483:   If 
 484:     " Page cell phones if VM message " 
 485:     " and we are away " 
 486:     and  (VMAIL:MBX-1 # New Msg)   Increases in Value 
 487:     and  (F:Away) is SET 
 488:       -OR- 
 489:     (VMAIL:MBX-1 # New Msg)   Increases in Value 
 490:     and  (F:Vacation Mode) is SET 
 491:   Then 
 492:     (THEN MACRO:VM Notification) 
 493:   End 
 494:     
 495:   EVENT:  Remote Volume Control UP 
 496:   If 
 497:     XSEQ:( E- BRI ) Received within 2 seconds [Receive Only] 
 498:   Then 
 499:     (IR:TV1 Volume Up ) play 1 time(s) [Living Room] 
 500:   End 
 501:     
 502:   EVENT:  Remote Volume Control Down 
 503:   If 
 504:     XSEQ:( E- DIM ) Received within 2 seconds [Receive Only] 
 505:   Then 
 506:     (IR:TV1 Volume Down ) play 1 time(s) [Living Room] 
 507:   End 
 508:     
 509:   EVENT:  Remote Volume Mute 
 510:   If 
 511:     XSEQ:( E-All L ON ) Received within 2 seconds [Receive Only] 
 512:   Then 
 513:     (IR:TV1 Mute ) play 1 time(s) [Living Room] 
 514:   End 
 515:     
 516:   EVENT:  Activate ON HOLD 
 517:   If 
 518:     " To turn on CO hold press *00 " 
 519:     and  TelePhone Seq:'*00' Received within 10 seconds  
 520:   Then 
 521:     Clear TouchTone Input Buffer 
 522:     Go ON Hold 
 523:     Connect PHONE port to ICM port 
 524:     (V:Hold Count down)  LOAD with 6 
 525:     Voice:ONEMOME  [CO] 
 526:     Voice:BBBEEP2  [ICM] SYNC 
 527:     (T:Tel on Hold) LOAD with 0:00:30 
 528:     (F:Intercom mode)  SET 
 529:   End 
 530:     
 531:   EVENT:  Release Telephone Hold 
 532:   If 
 533:     " To release hold #00  " 
 534:    * Frozen *   and  TelePhone Seq:'#00' Received within 4 seconds  
 535:    * Frozen *   and  TelePhone Seq:'^+^' Received within 4 seconds  
 536:     and  (V:Hold Count down) = 0 
 537:     and  CO: Is ON Hold 
 538:       -OR- 
 539:    * Frozen *   ICM: Is OFF Hook 
 540:     and  CO: Is ON Hold 
 541:     and  TelePhone Seq:'#' Received within 2 seconds  
 542:   Then 
 543:     Clear TouchTone Input Buffer 
 544:     Voice:TONE_G#  [CO,ICM] 
 545:     Connect PHONE port to CO port 
 546:     Release Hold 
 547:     (T:Tel on Hold)  CLEAR 
 548:     (F:Intercom mode)  CLEAR 
 549:     (V:Hold Count down)   CLEAR 
 550:   End 
 551:     
 552:   EVENT:  Call on hold reminder 
 553:   If 
 554:     (T:Tel on Hold) is Expiring 
 555:   Then 
 556:     (V:Hold Count down)  DECREMENT 
 557:     (T:Tel on Hold) LOAD with 0:00:30 
 558:      If 
 559:        " If 30 seconds of hold remaining  " 
 560:        and  (V:Hold Count down) = 1 
 561:      Then 
 562:        Voice:TONE_D  [Line,ICM] SYNC 
 563:        Voice:30 SECONDS LEFT  [Line,ICM] SYNC 
 564:      Else 
 565:         If 
 566:           " After one or two minutes of hold " 
 567:           and  (V:Hold Count down) = 4 
 568:             -OR- 
 569:           (V:Hold Count down) = 2 
 570:         Then 
 571:           Voice:TONE_D  [Line,ICM] SYNC 
 572:           Voice:CALLING PARTY IS WAITING  [Line,ICM] 
 573:           Voice:PLEASE STAYONLN  [CO] 
 574:          Nest End 
 575:       Nest End 
 576:   End 
 577:     
 578:   EVENT:  Caller ID 
 579:   If 
 580:     CallerID: ?????????? 
 581:   Then 
 582:     " Default to Main Greeting " 
 583:     VM:Change MailBox 1 Greeting to OGM Main Greet 
 584:     (F:Caller ID Found)  CLEAR 
 585:      If 
 586:        " Kevin Stow calling " 
 587:        and  CallerID: 0005551212 
 588:          -OR- 
 589:        CallerID: 0005551212  
 590:          -OR- 
 591:        CallerID: 0005551212  
 592:          -OR- 
 593:        CallerID: 0005551212  
 594:      Then 
 595:        Voice:Stow Call  [Line] SYNC 
 596:        (F:Caller ID Found)  SET 
 597:       Nest End 
 598:      If 
 599:        " Charity Hickerson from home " 
 600:        and  CallerID: 0005551212  
 601:      Then 
 602:        Voice:Char Hick Call  [Line] SYNC 
 603:        (F:Caller ID Found)  SET 
 604:       Nest End 
 605:      If 
 606:        " Ken's Home Phone " 
 607:        and  CallerID: 0005551212  
 608:          -OR- 
 609:        " Ken's Cell Phone " 
 610:        and  CallerID: 0005551212  
 611:      Then 
 612:        Voice:Ken Kramer Call  [Line] SYNC 
 613:        (F:Caller ID Found)  SET 
 614:       Nest End 
 615:      If 
 616:        " Hugh's home phone " 
 617:        and  CallerID: 0005551212  
 618:          -OR- 
 619:        " Hugh's Cell Phone " 
 620:        and  CallerID: 0005551212  
 621:      Then 
 622:        Voice:Dad Dutton Call  [Line] SYNC 
 623:        (F:Caller ID Found)  SET 
 624:       Nest End 
 625:      If 
 626:        " Tim from work " 
 627:        and  CallerID: 0005551212 
 628:      Then 
 629:        Voice:HONK SILENCE1  [Line] SYNC 
 630:        Voice:Tim's Work  [Line] SYNC 
 631:        (F:Caller ID Found)  SET 
 632:       Nest End 
 633:      If 
 634:        " Chuck or Patti Shephard " 
 635:        and  CallerID: 0005551212  
 636:          -OR- 
 637:        " Patsys Pizza " 
 638:        and  CallerID: 0005551212  
 639:          -OR- 
 640:        " Chucks 2nd Line " 
 641:        and  CallerID: 0005551212 
 642:          -OR- 
 643:        " Chucks cell phone " 
 644:        and  CallerID: 0005551212 
 645:      Then 
 646:        VM:Change MailBox 1 Greeting to OGM Chuck 
 647:        Voice:C&P Shephard  [Line] SYNC 
 648:        (F:Caller ID Found)  SET 
 649:       Nest End 
 650:      If 
 651:        " Mom or Dad Morris " 
 652:        and  CallerID: 0005551212  
 653:      Then 
 654:        VM:Change MailBox 1 Greeting to OGM Grandma 
 655:        Voice:M&D Morris  [Line] SYNC 
 656:        (F:Caller ID Found)  SET 
 657:       Nest End 
 658:      If 
 659:        " Mom or Dad Shephard " 
 660:        and  CallerID: 0005551212  
 661:          -OR- 
 662:        CallerID: 0005551212  
 663:      Then 
 664:        VM:Change MailBox 1 Greeting to OGM Grandma 
 665:        Voice:M&D Shephard  [Line] SYNC 
 666:        (F:Caller ID Found)  SET 
 667:       Nest End 
 668:      If 
 669:        " Tim calling from cell phone " 
 670:        and  CallerID: 0005551212  
 671:      Then 
 672:        Voice:HONK SILENCE1  [Line] SYNC 
 673:        Voice:Tim's Cell Fone  [Line] SYNC 
 674:        (F:Caller ID Found)  SET 
 675:       Nest End 
 676:      If 
 677:        CallerID: Unknown Number 
 678:      Then 
 679:        Voice:UNKNOWN CALL  [Line] SYNC 
 680:        (F:Caller ID Found)  SET 
 681:       Nest End 
 682:      If 
 683:        CallerID: Private Number 
 684:      Then 
 685:        Voice:PRIVATE CALL  [Line] SYNC 
 686:        (F:Caller ID Found)  SET 
 687:       Nest End 
 688:       * Frozen * If 
 689:        " If not setup voice phone number " 
 690:       * Frozen *   and  (F:Caller ID Found) is CLEAR 
 691:       * Frozen * Then 
 692:       * Frozen *   Voice:<CID> [Line] SYNC 
 693:       * Frozen *  Nest End 
 694:      If 
 695:        (F:Caller ID Found) is CLEAR 
 696:        and  (IR PwrSense:TV1 Power) is ON 
 697:        and  (IR PwrSense:VCR1 Power) is OFF 
 698:      Then 
 699:        ASCII-Out:'! TERM0 S=\j \e[1M \x6e ' [RS-485] 
 700:        ASCII-Out:'! TERM0 S=CALLER IDENTIFICATION' [RS-485] 
 701:        ASCII-Out:'! TERM0 S=\e[3jCalling \' [RS-485] 
 702:        ASCII-Out:'party is: <CID>' [RS-485] 
 703:         If 
 704:           (IR PwrSense:SAT1 Power) is ON 
 705:         Then 
 706:           (IR:SAT1 TV/VIDEO ) play 1 time(s) [Living Room] 
 707:           (IR:TV1 2 ) play 1 time(s) [Living Room] 
 708:           (IR:TV1 1 ) play 1 time(s) [Living Room] 
 709:           DELAY  0:00:05 
 710:           (IR:SAT1 TV/VIDEO ) play 1 time(s) [Living Room] 
 711:           (IR:TV1TV/VIDEO ) play 1 time(s) [Living Room] 
 712:           ASCII-Out:'! TERM0 S=\k' [RS-485] 
 713:           ASCII-Out:'! TERM0 S=\f' [RS-485] 
 714:         Else 
 715:           (IR:TV1 2 ) play 1 time(s) [Living Room] 
 716:           (IR:TV1 1 ) play 1 time(s) [Living Room] 
 717:           DELAY  0:00:05 
 718:           (IR:TV1 Recall ) play 1 time(s) [Living Room] 
 719:           ASCII-Out:'! TERM0 S=\k' [RS-485] 
 720:           ASCII-Out:'! TERM0 S=\f' [RS-485] 
 721:          Nest End 
 722:        (F:Caller ID Found)  SET 
 723:       Nest End 
 724:      If 
 725:        (F:Caller ID Found) is CLEAR 
 726:        and  (F:Master Goodnight) is SET 
 727:        and  (IR PwrSense:TV2 Power) is ON 
 728:      Then 
 729:        ASCII-Out:'! TERM0 S=\j \e[1M \x6e ' [RS-485] 
 730:        ASCII-Out:'! TERM0 S=CALLER IDENTIFICATION' [RS-485] 
 731:        ASCII-Out:'! TERM0 S=\e[3jCalling \' [RS-485] 
 732:        ASCII-Out:'party is: <CID>' [RS-485] 
 733:        (IR:TV2 2 ) play 1 time(s) [Master Bedroom] 
 734:        (IR:TV2 1 ) play 1 time(s) [Master Bedroom] 
 735:        DELAY  0:00:10 
 736:        (IR:TV2 RECALL ) play 1 time(s) [Living Room] 
 737:        ASCII-Out:'! TERM0 S=\f' [RS-485] 
 738:        ASCII-Out:'! TERM0 S=\k' [RS-485] 
 739:        (F:Caller ID Found)  SET 
 740:       Nest End 
 741:      If 
 742:        (F:Caller ID Found) is CLEAR 
 743:        and  (F:Master Goodnight) is CLEAR 
 744:        and  (T:Bed1 Light) is Running 
 745:        and  (IR PwrSense:TV2 Power) is OFF 
 746:      Then 
 747:        ASCII-Out:'! TERM0 S=\j \e[1M \x6e ' [RS-485] 
 748:        ASCII-Out:'! TERM0 S=CALLER IDENTIFICATION' [RS-485] 
 749:        ASCII-Out:'! TERM0 S=\e[3jCalling \' [RS-485] 
 750:        ASCII-Out:'party is: <CID>' [RS-485] 
 751:        (IR:TV2 POWER ) play 1 time(s) [Master Bedroom] 
 752:        DELAY  0:00:01 
 753:        (IR:TV2 MUTE ) play 1 time(s) [Master Bedroom] 
 754:        (IR:TV2 2 ) play 1 time(s) [Master Bedroom] 
 755:        (IR:TV2 1 ) play 1 time(s) [Master Bedroom] 
 756:        DELAY  0:00:30 
 757:        (IR:TV2 POWER ) play 1 time(s) [Master Bedroom] 
 758:        ASCII-Out:'! TERM0 S=\f' [RS-485] 
 759:        ASCII-Out:'! TERM0 S=\k' [RS-485] 
 760:        (F:Caller ID Found)  SET 
 761:       Nest End 
 762:      If 
 763:        (F:Caller ID Found) is CLEAR 
 764:        and  (F:Master Goodnight) is CLEAR 
 765:        and  (T:Bed1 Light) is Running 
 766:        and  (IR PwrSense:TV2 Power) is ON 
 767:      Then 
 768:        ASCII-Out:'! TERM0 S=\j \e[1M \x6e ' [RS-485] 
 769:        ASCII-Out:'! TERM0 S=CALLER IDENTIFICATION' [RS-485] 
 770:        ASCII-Out:'! TERM0 S=\e[3jCalling \' [RS-485] 
 771:        ASCII-Out:'party is: <CID>' [RS-485] 
 772:        (IR:TV2 2 ) play 1 time(s) [Master Bedroom] 
 773:        (IR:TV2 1 ) play 1 time(s) [Master Bedroom] 
 774:        DELAY  0:00:10 
 775:        (IR:TV2 RECALL ) play 1 time(s) [Living Room] 
 776:        ASCII-Out:'! TERM0 S=\f' [RS-485] 
 777:        ASCII-Out:'! TERM0 S=\k' [RS-485] 
 778:        (F:Caller ID Found)  SET 
 779:       Nest End 
 780:     (F:Caller ID Found)  SET 
 781:   End 
 782:     
 783:   EVENT:  Telemarketing annoyance 
 784:   If 
 785:     TelePhone Seq:'#9' Received within 3 seconds  
 786:   Then 
 787:     (F:Intercom mode)  CLEAR 
 788:     TelePhone Out:'^' 
 789:     Connect PHONE port to ICM port 
 790:     Voice:IMSORRY GOODBYE  [CO] SYNC 
 791:     TelePhone Out:'+' 
 792:     Connect PHONE port to CO port 
 793:     Voice:TONE_D  [Line] SYNC 
 794:   End 
 795:     
 796:   EVENT:  Dark outside or not 
 797:   If 
 798:     Time is Before (TL:sunrise plus)  
 799:     or  Time is After (TL:sunset minus)  
 800:   Then 
 801:     (F:Dark mode)  SET 
 802:     (F:Morning reminder)  CLEAR 
 803:   Else 
 804:     (F:Dark mode)  CLEAR 
 805:     X10: O - All Lights OFF 
 806:   End 
 807:     
 808:   EVENT:  All outside lights on-Security 
 809:   If 
 810:     XSEQ:( F-All L ON ) Received within 2 seconds [Receive Only] 
 811:     and  (F:Dark mode) is SET 
 812:   Then 
 813:     X10: O - All Lights ON 
 814:     DELAY  0:05:00 
 815:     X10: O - All Lights OFF 
 816:   End 
 817:     
 818:   EVENT:  All outside lights off 
 819:   If 
 820:     XSEQ:( F-All U OFF ) Received within 2 seconds [Receive Only] 
 821:     and  (F:Dark mode) is SET 
 822:   Then 
 823:     X10: O - All Lights OFF 
 824:      If 
 825:        Time is Before 11:00 PM SMTWTFS   -Security Mode-  
 826:      Then 
 827:        X10:  (O-3  Porch Light) Set Level  50 % 
 828:       Nest End 
 829:   End 
 830:     
 831:   FASTEVENT:  Bed1 Motion [ DI:Bed1Motion Goes OFF]  
 832:   Then 
 833:      If 
 834:        (F:Master Goodnight) is CLEAR 
 835:        and  Time is Dark (after SunSet, before SunRise) 
 836:        and  X10: (G-1  Bed1 Light) is OFF  
 837:        and  Time is Before 10:30 PM SMTWTFS 
 838:        and  (T:No Bed1 lamp) is Not Running 
 839:      Then 
 840:        X10:  (G-1  Bed1 Light) ON 
 841:       Nest End 
 842:      If 
 843:        (F:Master Goodnight) is CLEAR 
 844:        and  Time is Dark (after SunSet, before SunRise) 
 845:        and  X10: (G-1  Bed1 Light) is OFF  
 846:        and  Time is After 10:30 PM SMTWTFS 
 847:        and  (T:No Bed1 lamp) is Not Running 
 848:          -OR- 
 849:        (F:Master Goodnight) is CLEAR 
 850:        and  Time is Dark (after SunSet, before SunRise) 
 851:        and  X10: (G-1  Bed1 Light) is OFF  
 852:        and  Time is Before 7:00 AM SMTWTFS 
 853:        and  (T:No Bed1 lamp) is Not Running 
 854:      Then 
 855:        X10:  (G-1  Bed1 Light) Set Level  60 % 
 856:       Nest End 
 857:      If 
 858:        (F:Master Goodnight) is SET 
 859:        and  (T:Master Bed Lamp) is Running 
 860:        and  (F:Dark mode) is SET 
 861:        and  X10: (G-1  Bed1 Light) is OFF  
 862:      Then 
 863:        (T:Master Bed Lamp) LOAD with 0:01:00 
 864:       Nest End 
 865:      If 
 866:        (F:Master Goodnight) is SET 
 867:        and  (T:Master Bed Lamp) is Not Running 
 868:        and  (F:Dark mode) is SET 
 869:        and  X10: (G-1  Bed1 Light) is OFF  
 870:      Then 
 871:        X10:  (B-1  Bed 1 Lamp) Set Level  20 % 
 872:        (T:Master Bed Lamp) LOAD with 0:01:00 
 873:       Nest End 
 874:     (T:Bed1 Light) LOAD with 0:15:00 
 875:   End 
 876:     
 877:   EVENT:  TV Bed1 goto Letterman 
 878:   If 
 879:     (IR PwrSense:TV2 Power) Goes ON 
 880:     and  Time is After 10:50 PM .MTWTF. 
 881:     and  Time is Before 11:35 PM .MTWTF. 
 882:   Then 
 883:     DELAY  0:00:02 
 884:      If 
 885:        (IR PwrSense:TV2 Power) is ON 
 886:      Then 
 887:        (IR:TV2 VOL DOWN ) play 20 time(s) [Master Bedroom] 
 888:        (IR:TV2 1 ) play 1 time(s) [Master Bedroom] 
 889:        (IR:TV2 3 ) play 1 time(s) [Master Bedroom] 
 890:        (IR:TV2 VOL UP ) play 12 time(s) [Master Bedroom] 
 891:       Nest End 
 892:   End 
 893:     
 894:   EVENT:  Change to Leno 
 895:   If 
 896:     Time is 11:35 PM .MTWTF. 
 897:     and  (IR PwrSense:TV2 Power) is ON 
 898:   Then 
 899:     (IR:TV2 0 ) play 1 time(s) [Master Bedroom] 
 900:     (IR:TV2 3 ) play 1 time(s) [Master Bedroom] 
 901:   End 
 902:     
 903:   EVENT:  Turn off Bed1 Light 
 904:   If 
 905:     (T:Bed1 Light) is Expiring 
 906:   Then 
 907:     X10:  (G-1  Bed1 Light) OFF 
 908:   End 
 909:     
 910:   EVENT:  Master Bedroom Light Off 
 911:   If 
 912:     (T:Master Bed Lamp) is Expiring 
 913:     and  (F:Master Goodnight) is SET 
 914:   Then 
 915:     X10:  (B-1  Bed 1 Lamp) Set Level   0 % 
 916:   Else 
 917:      If 
 918:        (T:Master Bed Lamp) is Expiring 
 919:        and  (F:Master Goodnight) is CLEAR 
 920:      Then 
 921:        X10:  (B-1  Bed 1 Lamp) OFF 
 922:       Nest End 
 923:   End 
 924:     
 925:   EVENT:  Master Bed lights off 
 926:   If 
 927:     XSEQ:( G-1 G-OFF ) Received within 3 seconds [Receive Only] 
 928:   Then 
 929:     (T:No Bed1 lamp) LOAD with 0:00:05 
 930:     X10:  (B-1  Bed 1 Lamp) OFF 
 931:     (T:Bed1 Light)  CLEAR 
 932:   End 
 933:     
 934:   EVENT:  Bed1 Lamp off w/ceiling light on 
 935:   If 
 936:     X10: (G-1  Bed1 Light) is ON  
 937:     and  X10: (B-1  Bed 1 Lamp) is ON  
 938:   Then 
 939:     X10:  (B-1  Bed 1 Lamp) OFF 
 940:   End 
 941:     
 942:   EVENT:  Dim Bed1 Light 
 943:   If 
 944:     XSEQ:( G-1 G-ON ) Received within 3 seconds [Receive Only] 
 945:     and  X10: (G-1  Bed1 Light) is ON  
 946:   Then 
 947:     X10:  (G-1  Bed1 Light) DIM 4 Steps  
 948:   End 
 949:     
 950:   EVENT:  Master Goodnight Mode ON 
 951:   If 
 952:     " Button One on Master bedroom " 
 953:     " Desktop keypad " 
 954:     and  XSEQ:( F-1 F-ON ) Received within 3 seconds [Receive Only] 
 955:   Then 
 956:      If 
 957:        " Front door still open " 
 958:        and  (DI:Front Dr CL) is OFF 
 959:      Then 
 960:        (THEN MACRO:SPK ONLY Zone1) 
 961:        Voice:FRONT DOOR OPEN  [Line] SYNC 
 962:        (THEN MACRO:SPKs Normal) 
 963:       Nest End 
 964:      If 
 965:        " Side door open " 
 966:        and  (DI:Side Dr CL) is OFF 
 967:      Then 
 968:        (THEN MACRO:SPK ONLY Zone1) 
 969:        Voice:SIDE DOOR OPEN  [Line] SYNC 
 970:        (THEN MACRO:SPKs Normal) 
 971:       Nest End 
 972:      If 
 973:        " Garage door still open " 
 974:        and  (DI:Garage Dr CL) is OFF 
 975:      Then 
 976:        (THEN MACRO:SPK ONLY Zone1) 
 977:        Voice:GARAGE DOOR OPEN  [Line] SYNC 
 978:        (THEN MACRO:SPKs Normal) 
 979:       Nest End 
 980:     (F:Master Goodnight)  SET 
 981:     (T:Master Bed Lamp)  CLEAR 
 982:     X10:  (G-1  Bed1 Light) OFF 
 983:     X10:  (B-1  Bed 1 Lamp) Set Level   0 % 
 984:   End 
 985:     
 986:   EVENT:  Master Goodnight mode off 
 987:   If 
 988:     " Button One off Master bedroom  " 
 989:     " Desktop keypad " 
 990:     and  XSEQ:( F-1 F-OFF ) Received within 3 seconds [Receive Only] 
 991:   Then 
 992:     X10:  (B-1  Bed 1 Lamp) OFF 
 993:     X10:  (B-1  Bed 1 Lamp) ON 
 994:     (F:Master Goodnight)  CLEAR 
 995:     (T:Master Bed Lamp) LOAD with 0:08:00 
 996:   End 
 997:     
 998:   EVENT:  Lights out after 2am 
 999:   If 
1000:     Time is 2:00 AM SMTWTFS 
1001:     and  (F:Master Goodnight) is SET 
1002:   Then 
1003:     X10:  (D-1  Dinning Room) OFF 
1004:     X10:  (G-5  Liv Room Torch) OFF 
1005:     X10:  (G-9  Fam Rm Lamp) OFF 
1006:     X10: O - All Lights OFF 
1007:      If 
1008:        (IR PwrSense:TV1 Power) is ON 
1009:      Then 
1010:        DELAY  0:00:10 
1011:         If 
1012:           (IR PwrSense:TV1 Power) is ON 
1013:         Then 
1014:           (IR:TV1 Power ) play 1 time(s) [Living Room] 
1015:          Nest End 
1016:       Nest End 
1017:      If 
1018:        (IR PwrSense:TV2 Power) is ON 
1019:      Then 
1020:        DELAY  0:00:10 
1021:         If 
1022:           (IR PwrSense:TV2 Power) is ON 
1023:         Then 
1024:           (IR:TV2 POWER ) play 1 time(s) [Master Bedroom] 
1025:          Nest End 
1026:       Nest End 
1027:   End 
1028:     
1029:   EVENT:  Read all temperatures 
1030:   If 
1031:     " Dial T-E-M-P on phone " 
1032:     and  TelePhone Seq:'^8367' Received within 10 seconds  
1033:   Then 
1034:     Connect PHONE port to ICM port 
1035:     (F:Intercom mode)  SET 
1036:     (THEN MACRO:Outside Temp) 
1037:     (THEN MACRO:DownStairsTemp) 
1038:     (THEN MACRO:UpStairs Temp) 
1039:     Clear TouchTone Input Buffer 
1040:   Else 
1041:      If 
1042:        TelePhone Seq:'**8367' Received within 10 seconds  
1043:      Then 
1044:        (THEN MACRO:Outside Temp) 
1045:        (THEN MACRO:DownStairsTemp) 
1046:        (THEN MACRO:UpStairs Temp) 
1047:        Clear TouchTone Input Buffer 
1048:       Nest End 
1049:   End 
1050:     
1051:   EVENT:  Alert Intercom if CO rings 
1052:   If - Always 
1053:     CO: Ring 2 
1054:     or  CO: Ring 3 
1055:     or  CO: Ring 4 
1056:     or  CO: Ring 5 
1057:       -AND- 
1058:     (F:Intercom mode) is SET 
1059:   Then 
1060:     Voice:BBBEEP2 IN COMING PHONE CALL  [ICM] SYNC 
1061:     DELAY  0:00:03 
1062:   End 
1063:     
1064:   EVENT:  Set Memo Reminder 
1065:   If 
1066:     (F:Memo reminder) is CLEAR 
1067:     and  TelePhone Seq:'^6366' Received within 10 seconds  
1068:   Then 
1069:     Connect PHONE port to ICM port 
1070:     (F:Intercom mode)  SET 
1071:     Voice:ENTER TIME 4 MEMO  [ICM] SYNC 
1072:     TouchTone to Time Label:(TL:Memo timer)  SYNC 
1073:     Voice:TIME SET 4 <Memo timer>  [ICM] SYNC 
1074:     DELAY  0:00:01 
1075:     Voice:RECORD MEMO THEN PRESS POUND  [ICM] SYNC 
1076:     Record:'Reminder memo' from ICM for 20 seconds [Auto Playback] 
1077:     DELAY  0:00:01 
1078:     Voice:MEMO ACTIVATD  [ICM] SYNC 
1079:     DELAY  0:00:01 
1080:     Voice:THANKYOU  [ICM] SYNC 
1081:     (F:Memo reminder)  SET 
1082:     Clear TouchTone Input Buffer 
1083:   Else 
1084:      If 
1085:        (F:Memo reminder) is CLEAR 
1086:        and  TelePhone Seq:'**6366' Received within 7 seconds  
1087:      Then 
1088:        Voice:ENTER TIME 4 MEMO  [CO] SYNC 
1089:        TouchTone to Time Label:(TL:Memo timer)  SYNC 
1090:        Voice:TIME SET 4 <Memo timer>  [CO] SYNC 
1091:        DELAY  0:00:01 
1092:        Voice:RECORD MEMO THEN PRESS POUND  [CO] SYNC 
1093:        Record:'Reminder memo' from CO Line for 20 seconds [Auto Playback] 
1094:        DELAY  0:00:01 
1095:        Voice:MEMO ACTIVATD  [CO] SYNC 
1096:        DELAY  0:00:01 
1097:        Voice:THANKYOU  [CO] SYNC 
1098:        (F:Memo reminder)  SET 
1099:        Clear TouchTone Input Buffer 
1100:       Nest End 
1101:   End 
1102:     
1103:   EVENT:  Memo time reached set flag 
1104:   If 
1105:     (F:Memo reminder) is SET 
1106:     and  Time is (TL:Memo timer)  
1107:   Then 
1108:     (F:Memo beep)  SET 
1109:   End 
1110:     
1111:   EVENT:  Memo beep 
1112:   If - Always 
1113:     (F:Memo reminder) is SET 
1114:     and  (F:Memo beep) is SET 
1115:     and  (F:Away) is CLEAR 
1116:     and  (F:Vacation Mode) is CLEAR 
1117:   Then 
1118:     Voice:TONE_D  [Line] SYNC 
1119:     Voice:CHECK MEMO  [Line] SYNC 
1120:     DELAY  0:02:00 
1121:   End 
1122:     
1123:   EVENT:  Memo Retrieve 
1124:   If 
1125:     " Retrieve Memo type M-E-M-O " 
1126:     and  (F:Memo reminder) is SET 
1127:     and  TelePhone Seq:'^6366' Received within 10 seconds  
1128:   Then 
1129:     Connect PHONE port to ICM port 
1130:     (F:Intercom mode)  SET 
1131:     Voice:<day hh:mm am/pm>Reminder memo  [ICM] SYNC 
1132:     DELAY  0:00:02 
1133:     (F:Memo reminder)  CLEAR 
1134:     (F:Memo beep)  CLEAR 
1135:     Clear TouchTone Input Buffer 
1136:   Else 
1137:      If 
1138:        (F:Memo reminder) is SET 
1139:        and  TelePhone Seq:'**6366' Received within 10 seconds  
1140:      Then 
1141:        Voice:<day hh:mm am/pm>Reminder memo  [CO] SYNC 
1142:        DELAY  0:00:02 
1143:        (F:Memo reminder)  CLEAR 
1144:        (F:Memo beep)  CLEAR 
1145:        Clear TouchTone Input Buffer 
1146:       Nest End 
1147:   End 
1148:     
1149:   EVENT:  Count down timer 
1150:   If 
1151:     TelePhone Seq:'^84637' Received within 10 seconds  
1152:     and  (V:Timer) = 0 
1153:   Then 
1154:     (F:Intercom mode)  SET 
1155:     Connect PHONE port to ICM port 
1156:     Voice:ENTER MINUTES SILENCEQ FOLLOWBY POUND  [CO,ICM] SYNC 
1157:     TouchTone to user_VAR SYNC 
1158:     (V:Timer)   load with user_VAR 
1159:     Voice:RECORD MESSAGE SILENCEH THEN PRESS POUND  [CO,ICM] SYNC 
1160:     Record:'TimerMessage' from ICM for 10 seconds [Auto Playback] 
1161:     Voice:TIMER SET FOR <Timer> SILENCEQ MINUTES SILENCEH THANKYOU  [CO,ICM] SYNC 
1162:     (V:Timer)  = (V:Timer) + 1 
1163:   End 
1164:     
1165:   EVENT:  Timer: Cancel 
1166:   If 
1167:     TelePhone Seq:'^84637' Received within 10 seconds  
1168:     and  (V:Timer) > 0 
1169:   Then 
1170:     Voice:TIMER CANCELED  [CO,ICM] 
1171:     (V:Timer)   CLEAR 
1172:   End 
1173:     
1174:   EVENT:  Timer countdown 
1175:   If - Always 
1176:     (V:Timer) > 0 
1177:   Then 
1178:     DELAY  0:01:00 
1179:     (V:Timer)  = (V:Timer) - 1 
1180:   End 
1181:     
1182:   EVENT:  Timer UP 
1183:   If 
1184:     (V:Timer) = 1 
1185:   Then 
1186:     Voice:TONE_D  [Line] 
1187:     Voice:TimerMessage  [Line] 
1188:     (V:Timer)   CLEAR 
1189:   End 
1190:     
1191:   FASTEVENT:  Front Door Open [ DI:Front Dr CL Goes OFF]  
1192:   Then 
1193:      If 
1194:        Time is Dark (after SunSet, before SunRise) 
1195:      Then 
1196:        X10:  (O-3  Porch Light) Set Level  100% 
1197:        X10:  (O-1  Driveway Flood) ON 
1198:        (T:Dr/Porch lights) LOAD with 0:05:00 
1199:       Nest End 
1200:      If 
1201:        (F:Voice Mute) is CLEAR 
1202:        and  (F:Away) is CLEAR 
1203:        and  (F:Vacation Mode) is CLEAR 
1204:      Then 
1205:        Voice:BDRINGGG  [Line] SYNC 
1206:       Nest End 
1207:     (T:Front door) LOAD with 0:00:45 
1208:   End 
1209:     
1210:   FASTEVENT:  Front Door Close [ DI:Front Dr CL Goes ON]  
1211:   Then 
1212:      If 
1213:        (F:Voice Mute) is CLEAR 
1214:        and  (F:Away) is CLEAR 
1215:        and  (F:Vacation Mode) is CLEAR 
1216:      Then 
1217:        Voice:BDRINGGG BDRINGGG  [Line] SYNC 
1218:       Nest End 
1219:   End 
1220:     
1221:   FASTEVENT:  Side door open [ DI:Side Dr CL Goes OFF]  
1222:   Then 
1223:      If 
1224:        Time is Dark (after SunSet, before SunRise) 
1225:      Then 
1226:        X10:  (O-4  Side Door Light) ON 
1227:       Nest End 
1228:      If 
1229:        (F:Voice Mute) is CLEAR 
1230:        and  (F:Away) is CLEAR 
1231:        and  (F:Vacation Mode) is CLEAR 
1232:      Then 
1233:        Voice:SIDE DOOR OPEN  [Line] SYNC 
1234:       Nest End 
1235:   End 
1236:     
1237:   FASTEVENT:  Side door closed [ DI:Side Dr CL Goes ON]  
1238:   Then 
1239:      If 
1240:        (F:Voice Mute) is CLEAR 
1241:        and  (F:Away) is CLEAR 
1242:        and  (F:Vacation Mode) is CLEAR 
1243:      Then 
1244:        Voice:SIDE DOOR CLOSED  [Line] SYNC 
1245:       Nest End 
1246:      If 
1247:        X10: (O-4  Side Door Light) is ON  
1248:      Then 
1249:        DELAY  0:02:00 
1250:        X10:  (O-4  Side Door Light) OFF 
1251:       Nest End 
1252:   End 
1253:     
1254:   FASTEVENT:  Garage dr open [ DI:Garage Dr CL Goes OFF]  
1255:   Then 
1256:      If 
1257:        (F:Voice Mute) is CLEAR 
1258:        and  (F:Away) is CLEAR 
1259:        and  (F:Vacation Mode) is CLEAR 
1260:      Then 
1261:        Voice:GARAGE DOOR OPEN  [Line] SYNC 
1262:       Nest End 
1263:     X10:  (M-16  Garage Motion) ON 
1264:   End 
1265:     
1266:   EVENT:  Garage Door open reminder 
1267:   If - Always 
1268:     XSEQ:( M-16 M-ON ) Received within 3 seconds  
1269:   Then 
1270:     DELAY  0:15:00 Re-Triggerable 
1271:      If 
1272:        (DI:Garage Dr CL) is OFF 
1273:      Then 
1274:        Voice:GARAGE DOOR OPEN  [Line] SYNC 
1275:       Nest End 
1276:   End 
1277:     
1278:   FASTEVENT:  Garage dr closed [ DI:Garage Dr CL Goes ON]  
1279:   Then 
1280:      If 
1281:        (F:Voice Mute) is CLEAR 
1282:        and  (F:Away) is CLEAR 
1283:        and  (F:Vacation Mode) is CLEAR 
1284:      Then 
1285:        Voice:GARAGE DOOR CLOSED  [Line] SYNC 
1286:       Nest End 
1287:   End 
1288:     
1289:   EVENT:  Garage Door Flood Light  
1290:   If 
1291:     (DI:Garage Dr CL) is OFF 
1292:     and  Time is Dark (after SunSet, before SunRise) 
1293:   Then 
1294:     X10:  (O-1  Driveway Flood) ON 
1295:   Else 
1296:     X10:  (O-1  Driveway Flood) OFF 
1297:   End 
1298:     
1299:   FASTEVENT:  Front Porch Moti [ DI:PorchMotion Goes OFF]  
1300:   Then 
1301:      If 
1302:        (T:Front door) is Not Running 
1303:        and  (T:Front motion) is Not Running 
1304:        and  (IR PwrSense:TV1 Power) is ON 
1305:        and  (IR PwrSense:VCR1 Power) is OFF 
1306:      Then 
1307:         If 
1308:           (IR PwrSense:SAT1 Power) is ON 
1309:         Then 
1310:           (IR:SAT1 TV/VIDEO ) play 1 time(s) [Living Room] 
1311:           (IR:TV1 2 ) play 1 time(s) [Living Room] 
1312:           (IR:TV1 1 ) play 1 time(s) [Living Room] 
1313:           DELAY  0:00:10 
1314:           (IR:TV1TV/VIDEO ) play 1 time(s) [Living Room] 
1315:           (IR:SAT1 TV/VIDEO ) play 1 time(s) [Living Room] 
1316:         Else 
1317:           (IR:TV1 2 ) play 1 time(s) [Living Room] 
1318:           (IR:TV1 1 ) play 1 time(s) [Living Room] 
1319:           DELAY  0:00:10 
1320:           (IR:TV1 Recall ) play 1 time(s) [Living Room] 
1321:          Nest End 
1322:       Nest End 
1323:      If 
1324:        (T:Bed1 Light) is Running 
1325:        and  (T:Front door) is Not Running 
1326:        and  (T:Front motion) is Not Running 
1327:        and  (F:Master Goodnight) is CLEAR 
1328:        and  (IR PwrSense:TV2 Power) is ON 
1329:      Then 
1330:        (IR:TV2 2 ) play 1 time(s) [Master Bedroom] 
1331:        (IR:TV2 1 ) play 1 time(s) [Master Bedroom] 
1332:        DELAY  0:00:15 
1333:        (IR:TV2 RECALL ) play 1 time(s) [Master Bedroom] 
1334:       Nest End 
1335:      If 
1336:        (T:Bed1 Light) is Running 
1337:        and  (T:Front door) is Not Running 
1338:        and  (T:Front motion) is Not Running 
1339:        and  (F:Master Goodnight) is CLEAR 
1340:        and  (IR PwrSense:TV2 Power) is OFF 
1341:      Then 
1342:        (IR:TV2 POWER ) play 1 time(s) [Master Bedroom] 
1343:        DELAY  0:00:01 
1344:        (IR:TV2 2 ) play 1 time(s) [Master Bedroom] 
1345:        (IR:TV2 1 ) play 1 time(s) [Master Bedroom] 
1346:        DELAY  0:00:30 
1347:        (IR:TV2 POWER ) play 1 time(s) [Master Bedroom] 
1348:       Nest End 
1349:      If 
1350:        (T:Front door) is Not Running 
1351:        and  (T:Front motion) is Not Running 
1352:        and  (F:Master Goodnight) is SET 
1353:      Then 
1354:        (IR:TV2 2 ) play 1 time(s) [Master Bedroom] 
1355:        (IR:TV2 1 ) play 1 time(s) [Master Bedroom] 
1356:        DELAY  0:00:15 
1357:        (IR:TV2 RECALL ) play 1 time(s) [Master Bedroom] 
1358:       Nest End 
1359:      If 
1360:        Time is Dark (after SunSet, before SunRise) 
1361:        and  Time is After 11:00 PM SMTWTFS   -Security Mode-  
1362:          -OR- 
1363:        Time is Dark (after SunSet, before SunRise) 
1364:        and  Time is After 12:00 AM SMTWTFS 
1365:        and  Time is Before 7:00 AM SMTWTFS 
1366:      Then 
1367:        X10:  (O-3  Porch Light) Set Level  100% 
1368:        DELAY  0:05:00 
1369:        X10:  (O-3  Porch Light) OFF 
1370:       Nest End 
1371:      If 
1372:        Time is Dark (after SunSet, before SunRise) 
1373:        and  Time is Before 11:00 PM SMTWTFS   -Security Mode-  
1374:      Then 
1375:        X10:  (O-3  Porch Light) Set Level  100% 
1376:        DELAY  0:05:00 
1377:        X10:  (O-3  Porch Light) Set Level  50 % 
1378:       Nest End 
1379:      If 
1380:        (F:Vacation Mode) is SET 
1381:      Then 
1382:        (T:Front motion) LOAD with 0:01:00 
1383:      Else 
1384:        (T:Front motion) LOAD with 0:05:00 
1385:       Nest End 
1386:   End 
1387:     
1388:   EVENT:  Front Door Motion 
1389:   If 
1390:     (DI:PorchMotion) Goes OFF 
1391:   Then 
1392:     (F:Front Dr Motion)  SET 
1393:     DELAY  0:00:30 Re-Triggerable 
1394:     (F:Front Dr Motion)  CLEAR 
1395:   End 
1396:     
1397:   EVENT:  Voice responses muted 
1398:   If 
1399:     " Mute Most Voice Responses  " 
1400:     " Type M-U-T-E on phone " 
1401:     and  TelePhone Seq:'^6883' Received within 10 seconds  
1402:     and  (F:Voice Mute) is CLEAR 
1403:   Then 
1404:     Connect PHONE port to ICM port 
1405:     (F:Intercom mode)  SET 
1406:     (F:Voice Mute)  SET 
1407:     " Mute voice responses " 
1408:     (T:Voice Mute) LOAD with 2:00:00 
1409:     VM:Incoming Call Monitor - Disabled 
1410:     Voice:SYSTEM SILENCEQ MUTED  [ICM] SYNC 
1411:     Clear TouchTone Input Buffer 
1412:   Else 
1413:      If 
1414:        TelePhone Seq:'^6883' Received within 10 seconds  
1415:        and  (F:Voice Mute) is SET 
1416:      Then 
1417:        (F:Voice Mute)  CLEAR 
1418:        Connect PHONE port to ICM port 
1419:        (F:Intercom mode)  SET 
1420:        VM:Incoming Call Monitor - Enabled 
1421:        (T:Voice Mute)  CLEAR 
1422:        Voice:VOICE ACTIVATD  [ICM] SYNC 
1423:        Clear TouchTone Input Buffer 
1424:       Nest End 
1425:   End 
1426:     
1427:   EVENT:  Turn off voice mute after 2 hrs 
1428:   If 
1429:     " Auto Unmute After 2 Hours " 
1430:     and  (T:Voice Mute) is Expiring 
1431:     and  (F:Voice Mute) is SET 
1432:   Then 
1433:     (F:Voice Mute)  CLEAR 
1434:     VM:Incoming Call Monitor - Enabled 
1435:   End 
1436:     
1437:   EVENT:  Intercom Activate 
1438:   If 
1439:     " Activate Intercomm Mode  " 
1440:     " Type *01 " 
1441:     and  TelePhone Seq:'^*01' Received within 10 seconds  
1442:   Then 
1443:     (F:Intercom mode)  SET 
1444:     Connect PHONE port to ICM port 
1445:     Clear TouchTone Input Buffer 
1446:   End 
1447:     
1448:   EVENT:  Intercom Deactivate 
1449:   If 
1450:     ICM: Is ON Hook 
1451:     and  (F:Intercom mode) is SET 
1452:     and  CO: Is OFF Hold 
1453:    * Frozen *     -OR- 
1454:    * Frozen *   TelePhone Seq:'+^+^+' Received within 13 seconds  
1455:   Then 
1456:     (F:Intercom mode)  CLEAR 
1457:     Stop any Voice Record/Play 
1458:     Connect PHONE port to CO port 
1459:     Audio:Disconnect ICM In to Line Level Out 
1460:   End 
1461:     
1462:   EVENT:  Page through speakers 
1463:   If 
1464:     " PA through speakers " 
1465:     " Type P-A-G-E " 
1466:     and  TelePhone Seq:'^7243' Received within 10 seconds  
1467:       -OR- 
1468:     ICM: Is OFF Hook 
1469:     and  TelePhone Seq:'7243' Received within 10 seconds  
1470:   Then 
1471:     Clear TouchTone Input Buffer 
1472:     Connect PHONE port to ICM port 
1473:     (F:Intercom mode)  SET 
1474:     Voice:ALERT3  [Line,ICM] 
1475:     Audio:Connect ICM In to Line Level Out 
1476:     DELAY  0:00:15 
1477:     Audio:Disconnect ICM In to Line Level Out 
1478:   End 
1479:     
1480:   EVENT:  Intercom Page 
1481:   If 
1482:     " Activate Intercomm Mode And Page " 
1483:     " Enter *7 " 
1484:     and  TelePhone Seq:'^*7' Received within 4 seconds  
1485:   Then 
1486:     Clear TouchTone Input Buffer 
1487:     (F:Intercom mode)  SET 
1488:     Connect PHONE port to ICM port 
1489:     Voice:BELLBAD BELLBAD  [Line,ICM] SYNC 
1490:     DELAY  0:00:01 
1491:     Voice:BELLBAD BELLBAD  [Line,ICM] SYNC 
1492:   End 
1493:     
1494:   EVENT:  Intercom page in ICM mode 
1495:   If 
1496:     ICM: Is OFF Hook 
1497:     and  TelePhone Seq:'*7' Received within 3 seconds  
1498:   Then 
1499:     Voice:BELLBAD BELLBAD  [Line,ICM] SYNC 
1500:     DELAY  0:00:01 
1501:     Voice:BELLBAD BELLBAD  [Line,ICM] SYNC 
1502:   End 
1503:     
1504:   EVENT:  Front Porch Light Automation 
1505:   If 
1506:     After Sunset SMTWTFS 
1507:   Then 
1508:     X10:  (O-3  Porch Light) Set Level  50 % 
1509:   End 
1510:     
1511:   EVENT:  Porch lights out 
1512:   If 
1513:     Time is 11:00 PM SMTWTFS   -Security Mode-  
1514:     and  (F:Away) is CLEAR 
1515:   Then 
1516:     " All Outside lights off " 
1517:     X10: O - All Lights OFF 
1518:   End 
1519:     
1520:   EVENT:  Turn Floods off after delay 
1521:   If 
1522:     (T:Dr/Porch lights) is Expiring 
1523:   Then 
1524:     X10:  (O-1  Driveway Flood) OFF 
1525:      If 
1526:        Time is Before 11:00 PM SMTWTFS   -Security Mode-  
1527:      Then 
1528:        X10:  (O-3  Porch Light) Set Level  50 % 
1529:      Else 
1530:        X10:  (O-3  Porch Light) OFF 
1531:       Nest End 
1532:   End 
1533:     
1534:   EVENT:  Keep Floods on w/motion 
1535:   If 
1536:     X10: (O-2  Driveway Motion) is ON  
1537:   Then 
1538:     (T:Dr/Porch lights) LOAD with 0:05:00 
1539:   End 
1540:     
1541:   EVENT:  Front floods sync/stargate 
1542:   If 
1543:     X10: (O-2  Driveway Motion) is ON  
1544:   Then 
1545:     X10:  (O-1  Driveway Flood) Set State to ON 
1546:   Else 
1547:      If 
1548:        X10: (O-2  Driveway Motion) is OFF  
1549:      Then 
1550:        X10:  (O-1  Driveway Flood) Set State to OFF 
1551:       Nest End 
1552:   End 
1553:     
1554:   EVENT:  VM Stop Record if ## recieved 
1555:   If 
1556:     TelePhone Seq:'##' Received within 5 seconds  
1557:   Then 
1558:     Audio:Disconnect CO In to Line Level Out 
1559:     Stop any Voice Record/Play 
1560:   End 
1561:     
1562:   EVENT:  VM Play All Messages 
1563:   If 
1564:     " Play All Messages " 
1565:     " Kitchen Keypad Button 1 ON " 
1566:     and  XSEQ:( E-1 E-ON ) Received within 3 seconds [Receive Only] 
1567:   Then 
1568:      If 
1569:        (VMAIL:MBX-1 # New Msg) = 0 
1570:        and  (VMAIL:MBX-1 # Old Msg) = 0 
1571:      Then 
1572:        Voice:NONEWMES  [Line] SYNC 
1573:      Else 
1574:        VM:Say number of Messages in MailBox 1  [Line,ICM] 
1575:        VM:Play All Messages in MailBox 1  [Line,ICM] 
1576:       Nest End 
1577:   End 
1578:     
1579:   EVENT:  VM Stop message 
1580:   If 
1581:     " Kitchen Keypad Button 1 OFF " 
1582:     and  XSEQ:( E-1 E-OFF ) Received within 3 seconds [Receive Only] 
1583:   Then 
1584:     Audio:Disconnect CO In to Line Level Out 
1585:     VM:Stop Message Playback 
1586:     Stop any Voice Record/Play 
1587:   End 
1588:     
1589:   EVENT:  VM Replay Message 
1590:   If 
1591:     XSEQ:( E-2 E-ON ) Received within 3 seconds [Receive Only] 
1592:   Then 
1593:     VM:Replay current Message in MailBox 1  [Line,ICM] 
1594:   End 
1595:     
1596:   EVENT:  VM Skip to Next Message 
1597:   If 
1598:     XSEQ:( E-2 E-OFF ) Received within 3 seconds [Receive Only] 
1599:   Then 
1600:     VM:Play Next Message in MailBox 1  [Line,ICM] 
1601:   End 
1602:     
1603:   EVENT:  VM Delete Message 
1604:   If 
1605:     XSEQ:( E-3 E-ON ) Received within 3 seconds [Receive Only] 
1606:   Then 
1607:     VM:Stop Message Playback 
1608:     Voice:MESSAGE DELETED  [Line,ICM] SYNC 
1609:     VM:Delete current Message in MailBox 1  
1610:   End 
1611:     
1612:   EVENT:  SPA Timer 
1613:   If 
1614:     XSEQ:( E-4 E-ON ) Received within 3 seconds [Receive Only] 
1615:   Then 
1616:      If 
1617:        (F:Spa Timer On) is CLEAR 
1618:      Then 
1619:        (F:Spa Timer On)  SET 
1620:        (T:SPA Timer) LOAD with 0:10:00 
1621:        (THEN MACRO:SPK ONLY Zone3) 
1622:        Voice:OUT SIDE TEMPERAT IS SILENCEQ <Outside Temp>DEGREES  [Line] SYNC 
1623:        Voice:SPA TIMER SILENCEH ON  [Line] SYNC 
1624:        (THEN MACRO:SPKs Normal) 
1625:      Else 
1626:        (F:Spa Timer On)  CLEAR 
1627:        (T:SPA Timer)  CLEAR 
1628:        (THEN MACRO:SPK ONLY Zone3) 
1629:        Voice:SPA TIMER SILENCEH OFF  [Line] SYNC 
1630:        (THEN MACRO:SPKs Normal) 
1631:       Nest End 
1632:   End 
1633:     
1634:   EVENT:  Spa Timer 
1635:   If 
1636:     (T:SPA Timer) is Expiring 
1637:   Then 
1638:     X10:  (D-1  Dinning Room) ON 
1639:     X10:  (D-1  Dinning Room) OFF 
1640:     X10:  (D-1  Dinning Room) ON 
1641:     X10:  (D-1  Dinning Room) OFF 
1642:     X10:  (D-1  Dinning Room) ON 
1643:     X10:  (D-1  Dinning Room) OFF 
1644:     (T:SPA Timer) LOAD with 0:10:00 
1645:   End 
1646:     
1647:   EVENT:  New Phone Messages Alert 
1648:   If - Always 
1649:     (VMAIL:MBX-1 # New Msg) >= 1 
1650:     and  (F:Away) is CLEAR 
1651:     and  (F:Vacation Mode) is CLEAR 
1652:   Then 
1653:     Voice:YOU_HAVE PHONE MESSAGES  [Line] 
1654:     DELAY  0:05:00 
1655:   End 
1656:     
1657:   EVENT:  VM Toll Saver 
1658:   If 
1659:     (VMAIL:MBX-1 # New Msg) >= 1 
1660:     and  (F:Away) is SET 
1661:       -OR- 
1662:     (VMAIL:MBX-1 # New Msg) >= 1 
1663:     and  (F:Vacation Mode) is SET 
1664:   Then 
1665:     VM:Answer on Ring 2  
1666:   Else 
1667:     VM:Answer on Ring 4  
1668:   End 
1669:     
1670:   EVENT:  VM Call monitor off for 15 min. 
1671:   If 
1672:     XSEQ:( E-3 E-OFF ) Received within 3 seconds [Receive Only] 
1673:   Then 
1674:     VM:Incoming Call Monitor - Disabled 
1675:     DELAY  0:15:00 
1676:     VM:Incoming Call Monitor - Enabled 
1677:   End 
1678:     
1679:   EVENT:  Read Temperatures from kitchen 
1680:   If 
1681:     " Kitchen Desktop Keypad " 
1682:     " Button 4 OFF " 
1683:     and  XSEQ:( E-4 E-OFF ) Received within 3 seconds [Receive Only] 
1684:   Then 
1685:     (THEN MACRO:SPK ONLY Zone3) 
1686:     Voice:OUT SIDE TEMPERAT IS <Outside Temp>DEGREES  [Line] SYNC 
1687:     Voice:DOWNSTAI TEMPERAT IS <DownSt Temp>DEGREES  [Line] SYNC 
1688:     Voice:UPSTAIRS TEMPERAT IS <UpstairsTemp>DEGREES  [Line] SYNC 
1689:     (THEN MACRO:SPKs Normal) 
1690:   End 
1691:     
1692:   EVENT:  Read Temperature from bedroom 
1693:   If 
1694:     " Master bedroom desktop keypad " 
1695:     " Button 4 ON " 
1696:     and  XSEQ:( F-4 F-ON ) Received within 3 seconds [Receive Only] 
1697:   Then 
1698:     (THEN MACRO:SPK ONLY Zone1) 
1699:     Voice:OUT SIDE TEMPERAT IS <Outside Temp>DEGREES  [Line] SYNC 
1700:     Voice:DOWNSTAI TEMPERAT IS <DownSt Temp>DEGREES  [Line] SYNC 
1701:     Voice:UPSTAIRS TEMPERAT IS <UpstairsTemp>DEGREES  [Line] SYNC 
1702:     (THEN MACRO:SPKs Normal) 
1703:   End 
1704:     
1705:   EVENT:  Read Temperature Hi/Lows 
1706:   If 
1707:     " Master Bedroom Desktop keypad " 
1708:     " Button 4 Off " 
1709:     and  XSEQ:( F-4 F-OFF ) Received within 3 seconds [Receive Only] 
1710:   Then 
1711:     (THEN MACRO:SPK ONLY Zone1) 
1712:     DELAY  0:00:01 
1713:     Voice:NUMBER 1 TEMPERAT <Outside Temp Hi> DEGREES SILENCE1 
NUMBER 2 TEMPERAT <Ouside Temp Low> DEGREES  [Line] SYNC 
1714:     (THEN MACRO:SPKs Normal) 
1715:   End 
1716:     
1717:   EVENT:  Home/Away Toggle 
1718:   If 
1719:     " Activate Home Mode " 
1720:     " Wall Controllers Button 4 Off " 
1721:     and  XSEQ:( G-8 G-OFF ) Received within 3 seconds [Receive Only] 
1722:     and  (F:Away) is SET 
1723:       -OR- 
1724:     XSEQ:( G-12 G-OFF ) Received within 3 seconds [Receive Only] 
1725:     and  (F:Away) is SET 
1726:       -OR- 
1727:     " Enter  H-O-M-E on phone keypad " 
1728:     and  TelePhone Seq:'^4663' Received within 10 seconds  
1729:     and  (F:Away) is SET 
1730:       -OR- 
1731:     " Enter ** H-O-M-E on phone keypad " 
1732:     and  TelePhone Seq:'**4663' Received within 10 seconds  
1733:     and  (F:Away) is SET 
1734:   Then 
1735:     Clear TouchTone Input Buffer 
1736:     Voice:ALARM SILENCEQ DE_ACTIV  [Line,CO] SYNC 
1737:     DELAY  0:00:01 
1738:     Voice:WELCOME HOME  [Line,CO] SYNC 
1739:      If 
1740:        (V:Away Doorbell) >= 1 
1741:      Then 
1742:        DELAY  0:00:02 
1743:        Voice:DOORBELL BUTTON ACTIVITY SILENCE1 <Away Doorbell>  [Line] SYNC 
1744:       Nest End 
1745:      If 
1746:        (VMAIL:MBX-1 # Old Msg) > 0 
1747:        and  (VMAIL:MBX-1 # New Msg) = 0 
1748:      Then 
1749:        DELAY  0:00:02 
1750:        Voice:U HAVE OLD PHONE MESSAGES  [Line,CO] SYNC 
1751:       Nest End 
1752:     (THEN MACRO:Special annouce) 
1753:     DELAY  0:00:01 
1754:     (THEN MACRO:Holiday announce) 
1755:     (F:Away)  CLEAR 
1756:     X10:  (G-8  Liv Wall Ctrl 4) OFF 
1757:     X10:  (G-12  Fam Wall Ctrl A4) OFF 
1758:      If 
1759:        Time is After 7:59 PM SMTWTFS 
1760:      Then 
1761:        X10:  (B-1  Bed 1 Lamp) OFF 
1762:        X10:  (B-2  Jeremys Lamp) OFF 
1763:        X10:  (G-1  Bed1 Light) OFF 
1764:       Nest End 
1765:     (THEN MACRO:Page Tim) 
1766:     ASCII-Out:'Home Mode Activated.' [COM1] 
1767:   End 
1768:     
1769:   EVENT:  Home mode announcements 
1770:   If 
1771:     " Activate Home Mode " 
1772:     " Wall Controllers Button 4 Off " 
1773:     and  XSEQ:( G-8 G-OFF ) Received within 3 seconds [Receive Only] 
1774:     and  (F:Away) is CLEAR 
1775:       -OR- 
1776:     XSEQ:( G-12 G-OFF ) Received within 3 seconds [Receive Only] 
1777:     and  (F:Away) is CLEAR 
1778:   Then 
1779:      If 
1780:        (V:Away Doorbell) >= 1 
1781:      Then 
1782:        DELAY  0:00:02 
1783:        Voice:DOORBELL BUTTON ACTIVITY SILENCE1 <Away Doorbell>  [Line] SYNC 
1784:       Nest End 
1785:      If 
1786:        (VMAIL:MBX-1 # Old Msg) > 0 
1787:        and  (VMAIL:MBX-1 # New Msg) = 0 
1788:      Then 
1789:        DELAY  0:00:02 
1790:        Voice:U HAVE OLD PHONE MESSAGES  [Line,CO] SYNC 
1791:       Nest End 
1792:     (THEN MACRO:Special annouce) 
1793:     DELAY  0:00:01 
1794:     (THEN MACRO:Holiday announce) 
1795:   End 
1796:     
1797:   EVENT:  Home/Away Toggle 
1798:   If 
1799:     " Activate Away Mode " 
1800:     " Door Keypad Button 1 OFF " 
1801:     and  XSEQ:( G-8 G-ON ) Received within 3 seconds [Receive Only] 
1802:     and  (F:Away) is CLEAR 
1803:     and  (F:Vacation Mode) is CLEAR 
1804:       -OR- 
1805:     " Enter A-W-A-Y on phone keypad " 
1806:     and  TelePhone Seq:'^2929' Received within 10 seconds  
1807:     and  (F:Away) is CLEAR 
1808:     and  (F:Vacation Mode) is CLEAR 
1809:       -OR- 
1810:     " Enter ** A-W-A-Y on phone keypad " 
1811:     and  TelePhone Seq:'**2929' Received within 10 seconds  
1812:     and  (F:Away) is CLEAR 
1813:     and  (F:Vacation Mode) is CLEAR 
1814:   Then 
1815:     Clear TouchTone Input Buffer 
1816:     Voice:OUT SIDE TEMPERAT IS <Outside Temp>DEGREES  [Line,CO] SYNC 
1817:     Voice:ALARM SILENCEQ ACTIVATD  [Line,CO] SYNC 
1818:     DELAY  0:00:01 
1819:      If 
1820:        Time is Before 5:00 PM SMTWTFS 
1821:      Then 
1822:        Voice:HAVE A GOOD DAY SILENCEQ GOODBYE  [Line,CO] SYNC 
1823:      Else 
1824:        Voice:HAVE A GOOD EVENING SILENCEQ GOODBYE  [Line,CO] SYNC 
1825:       Nest End 
1826:     (F:Away)  SET 
1827:     (T:Exit delay) LOAD with 0:10:00 
1828:     X10:  (G-8  Liv Wall Ctrl 4) ON 
1829:     X10:  (G-12  Fam Wall Ctrl A4) ON 
1830:     (THEN MACRO:Page Tim) 
1831:     ASCII-Out:'Away Mode Activated.' [COM1] 
1832:   End 
1833:     
1834:   EVENT:  Away mode from Living room 
1835:   If 
1836:     XSEQ:( G-12 G-ON ) Received within 3 seconds [Receive Only] 
1837:     and  (F:Away) is CLEAR 
1838:     and  (F:Vacation Mode) is CLEAR 
1839:   Then 
1840:      If 
1841:        (DI:Garage Dr CL) is ON 
1842:      Then 
1843:        (RELAY:Garage Door) ON  
1844:        DELAY  0:00:01 
1845:        (RELAY:Garage Door) OFF  
1846:       Nest End 
1847:     Voice:OUT SIDE TEMPERAT IS <Outside Temp>DEGREES  [Line,CO] SYNC 
1848:     Voice:ALARM SILENCEQ ACTIVATD  [Line,CO] SYNC 
1849:     DELAY  0:00:01 
1850:      If 
1851:        Time is Before 5:00 PM SMTWTFS 
1852:      Then 
1853:        Voice:HAVE A GOOD DAY SILENCEQ GOODBYE  [Line,CO] SYNC 
1854:      Else 
1855:        Voice:HAVE A GOOD EVENING SILENCEQ GOODBYE  [Line,CO] SYNC 
1856:       Nest End 
1857:     (F:Away)  SET 
1858:     (T:Exit delay) LOAD with 0:10:00 
1859:     X10:  (G-8  Liv Wall Ctrl 4) ON 
1860:     X10:  (G-12  Fam Wall Ctrl A4) ON 
1861:     (THEN MACRO:Page Tim) 
1862:     ASCII-Out:'Away Mode Activated.' [COM1] 
1863:   End 
1864:     
1865:   EVENT:  Home Mode Functions 
1866:   If 
1867:     (F:Away) is CLEAR 
1868:   Then 
1869:     (F:Alarm Condition)  CLEAR 
1870:     (T:Entry Delay)  CLEAR 
1871:     (T:Alarm Condition)  CLEAR 
1872:     (F:Voice Mute)  CLEAR 
1873:     VM:Answer on Ring 5  
1874:     VM:Incoming Call Monitor - Enabled 
1875:   End 
1876:     
1877:   EVENT:  Away Mode Functions 
1878:   If 
1879:     (F:Away) is SET 
1880:   Then 
1881:     VM:Incoming Call Monitor - Disabled 
1882:     (F:Voice Mute)  SET 
1883:     (V:Away Doorbell)  LOAD with 0 
1884:     VM:Answer on Ring 4  
1885:     (THEN MACRO:Lights Out) 
1886:   End 
1887:     
1888:   EVENT:  System Status at home via ICM 
1889:   If 
1890:     TelePhone Seq:'^7828' Received within 10 seconds  
1891:     " If off hook and STAT recieved " 
1892:   Then 
1893:     Clear TouchTone Input Buffer 
1894:     Connect PHONE port to ICM port 
1895:     (F:Intercom mode)  SET 
1896:     (THEN MACRO:System Status) 
1897:   End 
1898:     
1899:   EVENT:  System Status via CO 
1900:   If 
1901:     TelePhone Seq:'**7828' Received within 10 seconds  
1902:     " Dial **STAT " 
1903:   Then 
1904:     Clear TouchTone Input Buffer 
1905:     (THEN MACRO:System Status) 
1906:   End 
1907:     
1908:   EVENT:  Voice Reminders 
1909:   If 
1910:     (F:Away) is CLEAR 
1911:     and  (F:Voice Mute) is CLEAR 
1912:     and  (F:Master Goodnight) is CLEAR 
1913:     and  (F:Vacation Mode) is CLEAR 
1914:   Then 
1915:      If 
1916:        Time is 6:00 PM SMTWTFS 
1917:      Then 
1918:       * Frozen *   Voice:TONE_D  [Line] SYNC 
1919:       * Frozen *   Voice:Time2FeedDogs  [Line] SYNC 
1920:       * Frozen *   DELAY  0:00:01 
1921:        (THEN MACRO:Special annouce) 
1922:        DELAY  0:00:01 
1923:        (THEN MACRO:Holiday announce) 
1924:       Nest End 
1925:       * Frozen * If 
1926:       * Frozen *   Time is 9:55 PM ....T.. 
1927:       * Frozen * Then 
1928:       * Frozen *   Voice:TONE_D  [Line] SYNC 
1929:       * Frozen *   Voice:E R IS ON TV IN 5 MINUTES  [Line] 
1930:       * Frozen *  Nest End 
1931:      If - Always 
1932:        Time is After 5:59 PM ....T.. 
1933:        and  Time is Before 9:00 PM ....T.. 
1934:        and  (F:Garbage Out) is CLEAR 
1935:      Then 
1936:        Voice:TONE_D  [Line] SYNC 
1937:        Voice:Garbage Night  [Line] 
1938:        DELAY  1:00:00 
1939:       Nest End 
1940:   End 
1941:     
1942:   EVENT:  Garbage Taken out 
1943:   If 
1944:     Time is After 6:00 PM ....T.. 
1945:     and  (DI:Side Dr CL) Goes OFF 
1946:   Then 
1947:     (F:Garbage Out)  SET 
1948:   End 
1949:     
1950:   EVENT:  Morning reminders 
1951:   If 
1952:     Time is After 6:00 AM .MTWTF. 
1953:     and  Time is Before 9:00 AM .MTWTF. 
1954:     and  (F:Voice Mute) is CLEAR 
1955:     and  (F:Away) is CLEAR 
1956:     and  (DI:Bed1Motion) Goes OFF 
1957:     and  (F:Morning reminder) is CLEAR 
1958:     and  (F:Wake up alarm) is CLEAR 
1959:     and  (F:Vacation Mode) is CLEAR 
1960:       -OR- 
1961:     Time is After 7:00 AM S.....S 
1962:     and  Time is Before 10:00 AM S.....S 
1963:     and  (F:Voice Mute) is CLEAR 
1964:     and  (F:Away) is CLEAR 
1965:     and  (F:Morning reminder) is CLEAR 
1966:     and  (DI:Bed1Motion) Goes OFF 
1967:     and  (F:Wake up alarm) is CLEAR 
1968:     and  (F:Vacation Mode) is CLEAR 
1969:   Then 
1970:     (F:Morning reminder)  SET 
1971:     (THEN MACRO:SPK ONLY Zone1) 
1972:     DELAY  0:00:03 
1973:     Voice:SILENCE2 GOODMORN SILENCE1 TODAYIS SILENCEQ <day hh:mm am/pm> [Line] SYNC 
1974:     DELAY  0:00:01 
1975:     (THEN MACRO:Speak Month) 
1976:     Voice:<Date>  [Line] SYNC 
1977:     DELAY  0:00:01 
1978:     Voice:OUT SIDE TEMPERAT IS <Outside Temp>DEGREES SILENCEH  [Line] SYNC 
1979:     (THEN MACRO:Special annouce) 
1980:     DELAY  0:00:01 
1981:     (THEN MACRO:Holiday announce) 
1982:     (THEN MACRO:SPKs Normal) 
1983:   End 
1984:     
2059:     
2060:   EVENT:  Lighting to Leave by 
2061:   If 
2062:     (F:Away) is SET 
2063:     and  (F:Dark mode) is SET 
2064:   Then 
2065:     X10:  (D-1  Dinning Room) ON 
2066:     X10:  (G-9  Fam Rm Lamp) ON 
2067:     DELAY  0:05:00 
2068:     X10:  (D-1  Dinning Room) OFF 
2069:     X10:  (G-9  Fam Rm Lamp) OFF 
2070:   End 
2071:     
2072:   EVENT:  Dinning Light On w/return 
2073:   If 
2074:     (F:Dark mode) is SET 
2075:     and  (F:Away) is SET 
2076:     and  (DI:Front Dr CL) Goes OFF 
2077:       -OR- 
2078:     (F:Dark mode) is SET 
2079:     and  (F:Away) is SET 
2080:     and  (DI:Garage Dr CL) Goes OFF 
2081:   Then 
2082:     X10:  (D-1  Dinning Room) ON 
2083:     X10:  (G-9  Fam Rm Lamp) ON 
2084:     X10:  (B-2  Jeremys Lamp) OFF 
2085:     X10:  (G-1  Bed1 Light) OFF 
2086:     DELAY  0:05:00 
2087:     X10:  (D-1  Dinning Room) OFF 
2088:   End 
2089:     
2090:   EVENT:  Call in 
2091:   If 
2092:     (F:Away) is SET 
2093:     and  CallerID: 0005551212  
2094:       -OR- 
2095:     CallerID: 0005551212  
2096:     and  (F:Vacation Mode) is SET 
2097:   Then 
2098:     TelePhone Out:'^,' 
2099:     Force Remote User 1 Access 
2100:   End 
2101:     
2102:   EVENT:  Dim Family Room Lamp 
2103:   If 
2104:     XSEQ:( G-9 G-ON ) Received within 3 seconds [Receive Only] 
2105:     and  X10: (G-9  Fam Rm Lamp) is ON  
2106:   Then 
2107:     X10:  (G-9  Fam Rm Lamp) DIM 4 Steps  
2108:   End 
2109:     
2122:     
2123:   EVENT:  TV: Temperature 
2124:   If 
2125:     XSEQ:( A-9 A-ON ) Received within 3 seconds [Receive Only] 
2126:     and  (V:TV Menu) = 1 
2127:       -OR- 
2128:     IR Seq:'TV2 INPUT ' Received within 3 seconds  
2129:     and  (V:TV Menu) = 1 
2130:   Then 
2131:     ASCII-Out:'! TERM0 S=\f' [RS-485] 
2132:     (THEN MACRO:TV: Temp Screen) 
2133:     DELAY  0:00:01 
2134:     (THEN MACRO:TV:Temp Scrn2) 
2135:     (V:TV Menu)  LOAD with 2 
2136:     (T:TV Menu Clear) LOAD with 0:10:00 
2137:   End 
2138:     
2139:   EVENT:  TV: Clear Screen 
2140:   If 
2141:     XSEQ:( A-9 A-OFF ) Received within 3 seconds [Receive Only] 
2142:       -OR- 
2143:     XSEQ:( A-10 A-OFF ) Received within 3 seconds [Receive Only] 
2144:       -OR- 
2145:     XSEQ:( A-11 A-OFF ) Received within 3 seconds [Receive Only] 
2146:       -OR- 
2147:     XSEQ:( A-12 A-OFF ) Received within 3 seconds [Receive Only] 
2148:       -OR- 
2149:     XSEQ:( A-13 A-OFF ) Received within 3 seconds [Receive Only] 
2150:       -OR- 
2151:     XSEQ:( A-14 A-OFF ) Received within 3 seconds [Receive Only] 
2152:       -OR- 
2153:     XSEQ:( A-15 A-OFF ) Received within 3 seconds [Receive Only] 
2154:       -OR- 
2155:     XSEQ:( A-16 A-OFF ) Received within 3 seconds [Receive Only] 
2156:       -OR- 
2157:     (T:TV Menu Clear) is Expiring 
2158:   Then 
2159:     Stop any Voice Record/Play 
2160:     ASCII-Out:'! TERM0 S=\f' [RS-485] 
2161:     ASCII-Out:'! TERM0 S=\k' [RS-485] 
2162:     (V:TV Menu)  LOAD with 0 
2163:     (T:TV Menu Clear)  STOP  
2164:      If 
2165:        X10: (B-15  PA Amp) is OFF  
2166:          -OR- 
2167:        X10: (B-15  PA Amp) is IDLE  
2168:      Then 
2169:        X10:  (B-15  PA Amp) ON 
2170:       Nest End 
2171:   End 
2172:     
2173:   EVENT:  TV:Line menu clear 
2174:   If 
2175:     (T:TV Menu Line Clr) is Expiring 
2176:   Then 
2177:     ASCII-Out:'! TERM0 S=\e[10j\e[K' [RS-485] 
2178:   End 
2179:     
2180:   EVENT:  TV: Status 
2181:   If 
2182:     XSEQ:( A-11 A-ON ) Received within 3 seconds [Receive Only] 
2183:     and  (V:TV Menu) = 1 
2184:   Then 
2185:     ASCII-Out:'! TERM0 S=\f' [RS-485] 
2186:     (THEN MACRO:TV:Status Screen) 
2187:     DELAY  0:00:01 
2188:     (THEN MACRO:TV:Status Scrn2) 
2189:     (V:TV Menu)  LOAD with 4 
2190:     (T:TV Menu Clear) LOAD with 0:10:00 
2191:   End 
2192:     
2193:   EVENT:  TV: VM 
2194:   If 
2195:     XSEQ:( A-10 A-ON ) Received within 3 seconds [Receive Only] 
2196:     and  (V:TV Menu) = 1 
2197:       -OR- 
2198:     XSEQ:( A-16 A-ON ) Received within 3 seconds [Receive Only] 
2199:     and  (V:TV Menu) = 20 
2200:   Then 
2201:     ASCII-Out:'! TERM0 S=\f' [RS-485] 
2202:     (THEN MACRO:TV:VM Menu) 
2203:     DELAY  0:00:01 
2204:     (THEN MACRO:TV: VM Menu2) 
2205:      If 
2206:        X10: (B-15  PA Amp) is ON  
2207:      Then 
2208:        X10:  (B-15  PA Amp) OFF 
2209:        Voice:SILENCE2  [Line] SYNC 
2210:        Voice:SILENCE2  [Line] SYNC 
2211:       Nest End 
2212:     (T:TV Menu Clear) LOAD with 0:10:00 
2213:     (V:TV Menu)  LOAD with 3 
2214:   End 
2215:     
2216:   EVENT:  TV:VM Play 
2217:   If 
2218:     XSEQ:( A-9 A-ON ) Received within 3 seconds [Receive Only] 
2219:     and  (V:TV Menu) = 3 
2220:   Then 
2221:      If 
2222:        (VMAIL:MBX-1 # New Msg) = 0 
2223:        and  (VMAIL:MBX-1 # Old Msg) = 0 
2224:      Then 
2225:        ASCII-Out:'! TERM0 S=\e[10jNo messages \' [RS-485] 
2226:        ASCII-Out:'available...' [RS-485] 
2227:        (T:TV Menu Line Clr) LOAD with 0:00:03 
2228:      Else 
2229:        ASCII-Out:'! TERM0 S=\e[10jPlaying....' [RS-485] 
2230:        (T:TV Menu Line Clr) LOAD with 0:00:03 
2231:        VM:Play All Messages in MailBox 1  [Line] 
2232:       Nest End 
2233:   End 
2234:     
2235:   EVENT:  TV:VM Skip 
2236:   If 
2237:     XSEQ:( A-10 A-ON ) Received within 3 seconds [Receive Only] 
2238:     and  (V:TV Menu) = 3 
2239:   Then 
2240:     ASCII-Out:'! TERM0 S=\e[10jSkipping...' [RS-485] 
2241:     (T:TV Menu Line Clr) LOAD with 0:00:03 
2242:     VM:Play Next Message in MailBox 1  [Line] 
2243:   End 
2244:     
2245:   EVENT:  TV:VM Replay 
2246:   If 
2247:     XSEQ:( A-11 A-ON ) Received within 3 seconds [Receive Only] 
2248:     and  (V:TV Menu) = 3 
2249:   Then 
2250:     ASCII-Out:'! TERM0 S=\e[10jReplaying...' [RS-485] 
2251:     (T:TV Menu Line Clr) LOAD with 0:00:03 
2252:     VM:Replay current Message in MailBox 1  [Line] 
2253:   End 
2254:     
2255:   EVENT:  TV:VM Stop 
2256:   If 
2257:     XSEQ:( A-12 A-ON ) Received within 3 seconds [Receive Only] 
2258:     and  (V:TV Menu) = 3 
2259:   Then 
2260:     ASCII-Out:'! TERM0 S=\e[10jStopping...' [RS-485] 
2261:     (T:TV Menu Line Clr) LOAD with 0:00:03 
2262:     VM:Stop Message Playback 
2263:     Stop any Voice Record/Play 
2264:   End 
2265:     
2266:   EVENT:  TV:VM Delete 
2267:   If 
2268:     XSEQ:( A-13 A-ON ) Received within 3 seconds [Receive Only] 
2269:     and  (V:TV Menu) = 3 
2270:   Then 
2271:     ASCII-Out:'! TERM0 S=\e[10jDeleting...' [RS-485] 
2272:     (T:TV Menu Line Clr) LOAD with 0:00:03 
2273:     Voice:MESSAGE DELETED  [Line] SYNC 
2274:     VM:Stop Message Playback 
2275:     VM:Delete current Message in MailBox 1  
2276:   End 
2277:     
2278:   EVENT:  TV: VM Caller ID 
2279:   If 
2280:     XSEQ:( A-14 A-ON ) Received within 3 seconds [Receive Only] 
2281:     and  (V:TV Menu) = 3 
2282:   Then 
2283:     ASCII-Out:'! TERM0 S=\f' [RS-485] 
2284:     ASCII-Out:'! TERM0 S=\j \e[1M \x6e ' [RS-485] 
2285:     ASCII-Out:'! TERM0 S=CALLER IDENTIFICATION' [RS-485] 
2286:     ASCII-Out:'! TERM0 S=\e[3jThe last caller\' [RS-485] 
2287:     ASCII-Out:': <CID> ' [RS-485] 
2288:     (V:TV Menu)  LOAD with 20 
2289:   End 
2290:     
2291:   EVENT:  TV: Main Menu 
2292:   If 
2293:     XSEQ:( A-16 A-ON ) Received within 3 seconds [Receive Only] 
2294:     and  (V:TV Menu) != 20 
2295:   Then 
2296:     Stop any Voice Record/Play 
2297:     ASCII-Out:'! TERM0 S=\f' [RS-485] 
2298:     (THEN MACRO:TV: Main Menu) 
2299:     DELAY  0:00:01 
2300:     (THEN MACRO:TV: Main Menu2) 
2301:     (V:TV Menu)  LOAD with 1 
2302:     (T:TV Menu Clear) LOAD with 0:10:00 
2303:      If 
2304:        X10: (B-15  PA Amp) is OFF  
2305:          -OR- 
2306:        X10: (B-15  PA Amp) is IDLE  
2307:      Then 
2308:        X10:  (B-15  PA Amp) ON 
2309:       Nest End 
2310:   End 
2311:     
2312:   EVENT:  TV:System Controls 
2313:   If 
2314:     XSEQ:( A-12 A-ON ) Received within 3 seconds [Receive Only] 
2315:     and  (V:TV Menu) = 1 
2316:   Then 
2317:     ASCII-Out:'! TERM0 S=\f' [RS-485] 
2318:     (THEN MACRO:TV: Sys Controls) 
2319:     (V:TV Menu)  LOAD with 5 
2320:     (T:TV Menu Clear) LOAD with 0:10:00 
2321:   End 
2322:     
2323:   EVENT:  TV: Lighting 
2324:   If 
2325:     XSEQ:( A-9 A-ON ) Received within 3 seconds [Receive Only] 
2326:     and  (V:TV Menu) = 5 
2327:   Then 
2328:     ASCII-Out:'! TERM0 S=\f' [RS-485] 
2329:     (THEN MACRO:TV:Lighting) 
2330:     DELAY  0:00:01 
2331:     (THEN MACRO:TV: Lighting2) 
2332:     (V:TV Menu)  LOAD with 21 
2333:     (T:TV Menu Clear) LOAD with 0:10:00 
2334:   End 
2335:     
2336:   EVENT:  TV: Lighting Family RM 
2337:   If 
2338:     XSEQ:( A-9 A-ON ) Received within 3 seconds [Receive Only] 
2339:     and  (V:TV Menu) = 21 
2340:   Then 
2341:      If 
2342:        X10: (G-9  Fam Rm Lamp) is ON  
2343:      Then 
2344:        X10:  (G-9  Fam Rm Lamp) OFF 
2345:      Else 
2346:        X10:  (G-9  Fam Rm Lamp) ON 
2347:       Nest End 
2348:     DELAY  0:00:03 
2349:     ASCII-Out:'! TERM0 S=\f' [RS-485] 
2350:     (THEN MACRO:TV:Lighting) 
2351:     DELAY  0:00:01 
2352:     (THEN MACRO:TV: Lighting2) 
2353:     (V:TV Menu)  LOAD with 21 
2354:     (T:TV Menu Clear) LOAD with 0:10:00 
2355:   End 
2356:     
2357:   EVENT:  TV: Lighting Dinning RM 
2358:   If 
2359:     XSEQ:( A-10 A-ON ) Received within 3 seconds [Receive Only] 
2360:     and  (V:TV Menu) = 21 
2361:   Then 
2362:      If 
2363:        X10: (D-1  Dinning Room) is ON  
2364:      Then 
2365:        X10:  (D-1  Dinning Room) OFF 
2366:      Else 
2367:        X10:  (D-1  Dinning Room) ON 
2368:       Nest End 
2369:     DELAY  0:00:03 
2370:     ASCII-Out:'! TERM0 S=\f' [RS-485] 
2371:     (THEN MACRO:TV:Lighting) 
2372:     DELAY  0:00:01 
2373:     (THEN MACRO:TV: Lighting2) 
2374:     (V:TV Menu)  LOAD with 21 
2375:     (T:TV Menu Clear) LOAD with 0:10:00 
2376:   End 
2377:     
2378:   EVENT:  TV: Lighting Living RM 
2379:   If 
2380:     XSEQ:( A-11 A-ON ) Received within 3 seconds [Receive Only] 
2381:     and  (V:TV Menu) = 21 
2382:   Then 
2383:      If 
2384:        X10: (G-5  Liv Room Torch) is ON  
2385:      Then 
2386:        X10:  (G-5  Liv Room Torch) OFF 
2387:      Else 
2388:        X10:  (G-5  Liv Room Torch) ON 
2389:       Nest End 
2390:     DELAY  0:00:03 
2391:     ASCII-Out:'! TERM0 S=\f' [RS-485] 
2392:     (THEN MACRO:TV:Lighting) 
2393:     DELAY  0:00:01 
2394:     (THEN MACRO:TV: Lighting2) 
2395:     (V:TV Menu)  LOAD with 21 
2396:     (T:TV Menu Clear) LOAD with 0:10:00 
2397:   End 
2398:     
2399:   EVENT:  Vacation Mode Activate 
2400:   If 
2401:     " VACA from telephone entered " 
2402:     and  TelePhone Seq:'^8222' Received within 10 seconds  
2403:     and  (F:Vacation Mode) is CLEAR 
2404:   Then 
2405:     Clear TouchTone Input Buffer 
2406:     (F:Intercom mode)  SET 
2407:     Connect PHONE port to ICM port 
2408:     Voice:SET UP VCR TAPE FOR SECURITY CAMERA SILENCE1 HAVE A GOOD T
IME AWAY  [CO,ICM] SYNC 
2409:     (F:Vacation Mode)  SET 
2410:     VM:Incoming Call Monitor - Disabled 
2411:   End 
2412:     
2413:   EVENT:  Vacation Mode Deactivate 
2414:   If 
2415:     " VACA from telephone entered " 
2416:     and  TelePhone Seq:'^8222' Received within 10 seconds  
2417:     and  (F:Vacation Mode) is SET 
2418:   Then 
2419:     Clear TouchTone Input Buffer 
2420:     (F:Intercom mode)  SET 
2421:     Connect PHONE port to ICM port 
2422:     Voice:WELCOME BACK  [CO,ICM] SYNC 
2423:     (F:Vacation Mode)  CLEAR 
2424:     VM:Incoming Call Monitor - Enabled 
2425:   End 
2426:     
2427:    * Frozen * EVENT:  Vacation Mode Camera 
2428:    * Frozen * If 
2429:    * Frozen *   (F:Front Dr Motion) is SET 
2430:    * Frozen *   and  (F:Vacation Mode) is SET 
2431:    * Frozen * Then 
2432:       * Frozen * If 
2433:       * Frozen *   (IR PwrSense:VCR1 Power) is OFF 
2434:       * Frozen * Then 
2435:       * Frozen *   (IR:VCR1 POWER ) play 1 time(s) [Living Room] 
2436:       * Frozen *   DELAY  0:00:01 
2437:       * Frozen *  Nest End 
2438:    * Frozen *   (IR:VCR1 2 ) play 1 time(s) [Living Room] 
2439:    * Frozen *   (IR:VCR1 1 ) play 1 time(s) [Living Room] 
2440:    * Frozen *   (IR:VCR1 RECORD ) play 1 time(s) [Living Room] 
2441:    * Frozen *   ASCII-Out:'! TERM0 S=\b \f \k ' [RS-485] 
2442:    * Frozen *   ASCII-Out:'! TERM0 S=<$d> <$t1>' [RS-485] 
2443:    * Frozen * Else 
2444:    * Frozen *   (IR:VCR1 STOP ) play 1 time(s) [Living Room] 
2445:    * Frozen *   DELAY  0:00:01 
2446:    * Frozen *   (IR:VCR1 0 ) play 1 time(s) [Living Room] 
2447:    * Frozen *   (IR:VCR1 4 ) play 1 time(s) [Living Room] 
2448:    * Frozen *   (IR:VCR1 POWER ) play 1 time(s) [Living Room] 
2449:    * Frozen *   ASCII-Out:'! TERM0 S=\k \c' [RS-485] 
2450:    * Frozen *   DELAY  0:00:20 
2451:    * Frozen * End 
2452:     
2453:   EVENT:  Automate lights w/away 
2454:   If - Always 
2455:     (F:Vacation Mode) is SET 
2456:       -OR- 
2457:     (F:Away) is SET 
2458:   Then 
2459:      If 
2460:        Time is 8:00 PM SMTWTFS   -Security Mode-  
2461:      Then 
2462:        X10:  (D-1  Dinning Room) ON 
2463:        X10:  (G-9  Fam Rm Lamp) ON 
2464:       Nest End 
2465:      If 
2466:        Time is 8:30 PM SMTWTFS   -Security Mode-  
2467:      Then 
2468:        X10:  (D-1  Dinning Room) OFF 
2469:        DELAY  0:00:10 
2470:        X10:  (B-2  Jeremys Lamp) ON 
2471:       Nest End 
2472:      If 
2473:        Time is 9:15 PM SMTWTFS   -Security Mode-  
2474:      Then 
2475:        X10:  (B-2  Jeremys Lamp) OFF 
2476:        DELAY  0:00:04 
2477:        X10:  (G-1  Bed1 Light) Set Level  70 % 
2478:       Nest End 
2479:      If 
2480:        Time is 10:00 PM SMTWTFS   -Security Mode-  
2481:      Then 
2482:        X10:  (G-1  Bed1 Light) OFF 
2483:       Nest End 
2484:      If 
2485:        Time is 11:15 PM SMTWTFS   -Security Mode-  
2486:      Then 
2487:        X10:  (G-9  Fam Rm Lamp) OFF 
2488:        DELAY  0:00:25 
2489:        X10:  (G-1  Bed1 Light) ON 
2490:        DELAY  0:03:00 
2491:        X10:  (G-1  Bed1 Light) OFF 
2492:       Nest End 
2493:   End 
2494:     
2495:   EVENT:  Vacation Night Lights 
2496:   If 
2497:     (F:Vacation Mode) is SET 
2498:     and  Time is Dark (after SunSet, before SunRise) 
2499:     and  (DI:Front Dr CL) is OFF 
2500:   Then 
2501:     X10:  (D-1  Dinning Room) ON 
2502:     X10:  (G-9  Fam Rm Lamp) ON 
2503:     DELAY  0:30:00 
2504:     X10:  (G-9  Fam Rm Lamp) OFF 
2505:     X10:  (D-1  Dinning Room) OFF 
2506:   End 
2507:     
2508:   EVENT:  Vacation Door Alert 
2509:   If 
2510:     (F:Vacation Mode) is SET 
2511:     and  (DI:Front Dr CL) Goes OFF 
2512:   Then 
2513:      If 
2514:        (T:Front motion) is Running 
2515:      Then 
2516:        (THEN MACRO:Page Tim) 
2517:        ASCII-Out:'Someone is entering the house.' [COM1] 
2518:       Nest End 
2519:      If 
2520:        (T:Front motion) is Not Running 
2521:      Then 
2522:        (THEN MACRO:Page Tim) 
2523:        ASCII-Out:'Someone is leaving the house.' [COM1] 
2524:       Nest End 
2525:     LOG 'Front door activity' 
2526:   End 
2527:     
2528:   EVENT:  Lawn Irrigation Begin 
2529:   If 
2530:     (DI:NoRainDetect) is ON 
2531:     and  Time is (TL:3Hrb4sunrise)  
2532:     and  Time is After 1:00 AM S.T.T.. 
2533:     and  (F:NoWatering) is CLEAR 
2534:       -OR- 
2535:     (F:IrrigationNow) is SET 
2536:   Then 
2537:     X10:  (B-14  Sprinkler Power) ON 
2538:     DELAY  0:00:05 
2539:     X10:  (B-14  Sprinkler Power) ON 
2540:     (F:IrrigationON)  SET 
2541:     (V:NowWateringZone)  LOAD with 1 
2542:   End 
2543:     
2544:   EVENT:  Water Zone 1 
2545:   If 
2546:     (F:IrrigationON) is SET 
2547:     and  (V:NowWateringZone) = 1 
2548:   Then 
2549:      If 
2550:        (DI:NoRainDetect) is ON 
2551:        and  (F:WaterZone6Skip) is CLEAR 
2552:        and  (F:IrrigationStop) is CLEAR 
2553:          -OR- 
2554:        (F:IrrigationNow) is SET 
2555:        and  (F:WaterZone6Skip) is CLEAR 
2556:        and  (F:IrrigationStop) is CLEAR 
2557:      Then 
2558:        X10:  (M-6  Sprinkler Zone6) ON 
2559:         If 
2560:           (V:YesterdaysHiTemp) >= 90 
2561:         Then 
2562:           DELAY  0:25:00 
2563:           LOG 'Water Zone 6 25 Minutes' 
2564:           X10:  (M-6  Sprinkler Zone6) OFF 
2565:           DELAY  0:00:10 
2566:           (V:NowWateringZone)  INCREMENT 
2567:         Else 
2568:           DELAY  0:15:00 
2569:           LOG 'Water Zone 6 15 Minutes' 
2570:           X10:  (M-6  Sprinkler Zone6) OFF 
2571:           DELAY  0:00:10 
2572:           (V:NowWateringZone)  INCREMENT 
2573:          Nest End 
2574:      Else 
2575:        (V:NowWateringZone)  INCREMENT 
2576:       Nest End 
2577:   End 
2578:     
2579:   EVENT:  Water Zone 2 
2580:   If 
2581:     (F:IrrigationON) is SET 
2582:     and  (V:NowWateringZone) = 2 
2583:   Then 
2584:      If 
2585:        (DI:NoRainDetect) is ON 
2586:        and  (F:WaterZone3Skip) is CLEAR 
2587:        and  (F:IrrigationStop) is CLEAR 
2588:          -OR- 
2589:        (F:IrrigationNow) is SET 
2590:        and  (F:WaterZone3Skip) is CLEAR 
2591:        and  (F:IrrigationStop) is CLEAR 
2592:      Then 
2593:        X10:  (M-3  Sprinkler Zone3) ON 
2594:         If 
2595:           (V:YesterdaysHiTemp) >= 90 
2596:         Then 
2597:           DELAY  0:25:00 
2598:           LOG 'Water Zone 3 25 Minutes' 
2599:           X10:  (M-3  Sprinkler Zone3) OFF 
2600:           DELAY  0:00:10 
2601:           (V:NowWateringZone)  INCREMENT 
2602:         Else 
2603:           DELAY  0:15:00 
2604:           LOG 'Water Zone 3 15 Minutes' 
2605:           X10:  (M-3  Sprinkler Zone3) OFF 
2606:           DELAY  0:00:10 
2607:           (V:NowWateringZone)  INCREMENT 
2608:          Nest End 
2609:      Else 
2610:        (V:NowWateringZone)  INCREMENT 
2611:       Nest End 
2612:   End 
2613:     
2614:   EVENT:  Water Zone 3 
2615:   If 
2616:     (F:IrrigationON) is SET 
2617:     and  (V:NowWateringZone) = 3 
2618:   Then 
2619:      If 
2620:        (DI:NoRainDetect) is ON 
2621:        and  (F:WaterZone5Skip) is CLEAR 
2622:        and  (F:IrrigationStop) is CLEAR 
2623:          -OR- 
2624:        (F:IrrigationNow) is SET 
2625:        and  (F:WaterZone5Skip) is CLEAR 
2626:        and  (F:IrrigationStop) is CLEAR 
2627:      Then 
2628:        X10:  (M-5  Sprinkler Zone5) ON 
2629:         If 
2630:           (V:YesterdaysHiTemp) >= 90 
2631:         Then 
2632:           DELAY  0:25:00 
2633:           LOG 'Water Zone 5 25 Minutes' 
2634:           X10:  (M-5  Sprinkler Zone5) OFF 
2635:           DELAY  0:00:10 
2636:           (V:NowWateringZone)  INCREMENT 
2637:         Else 
2638:           DELAY  0:15:00 
2639:           LOG 'Water Zone 5 15 Minutes' 
2640:           X10:  (M-5  Sprinkler Zone5) OFF 
2641:           DELAY  0:00:10 
2642:           (V:NowWateringZone)  INCREMENT 
2643:          Nest End 
2644:      Else 
2645:        (V:NowWateringZone)  INCREMENT 
2646:       Nest End 
2647:   End 
2648:     
2649:   EVENT:  Water Zone 4 
2650:   If 
2651:     (F:IrrigationON) is SET 
2652:     and  (V:NowWateringZone) = 4 
2653:   Then 
2654:      If 
2655:        (DI:NoRainDetect) is ON 
2656:        and  (F:WaterZone1Skip) is CLEAR 
2657:        and  (F:IrrigationStop) is CLEAR 
2658:          -OR- 
2659:        (F:IrrigationNow) is SET 
2660:        and  (F:WaterZone1Skip) is CLEAR 
2661:        and  (F:IrrigationStop) is CLEAR 
2662:      Then 
2663:        X10:  (M-1  Sprinkler Zone1) ON 
2664:         If 
2665:           (V:YesterdaysHiTemp) >= 90 
2666:         Then 
2667:           DELAY  0:25:00 
2668:           LOG 'Water Zone 1 25 Minutes' 
2669:           X10:  (M-1  Sprinkler Zone1) OFF 
2670:           DELAY  0:00:10 
2671:           (V:NowWateringZone)  INCREMENT 
2672:         Else 
2673:           DELAY  0:15:00 
2674:           LOG 'Water Zone 1 15 Minutes' 
2675:           X10:  (M-1  Sprinkler Zone1) OFF 
2676:           DELAY  0:00:10 
2677:           (V:NowWateringZone)  INCREMENT 
2678:          Nest End 
2679:      Else 
2680:        (V:NowWateringZone)  INCREMENT 
2681:       Nest End 
2682:   End 
2683:     
2684:   EVENT:  Water Zone 5 
2685:   If 
2686:     (F:IrrigationON) is SET 
2687:     and  (V:NowWateringZone) = 5 
2688:   Then 
2689:      If 
2690:        (DI:NoRainDetect) is ON 
2691:        and  (F:WaterZone8Skip) is CLEAR 
2692:        and  (F:IrrigationStop) is CLEAR 
2693:          -OR- 
2694:        (F:IrrigationNow) is SET 
2695:        and  (F:WaterZone8Skip) is CLEAR 
2696:        and  (F:IrrigationStop) is CLEAR 
2697:      Then 
2698:        X10:  (M-8  Sprinkler Zone8) ON 
2699:         If 
2700:           (V:YesterdaysHiTemp) >= 90 
2701:         Then 
2702:           DELAY  0:25:00 
2703:           LOG 'Water Zone 8 25 Minutes' 
2704:           X10:  (M-8  Sprinkler Zone8) OFF 
2705:           DELAY  0:00:10 
2706:           (V:NowWateringZone)  INCREMENT 
2707:         Else 
2708:           DELAY  0:15:00 
2709:           LOG 'Water Zone 8 15 Minutes' 
2710:           X10:  (M-8  Sprinkler Zone8) OFF 
2711:           DELAY  0:00:10 
2712:           (V:NowWateringZone)  INCREMENT 
2713:          Nest End 
2714:      Else 
2715:        (V:NowWateringZone)  INCREMENT 
2716:       Nest End 
2717:   End 
2718:     
2719:   EVENT:  Water Zone 6 
2720:   If 
2721:     (F:IrrigationON) is SET 
2722:     and  (V:NowWateringZone) = 6 
2723:   Then 
2724:      If 
2725:        (DI:NoRainDetect) is ON 
2726:        and  (F:WaterZone7Skip) is CLEAR 
2727:        and  (F:IrrigationStop) is CLEAR 
2728:          -OR- 
2729:        (F:IrrigationNow) is SET 
2730:        and  (F:WaterZone7Skip) is CLEAR 
2731:        and  (F:IrrigationStop) is CLEAR 
2732:      Then 
2733:        X10:  (M-7  Sprinkler Zone7) ON 
2734:         If 
2735:           (V:YesterdaysHiTemp) >= 90 
2736:         Then 
2737:           DELAY  0:25:00 
2738:           LOG 'Water Zone 7 25 Minutes' 
2739:           X10:  (M-7  Sprinkler Zone7) OFF 
2740:           (V:NowWateringZone)  INCREMENT 
2741:         Else 
2742:           DELAY  0:15:00 
2743:           LOG 'Water Zone 7 15 Minutes' 
2744:           X10:  (M-7  Sprinkler Zone7) OFF 
2745:           (V:NowWateringZone)  INCREMENT 
2746:          Nest End 
2747:      Else 
2748:        (V:NowWateringZone)  INCREMENT 
2749:       Nest End 
2750:   End 
2751:     
2752:   EVENT:  Reset water flags 
2753:   If 
2754:     (V:NowWateringZone) = 7 
2755:   Then 
2756:     (V:NowWateringZone)  LOAD with 0 
2757:     (F:IrrigationNow)  CLEAR 
2758:     (F:IrrigationON)  CLEAR 
2759:     (F:IrrigationStop)  CLEAR 
2760:     X10: M - All Units OFF 
2761:     DELAY  0:00:05 
2762:     X10:  (B-14  Sprinkler Power) OFF 
2763:     DELAY  0:00:05 
2764:     X10:  (B-14  Sprinkler Power) OFF 
2765:   End 
2766:     
2767:   EVENT:  Turn off false watering 
2768:   If 
2769:     XSEQ:( M-1 M-ON ) Received within 3 seconds [Receive Only] 
2770:     or  XSEQ:( M-2 M-ON ) Received within 3 seconds [Receive Only] 
2771:     or  XSEQ:( M-3 M-ON ) Received within 3 seconds [Receive Only] 
2772:     or  XSEQ:( M-4 M-ON ) Received within 3 seconds [Receive Only] 
2773:     or  XSEQ:( M-5 M-ON ) Received within 3 seconds [Receive Only] 
2774:     or  XSEQ:( M-6 M-ON ) Received within 3 seconds [Receive Only] 
2775:     or  XSEQ:( M-7 M-ON ) Received within 3 seconds [Receive Only] 
2776:     or  XSEQ:( M-8 M-ON ) Received within 3 seconds [Receive Only] 
2777:       -AND- 
2778:     (F:IrrigationON) is CLEAR 
2779:   Then 
2780:     X10: M - All Units OFF 
2781:   End 
2782:     
2783:   EVENT:  Turn off watering via remote 
2784:   If 
2785:     XSEQ:( M-1 M-OFF ) Received within 3 seconds [Receive Only] 
2786:     or  XSEQ:( M-2 M-OFF ) Received within 3 seconds [Receive Only] 
2787:     or  XSEQ:( M-3 M-OFF ) Received within 3 seconds [Receive Only] 
2788:     or  XSEQ:( M-4 M-OFF ) Received within 3 seconds [Receive Only] 
2789:     or  XSEQ:( M-5 M-OFF ) Received within 3 seconds [Receive Only] 
2790:     or  XSEQ:( M-6 M-OFF ) Received within 3 seconds [Receive Only] 
2791:     or  XSEQ:( M-7 M-OFF ) Received within 3 seconds [Receive Only] 
2792:     or  XSEQ:( M-8 M-OFF ) Received within 4 seconds [Receive Only] 
2793:   Then 
2794:     X10: M - All Units OFF 
2795:   End 
2796:     
2797:   EVENT:  SAT/TV ON 
2798:   If 
2799:     XSEQ:( G-10 G-ON ) Received within 3 seconds [Receive Only] 
2800:   Then 
2801:      If 
2802:        (IR PwrSense:TV1 Power) is OFF 
2803:      Then 
2804:        (IR:TV1 Power ) play 1 time(s) [Living Room] 
2805:        DELAY  0:00:02 
2806:        (IR:TV1 0 ) play 1 time(s) [Living Room] 
2807:        (IR:TV1 4 ) play 1 time(s) [Living Room] 
2808:        (IR:TV1TV/VIDEO ) play 1 time(s) [Living Room] 
2809:        (IR:TV1 Volume Down ) play 20 time(s) [Living Room] 
2810:        DELAY  0:00:01 
2811:        (IR:TV1 Volume Up ) play 8 time(s) [Living Room] 
2812:         If 
2813:           (IR PwrSense:SAT1 Power) is OFF 
2814:         Then 
2815:           DELAY  0:00:02 
2816:           (IR:SAT1 POWER ) play 1 time(s) [Living Room] 
2817:           DELAY  0:00:02 
2818:           (IR:SAT1 1 ) play 1 time(s) [Living Room] 
2819:           DELAY  0:00:01 
2820:           (IR:SAT1 9 ) play 1 time(s) [Living Room] 
2821:           DELAY  0:00:01 
2822:           (IR:SAT1 1 ) play 1 time(s) [Living Room] 
2823:          Nest End 
2824:        X10:  (G-10  Fam Wall Ctrl A2) OFF 
2825:       Nest End 
2826:   End 
2827:     
2828:   EVENT:  SAT/TV System OFF 
2829:   If 
2830:     XSEQ:( G-10 G-OFF ) Received within 3 seconds [Receive Only] 
2831:   Then 
2832:      If 
2833:        (IR PwrSense:TV1 Power) is ON 
2834:      Then 
2835:        (IR:TV1 Power ) play 1 time(s) [Living Room] 
2836:       Nest End 
2837:      If 
2838:        (IR PwrSense:SAT1 Power) is ON 
2839:      Then 
2840:        DELAY  0:00:01 
2841:        (IR:SAT1 POWER ) play 1 time(s) [Living Room] 
2842:       Nest End 
2843:      If 
2844:        (IR PwrSense:VCR1 Power) is ON 
2845:      Then 
2846:        DELAY  0:00:01 
2847:        (IR:VCR1 POWER ) play 1 time(s) [Living Room] 
2848:       Nest End 
2849:   End 
2850:     
2851:   SCHEDULE END   

Device DataBase Listing

IF MACROS


THEN MACROS
THEN Macro: Outside Temp 
  MACRO BEGIN   
    Voice:OUT SIDE TEMPERAT IS <Outside Temp>DEGREES  [CO,ICM] 
  MACRO END 

THEN Macro: DownStairsTemp 
  MACRO BEGIN   
    Voice:DOWNSTAI TEMPERAT IS <DownSt Temp>DEGREES  [CO,ICM] 
  MACRO END 

THEN Macro: UpStairs Temp 
  MACRO BEGIN   
    Voice:UPSTAIRS TEMPERAT IS <UpstairsTemp>DEGREES  [CO,ICM] 
  MACRO END 

THEN Macro: TV:Status Screen 
  MACRO BEGIN   
    ASCII-Out:'! TERM0 S=\b\e[1M \j \f' [RS-485] 
    ASCII-Out:'! TERM0 S=       SYSTEM STATUS ' [RS-485] 
    ASCII-Out:'! TERM0 S=\n \n' [RS-485] 
     If 
     (DI:Front Dr CL) is ON 
     Then 
       ASCII-Out:'! TERM0 S=\n\nFront Dr CL  \' [RS-485] 
     Else 
       ASCII-Out:'! TERM0 S=\n\nFront Dr OP  \' [RS-485] 
      Nest End 
     If 
     (DI:Garage Dr CL) is ON 
     Then 
       ASCII-Out:'Garage Dr CL \n\' [RS-485] 
     Else 
       ASCII-Out:'Garage Dr OP \n\' [RS-485] 
      Nest End 
     If 
     (DI:Side Dr CL) is ON 
     Then 
       ASCII-Out:'Side  Dr CL\n \n' [RS-485] 
     Else 
       ASCII-Out:'Side  Dr OP\n \n' [RS-485] 
      Nest End 
  MACRO END 

THEN Macro: TV:Status Scrn2 
  MACRO BEGIN   
    ASCII-Out:'! TERM0 S=\' [RS-485] 
    ASCII-Out:'Doorbell rang <Daily doorbell>\' [RS-485] 
    ASCII-Out:' times today\n\n\' [RS-485] 
    VM:Load user_VAR with ## of New Messages in MailBox 1  
    ASCII-Out:'VM has <VAR> new messages\' [RS-485] 
    VM:Load user_VAR with ## of Old Messages in MailBox 1  
    ASCII-Out:'\nVM has <VAR> old messages' [RS-485] 
  MACRO END 

THEN Macro: VM Notification 
  MACRO BEGIN   
    ASCII-Out:'&&cpager95.exe Tim:You have a \' [COM1] 
    ASCII-Out:'message from <CID>.' [COM1] 
    DELAY  0:02:00 
    ASCII-Out:'&&cpager95.exe Deb:You have a \' [COM1] 
    ASCII-Out:'message from <CID>.' [COM1] 
  MACRO END 

THEN Macro: TV: Temp Screen 
  MACRO BEGIN   
    ASCII-Out:'! TERM0 S=\b\j \e[1M\' [RS-485] 
    ASCII-Out:'  TEMPERATURE INFORMATION' [RS-485] 
    ASCII-Out:'! TERM0 S=\n\n\' [RS-485] 
    ASCII-Out:'Outside Temp <Outside Temp>F\' [RS-485] 
     If 
     (F:Temp going up) is SET 
     Then 
       ASCII-Out:'\x7c\' [RS-485] 
     Else 
        If 
        (F:Temp going up) is CLEAR 
        Then 
          ASCII-Out:'\x7d\' [RS-485] 
         Nest End 
      Nest End 
    ASCII-Out:'\nInside  Temp <DownSt Temp>F' [RS-485] 
  MACRO END 

THEN Macro: SPK ONLY Zone1 
  MACRO BEGIN   
    (RELAY:Mst Bed Spk) ON  
    (RELAY:Jeremy Spk) OFF  
    (RELAY:House Spks) OFF  
  MACRO END 

THEN Macro: SPK ONLY Zone2 
  MACRO BEGIN   
    (RELAY:Mst Bed Spk) OFF  
    (RELAY:Jeremy Spk) ON  
    (RELAY:House Spks) OFF  
  MACRO END 

THEN Macro: SPK ONLY Zone3 
  MACRO BEGIN   
    (RELAY:Mst Bed Spk) OFF  
    (RELAY:Jeremy Spk) OFF  
    (RELAY:House Spks) ON  
  MACRO END 

THEN Macro: SPKs Normal 
  MACRO BEGIN   
    (RELAY:Mst Bed Spk) ON  
    (RELAY:House Spks) ON  
     If 
       " Keep Jeremy's Speakers on During " 
       " Day Only " 
     Time is After 9:00 AM SMTWTFS 
     Time is Before 9:00 PM SMTWTFS 
     Then 
       (RELAY:Jeremy Spk) ON  
     Else 
       (RELAY:Jeremy Spk) OFF  
      Nest End 
  MACRO END 

THEN Macro: Holiday announce 
  MACRO BEGIN   
     If 
     Date is Jan  1 
     Then 
       Voice:HAPPY NEW YEAR  [Line] SYNC 
      Nest End 
     If 
     Date is After Jan  14 
     Date is Before Jan  22 
     Time is After 1:00 AM .M..... 
     Then 
       Voice:HAPPY Martin L King DAY  [Line] SYNC 
      Nest End 
     If 
     Date is Feb  2 
     Then 
       Voice:HAPPY Groundhog DAY  [Line] SYNC 
      Nest End 
     If 
     Date is Feb  14 
     Then 
       Voice:HAPPY VALENTIN DAY  [Line] SYNC 
      Nest End 
     If 
     Date is After Mar  14 
     Date is Before Feb  27 
     Time is After 1:00 AM .M..... 
     Then 
       Voice:HAPPY Presidents DAY  [Line] SYNC 
      Nest End 
     If 
     Date is Mar  17 
     Then 
       Voice:HAPPY SAINTPAT DAY  [Line] SYNC 
      Nest End 
     If 
     Date is Mar  20 
     (V:Year) >= 0 
     (V:Year) <= 5 
     Then 
       Voice:FIRST DAY OF Spring  [Line] SYNC 
      Nest End 
     If 
     Date is After Mar  31 
     Date is Before Apr  8 
     Time is After 1:00 AM ......S 
     Then 
       Voice:DAYLIGHT SAVINGS SILENCEH SET CLOCK FORWARD 1 HOURS TO NIGHT  [Line] SYNC 
      Nest End 
     If 
     Date is Apr  4 
     (V:Year) = 99 
         -OR- 
     Date is Apr  23 
     (V:Year) = 0 
         -OR- 
     Date is Apr  15 
     (V:Year) = 1 
         -OR- 
     Date is Mar  31 
     (V:Year) = 2 
         -OR- 
     Date is Apr  20 
     (V:Year) = 3 
         -OR- 
     Date is Apr  11 
     (V:Year) = 4 
         -OR- 
     Date is Mar  27 
     (V:Year) = 5 
     Then 
       Voice:HAPPY EASTER  [Line] SYNC 
      Nest End 
     If 
     Date is After May  7 
     Date is Before May  15 
     Time is After 1:00 AM S...... 
     Then 
       Voice:HAPPY MOTHERS DAY  [Line] SYNC 
      Nest End 
     If 
     Date is After May  24 
     Date is Before June  1 
     Time is After 1:00 AM .M..... 
     Then 
       Voice:HAPPY MEMORIAL DAY  [Line] SYNC 
      Nest End 
     If 
     Date is After June  14 
     Date is Before June  22 
     Time is After 1:00 AM S...... 
     Then 
       Voice:HAPPY FATHERS DAY  [Line] SYNC 
      Nest End 
     If 
     Date is June  14 
     Then 
       Voice:TODAY IS FLAG DAY  [Line] SYNC 
      Nest End 
     If 
     Date is June  21 
     (V:Year) = 99 
         -OR- 
     Date is June  20 
     (V:Year) = 0 
         -OR- 
     Date is June  21 
     (V:Year) >= 1 
     (V:Year) <= 3 
         -OR- 
     Date is June  20 
     (V:Year) = 4 
         -OR- 
     Date is June  21 
     (V:Year) = 5 
     Then 
       Voice:FIRST DAY OF Summer  [Line] SYNC 
      Nest End 
     If 
     Date is July  4 
     Then 
       Voice:HAPPY Fourth OF JULY  [Line] SYNC 
      Nest End 
     If 
     Date is After Aug  31 
     Date is Before Sept  8 
     Time is After 1:00 AM .M..... 
     Then 
       Voice:HAPPY LABOR DAY  [Line] SYNC 
      Nest End 
     If 
     Date is Sept  23 
     (V:Year) = 99 
         -OR- 
     Date is Sept  22 
     (V:Year) < 3 
         -OR- 
     Date is Sept  23 
     (V:Year) = 3 
         -OR- 
     Date is Sept  22 
     (V:Year) >= 4 
     (V:Year) <= 5 
     Then 
       Voice:FIRST DAY OF Fall  [Line] SYNC 
      Nest End 
     If 
     Date is After Oct  24 
     Date is Before Nov  1 
     Time is After 1:00 AM ......S 
     Then 
       Voice:DAYLIGHT SAVINGS SILENCEH SET CLOCK BACK 1 HOURS TO NIGHT  [Line] SYNC 
      Nest End 
     If 
     Date is Oct  31 
     Then 
       Voice:HAPPY HALLOWEE GHOST  [Line] SYNC 
      Nest End 
     If 
     Date is After Nov  21 
     Date is Before Nov  29 
     Time is After 1:00 AM ....T.. 
     Then 
       Voice:HAPPY THANKSGI DAY  [Line] SYNC 
      Nest End 
     If 
     Date is Dec  22 
     (V:Year) = 99 
         -OR- 
     Date is Dec  21 
     (V:Year) >= 0 
     (V:Year) <= 2 
         -OR- 
     Date is Dec  22 
     (V:Year) = 3 
         -OR- 
     Date is Dec  21 
     (V:Year) >= 4 
     (V:Year) <= 5 
     Then 
       Voice:FIRST DAY OF Winter  [Line] SYNC 
      Nest End 
     If 
     Date is Dec  25 
     Then 
       Voice:MERRY CHRISTMA  [Line] SYNC 
      Nest End 
  MACRO END 

THEN Macro: Special annouce 
  MACRO BEGIN   
     If 
       " Dad Shephard's birthday " 
     Date is Dec  7 
     Then 
       Voice:SILENCE2  [Line] SYNC 
       Voice:Dad Shep Bday  [Line] SYNC 
      Nest End 
     If 
       " Mom Shephard's birthday " 
     Date is Nov  8 
     Then 
       Voice:SILENCE2  [Line] SYNC 
       Voice:Mom Shep Bday  [Line] SYNC 
      Nest End 
     If 
       " Mark 's birthday " 
     Date is Nov  2 
     Then 
       Voice:SILENCE2  [Line] SYNC 
       Voice:Marks bday  [Line] SYNC 
      Nest End 
     If 
       " Gene & Barabra Morris Anniversar " 
     Date is Oct  30 
     Then 
       Voice:SILENCE2  [Line] SYNC 
       Voice:M&D Morris Aniv  [Line] SYNC 
      Nest End 
     If 
       " Jannel's Birthday " 
     Date is Oct  13 
     Then 
       Voice:SILENCE2  [Line] SYNC 
       Voice:Jannel's Bday  [Line] SYNC 
      Nest End 
     If 
       " Lady's Birthday " 
     Date is Oct  1 
     Then 
       Voice:SILENCE2  [Line] SYNC 
       Voice:Lady's bday  [Line] SYNC 
      Nest End 
     If 
       " Charity Hickerson's Birthday " 
     Date is Sept  24 
     Then 
       Voice:SILENCE2  [Line] SYNC 
       Voice:Charity bday  [Line] SYNC 
      Nest End 
     If 
       " Debra's Birthday " 
     Date is Sept  30 
     Then 
       Voice:SILENCE2  [Line] SYNC 
       Voice:Deb's bday  [Line] SYNC 
      Nest End 
     If 
       " Mom & Dad Shephard " 
     Date is Aug  23 
     Then 
       Voice:SILENCE2  [Line] SYNC 
       Voice:M&D Shephard An  [Line] SYNC 
      Nest End 
     If 
       " Wedding Anniversary " 
     Date is Aug  2 
     Then 
       Voice:SILENCE2  [Line] SYNC 
       Voice:Happy anivers  [Line] SYNC 
      Nest End 
     If 
       " Gene Morris Birthday " 
     Date is July  3 
     Then 
       Voice:SILENCE2  [Line] SYNC 
       Voice:Dad Morris bday  [Line] SYNC 
      Nest End 
     If 
       " Barabra Morris Birthday " 
     Date is June  30 
     Then 
       Voice:SILENCE2  [Line] SYNC 
       Voice:Mom Morris bday  [Line] SYNC 
      Nest End 
     If 
       " Patti Shephard's Birthday " 
     Date is June  28 
     Then 
       Voice:SILENCE2  [Line] SYNC 
       Voice:P Shephard Bday  [Line] SYNC 
      Nest End 
     If 
       " Chris Carson's  Birthday " 
     Date is Apr  16 
     Then 
       Voice:SILENCE2  [Line] SYNC 
       Voice:C Carson bday  [Line] SYNC 
      Nest End 
     If 
       " Jeremy's Birthday " 
     Date is Mar  22 
     Then 
       Voice:SILENCE2  [Line] SYNC 
       Voice:Jeremy bday  [Line] SYNC 
      Nest End 
     If 
       " Chuck Shephard's Birthday " 
     Date is Mar  16 
     Then 
       Voice:SILENCE2  [Line] SYNC 
       Voice:Chucks bday  [Line] SYNC 
      Nest End 
     If 
       " Tim's birthday " 
     Date is Feb  24 
     Then 
       Voice:SILENCE2  [Line] SYNC 
       Voice:Tim's Birthday  [Line] SYNC 
      Nest End 
     If 
       " Hugh Dutton's Birthday " 
     Date is Feb  27 
     Then 
       Voice:SILENCE2  [Line] SYNC 
       Voice:Dad Dutton Bday  [Line] SYNC 
      Nest End 
     If 
       " Chuck & Patti's Anniversary " 
     Date is Jan  19 
     Then 
       Voice:SILENCE2  [Line] SYNC 
       Voice:C&P Aniversary  [Line] SYNC 
      Nest End 
     If 
       " Geri Carson's Birthday " 
     Date is Jan  8 
     Then 
       Voice:SILENCE2  [Line] SYNC 
       Voice:G.Carson Bday  [Line] SYNC 
      Nest End 
  MACRO END 

THEN Macro: System Status 
  MACRO BEGIN   
    Clear TouchTone Input Buffer 
    Voice:SYSSTATS SILENCEH <day hh:mm am/pm>SILENCEH  [CO,ICM] 
    Voice:INSIDE TEMPERAT IS <DownSt Temp>DEGREES SILENCEH  [CO,ICM] 
     If 
     (V:Daily doorbell) >= 1 
     Then 
       Voice:TODAY DOORBELL ACTIVITY SILENCEQ <Daily doorbell>  [CO,ICM] 
       DELAY  0:00:01 
      Nest End 
     If 
     (F:Memo reminder) is SET 
     Then 
       Voice:MEMO IS SET SILENCEQ 4 SILENCEQ <Memo timer>  [CO,ICM] 
       DELAY  0:00:01 
      Nest End 
     If 
     (F:Away) is SET 
     Then 
       Voice:AWAY MODE ACTIVATD  [CO,ICM] SYNC 
       DELAY  0:00:01 
      Nest End 
     If 
     (VMAIL:MBX-1 # Old Msg) > 0 
     Then 
       Voice:U HAVE OLD PHONE MESSAGES  [CO,ICM] 
       DELAY  0:00:01 
      Nest End 
     If 
     (DI:Front Dr CL) is OFF 
     Then 
       Voice:FRONT DOOR OPEN  [CO,ICM] SYNC 
     Else 
       Voice:FRONT DOOR CLOSED  [CO,ICM] SYNC 
      Nest End 
     If 
     (DI:Side Dr CL) is OFF 
     Then 
       Voice:SIDE DOOR OPEN  [CO,ICM] SYNC 
     Else 
       Voice:SIDE DOOR CLOSED  [CO,ICM] SYNC 
      Nest End 
     If 
     (DI:Garage Dr CL) is OFF 
     Then 
       Voice:GARAGE DOOR OPEN SILENCEH  [CO,ICM] SYNC 
     Else 
       Voice:GARAGE DOOR CLOSED SILENCEH  [CO,ICM] SYNC 
      Nest End 
    Voice:TONE_F TONE_A TONE_C  [CO,ICM] SYNC 
  MACRO END 

THEN Macro: TV:VM Menu 
  MACRO BEGIN   
    ASCII-Out:'! TERM0 S=\b\e[1M\f\j' [RS-485] 
    ASCII-Out:'! TERM0 S=        VOICEMAIL\n\' [RS-485] 
    VM:Load user_VAR with ## of New Messages in MailBox 1  
    ASCII-Out:'<VAR> NEW   \' [RS-485] 
    ASCII-Out:'              \' [RS-485] 
    VM:Load user_VAR with ## of Old Messages in MailBox 1  
    ASCII-Out:'<VAR> OLD\n\n1. Play Messages\' [RS-485] 
    ASCII-Out:'\n2. Skip Message\n' [RS-485] 
  MACRO END 

THEN Macro: Lights Out 
  MACRO BEGIN   
    X10:  (G-1  Bed1 Light) OFF 
    X10:  (B-1  Bed 1 Lamp) OFF 
    X10:  (G-9  Fam Rm Lamp) OFF 
    X10:  (G-5  Liv Room Torch) OFF 
    X10:  (D-1  Dinning Room) OFF 
    X10:  (G-5  Liv Room Torch) OFF 
    X10:  (B-2  Jeremys Lamp) OFF 
  MACRO END 

THEN Macro: Garage Dr Ctrl 
  MACRO BEGIN   
     If 
     (DI:Garage Dr CL) is OFF 
     Then 
       Voice:GARAGE DOOR OPEN  [CO,ICM] 
       DELAY  0:00:01 
       Voice:TO CLOSE GARAGE DOOR SILENCEQ PRESS 2 5 POUND  [CO,ICM] 
       TouchTone to user_VAR SYNC 
       (V:Garage CTRL)   load with user_VAR 
        If 
        (V:Garage CTRL) = 25 
        Then 
          (V:Garage CTRL)  LOAD with 0 
          (RELAY:Garage Door) ON  
          DELAY  0:00:01 
          (RELAY:Garage Door) OFF  
         Nest End 
      Nest End 
     If 
     (DI:Garage Dr CL) is ON 
     Then 
       Voice:GARAGE DOOR CLOSED  [CO,ICM] 
       DELAY  0:00:01 
       Voice:TO OPEN GARAGE DOOR SILENCEQ PRESS 6 7 POUND  [CO,ICM] 
       TouchTone to user_VAR SYNC 
       (V:Garage CTRL)   load with user_VAR 
        If 
        (V:Garage CTRL) = 67 
        Then 
          (V:Garage CTRL)  LOAD with 0 
          (RELAY:Garage Door) ON  
          DELAY  0:00:01 
          (RELAY:Garage Door) OFF  
         Nest End 
      Nest End 
  MACRO END 

THEN Macro: Speak Month 
  MACRO BEGIN   
     If 
     (V:Month) = 1 
     Then 
       Voice:JANUARY  [Line] SYNC 
      Nest End 
     If 
     (V:Month) = 2 
     Then 
       Voice:FEBRUARY  [Line] SYNC 
      Nest End 
     If 
     (V:Month) = 3 
     Then 
       Voice:MARCH  [Line] SYNC 
      Nest End 
     If 
     (V:Month) = 4 
     Then 
       Voice:APRIL  [Line] SYNC 
      Nest End 
     If 
     (V:Month) = 5 
     Then 
       Voice:MAY  [Line] SYNC 
      Nest End 
     If 
     (V:Month) = 6 
     Then 
       Voice:JUNE  [Line] SYNC 
      Nest End 
     If 
     (V:Month) = 7 
     Then 
       Voice:JULY  [Line] SYNC 
      Nest End 
     If 
     (V:Month) = 8 
     Then 
       Voice:AUGUST  [Line] SYNC 
      Nest End 
     If 
     (V:Month) = 9 
     Then 
       Voice:SEPTEMBE  [Line] SYNC 
      Nest End 
     If 
     (V:Month) = 10 
     Then 
       Voice:OCTOBER  [Line] SYNC 
      Nest End 
     If 
     (V:Month) = 11 
     Then 
       Voice:NOVEMBER  [Line] SYNC 
      Nest End 
     If 
     (V:Month) = 12 
     Then 
       Voice:DECEMBER  [Line] SYNC 
      Nest End 
  MACRO END 

THEN Macro: TV:Temp Scrn2 
  MACRO BEGIN   
    ASCII-Out:'! TERM0 S=\' [RS-485] 
    ASCII-Out:'\nGarage  Temp <Garage Temp>F\' [RS-485] 
    ASCII-Out:'\n\nTodays  High \' [RS-485] 
    ASCII-Out:'<Outside Temp Hi>F\nTodays\' [RS-485] 
    ASCII-Out:'  Low  <Ouside Temp Low>F' [RS-485] 
  MACRO END 

THEN Macro: TV: VM Menu2 
  MACRO BEGIN   
    ASCII-Out:'! TERM0 S=3. Replay Message\n\' [RS-485] 
    ASCII-Out:'4. Stop Playback\n5. Delete\n\' [RS-485] 
    ASCII-Out:'6. Caller ID\n' [RS-485] 
  MACRO END 

THEN Macro: TV: Main Menu 
  MACRO BEGIN   
    ASCII-Out:'! TERM0 S=\b\e[1M\j \f' [RS-485] 
    ASCII-Out:'! TERM0 S=       SHEPHARD HOME' [RS-485] 
    ASCII-Out:'! TERM0 S=\n\' [RS-485] 
    ASCII-Out:'       \x61 Main Menu \x62\n\' [RS-485] 
    ASCII-Out:'\n1. Temperature\n2. VoiceMail\' [RS-485] 
    ASCII-Out:'\n3. System Status' [RS-485] 
  MACRO END 

THEN Macro: TV: Sys Controls 
  MACRO BEGIN   
    ASCII-Out:'! TERM0 S=\b\e[1M \j \f' [RS-485] 
    ASCII-Out:'! TERM0 S=       Control Menu\' [RS-485] 
    ASCII-Out:'\n\n1. Lighting\n2. HVAC\n\' [RS-485] 
    ASCII-Out:'3. House Mode' [RS-485] 
  MACRO END 

THEN Macro: TV:Lighting 
  MACRO BEGIN   
    ASCII-Out:'! TERM0 S=\b\e[1M \j \f' [RS-485] 
    ASCII-Out:'! TERM0 S=          Lighting\n\' [RS-485] 
    ASCII-Out:'\n1. Family Room ..\' [RS-485] 
     If 
     X10: (G-9  Fam Rm Lamp) is ON  
     Then 
       ASCII-Out:'ON\n' [RS-485] 
     Else 
       ASCII-Out:'OFF\n' [RS-485] 
      Nest End 
    ASCII-Out:'! TERM0 S=2. Dinning Room .\' [RS-485] 
     If 
     X10: (D-1  Dinning Room) is ON  
     Then 
       ASCII-Out:'ON\n' [RS-485] 
     Else 
       ASCII-Out:'OFF\n' [RS-485] 
      Nest End 
  MACRO END 

THEN Macro: TV: Main Menu2 
  MACRO BEGIN   
    ASCII-Out:'! TERM0 S=\n4. System Controls' [RS-485] 
    ASCII-Out:'! TERM0 S=\e[10j<$d> <$t1>' [RS-485] 
  MACRO END 

THEN Macro: TV: Lighting2 
  MACRO BEGIN   
    ASCII-Out:'! TERM0 S=3. Living Room ..\' [RS-485] 
     If 
     X10: (G-5  Liv Room Torch) is ON  
     Then 
       ASCII-Out:'ON\n' [RS-485] 
     Else 
       ASCII-Out:'OFF\n' [RS-485] 
      Nest End 
  MACRO END 

THEN Macro: WaterNow 
  MACRO BEGIN   
    (F:IrrigationNow)  SET 
    Voice:WATER SPRINKLE SYSTEM ON  [CO,ICM] SYNC 
  MACRO END 

THEN Macro: ManualWater 
  MACRO BEGIN   
    (F:IrrigationON)  SET 
    X10:  (B-14  Sprinkler Power) ON 
    Voice:MANUAL SPRINKLE ACTIVATD  [CO,ICM] SYNC 
    DELAY  1:00:00 
    (F:IrrigationON)  CLEAR 
    X10: M - All Units OFF 
    X10:  (B-14  Sprinkler Power) OFF 
  MACRO END 

THEN Macro: WaterZone1Skip 
  MACRO BEGIN   
     If 
     (F:WaterZone1Skip) is SET 
     Then 
       (F:WaterZone1Skip)  CLEAR 
       Voice:ZONE 1 ON  [CO,ICM] SYNC 
     Else 
       (F:WaterZone1Skip)  SET 
       Voice:ZONE 1 OFF  [CO,ICM] SYNC 
      Nest End 
  MACRO END 

THEN Macro: WaterZone2Skip 
  MACRO BEGIN   
     If 
     (F:WaterZone2Skip) is SET 
     Then 
       (F:WaterZone2Skip)  CLEAR 
       Voice:ZONE 2 ON  [CO,ICM] SYNC 
     Else 
       (F:WaterZone2Skip)  SET 
       Voice:ZONE 2 OFF  [CO,ICM] SYNC 
      Nest End 
  MACRO END 

THEN Macro: WaterZone3Skip 
  MACRO BEGIN   
     If 
     (F:WaterZone3Skip) is SET 
     Then 
       (F:WaterZone3Skip)  CLEAR 
       Voice:ZONE 3 ON  [CO,ICM] SYNC 
     Else 
       (F:WaterZone3Skip)  SET 
       Voice:ZONE 1 OFF  [CO,ICM] SYNC 
      Nest End 
  MACRO END 

THEN Macro: WaterZone4Skip 
  MACRO BEGIN   
     If 
     (F:WaterZone4Skip) is SET 
     Then 
       (F:WaterZone4Skip)  CLEAR 
       Voice:ZONE 4 ON  [CO,ICM] SYNC 
     Else 
       (F:WaterZone4Skip)  SET 
       Voice:ZONE 4 OFF  [CO,ICM] SYNC 
      Nest End 
  MACRO END 

THEN Macro: WaterZone5Skip 
  MACRO BEGIN   
     If 
     (F:WaterZone5Skip) is SET 
     Then 
       (F:WaterZone5Skip)  CLEAR 
       Voice:ZONE 5 ON  [CO,ICM] SYNC 
     Else 
       (F:WaterZone5Skip)  SET 
       Voice:ZONE 5 OFF  [CO,ICM] SYNC 
      Nest End 
  MACRO END 

THEN Macro: WaterZone6Skip 
  MACRO BEGIN   
     If 
     (F:WaterZone6Skip) is SET 
     Then 
       (F:WaterZone6Skip)  CLEAR 
       Voice:ZONE 6 ON  [CO,ICM] SYNC 
     Else 
       (F:WaterZone6Skip)  SET 
       Voice:ZONE 6 OFF  [CO,ICM] SYNC 
      Nest End 
  MACRO END 

THEN Macro: WaterZone7Skip 
  MACRO BEGIN   
     If 
     (F:WaterZone7Skip) is SET 
     Then 
       (F:WaterZone7Skip)  CLEAR 
       Voice:ZONE 7 ON  [CO,ICM] SYNC 
     Else 
       (F:WaterZone7Skip)  SET 
       Voice:ZONE 7 OFF  [CO,ICM] SYNC 
      Nest End 
  MACRO END 

THEN Macro: WaterZone8Skip 
  MACRO BEGIN   
     If 
     (F:WaterZone8Skip) is SET 
     Then 
       (F:WaterZone8Skip)  CLEAR 
       Voice:ZONE 8 ON  [CO,ICM] SYNC 
     Else 
       (F:WaterZone8Skip)  SET 
       Voice:ZONE 8 OFF  [CO,ICM] SYNC 
      Nest End 
  MACRO END 

THEN Macro: WaterStop 
  MACRO BEGIN   
     If 
     (F:IrrigationON) is SET 
     Then 
       (F:IrrigationStop)  SET 
       X10: M - All Units OFF 
       Voice:SPRINKLE SYSTEM SILENCEQ OFF  [CO,ICM] SYNC 
     Else 
       Voice:SPRINKLE SYSTEM IS NOT ON  [CO,ICM] SYNC 
      Nest End 
  MACRO END 

THEN Macro: WaterZoneStatus 
  MACRO BEGIN   
     If 
     (F:WaterZone1Skip) is SET 
     Then 
       Voice:ZONE 1 SILENCEQ OFF  [CO,ICM] 
     Else 
       Voice:ZONE 1 SILENCEQ ON  [CO,ICM] 
      Nest End 
     If 
     (F:WaterZone2Skip) is SET 
     Then 
       Voice:ZONE 2 SILENCEQ OFF  [CO,ICM] 
     Else 
       Voice:ZONE 2 SILENCEQ ON  [CO,ICM] 
      Nest End 
     If 
     (F:WaterZone3Skip) is SET 
     Then 
       Voice:ZONE 3 SILENCEQ OFF  [CO,ICM] 
     Else 
       Voice:ZONE 3 SILENCEQ ON  [CO,ICM] 
      Nest End 
     If 
     (F:WaterZone4Skip) is SET 
     Then 
       Voice:ZONE 4 SILENCEQ OFF  [CO,ICM] 
     Else 
       Voice:ZONE 4 SILENCEQ ON  [CO,ICM] 
      Nest End 
     If 
     (F:WaterZone5Skip) is SET 
     Then 
       Voice:ZONE 5 SILENCEQ OFF  [CO,ICM] 
     Else 
       Voice:ZONE 5 SILENCEQ ON  [CO,ICM] 
      Nest End 
     If 
     (F:WaterZone6Skip) is SET 
     Then 
       Voice:ZONE 6 SILENCEQ OFF  [CO,ICM] 
     Else 
       Voice:ZONE 6 SILENCEQ ON  [CO,ICM] 
      Nest End 
     If 
     (F:WaterZone7Skip) is SET 
     Then 
       Voice:ZONE 7 SILENCEQ OFF  [CO,ICM] 
     Else 
       Voice:ZONE 7 SILENCEQ ON  [CO,ICM] 
      Nest End 
     If 
     (F:WaterZone8Skip) is SET 
     Then 
       Voice:ZONE 8 SILENCEQ OFF  [CO,ICM] 
     Else 
       Voice:ZONE 8 SILENCEQ ON  [CO,ICM] 
      Nest End 
  MACRO END 

THEN Macro: Page Tim 
  MACRO BEGIN   
    ASCII-Out:'&&cpager95.exe Tim:\' [COM1] 
  MACRO END 

THEN Macro: Away Mode 
  MACRO BEGIN   
     If 
     (F:Away) is CLEAR 
     Then 
       Voice:ALARM SILENCEQ ACTIVATD  [CO,ICM] SYNC 
       DELAY  0:00:01 
       (F:Away)  SET 
       (T:Exit delay) LOAD with 0:10:00 
       X10:  (G-8  Liv Wall Ctrl 4) ON 
       X10:  (G-12  Fam Wall Ctrl A4) ON 
       ASCII-Out:'&&cpager95.exe Tim:\' [COM1] 
       ASCII-Out:'Away Mode Activated.' [COM1] 
     Else 
       Voice:AWAY MODE IS ACTIVE  [CO,ICM] 
      Nest End 
  MACRO END 



X10 DEVICES
House,Unit,Device Name,Location,Description,Inital,Type,R,P,F
A,1,Test2,,,No Change,REMOTE,N,N,N 
A,2,Test, , ,No Change,REMOTE,N,N,N 
A,3,Jeremy's Motion,Jeremys Bedroom,Motion Detector,No Change,REMOTE,N,N,N 
A,4,,,,No Change,REMOTE,N,N,N 
A,5,,,,No Change,REMOTE,N,N,N 
A,6,,,,No Change,REMOTE,N,N,N 
A,7,,,,No Change,LAMP,N,N,N 
A,8,,,,No Change,REMOTE,N,N,N 
A,9,,,,No Change,REMOTE,N,N,N 
A,10,,,,No Change,LAMP,N,N,N 
A,11,,,,No Change,LAMP,N,N,N 
A,12,,,,No Change,LAMP,N,N,N 
A,13,,,,No Change,LAMP,N,N,N 
A,14,,,,No Change,LAMP,N,N,N 
A,15,,,,No Change,REMOTE,N,N,N 
A,16,,,,No Change,REMOTE,N,N,N 
B,1,Bed 1 Lamp,Master Bedrrom,Lamp,No Change,LAMP,N,Y,N 
B,2,Jeremys Lamp,Jeremys Bedroom,Lamp,No Change,LAMP,N,Y,N 
B,3,,,,No Change,LAMP,N,N,N 
B,4,,,,No Change,LAMP,N,N,N 
B,5,,,,No Change,LAMP,N,N,N 
B,6,,,,No Change,LAMP,N,N,N 
B,7,,,,No Change,LAMP,N,N,N 
B,8,,,,No Change,LAMP,N,N,N 
B,9,,,,No Change,LAMP,N,N,N 
B,10,,,,No Change,LAMP,N,N,N 
B,11,,,,No Change,LAMP,N,N,N 
B,12,,,,No Change,LAMP,N,N,N 
B,13,,,,No Change,LAMP,N,N,N 
B,14,Sprinkler Power,Garage,Power Irrigation system,No Change,APPLIANCE,Y,Y,N 
B,15,PA Amp,Garage,PA Amp power,No Change,APPLIANCE,N,N,N 
B,16,Remote chime,Upstairs hallway,Chime module for doorbell,No Change,LAMP,N,N,N 
C,1,,,,No Change,LAMP,N,N,N 
C,2,,,,No Change,LAMP,N,N,N 
C,3,,,,No Change,LAMP,N,N,N 
C,4,,,,No Change,LAMP,N,N,N 
C,5,,,,No Change,LAMP,N,N,N 
C,6,,,,No Change,LAMP,N,N,N 
C,7,,,,No Change,LAMP,N,N,N 
C,8,,,,No Change,LAMP,N,N,N 
C,9,,,,No Change,LAMP,N,N,N 
C,10,,,,No Change,LAMP,N,N,N 
C,11,,,,No Change,LAMP,N,N,N 
C,12,,,,No Change,LAMP,N,N,N 
C,13,,,,No Change,LAMP,N,N,N 
C,14,,,,No Change,LAMP,N,N,N 
C,15,,,,No Change,LAMP,N,N,N 
C,16,,,,No Change,LAMP,N,N,N 
D,1,Dinning Room,Dinning Room,Dinning Room Light,No Change,LAMP,N,Y,N 
D,2,,,,No Change,LAMP,N,N,N 
D,3,,,,No Change,LAMP,N,N,N 
D,4,,,,No Change,LAMP,N,N,N 
D,5,,,,No Change,LAMP,N,N,N 
D,6,,,,No Change,LAMP,N,N,N 
D,7,,,,No Change,LAMP,N,N,N 
D,8,,,,No Change,LAMP,N,N,N 
D,9,,,,No Change,LAMP,N,N,N 
D,10,,,,No Change,LAMP,N,N,N 
D,11,,,,No Change,LAMP,N,N,N 
D,12,,,,No Change,LAMP,N,N,N 
D,13,,,,No Change,LAMP,N,N,N 
D,14,,,,No Change,LAMP,N,N,N 
D,15,,,,No Change,LAMP,N,N,N 
D,16,,,,No Change,LAMP,N,N,N 
E,1,Play All Message,Kitchen,OFF is Stop playback,No Change,REMOTE,N,N,N 
E,2,Replay Message,Kitchen,OFF is Skip message,No Change,REMOTE,N,N,N 
E,3,Delete Message,Kitchen,OFF is Monitor Mute for 10 min,No Change,REMOTE,N,N,N 
E,4,VM Private Mode,Kitchen,OFF is Temp read back,No Change,REMOTE,N,N,N 
E,5,,,,No Change,REMOTE,N,N,N 
E,6,,,,No Change,REMOTE,N,N,N 
E,7,,,,No Change,REMOTE,N,N,N 
E,8,,,,No Change,REMOTE,N,N,N 
E,9,,,,No Change,LAMP,N,N,N 
E,10,,,,No Change,LAMP,N,N,N 
E,11,,,,No Change,LAMP,N,N,N 
E,12,,,,No Change,LAMP,N,N,N 
E,13,,,,No Change,LAMP,N,N,N 
E,14,,,,No Change,LAMP,N,N,N 
E,15,,,,No Change,LAMP,N,N,N 
E,16,,,,No Change,LAMP,N,N,N 
F,1,Goodnight Mode,Master Bedroom,Goodnight Mode,No Change,REMOTE,N,N,N 
F,2,,,,No Change,REMOTE,N,N,N 
F,3,,,,No Change,REMOTE,N,N,N 
F,4,Temperature,Master bedroom,Read out temp in master bedroom,No Change,REMOTE,N,N,N 
F,5,,,,No Change,REMOTE,N,N,N 
F,6,,,,No Change,REMOTE,N,N,N 
F,7,,,,No Change,REMOTE,N,N,N 
F,8,,,,No Change,REMOTE,N,N,N 
F,9,,,,No Change,REMOTE,N,N,N 
F,10,,,,No Change,REMOTE,N,N,N 
F,11,,,,No Change,REMOTE,N,N,N 
F,12,,,,No Change,REMOTE,N,N,N 
F,13,,,,No Change,REMOTE,N,N,N 
F,14,,,,No Change,REMOTE,N,N,N 
F,15,,,,No Change,REMOTE,N,N,N 
F,16,,,,No Change,REMOTE,N,N,N 
G,1,Bed1 Light,Master Bedroom,Ceiling inline light fixture,No Change,LAMP,N,Y,N 
G,2,Bed1 Wall Ctrl2,Master Bedroom,,No Change,REMOTE,N,N,N 
G,3,Bed1 Wall Ctrl 3,Master Bedroom,,No Change,REMOTE,N,N,N 
G,4,Bed1 Wall Ctrl 4,Master Bedroom,,No Change,REMOTE,N,N,N 
G,5,Liv Room Torch,Living Room,Torch Lamp,No Change,APPLIANCE,N,Y,N 
G,6,Liv Wall Ctrl 2,Living Room,,No Change,REMOTE,N,N,N 
G,7,Liv Wall Ctrl 3,Living Room,,No Change,REMOTE,N,N,N 
G,8,Liv Wall Ctrl 4,Living Room,Away/Home Mode,No Change,REMOTE,N,N,N 
G,9,Fam Rm Lamp,Family Room,Lamp,No Change,LAMP,N,Y,N 
G,10,Fam Wall Ctrl A2,Family Room,Sat/TV on,No Change,REMOTE,N,N,N 
G,11,Fam Wall Ctrl A3,Family Room,,No Change,REMOTE,N,N,N 
G,12,Fam Wall Ctrl A4,Family Room,Away/Home Mode,No Change,REMOTE,N,N,N 
G,13,,,,No Change,LAMP,N,N,N 
G,14,,,,No Change,LAMP,N,N,N 
G,15,,,,No Change,LAMP,N,N,N 
G,16,,,,No Change,LAMP,N,N,N 
H,1,,,,No Change,REMOTE,N,N,N 
H,2,,,,No Change,REMOTE,N,N,N 
H,3,,,,No Change,REMOTE,N,N,N 
H,4,,,,No Change,REMOTE,N,N,N 
H,5,,,,No Change,REMOTE,N,N,N 
H,6,,,,No Change,REMOTE,N,N,N 
H,7,,,,No Change,REMOTE,N,N,N 
H,8,,,,No Change,REMOTE,N,N,N 
H,9,,,,No Change,REMOTE,N,N,N 
H,10,,,,No Change,REMOTE,N,N,N 
H,11,,,,No Change,REMOTE,N,N,N 
H,12,,,,No Change,REMOTE,N,N,N 
H,13,,,,No Change,REMOTE,N,N,N 
H,14,,,,No Change,REMOTE,N,N,N 
H,15,,,,No Change,REMOTE,N,N,N 
H,16,,,,No Change,REMOTE,N,N,N 
I,1,,,,No Change,LAMP,N,N,N 
I,2,,,,No Change,LAMP,N,N,N 
I,3,,,,No Change,LAMP,N,N,N 
I,4,,,,No Change,LAMP,N,N,N 
I,5,,,,No Change,LAMP,N,N,N 
I,6,,,,No Change,LAMP,N,N,N 
I,7,,,,No Change,LAMP,N,N,N 
I,8,,,,No Change,LAMP,N,N,N 
I,9,,,,No Change,LAMP,N,N,N 
I,10,,,,No Change,LAMP,N,N,N 
I,11,,,,No Change,LAMP,N,N,N 
I,12,,,,No Change,LAMP,N,N,N 
I,13,,,,No Change,LAMP,N,N,N 
I,14,,,,No Change,LAMP,N,N,N 
I,15,,,,No Change,LAMP,N,N,N 
I,16,,,,No Change,LAMP,N,N,N 
J,1,,,,No Change,LAMP,N,N,N 
J,2,,,,No Change,LAMP,N,N,N 
J,3,,,,No Change,LAMP,N,N,N 
J,4,,,,No Change,LAMP,N,N,N 
J,5,,,,No Change,LAMP,N,N,N 
J,6,,,,No Change,LAMP,N,N,N 
J,7,,,,No Change,LAMP,N,N,N 
J,8,,,,No Change,LAMP,N,N,N 
J,9,,,,No Change,LAMP,N,N,N 
J,10,,,,No Change,LAMP,N,N,N 
J,11,,,,No Change,LAMP,N,N,N 
J,12,,,,No Change,LAMP,N,N,N 
J,13,,,,No Change,LAMP,N,N,N 
J,14,,,,No Change,LAMP,N,N,N 
J,15,,,,No Change,LAMP,N,N,N 
J,16,,,,No Change,LAMP,N,N,N 
K,1,,,,No Change,LAMP,N,N,N 
K,2,,,,No Change,LAMP,N,N,N 
K,3,,,,No Change,LAMP,N,N,N 
K,4,,,,No Change,LAMP,N,N,N 
K,5,,,,No Change,LAMP,N,N,N 
K,6,,,,No Change,LAMP,N,N,N 
K,7,,,,No Change,LAMP,N,N,N 
K,8,,,,No Change,LAMP,N,N,N 
K,9,,,,No Change,LAMP,N,N,N 
K,10,,,,No Change,LAMP,N,N,N 
K,11,,,,No Change,LAMP,N,N,N 
K,12,,,,No Change,LAMP,N,N,N 
K,13,,,,No Change,LAMP,N,N,N 
K,14,,,,No Change,LAMP,N,N,N 
K,15,,,,No Change,LAMP,N,N,N 
K,16,,,,No Change,LAMP,N,N,N 
L,1,,,,No Change,LAMP,N,N,N 
L,2,,,,No Change,LAMP,N,N,N 
L,3,,,,No Change,LAMP,N,N,N 
L,4,,,,No Change,LAMP,N,N,N 
L,5,,,,No Change,LAMP,N,N,N 
L,6,,,,No Change,LAMP,N,N,N 
L,7,,,,No Change,LAMP,N,N,N 
L,8,,,,No Change,LAMP,N,N,N 
L,9,,,,No Change,LAMP,N,N,N 
L,10,,,,No Change,LAMP,N,N,N 
L,11,,,,No Change,LAMP,N,N,N 
L,12,,,,No Change,LAMP,N,N,N 
L,13,,,,No Change,LAMP,N,N,N 
L,14,,,,No Change,LAMP,N,N,N 
L,15,,,,No Change,LAMP,N,N,N 
L,16,,,,No Change,LAMP,N,N,N 
M,1,Sprinkler Zone1,Back Yard,BackYard Right Bushes,No Change,APPLIANCE,Y,Y,N 
M,2,Sprinker Zone2,Front Yard,Flower Bed,No Change,APPLIANCE,Y,Y,N 
M,3,Sprinkler Zone3,Front Yard,Side Yard,No Change,APPLIANCE,Y,Y,N 
M,4,Sprinkler Zone4,Front Yard,Middle Yard,No Change,APPLIANCE,Y,Y,N 
M,5,Sprinkler Zone5,Back Yard,Back and Left side Bushes,No Change,APPLIANCE,Y,Y,N 
M,6,Sprinkler Zone6,Front Yard,Front Yard,No Change,APPLIANCE,Y,Y,N 
M,7,Sprinkler Zone7,Back Yard,Middle Yard,No Change,APPLIANCE,Y,Y,N 
M,8,Sprinkler Zone8,Back Yard,Sides of Yard,No Change,APPLIANCE,Y,Y,N 
M,9,,,,No Change,LAMP,N,N,N 
M,10,,,,No Change,LAMP,N,N,N 
M,11,,,,No Change,LAMP,N,N,N 
M,12,,,,No Change,LAMP,N,N,N 
M,13,,,,No Change,LAMP,N,N,N 
M,14,,,,No Change,LAMP,N,N,N 
M,15,,,,No Change,LAMP,N,N,N 
M,16,Garage Motion,Garage,Motion Detector,No Change,REMOTE,N,N,N 
N,1,,,,No Change,LAMP,N,N,N 
N,2,,,,No Change,LAMP,N,N,N 
N,3,,,,No Change,LAMP,N,N,N 
N,4,,,,No Change,LAMP,N,N,N 
N,5,,,,No Change,LAMP,N,N,N 
N,6,,,,No Change,LAMP,N,N,N 
N,7,,,,No Change,LAMP,N,N,N 
N,8,,,,No Change,LAMP,N,N,N 
N,9,,,,No Change,LAMP,N,N,N 
N,10,,,,No Change,LAMP,N,N,N 
N,11,,,,No Change,LAMP,N,N,N 
N,12,,,,No Change,LAMP,N,N,N 
N,13,,,,No Change,LAMP,N,N,N 
N,14,,,,No Change,LAMP,N,N,N 
N,15,,,,No Change,LAMP,N,N,N 
N,16,,,,No Change,LAMP,N,N,N 
O,1,Driveway Flood,Driveway,Driveway Flood Lights,No Change,APPLIANCE,Y,Y,N 
O,2,Driveway Motion,Driveway,Driveway Motion Detector,No Change,REMOTE,N,N,N 
O,3,Porch Light,Front Porch,Light,No Change,LAMP,Y,Y,N 
O,4,Side Door Light,Side door,Side door of Garage light,No Change,LAMP,Y,Y,N 
O,5,,,,No Change,LAMP,N,N,N 
O,6,Dusk/Dawn Sensor,Driveway,Part of Driveway Floodlight,No Change,REMOTE,N,N,N 
O,7,,,,No Change,LAMP,N,N,N 
O,8,,,,No Change,LAMP,N,N,N 
O,9,,,,No Change,LAMP,N,N,N 
O,10,,,,No Change,LAMP,N,N,N 
O,11,,,,No Change,LAMP,N,N,N 
O,12,,,,No Change,LAMP,N,N,N 
O,13,,,,No Change,LAMP,N,N,N 
O,14,,,,No Change,LAMP,N,N,N 
O,15,,,,No Change,LAMP,N,N,N 
O,16,,,,No Change,LAMP,N,N,N 
P,1,,,,No Change,LAMP,N,N,N 
P,2,,,,No Change,LAMP,N,N,N 
P,3,,,,No Change,LAMP,N,N,N 
P,4,,,,No Change,LAMP,N,N,N 
P,5,,,,No Change,LAMP,N,N,N 
P,6,,,,No Change,LAMP,N,N,N 
P,7,,,,No Change,LAMP,N,N,N 
P,8,,,,No Change,LAMP,N,N,N 
P,9,,,,No Change,LAMP,N,N,N 
P,10,,,,No Change,LAMP,N,N,N 
P,11,,,,No Change,LAMP,N,N,N 
P,12,,,,No Change,LAMP,N,N,N 
P,13,TV Bedroom,,,No Change,LAMP,N,N,N 
P,14,TV Living Room,,,No Change,LAMP,N,N,N 
P,15,SAT,,,No Change,LAMP,N,N,N 
P,16,VCR,,,No Change,LAMP,N,N,N 


TIMERS
Name            Description 
----------------------------------------------- 
Master Bed Lamp  Timer for bedroom lamp           
Tel on Hold                                       
Front door       Delay to exit timer              
Front motion     delay before retrigger           
Voice Mute       Voice mute timer                 
SPA Timer        Timer for Spa                    
No Bed1 lamp     Keep lamp off w/running          
TV1 Mute         Commercial mute                  
Jeremys Lamp     UNUSED                           
Doorbell         Timer for garage door open       
Entry Delay      Time before alarm notice         
Exit delay       Exit delay timer                 
Alarm Condition  Alarm sounding                   
Bed1 Light       Ceiling Light Fixture            
Dr/Porch lights  Timer for porch and dr lights    
Snooze timer     Wakeup alarm snooze timer        
TV Menu Clear    Clear TV Menu if left on         
TV Menu Line Clr Clear TV Menu last line          
Test Temp A      Test temp for high/low           
Test Temp B      Test temp for high/low           
Mailbox Reset    Reset mailbox flag               


Time Labels 
----------------------------------------------- 
Name: Memo timer 
Description: Timer for message reminders 
Time = 4:59 PM 

Name: sunrise plus 
Description: 30 minutes after sunrise 
Time Based on: Sunrise plus(+) 0:30 

Name: sunset minus 
Description: 30 minutes before sunset 
Time Based on: Sunset minus(-) 0:30 

Name: Wake up time 
Description: Morning wakup time 
Time = 6:30 AM 

Name: 3Hrb4sunrise 
Description: 3 hours before sunrise 
Time Based on: Sunrise minus(-) 3:00 



Flag Devices
Name            Description                    Inital Value 
----------------------------------------------------------- 
Master Goodnight Sleeping mode                    CLEAR 
Away             Set when away                    CLEAR 
Dark mode        Set when dark                    CLEAR 
Memo reminder    Set when reminder is recorded    CLEAR 
Memo beep        Set when beep is started         CLEAR 
Front door open  Set when front door open         CLEAR 
Front door mot   Set when front door motion       CLEAR 
Voice Mute       Voice responses set is muted     CLEAR 
Intercom mode    set is intercom active           CLEAR 
Caller ID Found  Set if Caller id valid           CLEAR 
Side door        Set is open                      CLEAR 
Garage door      Garage door status               CLEAR 
Incomming call   Monitor set is off               CLEAR 
Vacation Mode    Vacation Mode ON is set          CLEAR 
Morning reminder Set if spoken                    CLEAR 
Spa Timer On     Set if spa timer is running      CLEAR 
Garbage Out      Clear if Garbage taken out       CLEAR 
Dr/Porch lights  On if auto lights from door      CLEAR 
Wake up alarm    On if alarm set                  CLEAR 
Deb in bed       On when in bed                   CLEAR 
Tim in bed       On when in bed                   CLEAR 
Below 32 degrees Set after warning                CLEAR 
Temp going up    Set if temperature is rising     CLEAR 
Front Dr Motion  Front door motion when set       CLEAR 
Temp Test        Temporary Temp up/down test      CLEAR 
IrrigationON     Set for watering                 CLEAR 
IrrigationNow    Set to water now                 CLEAR 
IrrigationStop   Set to stop all watering         CLEAR 
WaterZone1Skip                                    CLEAR 
WaterZone2Skip                                    CLEAR 
WaterZone3Skip                                    CLEAR 
WaterZone4Skip                                    CLEAR 
WaterZone5Skip                                    CLEAR 
WaterZone6Skip                                    CLEAR 
WaterZone7Skip                                    CLEAR 
WaterZone8Skip                                    CLEAR 
Did it Once      Set if already did               CLEAR 
MailArrived      Set when mail is delivered       CLEAR 
NoWatering       Turn off all watering            CLEAR 


Variables
Name            Description                    Inital Value
----------------------------------------------------------- 
Hold Count down  Hold count down timer                0 
Ouside Temp Low                                       0 
Outside Temp Hi                                       0 
Month            Current month                        0 
Date             Current Day                          0 
Daily doorbell   Count door bell rings                0 
Yesturday DB     Yesturday's doorbell count           0 
Doorbell open    Open garage door                     0 
Garage CTRL      Open/Close                           0 
Away Doorbell    Number of times doorbell w/away      0 
Phone touchtone  Variable for touchtone inputs        0 
Year             Current Year                         0 
TV Menu          Holds TV Menu variable               0 
HI/LOW Temp      Holds temperary temp variable        0 
Timer            Minutes for timer                    0 
YesterdaysHiTemp Yesterdays Hi Temp                   0 
NowWateringZone  Number of Zone to water              0 


TCM+
----------------------------------------------------------- 
Digitial In-1: Side Dr CL       Digitial In- 9: Mailbox CL       Relay-1: Mst Bed Spk     
Digitial In-2: Garage Dr CL     Digitial In-10:                  Relay-2: Jeremy Spk      
Digitial In-3: Front Dr CL      Digitial In-11:                  Relay-3: House Spks      
Digitial In-4: Fr Door Bell     Digitial In-12:                  Relay-4:                 
Digitial In-5: Stereo Power     Digitial In-13:                  Relay-5:                 
Digitial In-6: Bed1Motion       Digitial In-14:                  Relay-6:                 
Digitial In-7: PorchMotion      Digitial In-15:                  Relay-7: Mailbox Spk     
Digitial In-8: NoRainDetect     Digitial In-16:                  Relay-8: Garage Door     

A/D-1: Outside Temp     Gain = 1   Offset = 0
A/D-2: DownSt Temp      Gain = 1   Offset = 0
A/D-3: Garage Temp      Gain = 1   Offset = 0
A/D-4: UpstairsTemp     Gain = 1   Offset = -4