as of 7/5/96
Home Automation Contrroller Program
To best understand this program first review the Ennulat Home Autmation System Description.
This program is a working program. Some of the items programmed however have not been tested due to not having all of the hardware in place. These portions of the program are noted within the program itself. TBA means To Be Added. TBC means To Be Completed.
The Device Database Definitions are fairly complete for our house. All of the defined devices are not programmed, again because these devices do not at this time physically exist or are not being used. The device definitions do give a map for how we layed out the devices for our house.
The X10 devices are divided into X10 controller transmitters/transceivers (pushbutton stations) and receiver devices (lamp and appliance modules, etc).
I know that many readers will be concerned about my revealing to much and thereby putting my property at risk. Rest assured precautions have been taken.
Schedule Name: 1321D.SCH 1: SCHEDULE START 2: 3: EVENT: ****** TABLE OF CONTENTS ******* 4: If 5: " Event - System Overview " 6: " Initialize Event ~L 132 " 7: " Scan Counter Diagnostic " 8: " Open Van EE Dampers ~L 170 " 9: " Clear Daily Counters " 10: " Turn On Daily Shower Fan " 11: " VanEE O'RidDamperControl ~L 235 " 12: " HVAC Support ~L 318 " 13: " Karin's Air Volume Booster " 14: " Switch to Vacation T'Stat TBC " 15: " Sprinkler System Supervisor TBC " 16: " House Check In/Out FROZEN " 17: " Scene Controls ~L 553 " 18: " Main Level Lights " 19: " Bedroom Level Lights TBA " 20: " Individual Light Controls&~L 589 " 21: " IndividualApplianControls&~L1119 " 22: " GoodNight Sequence ~L1212 " 23: " Asleep Mode " 24: " Nap/QuietMode wAutoReset " 25: " X10 Security Sys Support ~L1318 " 26: " Outdoor Auto Lighting " 27: " Monitor Security Sys " 28: " Flash Lights " 29: " X10 Arm/Disarm Sec.Sys " 30: " Outdoor Motion &Chime " 31: " OutdrGarBackServDoorFl " 32: " Christmas Lights " 33: " House Empty Detection ~L1453 " 34: " Auto Arm If House Empty " 35: " Auto House Empty Lighting " 36: " Garage Entry TBA " 37: " Open/Close " 38: " Monitor Door Status " 39: " Monitor Garage Lights w LED TBA " 40: " EndOfProgram ~L1554 " 41: " EndOfProgram ~L1625 " 42: Then 43: " TBA = To Be Added = TBA " 44: " TBC = To Be Completed = TBC " 45: " ~L = Approximately Line = ~L " 46: " & = AdditionalContentsAt = & " 47: End 48: 49: EVENT: Event - System Overview 50: If 51: " -------------------------------- " 52: " This system controls the House " 53: " of Harold & Kari Ennulat at " 54: " 1321 Schooner Ct Woodbury, MN. " 55: " -------------------------------- " 56: " The system controls all X-10 " 57: " lights, appliances, the stereo, " 58: " the living room TV, etc. " 59: " The controler this program runs " 60: " in also has 16 inputs & 8 out- " 61: " puts that are hardwired. These " 62: " control the air-air exchanger " 63: " (including bathroom venting), " 64: " and monitor & dis/arm the sec- " 65: " curity system. " 66: " Future Additions include: " 67: " Automatic Garage Door Support, " 68: " SprinklerOdd/EvenDaySupervisio " 69: " HVACSupport(AwayTStat,Boosters " 70: " Hot Water Heater Support " 71: " Space does not allow a complete " 72: " description of the system, so " 73: " reference documents are " 74: " noted for complete system info. " 75: " -------------------------------- " 76: " REFerences: " 77: " JDS TimeCommander Instruction " 78: " Manual. (Contains personal " 79: " notes adding info learned dur- " 80: " system development). " 81: " Black&White Composition Notebk " 82: " "After Move In" dated 3/2x/95 " 83: " Has complete I/O (& database) " 84: " description. Also some " 85: " concept programming ideas. " 86: " Home Owners and Guests " 87: " Operating Manual. (TBA) " 88: " This will describe all the " 89: " home automation functions of " 90: " the house and how to operate " 91: " each function. " 92: Then 93: " REVISION HISTORY: " 94: " 96/07/04 Added UnderCab LightPrg " 95: " 96/06/05 Fixng Laund LED TurnOff " 96: " & AllowngRemoteComputer Off " 97: " 96/03/16,17Addg Laundry InwallPB " 98: " & House CheckIn@LaundryIWPB " 99: " & Scene controls " 100: " &addedInWallPBDim2BothLamps " 101: " 96/03/01 Added LR TR PB functns " 102: " &changed Computer HseCode " 103: " & AddgInWallPB Dim Function " 104: " 96/01/31 CleanedOutOldC HseCodes " 105: " except C2 Computer. " 106: " 96/01/28-31 AddedFirstInWallPB " 107: " inKitchButMadeAllLvgRmDevices " 108: " 96/01/24 ConvertingCCodes2Final " 109: " 96/01/03 DimOutDrLightsIfInBed " 110: " 95/10/25 AutoHouseEmptyLighting. " 111: " 95/10/23 Karin'sHVACAirVolBoostr " 112: " 95/10/23 HE/KELamps OnDim=30%On " 113: " 95/10/02 Lamps On Bright=Full On " 114: " 95/09/24 Auto Arming EventsAdded " 115: " 95/09/10 WorkLightOff;GarRearFld " 116: " 95/08/31 - 95/09/20 Sprinkler " 117: " Odd/Even Day Supervision Added " 118: " 95/07/16 SecSys Alarming Detectn " 119: " & overview doc. added. " 120: " 95/04-06 Installed and running " 121: " selected X10 items, VanEE " 122: " & security sys support runing. " 123: End 124: 125: EVENT: Initialize System 126: If 127: First pass through schedule 128: Then 129: (X:MBR BathRadio J-14) OFF 130: End 131: 132: EVENT: Scan Counter 133: If - Always 134: (F:ScanCounterStart) is SET 135: Then 136: (V:ScanCounter) INCREMENT 137: " With about 900 lines in the " 138: " program including comments, " 139: " the program scans 3.5 times a " 140: " second with nothing executing. " 141: " The progrm scans approximately " 142: " 1x/second with the FlashLights " 143: " task running. " 144: End 145: 146: EVENT: Scan Counter Stop 147: If 148: (F:ScanCounterStart) is SET 149: Then 150: DELAY 0:00:10 151: (F:ScanCounterStart) CLEAR 152: " Automatically clearing this flag " 153: " is needed because once the " 154: " the ScanCounter increments " 155: " it effectively locks out any " 156: " any keyboard activity in the " 157: " MegaController due to constant " 158: " log window updates of the cntr " 159: End 160: 161: EVENT: Open Van EE Dampers 162: If 163: (DI:VanEEORideOn) is OFF 164: " VanEE NoLongerIn20MinO'RideMode " 165: " " 166: " The next 3 lines can be deleted " 167: " after inputs are wired " 168: and (F:BathVentCycleOn) is CLEAR 169: and (F:KitchVentCycleOn) is CLEAR 170: and (F:LaundVentCycleOn) is CLEAR 171: Then 172: " Open Dampers " 173: (Relay:BathDamprCls) OFF 174: (Relay:KitchDampCls) OFF 175: (Relay:MainLDampCls) OFF 176: If 177: (X:MBR AuxShowerFan J-13) is ON 178: and (V:FanCycleCounter) >= 2 179: Then 180: (X:MBR AuxShowerFan J-13) OFF 181: End 182: End 183: 184: EVENT: Clear Daily Counters 185: If 186: Time is 1:00 AM SMTWTFS 187: Then 188: (V:FanCycleCounter) CLEAR 189: " Used with "Turn On Shower Fan" " 190: " Event. " 191: End 192: 193: EVENT: Turn On Shower Fan 1st 2x inMorn 194: If 195: (DI:BathVentsPBs) is ON 196: * Frozen * or (F:BathVentCycleOn) is SET 197: -AND- 198: (V:FanCycleCounter) 2 199: Then 200: (X:MBR AuxShowerFan J-13) ON 201: DELAY 0:30:00 202: (X:MBR AuxShowerFan J-13) OFF 203: (V:FanCycleCounter) INCREMENT 204: End 205: 206: EVENT: Run Shower Fan IfVanEEOn&PBAgain 207: If 208: (DI:BathVentsPBs) is ON 209: and (F:BathVentCycleOn) is SET 210: and (X:MBR AuxShowerFan J-13) is OFF 211: Then 212: (X:MBR AuxShowerFan J-13) ON 213: DELAY 0:30:00 214: (X:MBR AuxShowerFan J-13) OFF 215: End 216: 217: EVENT: Turn Off Shower Fan "Manully" 218: If 219: (DI:BathVentsPBs) is ON 220: and (F:BathVentCycleOn) is SET 221: and (X:MBR AuxShowerFan J-13) is ON 222: Then 223: (X:MBR AuxShowerFan J-13) OFF 224: " -------------------------------- " 225: End 226: 227: EVENT: VanEE OverRide/BathDamperControl 228: If 229: (DI:BathVentsPBs) is ON 230: or (F:BathVentCycleOn) is SET 231: " The use of Flags may not be " 232: " necessary. Need to test w/o. " 233: Then 234: (F:BathVentCycleOn) SET 235: " InterruptAnyOtherZoneO'RideCycle " 236: (F:KitchVentCycleOn) CLEAR 237: (F:LaundVentCycleOn) CLEAR 238: (Relay:BathVentsPLs) ON 239: (Relay:KitchVentPL) OFF 240: (Relay:MainLvlVenPL) OFF 241: (Relay:O'RideVanEE) ON 242: (Relay:BathDamprCls) OFF 243: (Relay:KitchDampCls) ON 244: (Relay:MainLDampCls) ON 245: DELAY 0:00:03 246: " VanEEO'RideToggleIsPresetTo20min " 247: (Relay:O'RideVanEE) OFF 248: If 249: (DI:VanEEORideOn) is OFF 250: Then 251: (Relay:BathVentsPLs) OFF 252: (F:BathVentCycleOn) CLEAR 253: End 254: End 255: 256: EVENT: VanEEOverRide/KitchDamperControl 257: If 258: (DI:KitchVentPB) is ON 259: or (F:KitchVentCycleOn) is SET 260: Then 261: " InterruptAnyOtherZoneO'RideCycle " 262: (F:BathVentCycleOn) CLEAR 263: (F:KitchVentCycleOn) SET 264: (F:LaundVentCycleOn) CLEAR 265: (Relay:BathVentsPLs) OFF 266: (Relay:KitchVentPL) ON 267: (Relay:MainLvlVenPL) OFF 268: (Relay:O'RideVanEE) ON 269: (Relay:BathDamprCls) ON 270: (Relay:KitchDampCls) OFF 271: (Relay:MainLDampCls) ON 272: DELAY 0:00:03 273: " VanEEO'RideToggleIsPresetTo20min " 274: (Relay:O'RideVanEE) OFF 275: If 276: (DI:VanEEORideOn) is OFF 277: Then 278: (Relay:KitchVentPL) OFF 279: (F:KitchVentCycleOn) CLEAR 280: End 281: End 282: 283: EVENT: VanEEOverRide/LaundDamperControl 284: If 285: (DI:MainLvlVenPB) is ON 286: or (F:LaundVentCycleOn) is SET 287: Then 288: " InterruptAnyOtherZoneO'RideCycle " 289: (F:BathVentCycleOn) CLEAR 290: (F:KitchVentCycleOn) CLEAR 291: (F:LaundVentCycleOn) SET 292: (Relay:BathVentsPLs) OFF 293: (Relay:KitchVentPL) OFF 294: (Relay:MainLvlVenPL) ON 295: (Relay:O'RideVanEE) ON 296: (Relay:BathDamprCls) ON 297: (Relay:KitchDampCls) ON 298: (Relay:MainLDampCls) OFF 299: DELAY 0:00:03 300: " VanEEO'RideToggleIsPresetTo20min " 301: (Relay:O'RideVanEE) OFF 302: If 303: (DI:VanEEORideOn) is OFF 304: Then 305: (Relay:MainLvlVenPL) OFF 306: (F:LaundVentCycleOn) CLEAR 307: End 308: " -------------------------------- " 309: End 310: 311: EVENT: Karin'sBedroomAirVolumeBooster 312: If 313: Time is After 7:00 AM SMTWTFS 314: and Time is Before 12:00 PM SMTWTFS 315: -OR- 316: Time is After 4:00 PM SMTWTFS 317: and Time is Before 7:30 PM SMTWTFS 318: -OR- 319: (A/D:KarinRm Temp) >= 74 320: and (DI:FurnaceCallg) is ON 321: " Temp.SensorNotCurrentlyHookedUp " 322: " FurnaceCallNotCurrentlyHookedUp " 323: Then 324: (X:BR1 AirVolBoostr I-12) OFF 325: " Turn off air volume booster when " 326: " it is not Karin's sleeping or " 327: " napping times, or when the " 328: " room temperature is >= 74 DegF " 329: Else 330: (X:BR1 AirVolBoostr I-12) ON 331: End 332: 333: EVENT: Switch To SetBack T'Stat 334: If 335: (F:M-Vacation) is SET 336: Then 337: " Turn On Relay Output to Turn Off " 338: " Heat Control From Main T'Stat, " 339: " And allow the Backup T'Stat to " 340: " control the heat/Temp (~55Deg) " 341: " Need Add'l Outputs for JDS TBA " 342: Else 343: " Turn Off Relay to Restore Main " 344: " thermostat heat controls. " 345: End 346: 347: EVENT: Auto Vacation Mode Detection 348: If 349: (V:AHseEmpty8HrCntr) >= 3 350: and (DI:SecSysArmed) is ON 351: Then 352: (F:M-Vacation) SET 353: Else 354: (F:M-Vacation) CLEAR 355: End 356: 357: EVENT: Switch to Setback Thermostat 358: If 359: (F:M-Vacation) is SET 360: Then 361: " Switch to Setback Thermostat " 362: " This should be an output from th " 363: " TC wired to a 3-4 pole relay. " 364: " Currently there are no more out- " 365: " puts, so will temporarily need " 366: " to move an existing output to " 367: " X10 control until I can afford " 368: " the JDS I/O expansion box. " 369: Else 370: " Switch back to Main Thermostat " 371: End 372: 373: EVENT: Sprinkler System Supvervisor 374: If 375: (F:NoWaterDay) is SET 376: " Supplement the control of the " 377: " sprinkler controller by: " 378: " 1-Make sure sprinkler does not " 379: " sprinkle on even days. " 380: Then 381: " Add future device here to " 382: " Inhibit the sprinkler controler " 383: " (by opening the rain sensor " 384: " circuit). " 385: End 386: 387: EVENT: Sprinkler System No Water Days 388: If 389: Date is May 2 390: or Date is May 4 391: or Date is May 6 392: or Date is May 8 393: or Date is May 10 394: or Date is May 12 395: or Date is May 14 396: or Date is May 16 397: or Date is May 18 398: or Date is May 20 399: or Date is May 22 400: or Date is May 24 401: or Date is May 26 402: or Date is May 28 403: or Date is May 30 404: or Date is June 2 405: or Date is June 4 406: or Date is June 6 407: or Date is June 8 408: or Date is June 10 409: or Date is June 12 410: or Date is June 14 411: or Date is June 16 412: or Date is June 18 413: or Date is June 20 414: or Date is June 22 415: or Date is June 24 416: or Date is June 26 417: or Date is June 28 418: or Date is June 30 419: or Date is July 2 420: or Date is July 4 421: or Date is July 6 422: or Date is July 8 423: or Date is July 10 424: or Date is July 12 425: or Date is July 14 426: or Date is July 16 427: or Date is July 18 428: or Date is July 20 429: or Date is July 22 430: or Date is July 24 431: or Date is July 26 432: or Date is July 28 433: or Date is July 30 434: or Date is Aug 2 435: or Date is Aug 4 436: or Date is Aug 6 437: or Date is Aug 8 438: or Date is Aug 10 439: or Date is Aug 12 440: or Date is Aug 14 441: or Date is Aug 16 442: or Date is Aug 18 443: or Date is Aug 20 444: or Date is Aug 22 445: or Date is Aug 24 446: or Date is Aug 26 447: or Date is Aug 28 448: or Date is Aug 30 449: or Date is Sept 2 450: or Date is Sept 4 451: or Date is Sept 6 452: or Date is Sept 8 453: or Date is Sept 10 454: or Date is Sept 12 455: or Date is Sept 14 456: or Date is Sept 16 457: or Date is Sept 18 458: or Date is Sept 20 459: or Date is Sept 22 460: or Date is Sept 24 461: or Date is Sept 26 462: or Date is Sept 28 463: or Date is Sept 30 464: or Date is Oct 2 465: Then 466: " Set the "NoWaterDay" Flag " 467: " to keep the Sprinkler Controlr " 468: " from sprinkling on an Even " 469: " day (per Woodbury Code). " 470: (F:NoWaterDay) SET 471: Else 472: (F:NoWaterDay) CLEAR 473: End 474: 475: * Frozen *EVENT: * HOUSE CHECK IN & OUT CONTROL * 476: * Frozen * If 477: * Frozen * Then 478: * Frozen * End 479: 480: * Frozen *EVENT: Someone Checked In To House 481: * Frozen * If 482: * Frozen * (X:InWallPBLaundSw1 F-13) is ON 483: * Frozen * or (X:InWallPBLaundSw2 F-14) is ON 484: * Frozen * or (X:InWallPBLaundSw3 F-15) is ON 485: * Frozen * or (X:InWallPBLaundSw4 F-16) is ON 486: * Frozen * Then 487: " TurnOn Lights 4 any 1 CheckingIn " 488: * Frozen * If 489: * Frozen * After Sunset SMTWTFS 490: * Frozen * or Before Sunrise SMTWTFS 491: * Frozen * Then 492: * Frozen * (F:S-MainLvlLightng) SET 493: * Frozen * End 494: * Frozen * (F:M-Awake&InHouse) SET 495: " Set CheckInID Flag & IDLE 2 keep " 496: " event from running afterSunset " 497: * Frozen * If 498: * Frozen * (X:InWallPBLaundSw1 F-13) is ON 499: * Frozen * Then 500: * Frozen * (F:M-Guest(s)@Home) SET 501: * Frozen * (X:InWallPBLaundSw1 F-13) IDLE 502: * Frozen * End 503: * Frozen * If 504: * Frozen * (X:InWallPBLaundSw2 F-14) is ON 505: * Frozen * Then 506: * Frozen * (F:M-Harold@Home) SET 507: " Flag clearing not working yet " 508: * Frozen * (X:InWallPBLaundSw2 F-14) IDLE 509: * Frozen * End 510: * Frozen * If 511: * Frozen * (X:InWallPBLaundSw3 F-15) is ON 512: * Frozen * Then 513: * Frozen * (F:M-Kari@Home) SET 514: * Frozen * (X:InWallPBLaundSw3 F-15) IDLE 515: * Frozen * End 516: * Frozen * If 517: * Frozen * (X:InWallPBLaundSw4 F-16) is ON 518: * Frozen * Then 519: * Frozen * (F:M-Karin @Home) SET 520: * Frozen * (X:InWallPBLaundSw4 F-16) IDLE 521: * Frozen * End 522: * Frozen * End 523: 524: * Frozen *EVENT: Everyone Checked Out Of House 525: * Frozen * If 526: * Frozen * (X:InWallPBLaundSw1 F-13) is OFF 527: * Frozen * and (X:InWallPBLaundSw2 F-14) is OFF 528: * Frozen * and (X:InWallPBLaundSw3 F-15) is OFF 529: * Frozen * and (X:InWallPBLaundSw4 F-16) is OFF 530: * Frozen * Then 531: * Frozen * (F:S-MainLvlLightng) CLEAR 532: * Frozen * If 533: " This IF statement doesn't work " 534: " if the main IFs are ANDed. " 535: * Frozen * or (X:InWallPBLaundSw2 F-14) is OFF 536: * Frozen * Then 537: * Frozen * (F:M-Harold@Home) CLEAR 538: " Currently this flag is not bein " 539: " used, and may not be needed, so " 540: " I'm putting off moving it into " 541: " it's own event for now. " 542: * Frozen * End 543: * Frozen * (F:M-HouseEmpty) SET 544: * Frozen * (F:M-Awake&InHouse) CLEAR 545: * Frozen * End 546: 547: EVENT: ********* SCENE CONTROL ******** 548: If 549: " ******************************** " 550: Then 551: End 552: 553: EVENT: Main Level Lighting ON 554: If 555: (X:InWallPBLaundSw1 F-13) is ON 556: Then 557: (F:S-MainLvlLightng) SET 558: " Turns on LvgRm Floor&CrystlLamps " 559: (X:InWallPBLaundSw1 F-13) IDLE 560: End 561: 562: EVENT: Main Level Lighting OFF 563: If 564: (X:InWallPBLaundSw1 F-13) is OFF 565: Then 566: If 567: (X:Crystal Lamp L-3) is ON 568: Then 569: (X:InWallPBLvgRmSw1 D-13) OFF 570: " Runs Lamp Off Event " 571: " AlsoClears S-MainLvlLighting Flg " 572: End 573: If 574: (X:Floor Lamp L-4) is ON 575: Then 576: (X:InWallPBLvgRmSw2 D-14) OFF 577: " Runs Lamp Off Event " 578: " AlsoClears S-MainLvlLighting Flg " 579: End 580: (X:InWallPBLaundSw1 F-13) IDLE 581: End 582: 583: EVENT: Clear InWall LED 584: If 585: (F:S-MainLvlLightng) is CLEAR 586: and (X:Crystal Lamp L-3) is OFF 587: and (X:Floor Lamp L-4) is OFF 588: Then 589: (X:InWallPBLaundSw1 F-13) OFF 590: DELAY 0:00:02 591: (X:InWallPBLaundSw1 F-13) IDLE 592: " -------------------------------- " 593: End 594: 595: EVENT: ** INDIVIDUAL LIGHT CONTROLS ** 596: If 597: " ******* CONTENTS ******* " 598: " Kari's Lamp Line _____ " 599: " Harold's Lamp Line _____ " 600: " Floor Lamp Line _____ " 601: " Crystal Lamp Line _____ " 602: " Bankers Lamp Line _____ " 603: " Kitchen Under Cabinet L " 604: Then 605: End 606: 607: EVENT: Kari's Lamp Initial On 608: If 609: (X:MBRKariLampPB E-7) is ON 610: or (XSEQ: D-7 D-8 D-7 ) Received within 3 seconds 611: " D 1-8 are the TelephoneRespondr " 612: or (XSEQ: F-14 F-ON ) Received within 3 seconds 613: " F-13-16 = Laundry/Gar EntryIWPB " 614: or (X:RFKari'sLampPB B-7) is ON 615: -AND- 616: (X:MBR Kari's Lamp J-10) is OFF 617: or (X:MBR Kari's Lamp J-10) is IDLE 618: Then 619: (X:RFKari'sLampPB B-7) IDLE 620: (X:MBRKariLampPB E-7) IDLE 621: " Idle PB early or Lamp Brightens " 622: " due to Brighten Event. " 623: (X:MBR Kari's Lamp J-10) Set Level 50 % 624: End 625: 626: EVENT: Kari's Lamp OnBright = Full On 627: If 628: (XSEQ: E-7 E-BRI ) Received within 3 seconds 629: or (XSEQ: B-7 B-ON B-BRI ) Received within 4 seconds 630: -AND- 631: (X:MBR Kari's Lamp J-10) is OFF 632: Then 633: (X:RFKari'sLampPB B-7) IDLE 634: (X:MBRKariLampPB E-7) IDLE 635: (X:MBR Kari's Lamp J-10) ON 636: End 637: 638: EVENT: Kari's Lamp On Dim = 30% On 639: If 640: (XSEQ: E-7 E-DIM ) Received within 3 seconds 641: or (XSEQ: B-7 B-ON B-DIM ) Received within 4 seconds 642: -AND- 643: (X:MBR Kari's Lamp J-10) is OFF 644: Then 645: (X:RFKari'sLampPB B-7) IDLE 646: (X:MBRKariLampPB E-7) IDLE 647: (X:MBR Kari's Lamp J-10) Set Level 30 % 648: End 649: 650: EVENT: Kari's Lamp Brighten 651: If 652: (X:MBRKariLampPB E-7) is ON 653: or (XSEQ: E-7 E-BRI ) Received within 3 seconds 654: or (X:RFKari'sLampPB B-7) is ON 655: or (XSEQ: B-7 B-ON B-BRI ) Received within 4 seconds 656: -AND- 657: (X:MBR Kari's Lamp J-10) is ON 658: Then 659: (X:MBR Kari's Lamp J-10) BRI 3 Steps 660: (X:RFKari'sLampPB B-7) IDLE 661: (X:MBRKariLampPB E-7) IDLE 662: End 663: 664: EVENT: Kari's Lamp Dimming 665: If 666: (XSEQ: E-7 E-DIM ) Received within 3 seconds 667: or (XSEQ: B-7 B-OFF B-DIM ) Received within 4 seconds 668: -AND- 669: (X:MBR Kari's Lamp J-10) is ON 670: Then 671: (X:MBR Kari's Lamp J-10) DIM 3 Steps 672: (X:RFKari'sLampPB B-7) IDLE 673: (X:MBRKariLampPB E-7) IDLE 674: End 675: 676: EVENT: Kari's Lamp Off 677: If 678: (X:MBRKariLampPB E-7) is OFF 679: or (XSEQ: B-7 B-OFF B-7 B-OFF ) Received within 4 seconds 680: Then 681: If 682: (X:MBR Kari's Lamp J-10) is ON 683: Then 684: (X:MBR Kari's Lamp J-10) Set Level 0 % 685: End 686: (X:MBR Kari's Lamp J-10) OFF 687: (X:MBRKariLampPB E-7) IDLE 688: (X:RFKari'sLampPB B-7) IDLE 689: End 690: 691: EVENT: Harold's Lamp Initial On 692: If 693: (X:MBRHaroldLampPB E-8) is ON 694: or (XSEQ: D-7 D-8 D-7 ) Received within 3 seconds 695: " D 1-8 are the TelephoneRespondr " 696: or (X:RFHarold'sLampPB B-8) is ON 697: -AND- 698: (X:MBR Harold'sLamp J-11) is OFF 699: or (X:MBR Harold'sLamp J-11) is IDLE 700: Then 701: (X:RFHarold'sLampPB B-8) IDLE 702: (X:MBRHaroldLampPB E-8) IDLE 703: " Idle PB early or Lamp Brightens " 704: " due to Brighten Event. " 705: (X:MBR Harold'sLamp J-11) Set Level 50 % 706: End 707: 708: EVENT: Harold's Lamp OnBright = Full On 709: If 710: (XSEQ: E-8 E-BRI ) Received within 3 seconds 711: or (XSEQ: B-8 B-ON B-BRI ) Received within 4 seconds 712: -AND- 713: (X:MBR Harold'sLamp J-11) is OFF 714: Then 715: (X:RFHarold'sLampPB B-8) IDLE 716: (X:MBRHaroldLampPB E-8) IDLE 717: (X:MBR Harold'sLamp J-11) ON 718: End 719: 720: EVENT: Harold's Lamp On Dim = 30% On 721: If 722: (XSEQ: E-8 E-DIM ) Received within 3 seconds 723: or (XSEQ: B-8 B-ON B-DIM ) Received within 4 seconds 724: -AND- 725: (X:MBR Harold'sLamp J-11) is OFF 726: Then 727: (X:RFHarold'sLampPB B-8) IDLE 728: (X:MBRHaroldLampPB E-8) IDLE 729: (X:MBR Harold'sLamp J-11) Set Level 30 % 730: End 731: 732: EVENT: Harold's Lamp Brighten 733: If 734: (X:MBRHaroldLampPB E-8) is ON 735: or (XSEQ: E-8 E-BRI ) Received within 3 seconds 736: or (X:RFHarold'sLampPB B-8) is ON 737: or (XSEQ: B-8 B-ON B-BRI ) Received within 4 seconds 738: -AND- 739: (X:MBR Harold'sLamp J-11) is ON 740: Then 741: (X:MBR Harold'sLamp J-11) BRI 3 Steps 742: (X:RFHarold'sLampPB B-8) IDLE 743: (X:MBRHaroldLampPB E-8) IDLE 744: End 745: 746: EVENT: Harold's Lamp Dimming 747: If 748: (XSEQ: E-8 E-DIM ) Received within 3 seconds 749: or (XSEQ: B-8 B-OFF B-DIM ) Received within 4 seconds 750: -AND- 751: (X:MBR Harold'sLamp J-11) is ON 752: Then 753: (X:MBR Harold'sLamp J-11) DIM 3 Steps 754: (X:RFHarold'sLampPB B-8) IDLE 755: (X:MBRHaroldLampPB E-8) IDLE 756: End 757: 758: EVENT: Harold's Lamp Off 759: If 760: (X:MBRHaroldLampPB E-8) is OFF 761: or (XSEQ: B-8 B-OFF B-8 B-OFF ) Received within 4 seconds 762: Then 763: If 764: (X:MBR Harold'sLamp J-11) is ON 765: Then 766: (X:MBR Harold'sLamp J-11) Set Level 0 % 767: End 768: (X:MBR Harold'sLamp J-11) OFF 769: (X:MBRHaroldLampPB E-8) IDLE 770: (X:RFHarold'sLampPB B-8) IDLE 771: End 772: 773: EVENT: Living Room FloorLamp LevelSel. 774: If 775: (XSEQ: D-14 D-ON ) Received within 3 seconds 776: " D-13-16 = Lvg Rm InWall Controlr " 777: or (XSEQ: D-2 D-ON ) Received within 3 seconds 778: " D-2 = TelephoneResponder InLvgRm " 779: or (XSEQ: E-11 E-ON ) Received within 3 seconds 780: " E-11 = MasterBedRoom Controller " 781: -AND- 782: (X:Floor Lamp L-4) is ON 783: Then 784: If 785: (X:InWallPBLvgRmSw2 D-14) is ON 786: or (X:TRPB2FloorLamp D-2) is ON 787: or (X:MBRLvFloorLampPB E-11) is ON 788: " Double check as D-14 LED some- " 789: " increments counter even though " 790: " IDLEd. " 791: Then 792: (V:LRIW D-14 ON) INCREMENT 793: End 794: If 795: (V:LRIW D-14 ON) > 4 796: Then 797: (V:LRIW D-14 ON) LOAD with 1 798: End 799: End 800: 801: EVENT: Floor Lamp Cycle 3-4 ON Levels 802: If 803: (X:InWallPBLvgRmSw2 D-14) is ON 804: or (X:TRPB2FloorLamp D-2) is ON 805: or (F:S-MainLvlLightng) is SET 806: or (X:MBRLvFloorLampPB E-11) is ON 807: Then 808: If 809: (V:LRIW D-14 ON) = 1 810: Then 811: (X:Floor Lamp L-4) Set Level 100% 812: End 813: If 814: (V:LRIW D-14 ON) = 2 815: Then 816: (X:Floor Lamp L-4) Set Level 60 % 817: End 818: If 819: (V:LRIW D-14 ON) = 3 820: Then 821: (X:Floor Lamp L-4) Set Level 30 % 822: End 823: If 824: (V:LRIW D-14 ON) = 4 825: Then 826: (X:Floor Lamp L-4) Set Level 50 % 827: End 828: If 829: (X:Floor Lamp L-4) is ON 830: Then 831: (X:InWallPBLvgRmSw2 D-14) ON 832: (X:InWallPBLvgRmSw2 D-14) IDLE 833: " Turn On InWall LED " 834: " and IDLE to keep from incrementg " 835: " again. " 836: End 837: (X:InWallPBLvgRmSw2 D-14) IDLE 838: End 839: 840: EVENT: LivingRoom Floor Lamp Initial On 841: If 842: (X:RFLivFloorLampPB B-11) is ON 843: -AND- 844: (X:Floor Lamp L-4) is OFF 845: or (X:Floor Lamp L-4) is IDLE 846: Then 847: (X:InWallPBLvgRmSw2 D-14) ON 848: " Turn On InWall LED " 849: (X:InWallPBLvgRmSw2 D-14) IDLE 850: (X:RFLivFloorLampPB B-11) IDLE 851: " Idle PB early or Lamp Brightens " 852: " due to Brighten Event. " 853: (X:Floor Lamp L-4) Set Level 50 % 854: End 855: 856: EVENT: Floor Lamp Brighten 857: If 858: (XSEQ: E-11 E-BRI ) Received within 3 seconds 859: * Frozen * or (X:RFLivFloorLampPB B-11) is ON 860: or (XSEQ: B-11 B-ON B-BRI ) Received within 4 seconds 861: -AND- 862: (X:Floor Lamp L-4) is ON 863: Then 864: (X:Floor Lamp L-4) BRI 3 Steps 865: (X:MBRLvFloorLampPB E-11) IDLE 866: (X:RFLivFloorLampPB B-11) IDLE 867: End 868: 869: EVENT: Floor Lamp Dimming 870: If 871: (XSEQ: E-11 E-DIM ) Received within 3 seconds 872: * Frozen * or (X:MBRLvFloorLampPB E-11) is OFF 873: or (XSEQ: B-11 B-ON B-DIM ) Received within 4 seconds 874: * Frozen * or (X:RFLivFloorLampPB B-11) is OFF 875: -AND- 876: (X:Floor Lamp L-4) is ON 877: Then 878: (X:Floor Lamp L-4) DIM 3 Steps 879: (X:MBRLvFloorLampPB E-11) IDLE 880: (X:RFLivFloorLampPB B-11) IDLE 881: End 882: 883: EVENT: Floor Lamp Off 884: If 885: (X:InWallPBLvgRmSw2 D-14) is OFF 886: or (X:TRPB2FloorLamp D-2) is OFF 887: or (X:MBRLvFloorLampPB E-11) is OFF 888: or (X:RFLivCrystLampPB B-12) is OFF 889: Then 890: If 891: (X:Floor Lamp L-4) is ON 892: Then 893: (X:Floor Lamp L-4) Set Level 0 % 894: (F:S-MainLvlLightng) CLEAR 895: " Allows light 2B turned on again " 896: End 897: (X:Floor Lamp L-4) OFF 898: If 899: (X:InWallPBLvgRmSw2 D-14) is IDLE 900: or (X:InWallPBLvgRmSw2 D-14) is ON 901: Then 902: " TurnOff InWall LED IfNotInWallPB " 903: (X:InWallPBLvgRmSw2 D-14) OFF 904: End 905: (X:InWallPBLvgRmSw2 D-14) IDLE 906: (X:TRPB2FloorLamp D-2) IDLE 907: (X:MBRLvFloorLampPB E-11) IDLE 908: (X:RFLivFloorLampPB B-11) IDLE 909: End 910: 911: EVENT: LivingRoom CrystalLampLevelSel. 912: If 913: (XSEQ: D-13 D-ON ) Received within 3 seconds 914: " D-13-16 = Lvg Rm InWall Controlr " 915: or (XSEQ: D-1 D-ON ) Received within 3 seconds 916: " D-1 = TelephoneResponder InLvgRm " 917: or (XSEQ: E-12 E-ON ) Received within 3 seconds 918: " E-12 = MasterBedRoom Controller " 919: -AND- 920: (X:Crystal Lamp L-3) is ON 921: Then 922: If 923: (X:InWallPBLvgRmSw1 D-13) is ON 924: or (X:TRPB1CrystalLamp D-1) is ON 925: or (X:MBRLvCrystLampPB E-12) is ON 926: " Double check as D-13 LED some- " 927: " increments counter even though " 928: " IDLEd. " 929: Then 930: (V:LRIW D-13 ON) INCREMENT 931: End 932: If 933: (V:LRIW D-13 ON) > 4 934: Then 935: (V:LRIW D-13 ON) LOAD with 1 936: End 937: End 938: 939: EVENT: Crystal Lamp Cycle 3-4 ON Levels 940: If 941: (X:InWallPBLvgRmSw1 D-13) is ON 942: or (X:TRPB1CrystalLamp D-1) is ON 943: or (F:S-MainLvlLightng) is SET 944: or (X:MBRLvCrystLampPB E-12) is ON 945: Then 946: If 947: (V:LRIW D-13 ON) = 1 948: Then 949: (X:Crystal Lamp L-3) Set Level 100% 950: End 951: If 952: (V:LRIW D-13 ON) = 2 953: Then 954: (X:Crystal Lamp L-3) Set Level 60 % 955: End 956: If 957: (V:LRIW D-13 ON) = 3 958: Then 959: (X:Crystal Lamp L-3) Set Level 30 % 960: End 961: If 962: (V:LRIW D-13 ON) = 4 963: Then 964: (X:Crystal Lamp L-3) Set Level 50 % 965: End 966: If 967: (X:Crystal Lamp L-3) is ON 968: Then 969: (X:InWallPBLvgRmSw1 D-13) ON 970: (X:InWallPBLvgRmSw1 D-13) IDLE 971: " Turn On InWall LED " 972: " and IDLE to keep from incrementg " 973: " again. " 974: End 975: (X:InWallPBLvgRmSw1 D-13) IDLE 976: End 977: 978: EVENT: LivingRm Crystal Lamp Initial On 979: If 980: (X:RFLivCrystLampPB B-12) is ON 981: -AND- 982: (X:Crystal Lamp L-3) is OFF 983: or (X:Crystal Lamp L-3) is IDLE 984: Then 985: (X:InWallPBLvgRmSw1 D-13) ON 986: " Turn On InWall LED " 987: (X:InWallPBLvgRmSw1 D-13) IDLE 988: (X:RFLivCrystLampPB B-12) IDLE 989: " Idle PB early or Lamp Brightens " 990: " due to Brighten Event. " 991: (X:Crystal Lamp L-3) Set Level 50 % 992: End 993: 994: EVENT: Crystal Lamp Brighten 995: If 996: * Frozen * (X:MBRLvCrystLampPB E-12) is ON 997: or (XSEQ: E-12 E-BRI ) Received within 3 seconds 998: * Frozen * or (X:RFLivCrystLampPB B-12) is ON 999: or (XSEQ: B-12 B-ON B-BRI ) Received within 4 seconds 1000: -AND- 1001: (X:Crystal Lamp L-3) is ON 1002: Then 1003: (X:Crystal Lamp L-3) BRI 3 Steps 1004: (X:RFLivCrystLampPB B-12) IDLE 1005: (X:MBRLvCrystLampPB E-12) IDLE 1006: End 1007: 1008: EVENT: Crystal Lamp Dimming 1009: If 1010: (XSEQ: E-12 E-DIM ) Received within 3 seconds 1011: * Frozen * or (X:MBRLvCrystLampPB E-12) is OFF 1012: or (XSEQ: B-12 B-ON B-DIM ) Received within 4 seconds 1013: * Frozen * or (X:RFLivCrystLampPB B-12) is OFF 1014: -AND- 1015: (X:Crystal Lamp L-3) is ON 1016: Then 1017: (X:Crystal Lamp L-3) DIM 3 Steps 1018: (X:MBRLvCrystLampPB E-12) IDLE 1019: (X:RFLivCrystLampPB B-12) IDLE 1020: End 1021: 1022: EVENT: Crystal Lamp Off 1023: If 1024: (X:InWallPBLvgRmSw1 D-13) is OFF 1025: or (X:TRPB1CrystalLamp D-1) is OFF 1026: or (X:MBRLvCrystLampPB E-12) is OFF 1027: * Frozen * or (XSEQ: B-12 B-OFF B-12 B-OFF ) Received within 4 seconds 1028: or (X:RFLivCrystLampPB B-12) is OFF 1029: Then 1030: If 1031: (X:Crystal Lamp L-3) is ON 1032: Then 1033: (X:Crystal Lamp L-3) Set Level 0 % 1034: (F:S-MainLvlLightng) CLEAR 1035: " Allows light 2B turned on again " 1036: End 1037: (X:Crystal Lamp L-3) OFF 1038: If 1039: (X:InWallPBLvgRmSw1 D-13) is ON 1040: or (X:InWallPBLvgRmSw1 D-13) is IDLE 1041: Then 1042: " TurnOff InWall LED IfNotInWallPB " 1043: (X:InWallPBLvgRmSw1 D-13) OFF 1044: End 1045: (X:InWallPBLvgRmSw1 D-13) IDLE 1046: (X:TRPB1CrystalLamp D-1) IDLE 1047: (X:MBRLvCrystLampPB E-12) IDLE 1048: (X:RFLivCrystLampPB B-12) IDLE 1049: End 1050: 1051: EVENT: Guest/DenBRBankersLampInitial On 1052: If 1053: (X:GuestBankLamp PB E-13) is ON 1054: or (XSEQ: D-7 D-8 D-7 ) Received within 3 seconds 1055: " D 1-8 are the TelephoneRespondr " 1056: or (X:RFGestBankLampPB B-13) is ON 1057: -AND- 1058: (X:BR2 BankersLamp I-4) is OFF 1059: or (X:BR2 BankersLamp I-4) is IDLE 1060: Then 1061: (X:RFGestBankLampPB B-13) IDLE 1062: (X:GuestBankLamp PB E-13) IDLE 1063: " Idle PB early or Lamp Brightens " 1064: " due to Brighten Event. " 1065: (X:BR2 BankersLamp I-4) Set Level 50 % 1066: (X:Bankers Lamp C5 C-5) Set Level 50 % 1067: End 1068: 1069: EVENT: Bankers Lamp Brighten 1070: If 1071: (X:GuestBankLamp PB E-13) is ON 1072: or (XSEQ: E-13 E-BRI ) Received within 3 seconds 1073: or (X:RFGestBankLampPB B-13) is ON 1074: or (XSEQ: B-13 B-ON B-BRI ) Received within 4 seconds 1075: -AND- 1076: (X:BR2 BankersLamp I-4) is ON 1077: Then 1078: (X:BR2 BankersLamp I-4) BRI 3 Steps 1079: (X:Bankers Lamp C5 C-5) BRI 3 Steps 1080: (X:RFGestBankLampPB B-13) IDLE 1081: (X:GuestBankLamp PB E-13) IDLE 1082: End 1083: 1084: EVENT: Bankers Lamp Dimming 1085: If 1086: (XSEQ: E-13 E-DIM ) Received within 3 seconds 1087: * Frozen * or (X:GuestBankLamp PB E-13) is OFF 1088: or (XSEQ: B-13 B-OFF B-DIM ) Received within 4 seconds 1089: * Frozen * or (X:RFGestBankLampPB B-13) is OFF 1090: -AND- 1091: (X:BR2 BankersLamp I-4) is ON 1092: Then 1093: (X:BR2 BankersLamp I-4) DIM 3 Steps 1094: (X:Bankers Lamp C5 C-5) DIM 3 Steps 1095: (X:RFGestBankLampPB B-13) IDLE 1096: (X:GuestBankLamp PB E-13) IDLE 1097: End 1098: 1099: EVENT: Bankers Lamp Off 1100: If 1101: (X:GuestBankLamp PB E-13) is OFF 1102: or (XSEQ: B-13 B-OFF B-13 B-OFF ) Received within 4 seconds 1103: * Frozen * or (X:RFGestBankLampPB B-13) is OFF 1104: Then 1105: If 1106: (X:BR2 BankersLamp I-4) is ON 1107: Then 1108: (X:BR2 BankersLamp I-4) Set Level 0 % 1109: End 1110: (X:BR2 BankersLamp I-4) OFF 1111: If 1112: (X:Bankers Lamp C5 C-5) is ON 1113: Then 1114: (X:Bankers Lamp C5 C-5) Set Level 0 % 1115: End 1116: (X:Bankers Lamp C5 C-5) OFF 1117: (X:GuestBankLamp PB E-13) IDLE 1118: (X:RFGestBankLampPB B-13) IDLE 1119: End 1120: 1121: EVENT: Kitch Under Cabinet Lighting On 1122: If 1123: (X:InWallPBKitchSw1 D-9) is ON 1124: Then 1125: (X:KitUnderCabLight K-1) ON 1126: (X:InWallPBKitchSw1 D-9) IDLE 1127: End 1128: 1129: EVENT: Kitch Under Cabinet Lighting Off 1130: If 1131: (X:InWallPBKitchSw1 D-9) is OFF 1132: Then 1133: (X:KitUnderCabLight K-1) OFF 1134: (X:InWallPBKitchSw1 D-9) IDLE 1135: " -------------------------------- " 1136: End 1137: 1138: EVENT: Individual "Appliance" Controls 1139: If 1140: " ******************************** " 1141: " ******** CONTENTS *********** " 1142: " Computer Line _____ " 1143: " Stereo Line _____ " 1144: " Television Line _____ " 1145: " BathAuxFan Line _____ " 1146: " Bath/MBR Radios Line _____ " 1147: " Garage Power Strip __TBA " 1148: " BasemtShop PowerStrip__TBA " 1149: Then 1150: End 1151: 1152: EVENT: Computer On 1153: If 1154: (X:Computer C2 C-2) is ON 1155: or (X:TRPB6 Computer D-6) is ON 1156: or (X:MBRComputerPB E-2) is ON 1157: or (X:InWallPBLaundSw3 F-15) is ON 1158: or (X:RFComputerPB B-2) is ON 1159: Then 1160: (X:Main PComputer I-2) ON 1161: (X:InWallPBLaundSw3 F-15) ON 1162: (X:Computer C2 C-2) IDLE 1163: (X:TRPB6 Computer D-6) IDLE 1164: (X:MBRComputerPB E-2) IDLE 1165: (X:RFComputerPB B-2) IDLE 1166: (X:InWallPBLaundSw3 F-15) IDLE 1167: End 1168: 1169: EVENT: Computer Off 1170: If 1171: (X:Computer C2 C-2) is OFF 1172: or (X:MBRComputerPB E-2) is OFF 1173: Then 1174: (X:Main PComputer I-2) OFF 1175: (X:InWallPBLaundSw3 F-15) OFF 1176: (X:Computer C2 C-2) IDLE 1177: (X:TRPB6 Computer D-6) IDLE 1178: (X:MBRComputerPB E-2) IDLE 1179: (X:RFComputerPB B-2) IDLE 1180: (X:InWallPBLaundSw3 F-15) IDLE 1181: End 1182: 1183: EVENT: Stereo On 1184: If 1185: (X:InWallPBLvgRmSw3 D-15) is ON 1186: or (X:TRPB3 LRm Stereo D-3) is ON 1187: or (X:RFStereoPB B-9) is ON 1188: or (X:MBRStereoPB E-9) is ON 1189: Then 1190: (X:RFStereoPB B-9) ON 1191: * Frozen * (X:Stereo L-1) ON 1192: If 1193: (X:InWallPBLvgRmSw3 D-15) is IDLE 1194: Then 1195: (X:InWallPBLvgRmSw3 D-15) ON 1196: End 1197: (X:TRPB3 LRm Stereo D-3) IDLE 1198: (X:RFStereoPB B-9) IDLE 1199: (X:MBRStereoPB E-9) IDLE 1200: End 1201: 1202: EVENT: Stereo Off 1203: If 1204: (X:InWallPBLvgRmSw3 D-15) is OFF 1205: or (X:TRPB3 LRm Stereo D-3) is OFF 1206: or (X:RFStereoPB B-9) is OFF 1207: or (X:MBRStereoPB E-9) is OFF 1208: Then 1209: (X:RFStereoPB B-9) OFF 1210: * Frozen * (X:Stereo L-1) OFF 1211: If 1212: (X:InWallPBLvgRmSw3 D-15) is IDLE 1213: Then 1214: " TurnOff InWall LED IfNotInWallPB " 1215: (X:InWallPBLvgRmSw3 D-15) OFF 1216: End 1217: (X:InWallPBLvgRmSw3 D-15) IDLE 1218: (X:TRPB3 LRm Stereo D-3) IDLE 1219: (X:RFStereoPB B-9) IDLE 1220: (X:MBRStereoPB E-9) IDLE 1221: End 1222: 1223: EVENT: Main Level Television On 1224: If 1225: (X:InWallPBLvgRmSw4 D-16) is ON 1226: or (X:TRPB4 LvgRm TV D-4) is ON 1227: or (X:RFTelvisionPB B-10) is ON 1228: or (X:MBRTelvisionPB E-10) is ON 1229: Then 1230: (X:Television L-2) ON 1231: If 1232: (X:InWallPBLvgRmSw4 D-16) is IDLE 1233: Then 1234: (X:InWallPBLvgRmSw4 D-16) ON 1235: End 1236: (X:InWallPBLvgRmSw4 D-16) IDLE 1237: (X:TRPB4 LvgRm TV D-4) IDLE 1238: (X:RFTelvisionPB B-10) IDLE 1239: (X:MBRTelvisionPB E-10) IDLE 1240: End 1241: 1242: EVENT: Main Level Television Off 1243: If 1244: (X:InWallPBLvgRmSw4 D-16) is OFF 1245: or (X:TRPB4 LvgRm TV D-4) is OFF 1246: or (X:RFTelvisionPB B-10) is OFF 1247: or (X:MBRTelvisionPB E-10) is OFF 1248: Then 1249: (X:Television L-2) OFF 1250: If 1251: (X:InWallPBLvgRmSw4 D-16) is IDLE 1252: Then 1253: " TurnOff InWall LED IfNotInWallPB " 1254: (X:InWallPBLvgRmSw4 D-16) OFF 1255: End 1256: (X:InWallPBLvgRmSw4 D-16) IDLE 1257: (X:TRPB4 LvgRm TV D-4) IDLE 1258: (X:RFTelvisionPB B-10) IDLE 1259: (X:MBRTelvisionPB E-10) IDLE 1260: End 1261: 1262: EVENT: MBR Bath Radio On 1263: If 1264: (X:MBedRm Radio PB E-14) is ON 1265: Then 1266: (X:MBR BathRadio J-14) ON 1267: (X:MBedRm Radio PB E-14) IDLE 1268: End 1269: 1270: EVENT: MBR Bath & Harolds Radio Off 1271: If 1272: (X:MBedRm Radio PB E-14) is OFF 1273: Then 1274: (X:MBR BathRadio J-14) OFF 1275: (X:MBR HaroldsRadio J-15) OFF 1276: (X:MBedRm Radio PB E-14) IDLE 1277: DELAY 0:00:25 1278: (X:MBR HaroldsRadio J-15) ON 1279: End 1280: 1281: EVENT: MBR Bath Radio Dobson Auto On 1282: If 1283: Time is 8:00 AM .MTWTF. 1284: and (X:MBR Nap/Quiet PB E-3) is OFF 1285: Then 1286: (X:MBR BathRadio J-14) ON 1287: DELAY 0:30:00 1288: (X:MBR BathRadio J-14) OFF 1289: End 1290: 1291: EVENT: Harold's Clock Radio Auto Off 1292: If 1293: Time is 8:30 AM .MTWTF. 1294: " Turn Off Clock Radio afterDobson " 1295: Then 1296: (X:MBR HaroldsRadio J-15) OFF 1297: DELAY 0:00:30 1298: " Radio takes 15 seconds to turn " 1299: " off due to battery backup. " 1300: " Once power is restored after " 1301: " that time, Radio stays off. " 1302: " Therefore restore power to the " 1303: " radio to avoid draining the " 1304: " battery unnecessarily. " 1305: (X:MBR HaroldsRadio J-15) ON 1306: " -------------------------------- " 1307: End 1308: 1309: EVENT: Goodnight Sequence 1310: If 1311: (X:MBR Awake PB E-4) is OFF 1312: or (XSEQ: E-4 E-OFF ) Received within 3 seconds 1313: Then 1314: (X:MBR Awake PB E-4) IDLE 1315: If 1316: (X:MBR Kari's Lamp J-10) is ON 1317: Then 1318: " Let us know the sequence " 1319: " is working. " 1320: (X:MBR Kari's Lamp J-10) DIM 4 Steps 1321: (X:MBR Kari's Lamp J-10) BRI 3 Steps 1322: End 1323: If 1324: (X:MBR Harold'sLamp J-11) is ON 1325: Then 1326: (X:MBR Harold'sLamp J-11) DIM 4 Steps 1327: (X:MBR Harold'sLamp J-11) BRI 3 Steps 1328: End 1329: " Arm the Security System " 1330: " if not already armed, by " 1331: " toggling the Arm/DisArm output " 1332: If 1333: (DI:SecSysArmed) is OFF 1334: Then 1335: (Relay:Dis/ArmSecST) ON 1336: DELAY 0:00:01 1337: (Relay:Dis/ArmSecST) OFF 1338: " Security System Arms/Disarms " 1339: " with this output turning off. " 1340: End 1341: " -- Turn Off All Other Lights -- " 1342: " Turn Off CrystalLamp& InWallLED " 1343: (X:MBRLvCrystLampPB E-12) OFF 1344: " Turn Off Floor Lamp & InWallLED " 1345: (X:MBRLvFloorLampPB E-11) OFF 1346: " Turn Off UnderCabLite&InWallLED " 1347: (X:InWallPBKitchSw1 D-9) OFF 1348: (X:BR2 BankersLamp I-4) OFF 1349: " Turn Off Stereo, TV, Etc " 1350: " Turn Off Stereo & InWall LED " 1351: (X:MBRStereoPB E-9) OFF 1352: " Turn Off TV & InWall LED Light " 1353: (X:MBRTelvisionPB E-10) OFF 1354: (X:GarageWorkOutlet P-16) OFF 1355: " Delay & Turn Off Bedroom Lights " 1356: " if we didn't change our minds. " 1357: DELAY 0:00:30 Re-Triggerable 1358: If 1359: (X:MBR Awake PB E-4) is ON 1360: Then 1361: " Interupt Cycle -Restore BR Lites " 1362: (X:MBR Awake PB E-4) IDLE 1363: If 1364: (X:MBR Kari's Lamp J-10) is ON 1365: Then 1366: " Restore Bedroom Lighting Level " 1367: (X:MBR Kari's Lamp J-10) BRI 2 Steps 1368: End 1369: If 1370: (X:MBR Harold'sLamp J-11) is ON 1371: Then 1372: (X:MBR Harold'sLamp J-11) BRI 2 Steps 1373: End 1374: Else 1375: " Continue with Turning Off Lights " 1376: (X:InWallPBLaundSw1 F-13) OFF 1377: (F:M-Asleep&InBed) SET 1378: If 1379: (X:MBR Kari's Lamp J-10) is ON 1380: Then 1381: (X:MBR Kari's Lamp J-10) Set Level 30 % 1382: End 1383: * Frozen * (X:Kari's Lamp C-7) OFF 1384: (X:MBR Kari's Lamp J-10) OFF 1385: If 1386: (X:MBR Harold'sLamp J-11) is ON 1387: Then 1388: (X:MBR Harold'sLamp J-11) Set Level 30 % 1389: End 1390: * Frozen * (X:Harold's Lamp C-8) OFF 1391: (X:MBR Harold'sLamp J-11) OFF 1392: (X:InWallPBLaundSw1 F-13) IDLE 1393: (X:MBR Awake PB E-4) IDLE 1394: DELAY 0:20:00 Re-Triggerable 1395: " Delay Computer Turn Off to be " 1396: " sure any backups finish. " 1397: (X:Main PComputer I-2) OFF 1398: (X:MBR Awake PB E-4) IDLE 1399: End 1400: End 1401: 1402: EVENT: Asleep Mode Reset 1403: If 1404: (F:M-Asleep&InBed) is SET 1405: and (DI:SecSysArmed) is OFF 1406: Then 1407: (F:M-Asleep&InBed) CLEAR 1408: End 1409: 1410: EVENT: Nap/Quiet Mode with Auto Reset 1411: If 1412: (X:MBR Nap/Quiet PB E-3) is ON 1413: Then 1414: (X:MBR Nap/Quiet PB E-3) IDLE 1415: DELAY 3:00:00 Re-Triggerable 1416: (X:MBR Nap/Quiet PB E-3) OFF 1417: End 1418: 1419: EVENT: Outdoor Lighting Auto On 1420: If 1421: Sunset SMTWTFS -Security Mode- 1422: Then 1423: (X:OSFrontEntryLits O-9) Set Level 90 % 1424: (X:OSKitchDeckLight O-10) Set Level 80 % 1425: End 1426: 1427: EVENT: Outdoor Lighting In Bed Setting 1428: If 1429: (F:M-Asleep&InBed) is SET 1430: Then 1431: (X:OSFrontEntryLits O-9) Set Level 50 % 1432: (X:OSKitchDeckLight O-10) Set Level 70 % 1433: End 1434: 1435: EVENT: Outdoor Lights Dim If Late 1436: If 1437: Time is (TL:Late Night) 1438: Then 1439: (X:OSFrontEntryLits O-9) Set Level 50 % 1440: (X:OSKitchDeckLight O-10) Set Level 70 % 1441: End 1442: 1443: EVENT: Outdoor Lighting Auto Off 1444: If 1445: Sunrise SMTWTFS -Security Mode- 1446: Then 1447: (X:OSKitchDeckLight O-10) OFF 1448: (X:OSFrontEntryLits O-9) OFF 1449: End 1450: 1451: EVENT: Security Sys Alarm X10 Support 1452: If 1453: (DI:SecSysAlarmg) is ON 1454: " If Alarm System Goes Into Alarm " 1455: Then 1456: " Set Lights To Flash & Alert MBR " 1457: (X:MBRChime/Relay J-16) ON 1458: (X:MBR Harold'sLamp J-11) Set Level 50 % 1459: DELAY 0:00:00 1460: (X:MBRChime/Relay J-16) OFF 1461: DELAY 0:00:00 1462: (F:FlashLights) SET 1463: (X:MBRChime/Relay J-16) ON 1464: Else 1465: (F:FlashLights) CLEAR 1466: (X:MBRChime/Relay J-16) OFF 1467: End 1468: 1469: EVENT: Flash Lights 1470: If - Always 1471: (F:FlashLights) is SET 1472: " This event repeats until the " 1473: " FlashLights Flag is CLEARed. " 1474: Then 1475: (X:Crystal Lamp L-3) OFF 1476: (X:Floor Lamp L-4) OFF 1477: (X:BR2 BankersLamp I-4) OFF 1478: (X:OSFrontEntryLits O-9) OFF 1479: (X:OSKitchDeckLight O-10) OFF 1480: DELAY 0:00:02 1481: " Delays are inserted to allow " 1482: " other X-10 commands to get to " 1483: " the TimeCommander Controller. " 1484: " Otherwise this Event consumes " 1485: " the entire X-10 communications " 1486: " channel (bandwidth). " 1487: (X:Crystal Lamp L-3) ON 1488: (X:Floor Lamp L-4) ON 1489: (X:BR2 BankersLamp I-4) ON 1490: (X:OSFrontEntryLits O-9) ON 1491: (X:OSKitchDeckLight O-10) ON 1492: DELAY 0:00:02 1493: End 1494: 1495: EVENT: X10 Arm/DisArm Security System 1496: If 1497: (XSEQ: E-1 E-2 E-3 E-4 ) Received within 4 seconds 1498: " "E" is the MBR PButton Station. " 1499: Then 1500: (Relay:Dis/ArmSecST) ON 1501: DELAY 0:00:01 1502: (Relay:Dis/ArmSecST) OFF 1503: " Security System Arms/Disarms " 1504: " with this output turning off. " 1505: End 1506: 1507: EVENT: OutDoorMotion&ChimeModule 1508: If 1509: (X:OSGarSEMotionSen H-1) is ON 1510: -AND- 1511: (X:MBR Nap/Quiet PB E-3) is OFF 1512: Then 1513: (X:MBRChime/Relay J-16) ON 1514: (X:MBRChime/Relay J-16) OFF 1515: " This makes the Chime Module Beep " 1516: " twice. " 1517: End 1518: 1519: EVENT: AutoSecGarageRearServiceFloodLts 1520: If 1521: (X:OSGarSEMotionSen H-1) is ON 1522: and After Sunset SMTWTFS 1523: -OR- 1524: (X:OSGarSEMotionSen H-1) is ON 1525: and Before Sunrise SMTWTFS 1526: " The Flood Lights turn on after " 1527: " sunset and before sunrise when " 1528: " motion is detected. " 1529: " The flood lights turn off when " 1530: " motion is not detected for the " 1531: " delay on time. " 1532: Then 1533: (X:OSGaragBackFlood O-3) ON 1534: (X:MBR Nap/Quiet PB E-3) OFF 1535: " Turning Off the Nap/Quiet PB " 1536: " will make the chime module " 1537: " sound in the MstrBedroom no " 1538: " matter what. " 1539: DELAY 0:30:00 Re-Triggerable 1540: (X:OSGaragBackFlood O-3) OFF 1541: End 1542: 1543: * Frozen *EVENT: Auto Christmas Lighting 1544: * Frozen * If 1545: * Frozen * Time is After (TL:After Dark) 1546: * Frozen * and Time is Before 11:55 PM SMTWTFS 1547: * Frozen * Then 1548: * Frozen * (X:Christmas Lights C-16) ON 1549: * Frozen * Else 1550: * Frozen * (X:Christmas Lights C-16) OFF 1551: * Frozen * End 1552: 1553: EVENT: Re/Start Auto House Empty Timing 1554: If 1555: (DI:SecSysArmed) Toggles 1556: " ....when security system status " 1557: " changes. " 1558: * Frozen * -OR- 1559: " If motion is detected when the " 1560: " security system is off. " 1561: * Frozen * -OR- 1562: " If any PB's are pressed. " 1563: " (This may be difficult because " 1564: " the JDS can push it's own PB's. " 1565: Then 1566: (F:M-HouseEmpty) CLEAR 1567: (F:M-Awake&InHouse) SET 1568: (V:AHseEmpty8HrCntr) CLEAR 1569: (T:8HourTimer) LOAD with 8:00:00 1570: (T:8HourTimer) START 1571: End 1572: 1573: EVENT: Auto House Empty Timing 1574: If 1575: (T:8HourTimer) is Expiring 1576: Then 1577: (V:AHseEmpty8HrCntr) INCREMENT 1578: (T:8HourTimer) LOAD with 8:00:00 1579: End 1580: 1581: EVENT: Auto House Empty Detection 1582: If 1583: (V:AHseEmpty8HrCntr) >= 3 1584: Then 1585: (F:M-HouseEmpty) SET 1586: End 1587: 1588: EVENT: Stop Auto House Empty Timing If, 1589: If 1590: (V:AHseEmpty8HrCntr) >= 150 1591: " ....50 days have passed. " 1592: Then 1593: (T:8HourTimer) STOP 1594: End 1595: 1596: EVENT: Auto Arm SecuritySysIfHouseEmpty 1597: If 1598: (DI:SecSysArmed) is OFF 1599: and (V:AHseEmpty8HrCntr) >= 3 1600: and (F:M-HouseEmpty) is SET 1601: " If security system has not been " 1602: " armed for 24 Hrs., " 1603: Then 1604: " AutomaticallyArm Security System " 1605: (Relay:Dis/ArmSecST) ON 1606: DELAY 0:00:01 1607: (Relay:Dis/ArmSecST) OFF 1608: " Security System Arms/Disarms " 1609: " with this output turning off. " 1610: DELAY 0:00:30 1611: If 1612: (DI:SecSysArmed) is OFF 1613: " Double check and try arming the " 1614: " security sys.again if necesary " 1615: Then 1616: (Relay:Dis/ArmSecST) ON 1617: DELAY 0:00:01 1618: (Relay:Dis/ArmSecST) OFF 1619: " Security System Arms/Disarms " 1620: " with this output turning off. " 1621: End 1622: End 1623: 1624: EVENT: AutoAwayMode LivingRoomLightsOn 1625: If 1626: (F:M-HouseEmpty) is SET 1627: and Sunset SMTWTFS -Security Mode- 1628: Then 1629: (X:Floor Lamp L-4) ON 1630: (X:Crystal Lamp L-3) Set Level 60 % 1631: End 1632: 1633: EVENT: AutoAwayMode BedroomLightsOn 1634: If 1635: (F:M-HouseEmpty) is SET 1636: and Time is 9:00 PM SMTWTFS -Security Mode- 1637: Then 1638: (X:MBR Kari's Lamp J-10) Set Level 50 % 1639: (X:MBR Harold'sLamp J-11) Set Level 50 % 1640: End 1641: 1642: EVENT: AutoAwayMode GoodNightSequence 1643: If 1644: (F:M-HouseEmpty) is SET 1645: and Time is After 10:00 PM SMTWTFS -Security Mode- 1646: Then 1647: (X:MBR Awake PB E-4) OFF 1648: " Awake PB Off = Goodnight PushBut " 1649: " This runs another event which " 1650: " turns everything off for the " 1651: " night. " 1652: End 1653: 1654: SCHEDULE END
Device DataBase Listing IF MACROS THEN MACROS THEN Macro: Wait 5 Seconds MACRO BEGIN MACRO END X10 DEVICES Name H U Location Description Init Type F R P --------------------------------------------------------------------------------------- TBA Test 1 A 1 Test All A CodesAre Test Use Outputs IDLE LAMP RF PBBase1 B 1 RF Remote IDLE REMT RFComputerPB B 2 RF Remote IDLE REMT RFGoodNightPB B 4 RF Remote IDLE REMT RFKari'sLampPB B 7 RF Remote IDLE REMT RFHarold'sLampPB B 8 RF Remote IDLE REMT RFStereoPB B 9 RF Remote IDLE REMT RFTelvisionPB B 10 RF Remote IDLE REMT RFLivFloorLampPB B 11 RF Remote IDLE REMT RFLivCrystLampPB B 12 RF Remote IDLE REMT RFGestBankLampPB B 13 RF Remote Guest/Den BedRoom Bankers Lamp IDLE REMT CP290 PB1 C 1 Guest/Ofc C1-8=Computer IFace Controller IDLE REMT Computer C2 C 2 Guest Bedroom Computer On House Code C2 IDLE APPL CP290 Switch 3 C 3 Guest Bedroom Computer Interface IDLE REMT RFRemote Sw1 C 4 Remote RF Remote Switch Controllers IDLE REMT Bankers Lamp C5 C 5 Guest Bedroom Bankers Lamp and Unit Code C5 IDLE LAMP SmallBlueFan C 6 MasterBedRoom Small Blue Port. Fan on HCode C IDLE APPL Kari's Lamp C 7 MasterBedRoom Kari's Bedroom Lamp on HCode C IDLE LAMP P Harold's Lamp C 8 MasterBedRoom Harold's Bedroom Lamp on HCode C IDLE LAMP P Stereo C9 C 9 Living Room Stereo On House Code C - backup IDLE APPL TV C10 C 10 Living Room TV On House Code C - backup IDLE APPL Floor Lamp C 11 Living Room Living Room Floor Lamp IDLE LAMP P Crystal Lamp C 12 Living Room Living Room Crystal Table Lamp IDLE LAMP P Kitch Deck Lamp C 13 Kitchen Deck IDLE LAMP P Christmas Lights C 16 Living Room Christmas Lights IDLE LAMP P TRPB1CrystalLamp D 1 Living Room TelephoneResponder LR CrystLamp IDLE LAMP TRPB2FloorLamp D 2 Living Room TelephoneResponder LR Floor Lamp IDLE LAMP TRPB3 LRm Stereo D 3 Living Room TelephoneResponder LR Stereo IDLE APPL TRPB4 LvgRm TV D 4 Living Room TelephoneResponder LR Television IDLE APPL PhoneIFacePB#5 D 5 TelePhResponder D1-9 Reserved for TelephoneIFace IDLE LAMP TRPB6 Computer D 6 Living Room TeleponeResponder Computer IDLE APPL PhoneIFacePB#7 D 7 Living Room D7,8 TurnOnMBRLamps in a SEQ IDLE LAMP PhoneIFacePB#8 D 8 Living Room D7,8 TurnOnMBRLamps in a SEQ IDLE REMT InWallPBKitchSw1 D 9 Kitchen Area Under Cabinet Lighting PB IDLE REMT InWallPBKitchSw2 D 10 Kitchen Area Living Room Lighting PB IDLE REMT InWallPBKitchSw3 D 11 Kitchen Area Stereo On/Off PB IDLE REMT InWallPBKitchSw4 D 12 Kitchen Area Television On/Off PB IDLE REMT InWallPBLvgRmSw1 D 13 Living Room LvgRm.InWallPBSw1-CrystalLamp IDLE REMT InWallPBLvgRmSw2 D 14 Living Room LvgRm.InWallPBSw2-Floor Lamp IDLE REMT InWallPBLvgRmSw3 D 15 Living Room LvgRm.InWallPBSw3-Stereo IDLE REMT InWallPBLvgRmSw4 D 16 Living Room LvgRm.InWallPBSw4-Television IDLE REMT MBRComputerPB E 2 Master Bedroom IDLE REMT MBR Nap/Quiet PB E 3 Master Bedroom MBR Nap/Quiet Pushbutton IDLE REMT MBR Awake PB E 4 Master Bedroom MBR Awake/Good Night when off IDLE REMT MBRKariLampPB E 7 Master Bedroom IDLE REMT MBRHaroldLampPB E 8 Master Bedroom IDLE REMT MBRStereoPB E 9 Master Bedroom IDLE REMT MBRTelvisionPB E 10 Master Bedroom IDLE REMT MBRLvFloorLampPB E 11 Master Bedroom IDLE REMT MBRLvCrystLampPB E 12 Master Bedroom MasBedRmButton2ControlLivRmLamp IDLE REMT GuestBankLamp PB E 13 Master Bedroom MasBedRmButton2ControlGuestBRLam IDLE REMT MBedRm Radio PB E 14 Master Bedroom Controls Bath & Harold's Radio IDLE REMT InWallPBMBdRmSw1 F 1 Master Bedroom Master Bedroom Lights IDLE REMT InWallPBSta#3Sw2 F 2 Master Bedroom F1-4 MBR InWallPB Controller IDLE REMT InWallPBSta#3Sw3 F 3 Master Bedroom F1-4 MBR InWallPB Controller IDLE REMT InWallPBMBdRmSw4 F 4 Master Bedroom F1-4 MBR InWallPB Controller IDLE REMT InWallPBFBdRmSw1 F 5 Karin's Bedroom F5-8 Karin'sInWallPB Controller IDLE LAMP InWallPBSBdRmSw1 F 9 Guest/OfcBderoom F9-12Guest/Ofc InWallPB Contrlr IDLE LAMP InWallPBLaundSw1 F 13 Laundry/GarEntry Kitch Level Lighting PB IDLE REMT InWallPBLaundSw2 F 14 Laundry/GarEntry Bedroom Level Lighting PB IDLE REMT InWallPBLaundSw3 F 15 Laundry/GarEntry Computer On PB IDLE REMT InWallPBLaundSw4 F 16 Laundry/GarEntry Kari Log In(On) / Out(Off) IDLE REMT TBAGarage1 G 1 Garage All G CodesAreGarage AreaOutputs IDLE LAMP OSGarSEMotionSen H 1 OSGarSEServiceDr OutSideGarageSoEastServDrMSensor IDLE REMT OSGarSEDuskSensr H 5 OSGarSEServiceDr OutSideGarageSoEastServDrDuskSen IDLE REMT OSGarSESensrHail H 16 OSGarSEServiceDr NeedToVerifyIfAddressCanBeReused IDLE REMT BR2 OH Light I 1 Guest/OffBedRoom Guest/OfficeBedroomOverHeadLight IDLE LAMP P Main PComputer I 2 Guest/OffBedRoom Main IBM Personal Computer IDLE APPL BR2 ClosetLight I 3 Guest/OffBedRoom Guest/OfficeBedroomClosetLight IDLE APPL P BR2 BankersLamp I 4 Guest/OffBedRoom Guest/OfficeBedroomBankersLamp IDLE LAMP P BR2 Touch Lamp I 5 Guest/OffBedRoom Guest/Office Bedroom Touch Lamp IDLE LAMP P BR2AuxOutletWire I 6 Guest/OffBedRoom 3rd(Aux)OutletWireRan2CBPanel IDLE APPL P BR1 OH Light I 9 Karin's Bed Room Karin's Bedroom Over Head Light IDLE LAMP P BR1 ClosetLight I 10 Karin's Bed Room Karin's Bedroom Closet Light IDLE APPL P BR1AuxOutletWire I 11 Karin's Bed Room 3rd(Aux)OutletWireRan2CBPanel IDLE APPL P BR1 AirVolBoostr I 12 Karin's Bed Room Karin'sHVACDuctAirVolumeBooster IDLE APPL P Hall Lights J 1 BedRoomLevelHall Upstairs Bedroom Level Hall Ligh IDLE LAMP P MBR OH FanLight J 2 Master BedRoom Master Bedroom OverHead FanLight IDLE LAMP P MBR OH Fan J 3 Master BedRoom Master Bedroom OverHead Fan IDLE APPL P MBR Sw Outlets J 4 Master BedRoom Master Bedroom Switched Outlets IDLE APPL P MBR OutletsAuxWr J 5 Master BedRoom Master Bedroom Outlets AuxilWire IDLE APPL P MBR Lav Lights J 6 Master BedRoom Master Bedroom Lavratory Lights IDLE LAMP P MBR Tub Light J 7 Master BedRoom Master Bedroom Whirlpool Light IDLE LAMP P MBR Shower Light J 8 Master BedRoom Master Bedroom Shower/Toi Light IDLE LAMP P MBR WIClos Light J 9 Master BedRoom Master Bedroom WkInCloset Light IDLE LAMP P MBR Kari's Lamp J 10 Master BedRoom Master Bedroom Kari's Lamp IDLE LAMP P MBR Harold'sLamp J 11 Master BedRoom Master Bedroom Harold's Lamp IDLE LAMP P MBR Bath Radio J 12 Master BedRoom Master Bedroom Bath Radio IDLE APPL P MBR AuxShowerFan J 13 Master BedRoom Master Bedroom Aux Shower Fan IDLE APPL P MBR BathRadio J 14 MasterBedRmVanit Master Bedroom Bath Radio IDLE APPL P MBR HaroldsRadio J 15 Master BedRoom Harold's Clock Radio (bat.Backup IDLE APPL P MBRChime/Relay J 16 MasterBedroom Universal Module for Sec Support IDLE APPL KitUnderCabLight K 1 Kitchen Kitchen Under Cabinet Lighting IDLE LAMP TBAKitch16 K 16 Kitchen All K CodesAreKitchenAreaOutputs IDLE APPL Stereo L 1 Living Room Stereo Setup IDLE APPL Television L 2 Living Room Television IDLE APPL Crystal Lamp L 3 Living Room Crystal Lamp IDLE LAMP P Floor Lamp L 4 Living Room Floor Lamp IDLE LAMP P TBABasement1 M 1 Basement All M CodesAreBasemntAreaOutputs IDLE LAMP TBAFamilyRmLvl1 N 1 FamilyRoomLevel All N CodesAre FamRm AreaOutputs IDLE LAMP OSLivingRmFlood O 1 OverLivingRmWind Quartz Flood OverLivingRm Window IDLE LAMP P OSGaragFrntFlood O 2 FrontOfGarage Outside Garage Driveway Flood Lt IDLE LAMP P OSGaragBackFlood O 3 GarageRearCorner Dual Flood 4 Gar Side&Back Light IDLE LAMP P OSFamilyRmFlood O 4 OSOverFamRmWindw OutsideDualFloodOverFamilyRoom IDLE LAMP P OSKitchFloodLite O 5 Kitchen Deck OutSideKitchenLevelDeckFloodLite IDLE LAMP P OSBasmntFloodLit O 6 BasementPatio OutSideBasementLvlPatioFloodLite IDLE LAMP P FrontRemotLights O 7 Front Yard TBA Front Yard Remoted Light(s) OFF LAMP P RearRemoteLights O 8 Back Yard TBA Back Yard Light(s) IDLE LAMP P OSFrontEntryLits O 9 FrontEntry&Garag OutSide 5Entry&GarageDoorLights IDLE LAMP P OSKitchDeckLight O 10 Kitchen Deck OutSide Kitchen Level Deck Light IDLE LAMP P OSBsmtPatioLight O 11 Basement Patio OutSide Basement Patio Light IDLE LAMP P OSFrontHseOutlts O 12 RtFrontOfHouse 2OSFrontHouseOutletsAroundLvgRm IDLE APPL P OSFrontGarOutlet O 13 Front Of Garage OutSide Front Of Garage Outlet IDLE APPL P OSKitchDeckOutlt O 14 Kitchen Deck OutSide Kitchen DeckLevel Outlet IDLE APPL P OSBsmtnBackOutlt O 15 OSBasementRear OutSide Basment Rear Outlet(s) IDLE APPL P 16Controller Sw1 P 1 Master Bedroom Original 16 Switch Controller IDLE REMT GarageWorkOutlet P 16 Garage@RearWindo 4 Way Outlet Box By Work Bench IDLE APPL P TIMERS Name Description ----------------------------------------------- Timer1 8HourTimer 8 Hour DelayTime For Auto Arming Time Labels ----------------------------------------------- Name: Delay Description: Delay Time Label Time = 1:00 PM Name: Late Night Description: Late Night with no one expected Time = 12:30 AM Name: After Dark Description: 30 minutes after Sunset Time Based on: Sunset plus(+) 0:30 Flag Devices Name Description Inital Value ----------------------------------------------------------- BathVentCycleOn Bath Vent 20 minute Cycle On CLEAR KitchVentCycleOn Kitchen Vent 20 minute Cycle On CLEAR LaundVentCycleOn Laundry, Vent 20 minute Cycle On CLEAR FlashLights TriggeredBySecuritySystem CLEAR ScanCounterStart ScanCounterStartFlagForTiming CLEAR M-Asleep&InBed Mode-ForIntelligentHomeAutomatn CLEAR M-Awake&InHouse Mode-ForIntelligentHomeAutomatn CLEAR M-Ennulat'sAway Mode-ForIntelligentHomeAutomatn CLEAR M-HouseEmpty Mode-ForIntelligentHomeAutomatn CLEAR M-Awake&AroundHs Mode-ForIntellHA-AroundTheHouse CLEAR M-Vacation Mode-ForIntellHA-AroundTheHouse CLEAR M-Future2 Mode-ForIntellHA-AroundTheHouse CLEAR NoWaterDay No Water Days Flag CLEAR Off Flag Off Flag CLEAR M-Harold@Home Mode-ForIntelligentHomeAutomatn CLEAR M-Kari@Home Mode-ForIntelligentHomeAutomatn CLEAR M-Karin @Home Mode-ForIntelligentHomeAutomatn CLEAR M-Guest(s)@Home Mode-ForIntelligentHomeAutomatn CLEAR S-MainLvlLightng Scene-ForIntelligentHomeAutomatn CLEAR S-BdRmLvlLightng Scene-ForIntelligentHomeAutomatn CLEAR HWLightFlasher CLEAR Variables Name Description Inital Value ----------------------------------------------------------- FanCycleCounter DailyCount4ShowerVentgOnly2x/day 0 ScanCounter ScanCounterForCheckingPerformanc 0 AHseEmpty8HrCntr 8HourCounterForHouseEmptyDetect. 0 LRIW D-13 ON InWallPB On Counter 0 LRIW D-14 ON InWallPB On Counter 0 TCM+ ----------------------------------------------------------- Digitial In-1: BathVentsPBs Digitial In- 9: Input 9 Relay-17: BathVentsPLs Digitial In-2: KitchVentPB Digitial In-10: Input 10 Relay-18: KitchVentPL Digitial In-3: MainLvlVenPB Digitial In-11: Input 11 Relay-19: MainLvlVenPL Digitial In-4: VanEEORideOn Digitial In-12: Input 12 Relay-20: BathDamprCls Digitial In-5: FurnaceCallg Digitial In-13: Input 13 Relay-21: KitchDampCls Digitial In-6: SecSysArmed Digitial In-14: Input 14 Relay-22: MainLDampCls Digitial In-7: SecSysAlarmg Digitial In-15: Input 15 Relay-23: O'RideVanEE Digitial In-8: A/C Calling Digitial In-16: Dig Input 16 Relay-24: Dis/ArmSecST A/D-1: MBedRm Temp Gain = 1 Offset = 0 A/D-2: KarinRm Temp Gain = 1 Offset = 0 A/D-3: KitchLvlTemp Gain = 1 Offset = 0 A/D-4: FamRmLvlTemp Gain = 1 Offset = 0 A/D-5: BasementTemp Gain = 1 Offset = 0 A/D-6: Outside Temp Gain = 1 Offset = 0 A/D-7: AnalogInput7 Gain = 1 Offset = 0 A/D-8: Analog Input Gain = 1 Offset = 0 IO-Xpander-1 ----------------------------------------------------------- Digitial In-1: Digitial In- 9: Relay-17: Digitial In-2: Digitial In-10: Relay-18: Digitial In-3: Digitial In-11: Relay-19: Digitial In-4: Digitial In-12: Relay-20: Digitial In-5: Digitial In-13: Relay-21: Digitial In-6: Digitial In-14: Relay-22: Digitial In-7: Digitial In-15: Relay-23: Digitial In-8: Digitial In-16: Relay-24: IO-Xpander-2 ----------------------------------------------------------- Digitial In-1: Digitial In- 9: Relay-17: Digitial In-2: Digitial In-10: Relay-18: Digitial In-3: Digitial In-11: Relay-19: Digitial In-4: Digitial In-12: Relay-20: Digitial In-5: Digitial In-13: Relay-21: Digitial In-6: Digitial In-14: Relay-22: Digitial In-7: Digitial In-15: Relay-23: Digitial In-8: Digitial In-16: Relay-24: IO-Xpander-3 ----------------------------------------------------------- Digitial In-1: Digitial In- 9: Relay-17: Digitial In-2: Digitial In-10: Relay-18: Digitial In-3: Digitial In-11: Relay-19: Digitial In-4: Digitial In-12: Relay-20: Digitial In-5: Digitial In-13: Relay-21: Digitial In-6: Digitial In-14: Relay-22: Digitial In-7: Digitial In-15: Relay-23: Digitial In-8: Digitial In-16: Relay-24: IO-Xpander-4 ----------------------------------------------------------- Digitial In-1: Digitial In- 9: Relay-17: Digitial In-2: Digitial In-10: Relay-18: Digitial In-3: Digitial In-11: Relay-19: Digitial In-4: Digitial In-12: Relay-20: Digitial In-5: Digitial In-13: Relay-21: Digitial In-6: Digitial In-14: Relay-22: Digitial In-7: Digitial In-15: Relay-23: Digitial In-8: Digitial In-16: Relay-24: DI-Xpander-1 ----------------------------------------------------------- DI-Xpander-2 ----------------------------------------------------------- DI-Xpander-3 ----------------------------------------------------------- DI-Xpander-4 ----------------------------------------------------------- RO-Xpander-1 ----------------------------------------------------------- Relay-1: GarageDrMain Relay-2: BackUpT'Stat Relay-3: SprnklrNoH2O Relay-4: Future2-4 Relay-5: Future2-5 Relay-6: Future2-6 Relay-7: Future2-7 Relay-8: Future2-8 RO-Xpander-2 ----------------------------------------------------------- RO-Xpander-3 ----------------------------------------------------------- RO-Xpander-4 ----------------------------------------------------------- _____________________________________________________________ he/endoffile.