Changeset 4


Ignore:
Timestamp:
2011-09-19 06:21:52 (14 years ago)
Author:
dfad1469
Message:

-Cleaned up handler code
-Added more alarm tracking events

File:
1 edited

Legend:

Unmodified
Added
Removed

  • TabularUnified trunk/I_VistaAlarmPanel1.xml

    r3 r4  
    394394        ["01"] = {"Alarm", "Fire Alarm", 
    395395                  function (cmd, part, zone, user) 
    396                      log("Panel::TODO: Code me up!") 
     396                    setPartitionState(part, "Alarm", "Active") 
    397397                  end}, 
    398398        ["02"] = {"Alarm", "Fire Alarm Restore", 
    399399                  function (cmd, part, zone, user) 
    400                      log("Panel::TODO: Code me up!") 
     400                    setPartitionState(part, "Alarm", "None") 
    401401                  end}, 
    402402        ["03"] = {"Trouble", "Trouble", 
    403403                  function (cmd, part, zone, user) 
    404                      log("Panel::TODO: Code me up!") 
     404                    log("Empty Command") 
    405405                  end}, 
    406406        ["04"] = {"Trouble", "Trouble Restore", 
    407407                  function (cmd, part, zone, user) 
    408                      log("Panel::TODO: Code me up!") 
     408                     log("Empty Command") 
    409409                  end}, 
    410410        ["05"] = {"Bypass", "Bypass", 
    411411                  function (cmd, part, zone, user) 
    412                      log("Panel::TODO: Code me up!") 
     412                     log("Empty Command") 
    413413                  end}, 
    414414        ["06"] = {"Bypass", "Bypass Restore", 
    415415                  function (cmd, part, zone, user) 
    416                      log("Panel::TODO: Code me up!") 
     416                     log("Empty Command") 
    417417                  end}, 
    418418        ["07"] = {"Open/Close", "Close (Arm)", 
    … …  
    430430        ["0d"] = {"System", "Manual Trigger Test Report", 
    431431                  function (cmd, part, zone, user) 
    432                      log("Panel::TODO: Code me up!") 
     432                     log("Empty Command") 
    433433                  end}, 
    434434        ["0e"] = {"System", "Send a Power-Up Report", 
    435435                  function (cmd, part, zone, user) 
    436                      log("Panel::TODO: Code me up!") 
     436                     log("Empty Command") 
    437437                  end}, 
    438438        ["0f"] = {"Alarm", "Exit By User Error", 
    439439                  function (cmd, part, zone, user) 
    440                      log("Panel::TODO: Code me up!") 
     440                    setPartitionState(part, "Alarm", "Active") 
     441                    log("Empty Command") 
    441442                  end}, 
    442443        ["11"] = {"Alarm", "Duress Alarm", 
    443444                  function (cmd, part, zone, user) 
    444                      log("Panel::TODO: Code me up!") 
     445                    setPartitionState(part, "Alarm", "Active") 
    445446                  end}, 
    446447        ["12"] = {"Alarm", "Duress Restore", 
    447448                  function (cmd, part, zone, user) 
    448                      log("Panel::TODO: Code me up!") 
     449                    setPartitionState(part, "Alarm", "None") 
    449450                  end}, 
    450451        ["13"] = {"Trouble", "Teleco Line 1 Trouble", 
    451452                  function (cmd, part, zone, user) 
    452                      log("Panel::TODO: Code me up!") 
     453                     log("Empty Command") 
    453454                  end}, 
    454455        ["14"] = {"Trouble", "Telco Line 1 Trouble Restore", 
    455456                  function (cmd, part, zone, user) 
    456                      log("Panel::TODO: Code me up!") 
     457                     log("Empty Command") 
    457458                  end}, 
    458459        ["15"] = {"Bypass", "Bell 1 Disable (Bypass)", 
    459460                  function (cmd, part, zone, user) 
    460                      log("Panel::TODO: Code me up!") 
     461                     log("Empty Command") 
    461462                  end}, 
    462463        ["16"] = {"Bypass", "Bell 1 Bypass Restore", 
    463464                  function (cmd, part, zone, user) 
    464                      log("Panel::TODO: Code me up!") 
     465                     log("Empty Command") 
    465466                  end},         
    466467        ["17"] = {"Open/Close", "Restore Close (Arm)", 
    467468                  function (cmd, part, zone, user) 
     469                    setPartitionState(part, "ArmMode", "Armed") 
     470                    setPartitionState(part, "DetailedArmMode", "Armed") 
     471                    updateZoneStatus() 
     472                  end}, 
     473        ["18"] = {"Open/Close", "Restore Open (Open)", 
     474                  function (cmd, part, zone, user) 
     475                    setPartitionState(part, "ArmMode", "Disarmed") 
     476                    setPartitionState(part, "DetailedArmMode", "Disrmed") 
     477                    updateZoneStatus() 
     478                  end}, 
     479        ["19"] = {"System", "Pager Failed", 
     480                  function (cmd, part, zone, user) 
     481                     log("Empty Command") 
     482                  end}, 
     483        ["1a"] = {"System", "Pager Restore", 
     484                  function (cmd, part, zone, user) 
     485                  end}, 
     486        ["1b"] = {"System", "AC Loss Dialer Report", 
     487                  function (cmd, part, zone, user) 
     488                  end}, 
     489        ["1c"] = {"System", "AC Restore", 
     490                  function (cmd, part, zone, user) 
     491                  end}, 
     492        ["1d"] = {"System", "Periodic Test Report", 
     493                  function (cmd, part, zone, user) 
     494                  end}, 
     495        ["1e"] = {"System", "Exception Schedule Report", 
     496                  function (cmd, part, zone, user) 
     497                  end}, 
     498        ["1f"] = {"Alarm", "Exit Error By Zone", 
     499                  function (cmd, part, zone, user) 
     500                    setPartitionState(part, "Alarm", "Active"); 
     501                  end}, 
     502        ["21"] = {"Alarm", "Silent", 
     503                  function (cmd, part, zone, user) 
     504                    setPartitionState(part, "Alarm", "Active"); 
     505                  end}, 
     506        ["22"] = {"Alarm", "Silent Restore", 
     507                  function (cmd, part, zone, user) 
     508                    setPartitionState(part, "Alarm", "None"); 
     509                  end}, 
     510        ["23"] = {"Trouble", "Telco Line 2 Trouble", 
     511                  function (cmd, part, zone, user) 
     512                  end}, 
     513        ["24"] = {"Trouble", "Telco Line 2 Trouble Restore", 
     514                  function (cmd, part, zone, user) 
     515                  end}, 
     516        ["25"] = {"Bypass", "Bell 2 Disable", 
     517                  function (cmd, part, zone, user) 
     518                  end}, 
     519        ["26"] = {"Bypass", "Bell 2 Bypass Rest", 
     520                  function (cmd, part, zone, user) 
     521                  end}, 
     522        ["27"] = {"Open/Close", "Quick Arm (Close)", 
     523                  function (cmd, part, zone, user) 
     524                    setPartitionState(part, "ArmMode", "Armed") 
     525                    setPartitionState(part, "DetailedArmMode", "Armed") 
     526                    updateZoneStatus() 
     527                  end}, 
     528        ["29"] = {"System", "Low Batt", 
     529                  function (cmd, part, zone, user) 
     530                  end}, 
     531        ["2a"] = {"System", "Low Batt Restore", 
     532                  function (cmd, part, zone, user) 
     533                  end}, 
     534        ["2b"] = {"Open/Close", "Access Denial (General)", 
     535                  function (cmd, part, zone, user) 
    468536                     log("Panel::TODO: Code me up!") 
    469537                  end}, 
    470         ["18"] = {"Open/Close", "Restore Open (Open)", 
     538        ["2c"] = {"Trouble", "A.C. loss at A.C.S Module", 
     539                  function (cmd, part, zone, user) 
     540                  end}, 
     541        ["2d"] = {"System", "Walk test", 
     542                  function (cmd, part, zone, user) 
     543                  end}, 
     544        ["2e"] = {"System", "Access Schedule Change", 
     545                  function (cmd, part, zone, user) 
     546                  end}, 
     547        ["31"] = {"Alarm", "Audible", 
     548                  function (cmd, part, zone, user) 
     549                    setPartitionState(part, "Alarm", "Active"); 
     550                  end}, 
     551        ["32"] = {"Alarm", "Audible Restore", 
     552                  function (cmd, part, zone, user) 
     553                    setPartitionState(part, "Alarm", "None"); 
     554                  end}, 
     555        ["33"] = {"Trouble", "Earth Ground Trouble", 
     556                  function (cmd, part, zone, user) 
     557                  end}, 
     558        ["34"] = {"Trouble", "Earth Ground Trouble Restore", 
     559                  function (cmd, part, zone, user) 
     560                  end}, 
     561        ["35"] = {"Bypass", "Aux Relay Disable", 
     562                  function (cmd, part, zone, user) 
     563                  end}, 
     564        ["36"] = {"Bypass", "Aux Relay Bypass Restore", 
     565                  function (cmd, part, zone, user) 
     566                  end}, 
     567        ["37"] = {"Open/Close", "Keyswitch Close (Arm)", 
     568                  function (cmd, part, zone, user) 
     569                    setPartitionState(part, "ArmMode", "Armed") 
     570                    setPartitionState(part, "DetailedArmMode", "Armed") 
     571                    updateZoneStatus() 
     572                  end}, 
     573        ["38"] = {"Open/Close", "Keyswitch Open (Disarm)", 
     574                  function (cmd, part, zone, user) 
     575                    setPartitionState(part, "ArmMode", "Disarmed") 
     576                    setPartitionState(part, "DetailedArmMode", "Disarmed") 
     577                    updateZoneStatus() 
     578                  end}, 
     579        ["3b"] = {"Trouble", "Door Prop Open", 
     580                  function (cmd, part, zone, user) 
     581                  end}, 
     582        ["3c"] = {"Trouble", "Low Battery At A.C.S. Module", 
     583                  function (cmd, part, zone, user) 
     584                  end}, 
     585        ["3d"] = {"System", "Walk Test Exit", 
     586                  function (cmd, part, zone, user) 
     587                  end}, 
     588        ["3e"] = {"System", "Send A Power-Up Report", 
     589                  function (cmd, part, zone, user) 
     590                  end}, 
     591        ["3f"] = {"Alarm", "Fire Walk Test Exit", 
     592                  function (cmd, part, zone, user) 
     593                    setPartitionState(part, "Alarm", "None"); 
     594                  end}, 
     595        ["41"] = {"Alarm", "Perimeter", 
     596                  function (cmd, part, zone, user) 
     597                    setPartitionState(part, "Alarm", "Active"); 
     598                  end}, 
     599        ["42"] = {"Alarm", "Perimeter", 
     600                  function (cmd, part, zone, user) 
     601                    setPartitionState(part, "Alarm", "None"); 
     602                  end}, 
     603        ["43"] = {"Trouble", "Zone/Sensor Supv Al", 
     604                  function (cmd, part, zone, user) 
     605                  end}, 
     606        ["44"] = {"Trouble", "Zone/Sensor Supv Al Restore", 
     607                  function (cmd, part, zone, user) 
     608                  end}, 
     609        ["45"] = {"Bypass", "Dialer Disable (Bypass)", 
     610                  function (cmd, part, zone, user) 
     611                  end}, 
     612        ["46"] = {"Bypass", "Dialer Bypass Restore", 
     613                  function (cmd, part, zone, user) 
     614                  end}, 
     615        ["47"] = {"Open/Close", "Partial Arm", 
     616                  function (cmd, part, zone, user) 
     617                    setPartitionState(part, "ArmMode", "Armed") 
     618                    setPartitionState(part, "DetailedArmMode", "Armed") 
     619                    updateZoneStatus() 
     620                  end}, 
     621        ["48"] = {"System", "Callback Request", 
     622                  function (cmd, part, zone, user) 
     623                  end}, 
     624        ["4b"] = {"Trouble", "Door Prop Open Restore", 
     625                  function (cmd, part, zone, user) 
     626                  end}, 
     627        ["4c"] = {"Bypass", "Access Point Bypass", 
    471628                  function (cmd, part, zone, user) 
    472629                     log("Panel::TODO: Code me up!") 
    473630                  end}, 
    474         ["19"] = {"System", "Pager Failed", 
    475                   function (cmd, part, zone, user) 
    476                      log("Panel::TODO: Code me up!") 
    477                   end}, 
    478         ["1a"] = {"System", "Pager Restore", 
    479                   function (cmd, part, zone, user) 
    480                      log("Panel::TODO: Code me up!") 
    481                   end}, 
    482         ["1b"] = {"System", "AC Loss Dialer Report", 
    483                   function (cmd, part, zone, user) 
    484                      log("Panel::TODO: Code me up!") 
    485                   end}, 
    486         ["1c"] = {"System", "AC Restore", 
    487                   function (cmd, part, zone, user) 
    488                      log("Panel::TODO: Code me up!") 
    489                   end}, 
    490         ["1d"] = {"System", "Periodic Test Report", 
    491                   function (cmd, part, zone, user) 
    492                      log("Panel::TODO: Code me up!") 
    493                   end}, 
    494         ["1e"] = {"System", "Exception Schedule Report", 
    495                   function (cmd, part, zone, user) 
    496                      log("Panel::TODO: Code me up!") 
    497                   end}, 
    498         ["1f"] = {"Alarm", "Exit Error By Zone", 
    499                   function (cmd, part, zone, user) 
    500                      log("Panel::TODO: Code me up!") 
    501                   end}, 
    502         ["21"] = {"Alarm", "Silent", 
    503                   function (cmd, part, zone, user) 
    504                      log("Panel::TODO: Code me up!") 
    505                   end}, 
    506         ["22"] = {"Alarm", "Silent Restore", 
    507                   function (cmd, part, zone, user) 
    508                      log("Panel::TODO: Code me up!") 
    509                   end}, 
    510         ["23"] = {"Trouble", "Telco Line 2 Trouble", 
    511                   function (cmd, part, zone, user) 
    512                      log("Panel::TODO: Code me up!") 
    513                   end}, 
    514         ["24"] = {"Trouble", "Telco Line 2 Trouble Restore", 
    515                   function (cmd, part, zone, user) 
    516                      log("Panel::TODO: Code me up!") 
    517                   end}, 
    518         ["25"] = {"Bypass", "Bell 2 Disable", 
    519                   function (cmd, part, zone, user) 
    520                      log("Panel::TODO: Code me up!") 
    521                   end}, 
    522         ["26"] = {"Bypass", "Bell 2 Bypass Rest", 
    523                   function (cmd, part, zone, user) 
    524                      log("Panel::TODO: Code me up!") 
    525                   end}, 
    526         ["27"] = {"Open/Close", "Quick Arm (Close)", 
    527                   function (cmd, part, zone, user) 
    528                      log("Panel::TODO: Code me up!") 
    529                   end}, 
    530         ["29"] = {"System", "Low Batt", 
    531                   function (cmd, part, zone, user) 
    532                      log("Panel::TODO: Code me up!") 
    533                   end}, 
    534         ["2a"] = {"System", "Low Batt Restore", 
    535                   function (cmd, part, zone, user) 
    536                      log("Panel::TODO: Code me up!") 
    537                   end}, 
    538         ["2b"] = {"Open/Close", "Access Denial (General)", 
    539                   function (cmd, part, zone, user) 
    540                      log("Panel::TODO: Code me up!") 
    541                   end}, 
    542         ["2c"] = {"Trouble", "A.C. loss at A.C.S Module", 
    543                   function (cmd, part, zone, user) 
    544                      log("Panel::TODO: Code me up!") 
    545                   end}, 
    546         ["2d"] = {"System", "Walk test", 
    547                   function (cmd, part, zone, user) 
    548                      log("Panel::TODO: Code me up!") 
    549                   end}, 
    550         ["2e"] = {"System", "Access Schedule Change", 
    551                   function (cmd, part, zone, user) 
    552                      log("Panel::TODO: Code me up!") 
    553                   end}, 
    554         ["31"] = {"Alarm", "Audible", 
    555                   function (cmd, part, zone, user) 
    556                      log("Panel::TODO: Code me up!") 
    557                   end}, 
    558         ["32"] = {"Alarm", "Audible Restore", 
    559                   function (cmd, part, zone, user) 
    560                      log("Panel::TODO: Code me up!") 
    561                   end}, 
    562         ["33"] = {"Trouble", "Earth Ground Trouble", 
    563                   function (cmd, part, zone, user) 
    564                      log("Panel::TODO: Code me up!") 
    565                   end}, 
    566         ["34"] = {"Trouble", "Earth Ground Trouble Restore", 
    567                   function (cmd, part, zone, user) 
    568                      log("Panel::TODO: Code me up!") 
    569                   end}, 
    570         ["35"] = {"Bypass", "Aux Relay Disable", 
    571                   function (cmd, part, zone, user) 
    572                      log("Panel::TODO: Code me up!") 
    573                   end}, 
    574         ["36"] = {"Bypass", "Aux Relay Bypass Restore", 
    575                   function (cmd, part, zone, user) 
    576                      log("Panel::TODO: Code me up!") 
    577                   end}, 
    578         ["37"] = {"Open/Close", "Keyswitch Close (Arm)", 
    579                   function (cmd, part, zone, user) 
    580                      log("Panel::TODO: Code me up!") 
    581                   end}, 
    582         ["38"] = {"Open/Close", "Keyswitch Open (Disarm)", 
    583                   function (cmd, part, zone, user) 
    584                      log("Panel::TODO: Code me up!") 
    585                   end}, 
    586         ["3b"] = {"Trouble", "Door Prop Open", 
    587                   function (cmd, part, zone, user) 
    588                      log("Panel::TODO: Code me up!") 
    589                   end}, 
    590         ["3c"] = {"Trouble", "Low Battery At A.C.S. Module", 
    591                   function (cmd, part, zone, user) 
    592                      log("Panel::TODO: Code me up!") 
    593                   end}, 
    594         ["3d"] = {"System", "Walk Test Exit", 
    595                   function (cmd, part, zone, user) 
    596                      log("Panel::TODO: Code me up!") 
    597                   end}, 
    598         ["3e"] = {"System", "Send A Power-Up Report", 
    599                   function (cmd, part, zone, user) 
    600                      log("Panel::TODO: Code me up!") 
    601                   end}, 
    602         ["3f"] = {"Alarm", "Fire Walk Test Exit", 
    603                   function (cmd, part, zone, user) 
    604                      log("Panel::TODO: Code me up!") 
    605                   end}, 
    606         ["41"] = {"Alarm", "Perimeter", 
    607                   function (cmd, part, zone, user) 
    608                      log("Panel::TODO: Code me up!") 
    609                   end}, 
    610         ["42"] = {"Alarm", "Perimeter", 
    611                   function (cmd, part, zone, user) 
    612                      log("Panel::TODO: Code me up!") 
    613                   end}, 
    614         ["43"] = {"Trouble", "Zone/Sensor Supv Al", 
    615                   function (cmd, part, zone, user) 
    616                      log("Panel::TODO: Code me up!") 
    617                   end}, 
    618         ["44"] = {"Trouble", "Zone/Sensor Supv Al Restore", 
    619                   function (cmd, part, zone, user) 
    620                      log("Panel::TODO: Code me up!") 
    621                   end}, 
    622         ["45"] = {"Bypass", "Dialer Disable (Bypass)", 
    623                   function (cmd, part, zone, user) 
    624                      log("Panel::TODO: Code me up!") 
    625                   end}, 
    626         ["46"] = {"Bypass", "Dialer Bypass Restore", 
    627                   function (cmd, part, zone, user) 
    628                      log("Panel::TODO: Code me up!") 
    629                   end}, 
    630         ["47"] = {"Open/Close", "Partial Arm", 
    631                   function (cmd, part, zone, user) 
    632                      log("Panel::TODO: Code me up!") 
    633                   end}, 
    634         ["48"] = {"System", "Callback Request", 
    635                   function (cmd, part, zone, user) 
    636                      log("Panel::TODO: Code me up!") 
    637                   end}, 
    638         ["4b"] = {"Trouble", "Door Prop Open Restore", 
    639                   function (cmd, part, zone, user) 
    640                      log("Panel::TODO: Code me up!") 
    641                   end}, 
    642         ["4c"] = {"Bypass", "Access Point Bypass", 
    643                   function (cmd, part, zone, user) 
    644                      log("Panel::TODO: Code me up!") 
    645                   end}, 
    646631        ["4d"] = {"All", "Event Log 50% Full", 
    647632                  function (cmd, part, zone, user) 
    648                      log("Panel::TODO: Code me up!") 
    649633                  end}, 
    650634        ["4e"] = {"All", "Program Changed", 
    651635                  function (cmd, part, zone, user) 
    652                      log("Panel::TODO: Code me up!") 
    653636                  end}, 
    654637        ["51"] = {"Alarm", "Interior", 
    655638                  function (cmd, part, zone, user) 
    656                      log("Panel::TODO: Code me up!") 
     639                    setPartitionState(part, "Alarm", "Active"); 
    657640                  end}, 
    658641        ["52"] = {"Alarm", "Interior", 
    659642                  function (cmd, part, zone, user) 
    660                      log("Panel::TODO: Code me up!") 
     643                    setPartitionState(part, "Alarm", "None"); 
    661644                  end}, 
    662645        ["53"] = {"Trouble", "Exp. Module Tamper", 
    663646                  function (cmd, part, zone, user) 
    664                      log("Panel::TODO: Code me up!") 
    665647                  end}, 
    666648        ["54"] = {"Trouble", "Exp. Module Tamper Restore", 
    667649                  function (cmd, part, zone, user) 
    668                      log("Panel::TODO: Code me up!") 
    669650                  end}, 
    670651        ["55"] = {"Bypass", "Vent Zone (Bypass)", 
    671652                  function (cmd, part, zone, user) 
    672                      log("Panel::TODO: Code me up!") 
    673653                  end}, 
    674654        ["56"] = {"Bypass", "Vent Zone Bypass Restore", 
    675655                  function (cmd, part, zone, user) 
    676                      log("Panel::TODO: Code me up!") 
    677656                  end}, 
    678657        ["59"] = {"System", "Battery Test Fail", 
    679658                  function (cmd, part, zone, user) 
    680                      log("Panel::TODO: Code me up!") 
    681659                  end}, 
    682660        ["5a"] = {"System", "Battery Test Restore", 
    683661                  function (cmd, part, zone, user) 
    684                      log("Panel::TODO: Code me up!") 
    685662                  end}, 
    686663        ["5b"] = {"Open/Close", "Access Granted", 
    687664                  function (cmd, part, zone, user) 
    688                      log("Panel::TODO: Code me up!") 
     665                    setPartitionState(part, "ArmMode", "Disarmed") 
     666                    setPartitionState(part, "DetailedArmMode", "Disarmed") 
     667                    updateZoneStatus() 
    689668                  end}, 
    690669        ["5c"] = {"All", "Reset At Module", 
    691670                  function (cmd, part, zone, user) 
    692                      log("Panel::TODO: Code me up!") 
    693671                  end}, 
    694672        ["5d"] = {"All", "Event Log 90% Full", 
    695673                  function (cmd, part, zone, user) 
    696                      log("Panel::TODO: Code me up!") 
    697674                  end}, 
    698675        ["5e"] = {"Open/Close", "Auto-arm Fail", 
    699676                  function (cmd, part, zone, user) 
    700                      log("Panel::TODO: Code me up!") 
     677                    setPartitionState(part, "ArmMode", "Disarmed") 
     678                    setPartitionState(part, "DetailedArmMode", "Disarmed") 
     679                    updateZoneStatus() 
    701680                  end}, 
    702681        ["5f"] = {"Alarm", "Send A Cancel Trigger", 
    703682                  function (cmd, part, zone, user) 
    704                      log("Panel::TODO: Code me up!") 
     683                    setPartitionState(part, "Alarm", "None"); 
    705684                  end}, 
    706685        ["61"] = {"Alarm", "24 Hour Zone", 
    707686                  function (cmd, part, zone, user) 
    708                      log("Panel::TODO: Code me up!") 
     687                     setPartitionState(part, "Alarm", "Active"); 
    709688                  end}, 
    710689        ["62"] = {"Alarm", "Hour", 
    711690                  function (cmd, part, zone, user) 
    712                      log("Panel::TODO: Code me up!") 
     691                     setPartitionState(part, "Alarm", "None"); 
    713692                  end}, 
    714693        ["63"] = {"Trouble", "R.F. Sensor Super", 
    715694                  function (cmd, part, zone, user) 
    716                      log("Panel::TODO: Code me up!") 
    717695                  end}, 
    718696        ["64"] = {"Trouble", "R.F. Sensor Super Restore", 
    719697                  function (cmd, part, zone, user) 
    720                      log("Panel::TODO: Code me up!") 
    721698                  end}, 
    722699        ["65"] = {"System", "A.C.S. Test Entry", 
    723700                  function (cmd, part, zone, user) 
    724                      log("Panel::TODO: Code me up!") 
    725701                  end}, 
    726702        ["66"] = {"Open/Close", "A.C.S. Test Exit", 
    727703                  function (cmd, part, zone, user) 
    728                      log("Panel::TODO: Code me up!") 
     704                     setPartitionState(part, "Alarm", "None"); 
    729705                  end}, 
    730706        ["67"] = {"Open/Close", "Auto Close (Arm)", 
    731707                  function (cmd, part, zone, user) 
    732                      log("Panel::TODO: Code me up!") 
     708                    setPartitionState(part, "ArmMode", "Armed") 
     709                    setPartitionState(part, "DetailedArmMode", "Armed") 
     710                    updateZoneStatus() 
    733711                  end}, 
    734712        ["68"] = {"Trouble", "Auto Open (Disarm)", 
    735713                  function (cmd, part, zone, user) 
    736                      log("Panel::TODO: Code me up!") 
     714                    setPartitionState(part, "ArmMode", "Disarmed") 
     715                    setPartitionState(part, "DetailedArmMode", "Disarmed") 
     716                    updateZoneStatus() 
    737717                  end}, 
    738718        ["69"] = {"Trouble", "Expander Module Fail", 
    739719                  function (cmd, part, zone, user) 
    740                      log("Panel::TODO: Code me up!") 
    741720                  end}, 
    742721        ["6a"] = {"Open/Close", "Expander Module Fail", 
    743722                  function (cmd, part, zone, user) 
    744                      log("Panel::TODO: Code me up!") 
     723                    setPartitionState(part, "ArmMode", "Disarmed") 
     724                    setPartitionState(part, "DetailedArmMode", "Disarmed") 
     725                    updateZoneStatus() 
    745726                  end}, 
    746727        ["6b"] = {"Trouble", "Egress Denied(General)", 
    747728                  function (cmd, part, zone, user) 
    748                      log("Panel::TODO: Code me up!") 
    749729                  end}, 
    750730        ["6c"] = {"All", "Access Point Relay Supervision Fail", 
    751731                  function (cmd, part, zone, user) 
    752                      log("Panel::TODO: Code me up!") 
    753732                  end}, 
    754733        ["6d"] = {"System", "Event Log Overwrite", 
    755734                  function (cmd, part, zone, user) 
    756                      log("Panel::TODO: Code me up!") 
    757735                  end},                  
    758736        ["6e"] = {"System", "Off Normal Report", 
    759737                  function (cmd, part, zone, user) 
    760                      log("Panel::TODO: Code me up!") 
    761738                  end}, 
    762739        ["6f"] = {"Alarm", "Begin Drill (Fire)", 
    763740                  function (cmd, part, zone, user) 
    764                      log("Panel::TODO: Code me up!") 
     741                    setPartitionState(part, "Alarm", "Active"); 
    765742                  end}, 
    766743        ["71"] = {"Alarm", "Day/Nite Alarm", 
    767744                  function (cmd, part, zone, user) 
    768                      log("Panel::TODO: Code me up!") 
     745                    setPartitionState(part, "Alarm", "Active"); 
    769746                  end}, 
    770747        ["72"] = {"Alarm", "Day/Nite Alarm Restore", 
    771748                  function (cmd, part, zone, user) 
    772                      log("Panel::TODO: Code me up!") 
     749                    setPartitionState(part, "Alarm", "None"); 
    773750                  end}, 
    774751        ["73"] = {"Trouble", "Rpm Sensor Super", 
    775752                  function (cmd, part, zone, user) 
    776                      log("Panel::TODO: Code me up!") 
    777753                  end}, 
    778754        ["74"] = {"Trouble", "Rpm Sensor Super Restore", 
    779755                  function (cmd, part, zone, user) 
    780                      log("Panel::TODO: Code me up!") 
    781756                  end}, 
    782757        ["76"] = {"All", "Engineer Reset", 
    783758                  function (cmd, part, zone, user) 
    784                      log("Panel::TODO: Code me up!") 
    785759                  end}, 
    786760        ["77"] = {"System", "Log Dialer Shutdown Restore", 
    787761                  function (cmd, part, zone, user) 
    788                      log("Panel::TODO: Code me up!") 
    789762                  end}, 
    790763        ["78"] = {"System", "Log Dialer Shutdown", 
    791764                  function (cmd, part, zone, user) 
    792                      log("Panel::TODO: Code me up!") 
    793765                  end}, 
    794766        ["79"] = {"All", "System Shutdown", 
    795767                  function (cmd, part, zone, user) 
    796                      log("Panel::TODO: Code me up!") 
    797768                  end}, 
    798769        ["7a"] = {"All", "System Shutdown Restore", 
    799770                  function (cmd, part, zone, user) 
    800                      log("Panel::TODO: Code me up!") 
    801771                  end}, 
    802772        ["7b"] = {"Alarm", "Door Forced Open", 
    803773                  function (cmd, part, zone, user) 
    804                      log("Panel::TODO: Code me up!") 
     774                    setPartitionState(part, "Alarm", "Active"); 
    805775                  end}, 
    806776        ["7c"] = {"Trouble", "Seld Test Fail At Module", 
    807777                  function (cmd, part, zone, user) 
    808                      log("Panel::TODO: Code me up!") 
    809                   end}, 
     778                          end}, 
    810779        ["7d"] = {"All", "Event Log Reset", 
    811780                  function (cmd, part, zone, user) 
    812                      log("Panel::TODO: Code me up!") 
    813781                  end},                  
    814782        ["7e"] = {"System", "Point Tested OK", 
    815783                  function (cmd, part, zone, user) 
    816                      log("Panel::TODO: Code me up!") 
    817784                  end}, 
    818785        ["7f"] = {"Alarm", "End Drill (Fire)", 
    819786                  function (cmd, part, zone, user) 
    820                      log("Panel::TODO: Code me up!") 
     787                     setPartitionState(part, "Alarm", "None"); 
    821788                  end},                
    822789        ["81"] = {"Alarm", "Entry/Exit Alarm", 
    823790                  function (cmd, part, zone, user) 
    824                      log("Panel::TODO: Code me up!") 
     791                    setPartitionState(part, "Alarm", "Active"); 
    825792                  end}, 
    826793        ["82"] = {"Alarm", "Entry/Exit Alarm Restore", 
    827794                  function (cmd, part, zone, user) 
    828                      log("Panel::TODO: Code me up!") 
     795                    setPartitionState(part, "Alarm", "None"); 
    829796                  end}, 
    830797        ["83"] = {"Trouble", "E.C.P Relay Trouble", 
    831798                  function (cmd, part, zone, user) 
    832                      log("Panel::TODO: Code me up!") 
    833799                  end}, 
    834800        ["84"] = {"Trouble", "E.C.P Relay Trouble Restore", 
    835801                  function (cmd, part, zone, user) 
    836                      log("Panel::TODO: Code me up!") 
    837802                  end}, 
    838803        ["87"] = {"System", "Log System Shutdown Restore", 
    839804                  function (cmd, part, zone, user) 
    840                      log("Panel::TODO: Code me up!") 
    841805                  end}, 
    842806        ["88"] = {"System", "Log System Shutdown", 
    843807                  function (cmd, part, zone, user) 
    844                      log("Panel::TODO: Code me up!") 
    845808                  end}, 
    846809        ["89"] = {"Trouble", "R.F. Low Batt", 
    847810                  function (cmd, part, zone, user) 
    848                      log("Panel::TODO: Code me up!") 
    849811                  end}, 
    850812        ["8a"] = {"Trouble", "R.F. Low Batt Restore", 
    851813                  function (cmd, part, zone, user) 
    852                      log("Panel::TODO: Code me up!") 
    853814                  end}, 
    854815        ["8b"] = {"Alarm", "Door Forced Open Restore", 
    855816                  function (cmd, part, zone, user) 
    856                      log("Panel::TODO: Code me up!") 
     817                     setPartitionState(part, "Alarm", "None"); 
    857818                  end}, 
    858819        ["8c"] = {"Bypass", "Access Point D.S.M. Shunt", 
    859820                  function (cmd, part, zone, user) 
    860                      log("Panel::TODO: Code me up!") 
    861821                  end}, 
    862822        ["8d"] = {"All", "Time Clock Reset", 
    863823                  function (cmd, part, zone, user) 
    864                      log("Panel::TODO: Code me up!") 
    865                   end}, 
     824                          end}, 
    866825        ["8e"] = {"System", "Point Not Tested", 
    867826                  function (cmd, part, zone, user) 
    868                      log("Panel::TODO: Code me up!") 
    869827                  end},                  
    870828        ["8f"] = {"Alarm", "Point Not Tested", 
    871829                  function (cmd, part, zone, user) 
     830                    setPartitionState(part, "Alarm", "None"); 
     831                  end}, 
     832        ["91"] = {"Alarm", "Poll Loop Short", 
     833                  function (cmd, part, zone, user) 
     834                    setPartitionState(part, "Alarm", "Active"); 
     835                  end}, 
     836        ["92"] = {"Alarm", "Poll Loop Short Restore", 
     837                  function (cmd, part, zone, user) 
     838                    setPartitionState(part, "Alarm", "None"); 
     839                  end}, 
     840        ["93"] = {"Trouble", "Polling Loop Short", 
     841                  function (cmd, part, zone, user) 
     842                  end}, 
     843        ["94"] = {"Trouble", "Polling Loop Short Restore", 
     844                  function (cmd, part, zone, user) 
     845                  end}, 
     846        ["95"] = {"Bypass", "A.C.S. Relay Trigger Disable", 
     847                  function (cmd, part, zone, user) 
     848                  end}, 
     849        ["96"] = {"Bypass", "A.C.S. Relay Trigger Enable", 
     850                  function (cmd, part, zone, user) 
     851                  end}, 
     852        ["97"] = {"Bypass", "A.C.S. Reader Disable", 
     853                  function (cmd, part, zone, user) 
     854                  end}, 
     855        ["98"] = {"Bypass", "A.C.S. Reader Enable", 
     856                  function (cmd, part, zone, user) 
     857                  end}, 
     858        ["9a"] = {"Alarm", "A.C.S. Zone Alarm", 
     859                  function (cmd, part, zone, user) 
    872860                     log("Panel::TODO: Code me up!") 
    873861                  end}, 
    874         ["91"] = {"Alarm", "Poll Loop Short", 
    875                   function (cmd, part, zone, user) 
    876                      log("Panel::TODO: Code me up!") 
    877                   end}, 
    878         ["92"] = {"Alarm", "Poll Loop Short Restore", 
    879                   function (cmd, part, zone, user) 
    880                      log("Panel::TODO: Code me up!") 
    881                   end}, 
    882         ["93"] = {"Trouble", "Polling Loop Short", 
    883                   function (cmd, part, zone, user) 
    884                      log("Panel::TODO: Code me up!") 
    885                   end}, 
    886         ["94"] = {"Trouble", "Polling Loop Short Restore", 
    887                   function (cmd, part, zone, user) 
    888                      log("Panel::TODO: Code me up!") 
    889                   end}, 
    890         ["95"] = {"Bypass", "A.C.S. Relay Trigger Disable", 
    891                   function (cmd, part, zone, user) 
    892                      log("Panel::TODO: Code me up!") 
    893                   end}, 
    894         ["96"] = {"Bypass", "A.C.S. Relay Trigger Enable", 
    895                   function (cmd, part, zone, user) 
    896                      log("Panel::TODO: Code me up!") 
    897                   end}, 
    898         ["97"] = {"Bypass", "A.C.S. Reader Disable", 
    899                   function (cmd, part, zone, user) 
    900                      log("Panel::TODO: Code me up!") 
    901                   end}, 
    902         ["98"] = {"Bypass", "A.C.S. Reader Enable", 
    903                   function (cmd, part, zone, user) 
    904                      log("Panel::TODO: Code me up!") 
    905                   end}, 
    906         ["9a"] = {"Alarm", "A.C.S. Zone Alarm", 
    907                   function (cmd, part, zone, user) 
    908                      log("Panel::TODO: Code me up!") 
    909                   end}, 
    910862        ["9b"] = {"Open/Close", "A.C.S. Zone Alarm Restore", 
    911863                  function (cmd, part, zone, user) 
    912                      log("Panel::TODO: Code me up!") 
     864                     setPartitionState(part, "Alarm", "Active"); 
    913865                  end}, 
    914866        ["9c"] = {"Bypass", "Access Point D.S.M. Unshunt", 
    915867                  function (cmd, part, zone, user) 
    916                      log("Panel::TODO: Code me up!") 
    917                   end}, 
     868                          end}, 
    918869        ["9d"] = {"All", "Time Clock Wrong", 
    919870                  function (cmd, part, zone, user) 
    920                      log("Panel::TODO: Code me up!") 
    921871                  end},                  
    922872        ["9e"] = {"Alarm", "Recent Close By User", 
    923873                  function (cmd, part, zone, user) 
    924                      log("Panel::TODO: Code me up!") 
     874                     setPartitionState(part, "Alarm", "None"); 
    925875                  end}, 
    926876        ["a1"] = {"Alarm", "Expander Module Fail", 
    927877                  function (cmd, part, zone, user) 
    928                      log("Panel::TODO: Code me up!") 
     878                    setPartitionState(part, "Alarm", "Active"); 
    929879                  end}, 
    930880        ["a2"] = {"Alarm", "Expander Module Fail Restore", 
    931881                  function (cmd, part, zone, user) 
    932                      log("Panel::TODO: Code me up!") 
     882                    setPartitionState(part, "Alarm", "None"); 
    933883                  end}, 
    934884        ["a3"] = {"Trouble", "Expander Module Fail", 
    935885                  function (cmd, part, zone, user) 
    936                      log("Panel::TODO: Code me up!") 
    937886                  end}, 
    938887        ["a4"] = {"Trouble", "Expander Module Fail Restore", 
    939888                  function (cmd, part, zone, user) 
    940                      log("Panel::TODO: Code me up!") 
    941889                  end}, 
    942890        ["a5"] = {"Bypass", "A.C.S. Zone Shunt", 
    943891                  function (cmd, part, zone, user) 
    944                      log("Panel::TODO: Code me up!") 
    945892                  end}, 
    946893        ["a6"] = {"Bypass", "A.C.S. Zone Unshunt", 
    947894                  function (cmd, part, zone, user) 
    948                      log("Panel::TODO: Code me up!") 
    949895                  end}, 
    950896        ["a7"] = {"Trouble", "Access Point R.T.E. Touble", 
    951897                  function (cmd, part, zone, user) 
    952                      log("Panel::TODO: Code me up!") 
    953898                  end}, 
    954899        ["a8"] = {"Trouble", "Access Point R.T.E. Touble Restore", 
    955900                  function (cmd, part, zone, user) 
    956                      log("Panel::TODO: Code me up!") 
    957901                  end}, 
    958902        ["a9"] = {"Trouble", "Access Point D.S.M. Touble", 
    959903                  function (cmd, part, zone, user) 
    960                      log("Panel::TODO: Code me up!") 
    961904                  end}, 
    962905        ["aa"] = {"Trouble", "Access Point D.S.M. Touble Restore", 
    963906                  function (cmd, part, zone, user) 
    964                      log("Panel::TODO: Code me up!") 
    965907                  end}, 
    966908        ["ab"] = {"Bypass", "Access Point R.T.E. Shunt", 
    967909                  function (cmd, part, zone, user) 
    968                      log("Panel::TODO: Code me up!") 
    969                   end}, 
     910                          end}, 
    970911        ["ac"] = {"Bypass", "Access Point R.T.E. Unshunt", 
    971912                  function (cmd, part, zone, user) 
    972                      log("Panel::TODO: Code me up!") 
    973913                  end},                  
    974914        ["ad"] = {"System", "Log Pgm Mode Entry", 
    975915                  function (cmd, part, zone, user) 
    976                      log("Panel::TODO: Code me up!") 
    977916                  end}, 
    978917        ["ae"] = {"Alarm", "Listen-in To Follow", 
    979918                  function (cmd, part, zone, user) 
    980                      log("Panel::TODO: Code me up!") 
    981919                  end},  
    982920        ["b1"] = {"Alarm", "Non-burg Alarm", 
    983921                  function (cmd, part, zone, user) 
    984                      log("Panel::TODO: Code me up!") 
     922                    setPartitionState(part, "Alarm", "Active"); 
    985923                  end}, 
    986924        ["b2"] = {"Alarm", "Non-burg Alarm Restore", 
    987925                  function (cmd, part, zone, user) 
    988                      log("Panel::TODO: Code me up!") 
     926                    setPartitionState(part, "Alarm", "None"); 
    989927                  end}, 
    990928        ["b3"] = {"Trouble", "Sensor Tamper", 
    991929                  function (cmd, part, zone, user) 
    992                      log("Panel::TODO: Code me up!") 
    993930                  end}, 
    994931        ["b4"] = {"Trouble", "Sensor Tamper Restore", 
    995932                  function (cmd, part, zone, user) 
    996                      log("Panel::TODO: Code me up!") 
    997933                  end}, 
    998934        ["b5"] = {"Trouble", "Cross-zoning Trouble", 
    999935                  function (cmd, part, zone, user) 
    1000                      log("Panel::TODO: Code me up!") 
    1001936                  end}, 
    1002937        ["b6"] = {"Trouble", "Cross-zoning Trouble Restore", 
    1003938                  function (cmd, part, zone, user) 
    1004                      log("Panel::TODO: Code me up!") 
    1005939                  end}, 
    1006940        ["b7"] = {"Open/Close", "Arm Stay (Close)", 
    … …  
    1016950        ["bc"] = {"Trouble", "A.C. Loss Restored At A.C.S. Module", 
    1017951                  function (cmd, part, zone, user) 
    1018                      log("Panel::TODO: Code me up!") 
    1019952                  end}, 
    1020953        ["bd"] = {"System", "Pgm Mode Exited", 
    1021954                  function (cmd, part, zone, user) 
    1022                      log("Panel::TODO: Code me up!") 
    1023955                  end}, 
    1024956        ["be"] = {"Trouble", "Point Tested Failed", 
    1025957                  function (cmd, part, zone, user) 
    1026                      log("Panel::TODO: Code me up!") 
    1027                   end}, 
     958                         end}, 
    1028959        ["c1"] = {"Alarm", "Smoke Alarm", 
    1029960                  function (cmd, part, zone, user) 
    1030                      log("Panel::TODO: Code me up!") 
     961                    setPartitionState(part, "Alarm", "Active"); 
    1031962                  end}, 
    1032963        ["c2"] = {"Alarm", "Smoke Alarm Restore", 
    1033964                  function (cmd, part, zone, user) 
    1034                      log("Panel::TODO: Code me up!") 
     965                    setPartitionState(part, "Alarm", "None"); 
    1035966                  end}, 
    1036967        ["c3"] = {"Trouble", "Fire Trouble", 
    1037968                  function (cmd, part, zone, user) 
    1038                      log("Panel::TODO: Code me up!") 
    1039969                  end}, 
    1040970        ["c4"] = {"Trouble", "Fire Trouble Restore", 
    1041971                  function (cmd, part, zone, user) 
    1042                      log("Panel::TODO: Code me up!") 
    1043972                  end}, 
    1044973        ["c5"] = {"Alarm", "CO Alarm", 
    1045974                  function (cmd, part, zone, user) 
    1046                      log("Panel::TODO: Code me up!") 
     975                     setPartitionState(part, "Alarm", "Active"); 
    1047976                  end}, 
    1048977        ["c6"] = {"Alarm", "CO Alarm Restore", 
    1049978                  function (cmd, part, zone, user) 
    1050                      log("Panel::TODO: Code me up!") 
     979                    setPartitionState(part, "Alarm", "None"); 
    1051980                  end}, 
    1052981        ["c7"] = {"Open/Close", "Fail To Close (Arm)", 
    1053982                  function (cmd, part, zone, user) 
    1054                      log("Panel::TODO: Code me up!") 
     983                    setPartitionState(part, "ArmMode", "Armed") 
     984                    setPartitionState(part, "DetailedArmMode", "Armed") 
     985                    updateZoneStatus() 
    1055986                  end}, 
    1056987        ["c8"] = {"Open/Close", "Fail To Open (Disarm)", 
    1057988                  function (cmd, part, zone, user) 
    1058                      log("Panel::TODO: Code me up!") 
     989                    setPartitionState(part, "ArmMode", "Disarmed") 
     990                    setPartitionState(part, "DetailedArmMode", "Disarmed") 
     991                    updateZoneStatus() 
    1059992                  end}, 
    1060993        ["c9"] = {"Trouble", "Smoke Detector Hi Sensitivity", 
    1061994                  function (cmd, part, zone, user) 
    1062                      log("Panel::TODO: Code me up!") 
    1063995                  end}, 
    1064996        ["ca"] = {"Trouble", "Smoke Detector Hi Sensitivity", 
    1065997                  function (cmd, part, zone, user) 
    1066                      log("Panel::TODO: Code me up!") 
    1067998                  end}, 
    1068999        ["cb"] = {"All", "A.C.S. Program Exit", 
    10691000                  function (cmd, part, zone, user) 
    1070                      log("Panel::TODO: Code me up!") 
    1071                   end}, 
     1001                          end}, 
    10721002        ["cc"] = {"Trouble", "Low Battery Restored At A.C.S. Module", 
    10731003                  function (cmd, part, zone, user) 
    1074                      log("Panel::TODO: Code me up!") 
    10751004                  end},                  
    10761005        ["cd"] = {"System", "User Code Added", 
    10771006                  function (cmd, part, zone, user) 
    1078                      log("Panel::TODO: Code me up!") 
    10791007                  end}, 
    10801008        ["d1"] = {"Alarm", "Water Flow Alarm", 
    10811009                  function (cmd, part, zone, user) 
    1082                      log("Panel::TODO: Code me up!") 
     1010                    setPartitionState(part, "Alarm", "Active"); 
    10831011                  end}, 
    10841012        ["d2"] = {"Alarm", "Water Flow Alarm Restore", 
    10851013                  function (cmd, part, zone, user) 
    1086                      log("Panel::TODO: Code me up!") 
     1014                    setPartitionState(part, "Alarm", "None"); 
    10871015                  end}, 
    10881016        ["d3"] = {"All", "Fail To Communicate", 
    10891017                  function (cmd, part, zone, user) 
    1090                      log("Panel::TODO: Code me up!") 
    10911018                  end}, 
    10921019        ["d4"] = {"All", "Comm. Restore", 
    10931020                  function (cmd, part, zone, user) 
    1094                      log("Panel::TODO: Code me up!") 
    10951021                  end}, 
    10961022        ["d7"] = {"Open/Close", "Late Close (Arm)", 
    10971023                  function (cmd, part, zone, user) 
    1098                      log("Panel::TODO: Code me up!") 
     1024                    setPartitionState(part, "ArmMode", "Armed") 
     1025                    setPartitionState(part, "DetailedArmMode", "Armed") 
     1026                    updateZoneStatus() 
    10991027                  end}, 
    11001028        ["d8"] = {"Open/Close", "Late Open (Disarm)", 
    11011029                  function (cmd, part, zone, user) 
    1102                      log("Panel::TODO: Code me up!") 
     1030                    setPartitionState(part, "ArmMode", "Disarmed") 
     1031                    setPartitionState(part, "DetailedArmMode", "Disarmed") 
     1032                    updateZoneStatus() 
    11031033                  end}, 
    11041034        ["d9"] = {"Trouble", "Smoke Detector Lo Sensitivity", 
    11051035                  function (cmd, part, zone, user) 
    1106                      log("Panel::TODO: Code me up!") 
    11071036                  end}, 
    11081037        ["da"] = {"Trouble", "Smoke Detector Lo Sensitivity Restore", 
    11091038                  function (cmd, part, zone, user) 
    1110                      log("Panel::TODO: Code me up!") 
    11111039                  end}, 
    11121040        ["db"] = {"All", "A.C.S. Threat Change", 
    11131041                  function (cmd, part, zone, user) 
    1114                      log("Panel::TODO: Code me up!") 
    11151042                  end}, 
    11161043        ["dc"] = {"Alarm", "Access Point Unbypass", 
    11171044                  function (cmd, part, zone, user) 
    1118                      log("Panel::TODO: Code me up!") 
    11191045                  end}, 
    11201046        ["dd"] = {"System", "User Code Deleted", 
    11211047                  function (cmd, part, zone, user) 
    1122                      log("Panel::TODO: Code me up!") 
    1123                   end}, 
     1048                          end}, 
    11241049        ["e1"] = {"Alarm", "Zone/Sensor Supv Al (Fire)", 
    11251050                  function (cmd, part, zone, user) 
    1126                      log("Panel::TODO: Code me up!") 
     1051                    setPartitionState(part, "Alarm", "Active"); 
    11271052                  end}, 
    11281053        ["e2"] = {"Alarm", "Zone/Sensor Supv Al Restore (Fire)", 
    11291054                  function (cmd, part, zone, user) 
    1130                      log("Panel::TODO: Code me up!") 
     1055                    setPartitionState(part, "Alarm", "None"); 
    11311056                  end}, 
    11321057        ["e3"] = {"Trouble", "Bell 1 Trouble", 
    11331058                  function (cmd, part, zone, user) 
    1134                      log("Panel::TODO: Code me up!") 
    11351059                  end}, 
    11361060        ["e4"] = {"All", "Bell 1 Trouble Restore", 
    11371061                  function (cmd, part, zone, user) 
    1138                      log("Panel::TODO: Code me up!") 
    11391062                  end}, 
    11401063        ["e7"] = {"Open/Close", "Early Close (Arm)", 
    11411064                  function (cmd, part, zone, user) 
    1142                      log("Panel::TODO: Code me up!") 
     1065                    setPartitionState(part, "ArmMode", "Armed") 
     1066                    setPartitionState(part, "DetailedArmMode", "Armed") 
     1067                    updateZoneStatus() 
    11431068                  end}, 
    11441069        ["e8"] = {"Open/Close", "Early Open (Disarm)", 
    11451070                  function (cmd, part, zone, user) 
    1146                      log("Panel::TODO: Code me up!") 
     1071                    setPartitionState(part, "ArmMode", "Disarmed") 
     1072                    setPartitionState(part, "DetailedArmMode", "Disarmed") 
     1073                    updateZoneStatus() 
    11471074                  end}, 
    11481075        ["e9"] = {"Trouble", "Intrusion Det. Hi Sensitivity", 
    11491076                  function (cmd, part, zone, user) 
    1150                      log("Panel::TODO: Code me up!") 
    11511077                  end}, 
    11521078        ["ea"] = {"Trouble", "Intrustion Det. Hi Sensitivity", 
    11531079                  function (cmd, part, zone, user) 
    1154                      log("Panel::TODO: Code me up!") 
    11551080                  end}, 
    11561081        ["eb"] = {"Alarm", "Duress Access Grant", 
    11571082                  function (cmd, part, zone, user) 
    1158                      log("Panel::TODO: Code me up!") 
    11591083                  end}, 
    11601084        ["ec"] = {"Trouble", "Access Point Relay Suprv Restored", 
    11611085                  function (cmd, part, zone, user) 
    1162                      log("Panel::TODO: Code me up!") 
    11631086                  end}, 
    11641087        ["ed"] = {"System", "User Code Changed", 
    11651088                  function (cmd, part, zone, user) 
    1166                      log("Panel::TODO: Code me up!") 
    1167                   end}, 
    1168  
    1169  
     1089                          end}, 
    11701090        ["f3"] = {"Trouble", "Bell 2 Trouble", 
    11711091                  function (cmd, part, zone, user) 
    1172                      log("Panel::TODO: Code me up!") 
    11731092                  end}, 
    11741093        ["f4"] = {"All", "Bell 2 Trouble Reset", 
    11751094                  function (cmd, part, zone, user) 
    1176                      log("Panel::TODO: Code me up!") 
    1177                   end},                      
     1095                          end},                      
    11781096        ["f5"] = {"All", "Faults", 
    11791097                  function (cmd, part, zone, user) 
    … …  
    11881106        ["f9"] = {"Trouble", "P.I.R. Detector Low Sensitivity", 
    11891107                  function (cmd, part, zone, user) 
    1190                      log("Panel::TODO: Code me up!") 
    11911108                  end}, 
    11921109        ["fa"] = {"Trouble", "Intrusion Detector Low Sensitivity", 
    11931110                  function (cmd, part, zone, user) 
    1194                      log("Panel::TODO: Code me up!") 
    1195                   end},             
     1111                          end},             
    11961112        ["fb"] = {"Alarm", "Duress Egress Grant", 
    11971113                  function (cmd, part, zone, user) 
    1198                      log("Panel::TODO: Code me up!") 
    11991114                  end}, 
    12001115        ["fc"] = {"Trouble", "Selftest Restored At A.C.S. Module", 
    12011116                  function (cmd, part, zone, user) 
    1202                      log("Panel::TODO: Code me up!") 
    1203                   end},             
     1117                          end},             
    12041118        ["fd"] = {"All", "Fail To Print", 
    12051119                  function (cmd, part, zone, user) 
    1206                      log("Panel::TODO: Code me up!") 
    1207                   end}, 
    1208         ["fe"] = {"All", "Fail To Print Restore", 
    1209                   function (cmd, part, zone, user) 
    1210                      log("Panel::TODO: Code me up!") 
     1120                  end}, 
     1121          ["fe"] = {"All", "Fail To Print Restore", 
     1122                  function (cmd, part, zone, user) 
    12111123                  end} 
    12121124        } 
    … …  
    12221134 
    12231135     if(stuff == nil) then 
    1224        log("Unhandled event. Raw Code " .. data) 
     1136       log("Error: Unhandled event. Raw Code " .. data) 
    12251137       return 
    12261138     end 
    12271139 
    12281140     local eventType, eventDescription, eventFunction = stuff[1], stuff[2], stuff[3]  
    1229      setPartitionState(1, "VendorStatus", eventDescription) 
    1230      setPartitionState(1, "VendorStatusCode", eventCode) 
    1231      setPartitionState(1, "VendorStatusData", eventType) 
     1141 
    12321142     zoneNumber = tonumber(zoneNumber) 
    12331143     userNumber = tonumber(userNumber) 
    12341144     part = tonumber(part) 
    1235   --   minute = minute:tonumber() 
    1236   --   hour = hour:tonumber() 
    1237   --   day = day:tonumber() 
    1238   --   month = month:tonumber() 
    1239   --   year = month:tonumber() 
    1240  
     1145  
     1146     setPartitionState(1, "VendorStatus", eventDescription) 
     1147       setPartitionState(1, "VendorStatusCode", eventCode) 
     1148       setPartitionState(1, "VendorStatusData", eventType) 
     1149     setPartitionState(1, "LastUser", userNumber) 
     1150           
    12411151     eventFunction(eventCode, part, zoneNumber, userNumber) 
    12421152   --  updatePanelLCD() 
    1243  
    1244   --   log(string.format("%s %s %s %s %s %s %s %s %s", eventCode, zoneNumber, userNumber, part, minute, hour, day, month, year)) 
    1245  
    1246   end 
    1247  
    1248  
     1153    
     1154     log(string.format("System Event Received Partition %d", part)) 
     1155     log(string.format("Event Code: 0x%s - %s - %s", eventCode, eventType, eventDescription)) 
     1156     log(string.format("Zone: %d", zoneNumber)) 
     1157     log(string.format("User: %d", userNumber)) 
     1158     log(string.format("Time Stamp %s/%s/%s %s:%s", month, day, year, hour, minute))      
     1159 
     1160  end 
    12491161 
    12501162  ---- Startup Code ---- 
    … …  
    12901202 
    12911203        status, message, area = initializeChildren(lul_device)     
    1292      
    1293   --      setVistaPanelState("EventLog", EventLog) 
    12941204         
    12951205        -- Tell Vera we are done creating children -- 
    … …  
    13111221      processZoneStatus(data) 
    13121222    end 
    1313   --  log(string.format("processIncoming:: Command code=%s, Data='%s'", code, data)) 
    1314     log(string.format("processIncoming:: Raw=%s", s))      
    1315   end 
     1223  end 
     1224   
     1225  ---- End of Code Block ---- 
    13161226 
    13171227  </functions> 
    … …  
    13301240      <name>SendCommand</name> 
    13311241      <run> 
    1332         log("Action::SendCommand: " .. (lul_settings.Command or "none") .. " Data:" .. (lul_settings.Data or "none")) 
    1333        
     1242        log("Action::SendCommand: " .. (lul_settings.Command or "none") .. " Data:" .. (lul_settings.Data or "none"))       
    13341243      </run> 
    13351244 
    … …  
    13631272         
    13641273 
    1365         log("Action::RequestArmMode " .. messageToSend) 
     1274        -- log("Action::RequestArmMode " .. messageToSend) 
    13661275      </run> 
    13671276    </action> 
Note: See TracChangeset for help on using the changeset viewer.