Stargate Resources Projects Contact US Polls Forums Quiz
 


 
 
 

Greg Powers - Schedule   

Schedule Name: 031299.SCH 
   1:   SCHEDULE START   
   2:     
   3:   EVENT:  Cach-up 
   4:   If 
   5:     First pass through schedule 
   6:   Then 
   7:     (T:HallLitTimer)  STOP  
   8:     (T:FtDrMotionWait)  STOP  
   9:     (T:Phone2spkTimer)  STOP  
  10:     (T:FtDrVideoTimer)  STOP  
  11:     (T:DishWasherWait)  STOP  
  12:     (F:SecVCROn)  CLEAR 
  13:     X10:  (I-7  Ft Dr warinning) Set State to ON 
  14:      If 
  15:        After Sunset SMTWTFS 
  16:      Then 
  17:        (F:ItsDark)  SET 
  18:       Nest End 
  19:   End 
  20:     
  21:   FASTEVENT:  Auto Rm Lights [ DI:DMP Motion Goes OFF]  
  22:   Then 
  23:      If 
  24:        X10: (E-8  DMP auto Light) is ON  
  25:        and  (F:ItsDark) is SET 
  26:        " ***** Sunset rtn turns e-8 on " 
  27:        " *** Good Nite Rtn turns off E-8 " 
  28:      Then 
  29:        X10:  (E-1  DMP Rm Light) ON 
  30:       Nest End 
  31:   End 
  32:     
  33:   EVENT:  CO off hook 
  34:   If 
  35:     CO: Is OFF Hook 
  36:   Then 
  37:     (F:CoOffHook)  SET 
  38:   End 
  39:     
  40:   EVENT:  Co On Hook 
  41:   If 
  42:     CO: Is ON Hook 
  43:   Then 
  44:     (F:CoOffHook)  CLEAR 
  45:   End 
  46:     
  47:   EVENT:  ICM Intercom mode on 
  48:   If 
  49:     ICM: Is OFF Hook 
  50:   Then 
  51:     Voice:BLIBLIDT Intercome mode  [CO,ICM] 
  52:     (F:IcmOffHook)  SET 
  53:     (F:CoOffHook)  CLEAR 
  54:     Clear TouchTone Input Buffer 
  55:   End 
  56:     
  57:   EVENT:  ICM Intercom on hook 
  58:   If 
  59:     ICM: Is ON Hook 
  60:   Then 
  61:     (F:IcmOffHook)  CLEAR 
  62:   End 
  63:     
  64:   EVENT:  Line 1 Anounce 
  65:   If 
  66:     CO: Ring 1 
  67:       -OR- 
  68:     CO: Ring 2 
  69:       -OR- 
  70:     CO: Ring 3 
  71:   Then 
  72:     Voice:Line 1 ringing  [Spkr] 
  73:   End 
  74:     
  75:   EVENT:  Co Answ Mch pick up 
  76:   If 
  77:     CO: Ring 4 
  78:   Then 
  79:     Voice:Anw Mch pick up  [Spkr] 
  80:   End 
  81:     
  82:   EVENT:  Phone Co to Speaker on 
  83:   If 
  84:     XSEQ:( I-5 I-ON ) Received within 3 seconds  
  85:   Then 
  86:     Voice:PHONE PAGING ACTIVATD  [CO] 
  87:     Audio:Connect CO In to Spkr 
  88:     (T:Phone2spkTimer) LOAD with 0:01:00 
  89:   End 
  90:     
  91:   EVENT:  Phone Co to Speaker off 
  92:   If 
  93:     XSEQ:( I-5 I-OFF ) Received within 3 seconds  
  94:       -OR- 
  95:     (T:Phone2spkTimer) is Expiring 
  96:   Then 
  97:     Audio:Disconnect CO In to Spkr 
  98:     Audio:Disconnect ICM In to Spkr 
  99:     Voice:PAGING DE_ACTIV  [CO,ICM] 
 100:     X10:  (I-5  Phone2Speaker) IDLE 
 101:     X10:  (I-6  Icm2Speqaker) IDLE 
 102:   End 
 103:     
 104:   EVENT:  Inc to Speaker 
 105:   If 
 106:     XSEQ:( I-6 I-ON ) Received within 3 seconds  
 107:   Then 
 108:     Voice:INTERCOM PAGING ACTIVATD  [ICM] 
 109:     Audio:Connect ICM In to Spkr 
 110:     (T:Phone2spkTimer) LOAD with 0:01:00 
 111:   End 
 112:     
 113:   EVENT:  IR Living Room S Lamp 
 114:   If 
 115:     IR Seq:'x10 1 ' Received within 2 seconds  
 116:   Then 
 117:      If 
 118:        X10: (J-14  Lv Rm S Light) is OFF  
 119:      Then 
 120:        X10:  (J-14  Lv Rm S Light) ON 
 121:      Else 
 122:        X10:  (J-14  Lv Rm S Light) OFF 
 123:       Nest End 
 124:     X10:  (J-14  Lv Rm S Light) IDLE 
 125:   End 
 126:     
 127:   EVENT:  IR X10 Hall light ON 
 128:   If 
 129:     IR Seq:'x10 2 ' Received within 2 seconds  
 130:   Then 
 131:      If 
 132:        X10: (J-2  Hallway) is OFF  
 133:      Then 
 134:        X10:  (J-2  Hallway) ON 
 135:      Else 
 136:        X10:  (J-2  Hallway) OFF 
 137:       Nest End 
 138:     X10:  (J-2  Hallway) IDLE 
 139:   End 
 140:     
 141:   EVENT:  IR Living Rm N Table Lamp 
 142:   If 
 143:     IR Seq:'x10 3 ' Received within 2 seconds  
 144:   Then 
 145:      If 
 146:        X10: (J-15  Lv Rm N Light) is OFF  
 147:      Then 
 148:        X10:  (J-15  Lv Rm N Light) ON 
 149:      Else 
 150:        X10:  (J-15  Lv Rm N Light) OFF 
 151:       Nest End 
 152:     X10:  (J-15  Lv Rm N Light) IDLE 
 153:   End 
 154:     
 155:   EVENT:  IR Family Rm N Table Lamp 
 156:   If 
 157:     IR Seq:'x10 5 ' Received within 2 seconds  
 158:   Then 
 159:     X10:  (J-5  Fm Rm N Light)  
 160:     X10: C Status Request  
 161:      If 
 162:        X10: (J-5  Fm Rm N Light) is ON  
 163:      Then 
 164:        X10:  (J-5  Fm Rm N Light) OFF 
 165:      Else 
 166:        X10:  (J-5  Fm Rm N Light) ON 
 167:       Nest End 
 168:     X10:  (J-5  Fm Rm N Light) IDLE 
 169:   End 
 170:     
 171:   EVENT:  IR Kitchen Sink Light 
 172:   If 
 173:     IR Seq:'x10 6 ' Received within 2 seconds  
 174:   Then 
 175:      If 
 176:        X10: (J-6  Kitchen sink) is OFF  
 177:      Then 
 178:        X10:  (J-6  Kitchen sink) ON 
 179:      Else 
 180:        X10:  (J-6  Kitchen sink) OFF 
 181:       Nest End 
 182:     X10:  (J-6  Kitchen sink) IDLE 
 183:   End 
 184:     
 185:   EVENT:  IR Family Rm S Table Lamp 
 186:   If 
 187:     IR Seq:'x10 8 ' Received within 2 seconds  
 188:   Then 
 189:      If 
 190:        X10: (J-8  Fm Rm S light) is OFF  
 191:      Then 
 192:        X10:  (J-8  Fm Rm S light) ON 
 193:        X10:  (J-8  Fm Rm S light) BRI 8 Steps  
 194:      Else 
 195:        X10:  (J-8  Fm Rm S light) OFF 
 196:       Nest End 
 197:     X10:  (J-8  Fm Rm S light) IDLE 
 198:   End 
 199:     
 200:   EVENT:  IR FR Back Patio light 
 201:   If 
 202:     IR Seq:'x10 9 ' Received within 2 seconds  
 203:   Then 
 204:      If 
 205:        X10: (J-9  Fm Back Patio) is OFF  
 206:      Then 
 207:        X10:  (J-9  Fm Back Patio) ON 
 208:      Else 
 209:        X10:  (J-9  Fm Back Patio) OFF 
 210:       Nest End 
 211:     X10:  (J-9  Fm Back Patio) IDLE 
 212:   End 
 213:     
 214:   EVENT:  IR Dishwasher Override 
 215:   If 
 216:     IR Seq:'x10 quick ' Received within 3 seconds  
 217:   Then 
 218:     X10:  (H-9  Dishwasher) ON 
 219:     Voice:DishwasherOn  [Spkr] 
 220:     X10:  (H-9  Dishwasher) IDLE 
 221:     (T:DishWasherWait) LOAD with 1:30:00 
 222:   End 
 223:     
 224:   EVENT:  ir test 
 225:   If 
 226:     IR Seq:'x10 Pause ' Received within 1 seconds  
 227:   Then 
 228:     Voice:YOUDAMAN  [Spkr] 
 229:   End 
 230:     
 231:   EVENT:  RF Button 1 on (Patty Light) 
 232:   If 
 233:     XSEQ:( O-1 O-ON ) Received within 3 seconds  
 234:   Then 
 235:     Voice:BLIP  [Spkr] 
 236:     X10:  (B-1  Mst Bed Patty) ON 
 237:     X10:  (O-1  RF Button 1) IDLE 
 238:   End 
 239:     
 240:   EVENT:  RF Button 1 off (Patty Light) 
 241:   If 
 242:     XSEQ:( O-1 O-OFF ) Received within 3 seconds  
 243:   Then 
 244:     Voice:BLIP  [Spkr] 
 245:     X10:  (B-1  Mst Bed Patty) OFF 
 246:     X10:  (O-1  RF Button 1) IDLE 
 247:   End 
 248:     
 249:   EVENT:  RF Button 2 on (All Lights) 
 250:   If 
 251:     XSEQ:( O-2 O-ON ) Received within 3 seconds  
 252:   Then 
 253:     Voice:BLIP  [Spkr] 
 254:     (THEN MACRO:All Lite unit on) 
 255:     X10:  (A-2  Btn 2 Mst Bed) ON 
 256:     X10:  (O-2  RF Button 2) IDLE 
 257:   End 
 258:     
 259:   EVENT:  RF Button 2 off (All Lights) 
 260:   If 
 261:     XSEQ:( O-2 O-OFF ) Received within 3 seconds  
 262:   Then 
 263:     Voice:BLIP  [Spkr] 
 264:     (THEN MACRO:All Units off) 
 265:     X10:  (A-2  Btn 2 Mst Bed) OFF 
 266:     X10:  (O-2  RF Button 2) IDLE 
 267:   End 
 268:     
 269:   EVENT:  RF Button 3 on (Hall Light) 
 270:   If 
 271:     XSEQ:( O-3 O-ON ) Received within 3 seconds  
 272:   Then 
 273:     Voice:BLIP  [Spkr] 
 274:     X10:  (J-2  Hallway) ON 
 275:     X10:  (O-3  RF Button 3) IDLE 
 276:   End 
 277:     
 278:   EVENT:  RF Button 3 off (Hall Light) 
 279:   If 
 280:     XSEQ:( O-3 O-OFF ) Received within 3 seconds  
 281:   Then 
 282:     Voice:BLIP  [Spkr] 
 283:     X10:  (J-2  Hallway) OFF 
 284:     X10:  (O-3  RF Button 3) IDLE 
 285:   End 
 286:     
 287:   EVENT:  RF Button 4 on (MstBedAll) 
 288:   If 
 289:     " Mst Bed Rm All Lights On " 
 290:     and  XSEQ:( O-4 O-ON ) Received within 3 seconds  
 291:   Then 
 292:     Voice:BLIP  [Spkr] 
 293:     X10:  (B-1  Mst Bed Patty) ON 
 294:     X10:  (B-2  Mst Bed Greg) ON 
 295:     " Dresser lamp is A4 " 
 296:     X10:  (A-4  Btn 4 Mst Bed) ON 
 297:     X10:  (O-4  RF Button 4) IDLE 
 298:   End 
 299:     
 300:   EVENT:  RF Button 4 off (MstBedAll) 
 301:   If 
 302:     " Mst Bed Rm All Lights OFF " 
 303:     and  XSEQ:( O-4 O-OFF ) Received within 3 seconds  
 304:   Then 
 305:     Voice:BLIP  [Spkr] 
 306:     X10:  (B-1  Mst Bed Patty) OFF 
 307:     X10:  (B-2  Mst Bed Greg) OFF 
 308:     " Dresser lamp is A4 " 
 309:     X10:  (A-4  Btn 4 Mst Bed) OFF 
 310:     X10:  (O-4  RF Button 4) IDLE 
 311:   End 
 312:     
 313:   EVENT:  RF Button 5 (Lvn N Lamp) on 
 314:   If 
 315:     XSEQ:( O-5 O-ON ) Received within 3 seconds  
 316:   Then 
 317:     Voice:BLIP  [Spkr] 
 318:     X10:  (J-15  Lv Rm N Light) ON 
 319:     X10:  (J-15  Lv Rm N Light) IDLE 
 320:   End 
 321:     
 322:   EVENT:  Rf Button 5 (Lvn N Lamp) off 
 323:   If 
 324:     XSEQ:( O-5 O-OFF ) Received within 3 seconds  
 325:   Then 
 326:     Voice:BLIP  [Spkr] 
 327:     X10:  (J-15  Lv Rm N Light) OFF 
 328:     X10:  (J-15  Lv Rm N Light) IDLE 
 329:   End 
 330:     
 331:   EVENT:  RF Button 6 (Lvn S Lamp) on 
 332:   If 
 333:     XSEQ:( O-6 O-ON ) Received within 3 seconds  
 334:   Then 
 335:     Voice:BLIP  [Spkr] 
 336:     X10:  (J-14  Lv Rm S Light) ON 
 337:     X10:  (J-14  Lv Rm S Light) IDLE 
 338:   End 
 339:     
 340:   EVENT:  RF Button 6 (Lvn S lamp) off 
 341:   If 
 342:     XSEQ:( O-6 O-OFF ) Received within 3 seconds  
 343:   Then 
 344:     Voice:BLIP  [Spkr] 
 345:     X10:  (J-14  Lv Rm S Light) OFF 
 346:     X10:  (J-14  Lv Rm S Light) IDLE 
 347:   End 
 348:     
 349:   EVENT:  RF Button 7 (Lvn Panio) On 
 350:   If 
 351:     XSEQ:( O-7 O-ON ) Received within 3 seconds  
 352:   Then 
 353:     Voice:BLIP  [Spkr] 
 354:     X10:  (J-16  Lv Rm panio) ON 
 355:     X10:  (J-16  Lv Rm panio) IDLE 
 356:   End 
 357:     
 358:   EVENT:  RF Button 7 (Lvn panio) Off 
 359:   If 
 360:     XSEQ:( O-7 O-OFF ) Received within 3 seconds  
 361:   Then 
 362:     Voice:BLIP  [Spkr] 
 363:     X10:  (J-16  Lv Rm panio) OFF 
 364:     X10:  (J-16  Lv Rm panio) IDLE 
 365:   End 
 366:     
 367:   EVENT:  RF Button 8 (Fr Patio) On 
 368:   If 
 369:     XSEQ:( O-8 O-ON ) Received within 3 seconds  
 370:   Then 
 371:     Voice:BLIP  [Spkr] 
 372:     X10:  (J-9  Fm Back Patio) ON 
 373:     X10:  (J-9  Fm Back Patio) IDLE 
 374:   End 
 375:     
 376:   EVENT:  RF Button 8 (Fm Patio) Off 
 377:   If 
 378:     XSEQ:( O-8 O-OFF ) Received within 3 seconds  
 379:   Then 
 380:     Voice:BLIP  [Spkr] 
 381:     X10:  (J-9  Fm Back Patio) OFF 
 382:     X10:  (J-9  Fm Back Patio) IDLE 
 383:   End 
 384:     
 385:   EVENT:  RF Button 9 (Fm Rm N Lite ON) 
 386:   If 
 387:     XSEQ:( O-9 O-ON ) Received within 3 seconds  
 388:   Then 
 389:     Voice:BLIP  [Spkr] 
 390:     X10:  (J-5  Fm Rm N Light) ON 
 391:     X10:  (O-9  RF Button 9) IDLE 
 392:   End 
 393:     
 394:   EVENT:  RF Button 9 (Fm Rm N Lite Off) 
 395:   If 
 396:     XSEQ:( O-9 O-OFF ) Received within 3 seconds  
 397:   Then 
 398:     Voice:BLIP  [Spkr] 
 399:     X10:  (J-5  Fm Rm N Light) OFF 
 400:     X10:  (O-9  RF Button 9) IDLE 
 401:   End 
 402:     
 403:   EVENT:  RF Button 10(Fm Rm S Lite ON) 
 404:   If 
 405:     XSEQ:( O-10 O-ON ) Received within 3 seconds  
 406:   Then 
 407:     Voice:BLIP  [Spkr] 
 408:     X10:  (J-8  Fm Rm S light) ON 
 409:     X10:  (J-8  Fm Rm S light) BRI 8 Steps  
 410:     X10:  (O-10  RF Button 10) IDLE 
 411:   End 
 412:     
 413:   EVENT:  RF Button 10(Fm Rm S Lite Off) 
 414:   If 
 415:     XSEQ:( O-10 O-OFF ) Received within 3 seconds  
 416:   Then 
 417:     Voice:BLIP  [Spkr] 
 418:     X10:  (J-8  Fm Rm S light) OFF 
 419:     X10:  (O-10  RF Button 10) IDLE 
 420:   End 
 421:     
 422:   EVENT:  RF Button 11(KtSink Lite ON) 
 423:   If 
 424:     XSEQ:( O-11 O-ON ) Received within 3 seconds  
 425:   Then 
 426:     Voice:BLIP  [Spkr] 
 427:     X10:  (J-6  Kitchen sink) ON 
 428:     X10:  (O-11  RF Button 11) IDLE 
 429:   End 
 430:     
 431:   EVENT:  RF Button 11(Kt Sink Lite Off) 
 432:   If 
 433:     XSEQ:( O-11 O-OFF ) Received within 3 seconds  
 434:   Then 
 435:     Voice:BLIP  [Spkr] 
 436:     X10:  (J-6  Kitchen sink) OFF 
 437:     X10:  (O-11  RF Button 11) IDLE 
 438:   End 
 439:     
 440:   EVENT:  RF Button 15(Dishwasher on) 
 441:   If 
 442:     XSEQ:( O-15 O-ON ) Received within 3 seconds  
 443:   Then 
 444:     Voice:BLIP  [Spkr] 
 445:     Voice:DishwasherOn  [Spkr] 
 446:     X10:  (H-9  Dishwasher) ON 
 447:     (T:DishWasherWait) LOAD with 1:00:00 
 448:     X10:  (H-9  Dishwasher) IDLE 
 449:   End 
 450:     
 451:   EVENT:  RF Button 15(Dishwasher off) 
 452:   If 
 453:     XSEQ:( O-15 O-OFF ) Received within 3 seconds  
 454:   Then 
 455:     Voice:BLIP  [Spkr] 
 456:     X10:  (H-9  Dishwasher) OFF 
 457:     X10:  (H-9  Dishwasher) IDLE 
 458:   End 
 459:     
 460:   EVENT:  RF Ctlr Button 17 on 
 461:   If 
 462:     XSEQ:( P-1 P-ON ) Received within 3 seconds  
 463:   Then 
 464:      If 
 465:        (DI:Garage Dr St) is ON 
 466:      Then 
 467:        (THEN MACRO:PressGarageButon) 
 468:        Voice:CLOSE GARAGE DOOR  [Spkr] 
 469:       Nest End 
 470:     X10:  (P-1  RF Button 17) IDLE 
 471:   End 
 472:     
 473:   EVENT:  RF Ctlr Button 17 off 
 474:   If 
 475:     XSEQ:( P-1 P-OFF ) Received within 3 seconds  
 476:   Then 
 477:      If 
 478:        (DI:Garage Dr St) is OFF 
 479:      Then 
 480:        (THEN MACRO:PressGarageButon) 
 481:        Voice:OPEN GARAGE DOOR  [Spkr] 
 482:       Nest End 
 483:     X10:  (P-1  RF Button 17) IDLE 
 484:   End 
 485:     
 486:   EVENT:  RF Ctlr Button 21 on 
 487:   If 
 488:     " Ft Dr Video Camera On " 
 489:     and  XSEQ:( P-5 P-ON ) Received within 3 seconds  
 490:   Then 
 491:     Voice:BLIP  [Spkr] 
 492:     X10:  (A-11  Ft Dr Video Cam) ON 
 493:      If 
 494:        (F:ItsDark) is SET 
 495:      Then 
 496:        X10:  (J-4  Frt Porch Dr) OFF 
 497:        X10:  (A-14  Ft Dr Cam Light) ON 
 498:       Nest End 
 499:     (T:FtDrVideoTimer) LOAD with 0:04:00 
 500:     X10:  (P-5  RF Button 21) IDLE 
 501:   End 
 502:     
 503:   EVENT:  RF Ctlr Button 21 off 
 504:   If 
 505:     " Ft Dr Video Camers Off  " 
 506:     and  XSEQ:( P-5 P-OFF ) Received within 3 seconds  
 507:   Then 
 508:     Voice:BLIP  [Spkr] 
 509:     (T:FtDrVideoTimer) LOAD with 0:00:05 
 510:     X10:  (P-5  RF Button 21) IDLE 
 511:     Voice:DOOR VIDEO OFF  [Spkr] 
 512:   End 
 513:     
 514:   EVENT:  Living Room All on 50% 
 515:   If 
 516:     XSEQ:( J-13 J-ON ) Received within 3 seconds  
 517:   Then 
 518:     X10:  (J-14  Lv Rm S Light) ON 
 519:     X10:  (J-15  Lv Rm N Light) ON 
 520:     X10:  (J-16  Lv Rm panio) ON 
 521:     X10:  (J-14  Lv Rm S Light) Set Level  50 % 
 522:     X10:  (J-15  Lv Rm N Light) Set Level  50 % 
 523:     X10:  (J-16  Lv Rm panio) Set Level  50 % 
 524:   End 
 525:     
 526:   EVENT:  Living Room All Off 50% 
 527:   If 
 528:     XSEQ:( J-13 J-OFF ) Received within 3 seconds  
 529:   Then 
 530:     X10:  (J-14  Lv Rm S Light) OFF 
 531:     X10:  (J-15  Lv Rm N Light) OFF 
 532:     X10:  (J-16  Lv Rm panio) OFF 
 533:   End 
 534:     
 535:   EVENT:  Mst Bed patty on 
 536:   If 
 537:     XSEQ:( A-1 A-ON ) Received within 3 seconds  
 538:   Then 
 539:     X10:  (B-1  Mst Bed Patty) ON 
 540:     X10:  (A-1  Btn 1 Mst Bed) IDLE 
 541:   End 
 542:     
 543:   EVENT:  Mst Bed patty off 
 544:   If 
 545:     XSEQ:( A-1 A-OFF ) Received within 3 seconds  
 546:   Then 
 547:     " Dresser is A-4 for Immediate OFF " 
 548:     X10:  (B-1  Mst Bed Patty) OFF 
 549:     X10:  (A-1  Btn 1 Mst Bed) IDLE 
 550:   End 
 551:     
 552:   EVENT:  Mst Bed on 
 553:   If 
 554:     XSEQ:( A-4 A-ON ) Received within 4 seconds  
 555:   Then 
 556:     " Dresser is A-4 for Immediate ON " 
 557:     X10:  (B-2  Mst Bed Greg) ON 
 558:     X10:  (B-1  Mst Bed Patty) ON 
 559:     X10:  (A-4  Btn 4 Mst Bed) IDLE 
 560:   End 
 561:     
 562:   EVENT:  Mst bed off 
 563:   If 
 564:     XSEQ:( A-4 A-OFF ) Received within 4 seconds  
 565:   Then 
 566:     " Dresser is A-4 for Immediate OFF " 
 567:     X10:  (B-1  Mst Bed Patty) OFF 
 568:     X10:  (B-2  Mst Bed Greg) OFF 
 569:     X10:  (A-4  Btn 4 Mst Bed) IDLE 
 570:   End 
 571:     
 572:   EVENT:  Denices Rm Light Ctl 
 573:   If 
 574:     X10: (E-1  DMP Rm Light) is ON  
 575:       -OR- 
 576:     X10: (E-2  DMP Fan) is ON  
 577:       -OR- 
 578:     X10: (E-3  DMP Bedside Lt) is ON  
 579:   Then 
 580:      If 
 581:        (DI:DMP Motion) Goes OFF 
 582:      Then 
 583:        (T:DMPLightTimer) LOAD with 0:15:00 
 584:      Else 
 585:         If 
 586:           (T:DMPLightTimer) is Expiring 
 587:         Then 
 588:           X10:  (E-1  DMP Rm Light) OFF 
 589:           X10:  (E-3  DMP Bedside Lt) OFF 
 590:            If 
 591:              Time is After 4:00 AM SMTWTFS 
 592:              and  Time is Before 10:00 PM SMTWTFS 
 593:            Then 
 594:              X10:  (E-2  DMP Fan) OFF 
 595:             Nest End 
 596:          Nest End 
 597:       Nest End 
 598:   End 
 599:     
 600:   EVENT:  Denice Nightly Fan Check 
 601:   If 
 602:     Time is 4:00 AM SMTWTFS 
 603:   Then 
 604:     X10:  (E-2  DMP Fan) OFF 
 605:   End 
 606:     
 607:   EVENT:  Stef Auto ovrhd light 
 608:   If 
 609:     (DI:SMP Motion) Goes OFF 
 610:     and  (F:ItsDark) is SET 
 611:     and  X10: (D-8  SMP Auto Light) is ON  
 612:     " Sunset rtn turns D-8 on " 
 613:     " Good Nite Rtn turns off D-8 " 
 614:   Then 
 615:     X10:  (D-1  SMP Rm Light) ON 
 616:   End 
 617:     
 618:   EVENT:  Stef 6400 address fix d13 on 
 619:   If 
 620:     XSEQ:( D-13 D-ON ) Received within 3 seconds  
 621:   Then 
 622:     X10:  (D-1  SMP Rm Light) ON 
 623:   End 
 624:     
 625:   EVENT:  Stef 6400 address fix d13 off 
 626:   If 
 627:     XSEQ:( D-13 D-OFF ) Received within 3 seconds  
 628:   Then 
 629:     X10:  (D-1  SMP Rm Light) OFF 
 630:   End 
 631:     
 632:   EVENT:  Stef 6400 address fix d14 on 
 633:   If 
 634:     XSEQ:( D-14 D-ON ) Received within 3 seconds  
 635:   Then 
 636:     X10:  (D-2  SMP Fan) ON 
 637:   End 
 638:     
 639:   EVENT:  Stef 6400 address fix d14 off 
 640:   If 
 641:     XSEQ:( D-14 D-OFF ) Received within 3 seconds  
 642:   Then 
 643:     X10:  (D-2  SMP Fan) OFF 
 644:   End 
 645:     
 646:   EVENT:  Stef 6400 address fix d15 on 
 647:   If 
 648:     XSEQ:( D-15 D-ON ) Received within 3 seconds  
 649:   Then 
 650:     X10:  (D-3  SMP Bed Light) ON 
 651:   End 
 652:     
 653:   EVENT:  Stef 6400 address fix d15 off 
 654:   If 
 655:     XSEQ:( D-15 D-OFF ) Received within 4 seconds  
 656:   Then 
 657:     X10:  (D-3  SMP Bed Light) OFF 
 658:   End 
 659:     
 660:   EVENT:  Steph Rm Light Ctl 
 661:   If 
 662:     X10: (D-1  SMP Rm Light) is ON  
 663:       -OR- 
 664:     X10: (D-2  SMP Fan) is ON  
 665:       -OR- 
 666:     X10: (D-3  SMP Bed Light) is ON  
 667:       -OR- 
 668:     X10: (D-7  SMP Dsk Light) is ON  
 669:   Then 
 670:      If 
 671:        (DI:SMP Motion) Goes OFF 
 672:      Then 
 673:        (T:SMPLightTimer) LOAD with 0:15:00 
 674:      Else 
 675:         If 
 676:           (T:SMPLightTimer) is Expiring 
 677:         Then 
 678:           X10:  (D-1  SMP Rm Light) OFF 
 679:            If 
 680:              Time is After 4:00 AM SMTWTFS 
 681:              and  Time is Before 10:00 PM SMTWTFS 
 682:            Then 
 683:              X10:  (D-2  SMP Fan) OFF 
 684:             Nest End 
 685:           X10:  (D-3  SMP Bed Light) OFF 
 686:           X10:  (D-7  SMP Dsk Light) OFF 
 687:          Nest End 
 688:       Nest End 
 689:   End 
 690:     
 691:   EVENT:  Stepanie Nightly Fan Check 
 692:   If 
 693:     Time is 4:00 AM SMTWTFS 
 694:   Then 
 695:     X10:  (D-2  SMP Fan) OFF 
 696:   End 
 697:     
 698:   EVENT:  Fr Dr Warning On 
 699:   If 
 700:     X10: (I-7  Ft Dr warinning) is ON  
 701:   Then 
 702:     Voice:FRONT DOOR WARNING ON  [Spkr] 
 703:   End 
 704:     
 705:   EVENT:  Ft Dr Warning Off 
 706:   If 
 707:     X10: (I-7  Ft Dr warinning) is OFF  
 708:   Then 
 709:     Voice:FRONT DOOR WARNING OFF  [Spkr] 
 710:   End 
 711:     
 712:   EVENT:  All Lights On 
 713:   If 
 714:     XSEQ:( A-2 A-ON ) Received within 3 seconds  
 715:   Then 
 716:     (THEN MACRO:All Lite unit on) 
 717:   End 
 718:     
 719:   EVENT:  All Units OFF 
 720:   If 
 721:     XSEQ:( A-2 A-OFF ) Received within 3 seconds  
 722:   Then 
 723:     (THEN MACRO:All Units off) 
 724:      If 
 725:        (F:ItsDark) is SET 
 726:      Then 
 727:        X10:  (J-4  Frt Porch Dr) ON 
 728:        X10: J-DIM7 Steps  
 729:       Nest End 
 730:   End 
 731:     
 732:   EVENT:  Dishwasher Delay Start 
 733:   If 
 734:     Time is 2:00 AM SMTWTFS 
 735:   Then 
 736:     X10:  (H-9  Dishwasher) ON 
 737:     (T:DishWasherWait) LOAD with 1:30:00 
 738:   End 
 739:     
 740:   EVENT:  DishWasher Overide 
 741:   If 
 742:     XSEQ:( H-9 H-ON ) Received within 3 seconds  
 743:   Then 
 744:      If 
 745:        " H-9 set by RF of IR controller  " 
 746:        " skip this stuff " 
 747:        and  (T:DishWasherWait) is Running 
 748:      Then 
 749:        X10:  (H-9  Dishwasher) IDLE 
 750:      Else 
 751:        Voice:DishwasherOn  [Spkr] 
 752:        (T:DishWasherWait) LOAD with 1:30:00 
 753:        X10:  (H-9  Dishwasher) ON 
 754:       Nest End 
 755:   End 
 756:     
 757:   EVENT:  Dishwasher Delay OFF 
 758:   If 
 759:     (T:DishWasherWait) is Expiring 
 760:   Then 
 761:     X10:  (H-9  Dishwasher) OFF 
 762:   End 
 763:     
 764:   EVENT:  Front Door Opened 
 765:   If 
 766:     (DI:Front Dr St) Goes OFF 
 767:   Then 
 768:     " --- don'tAnounceFrtDrActivity " 
 769:     " --- from motion detector " 
 770:     LOG 'Front door open' 
 771:     (T:FtDrMotionWait) LOAD with 0:02:00 
 772:     (T:FtDrOpenWait) LOAD with 0:02:00 
 773:     Voice:BBBEEP2  [Spkr] 
 774:   End 
 775:     
 776:   EVENT:  Front Door Closed 
 777:   If 
 778:     (DI:Front Dr St) Goes ON 
 779:   Then 
 780:     (T:FtDrOpenWait)  CLEAR 
 781:   End 
 782:     
 783:   EVENT:  Front Door Still Open 
 784:   If 
 785:     (T:FtDrOpenWait) is Expiring 
 786:     and  X10: (I-7  Ft Dr warinning) is ON  
 787:   Then 
 788:     Voice:Frt Dr is open  [Spkr] 
 789:     (T:FtDrOpenWait) LOAD with 0:01:00 
 790:   End 
 791:     
 792:   EVENT:  Front Dr Motion Detector 
 793:   If 
 794:     XSEQ:( A-10 A-ON ) Received within 3 seconds  
 795:     and  X10: (I-7  Ft Dr warinning) is ON  
 796:     " FrDrWarning set  On Goodmorning " 
 797:   Then 
 798:      If 
 799:        (T:FtDrMotionWait) is Stopped 
 800:      Then 
 801:        X10:  (A-11  Ft Dr Video Cam) ON 
 802:         If 
 803:           (F:AwayRtn) is SET 
 804:         Then 
 805:           (IR:x10 1 ) play 1 time(s) [Emitter1] 
 806:          Nest End 
 807:         If 
 808:           (F:ItsDark) is SET 
 809:         Then 
 810:           X10:  (J-2  Hallway) ON 
 811:           X10:  (J-4  Frt Porch Dr) OFF 
 812:           X10:  (A-14  Ft Dr Cam Light) ON 
 813:           (T:HallLitTimer) LOAD with 0:02:00 
 814:         Else 
 815:           Voice:Front door  [Spkr] 
 816:          Nest End 
 817:        (V:FrtDrMotionCnt)  INCREMENT 
 818:        (T:FtDrMotionWait) LOAD with 0:04:00 
 819:        (T:FtDrVideoTimer) LOAD with 0:04:00 
 820:        X10:  (A-10  Ft Dr Motion dtc) OFF 
 821:      Else 
 822:        " --- 2nd time bump timer 5mins " 
 823:        (T:FtDrMotionWait) LOAD with 0:05:00 
 824:       Nest End 
 825:   End 
 826:     
 827:   EVENT:  Remote Garage Dr 
 828:   If 
 829:     TelePhone Seq:'1234' Received within 5 seconds  
 830:   Then 
 831:     Voice:REMOTE ACCESS TO GARAGE DOOR IS ACTIVE  [Spkr] 
 832:      If 
 833:        (DI:Garage Dr St) is ON 
 834:      Then 
 835:        Voice:CLOSE  [Spkr,CO,ICM] 
 836:      Else 
 837:        Voice:OPEN  [Spkr,CO,ICM] 
 838:       Nest End 
 839:     Voice:GARAGE DOOR  [Spkr,CO,ICM] 
 840:     (THEN MACRO:PressGarageButon) 
 841:   End 
 842:     
 843:   EVENT:  Garage Dr Status 
 844:   If 
 845:     XSEQ:( I-2 I-ON ) Received within 3 seconds  
 846:   Then 
 847:      If 
 848:        (DI:Garage Dr St) is ON 
 849:      Then 
 850:        Voice:GARAGE DOOR IS OPEN  [CO,ICM] 
 851:      Else 
 852:        Voice:GARAGE DOOR IS CLOSED  [CO,ICM] 
 853:       Nest End 
 854:   End 
 855:     
 856:   EVENT:  Never Dark Entry On 
 857:   If 
 858:     " --WhenGarageDrOpened " 
 859:     " --AfterDarkTurnOnHallLite2Mins " 
 860:     and  (DI:Garage Dr St) Goes ON 
 861:     and  (F:ItsDark) is SET 
 862:   Then 
 863:     X10:  (J-2  Hallway) ON 
 864:     X10:  (J-12  Service Porch) ON 
 865:     (T:HallLitTimer) LOAD with 0:02:00 
 866:   End 
 867:     
 868:   EVENT:  Never Dark Entry Off 
 869:   If 
 870:     (T:HallLitTimer) is Expiring 
 871:   Then 
 872:     X10:  (J-2  Hallway) OFF 
 873:     X10:  (J-12  Service Porch) OFF 
 874:   End 
 875:     
 876:   EVENT:  Front Door Video OFF 
 877:   If 
 878:     (T:FtDrVideoTimer) is Stopped 
 879:   Then 
 880:      If 
 881:        (F:SecVCROn) is SET 
 882:      Then 
 883:        (IR:x10 1 ) play 1 time(s) [Emitter1] 
 884:        DELAY  0:00:01 
 885:        (IR:x10 1 ) play 1 time(s) [Emitter1] 
 886:        (F:SecVCROn)  CLEAR 
 887:       Nest End 
 888:     X10:  (A-11  Ft Dr Video Cam) OFF 
 889:     X10:  (A-14  Ft Dr Cam Light) OFF 
 890:      If 
 891:        (F:ItsDark) is SET 
 892:      Then 
 893:        (THEN MACRO:Frt porch Lt on) 
 894:       Nest End 
 895:   End 
 896:     
 897:   EVENT:  System Status All 
 898:   If 
 899:     XSEQ:( I-8 I-ON ) Received within 3 seconds  
 900:   Then 
 901:     Voice:<day hh:mm am/pm> [CO,ICM] SYNC 
 902:     Voice:AWAY MODE IS  [CO,ICM] SYNC 
 903:      If 
 904:        (F:AwayRtn) is SET 
 905:      Then 
 906:        Voice:ACTIVE  [CO,ICM] SYNC 
 907:      Else 
 908:        Voice:OFF  [CO,ICM] SYNC 
 909:       Nest End 
 910:     Voice:GARAGE DOOR IS  [CO,ICM] SYNC 
 911:      If 
 912:        (DI:Garage Dr St) is ON 
 913:      Then 
 914:        Voice:OPEN  [CO,ICM] SYNC 
 915:      Else 
 916:        Voice:CLOSED  [CO,ICM] SYNC 
 917:       Nest End 
 918:     Voice:FRONT DOOR IS  [CO,ICM] 
 919:      If 
 920:        (DI:Front Dr St) is ON 
 921:      Then 
 922:        Voice:CLOSED  [CO,ICM] 
 923:      Else 
 924:        Voice:OPEN  [CO,ICM] 
 925:       Nest End 
 926:     Voice:FRONT DOOR HAS <FrtDrMotionCnt> ACTIVITY  [CO,ICM] 
 927:      If 
 928:        X10: (I-7  Ft Dr warinning) is ON  
 929:      Then 
 930:        Voice:FRONT DOOR WARNING ON  [CO,ICM] 
 931:      Else 
 932:        Voice:FRONT DOOR WARNING OFF  [CO,ICM] 
 933:       Nest End 
 934:      If 
 935:        (T:DishWasherWait) is Running 
 936:      Then 
 937:        Voice:DishwasherOn ACTIVE  [CO,ICM] 
 938:       Nest End 
 939:      If 
 940:        (T:DMPLightTimer) is Running 
 941:      Then 
 942:        Voice:BEDROOM D HAS MOVEMENT  [CO,ICM] 
 943:       Nest End 
 944:      If 
 945:        (T:SMPLightTimer) is Running 
 946:      Then 
 947:        Voice:BEDROOM S HAS MOVEMENT  [CO,ICM] 
 948:       Nest End 
 949:      If 
 950:        (F:ItsDark) is SET 
 951:      Then 
 952:        Voice:NIGHT FLAG ON  [CO,ICM] 
 953:       Nest End 
 954:      If 
 955:        (V:NumOfMsg) > 0 
 956:      Then 
 957:         If 
 958:           (V:NumOfMsg) = 1 
 959:         Then 
 960:           Voice:YOU_HAVE <NumOfMsg> MESSAGE  [CO,ICM] 
 961:          Nest End 
 962:         If 
 963:           (V:NumOfMsg) > 1 
 964:         Then 
 965:           Voice:YOU_HAVE <NumOfMsg> MESSAGES  [CO,ICM] 
 966:          Nest End 
 967:       Nest End 
 968:   End 
 969:     
 970:   EVENT:  Phone Help Message 
 971:   If 
 972:     XSEQ:( I-9 I-ON ) Received within 4 seconds  
 973:   Then 
 974:     Voice:19 AWAY SECURITY MODE  [CO,ICM] SYNC 
 975:     Voice:30 2 HALLWAY LIGHTS  [CO,ICM] 
 976:     Voice:30 4 FRONT PORCH LIGHT  [CO,ICM] 
 977:     Voice:80 9 DishwasherOn  [CO,ICM] 
 978:     Voice:90 2 GARAGE STATUS  [CO,ICM] 
 979:     Voice:90 5 TELEPHON PAGING  [CO,ICM] 
 980:     Voice:90 7 FRONT DOOR WARNING  [CO,ICM] 
 981:     Voice:90 8 STATUS ALL  [CO,ICM] SYNC 
 982:   End 
 983:     
 984:   EVENT:  Christmas Lights ON 
 985:   If 
 986:     Date is After Dec  5 
 987:     and  Date is Before Dec  31 
 988:   Then 
 989:      If 
 990:        Time is (TL:Sunset Plus)  
 991:      Then 
 992:        X10:  (N-1  Christmas Tree) ON 
 993:        X10:  (N-2  OutDr Christmas) ON 
 994:       Nest End 
 995:   End 
 996:     
 997:   EVENT:  Christmas outdoors OFF 
 998:   If 
 999:     Date is After Dec  5 
1000:     and  Date is Before Dec  31 
1001:   Then 
1002:      If 
1003:        Time is 10:15 PM SMTWTFS 
1004:      Then 
1005:        X10:  (N-1  Christmas Tree) OFF 
1006:        X10:  (N-2  OutDr Christmas) OFF 
1007:       Nest End 
1008:   End 
1009:     
1010:   EVENT:  Sunrise 
1011:   If 
1012:     Sunrise SMTWTFS 
1013:   Then 
1014:     X10:  (J-4  Frt Porch Dr) OFF 
1015:     X10:  (J-8  Fm Rm S light) Set Level  100% 
1016:     X10:  (J-8  Fm Rm S light) OFF 
1017:     X10:  (H-9  Dishwasher) ON 
1018:     (T:DishWasherWait) LOAD with 9:00:00 
1019:     X10:  (H-9  Dishwasher) IDLE 
1020:     (F:ItsDark)  CLEAR 
1021:   End 
1022:     
1023:   EVENT:  Wk day Goodmorning 
1024:   If 
1025:     Time is (TL:Wk Day AM)  
1026:   Then 
1027:     X10:  (J-8  Fm Rm S light) OFF 
1028:     X10:  (I-7  Ft Dr warinning) ON 
1029:   End 
1030:     
1031:   EVENT:  Wk End Good Morning 
1032:   If 
1033:     Time is (TL:Wk End AM)  
1034:   Then 
1035:     X10:  (J-8  Fm Rm S light) OFF 
1036:     X10:  (I-7  Ft Dr warinning) ON 
1037:   End 
1038:     
1039:   EVENT:  Wk day gone 
1040:   If 
1041:     Time is (TL:wk day gone)  
1042:   Then 
1043:      If 
1044:        (DI:Garage Dr St) is ON 
1045:      Then 
1046:        (THEN MACRO:PressGarageButon) 
1047:       Nest End 
1048:     (THEN MACRO:All Units off) 
1049:   End 
1050:     
1051:   EVENT:  Wk Day Goodnite 
1052:   If 
1053:     Time is (TL:Wk day gnite)  
1054:       -OR- 
1055:     Time is (TL:ChkAgainTime)  
1056:   Then 
1057:      If 
1058:        (DI:Garage Dr St) is ON 
1059:      Then 
1060:        (THEN MACRO:PressGarageButon) 
1061:       Nest End 
1062:     " Check For Fans on " 
1063:      If 
1064:        X10: (D-2  SMP Fan) is ON  
1065:      Then 
1066:        (F:FanOnSMP)  SET 
1067:       Nest End 
1068:      If 
1069:        X10: (E-2  DMP Fan) is ON  
1070:      Then 
1071:        (F:FanOn DMP)  SET 
1072:       Nest End 
1073:     (THEN MACRO:All Units off) 
1074:     (THEN MACRO:Frt porch Lt on) 
1075:     X10:  (J-8  Fm Rm S light) Set Level  80 % 
1076:     " If Fans on turn back On " 
1077:      If 
1078:        (F:FanOnSMP) is SET 
1079:      Then 
1080:        X10:  (D-2  SMP Fan) ON 
1081:        (F:FanOnSMP)  CLEAR 
1082:       Nest End 
1083:      If 
1084:        (F:FanOn DMP) is SET 
1085:      Then 
1086:        X10:  (E-2  DMP Fan) ON 
1087:        (F:FanOn DMP)  CLEAR 
1088:       Nest End 
1089:   End 
1090:     
1091:   EVENT:  Sunset 
1092:   If 
1093:     Sunset SMTWTFS 
1094:   Then 
1095:     (THEN MACRO:Frt porch Lt on) 
1096:     (F:ItsDark)  SET 
1097:     (V:FrtDrMotionCnt)   CLEAR 
1098:     X10:  (E-8  DMP auto Light) ON 
1099:     X10:  (D-8  SMP Auto Light) ON 
1100:     " Dishwasher off if sunset < 9hrs " 
1101:     X10:  (H-9  Dishwasher) OFF 
1102:   End 
1103:     
1104:   EVENT:  Wk End Goodnite 
1105:   If 
1106:     Time is (TL:Wk End Gnite)  
1107:       -OR- 
1108:     Time is (TL:ChkAgainTime)  
1109:   Then 
1110:      If 
1111:        (DI:Garage Dr St) is ON 
1112:      Then 
1113:        (THEN MACRO:PressGarageButon) 
1114:       Nest End 
1115:     " Check For Fans on " 
1116:      If 
1117:        X10: (D-2  SMP Fan) is ON  
1118:      Then 
1119:        (F:FanOnSMP)  SET 
1120:       Nest End 
1121:      If 
1122:        X10: (E-2  DMP Fan) is ON  
1123:      Then 
1124:        (F:FanOn DMP)  SET 
1125:       Nest End 
1126:     (THEN MACRO:All Units off) 
1127:     (THEN MACRO:Frt porch Lt on) 
1128:     X10:  (J-8  Fm Rm S light) Set Level  80 % 
1129:     " If Fans on turn back On " 
1130:      If 
1131:        (F:FanOnSMP) is SET 
1132:      Then 
1133:        X10:  (D-2  SMP Fan) ON 
1134:        (F:FanOnSMP)  CLEAR 
1135:       Nest End 
1136:      If 
1137:        (F:FanOn DMP) is SET 
1138:      Then 
1139:        X10:  (E-2  DMP Fan) ON 
1140:        (F:FanOn DMP)  CLEAR 
1141:       Nest End 
1142:   End 
1143:     
1144:   EVENT:  Vacation/Away Routine Init 
1145:   If 
1146:     XSEQ:( A-9 A-ON ) Received within 3 seconds  
1147:       -OR- 
1148:     IR Seq:'x10 Stop ' Received within 1 seconds  
1149:   Then 
1150:     (F:AwayRtn)  SET 
1151:     Voice:AWAY MODE ACTIVATD  [Spkr,CO,ICM] 
1152:   End 
1153:     
1154:   EVENT:  Vacation/Away Routine Stop 
1155:   If 
1156:     XSEQ:( A-9 A-OFF ) Received within 3 seconds  
1157:       -OR- 
1158:     IR Seq:'x10 Stop x10 Stop ' Received within 3 seconds  
1159:   Then 
1160:     (F:AwayRtn)  CLEAR 
1161:     Voice:AWAY MODE DE_ACTIV  [Spkr,CO,ICM] 
1162:   End 
1163:     
1164:   EVENT:  Vacation/Away Routine Run  
1165:   If 
1166:     (F:AwayRtn) is SET 
1167:   Then 
1168:      If 
1169:        Time is 8:00 PM SMTWTFS   -Security Mode-  
1170:      Then 
1171:        X10:  (J-2  Hallway) ON 
1172:        X10:  (B-1  Mst Bed Patty) ON 
1173:       Nest End 
1174:      If 
1175:        Time is 8:30 PM SMTWTFS   -Security Mode-  
1176:      Then 
1177:        X10:  (B-1  Mst Bed Patty) OFF 
1178:        X10:  (J-6  Kitchen sink) ON 
1179:        X10:  (J-9  Fm Back Patio) ON 
1180:       Nest End 
1181:      If 
1182:        Time is 8:45 PM SMTWTFS   -Security Mode-  
1183:      Then 
1184:        X10:  (J-9  Fm Back Patio) OFF 
1185:       Nest End 
1186:      If 
1187:        Time is 9:40 PM SMTWTFS   -Security Mode-  
1188:      Then 
1189:        X10:  (J-6  Kitchen sink) OFF 
1190:        X10:  (D-1  SMP Rm Light) ON 
1191:        X10:  (E-3  DMP Bedside Lt) ON 
1192:       Nest End 
1193:      If 
1194:        Time is 10:00 PM SMTWTFS   -Security Mode-  
1195:      Then 
1196:        X10:  (J-2  Hallway) OFF 
1197:       Nest End 
1198:      If 
1199:        Time is 10:15 PM SMTWTFS   -Security Mode-  
1200:      Then 
1201:        X10:  (D-1  SMP Rm Light) OFF 
1202:       Nest End 
1203:   End 
1204:     
1205:   EVENT:  ASCII Special X10 TouchScn 
1206:   If 
1207:       ASCII-In: Match 'Z10' starting at character number 1 [COM1] 
1208:   Then 
1209:      If 
1210:          ASCII-In: Match '@@' starting at character number 4 [COM1] 
1211:      Then 
1212:         If 
1213:             ASCII-In: Match '1' starting at character number 7 [COM1] 
1214:         Then 
1215:           (THEN MACRO:All Lite unit on) 
1216:          Nest End 
1217:         If 
1218:             ASCII-In: Match '0' starting at character number 7 [COM1] 
1219:         Then 
1220:           (THEN MACRO:All Units off) 
1221:          Nest End 
1222:       Nest End 
1223:      If 
1224:          ASCII-In: Match 'B@' starting at character number 4 [COM1] 
1225:      Then 
1226:         If 
1227:             ASCII-In: Match '1' starting at character number 7 [COM1] 
1228:         Then 
1229:           X10:  (A-4  Btn 4 Mst Bed) ON 
1230:           X10:  (B-1  Mst Bed Patty) ON 
1231:           X10:  (B-2  Mst Bed Greg) ON 
1232:          Nest End 
1233:         If 
1234:             ASCII-In: Match '0' starting at character number 7 [COM1] 
1235:         Then 
1236:           X10:  (A-4  Btn 4 Mst Bed) OFF 
1237:           X10:  (B-1  Mst Bed Patty) OFF 
1238:           X10:  (B-2  Mst Bed Greg) OFF 
1239:          Nest End 
1240:       Nest End 
1241:      If 
1242:          ASCII-In: Match 'CH' starting at character number 4 [COM1] 
1243:      Then 
1244:         If 
1245:             ASCII-In: Match '1' starting at character number 7 [COM1] 
1246:         Then 
1247:           X10:  (J-14  Lv Rm S Light) ON 
1248:           X10:  (J-15  Lv Rm N Light) ON 
1249:           X10:  (J-16  Lv Rm panio) ON 
1250:           ASCII-Out:'CH on' [COM1] 
1251:          Nest End 
1252:         If 
1253:             ASCII-In: Match '0' starting at character number 7 [COM1] 
1254:         Then 
1255:           X10:  (J-14  Lv Rm S Light) OFF 
1256:           X10:  (J-15  Lv Rm N Light) OFF 
1257:           X10:  (J-16  Lv Rm panio) OFF 
1258:           ASCII-Out:'CH off' [COM1] 
1259:          Nest End 
1260:       Nest End 
1261:      If 
1262:          ASCII-In: Match 'CI' starting at character number 4 [COM1] 
1263:      Then 
1264:         If 
1265:             ASCII-In: Match '1' starting at character number 7 [COM1] 
1266:         Then 
1267:           X10:  (J-14  Lv Rm S Light) ON 
1268:           X10:  (J-15  Lv Rm N Light) ON 
1269:           X10:  (J-16  Lv Rm panio) ON 
1270:           X10:  (J-14  Lv Rm S Light) Set Level  50 % 
1271:           X10:  (J-15  Lv Rm N Light) Set Level  50 % 
1272:           X10:  (J-16  Lv Rm panio) Set Level  50 % 
1273:           ASCII-Out:'CI on' [COM1] 
1274:          Nest End 
1275:         If 
1276:             ASCII-In: Match '0' starting at character number 7 [COM1] 
1277:         Then 
1278:           X10:  (J-14  Lv Rm S Light) OFF 
1279:           X10:  (J-15  Lv Rm N Light) OFF 
1280:           X10:  (J-16  Lv Rm panio) OFF 
1281:           ASCII-Out:'CI off' [COM1] 
1282:          Nest End 
1283:       Nest End 
1284:   End 
1285:     
1286:   EVENT:  ASCII Special Relay TouchScn 
1287:   If 
1288:       ASCII-In: Match 'ZRY' starting at character number 1 [COM1] 
1289:   Then 
1290:      If 
1291:          ASCII-In: Match '01-0' starting at character number 4 [COM1] 
1292:        " *** open garage Door only " 
1293:      Then 
1294:         If 
1295:           (DI:Garage Dr St) is OFF 
1296:         Then 
1297:           (THEN MACRO:PressGarageButon) 
1298:           Voice:OPEN GARAGE DOOR  [Spkr] 
1299:          Nest End 
1300:       Nest End 
1301:      If 
1302:          ASCII-In: Match '01-1' starting at character number 4 [COM1] 
1303:        " *** close garage Door only " 
1304:      Then 
1305:         If 
1306:           (DI:Garage Dr St) is ON 
1307:         Then 
1308:           (THEN MACRO:PressGarageButon) 
1309:           Voice:CLOSE GARAGE DOOR  [Spkr] 
1310:          Nest End 
1311:       Nest End 
1312:   End 
1313:     
1314:   EVENT:  ASCII Infared code type 
1315:   If 
1316:       ASCII-In: Match 'IRX' starting at character number 1 [COM1] 
1317:   Then 
1318:      If 
1319:          ASCII-In: Match 'TEST' starting at character number 4 [COM1] 
1320:      Then 
1321:        (IR:x10 Power ) play 1 time(s) [Emitter1] 
1322:       Nest End 
1323:   End 
1324:     
1325:   EVENT:   Test on Comm2 
1326:   If 
1327:       ASCII-In:'X10C2-1' [COM2] 
1328:   Then 
1329:     X10:  (J-2  Hallway) ON 
1330:     ASCII-Out:'Comm2DoneOn' [COM2] 
1331:   End 
1332:     
1333:   EVENT:  test off Comm2 
1334:   If 
1335:       ASCII-In:'X10C2-0' [COM2] 
1336:   Then 
1337:     X10:  (J-2  Hallway) OFF 
1338:     ASCII-Out:'Comm2DoneOff' [COM2] 
1339:   End 
1340:     
1341:   EVENT:  test on Comm3 
1342:   If 
1343:       ASCII-In:'X10C2-1' [COM3] 
1344:   Then 
1345:     X10:  (J-2  Hallway) ON 
1346:     ASCII-Out:'Comm3DoneOn' [COM3] 
1347:   End 
1348:     
1349:   EVENT:  test off Comm3 
1350:   If 
1351:       ASCII-In:'X10C2-0' [COM3] 
1352:   Then 
1353:     X10:  (J-2  Hallway) OFF 
1354:     ASCII-Out:'Comm3DoneOff' [COM3] 
1355:   End 
1356:     
1357:   EVENT:  Test Prob1 
1358:   If 
1359:     (DI:FmRmBigTV) Goes ON 
1360:   Then 
1361:     Voice:TELEVISI ON  [Spkr] 
1362:   End 
1363:     
1364:   EVENT:  Test Prob 1 off 
1365:   If 
1366:     (DI:FmRmBigTV) Goes OFF 
1367:   Then 
1368:     Voice:TELEVISI OFF  [Spkr] 
1369:   End 
1370:     
1371:   EVENT:  Test  Prob2 on 
1372:   If 
1373:     (DI:FmRmVCR) Goes ON 
1374:   Then 
1375:     Voice:VCR ON  [Spkr] 
1376:   End 
1377:     
1378:   EVENT:  Test Prob 2 off 
1379:   If 
1380:     (DI:FmRmVCR) Goes OFF 
1381:   Then 
1382:     Voice:VCR OFF  [Spkr] 
1383:   End 
1384:     
1385:   EVENT:  Test Prob 3 on 
1386:   If 
1387:     (DI:FmRmAmp) Goes ON 
1388:   Then 
1389:     Voice:AMP ON  [Spkr] 
1390:   End 
1391:     
1392:   EVENT:  Test Prob 3 off 
1393:   If 
1394:     (DI:FmRmAmp) Goes OFF 
1395:   Then 
1396:     Voice:AMP OFF  [Spkr] 
1397:   End 
1398:     
1399:   SCHEDULE END