diff --git a/aard_inventory.xml b/aard_inventory.xml
new file mode 100644
index 0000000..b1fe01f
--- /dev/null
+++ b/aard_inventory.xml
@@ -0,0 +1,18928 @@
+<?xml version="1.0" encoding="iso-8859-1"?>
+<!DOCTYPE muclient>
+<!-- Saved on Saturday, August 12, 2017, 8:51 AM -->
+<!-- MuClient version 4.98 -->
+
+<!-- Plugin "aard_inventory" generated by Plugin Wizard -->
+
+<!--
+
+=====================
+Aard Inventory Plugin
+=====================
+
+Durel's Inventory Manager (dinv)
+Durel's Bag-of-Tricks (dbot)
+
+Author: Durel
+Version history:
+  v0.0.1 - 2017-07-01 - Initial code
+  v0.0.2 - 2017-08-12 - Converted scripts into a plugin
+  v0.0.3 - 2017-09-26 - Fully functional plugin published to github
+
+Description
+===========
+
+This plugin includes two primary packages: dinv and dbot.  The dinv package
+provides options to manage inventory and analyze equipment sets.  The dbot
+package is a framework of common code that could be shared among multiple
+plugins.  
+
+
+Durel's Inventory (dinv) Layout
+===============================
+
+inv.*         : Plugin management
+inv.version   : Plugin and component versions
+inv.config    : Inventory plugin configuration
+inv.cli       : Command-line interfaces
+inv.items     : Inventory table creation, access, and display
+inv.cache     : Item cache management and access
+inv.priority  : How to prioritize / weight each stat for equipment sets
+inv.score     : Scoring items and sets based on an equipment set prioritization
+inv.set       : Equipment set management creation and management
+inv.snapshot  : Snapshots of specific equipment sets
+inv.statBonus : Calculation and storage of character bonuses due to spells and equipment
+inv.analyze   : Calculation and storage of a priority's "optimal" equipment sets at each level
+inv.usage     : Calculate and display for which levels and priorities an item is used
+inv.tags      : Module to manage displaying terminating tags when a command completes
+inv.consume   : Module to manage buying, storing, and using consumable items (e.g., potions, pills)
+inv.portal    : Module to manage using portals from your inventory
+inv.pass      : Module to use area passes (not keys)
+
+
+Durel's Bag-of-Tricks (dbot) Layout
+===================================
+
+dbot init     : Init / de-init code for the dbot package
+dbot generic  : Top-level generic utility functions (e.g., custom version of tonumber, etc.)
+dbot.retval   : Return values / error codes
+dbot.table    : Convenient functions to manage table accesses
+dbot.notify   : Message notification sub-system
+dbot.gmcp     : Character and world state access functions via the GMCP protocol
+dbot.storage  : Save and load data using persistent storage
+dbot.backup   : System to support backing up and restoring all plugin state
+dbot.emptyLine: Module to allow suppression of empty output lines
+dbot.prompt   : Module to transparently enable or disable the prompt and related output
+dbot.invmon   : Module to check if invmon is enabled
+dbot.ability  : Module to track if a character has access to a particular skill or spell
+dbot.wish     : Module to track which wishes a character has purchased
+dbot.pagesize : Module to determine a character's current page size (# lines before page prompt)
+dbot.execute  : Execute one or more commands without contention from user-entered commands
+dbot.callback : Module to help manage callback functions and parameters
+
+-->
+
+<muclient>
+<plugin
+   name="aard_inventory"
+   author="Durel"
+   id="88c86ea252fc1918556df9fe"
+   language="Lua"
+   purpose="Inventory management and equipment set analysis"
+   save_state="y"
+   date_written="2017-08-12 08:45:15"
+   requires="4.98"
+   version="1.0"
+   >
+<description trim="y">
+<![CDATA[
+Aard Inventory Manager
+
+This plugin manages your inventory and gives you tools to analyze and use
+items in your inventory.
+
+The first step you'll need to take is to find an out-of-the-way room where
+you won't disturb anyone and then run "dinv build confirm".  This step
+will identify all items you are wearing, all items in your main inventory,
+and all items in containers in your inventory.  This will take roughly 5
+minutes depending on how many items are in your inventory.  If you need to
+halt the build simply go to sleep or go AFK.  You can "refresh" your
+inventory later to complete the process of identifying everything you are
+carrying.
+
+Once you have a completed inventory table available, I recommend making a
+manual backup in case something goes wrong in the future.  You can restore
+from the backup and avoid the long build process again.  If anything in
+your inventory has changed since the backup, your next refresh will simply 
+update it to what you currently have.  To make a manual backup named
+"my_first_awesome_backup" type "dinv backup create my_first_awesome_backup".
+See "dinv help backup" for more details about creating, viewing, and restoring
+backups.
+
+Type "dinv help" for all available usage options.  For detailed examples of
+how to use each option, simply type "dinv help <option>".
+
+
+Usage
+=====
+
+  Inventory table access
+    dinv build [confirm]
+    dinv refresh [on | off | all] <minutes>
+    dinv search [id | full] <query>
+
+  Item management
+    dinv get <query>
+    dinv put <container relative name> <query>
+    dinv store <query>
+    dinv keyword [add | remove] <keyword name> <query>
+    dinv organize [add | clear | display] <container relative name> <query>
+
+  Equipment sets
+    dinv set [display | wear] <priority name> <level>
+    dinv snapshot [create | delete | list | display | wear] <snapshot name>
+    dinv priority [list | display | compare] <priority name 1> <priority name 2>
+
+  Equipment analysis
+    dinv analyze [list | create | delete | display] <priority name> <positions>
+    dinv usage <priority name | all> <query>
+    dinv compare <priority name> <relative name>
+    dinv covet <priority name> <auction #>
+
+  Advanced options
+    dinv backup [list | create | delete | restore] <backup name>
+    dinv reset [list | confirm] <module names | all>
+    dinv forget <query>
+    dinv notify [none | light | standard | all]
+    dinv cache [reset | size] [recent | frequent | all] <# entries>
+    dinv tags <names | all> [on | off]
+
+  Using equipment items
+    dinv consume [add | remove | display | buy | small | big] <type> <name or quantity> <container>
+    dinv portal [use] <portal object ID>
+    dinv pass <pass ID> <# of seconds>
+
+  Plugin info
+    dinv version
+    dinv help <command>
+
+
+Release Notes
+=============
+
+1) There currently is no mechanism to change stat prioritization other than manually modifying the
+   plugin.  This is high on the list of new features and a GUI supporting this will hopefully be
+   coming in the future.
+
+2) If you give an item to an enchanter to boost the item's stats, you may pull the old stats from a
+   cache instead of using the new enchantments when you get the item back.  In this case, you may use
+   the "dinv forget <query>" option to remove that item from your inventory table and its related caches.
+   The next inventory refresh will pick up the new stats for the item.
+
+3) Most aard operations that modify an item's stats are detected and automatically trigger a 
+   re-identification.  For example, enchantment spells, sharpening, reinforcing, tpenchanting, and wset
+   all are handled transparently.  The one known exception is the setweight command which is not
+   currently handled by aard's invitem system.  Until this is changed (or until we include a trigger
+   watching for setweight) you will need to use the "dinv forget <query>" option on an item that changes
+   weight in order to "forget" the old stats and then pick up the correct weight (and other stats) on
+   the next inventory refresh.
+
+4) Wands and staves are not re-identified as they are used.  As a result, the number of charges
+   shown in the item's display may not match reality as the item is used.  If this mode is not added
+   to the aard invitem system, we may need to add a trigger to watch for this and update charges
+   accordingly.
+
+5) The plugin does not automatically open containers that are closed.  As a result, you won't be able
+   to get/put items in a closed container.  Keep your containers open! :)
+
+6) If you add a keyword to an item, drop it, and then pick it back up, the new keyword will still
+   be available on the item if it is still in your cache.  However, this is not the case for common
+   consumable items.  For example, we treat all duff beer potions as being identical so that you don't
+   need to individually identify each potion.  As a result, the cached versions of those common items
+   won't maintain custom keywords.
+
+7) If the plugin tags are enabled, they will echo an end tag at the conclusion of an operation.  However,
+   if the user goes into a state that doesn't allow echoing (e.g., AFK) then the plugin cannot report the
+   end tag.  In this scenario, the plugin will notify the user about the end tag via a warning notification
+   instead of an echo.  Triggers cannot catch notifications though so any code relying on end tags should
+   either detect when you go AFK or cleanly time out after a reasonable amount of time.
+
+
+Feature Wishlist
+================
+
+1) Add a way to create and update stat prioritizations.  A GUI would be a very convenient way
+   to handle this.
+
+2) Implement a mechanism to (more) fully identify items if the identify wish is not available.
+   For example, we could use lore, the identify or object read spells, or Hester's identify
+   service found at "runto identify".  This would be a manual process to "clean up" partially
+   identified items.
+
+3) Add a display option to de-duplicate potions and pills in search results
+
+
+]]>
+</description>
+
+</plugin>
+
+
+<!--  Get our standard constants -->
+
+<include name="constants.lua"/>
+
+<!--  Aliases  -->
+
+<aliases>
+
+  <alias
+   script="inv.cli.put.fn"
+   match="^[ ]*dinv[ ]+put[ ]+(.*?)[ ]+(.*?)$"
+   enabled="y"
+   regexp="y"
+   send_to="12"
+   sequence="100"
+  >
+  </alias>
+
+  <alias
+   script="inv.cli.build.fn"
+   match="^[ ]*dinv[ ]+build[ ]*( confirm|.*)?$"
+   enabled="y"
+   regexp="y"
+   send_to="12"
+   sequence="100"
+  >
+  </alias>
+
+  <alias
+   script="inv.cli.refresh.fn"
+   match="^[ ]*dinv[ ]+refresh[ ]*(off|all)?[ ]*$"
+   enabled="y"
+   regexp="y"
+   send_to="12"
+   sequence="100"
+  >
+  </alias>
+
+  <alias
+   script="inv.cli.refresh.fn"
+   match="^[ ]*dinv[ ]+refresh[ ]*(on)[ ]*([0-9]+)?$"
+   enabled="y"
+   regexp="y"
+   send_to="12"
+   sequence="100"
+  >
+  </alias>
+
+  <alias
+   script="inv.cli.reset.fn"
+   match="^[ ]*dinv[ ]+reset[ ]+(list|confirm)[ ]*(.*?)?$"
+   enabled="y"
+   regexp="y"
+   send_to="12"
+   sequence="100"
+  >
+  </alias>
+
+  <alias
+   script="inv.cli.search.fn"
+   match="^[ ]*dinv[ ]+search[ ]*(basic|id|full|raw|)[ ]*(.*?)$"
+   enabled="y"
+   regexp="y"
+   send_to="12"
+   sequence="100"
+  >
+  </alias>
+
+  <alias
+   script="inv.cli.set.fn"
+   match="^[ ]*dinv[ ]+set[ ]+(display|wear)[ ]+(.*?)[ ]*([0-9]*)?$"
+   enabled="y"
+   regexp="y"
+   send_to="12"
+   sequence="100"
+  >
+  </alias>
+
+  <alias
+   script="inv.cli.snapshot.fn"
+   match="^[ ]*dinv[ ]+snapshot[ ]+(create|delete|list|display|wear)[ ]*([^ ]+)?$"
+   enabled="y"
+   regexp="y"
+   send_to="12"
+   sequence="100"
+  >
+  </alias>
+
+  <alias
+   script="inv.cli.store.fn"
+   match="^[ ]*dinv[ ]+store[ ]+(.*?)$"
+   enabled="y"
+   regexp="y"
+   send_to="12"
+   sequence="100"
+  >
+  </alias>
+
+  <alias
+   script="inv.cli.tags.fn"
+   match="^[ ]*dinv[ ]+tags[ ]*(.*?)?[ ]*(on|off)?$"
+   enabled="y"
+   regexp="y"
+   send_to="12"
+   sequence="100"
+  >
+  </alias>
+
+  <alias
+   script="inv.cli.usage.fn"
+   match="^[ ]*dinv[ ]+usage[ ]+(all|[^ ]+)[ ]*(.*?)?$"
+   enabled="y"
+   expand_variables="y"
+   regexp="y"
+   send_to="12"
+   sequence="100"
+  >
+  </alias>
+
+  <alias
+   script="inv.cli.version.fn"
+   match="^[ ]*dinv[ ]+version.*$"
+   enabled="y"
+   regexp="y"
+   send_to="12"
+   sequence="100"
+  >
+  </alias>
+
+  <alias
+   script="inv.cli.organize.fn1"
+   match="^[ ]*dinv[ ]+organize[ ]+(add|clear)[ ]+([^ ]+)[ ]*(.*?)$"
+   enabled="y"
+   regexp="y"
+   send_to="12"
+   sequence="99"
+  >
+  </alias>
+
+  <alias
+   script="inv.cli.organize.fn2"
+   match="^[ ]*dinv[ ]+organize[ ]+(display)[ ]*$"
+   enabled="y"
+   regexp="y"
+   send_to="12"
+   sequence="99"
+  >
+  </alias>
+
+  <alias
+   script="inv.cli.help.fn"
+   match="^[ ]*dinv[ ]*$"
+   enabled="y"
+   regexp="y"
+   send_to="12"
+   sequence="100"
+  >
+  </alias>
+
+  <alias
+   script="inv.cli.analyze.fn"
+   match="^[ ]*dinv[ ]+analyze[ ]+(create|delete|display)[ ]+([^ ]*)[ ]*(.*?)?$"
+   enabled="y"
+   expand_variables="y"
+   regexp="y"
+   send_to="12"
+   sequence="100"
+  >
+  </alias>
+
+  <alias
+   script="inv.cli.analyze.fn2"
+   match="^[ ]*dinv[ ]+analyze[ ]+list[ ]*$"
+   enabled="y"
+   expand_variables="y"
+   regexp="y"
+   send_to="12"
+   sequence="100"
+  >
+  </alias>
+
+  <alias
+   script="inv.cli.keyword.fn"
+   match="^[ ]*dinv[ ]+keyword[ ]+(add|remove)[ ]+(.*?)([ ]+.*?)?$"
+   enabled="y"
+   regexp="y"
+   send_to="12"
+   sequence="100"
+  >
+  </alias>
+
+  <alias
+   script="inv.cli.cache.fn"
+   match="^[ ]*dinv[ ]+cache[ ]+(reset|display|size)[ ]+(recent|frequent|all)[ ]*([0-9]+)?.*$"
+   enabled="y"
+   regexp="y"
+   send_to="12"
+   sequence="100"
+  >
+  </alias>
+
+  <alias
+   script="inv.cli.compare.fn"
+   match="^[ ]*dinv[ ]+compare[ ]+([^ ]+)[ ]+([^ ]+)$"
+   enabled="y"
+   regexp="y"
+   send_to="12"
+   sequence="100"
+  >
+  </alias>
+
+  <alias
+   script="inv.cli.consume.fn"
+   match="^[ ]*dinv[ ]+consume[ ]+(add|remove|display)[ ]*([^ ]+)?[ ]*(.*?)?[ ]*$"
+   enabled="y"
+   regexp="y"
+   send_to="12"
+   sequence="100"
+  >
+  </alias>
+
+  <alias
+   script="inv.cli.consume.fn"
+   match="^[ ]*dinv[ ]+consume[ ]+(buy|small|big)[ ]*([^ ]+)?[ ]*([^ ]+)?[ ]*([^ ]+)?$"
+   enabled="y"
+   regexp="y"
+   send_to="12"
+   sequence="100"
+  >
+  </alias>
+
+  <alias
+   script="inv.cli.covet.fn"
+   match="^[ ]*dinv[ ]+covet[ ]+([^ ]+)[ ]+([^ ]+)$"
+   enabled="y"
+   regexp="y"
+   send_to="12"
+   sequence="100"
+  >
+  </alias>
+
+  <alias
+   script="inv.cli.forget.fn"
+   match="^[ ]*dinv[ ]+forget[ ]*(.*?)?$"
+   enabled="y"
+   regexp="y"
+   send_to="12"
+   sequence="100"
+  >
+  </alias>
+
+  <alias
+   script="inv.cli.get.fn"
+   match="^[ ]*dinv[ ]+get[ ]+(.*?)$"
+   enabled="y"
+   regexp="y"
+   send_to="12"
+   sequence="100"
+  >
+  </alias>
+
+  <alias
+   script="inv.cli.help.fn"
+   match="^[ ]*dinv[ ]+help[ ]*([^ ]*)?[ ]*$"
+   enabled="y"
+   regexp="y"
+   send_to="12"
+   sequence="100"
+  >
+  </alias>
+
+  <alias
+   script="inv.cli.notify.fn"
+   match="^[ ]*dinv[ ]+notify[ ]+(none|light|standard|all)$"
+   enabled="y"
+   regexp="y"
+   send_to="12"
+   sequence="100"
+  >
+  </alias>
+
+  <alias
+   script="inv.cli.organize.fn3"
+   match="^[ ]*dinv[ ]+organize[ ]*(.*?)$"
+   enabled="y"
+   regexp="y"
+   send_to="12"
+   sequence="100"
+  >
+  </alias>
+
+  <alias
+   script="inv.cli.pass.fn"
+   match="^[ ]*dinv[ ]+pass[ ]+([^ ]+)[ ]+([0-9]+)[ ]*$"
+   enabled="y"
+   regexp="y"
+   send_to="12"
+   sequence="100"
+  >
+  </alias>
+
+  <alias
+   script="inv.cli.portal.fn"
+   match="^[ ]*dinv[ ]+portal[ ]+(use)[ ]+([0-9]+)[ ]*$"
+   enabled="y"
+   regexp="y"
+   send_to="12"
+   sequence="100"
+  >
+  </alias>
+
+  <alias
+   script="inv.cli.priority.fn"
+   match="^[ ]*dinv[ ]+priority[ ]+(list|display|compare)[ ]*([^ ]*)?[ ]*([^ ]*)?$"
+   enabled="y"
+   regexp="y"
+   send_to="12"
+   sequence="100"
+  >
+  </alias>
+
+  <alias
+   script="inv.cli.backup.fn"
+   match="^[ ]*dinv[ ]+backup[ ]+(list|create|delete|restore|auto)[ ]*([^ ]+)?[ ]*$"
+   enabled="y"
+   regexp="y"
+   send_to="12"
+   sequence="100"
+  >
+  </alias>
+
+</aliases>
+
+<!--  Script  -->
+
+
+<script>
+<![CDATA[
+
+----------------------------------------------------------------------------------------------------
+-- Plugin Information
+----------------------------------------------------------------------------------------------------
+
+pluginNameCmd   = "dinv" 
+pluginNameAbbr  = "DINV" 
+pluginId        = "88c86ea252fc1918556df9fe"
+pluginPath      = GetPluginInfo(GetPluginID(), 20)
+pluginStatePath = (pluginPath or "nil") .. "state\\" .. pluginNameCmd .. "-" .. pluginId
+
+
+----------------------------------------------------------------------------------------------------
+-- External dependencies
+----------------------------------------------------------------------------------------------------
+
+require "wait"
+require "check"
+require "serialize"
+require "tprint"
+require "gmcphelper"
+
+dofile(pluginPath .. "aardwolf_colors.lua")
+
+
+----------------------------------------------------------------------------------------------------
+-- Mushclient plugin callbacks
+----------------------------------------------------------------------------------------------------
+
+function OnPluginInstall()
+
+  dbot.debug("OnPluginInstall!")
+
+  local retval = inv.reload(drlDoSaveState)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("OnPluginInstall: Failed to load/reload plugin: " .. dbot.retval.getString(retval))
+  end -- if
+
+end -- OnPluginInstall
+
+
+-- You might think that this would be a great place to de-init the plugin.  Unfortunately, 
+-- MUSHclient calls OnPluginSaveState AFTER calling OnPluginClose.  This means that the state
+-- won't save properly if we fully de-init our data and clean things up.  Bummer.  Instead, we
+-- currently use a somewhat convoluted scheme duplicating code in OnPluginDisconnect and in
+-- the inv.reload() function called by OnPluginInstall.
+--
+-- I'm leaving this here as a placeholder for now.  Maybe we could use it for something in the
+-- future.
+function OnPluginClose()
+  dbot.debug("OnPluginClose")
+end -- OnPluginClose
+
+
+-- There currently isn't a need for this callback in our plugin.  This is just a placeholder for now.
+function OnPluginWorldSave()
+  dbot.debug("OnPluginWorldSave")
+end -- OnPluginWorldSave
+
+
+function OnPluginSaveState()
+  local retval
+
+  dbot.debug("OnPluginSaveState!")
+
+  -- We can't save state if GMCP isn't initialized because we don't know which character's state
+  -- we need to save or where to save it
+  if (dbot.gmcp.isInitialized == false) then
+    return
+  end -- if
+
+  -- We also can't save state if we aren't initialized yet
+  if (not dbot.init.initializedActive) then
+    dbot.info("OnPluginSaveState: Skipping save because plugin is not yet initialized")
+    local charState = dbot.gmcp.getState() or "Uninitialized"
+    if (charState ~= dbot.stateActive) then
+      dbot.info("You must be in the active state to complete initialization but your state is \"@C" ..
+                dbot.gmcp.getStateString(charState) .. "@W\"")
+    end -- if
+    return
+  end -- if
+
+  -- The inv and dbot modules always call the appropriate *.save() function as soon as possible
+  -- when saved state needs to be updated.  However, it doesn't hurt to be a bit paranoid and
+  -- allow the user to explicitly save plugin state here.
+
+  -- Save state of all inventory modules
+  for module in inv.modules:gmatch("%S+") do
+    if (inv[module].save ~= nil) then
+      retval = inv[module].save()
+      if (retval ~= DRL_RET_SUCCESS) then
+        dbot.warn("OnPluginSaveState: Failed to save state for inv." .. module .. " module: " ..
+                  dbot.retval.getString(retval))
+      end -- if
+    end -- if
+  end -- for
+
+  -- Save state of all dbot modules
+  for module in dbot.modules:gmatch("%S+") do
+    if (dbot[module].save ~= nil) then
+      retval = dbot[module].save()
+      if (retval ~= DRL_RET_SUCCESS) then
+        dbot.warn("OnPluginSaveState: Failed to save state for dbot." .. module .. " module: " ..
+                  dbot.retval.getString(retval))
+      end -- if
+    end -- if
+  end -- for
+
+  -- Update any automatic backups for the saved plugin state
+  retval = dbot.backup.current()
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("OnPluginSaveState: Failed to backup plugin state: " .. dbot.retval.getString(retval))
+  end -- if
+
+end -- OnPluginSaveState
+
+
+function OnPluginConnect()
+  dbot.debug("OnPluginConnect!")
+
+  -- If we aren't initialized yet, initialize everything...Yes, this technically isn't "install time"
+  -- but it is close enough for our purposes.  The important thing is that we don't try to init any
+  -- "at active" things such as loading saved state.  We don't know which char's state to load until
+  -- the user logs in and GMCP can give us the username.
+  if (inv.init.initializedInstall == false) then
+    local retval = inv.init.atInstall()
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("OnPluginConnect: Failed to init \"at install\" inventory code: " ..
+                dbot.retval.getString(retval))
+    end -- if
+  end -- if
+
+end -- OnPluginConnect
+
+
+function OnPluginDisconnect()
+  dbot.debug("OnPluginDisconnect!")
+
+  local retval = inv.fini(drlDoSaveState)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("OnPluginDisconnect: Failed to de-init the inventory module: " .. dbot.retval.getString(retval))
+  end -- if
+end -- OnPluginDisconnect
+
+
+function OnPluginEnable()
+  dbot.note("OnPluginEnable!")
+end -- OnPluginEnable
+
+
+function OnPluginDisable()
+  dbot.note("OnPluginDisable!")
+end -- OnPluginDisable
+
+
+function OnPluginTelnetOption(msg)
+  if (msg == string.char(100, 1)) then
+    dbot.debug("Player is at login screen")
+
+  elseif (msg == string.char(100, 2)) then
+    dbot.debug("Player is at MOTD or login sequence")
+
+  elseif (msg == string.char(100, 3)) then
+    dbot.debug("Player is fully active!")
+
+    -- We already have code to do the atActive init when we detect that GMCP is alive.  However, it
+    -- is also convenient to duplicate it here so that we can attempt to init the moment we come out
+    -- of AFK.  This makes the init a little more reponsive than waiting for GMCP.  This could happen
+    -- if the user is AFK when they log in and then exits AFK at some indeterminate time in the future.
+    if (dbot.gmcp.isInitialized) and (not inv.init.initializedActive) then
+      local retval = inv.init.atActive()
+      if (retval ~= DRL_RET_SUCCESS) then
+        dbot.warn("OnPluginTelnetOption: Failed to init \"at active\" inventory modules: " ..
+                  dbot.retval.getString(retval))
+      end -- if
+    end -- if
+
+  elseif (msg == string.char(100, 4)) then
+    dbot.debug("Player is AFK!")
+
+    -- We keep track of the time between when an "afk" command is sent to the mud and when we actually
+    -- go into afk mode.  This is helpful because there is a small window where we want to hold off
+    -- on starting an atomic operation if we will shortly be in afk mode.  Once we know we are in AFK
+    -- mode, we no longer have a "pending" state.
+    dbot.execute.afkIsPending = false
+
+    -- If we are AFK, we may as well make a backup.  We don't have anything better to do...  We don't
+    -- want to do this if someone quickly toggles AFK though so we wait a few seconds and verify that
+    -- we are still AFK before we kick off the backup.
+    check (DoAfterSpecial(5, "dbot.backup.atAFK()", sendto.script))
+
+  end -- if
+
+end -- OnPluginTelnetOption
+
+
+gmcpPluginId = "3e7dedbe37e44942dd46d264"
+function OnPluginBroadcast(msg, pluginId, pluginName, text)
+  local retval = DRL_RET_SUCCESS
+
+  -- We want to wait to init things until plugins are loaded and the system is stable.  This is
+  -- a little ugly, but we wait until the GMCP plugin broadcasts something.  That seems as likely
+  -- a time as any for it to be safe for us to init things.  We manually kick GMCP by requesting the
+  -- char.base info in the OnPluginInstall() function just to be sure that we are initialized.
+  if (pluginId == gmcpPluginId) then
+    dbot.debug("OnPluginBroadcast: pluginName = \"" .. (pluginName or "main script") .. "\", text = \"" ..
+               text .. "\"")
+
+    -- Once we know GMCP is alive, we allow accesses to it
+    if (dbot.gmcp.isInitialized == false) and (text == "char.base") then
+      dbot.debug("GMCP base broadcast detected: GMCP is initialized!")
+      dbot.gmcp.isInitialized = true
+
+      if (dbot.gmcp.getState() == dbot.stateActive) then
+        retval = inv.init.atActive()
+        if (retval ~= DRL_RET_SUCCESS) then
+          dbot.warn("OnPluginBroadcast: Failed to init \"at active\" inventory modules: " ..
+                    dbot.retval.getString(retval))
+        end -- if
+      end -- if
+    end -- if
+
+  end -- if
+  end -- OnPluginBroadcast
+
+
+function OnPluginSend(msg)
+
+  local baseCommand
+
+  -- Can this ever happen?  I guess it doesn't hurt to be paranoid...
+  if (msg == nil) then
+    return false
+  end -- if
+
+  --dbot.note("@MOnPluginSend@W: Detected request to send \"@G" .. msg .. "@W\"")
+
+  -- If the command has a special "bypass" prefix appended to it, we strip off the prefix
+  -- and send it to the mud server immediately no questions asked.  In this case, we return
+  -- false because we don't want to send something with the prefix to the mud server.  The
+  -- server wouldn't know what to do with that.
+  _, _, baseCommand = string.find(msg, dbot.execute.bypassPrefix .. "(.*)")
+  if (baseCommand ~= nil) then
+    --dbot.note("@mBypass command = @W\"@G" .. (baseCommand or "nil") .. "@W\"")
+
+    -- It is helpful in some scenarios for us to know that we will soon be in AFK mode or that
+    -- the user has started to quit
+    if (string.lower(baseCommand) == "afk") and (dbot.gmcp.getState() ~= dbot.stateAFK) then
+      dbot.execute.afkIsPending = true
+    elseif (string.lower(baseCommand) == "quit") then
+      dbot.execute.quitIsPending = true
+    end -- if
+
+    check (Send(baseCommand))
+    return false
+  end -- if
+
+  -- If we are at this point, then we know that we don't have a "bypass" command.  This means
+  -- that we should either queue up the command if we are in a state where we are delaying
+  -- command execution, or we should allow the command to go through as normal.
+  if dbot.execute.doDelayCommands then
+    dbot.execute.queue.pushFast(msg)
+
+    -- We just added a new command to the command queue.  If we don't already have a 
+    -- co-routine processing commands on that queue, start one now.
+    if (not dbot.execute.queue.isDequeueRunning) then
+      dbot.execute.queue.isDequeueRunning = true
+      wait.make(dbot.execute.queue.dequeueCR)
+    end -- if
+
+    return false -- Don't send the command right now
+
+  else
+    -- It is helpful in some scenarios for us to know that we will soon be in AFK mode
+    if (string.lower(msg) == "afk") and (dbot.gmcp.getState() ~= dbot.stateAFK) then
+      dbot.execute.afkIsPending = true
+    elseif (string.lower(msg) == "quit") then
+      dbot.execute.quitIsPending = true
+    end -- if
+
+    return true  -- Allow the command to go to the mud server
+  end -- if
+
+end -- OnPluginSend
+
+
+----------------------------------------------------------------------------------------------------
+-- Top-level inventory functions
+--
+-- Functions
+--   inv.init.atInstall()    -- add triggers, timers, etc.
+--   inv.init.atActive()     -- kick off inv.init.atActiveCR co-routine
+--   inv.init.atActiveCR()   -- load tables, etc.
+--   inv.fini(doSaveState)   -- remove triggers, save tables, etc.
+--   inv.reset(endTag)       -- Reset some or all of the inventory components / modules
+--   inv.reload(doSaveState) -- De-init and re-init everything
+----------------------------------------------------------------------------------------------------
+
+inv            = {}
+inv.init       = {}
+inv.modules    = "config items cache priority set statBonus consume snapshot tags"
+inv.inSafeMode = false
+
+inv.init.initializedInstall = false
+inv.init.initializedActive  = false
+
+drlDoSaveState    = true
+drlDoNotSaveState = false
+
+
+function inv.init.atInstall()
+  local retval = DRL_RET_SUCCESS
+
+  -- Initialize all of the "at install" dbot modules (this is a common code framework for multiple plugins)
+  if (dbot.init.initializedInstall == false) then
+    retval = dbot.init.atInstall()
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.init.atInstall: Failed to initialize \"at install\" dbot modules: " ..
+                dbot.retval.getString(retval))
+    else
+      dbot.init.initializedInstall = true
+    end -- if
+  end -- if
+
+  if inv.init.initializedInstall then
+    dbot.note("Skipping inv.init.atInstall request: it is already initialized")
+    return retval
+  end -- if
+
+  -- We aren't running the discovery or identification processes yet
+  inv.state = invStateIdle
+
+  -- Loop through all of the "at install" inv modules and call their init functions
+  retval = DRL_RET_SUCCESS
+  if (inv.init.initializedInstall == false) then
+    for module in inv.modules:gmatch("%S+") do
+      if (inv[module].init.atInstall ~= nil) then
+        local initVal = inv[module].init.atInstall()
+        if (initVal ~= DRL_RET_SUCCESS) then
+          dbot.warn("inv.init.atInstall: Failed to initialize \"at install\" inv." .. module .. " module: " .. 
+                    dbot.retval.getString(initVal))
+          retval = initVal
+        else
+          dbot.debug("Initialized \"at install\" module inv." .. module)
+        end -- if
+      end -- if
+    end -- for
+
+    if (retval == DRL_RET_SUCCESS) then
+      inv.init.initializedInstall = true
+    end -- if
+  end -- if
+
+  -- We need access to GMCP in order to determine our state in some circumstances.  If we start
+  -- mush from scratch, then we can determine our state via OnPluginTelnetOption.  Easy Peasy.
+  -- However, if we manually reinstall the plugin, then our plugin may have missed the output from
+  -- OnPluginTelnetOption and we don't know what our state is.  We can get that from GMCP, but we
+  -- don't know if GMCP is available yet and querying the gmcp plugin will crash if it's not in
+  -- an initialized state.  So...what do we do?  We wait for OnPluginBroadcast to detect that GMCP
+  -- is up and running.  We'd rather not wait too long to detect this though so we nudge things
+  -- along by asking GMCP to send out the char data.  We can detect this broadcast and know that
+  -- GMCP is alive when the broadcast arrives.
+  Send_GMCP_Packet("request char")
+
+  -- Return success or the most recently encountered init error
+  return retval
+
+end -- inv.init.atInstall
+
+
+-- This is only called when we know we are in the active state.  Many of the actions we take
+-- at the "active" state involve waiting for results so we use a co-routine to handle all of
+-- the "at active" operations.
+function inv.init.atActive()
+  wait.make(inv.init.atActiveCR)
+
+  return DRL_RET_SUCCESS
+end -- inv.init.atActive
+
+
+function inv.init.atActiveCR()
+  local retval = DRL_RET_SUCCESS
+
+  if (dbot.gmcp.isInitialized == false) then
+    dbot.error("inv.init.atActiveCR: GMCP is not initialized when we are active!?!")
+    return DRL_RET_INTERNAL_ERROR
+  end -- if
+
+  -- Initialize all of the "at active" dbot modules (this is a common code framework for multiple plugins)
+  if (dbot.init.initializedActive == false) then
+    retval = dbot.init.atActive()
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.init.atActiveCR: Failed to initialize \"at active\" dbot modules: " ..
+                dbot.retval.getString(retval))
+    else
+      dbot.debug("Initialized dbot \"at active\" modules")
+      dbot.init.initializedActive = true
+    end -- if
+  end -- if
+
+  -- Initialize all of the "at active" inventory modules
+  retval = DRL_RET_SUCCESS
+  if (inv.init.initializedActive == false) then
+    for module in inv.modules:gmatch("%S+") do
+      if (inv[module].init.atActive ~= nil) then
+        local initVal = inv[module].init.atActive()
+        if (initVal ~= DRL_RET_SUCCESS) then
+          dbot.warn("inv.init.atActiveCR: Failed to initialize \"at active\" inv." .. module .. " module: " .. 
+                    dbot.retval.getString(initVal))
+          retval = initVal
+        else
+          dbot.debug("Initialized \"at active\" module inv." .. module)
+        end -- if
+      end -- if
+    end -- for
+
+    if (retval == DRL_RET_SUCCESS) then
+      inv.init.initializedActive = true
+      dbot.info("Plugin is fully initialized: Scanning all items and containers")
+
+      -- Kick off an immediate full inventory refresh so that we have an accurate view of what
+      -- the user has.  They may have logged in without using the plugin and moved things around
+      -- or added and removed items.
+      retval = inv.items.refresh(0, invItemsRefreshLocAll, nil, nil)
+      if (retval ~= DRL_RET_SUCCESS) and (retval ~= DRL_RET_UNINITIALIZED) then
+         dbot.info("Initial full inventory rescan could not complete: " .. dbot.retval.getString(retval))
+         dbot.info("Please run \"@Gdinv refresh all@W\" to ensure the plugin knows that you didn't do " ..
+                   "something evil like logging in via telnet to move items around :P")
+      end -- if
+    end -- if
+  end -- if
+
+  -- Return success or the most recently encountered init error
+  return retval
+
+end -- inv.init.atActiveCR
+
+
+function inv.fini(doSaveState)
+  local retval = DRL_RET_SUCCESS
+
+  -- Stop automatic refreshes as we de-init things
+  inv.state = invStateHalted
+
+  if dbot.gmcp.isInitialized then
+    -- Update any automatic backups for the saved plugin state
+    retval = dbot.backup.current()
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.fini: Failed to backup plugin state: " .. dbot.retval.getString(retval))
+    end -- if
+  
+    -- Loop through all of the inv modules and call their de-init functions
+    for module in inv.modules:gmatch("%S+") do
+      local initVal = inv[module].fini(doSaveState)
+      if (initVal ~= DRL_RET_SUCCESS) then
+        dbot.warn("inv.fini: Failed to de-initialize inv." .. module .. " module: " .. 
+                  dbot.retval.getString(initVal))
+        retval = initVal
+      else
+        dbot.debug("De-initialized inv module \"" .. module .. "\"")
+      end -- if
+    end -- for
+
+    -- De-init all of the dbot modules (common framework code for multiple plugins)
+    retval = dbot.fini(doSaveState)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("init.fini: De-initialization of dbot module failed: " .. dbot.retval.getString(retval))
+    end -- if
+  end -- if
+
+  -- This indicates that we are now uninitialized
+  inv.init.initializedInstall = false
+  inv.init.initializedActive  = false
+  inv.state = nil
+
+  -- Return success or the most recently encountered de-init error
+  return retval
+
+end -- inv.fini
+
+
+-- Takes a string containing module names to reset (e.g., "items config portal cache")
+function inv.reset(moduleNames, endTag)
+  local retval = DRL_RET_SUCCESS
+  local numModulesReset = 0
+
+  if (moduleNames == nil) or (modulesNames == "") then
+    dbot.warn("inv.reset: missing module names to reset")
+  end -- if
+
+  if (moduleNames == "all") then
+    moduleNames = inv.modules
+  end -- if
+
+  -- Loop through all of the module names in the list and attempt to reset each module with a
+  -- corresponding name
+  for moduleName in moduleNames:gmatch("%S+") do
+    if dbot.isWordInString(moduleName, inv.modules) then
+      dbot.note("Resetting module \"@C" .. moduleName .. "@W\"")
+      local currentRetval = inv[moduleName].reset()
+
+      -- Remember the most recent error so that we can return it
+      if (currentRetval ~= DRL_RET_SUCCESS) then
+        dbot.warn("inv.reset: Failed to reset module \"@C" .. moduleName .. "@W\": " ..
+                  dbot.retval.getString(currentRetval))
+        retval = currentRetval
+      else
+        numModulesReset = numModulesReset + 1
+      end -- if
+    else
+      dbot.warn("inv.reset: Attempted to reset invalid module name \"@C" .. moduleName .. "@W\"")
+      retval = DRL_RET_MISSING_ENTRY
+    end -- if
+  end -- for
+
+  local suffix = ""
+  if (numModulesReset ~= 1) then
+    suffix = "s"
+  end -- if 
+
+  dbot.info("Successfully reset " .. numModulesReset .. " module" .. suffix)
+
+  return inv.tags.stop(invTagsReset, endTag, retval)
+end -- inv.reset
+
+
+function inv.reload(doSaveState)
+  local retval = DRL_RET_SUCCESS
+
+  -- De-init the plugin if it is already initialized.  This could happen if we restore state from
+  -- a backup and want to re-init everything
+  if inv.init.initializedInstall then
+    dbot.note("inv.reload: Reinitializing plugin")
+
+    retval = inv.fini(doSaveState)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.reload: Failed to de-initialize inventory module: " .. 
+                dbot.retval.getString(retval))
+    end -- if
+  end -- if
+
+  -- Init everything that we can at "install time".  This typically would entail adding triggers,
+  -- timers, and aliases.  We don't want to try loading saved state here though (that's at "active time")
+  -- because we need GMCP initialized to get the user's name in order to get the correct user's state.
+  retval = inv.init.atInstall()
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.reload: Failed to init \"at install\" inventory code: " ..
+              dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+end -- inv.reload
+
+
+----------------------------------------------------------------------------------------------------
+-- Versions of the plugin and plugin components
+--
+-- Functions:
+--   inv.version.get()
+--   inv.version.display()
+--
+-- Data:
+--    inv.version.table
+----------------------------------------------------------------------------------------------------
+
+inv.version = {}
+inv.version.table = { pluginVer      = { major = 0, minor = 1, build = 3 },
+                      tableFormat    = { major = 0, minor = 1 },
+                      cacheFormat    = { major = 0, minor = 1 },
+                      consumeFormat  = { major = 0, minor = 1 },
+                      priorityFormat = { major = 0, minor = 1 }, 
+                      setFormat      = { major = 0, minor = 1 }, 
+                      snapshotFormat = { major = 0, minor = 1 } 
+                    }
+
+
+function inv.version.get()
+  return inv.version.table
+end -- inv.version.get
+
+
+function inv.version.display()
+  dbot.print("\n @y" .. pluginNameAbbr .. " Aardwolf Plugin\n" ..
+                "------------------------@w")
+  dbot.print("@WPlugin Version:    @G" .. 
+                inv.version.table.pluginVer.major .. "." ..
+                inv.version.table.pluginVer.minor .. "." ..
+                inv.version.table.pluginVer.build .. "@w")
+  dbot.print("")
+  dbot.print("@WInv. Table Format:   @G" .. 
+                inv.version.table.tableFormat.major .. "." ..
+                inv.version.table.tableFormat.minor .. "@w")
+  dbot.print("@WInv. Cache Format:   @G" .. 
+                inv.version.table.cacheFormat.major .. "." ..
+                inv.version.table.cacheFormat.minor .. "@w")
+  dbot.print("@WConsumable Format:   @G" .. 
+                inv.version.table.consumeFormat.major .. "." ..
+                inv.version.table.consumeFormat.minor .. "@w")
+  dbot.print("@WPriorities Format:   @G" .. 
+                inv.version.table.priorityFormat.major .. "." ..
+                inv.version.table.priorityFormat.minor .. "@w")
+  dbot.print("@WEquip Set Format:    @G" .. 
+                inv.version.table.setFormat.major .. "." ..
+                inv.version.table.setFormat.minor .. "@w")
+  dbot.print("@WSnapshot Format:     @G" .. 
+                inv.version.table.snapshotFormat.major .. "." ..
+                inv.version.table.snapshotFormat.minor .. "@w")
+  dbot.print("")
+
+  return DRL_RET_SUCCESS
+end -- inv.version.display
+
+
+----------------------------------------------------------------------------------------------------
+-- Versions of the plugin and plugin components
+--
+-- Functions:
+--   inv.config.init.atActive()
+--   inv.config.fini(doSaveState)
+--
+--   inv.config.save()
+--   inv.config.load()
+--   inv.config.reset()
+--   inv.config.new()
+--
+-- Data:
+--    inv.config.table
+--    inv.config.stateName  -- name for file holding state in persistent storage
+----------------------------------------------------------------------------------------------------
+
+inv.config           = {}
+inv.config.init      = {}
+inv.config.table     = {} 
+inv.config.stateName = "inv-config.state"
+
+
+function inv.config.init.atActive()
+  local retval = DRL_RET_SUCCESS
+
+  retval = inv.config.load()
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.config.init.atActive: failed to load config data from storage: " ..
+              dbot.retval.getString(retval))
+  end -- if
+
+  -- It's possible that we previously disabled the prompt and could not re-enable it.  For example,
+  -- maybe the user closed mushclient in the middle of a refresh.  In that case, we wouldn't have the
+  -- opportunity to turn the prompt back on.  As a result, we keep track of the user's prompt state
+  -- and put it back to the last known value here if the current state doesn't match what we expect.
+  if (inv.config.table.isPromptEnabled ~= nil) and
+     (inv.config.table.isPromptEnabled ~= dbot.prompt.isEnabled) then
+    dbot.info("Prompt state does not match expected state: toggling prompt")
+
+    -- We don't use an execute.safe call here because we haven't finished initializing and the safe
+    -- execution framework requires us to be fully initialized.
+    dbot.execute.fast.command("prompt")
+    dbot.execute.queue.fence()
+  end -- if
+
+  return retval
+end -- inv.config.init.atActive
+
+
+function inv.config.fini(doSaveState)
+  local retval = DRL_RET_SUCCESS
+
+  -- Save our current data
+  if (doSaveState) then
+    retval = inv.config.save()
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.config.fini: Failed to save inv.config module data: " .. dbot.retval.getString(retval))
+    end -- if
+  end -- if
+
+  return retval
+end -- inv.config.fini
+
+
+function inv.config.save()
+
+  local retval = dbot.storage.saveTable(dbot.backup.getCurrentDir() .. inv.config.stateName,
+                                        "inv.config.table", inv.config.table)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.config.save: Failed to save config table: " .. dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+
+end -- inv.config.save
+
+
+function inv.config.load()
+
+  local retval = dbot.storage.loadTable(dbot.backup.getCurrentDir() .. inv.config.stateName, inv.config.reset)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.config.load: Failed to load table from file \"@R" .. 
+              dbot.backup.getCurrentDir() .. inv.config.stateName .. "@W\": " .. dbot.retval.getString(retval))
+  end -- if
+
+  if (inv.config.table == nil) or (inv.config.table.tableFormat == nil) then
+    dbot.error("inv.config.load: inventory configuration table format is nil")
+    return DRL_RET_INTERNAL_ERROR
+  end -- if
+
+  return retval
+
+end -- inv.config.load
+
+
+function inv.config.reset()
+  local retval
+
+  inv.config.table = inv.config.new()
+
+  retval = inv.config.save()
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.config.reset: Failed to save configuration data: " .. dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+end -- inv.config.reset
+
+
+function inv.config.new()
+  local version = inv.version.get()
+
+  return { pluginVer       = version.pluginVer,
+           tableFormat     = version.tableFormat,
+           cacheFormat     = version.cacheFormat,
+           consumeFormat   = version.consumeFormat,
+           priorityFormat  = version.priorityFormat,
+           setFormat       = version.setFormat,
+           snapshotFormat  = version.snapshotFormat,
+           isPromptEnabled = true,
+           buildExecuted   = false,
+           refreshPeriod   = inv.items.timer.refreshMin
+         }
+end -- inv.config.new
+
+
+----------------------------------------------------------------------------------------------------
+-- Command-Line Interface Parser
+--
+-- The CLI interface consists of components that each have a base parsing function, a function to
+-- display the component's usage, and a function to display examples using the component.
+--
+-- The components are:
+--   Inventory table access: build, refresh, search
+--   Item management:        get, put, store, keyword, organize
+--   Equipment sets:         set, snapshot, priority
+--   Equipment analysis:     analyze, usage, compare, covet
+--   Advanced options:       backup, notify, forget, reset, cache, tags
+--   Using equipment:        portal, consume, pass
+--   About the plugin:       version, help
+--
+-- Functions
+--   inv.cli.fullUsage()
+-- 
+--   inv.cli.build.fn(name, line, wildcards)
+--   inv.cli.build.usage()
+--   inv.cli.build.examples()
+--   inv.cli.refresh.fn(name, line, wildcards)
+--   inv.cli.refresh.usage()
+--   inv.cli.refresh.examples()
+--   inv.cli.search.fn(name, line, wildcards)
+--   inv.cli.search.usage()
+--   inv.cli.search.examples()
+-- 
+--   inv.cli.get.fn(name, line, wildcards)
+--   inv.cli.get.usage()
+--   inv.cli.get.examples()
+--   inv.cli.put.fn(name, line, wildcards)
+--   inv.cli.put.usage()
+--   inv.cli.put.examples()
+--   inv.cli.store.fn(name, line, wildcards)
+--   inv.cli.store.usage()
+--   inv.cli.store.examples()
+--   inv.cli.keyword.fn(name, line, wildcards)
+--   inv.cli.keyword.usage()
+--   inv.cli.keyword.examples()
+-- 
+--   inv.cli.set.fn(name, line, wildcards)
+--   inv.cli.set.usage()
+--   inv.cli.set.examples()
+--   inv.cli.priority.fn(name, line, wildcards)
+--   inv.cli.priority.usage()
+--   inv.cli.priority.examples()
+--   inv.cli.snapshot.fn(name, line, wildcards)
+--   inv.cli.snapshot.usage()
+--   inv.cli.snapshot.examples()
+-- 
+--   inv.cli.analyze.fn(name, line, wildcards)
+--   inv.cli.analyze.fn2(name, line, wildcards)
+--   inv.cli.analyze.usage()
+--   inv.cli.analyze.examples()
+--   inv.cli.usage.fn(name, line, wildcards)
+--   inv.cli.usage.usage()
+--   inv.cli.usage.examples()
+--   inv.cli.compare.fn(name, line, wildcards)
+--   inv.cli.compare.usage()
+--   inv.cli.compare.examples()
+--   inv.cli.covet.fn(name, line, wildcards)
+--   inv.cli.covet.usage()
+--   inv.cli.covet.examples()
+-- 
+--   inv.cli.notify.fn(name, line, wildcards)
+--   inv.cli.notify.usage()
+--   inv.cli.notify.examples()
+--   inv.cli.forget.fn(name, line, wildcards)
+--   inv.cli.forget.usage()
+--   inv.cli.forget.examples()
+--   inv.cli.reset.fn(name, line, wildcards)
+--   inv.cli.reset.usage()
+--   inv.cli.reset.examples()
+--   inv.cli.backup.fn(name, line, wildcards)
+--   inv.cli.backup.usage()
+--   inv.cli.backup.examples()
+--   inv.cli.cache.fn(name, line, wildcards)
+--   inv.cli.cache.usage()
+--   inv.cli.cache.examples()
+--   inv.cli.tags.fn(name, line, wildcards)
+--   inv.cli.tags.usage()
+--   inv.cli.tags.examples()
+-- 
+--   inv.cli.portal.fn(name, line, wildcards)
+--   inv.cli.portal.usage()
+--   inv.cli.portal.examples()
+--   inv.cli.consume.fn(name, line, wildcards)
+--   inv.cli.consume.usage()
+--   inv.cli.consume.examples()
+-- 
+--   inv.cli.organize.fn1(name, line, wildcards)
+--   inv.cli.organize.fn2(name, line, wildcards)
+--   inv.cli.organize.fn3(name, line, wildcards)
+--   inv.cli.organize.usage()
+--   inv.cli.organize.examples()
+--
+--   inv.cli.version.fn(name, line, wildcards)
+--   inv.cli.version.usage()
+--   inv.cli.version.examples()
+--   inv.cli.help.fn(name, line, wildcards)
+--   inv.cli.help.usage()
+--   inv.cli.help.examples()
+-- 
+----------------------------------------------------------------------------------------------------
+
+inv.cli = {}
+
+function inv.cli.fullUsage()
+  dbot.print("@C" .. pluginNameCmd .. " usage:@W Command @GRequired @YOptional@w")
+
+  dbot.print("\n@C  Inventory table access@w")
+  inv.cli.build.usage()
+  inv.cli.refresh.usage()
+  inv.cli.search.usage()
+
+  dbot.print("\n@C  Item management@w")
+  inv.cli.get.usage()
+  inv.cli.put.usage()
+  inv.cli.store.usage()
+  inv.cli.keyword.usage()
+  inv.cli.organize.usage()
+
+  dbot.print("\n@C  Equipment sets@w")
+  inv.cli.set.usage()
+  inv.cli.snapshot.usage()
+  inv.cli.priority.usage()
+
+  dbot.print("\n@C  Equipment analysis@w")
+  inv.cli.analyze.usage()
+  inv.cli.usage.usage()
+  inv.cli.compare.usage()
+  inv.cli.covet.usage()
+
+  dbot.print("\n@C  Advanced options@w")
+  inv.cli.backup.usage()
+  inv.cli.reset.usage()
+  inv.cli.forget.usage()
+  inv.cli.notify.usage()
+  inv.cli.cache.usage()
+  inv.cli.tags.usage()
+
+  dbot.print("\n@C  Using equipment items@W")
+  inv.cli.consume.usage()
+  inv.cli.portal.usage()
+  inv.cli.pass.usage()
+
+  dbot.print("\n@C  Plugin info@w")
+  inv.cli.version.usage()
+  inv.cli.help.usage()
+
+end -- inv.cli.fullUsage
+
+
+inv.cli.build = {}
+function inv.cli.build.fn(name, line, wildcards)
+  local confirmation = Trim(wildcards[1] or "")
+
+  dbot.debug("inv.cli.build.fn: confirmation = \"" .. confirmation .. "\"")
+
+  if (confirmation == "") then
+    dbot.print(
+[[
+
+  Building your inventory table can take several minutes and may disturb
+  other players as you shuffle items through your inventory.
+
+  If you truly want to build your inventory table:
+    1) Go to a room where you won't disturb other people]])
+   dbot.print("    2) Enter \"" .. pluginNameCmd .. " build confirm\"")
+   dbot.print("    3) Wait for the build to complete or enter \"" .. pluginNameCmd .. 
+              " refresh off\" to halt early\n")
+    inv.tags.stop(invTagsBuild, line, DRL_RET_UNINITIALIZED)
+
+  elseif (confirmation == "confirm") then
+    dbot.info("Build confirmed: commencing inventory build...")
+    inv.items.build(line)
+  else
+    inv.cli.build.usage()
+    inv.tags.stop(invTagsBuild, line, DRL_RET_INVALID_PARAM)
+  end -- if
+end -- inv.cli.build.fn
+
+
+function inv.cli.build.usage()
+  dbot.print("@W    " .. pluginNameCmd .. " build @Y[confirm]@w")
+end -- inv.cli.build.usage
+
+
+function inv.cli.build.examples()
+  dbot.print("@W\nUsage:\n")
+  inv.cli.build.usage()
+
+  dbot.print(
+[[@W
+The heart of this plugin is an inventory table that tracks information about
+all of your items.  Before you can use that table, you must first build it.
+This is a relatively long process and can take several minutes to complete.
+A build requires a fair amount of communication with the mud and latency to
+the mud will have a significant impact on the speed of the build.
+
+As an example, my primary character currently is holding 548 items and took
+just under 5 minutes to build an inventory table from scratch when I used
+my normal internet connection with a ~40 ms latency to the mud.  I also used
+a VPN to access the mud from various points around the world and found that
+a connection with a ~130 ms latency completed the same build in 8 minutes and
+a ~440 ms latency connection (thank you New Zealand!) took 18 minutes to
+complete a full build.  Fortunately, building your inventory table should be
+a one-time operation and subsequent changes to your table will be quick and
+easy.  
+
+Building your inventory table requires the plugin to run the "identify"
+operation on all of your items.  If an item is in a container, it will first
+take the item out of the container before identifying it and putting it back.
+Similarly, if you are wearing an item, the plugin will first remove the item,
+identify it, and then re-wear it at its original location.  All of this will
+be transparent to you.  However, anyone in the same room as you will see lots
+of activity as the plugin shuffles items around.  As a result, please be kind
+to those around you and find an out-of-the-way room for the build operation.
+Don't do this at recall! :)
+
+While the build executes, you are free to do your normal mudding activities.
+However, the build will halt if you sleep, go AFK, enter combat, or do
+something that puts you at a paging prompt so it's probably easiest if you
+sit back and just let the plugin do its thing :)
+
+If you need to stop the build for some reason, simply go to sleep or go AFK.
+Either of those modes will halt the build.  You can pick up where a partial
+build stopped by running "@Gdinv refresh@W".
+
+If you interrupted a build by going to sleep or going AFK, the build will
+automatically continue at the next refresh attempt (see "@Gdinv help refresh@W"
+for more details.)  You can disable automatic refreshes with the command
+"@Gdinv refresh off@W" and you can re-enable them with "@Gdinv refresh on@W".
+
+Once you have a completed inventory table available, you probably want to make
+a manual backup in case something goes wrong in the future.  You can restore
+from the backup and avoid the long build process again.  If anything in your
+inventory has changed since the backup, your next refresh will simply update
+it to what you currently have.  To make a manual backup named
+"@Gmy_first_awesome_backup@W" type "@Gdinv backup create my_first_awesome_backup@W".
+See "@Gdinv help backup@W" for more details about creating, viewing, and restoring
+backups.
+]])
+
+end -- inv.cli.build.examples
+
+
+inv.cli.refresh = {}
+function inv.cli.refresh.fn(name, line, wildcards)
+  local command       = wildcards[1] or ""
+  local refreshPeriod = tonumber(wildcards[2] or "") or inv.items.timer.refreshMin
+  local refreshLoc
+  local retval
+
+  dbot.debug("inv.cli.refresh.fn: command=\"" .. command .. "\", period=\"" .. refreshPeriod .. "\"")
+
+  if (command == "all") then
+    refreshLoc = invItemsRefreshLocAll
+  else
+    refreshLoc = invItemsRefreshLocDirty
+  end -- if
+
+  if (command == "off") then
+    retval = inv.items.refreshOff()
+    dbot.note("Automatic inventory refresh is disabled: run \"@G" .. pluginNameCmd .. 
+              " refresh on@W\" to re-enable it")
+    inv.tags.stop(invTagsRefresh, line, retval)
+
+  elseif (command == "on") then
+    retval = inv.items.refreshOn(refreshPeriod)
+    dbot.note("Inventory refresh is enabled")
+    inv.tags.stop(invTagsRefresh, line, retval)
+
+  elseif (command == "") or (command == "all") then
+    if (inv.state == invStatePaused) then
+      inv.state = invStateIdle
+    end -- if
+    local retval = inv.items.refresh(0, refreshLoc, line, nil)
+    if (retval == DRL_RET_HALTED) then
+      dbot.note("Run \"" .. pluginNameCmd .. " refresh on\" to re-enable automatic inventory refreshes")
+    end -- if
+
+  else
+    inv.cli.refresh.usage()
+    inv.tags.stop(invTagsRefresh, line, DRL_RET_INVALID_PARAM)
+  end -- if
+
+end -- inv.cli.refresh.fn
+
+
+function inv.cli.refresh.usage()
+  dbot.print("@W    " .. pluginNameCmd .. " refresh @Y[on | off | all] <minutes>@w")
+end -- inv.cli.refresh.usage
+
+
+function inv.cli.refresh.examples()
+  dbot.print("@W\nUsage:\n")
+  inv.cli.refresh.usage()
+
+  dbot.print(
+[[@W
+If you add a new item to your inventory or remove an item from your inventory, your inventory
+table must be informed about the change.  A refresh operation is the means through which the
+plugin updates your inventory table.  When the plugin detects changes to your inventory it will
+schedule a "refresh" to identify anything that has changed.
+
+A refresh operation may require the plugin to get an item from a container or remove a worn item
+in order to identify the item.  If the plugin moves (or removes) the item, it will automatically
+put the item back when the identification completes.  The plugin suppresses mud output related 
+to this moving and identification so it will appear to happen transparently from the user's
+perspective.
+
+There are two types of refreshes: manual and automatic.  A manual refresh simply performs a
+refresh when the user requests one.  An automatic refresh occurs when a timer expires after a
+specified period of time.  By default, an automatic refresh will trigger 5 seconds after an
+item is added to your inventory and every 5 minutes since the previous automatic refresh.  If
+nothing has changed since the last refresh, the refresh simply returns.
+
+The plugin will skip a refresh or halt it early if you go to sleep, go AFK, enter combat, or hit
+a paging prompt.  In this case, any changes that were missed will be picked up the next time a
+refresh is in progress.
+
+You may also execute a refresh that performs a full scan of all worn items, items in your main
+inventory, and items in containers.  The plugin performs a full scan at startup to ensure that
+everything is in the expected place.  Otherwise, your inventory table would become out of sync
+if you logged in with another client and moved items around.  The full scan guarantees that the
+plugin knows where everything is.
+
+Examples:
+  1) Perform a manual refresh
+     "@Gdinv refresh@W"
+  2) Disable automatic refreshes
+     "@Gdinv refresh off@W"
+  3) Enable automatic refreshes with default times (5 seconds since adding an item or 5 minutes
+     since the last refresh)
+     "@Gdinv refresh on@W"
+  4) Enable automatic refreshes with a 10 minute delay between refreshes 
+     "@Gdinv refresh on 10@W"
+  5) Perform a manual full refresh scan
+     "@Gdinv refresh all@W"
+]])
+end -- inv.cli.refresh.examples
+
+
+inv.cli.search = {}
+function inv.cli.search.fn(name, line, wildcards)
+  local verbosity = wildcards[1] or ""
+  local query = wildcards[2] or ""
+
+  -- Use the "basic" display mode for searches by default
+  if (verbosity == "") then
+    verbosity = "basic"
+  end -- if
+
+  dbot.debug("verbosity=\"" .. verbosity .. "\", query=\"" .. query .. "\"")
+
+  local retval = inv.items.display(query, verbosity, line)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.cli.search.fn: Failed to display search query: " .. dbot.retval.getString(retval))
+  end -- if
+
+end -- inv.cli.search.fn
+
+
+function inv.cli.search.usage()
+  dbot.print("@W    " .. pluginNameCmd .. " search @Y[id | full] @G<query>@w")
+end -- inv.cli.search.usage
+
+
+function inv.cli.search.examples()
+  dbot.print("@W\nUsage:\n")
+  inv.cli.search.usage()
+  dbot.print(
+[[@W
+An inventory table isn't much help if you can't access it!  That's where search queries come
+into play.  A query specifies characteristics about inventory items and returns matches for
+all items that match the query.  Queries are used in many of the dinv plugin's modes.  For
+example, the "@Cget@W", "@Cput@W", "@Cstore@W", "@Ckeyword@W", "@Corganize@W", and "@Cusage@W" options all take query
+arguments and then get, put, store, etc. whatever items match the query.  See the helpfile at
+"@Gdinv help query@W" for more details and examples.
+
+A query consists of one or more sets of key-value pairs where the key can be any key listed 
+when you identify/lore an item.  For example, a query could be "@Gtype container keyword box@W"
+if you wanted to find everything with a type value of "container" that has a keyword "box".
+
+Queries also support three prefixes that can be prepended onto a normal key: "@Cmin@W", "@Cmax@W",
+and "@C~@W" (where "@C~@W" means "not").  To find weapons with a minimum level of 100 that do not have
+a vorpal special, you could use this query: "@Gtype weapon minlevel 100 ~specials vorpal@W".
+
+You can also "OR" multiple query clauses together into a larger query using the "@C||@W" operator.
+If you want move all of your potions and pills into a container named "2.bag" you could do that
+with this command: "@Gdinv put 2.bag type potion || type pill@W".
+
+An empty query matches everything in your inventory.  This is convenient if you want to see all
+of your stuff :)  For example "@Gdinv search@W" will display basic info on everything you are
+wearing, everything you are holding in your main inventory, and everything in containers you are
+holding.
+
+Search queries support both absolute and relative names and locations.  If you want to specify
+all weapons that have "axe" in their name, use "@Gtype weapon name axe@W".  If you want to
+specifically target the third axe in your main inventory, use "@Gtype weapon rname 3.axe@W" 
+(or you could just get by with "@Grname 3.axe@W" and skip the "@Gtype weapon@W" clause.)  The use
+of the key "rname" instead of "name" means that the search is relative to your main inventory
+and you can use the format [number].[name] to target a specific item.  Similarly, you can use
+"@Grlocation 3.bag@W" to target every item contained by the third bag in your main inventory
+(i.e., the third bag is their relative location.)
+
+There are a few "one-off" query modes for convenience.  It is so common to search for just a
+name that the default is to assume you are searching within an item's name if no other data
+is supplied.  In other words, "@Gdinv search sunstone@W" will find any item with "sunstone" in
+its name.  Also, queries will accept "key" instead of "keywords", "loc" instead of "location",
+and "rloc" instead of "rlocation".  Yeah, I'm lazy sometimes...
+
+Performing a search will display relevant information about the items whose characteristics match
+the query.  There are three modes of searches: "@Cbasic@W", "@Cid@W", and "@Cfull@W".  A basic search displays
+just basic information about the items -- surprise!  An id search shows everything in the basic
+search in addition to the item's unique ID.  A full search shows lots of info for each item and is
+very verbose.
+
+Examples:
+  1) Show basic info for all weapons between the levels of 1 to 40
+     "@Gdinv search type weapon minlevel 1 maxlevel 40@W"
+
+@WLvl Name of Weapon           Type     Ave Wgt   HR   DR Dam Type Specials Int Wis Lck Str Dex Con
+@W  8@w a @yFlame@rthrower@w           @Wexotic   @G  4@W   0 @G  10@W @G  18@W Fire     none     @G  2@W   0 @G  3@W   0   0   0
+@W 11@w @YDagger of @RAardwolf@w       @Wdagger   @G 27@W @G  1@W @G   5@W @G   5@W Cold     sharp      0   0   0   0   0   0
+@W 20@w @WS@we@Wa@wr@Wi@wn@Wg @wB@Wl@wa@Wz@we            @Wwhip     @G 30@W @G  3@W @G   2@W @G   2@W Fire     flaming  @G  1@W @G  4@W @G  7@W @G  1@W   0   0
+@W 26@w @bM@Belpomene's @bB@Betrayal@w     @Wdagger   @G 36@W @G  1@W @G   2@W @G   2@W Pierce   sharp      0   0   0   0 @G  2@W   0
+@W 40@w @YDagger of @RAardwolf@w       @Wdagger   @G100@W   0 @G  20@W @G  20@W Fire     sharp    @G  1@W   0   0   0   0   0
+@W 40@w @YDagger of @RAardwolf@w       @Wdagger   @G100@W @G 10@W @G   5@W @G   5@W Mental   sharp      0   0   0   0   0   0
+@W
+  2) Show unique IDs and info for all level 91 ear and neck items
+     "@Gdinv search id wearable ear level 91 || wearable neck level 91@W"
+
+@WLvl Name of Armor            Type       HR   DR Int Wis Lck Str Dex Con Res HitP Mana Move
+@W 91@w @c:@C:@W:@CSt@cerling @G(1851993170) @Wear         0 @G  12@W @G  4@W   0 @G  3@W   0   0   0 @G  9@W    0 @G  30@W @R -60
+@W 91@w Kilhil's Ble @G(907478999) @Wear         0 @G  16@W @G  2@W @G  2@W @G  2@W   0 @G  6@W   0 @G  9@W    0    0    0
+@W 91@w @y>@Y}@rPho@Ren@Yix's @G(1584559998) @Wneck     @G   2@W @G  14@W @G  1@W @G  4@W @G  1@W @G  2@W @G  1@W @G  2@W @G  9@W    0    0    0
+@W 91@w @Dthe @YAmulet  @G(1235973081) @Wneck        0 @G  12@W   0   0 @G  3@W @G  4@W   0   0 @G  9@W    0    0    0
+@W 91@w @Dthe @YCharm   @G(1745132926) @Wneck     @G   6@W @G   6@W @G  4@W   0 @G  2@W   0   0   0 @G  9@W    0    0    0
+@W
+  3) Show full info for anything with an anti-evil flag
+     "@Gdinv search full flag anti-evil@W"
+
+@WLvl Name of Weapon           Type     Ave Wgt   HR   DR Dam Type Specials Int Wis Lck Str Dex Con
+@W 20@w @WS@we@Wa@wr@Wi@wn@Wg @wB@Wl  @G(1743467081) @Wwhip     @G 30@W @G  3@W @G   2@W @G   2@W Fire     flaming  @G  1@W @G  4@W @G  7@W @G  1@W   0   0
+@w    colorName:"@WS@we@Wa@wr@Wi@wn@Wg @wB@Wl@wa@Wz@we" objectID:1743467081
+@w    keywords:"searing blaze vengeance"
+@w    flags:"unique, glow, hum, magic, anti-evil, held, resonated, illuminated, V3"
+@w    score:309 worth:2690 material:steel foundAt:"Unknown"
+@w    allphys:0 allmagic:0 slash:0 pierce:0 bash:0 acid:0 poison:0
+@w    disease:0 cold:0 energy:0 holy:0 electric:0 negative:0 shadow:0
+@w    air:0 earth:0 fire:0 water:0 light:0 mental:0 sonic:0 magic:0
+@w    weight:3 ownedBy:""
+@w    clan:"From Crusaders of the Nameless One" affectMods:""@w
+@W
+  4) Show info on any containers that are wearable on your back
+     "@Gdinv search type container wearable back@W"
+
+@WLvl Name of Container        Type       HR   DR Int Wis Lck Str Dex Con Wght  Cap Hold Hvy #In Wgt%
+@W201@w @MP@mandora@w'@ms @R[@GBox@R]@w          @GContain @W @G  20@W @G  26@W @G  5@W   0 @G  3@W   0   0 @G  5@W @R   8@W @G1500@W @G  16@W @G 50@W @G 33@W @G  50
+@W
+  5) Show info on any portals leading to the Empire of Talsa
+     "@Gdinv search type portal leadsTo talsa@W"
+
+@WLvl Name of Portal           Type     Leads to            HR  DR Int Wis Lck Str Dex Con
+@W 60@w @BIrresistible Calling@w     @Wportal   The Empire of Tals   0   0   0   0   0   0   0   0
+@W100@w @REvil Intentions@w          @Wportal   The Empire of Tals   0   0   0   0   0   0   0   0
+@W150@w @BCosmic Calling@w           @Wportal   The Empire of Tals   0   0   0   0   0   0   0   0@W
+
+  6) Look at sorted lists of your poker cards and aardwords tiles
+     "@Gdinv search key poker || key aardwords@W"
+
+@WLvl Name of Trash            Type       HR   DR Int Wis Lck Str Dex Con Res HitP Mana Move
+@W  1@w @Y|@C4@Y[@CFour of Air@Y]@C4@Y|@w        @Whold        0    0   0   0   0   0   0   0   0    0    0    0
+@W  1@w @Y|@y4@Y[@yFour of Earth@Y]@y4@Y|@w      @Whold        0    0   0   0   0   0   0   0   0    0    0    0
+@W  1@w @Y|@c4@Y[@cFour of Water@Y]@c4@Y|@w      @Whold        0    0   0   0   0   0   0   0   0    0    0    0
+@W  1@w @Y|@CA@Y[@CAce of Air@Y]@CA@Y|@w         @Whold        0    0   0   0   0   0   0   0   0    0    0    0
+@W  1@w @Y|@cA@Y[@cAce of Water@Y]@cA@Y|@w       @Whold        0    0   0   0   0   0   0   0   0    0    0    0
+@W  1@w @Y|@CD@Y[@CDemon of Air@Y]@CD@Y|@w       @Whold        0    0   0   0   0   0   0   0   0    0    0    0
+@W  1@w @Y|@cE@Y[@cElemental of Water@Y]@cE  @Whold        0    0   0   0   0   0   0   0   0    0    0    0
+@W  1@w @Y|@CM@Y[@CMephit of Air@Y]@CM@Y|@w      @Whold        0    0   0   0   0   0   0   0   0    0    0    0
+@W  1@w @Y|@cM@Y[@cMephit of Water@Y]@cM@Y|@w    @Whold        0    0   0   0   0   0   0   0   0    0    0    0
+@w
+@WLvl Name of Treasure         Type       HR   DR Int Wis Lck Str Dex Con Res HitP Mana Move
+@W  1@w @RAardWords (TM)@Y - Double  @Whold        0    0   0   0   0   0   0   0   0    0    0    0
+@W  1@w @RAardWords (TM)@Y - Double  @Whold        0    0   0   0   0   0   0   0   0    0    0    0
+@W  1@w @RAardWords (TM)@Y - Triple  @Whold        0    0   0   0   0   0   0   0   0    0    0    0
+@W  1@w @RAardWords (TM)@Y - [B] - S @Whold        0    0   0   0   0   0   0   0   0    0    0    0
+@W  1@w @RAardWords (TM)@Y - [E] - S @Whold        0    0   0   0   0   0   0   0   0    0    0    0
+@W  1@w @RAardWords (TM)@Y - [H] - S @Whold        0    0   0   0   0   0   0   0   0    0    0    0
+@W  1@w @RAardWords (TM)@Y - [P] - S @Whold        0    0   0   0   0   0   0   0   0    0    0    0
+@W  1@w @RAardWords (TM)@Y - [W] - S @Whold        0    0   0   0   0   0   0   0   0    0    0    0
+]])
+
+end -- inv.cli.search.examples
+
+
+-- This isn't a full CLI module, but the query example helpfile seemed to fit well here
+inv.cli.query = {}
+function inv.cli.query.examples()
+dbot.print(
+[[@W
+Queries are based on key values found in an item's description when you identify
+an item.  All fields are visible if you have the identify wish.  If you do not have
+the identify wish, some fields may only be seen with an identify spell or with the
+lore ability.
+
+A query's format includes one or more key-value pairs.  Details on this can be
+found at the helpfile displayed by the command "@Gdinv help search@W" but let's give a
+few more examples here too.  You can never have too many examples :)
+
+Examples:
+
+  1) Use a single key-value pair to find items that are level 42
+     [key] [value]
+     "@Gdinv search level 42@W"
+
+  2) Use two key-value pairs to find items that match *both* pairs.  In this example
+     we find all weapons with the "aardwolf" keyword (i.e., aard quest weapons).  By
+     default, two key-value pairs next to each other require an item to match the
+     first pair and the second pair.
+     [key1] [value1] [key2] [value2]
+     "@Gdinv search type weapon keyword aardwolf@W"
+
+  3) Use the "@C||@W" operator (it means "or") with two key-value pairs to find items
+     that match *either* pair.  To find all wearable finger or wrist items, use the
+     query shown below.
+     [key1] [value1] || [key2] [value2]
+     "@Gdinv search wearable finger || wearable wrist@W"
+
+  4) Things get a little more complicated if we want to use both "and" and "or" clauses
+     in the same query.  The "and" operation (putting two key-value pairs next to each
+     other) has a higher precedence than "or", as represented by the "@C||@W" symbols.
+     If we want to find weapons with the "mental" or "pierce" damage types that are at
+     least level 100, we need to duplicate the "minlevel 100" key-value pair for both
+     halves of the query.  We don't use parentheses to indicate precedence.  That would
+     add more complexity than I'm comfortable with at this point...
+     [key1] [value1] [key2] [value2] || [key3] [value3] [key2] [value2]
+     "@Gdinv search damtype mental minlevel 100 || damtype pierce minlevel 100@W"
+
+  5) Find all armor that has a weight of at least 10 and at most 20 that does not have
+     an "anti-evil" flag.  The "@C~@W" symbol indicates "not" when it is used as a prefix
+     for a key in a key-value pair.
+     "@Gdinv search type armor minweight 10 maxweight 20 ~flags anti-evil@W"
+
+  6) Find everything in the container with relative location name "2.bag"
+     "@Gdinv search rloc 2.bag@W"
+
+Queries support lots of keys that are found when you identify an item.  Here is the
+list of currently supported keys:
+]])
+
+  local sortedStats = {}
+  for key,statField in pairs(inv.stats) do
+    table.insert(sortedStats, statField)
+  end -- for
+
+  table.sort(sortedStats, function (entry1, entry2) return entry1.name < entry2.name end)
+
+  for _, statField in ipairs(sortedStats) do
+    dbot.print(string.format("@C%15s@W: %s", statField.name, statField.desc))
+  end -- for
+
+end -- inv.cli.query.examples
+
+
+inv.cli.get = {}
+function inv.cli.get.fn(name, line, wildcards)
+  local query = wildcards[1] or ""
+
+  dbot.debug("CLI: " .. pluginNameCmd .. " get \"" .. query .. "\"")
+
+  if (not inv.init.initializedActive) then
+    dbot.info("Skipping get request: plugin is not yet initialized (are you AFK or sleeping?)")
+    return inv.tags.stop(invTagsGet, line, DRL_RET_UNINITIALIZED)
+  elseif (dbot.gmcp.getState() ~= dbot.stateActive) then
+    dbot.info("Skipping get request: character is not in the active state")
+    return inv.tags.stop(invTagsGet, line, DRL_RET_NOT_ACTIVE)
+  end -- if
+
+  inv.items.get(query, line)
+end -- inv.cli.get.fn
+
+
+function inv.cli.get.usage()
+  dbot.print("@W    " .. pluginNameCmd .. " get @G<query>@w")
+end -- inv.cli.get.usage
+
+
+function inv.cli.get.examples()
+  dbot.print("@W\nUsage:\n")
+  inv.cli.get.usage()
+
+  dbot.print(
+[[@W
+The "get" option works in a similar manner to the normal mud "get" command.  It moves
+something (or somethings) into your main inventory.  The main difference is that you don't
+need to specify from where you are getting the item(s).  An item may be worn or in a
+container or on your keyring and it will still move automagically into your main inventory.
+
+A "get" request takes a query argument as a parameter.  See "@Gdinv help search@W" for more
+details on how queries work and to see several examples of queries.
+
+Examples:
+  1) Move all level 42 items into your main inventory
+     "@Gdinv get level 42@W"
+
+  2) Move all weapons with a fire damage type into your main inventory
+     "@Gdinv get damtype fire@W"
+
+  3) Get all potions or pills that are in a container at relative location 4.bag
+     "@Gdinv get rloc 4.bag type potion || rloc 4.bag type pill@W"
+
+  4) Get anything with a key type or a flag indicating it's a key
+     "@Gdinv get type key || flags iskey@W"
+
+  5) Get everything with a custom keyword named "borrowedFromBob" (see "@Gdinv help keyword@W"
+     for details on how to add custom keywords to items)
+     "@Gdinv get key borrowedFromBob@W"
+
+  6) Get anything that is worn on a finger at level 131
+     "@Gdinv get wearable finger level 131"
+]])
+
+end -- inv.cli.get.examples
+
+
+inv.cli.put = {}
+function inv.cli.put.fn(name, line, wildcards)
+  local container = wildcards[1] or ""
+  local query = wildcards[2] or ""
+
+  dbot.debug("CLI: " .. pluginNameCmd .. " put \"" .. container .. "\", \"" .. query .. "\"")
+
+  if (not inv.init.initializedActive) then
+    dbot.info("Skipping put request: plugin is not yet initialized (are you AFK or sleeping?)")
+    return inv.tags.stop(invTagsPut, line, DRL_RET_UNINITIALIZED)
+  elseif (dbot.gmcp.getState() ~= dbot.stateActive) then
+    dbot.info("Skipping put request: character is not in the active state")
+    return inv.tags.stop(invTagsPut, line, DRL_RET_NOT_ACTIVE)
+  end -- if
+
+  inv.items.put(container, query, line)
+end -- inv.cli.put.fn
+
+
+function inv.cli.put.usage()
+  dbot.print("@W    " .. pluginNameCmd .. " put @G<container relative name> <query>@w")
+end -- inv.cli.put.usage
+
+
+function inv.cli.put.examples()
+  dbot.print("@W\nUsage:\n")
+  inv.cli.put.usage()
+
+  dbot.print(
+[[@W
+The "put" option works in a similar manner to the normal mud "put" command.  It moves
+something (or somethings) from your main inventory into a container at a relative location.
+The main difference is that you don't need to specify from where you are getting the items.
+If you "put" an item into a container, it can originate from a worn location, your main
+inventory, or a container.  Regardless of where it starts, the plugin will move it to the
+container that you specify.
+
+A "put" request takes a relative location name for the target container and a query that
+specifies which items should move into the container.  See "@Gdinv help search@W" for examples
+on how queries work and how relative names and locations work.
+
+Examples:
+  1) Put all aardwolf quest weapons into container 3.bag
+     "@Gdinv put 3.bag type weapon keyword aardwolf@W"
+
+  2) Put all potions and pills into container 2.box
+     "@Gdinv put 2.box type potion || type pill@W"
+
+  3) Put all portals into container 4.case
+     "@Gdinv put 4.case type portal@W"
+
+  4) Put all armor pieces between level 1 and level 100 into container "luggage"
+     "@Gdinv put luggage type armor minlevel 1 maxlevel 100@W"
+]])
+
+end -- inv.cli.put.examples
+
+
+inv.cli.store = {}
+function inv.cli.store.fn(name, line, wildcards)
+  local query = wildcards[1] or ""
+
+  dbot.debug("CLI: " .. pluginNameCmd .. " store \"" .. query .. "\"")
+
+  if (not inv.init.initializedActive) then
+    dbot.info("Skipping store request: plugin is not yet initialized (are you AFK or sleeping?)")
+    return inv.tags.stop(invTagsStore, line, DRL_RET_UNINITIALIZED)
+  elseif (dbot.gmcp.getState() ~= dbot.stateActive) then
+    dbot.info("Skipping store request: character is not in the active state")
+    return inv.tags.stop(invTagsStore, line, DRL_RET_NOT_ACTIVE)
+  end -- if
+
+  inv.items.store(query, line)
+end -- inv.cli.store.fn
+
+
+function inv.cli.store.usage()
+  dbot.print("@W    " .. pluginNameCmd .. " store @G<query>@w")
+end -- inv.cli.store.usage
+
+
+function inv.cli.store.examples()
+  dbot.print("@W\nUsage:\n")
+  inv.cli.store.usage()
+  dbot.print(
+[[@W
+The dinv plugin remembers the container that was most recently used for each item
+in the inventory.  This gives you a convenient way to store an item (or items) back
+where you got them.  This is very similar to "dinv put ..." but you don't need to
+specify the target container.  Each item will go back to the container from which it
+was most recently removed.  If an item has never been in a container, "storing" it
+will put it in your main inventory.
+
+The query parameter specifies which items will be stored.  See the helpfile at
+"@Gdinv help search@W" for examples and more details on using queries.
+
+Examples:
+  1) Store all items that are level 71
+     "@Gdinv store level 71@W"
+
+  2) Store all aardwolf quest items
+     "@Gdinv store keyword aardwolf@W"
+
+  3) Store all portals back into their container(s)
+     "@Gdinv store type portal@W"
+]])
+
+end -- inv.cli.store.examples
+
+
+inv.cli.keyword = {}
+function inv.cli.keyword.fn(name, line, wildcards)
+  local operation = wildcards[1] or ""
+  local keyword   = wildcards[2] or ""
+  local query     = wildcards[3] or ""
+
+  inv.items.keyword(keyword, operation, query, false, line)
+end -- inv.cli.keyword.fn
+
+
+function inv.cli.keyword.usage()
+  dbot.print("@W    " .. pluginNameCmd .. " keyword @G[add | remove] <keyword name> <query>@w")
+end -- inv.cli.keyword.usage
+
+
+function inv.cli.keyword.examples()
+  dbot.print("@W\nUsage:\n")
+  inv.cli.keyword.usage()
+
+  dbot.print(
+[[@W
+Wouldn't it be great if you could easily add or remove keywords from an item?  Now
+you can!  Although custom keywords won't be recognized by the mud server, you can use
+them with any query used by this plugin.  See "@Gdinv help search@W" for examples and
+more details about how to use queries.
+
+Examples:
+  1) Add a "@CborrowedFromBob@W" keyword to everything in the container at relative
+     location "3.bag".  You can then use the items and when you are ready to give them
+     back, you can put them back with "@Gdinv put 3.bag keyword borrowedFromBob@W".
+     Nice!
+     "@Gdinv keyword add borrowedFromBob rloc 3.bag@W"
+
+  2) Add "@Cfavorite@W" keyword to a level 80 aardwolf sword.
+     "@Gdinv keyword add favorite level 80 keyword aardwolf name sword@W"
+
+  3) Remove "@Cfavorite@W" keyword from everything in your inventory.  Remember that an
+     empty search query matches everything in your inventory.
+     "@Gdinv keyword remove favorite@W"
+]])
+
+end -- inv.cli.keyword.examples
+
+
+inv.cli.set = {}
+function inv.cli.set.fn(name, line, wildcards)
+  local command = wildcards[1] or ""
+  local priority = wildcards[2] or ""
+  local level = wildcards[3] or ""
+
+  if (not inv.init.initializedActive) then
+    dbot.info("Skipping set request: plugin is not yet initialized (are you AFK or sleeping?)")
+    return inv.tags.stop(invTagsSet, line, DRL_RET_UNINITIALIZED)
+  elseif (dbot.gmcp.getState() ~= dbot.stateActive) then
+    dbot.info("Skipping set request: character is not in the active state")
+    return inv.tags.stop(invTagsSet, line, DRL_RET_NOT_ACTIVE)
+  end -- if
+
+  -- If the user doesn't provide a level, use the current level
+  level = tonumber(level) or dbot.gmcp.getLevel()
+
+  dbot.debug("inv.cli.set.fn: command=\"" .. command .. "\", priority=\"" .. priority ..
+             "\", level=" .. level)
+
+  if (command == "display") then
+    inv.set.display(priority, level, line)
+  elseif (command == "wear") then
+    inv.set.createAndWear(priority, level, line)
+  else
+    inv.cli.set.usage()
+    inv.tags.stop(invTagsSet, line, DRL_RET_INVALID_PARAM)
+  end -- if
+
+end -- inv.cli.set.fn
+
+
+function inv.cli.set.usage()
+  dbot.print("@W    " .. pluginNameCmd .. " set @G[display | wear] <priority name> @Y<level>@w")
+end -- inv.cli.set.usage()
+
+
+function inv.cli.set.examples()
+  dbot.print("@W\nUsage:\n")
+  inv.cli.set.usage()
+  dbot.print(
+[[@W
+This plugin can automatically generate equipment sets based on statistic priorities
+defined by the user.  This is similar to aardwolf's default "score" value for items.
+If you enter "@Gcompare set all@W", you will see aardwolf's default weighting for each
+statistic based on your class.  
+
+The plugin implements a similar approach, but with many more options.  For example, the
+plugin's "priority" feature allows you to define statistic weightings for particular levels
+or ranges of levels.  It also supports weightings for item effects such as dual wielding,
+iron grip, sanctuary, or regeneration.  You can even indicate how important it is to you to
+max out specific stats.  Also, the plugin provides controls that are much more fine-grained
+than the default aardwolf implementation.  See "@Gdinv help priority@W" for more details and
+examples using stat priorities.
+
+Once you define a group of priorities, you have the ability to create equipment sets based
+on those priorities.  The plugin finds the optimal (OK, technically it is near-optimal)
+set of items that maximizes your equipment set's score relative to the specified priority.
+The plugin accounts for overmaxing stats and at times may use items that superficially 
+appear to be worse than other items in your inventory.  An item that looks "better" may
+be contributing points to stats that are already maxed and alternative "lesser" items may
+be more valuable when combined with your other equipment.
+
+If you create a set for your current level, the plugin knows how many bonus stats you
+have due to your current spellup.  It can find the exact combination of equipment relative
+to your current state so that you don't overmax stats unnecessarily.  If you create one
+equipment set while having a normal spellup and a second equipment set after getting a
+superhero spellup, chances are high that there would be different equipment in both sets.
+However, if you create a set for a level that is either higher or lower than your current
+level, then the plugin must make some estimates since it can't know how many stats you would
+have due to spells at that level.  It starts by guessing what an "average" spellup should
+look like at a specific level.  The plugin also periodically samples your stats as you
+play the game and keeps a running weighted average of spell bonuses for each level.  If
+you play a style that involves always maintaining an SH spellup, then over time the plugin
+will learn to use high estimates for your spell bonuses when it creates a set.  Similarly,
+if you don't bother to use spellups, then over time the plugin will learn to use lower
+spell bonuses that more accurately reflect your playing style.
+
+The set creation algorithm is smart enough to detect if you have the ability to dual wield
+either from aard gloves or naturally via the skill and will base the set accordingly.  It
+also checks weapon weights to find the most optimal combination of weapons if dual wield
+is available and it is prioritized.
+
+The key point is that we care about maximizing the total *usable* stats in an equipment
+set.  Finding pieces that are complementary without wasting points on overmaxed stats is
+a process that is well-suited for a plugin -- hence this plugin :)
+
+The "@Cset@W" mode creates the specified set and then either wears the equipment or displays
+the results depending on if the "@Cwear@W" or the "@Cdisplay@W" option is specified.  An
+optional "@Clevel@W" parameter will create the set targeted at a specific level.  If the
+level is not provided, the plugin will default to creating a set for your current level.
+
+For example, consider a scenario where a user creates a priority designed for a primary psi
+with at least one melee class and names that priority "@Cpsi-melee@W" (yes, this is what
+I normally use -- psis are awesome if you haven't noticed :)).  The following examples
+will use this priority.
+
+Examples:
+  1) Display what equipment set best matches the psi-melee priority for level 20.  The 
+     stat summary listed on the last line indicates the cumulative stats for the entire
+     set.  This reflects just the stats provided directly by the equipment and it does not
+     include any bonuses you may get naturally or via spells.  Also, note the long list
+     of effects provided by equipment in this set (haste, regen, etc.).  Each of those
+     effects is given a weighting in the psi-melee priority table.
+     "@Gdinv set display psi-melee 20@W"
+
+@WEquipment set:   @GLevel  20 @Cpsi-melee
+@w
+@Y     light@W( 16): @GLevel   1@W "a hallowed light"
+@Y      head@W( 40): @GLevel   1@W "@RAardwolf@Y Helm of True Sight@w"
+@Y      eyes@W(  8): @GLevel   1@W "@C(@W+@C) @WH@Cowlin@Wg T@Cempes@Wt @C(@W+@C)@w"
+@Y      lear@W(  8): @GLevel   1@W "@R(@G+@B) @WMagica Elemental @C(@G+@y)@w"
+@Y      rear@W(  8): @GLevel   1@W "@R(@G+@B) @WMagica Elemental @C(@G+@y)@w"
+@Y     neck1@W(  8): @GLevel   1@W "@C(@W+@C) @WB@Citin@Wg W@Cind@Ws @C(@W+@C)@w"
+@Y     neck2@W(  8): @GLevel   1@W "@C(@W+@C) @WB@Citin@Wg W@Cind@Ws @C(@W+@C)@w"
+@Y      back@W(  8): @GLevel   1@W "@C(@W+@C) @WC@Cyclon@We B@Clas@Wt @C(@W+@C)@w"
+@Y    medal1@W(  9): @GLevel   1@W "@RA@rcademy @GG@graduation @CM@cedal@w"
+@Y    medal2@W(  7): @GLevel   1@W "@YV3 @RA@rardwolf @GS@gupporters @CP@cin@w"
+@Y    medal3@W( 19): @GLevel   1@W "V3 @RO@rrder @GO@gf @CT@che @RF@rirst @GT@gier@w"
+@Y     torso@W( 17): @GLevel   1@W "@RAardwolf @YBreastplate of Magic Resistance@w"
+@Y      body@W(  6): @GLevel   1@W "@ga Tr@ye@wnc@gh C@yo@wa@gt@w"
+@Y     waist@W(  8): @GLevel   1@W "@C(@W+@C) @WS@Ctif@Wf B@Creez@We @C(@W+@C)@w "
+@Y      arms@W(  8): @GLevel   1@W "@C(@W+@C) @WF@Crost@Wy D@Craf@Wt @C(@W+@C)@w"
+@Y    lwrist@W( 12): @GLevel  16@W "@m-=< @BClasp @Wof the @RKeeper@m >=-@w"
+@Y    rwrist@W(  8): @GLevel  15@W "thieves' patch"
+@Y     hands@W( 30): @GLevel   1@W "@RAardwolf@Y Gloves of Dexterity@w"
+@Y   lfinger@W( 31): @GLevel   1@W "@RAardwolf@Y Ring of Regeneration@w"
+@Y   rfinger@W( 31): @GLevel   1@W "@RAardwolf@Y Ring of Regeneration@w"
+@Y      legs@W(  6): @GLevel   1@W "@C(@W+@C) @WC@Coolin@Wg Z@Cephy@Wr @C(@W+@C)@w"
+@Y      feet@W( 65): @GLevel   1@W "@RAardwolf @YBoots of Speed@w"
+@Y   wielded@W( 36): @GLevel  20@W "S@we@Wa@wr@Wi@wn@Wg @wB@Wl@wa@Wz@we"
+@Y    second@W( 27): @GLevel   8@W "@wa @yFlame@rthrower@w"
+@Y     float@W(110): @GLevel   1@W "@RAardwolf @YAura of Sanctuary@w"
+@Y     above@W( 14): @GLevel   1@W "@RAura @Yof @GTrivia@w"
+@Y    portal@W(  3): @GLevel   5@W "@RA@rura @Ro@rf @Bt@bhe @BS@bage@w"
+@Y  sleeping@W(  0): @GLevel   1@W "V3 @RTrivia @gSleeping Bag@w"
+@w
+@WAve Sec  HR  DR Int Wis Lck Str Dex Con Res HitP Mana Move Effects
+@G 30@W @G  4@W @G114@W @G205@W @G 20@W @G 37@W @G 71@W @G 22@W @G 24@W @G 13@W @G103@W @G 405@W @G 235@W @G 385@W haste regeneration sanctuary dualwield@W detectgood detectevil detecthidden detectinvis detectmagic@W
+
+  2) Display the psi-melee equipment set for my current level (which was 211 at the
+     time I ran this example -- 201 + 10 levels as a T1 tier bonus)
+     "@Gdinv set display psi-melee@W"
+
+@WEquipment set:   @GLevel 211 @Cpsi-melee
+@w
+@Y     light@W( 59): @GLevel 200@W "@cShining Aqua Light@w"
+@Y      head@W( 56): @GLevel 200@W "@R(@YO@R)@YCirclet @Rof@Y Autumn Leaves@R(@YO@R)@w"
+@Y      eyes@W( 52): @GLevel 201@W "forest vision"
+@Y      lear@W( 41): @GLevel 200@W "@wa @YS@ymall @RR@ruby @YEar@yring@w"
+@Y      rear@W( 50): @GLevel 211@W "@m@-@-@YGe@ynie's Magical Ear@Yring@m@-@-@w"
+@Y     neck1@W( 42): @GLevel 201@W "a protective cloak skinned from a leaf scorpionfish"
+@Y     neck2@W( 40): @GLevel 201@W "a protective cloak skinned from a salamander cocoon"
+@Y      back@W( 45): @GLevel 201@W "@MP@mandora@w'@ms @R[@GBox@R]@w"
+@Y    medal1@W( 11): @GLevel   1@W "@RA@rcademy @GG@graduation @CM@cedal@w"
+@Y    medal2@W( 12): @GLevel   1@W "@YV3 @RA@rardwolf @GS@gupporters @CP@cin@w"
+@Y    medal3@W( 23): @GLevel   1@W "V3 @RO@rrder @GO@gf @CT@che @RF@rirst @GT@gier@w"
+@Y     torso@W( 83): @GLevel 201@W "@RAardwolf @YBreastplate of Magic Resistance@w"
+@Y      body@W( 49): @GLevel 200@W "-@m=@W*@m)@WA @MP@mure @Ma@mnd @MT@mrue @WHeart@m(@W*@m=@W-@w"
+@Y     waist@W( 46): @GLevel 200@W "a @YS@ytu@wdd@yed @YL@yea@wth@yer @YB@ye@wl@yt@w"
+@Y      arms@W(101): @GLevel 211@W "@RAardwolf@Y Bracers of Iron Grip@w"
+@Y    lwrist@W( 38): @GLevel 200@W "@rCuff @wof @B@-@D{@C*@W}@rSou@Rls@W{@C*@D}@B@-@w"
+@Y    rwrist@W( 37): @GLevel 200@W "a twig bracelet"
+@Y     hands@W( 73): @GLevel 211@W "@RAardwolf@Y Gloves of Dexterity@w"
+@Y   lfinger@W( 44): @GLevel 200@W "@YG@yold @WS@wignet of @CL@cocksley@w"
+@Y   rfinger@W( 44): @GLevel 200@W "a ring of the Dark Eight@w"
+@Y      legs@W( 44): @GLevel 200@W "@R(FAKE) @GXeno's @YKnickers @cof @CAwesomeness@w"
+@Y      feet@W( 52): @GLevel 200@W "@g.o@GO@go.@BDra@Gbani Bo@Blers @MSkorni @g.o@GO@go.@w"
+@Y   wielded@W(666): @GLevel 211@W "@YAxe of @RAardwolf@w"
+@Y    second@W(709): @GLevel 211@W "@YDagger of @RAardwolf@w"
+@Y     float@W( 45): @GLevel 201@W "a @YGolden Halo@w"
+@Y     above@W( 18): @GLevel   1@W "@RAura @Yof @GTrivia@w"
+@Y    portal@W( 28): @GLevel 180@W "the @YTiger @Wof @CKai@w"
+@Y  sleeping@W(  0): @GLevel   1@W "V3 @RTrivia @gSleeping Bag@w"
+@w
+@WAve Sec  HR  DR Int Wis Lck Str Dex Con Res HitP Mana Move Effects
+@G633@W @G633@W @G501@W @G643@W @G 95@W @G111@W @G138@W @G 73@W @G 42@W @G 33@W @G436@W @G1532@W @G 657@W @R-404@W dualwield irongrip@W
+
+  3) I also use an "@Cenchanter@W" priority group to boost int, wis, and luck when I
+     want to enchant something.  To wear the equipment set associated with this priority
+     I would use the command given below.  It automatically removes any currently worn
+     items that are not in the new set and stores those items in their respective "home"
+     containers.  It then pulls the new items from wherever they are stored and wears
+     them.  Easy peasy.
+     "@Gdinv set wear enchanter@W"
+]])
+
+end -- inv.cli.set.examples
+
+
+inv.cli.priority = {}
+function inv.cli.priority.fn(name, line, wildcards)
+  local command       = wildcards[1] or ""
+  local priorityName1 = wildcards[2] or ""
+  local priorityName2 = wildcards[3] or ""
+
+  dbot.debug("inv.cli.priority: command=\"" .. command .. "\", name1=\"" .. priorityName1 ..
+             "\", name2=\"" .. priorityName2 .. "\"")
+
+  if (not inv.init.initializedActive) then
+    dbot.info("Skipping priority request: plugin is not yet initialized (are you AFK or sleeping?)")
+    return inv.tags.stop(invTagsPriority, line, DRL_RET_UNINITIALIZED)
+  end -- if
+
+  if (command == "list") then
+    inv.priority.list(line)
+
+  elseif (command == "display") then
+    inv.priority.display(priorityName1, line)
+
+  elseif (command == "compare") then
+    inv.priority.compare(priorityName1, priorityName2, line)
+
+  else
+    inv.cli.priority.usage()
+    return inv.tags.stop(invTagsPriority, line, DRL_RET_INVALID_PARAM)
+  end -- if
+
+end -- inv.cli.priority.fn
+
+
+function inv.cli.priority.usage()
+  dbot.print("@W    " .. pluginNameCmd .. 
+             " priority @G[list | display | compare] @Y<priority name 1> <priority name 2>@w")
+end -- inv.cli.priority.usage
+
+
+function inv.cli.priority.examples()
+  dbot.print("@W\nUsage:\n")
+  inv.cli.priority.usage()
+
+  dbot.print(
+[[@W
+Aardwolf provides a system to "score" an item relative to how important particular statistics
+are you to.  Run "@Gcompare set@W" to see the current scoring weighting for your character.
+This is a great system and it allows you to customize how important particular statistics are
+to you and your particular playing style.
+
+However, this system has several limitations.  This plugin addresses those limitations by 
+giving users the ability to implement one or more customizable "priority" groups.  Extensions
+to the mud's scoring system include:
+  1) Entire equipment sets are scored collectively.  Knowing how a particular item is scored is
+     great, but it doesn't show the entire picture.  What you really care about is how many stats
+     or bonuses are available by a combination of your equipment.
+  2) Stat bonuses are capped at each level.  If you only look at individual item scores, it can
+     be very hard to find an optimal set of equipment that doesn't waste stats that will be over
+     the max and ignored by the mud.  The plugin's priority implementation uses a simulated
+     annealing algorithm to search through combinations of your equipment to find the optimal (or
+     near-optimal) set of items that scores highest for your particular priorities.
+  3) The "optimal" equipment at any given time is highly dependent on how many bonuses a character
+     has due to spells at that moment.  If you get a great spellup, changes are high that you will
+     want to use different equipment than if you have a normal spellup because the better spellup
+     may push some stats over the max and you are wasting opportunities to bump up other stats
+     with different equipment.
+  4) The plugin's priority implementation allows you to specify your priorities at specific levels
+     or a range of levels.  For example, a primary spellcaster may want to emphasize str and dex
+     more at lower levels and emphasize int and luck more at higher levels.  You might also give
+     the "haste" effect a high priority at lower levels and a lower priority once you have access
+     to the haste spell.  Your priorities will change relative to your level and this plugin 
+     gives you that opportunity.
+  5) We provide the ability to prioritize item effects such as sanctuary, haste, or detect invis.
+  6) We also allow you to specify the importance of the dual wield and irongrip effects given
+     by aard gloves and bracers.
+  7) You can prioritize the defensive bonus provided by a shield.
+  8) You can prioritize the value of maxing a particular stat.  For example, if a navigator is
+     one stat point away from getting access to another bypassed area, that navigator could bump
+     up the value of maxing that stat.
+  9) You can also prioritize the damage of primary hand weapons and secondary hand weapons
+     separately.  This gives you a lever to control how important dual wielding is to you.
+ 10) The plugin provides much more fine-grained control of specific stats and resists than what
+     is found in the default mud's scoring system.
+
+The plugin includes very crude priorities for each aardwolf class that have names matching the
+name of the class ("psi", "mage", "warrior", "ranger", "paladin", "thief", "cleric").  These
+default priorities match the "score" priorities found by running "@Gcompare set@W" on aard for
+a given class.  You will almost certainly want to tweak (or massively overhaul!) these, but they
+give you a rough idea for a starting point.
+
+Examples:
+  1) List all existing priorities defined for the plugin
+     "@Gdinv priority list@W"
+
+  2) Compare the stat differences for all levels for the equipment sets generated by two 
+     different priorities.  This will generate a big report that I didn't include here because
+     this helpfile is already enormous :)
+     "@Gdinv priority compare myPriority1 myPriority2@W"
+
+  3) Display the "psi-melee" priority bundled with the plugin.  This is intended for a primary
+     psi with at least one melee class.  You may or may not agree with these priorities.  That's
+     why this plugin gives you the ability to tweak things to your heart's content :)
+     "@Gdinv priority display psi-melee@W"
+
+@WPriority "@Cpsi-melee@W": Levels @G1@W - @G50
+@w  @y        mana @W= @R0.010
+@w  @y          hp @W= @R0.020
+@w  @y    allmagic @W= @R0.030
+@w  @y     allphys @W= @R0.030
+@w  @y         con @W= @R0.200
+@w  @y  offhandDam @W= @R0.330
+@w  @y         wis @W= 0.700
+@w  @y         dex @W= 0.800
+@w  @y         int @W= 0.800
+@w  @y         hit @W= 0.850
+@w  @y         dam @W= 0.900
+@w  @y        luck @W= 1.000
+@w  @y      avedam @W= 1.000
+@w  @y         str @W= 1.000
+@w  @y    irongrip @W= @G2.000
+@w  @y  detectevil @W= @G2.000
+@w  @y  detectgood @W= @G2.000
+@w  @ydetecthidden @W= @G3.000
+@w  @y detectinvis @W= @G4.000
+@w  @y      flying @W= @G5.000
+@w  @yregeneration @W= @G5.000
+@w  @y      shield @W= @G5.000
+@w  @y       invis @W= @G10.000
+@w  @y       haste @W= @G20.000
+@w  @y   dualwield @W= @G20.000
+@w  @y   sanctuary @W= @G50.000
+@WPriority "@Cpsi-melee@W": Levels @G51@W - @G70
+@w  @y          hp @W= @R0.010
+@w  @y        mana @W= @R0.010
+@w  @y    allmagic @W= @R0.030
+@w  @y     allphys @W= @R0.050
+@w  @y         con @W= @R0.200
+@w  @y  offhandDam @W= @R0.400
+@w  @y         dex @W= @R0.500
+@w  @y         wis @W= 0.800
+@w  @y         hit @W= 0.800
+@w  @y         dam @W= 0.900
+@w  @y         int @W= 1.000
+@w  @y        luck @W= 1.000
+@w  @y      avedam @W= 1.000
+@w  @y         str @W= 1.000
+@w  @y  detectevil @W= @G2.000
+@w  @y  detectgood @W= @G2.000
+@w  @ydetecthidden @W= @G3.000
+@w  @y    irongrip @W= @G3.000
+@w  @y      flying @W= @G4.000
+@w  @y detectinvis @W= @G4.000
+@w  @y      shield @W= @G5.000
+@w  @y       invis @W= @G5.000
+@w  @y       haste @W= @G5.000
+@w  @yregeneration @W= @G5.000
+@w  @y   sanctuary @W= @G10.000
+@WPriority "@Cpsi-melee@W": Levels @G71@W - @G130
+@w  @y          hp @W= @R0.010
+@w  @y        mana @W= @R0.010
+@w  @y    allmagic @W= @R0.050
+@w  @y     allphys @W= @R0.100
+@w  @y         con @W= @R0.400
+@w  @y  offhandDam @W= @R0.500
+@w  @y         dex @W= @R0.600
+@w  @y         hit @W= 0.750
+@w  @y         str @W= 0.800
+@w  @y         dam @W= 0.850
+@w  @y         wis @W= 0.900
+@w  @y         int @W= 1.000
+@w  @y        luck @W= 1.000
+@w  @y      avedam @W= 1.000
+@w  @y       haste @W= @G2.000
+@w  @y detectinvis @W= @G2.000
+@w  @y  detectgood @W= @G2.000
+@w  @ydetecthidden @W= @G2.000
+@w  @y      flying @W= @G2.000
+@w  @y  detectevil @W= @G2.000
+@w  @y       invis @W= @G3.000
+@w  @yregeneration @W= @G5.000
+@w  @y      shield @W= @G10.000
+@w  @y   sanctuary @W= @G10.000
+@w  @y    irongrip @W= @G20.000
+@WPriority "@Cpsi-melee@W": Levels @G131@W - @G170
+@w  @y          hp @W= @R0.010
+@w  @y        mana @W= @R0.010
+@w  @y    allmagic @W= @R0.050
+@w  @y     allphys @W= @R0.100
+@w  @y         con @W= @R0.400
+@w  @y         dex @W= @R0.500
+@w  @y  offhandDam @W= @R0.600
+@w  @y         str @W= 0.700
+@w  @y         dam @W= 0.850
+@w  @y         hit @W= 0.850
+@w  @y      flying @W= 1.000
+@w  @y         int @W= 1.000
+@w  @y        luck @W= 1.000
+@w  @y       invis @W= 1.000
+@w  @y      avedam @W= 1.000
+@w  @y         wis @W= 1.000
+@w  @y detectinvis @W= @G2.000
+@w  @y  detectevil @W= @G2.000
+@w  @ydetecthidden @W= @G2.000
+@w  @y       haste @W= @G2.000
+@w  @y  detectgood @W= @G2.000
+@w  @yregeneration @W= @G5.000
+@w  @y   sanctuary @W= @G10.000
+@w  @y    irongrip @W= @G20.000
+@w  @y      shield @W= @G20.000
+@WPriority "@Cpsi-melee@W": Levels @G171@W - @G200
+@w  @y          hp @W= @R0.010
+@w  @y        mana @W= @R0.010
+@w  @y    allmagic @W= @R0.050
+@w  @y     allphys @W= @R0.100
+@w  @y         dex @W= @R0.400
+@w  @y         con @W= @R0.400
+@w  @y  offhandDam @W= 0.700
+@w  @y         str @W= 0.700
+@w  @y         dam @W= 0.850
+@w  @y         hit @W= 0.850
+@w  @y      flying @W= 1.000
+@w  @y         wis @W= 1.000
+@w  @y        luck @W= 1.000
+@w  @y         int @W= 1.000
+@w  @y      avedam @W= 1.000
+@w  @y       invis @W= 1.000
+@w  @ydetecthidden @W= @G2.000
+@w  @y       haste @W= @G2.000
+@w  @y  detectevil @W= @G2.000
+@w  @y detectinvis @W= @G2.000
+@w  @y  detectgood @W= @G2.000
+@w  @y      maxwis @W= @G5.000
+@w  @yregeneration @W= @G5.000
+@w  @y     maxluck @W= @G5.000
+@w  @y      maxint @W= @G5.000
+@w  @y   sanctuary @W= @G20.000
+@w  @y    irongrip @W= @G25.000
+@w  @y      shield @W= @G25.000
+@WPriority "@Cpsi-melee@W": Levels @G201@W - @G291
+@w  @y          hp @W= @R0.010
+@w  @y        mana @W= @R0.010
+@w  @y    allmagic @W= @R0.050
+@w  @y     allphys @W= @R0.100
+@w  @y         con @W= @R0.250
+@w  @y         dex @W= @R0.400
+@w  @y         str @W= @R0.500
+@w  @y         dam @W= 0.800
+@w  @y         hit @W= 0.800
+@w  @y  offhandDam @W= 0.850
+@w  @y      flying @W= 1.000
+@w  @y        luck @W= 1.000
+@w  @y       invis @W= 1.000
+@w  @y         int @W= 1.000
+@w  @y         wis @W= 1.000
+@w  @y      avedam @W= 1.000
+@w  @ydetecthidden @W= @G2.000
+@w  @y detectinvis @W= @G2.000
+@w  @y  detectevil @W= @G2.000
+@w  @y       haste @W= @G2.000
+@w  @y  detectgood @W= @G2.000
+@w  @yregeneration @W= @G2.000
+@w  @y   sanctuary @W= @G5.000
+@w  @y      maxint @W= @G20.000
+@w  @y      maxwis @W= @G20.000
+@w  @y     maxluck @W= @G20.000
+@w  @y    irongrip @W= @G30.000
+@w  @y      shield @W= @G40.000@@
+@W
+At the present time, the plugin does not have a GUI component so priority customization must be
+done by manually editing the plugin file directly.  Adding a GUI is very high on the priority list
+(pun intended) for a future release of the plugin.  In the meantime, you can open the plugin in an
+editor, search for the inv.priority.addDefault function, and add or modify one of the example
+default priorities.  Once you have made your modifications, run "@Gdinv reset confirm priority@W"
+to reset your priorities to the new default values.  
+
+This is an example where int, luck, and wis are equally weighted and no other stats are scored.
+It gives the highest possible stats for an enchanter wanting to enchant something.  The group of
+priorities is the same from level 1 - 291.
+@G
+  retval = inv.priority.add(
+    "enchanter", -- Equipment priorities for an enchanter (only care about int, luck, wis)
+    { 
+      { -- Priorities for levels 1 - 291
+        minLevel = 1, 
+        maxLevel = 291, 
+        priorities = { int        = 1,
+                       luck       = 1,
+                       wis        = 1
+                     }
+      }
+    })
+@W
+Here is a snippet showing how things are prioritized from levels 1 - 50 for a psi with at
+least one melee class (you may want different priorities -- that's just fine!)
+@G
+  retval = inv.priority.add(
+  "psi-melee", -- Equipment priorities for a psi with at least one melee class
+  { 
+    { -- Priorities for levels 1 - 50
+      minLevel = 1, 
+      maxLevel = 50,
+      priorities = { int          = 0.8,
+                     luck         = 1, 
+                     wis          = 0.7,
+                     str          = 1,  
+                     dex          = 0.8, 
+                     con          = 0.2,  
+                     dam          = 0.9,
+                     hit          = 0.85,
+                     hp           = 0.02,
+                     mana         = 0.01,
+                     moves        = 0,
+                     allphys      = 0.03,
+                     allmagic     = 0.03,
+                     avedam       = 1,
+                     offhandDam   = 0.33, 
+                     regeneration = 5, 
+                     sanctuary    = 50,
+                     haste        = 20,
+                     detectgood   = 2,
+                     detectevil   = 2,
+                     detecthidden = 3,
+                     detectinvis  = 4,
+                     detectmagic  = 0,    -- I don't care if we can detect magic
+                     shield       = 5,
+                     dualwield    = 20,
+                     irongrip     = 2,
+                     invis        = 10,
+                     flying       = 5,
+                     maxint       = 0,
+                     maxluck      = 0,
+                     maxwis       = 0,
+                     maxstr       = 0,
+                     maxdex       = 0,
+                     maxcon       = 0
+                   }
+    },
+@W
+    ... This is just a snippet.  You can look at the plugin file for more details
+]])
+
+end -- inv.cli.priority.examples
+
+
+inv.cli.snapshot = {}
+function inv.cli.snapshot.fn(name, line, wildcards)
+  local command      = wildcards[1] or ""
+  local snapshotName = wildcards[2] or ""
+
+  dbot.debug("inv.cli.snapshot: command=\"" .. command .. "\", name=\"" .. snapshotName .. "\"")
+
+  if (not inv.init.initializedActive) then
+    dbot.info("Skipping snapshot request: plugin is not yet initialized (are you AFK or sleeping?)")
+    return inv.tags.stop(invTagsSnapshot, line, DRL_RET_UNINITIALIZED)
+  end -- if
+
+  if (command == "create") then
+    inv.snapshot.add(snapshotName, line)
+
+  elseif (command == "delete") then
+    inv.snapshot.remove(snapshotName, line)
+
+  elseif (command == "list") then
+    inv.snapshot.list(line)
+
+  elseif (command == "display") then
+    inv.snapshot.display(snapshotName, line)
+
+  elseif (command == "wear") then
+
+    if (dbot.gmcp.getState() ~= dbot.stateActive) then
+      dbot.info("Skipping snapshot wear request: character is not in the active state")
+      return inv.tags.stop(invTagsSnapshot, line, DRL_RET_NOT_ACTIVE)
+    end -- if
+
+    inv.snapshot.wear(snapshotName, line)
+
+  else
+    inv.cli.snapshot.usage()
+    inv.tags.stop(invTagsSnapshot, line, DRL_RET_INVALID_PARAM)
+  end -- if
+
+end -- inv.cli.snapshot.fn
+
+
+function inv.cli.snapshot.usage()
+  dbot.print("@W    " .. pluginNameCmd .. 
+             " snapshot @G[create | delete | list | display | wear] @Y<snapshot name>")
+end -- inv.cli.snapshot.usage
+
+
+function inv.cli.snapshot.examples()
+  dbot.print("@W\nUsage:\n")
+  inv.cli.snapshot.usage()
+
+  dbot.print(
+[[@W
+It's quite easy to take an equipment "snapshot" consisting of everything you are wearing
+at the time of the snapshot.  You can then easily re-wear the items contained in the 
+snapshot at a later time.  My guess is that most people will want to use automatically
+generated equipment sets (see "@Gdinv help set@W") in most cases.  However, it could also
+be very convenient to explicitly manage what is in a particular set and that is where 
+snapshots come into play.
+
+If you wear a snapshot, it will remove any currently worn items that are not in the
+snapshot and put them away in each item's "home" container (the container where the item
+was most recently removed).  If a removed item has never been in a container, the plugin
+will put it in your main inventory.
+
+Examples!
+  1) Take a snapshot of what you currently are wearing and name it "myAwesomeSnapshot"
+     "@Gdinv snapshot create myAwesomeSnapshot@W"
+
+  2) List existing snapshots that you have previously taken
+     "@Gdinv snapshot list@W"
+
+  3) Display what equipment is in a particular snapshot.  The output shown below is in
+     the same format that you would see with a regular automatically generated set.  The
+     main difference is that each item's score (the number in parentheses) is 0 here because
+     we are not scoring the item relative to a priority.  We are just showing what items
+     would be present in the snapshot.  See the helpfile at "@Gdinv help set@W" for details.
+     "@Gdinv snapshot display myAwesomeSnapshot@W"
+
+@WEquipment set: "@CmyAwesomeSnapshot@W"
+@w
+@Y     light@W(  0): @GLevel 200@W "@cShining Aqua Light@w"
+@Y      head@W(  0): @GLevel 200@W "@R(@YO@R)@YCirclet @Rof@Y Autumn Leaves@R(@YO@R)@w"
+@Y      eyes@W(  0): @GLevel 200@W "/@D[_]@W-@D[_]@W @DHorn@W-@DRimmed @WGlasses@w"
+@Y      lear@W(  0): @GLevel 200@W "@wa @YS@ymall @RR@ruby @YEar@yring@w"
+@Y      rear@W(  0): @GLevel 211@W "@m@-@-@YGe@ynie's Magical Ear@Yring@m@-@-@w"
+@Y     neck1@W(  0): @GLevel 201@W "a protective cloak skinned from a leaf scorpionfish"
+@Y     neck2@W(  0): @GLevel 201@W "a protective cloak skinned from a salamander cocoon"
+@Y      back@W(  0): @GLevel 201@W "@MP@mandora@w'@ms @R[@GBox@R]@w"
+@Y    medal1@W(  0): @GLevel   1@W "@RA@rcademy @GG@graduation @CM@cedal@w"
+@Y    medal2@W(  0): @GLevel   1@W "@YV3 @RA@rardwolf @GS@gupporters @CP@cin@w"
+@Y    medal3@W(  0): @GLevel   1@W "V3 @RO@rrder @GO@gf @CT@che @RF@rirst @GT@gier@w"
+@Y     torso@W(  0): @GLevel 201@W "@RAardwolf @YBreastplate of Magic Resistance@w"
+@Y      body@W(  0): @GLevel 200@W "-@m=@W*@m)@WA @MP@mure @Ma@mnd @MT@mrue @WHeart@m(@W*@m=@W-@w"
+@Y     waist@W(  0): @GLevel 200@W "a @YS@ytu@wdd@yed @YL@yea@wth@yer @YB@ye@wl@yt@w"
+@Y      arms@W(  0): @GLevel 211@W "@RAardwolf@Y Bracers of Iron Grip@w"
+@Y    lwrist@W(  0): @GLevel 200@W "@rCuff @wof @B@-@D{@C*@W}@rSou@Rls@W{@C*@D}@B@-@w"
+@Y    rwrist@W(  0): @GLevel 200@W "a twig bracelet"
+@Y     hands@W(  0): @GLevel 211@W "@RAardwolf@Y Gloves of Dexterity@w"
+@Y   lfinger@W(  0): @GLevel 200@W "a ring of the Dark Eight@w"
+@Y   rfinger@W(  0): @GLevel 200@W "a ring of the Dark Eight@w"
+@Y      legs@W(  0): @GLevel 200@W "@R(FAKE) @GXeno's @YKnickers @cof @CAwesomeness@w"
+@Y      feet@W(  0): @GLevel 200@W "@g.o@GO@go.@BDra@Gbani Bo@Blers @MSkorni @g.o@GO@go.@w"
+@Y   wielded@W(  0): @GLevel 211@W "@YAxe of @RAardwolf@w"
+@Y    second@W(  0): @GLevel 211@W "@YDagger of @RAardwolf@w"
+@Y     float@W(  0): @GLevel 201@W "a @YGolden Halo@w"
+@Y     above@W(  0): @GLevel   1@W "@RAura @Yof @GTrivia@w"
+@Y    portal@W(  0): @GLevel 180@W "the @YTiger @Wof @CKai@w"
+@Y  sleeping@W(  0): @GLevel   1@W "V3 @RTrivia @gSleeping Bag@w"
+@w
+@WAve Sec  HR  DR Int Wis Lck Str Dex Con Res HitP Mana Move Effects
+@G633@W @G633@W @G500@W @G642@W @G121@W @G 99@W @G129@W @G 62@W @G 44@W @G 32@W @G407@W @G1832@W @G 757@W @R-604@W dualwield irongrip @W
+
+  4) Wear a snapshot named "my_level_171_set"
+     "@Gdinv snapshot wear my_level_171_set@W"
+
+  5) Delete a snapshot named myEqIs1337
+     "@Gdinv snapshot delete myEqIs1337@W"
+]])
+
+end -- inv.cli.snapshot.examples
+
+
+inv.cli.analyze = {}
+inv.cli.analyzePkg = nil
+function inv.cli.analyze.fn(name, line, wildcards)
+  local command      = wildcards[1] or ""
+  local priorityName = wildcards[2] or ""
+  local wearableLocs = wildcards[3] or ""
+  local expandedLocs = ""
+  local endTag       = line
+  local retval
+
+  dbot.debug("inv.cli.analyze.fn: priority=\"" .. priorityName .. "\", loc=\"" .. wearableLocs .. "\"")
+
+  if (not inv.init.initializedActive) then
+    dbot.info("Skipping analyze request: plugin is not yet initialized (are you AFK or sleeping?)")
+    return inv.tags.stop(invTagsAnalyze, line, DRL_RET_UNINITIALIZED)
+  elseif (dbot.gmcp.getState() ~= dbot.stateActive) then
+    dbot.info("Skipping analyze request: character is not in the active state")
+    return inv.tags.stop(invTagsAnalyze, line, DRL_RET_NOT_ACTIVE)
+  end -- if
+
+  -- If the user gave a wearable location, check if it is actually valid.  We also support the
+  -- user giving us wearable types (e.g., "neck") in addition to wearable locations (e.g., "neck1 neck2").
+  if (wearableLocs ~= "") then
+    for loc in wearableLocs:gmatch("%S+") do
+      if inv.items.isWearableLoc(loc) then
+        expandedLocs = expandedLocs .. " " .. loc
+      elseif inv.items.isWearableType(loc) then
+        expandedLocs = expandedLocs .. " " .. inv.items.wearableTypeToLocs(loc)
+      else
+        dbot.warn("inv.cli.analyze.fn: Invalid wearable type or location \"@R" .. loc .. "@W\"")
+        dbot.info("Run \"@Gwearables@W\" to see keywords for valid wearable locations.")
+        return inv.tags.stop(invTagsAnalyze, endTag, DRL_RET_INVALID_PARAM)
+      end -- if
+    end -- for
+  end -- if
+
+  if (command == "create") then
+    if (inv.cli.analyzePkg ~= nil) then
+      dbot.info("Skipping analysis of priority \"@C" .. priorityName .. 
+                "@W\": another analysis is in progress")
+      return inv.tags.stop(invTagsAnalyze, endTag, DRL_RET_BUSY)
+    else
+      inv.cli.analyzePkg              = {}
+      inv.cli.analyzePkg.priorityName = priorityName
+      inv.cli.analyzePkg.wearableLocs = expandedLocs
+      inv.cli.analyzePkg.endTag       = endTag
+
+      wait.make(inv.cli.analyzeCR)
+    end -- if
+
+  elseif (command == "delete") then
+    retval = inv.analyze.delete(priorityName)
+    inv.tags.stop(invTagsAnalyze, endTag, retval)
+
+  elseif (command == "display") then
+    inv.analyze.display(priorityName, expandedLocs, endTag)
+
+  else
+    inv.cli.analyze.usage()
+    inv.tags.stop(invTagsAnalyze, endTag, DRL_RET_INVALID_PARAM)
+  end -- if
+
+end -- inv.cli.analyze.fn
+
+
+function inv.cli.analyze.fn2(name, line, wildcards)
+  if (not inv.init.initializedActive) then
+    dbot.info("Skipping analyze request: plugin is not yet initialized (are you AFK or sleeping?)")
+    return inv.tags.stop(invTagsAnalyze, line, DRL_RET_UNINITIALIZED)
+  end -- if
+
+  local retval = inv.analyze.list()
+
+  inv.tags.stop(invTagsAnalyze, line, retval)
+end -- inv.cli.analyze.fn2
+
+
+function inv.cli.analyzeCR()
+  local retval
+  local tierLevel = 10 * dbot.gmcp.getTier()
+
+  if (inv.cli.analyzePkg == nil) then
+    dbot.error("inv.cli.analyzeCR: analyze package is nil!")
+    return DRL_RET_INTERNAL_ERROR
+  end -- if
+
+  local priorityName = inv.cli.analyzePkg.priorityName or "nil"
+  local wearableLocs = inv.cli.analyzePkg.wearableLocs
+  local endTag       = inv.cli.analyzePkg.endTag
+
+  dbot.info("Performing equipment analysis for priority \"@C" .. priorityName .. "@W\"...")
+  dbot.info("This analysis could take up to a minute on a slow system.  Be patient!\n")
+
+  local resultData = dbot.callback.new()
+  retval = inv.analyze.sets(priorityName, 1 + tierLevel, resultData)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.cli.analyzeCR: Failed to analyze sets: " .. dbot.retval.getString(retval))
+  else
+    -- Wait until the analysis is complete
+    retval = dbot.callback.wait(resultData, inv.analyze.timeoutThreshold)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.cli.analyzeCR: Analysis of set failed: " .. dbot.retval.getString(retval))
+    end -- if
+  end -- if
+
+  if (retval == DRL_RET_SUCCESS) then
+    retval = inv.analyze.display(priorityName, wearableLocs, nil)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.cli.analyzeCR: analysis display failed: " .. dbot.retval.getString(retval))
+    end -- if
+  end -- if
+
+  inv.cli.analyzePkg = nil
+
+  return inv.tags.stop(invTagsAnalyze, endTag, retval)
+end -- inv.cli.analyzeCR
+
+
+function inv.cli.analyze.usage()
+  dbot.print("@W    " .. pluginNameCmd ..
+             " analyze @G[list | create | delete | display] <priority name> @Y<positions>@w")
+end -- inv.cli.analyze.usage
+
+
+function inv.cli.analyze.examples()
+  dbot.print("@W\nUsage:\n")
+  inv.cli.analyze.usage()
+
+  dbot.print(
+[[@W
+The plugin has the ability to analyze your equipment relative to a priority group.  This
+analysis identifies the "best" equipment for you at each wearable location at each level.
+Creating a full analysis takes roughly 10 seconds (I'm using a 5-year old mac mini running
+wine -- your times could be better or worse depending on your hardware.)
+
+You can "@Clist@W" all of the analyses that have been created.  If an analysis exists for all
+200 levels available to your character, the analysis is shown in @Ggreen@W.  If one or more
+levels does not yet have an equipment set (e.g., maybe you used "@Gdinv set ...@W" to create one
+ set but you didn't perform a full analysis) then that analysis name is shown in @Yyellow@W.
+
+Once you "@Ccreate@W" the analysis data, you can "@Cdisplay@W" it quickly without regenerating
+all of the data.  If you add new equipment to your inventory, you should recreate the analysis
+to pick up any changes due to the new equipment.  Note that the "@Gdinv set ...@W" options
+automatically use all of your equipment when creating sets but we don't proactively create new
+sets for all 200 levels unless you explicitly request that via "@Gdinv analyze create [name]@W".
+
+You have the option of displaying equipment results for one or more specific wearable locations.
+For example, you could display results for the arms, head, and neck locations if you don't wish
+to see the full analysis.
+
+You can "@Cdelete@W" an existing analysis by providing the name of the analysis.
+
+Examples:
+  1) Create a set analysis for the psi-melee priority (see "@Gdinv help priority@W" for details.)
+     This generates a lot of output so I am just including a snippet below for levels 150 - 161.
+     The "@R<<@W" symbol at the front of each entry indicates an item that is being removed at
+     that level while the "@G>>@W" symbol indicates that the item is the new replacement.  If an
+     item stays the same from one level to the next, it is not displayed by default.
+     "@Gdinv analyze create psi-melee@W"
+
+@Y--------------------------------------------@W Level 150 @Y--------------------------------------------
+@w
+@WLvl Name of Armor            Type       HR   DR Int Wis Lck Str Dex Con Res HitP Mana Move
+@W121@w @R<<@W a @RSta@Wre of @RAgo@Wny@w      @Weyes     @G  12@W @G  12@W @G  2@W @G  3@W @G  7@W   0 @G  2@W   0 @G 13@W    0    0    0
+@W150@w @G>>@W the @cO@Dcu@cl@Dus@w of the @cK'  @Weyes        0 @G  26@W   0 @G 10@W @G 10@W   0   0   0 @G 10@W    0    0    0
+@w
+@WLvl Name of Treasure         Type       HR   DR Int Wis Lck Str Dex Con Res HitP Mana Move
+@W100@w @R<<@W @RAardwolf@Y Bracers of I @Warms     @G  20@W @G  20@W   0   0   0   0   0   0   0 @G 100@W @G 100@W    0
+@W150@w @G>>@W @RAardwolf@Y Bracers of I @Warms     @G  30@W @G  30@W   0   0   0   0   0   0   0 @G 150@W @G 150@W    0
+@W100@w @R<<@W @RAardwolf@Y Gloves of De @Whands    @G  20@W @G  20@W   0   0   0   0 @G  6@W   0   0 @G 100@W @G 100@W @G 100
+@W150@w @G>>@W @RAardwolf@Y Gloves of De @Whands    @G  30@W @G  30@W   0   0   0   0 @G  6@W   0   0 @G 150@W @G 150@W @G 150
+@w
+@Y--------------------------------------------@W Level 151 @Y--------------------------------------------
+@w
+@WLvl Name of Armor            Type       HR   DR Int Wis Lck Str Dex Con Res HitP Mana Move
+@W131@w @R<<@W (@ySubstance@w of the @gUni @Wback        0 @G  14@W @G 12@W   0 @G  2@W   0   0   0 @G 13@W @G  60@W    0 @R-120
+@W151@w @G>>@W a black tunic lined w @Wback     @G   5@W @G  21@W @G 12@W @G  4@W @G  2@W @G  1@W @G  1@W   0   0    0    0    0
+@w
+@Y--------------------------------------------@W Level 160 @Y--------------------------------------------
+@w
+@WLvl Name of Weapon           Type     Ave Wgt   HR   DR Dam Type Specials Int Wis Lck Str Dex Con
+@W140@w @R<<@W @YDagger of @RAardwolf@w    @Wwielded  @G420@W @G 10@W @G  14@W @G  14@W Light    sharp      0   0   0   0   0   0
+@W160@w @G>>@W @YAxe of @RAardwolf@w       @Wwielded  @G480@W @G 20@W @G  16@W @G  16@W Slash    vorpal     0   0   0   0   0   0
+@W140@w @R<<@W @YAxe of @RAardwolf@w       @Wsecond   @G420@W @G  1@W @G  14@W @G  14@W Pierce   flaming    0   0   0   0   0   0
+@W160@w @G>>@W @YDagger of @RAardwolf@w    @Wsecond   @G480@W @G 10@W @G  16@W @G  16@W Pierce   sharp      0   0   0   0   0   0
+@w
+@Y--------------------------------------------@W Level 161 @Y--------------------------------------------
+@w
+@WLvl Name of Armor            Type       HR   DR Int Wis Lck Str Dex Con Res HitP Mana Move
+@W131@w @R<<@W @Dthe @YEye @Dof @MHorus Earr @Wlear     @G   6@W @G   8@W @G  8@W   0 @G  3@W   0   0   0 @G 12@W    0    0    0
+@W161@w @G>>@W @Y(@y%@c*@C=@W- @CR@coar @wof @YV@yictory @Wlear        0 @G  20@W @G  4@W @G  4@W @G  3@W @G  8@W @G  4@W   0 @G 14@W @G  60@W    0 @R-120
+@W131@w @R<<@W @Dthe @YEye @Dof @MHorus Earr @Wrear     @G   6@W @G   8@W @G  8@W   0 @G  3@W   0   0 @G  1@W @G 12@W    0    0    0
+@W161@w @G>>@W @Y(@y%@c*@C=@W- @CR@coar @wof @YV@yictory @Wrear     @G   2@W @G  14@W @G  4@W @G  4@W @G  6@W @G  8@W @G  4@W   0 @G 14@W @G  60@W    0 @R-120
+@W121@w @R<<@W @gSt@Ge@Wa@Gd@gfa@Gs@Wt@Gn@ges@Gs@w         @Wlwrist   @G   4@W @G  13@W   0 @G  4@W @G  3@W @G  3@W   0 @G  4@W @G 12@W @G  50@W    0 @R -90
+@W161@w @G>>@W @BTeran's @bDeath @BGrip@w    @Wlwrist   @G   3@W @G  18@W   0 @G  3@W @G  5@W @G 12@W   0   0   0    0    0    0
+@W131@w @R<<@W S@wp@Wi@wk@We @wS@Wt@wu@Wd@wd@We@wd @GB@gr@Ga@gc@Ge@gr  @Wrwrist      0 @G  12@W @G  9@W   0 @G  3@W   0 @G  2@W   0 @G 13@W @G  25@W    0 @R -50
+@W161@w @G>>@W @YM@yana@ccle@Cs of S@capi@yenc@Ye  @Wrwrist      0 @G  14@W @G 12@W @G  2@W @G  2@W   0   0   0 @G 16@W    0 @G  60@W @R-120
+@W
+
+  2) Let's see what the available "optimal" leg items are at each level.  Hmm.  Looks like I'm
+     missing some decent L71 legs and I don't have anything between L91 and L181.  That helps
+     me identify places where I could potentially get better equipment.  I'm using the "@Cdisplay@W"
+     mode here because I'm happy with the sets we created in the previous example and I don't
+     want to duplicate that work again by creating the analysis a second time.
+     "@Gdinv analyze display psi-melee legs@W"
+
+@Y--------------------------------------------@W Level  11 @Y--------------------------------------------
+@w
+@WLvl Name of Armor            Type       HR   DR Int Wis Lck Str Dex Con Res HitP Mana Move
+@W  1@w @G>>@W @C(@W+@C) @WC@Coolin@Wg Z@Cephy@Wr @C(  @Wlegs     @G   5@W @G   2@W   0   0 @G  2@W @G  1@W   0   0   0    0    0    0
+@w
+@Y--------------------------------------------@W Level  21 @Y--------------------------------------------
+@w
+@WLvl Name of Armor            Type       HR   DR Int Wis Lck Str Dex Con Res HitP Mana Move
+@W  1@w @R<<@W @C(@W+@C) @WC@Coolin@Wg Z@Cephy@Wr @C(  @Wlegs     @G   5@W @G   2@W   0   0 @G  2@W @G  1@W   0   0   0    0    0    0
+@W 21@w @G>>@W a hero's leggings     @Wlegs     @G   6@W @G   2@W   0 @G  4@W @G  3@W   0 @G  4@W   0   0    0    0    0
+@w
+@Y--------------------------------------------@W Level  41 @Y--------------------------------------------
+@w
+@WLvl Name of Armor            Type       HR   DR Int Wis Lck Str Dex Con Res HitP Mana Move
+@W 21@w @R<<@W a hero's leggings     @Wlegs     @G   6@W @G   2@W   0 @G  4@W @G  3@W   0 @G  4@W   0   0    0    0    0
+@W 41@w @G>>@W @G(>@RL@Ya@Rv@Ya S@Rh@Yi@Rn G@Yu@Ra@Yr@Rd@Ys@G<)  @Wlegs        0 @G  10@W   0 @G  4@W @G  4@W @G  4@W   0   0 @G  4@W @G  20@W    0 @R -40
+@w
+@Y--------------------------------------------@W Level  91 @Y--------------------------------------------
+@w
+@WLvl Name of Armor            Type       HR   DR Int Wis Lck Str Dex Con Res HitP Mana Move
+@W 41@w @R<<@W @G(>@RL@Ya@Rv@Ya S@Rh@Yi@Rn G@Yu@Ra@Yr@Rd@Ys@G<)  @Wlegs        0 @G  10@W   0 @G  4@W @G  4@W @G  4@W   0   0 @G  4@W @G  20@W    0 @R -40
+@W 91@w @G>>@W @r-=@RAn@rcie@Rnt @WSamurai @RS@rou @Wlegs     @G   7@W @G  12@W @G  1@W @G  2@W @G  1@W @G  2@W @G  2@W @G  1@W @G  9@W    0    0    0
+@w
+@Y--------------------------------------------@W Level 181 @Y--------------------------------------------
+@w
+@WLvl Name of Armor            Type       HR   DR Int Wis Lck Str Dex Con Res HitP Mana Move
+@W 91@w @R<<@W @r-=@RAn@rcie@Rnt @WSamurai @RS@rou @Wlegs     @G   7@W @G  12@W @G  1@W @G  2@W @G  1@W @G  2@W @G  2@W @G  1@W @G  9@W    0    0    0
+@W181@w @G>>@W @GT@gou@Ggh @YL@yeath@Yer @WC@wha@Wps@w   @Wlegs     @G   6@W @G  16@W   0 @G  3@W   0 @G 18@W   0   0 @G 18@W    0    0    0
+@w
+@Y--------------------------------------------@W Level 200 @Y--------------------------------------------
+@w
+@WLvl Name of Armor            Type       HR   DR Int Wis Lck Str Dex Con Res HitP Mana Move
+@W181@w @R<<@W @GT@gou@Ggh @YL@yeath@Yer @WC@wha@Wps@w   @Wlegs     @G   6@W @G  16@W   0 @G  3@W   0 @G 18@W   0   0 @G 18@W    0    0    0
+@W200@w @G>>@W @R(FAKE) @GXeno's @YKnicker @Glegs    @W @G  23@W @G  20@W   0 @G  3@W @G  5@W   0   0   0 @G 19@W @G 200@W    0    0
+@W
+
+  3) You can also specify multiple wearable locations to display.  In this example, we will show
+     results for the hands, feet, neck1, and rwrist locations.  I'm not displaying the output here.
+     I think the helpfile is big enough already :)
+     "@Gdinv analyze display psi-melee hands feet neck1 rwrist@W"
+
+  4) Now that you have created the "psi-melee" analysis, it will show up on your analysis list.
+     "@Gdinv analyze list@W"
+
+  5) If you are done with the analysis, you can delete it.  You may wish to do this to save disk
+     space or to speed up the speed of creating a backup.
+     "@Gdinv analyze delete psi-melee@W"
+]])
+
+end -- inv.cli.analyze.examples
+
+
+inv.cli.usage = {}
+function inv.cli.usage.fn(name, line, wildcards)
+  local priorityName = wildcards[1] or ""
+  local query        = wildcards[2] or ""
+
+  dbot.debug("inv.cli.usage.fn: priority=\"" .. priorityName .. "\", query=\"" .. query .. "\"")
+
+  if (not inv.init.initializedActive) then
+    dbot.info("Skipping usage request: plugin is not yet initialized (are you AFK or sleeping?)")
+    return inv.tags.stop(invTagsUsage, line, DRL_RET_UNINITIALIZED)
+  elseif (dbot.gmcp.getState() ~= dbot.stateActive) then
+    dbot.info("Skipping usage request: character is not in the active state")
+    return inv.tags.stop(invTagsUsage, line, DRL_RET_NOT_ACTIVE)
+  end -- if
+
+  if (priorityName == "") then
+    inv.cli.usage.usage()
+    return inv.tags.stop(invTagsUsage, line, DRL_RET_INVALID_PARAM)
+  else
+    inv.usage.display(priorityName, query, line)
+  end -- if
+
+end -- inv.cli.usage.fn
+
+
+function inv.cli.usage.usage()
+  dbot.print("@W    " .. pluginNameCmd .. " usage @G<priority name | all> <query>@w")
+end -- inv.cli.usage.usage
+
+
+function inv.cli.usage.examples()
+  dbot.print("@W\nUsage:\n")
+  inv.cli.usage.usage()
+
+  dbot.print(
+[[@W
+It is very useful to see which items are being used and at what levels they are in your
+equipment sets.  To use this feature, you must specify a priority (see "@Gdinv help priority@W")
+that has a completed analysis available (see "@Gdinv help analyze@W") and a query indicating
+which items you wish to examine (see "@Gdinv help search@W").  Any items that match the
+specified query will be displayed along with information about where (and if) the item is
+used for the given priority.
+
+If an item isn't used with one priority, it may still be used by another priority.  For
+example, a high int/wis/luck item may be useful for an "@Cenchanter@W" priority even if that
+item isn't used by your normal leveling equipment set.
+
+Also, the usage analysis isn't perfect.  The plugin can't know what your spell bonuses will
+be at any given time so it must make some educated guesses.  If you get a superhero spellup
+then the optimal equipment for you while that spellup lasts could be different than what
+is shown in the usage output.
+
+In short, use the usage report as a best guess but don't assume that the results won't
+change depending on your circumstances.
+
+Examples:
+  1) See which level 1-100 weapons are used and at which levels they are used for the
+     "@Cpsi-melee@W" priority.  Notice the L60 dagger that is used at two level ranges.
+     It is used between L60-L79 and again at L90-L99.  It's a maxed dagger (I bought it
+     cheap on the market, yay :) and the extra DR and HR would be great between L80-L89
+     but I can't use it there because of weight restrictions.  This is helpful for me
+     to see that I may want to setweight that dagger.
+     "@Gdinv usage psi-melee type weapon maxlevel 100@W"
+
+@G  8@W @wa @yFlame@rthrower@w                  @G(1805970172) @YWeapon@W psi-melee @G11-39
+@R  8@W the captain's bastard sword     @G(1852932476) @YWeapon@W psi-melee @RUnused
+@G 11@W @YDagger of @RAardwolf@w               @G(808961542) @YWeapon@W psi-melee @G11-19
+@G 20@W S@we@Wa@wr@Wi@wn@Wg @wB@Wl@wa@Wz@we                   @G(1743467081) @YWeapon@W psi-melee @G20-25
+@G 26@W @bM@Belpomene's @bB@Betrayal@w            @G(1839990561) @YWeapon@W psi-melee @G26-39
+@G 40@W @YDagger of @RAardwolf@w              @G(1649835494) @YWeapon@W psi-melee @G40-59
+@G 40@W @YDagger of @RAardwolf@w                 @G(2278063) @YWeapon@W psi-melee @G40-70
+@G 60@W @YAxe of @RAardwolf@w                  @G(769621598) @YWeapon@W psi-melee @G71-79
+@G 60@W @YDagger of @RAardwolf@w               @G(323630037) @YWeapon@W psi-melee @G60-79 90-99
+@G 80@W @YAxe of @RAardwolf@w                 @G(1759116162) @YWeapon@W psi-melee @G80-89
+@G 80@W @YDagger of @RAardwolf@w              @G(1778400033) @YWeapon@W psi-melee @G80-89
+@G 90@W @YDagger of @RAardwolf@w               @G(404748066) @YWeapon@W psi-melee @G90-99
+@G100@W @YAxe of @RAardwolf@w                  @G(250640058) @YWeapon@W psi-melee @G100-109
+@G100@W @YDagger of @RAardwolf@w              @G(1778448920) @YWeapon@W psi-melee @G100-109@W
+
+  2) Let's look at my neck gear between levels 1 - 100.  Wow, I have a lot of junk that I should
+     probably dump.  My "cute widdle ears" aren't endearing enough to keep around if I never use
+     them...
+     "@Gdinv usage psi-melee wearable neck maxlevel 100@W"
+
+@G  1@W @C(@W+@C) @WB@Citin@Wg W@Cind@Ws @C(@W+@C)@w            @G(1834123713) @YArmor@W psi-melee @G11-40
+@R  1@W @C(@W+@C) @WB@Citin@Wg W@Cind@Ws @C(@W+@C)@w            @G(1743021081) @YArmor@W psi-melee @RUnused
+@G  1@W @C(@W+@C) @WB@Citin@Wg W@Cind@Ws @C(@W+@C)@w            @G(1834123697) @YArmor@W psi-melee @G11-40
+@R  1@W @wc@Wut@we @yw@Yiddl@ye @mka@Mwa@wi@Wi c@wat@M ea@mrs@w     @G(1834121351) @YArmor@W psi-melee @RUnused
+@R  1@W @wc@Wut@we @yw@Yiddl@ye @mka@Mwa@wi@Wi c@wat@M ea@mrs@w     @G(1834121344) @YArmor@W psi-melee @RUnused
+@R  1@W @wc@Wut@we @yw@Yiddl@ye @mka@Mwa@wi@Wi c@wat@M ea@mrs@w     @G(1834121347) @YArmor@W psi-melee @RUnused
+@R  1@W @wc@Wut@we @yw@Yiddl@ye @mka@Mwa@wi@Wi c@wat@M ea@mrs@w     @G(1753181926) @YArmor@W psi-melee @RUnused
+@R 41@W (>@cAs@Cura@W's Az@Buri@Wte P@Cea@crl@W<)@w       @G(1744225929) @YArmor@W psi-melee @RUnused
+@G 41@W (>@cAs@Cura@W's Az@Buri@Wte P@Cea@crl@W<)@w       @G(1834452605) @YArmor@W psi-melee @G41-70
+@G 41@W (>@cAs@Cura@W's Az@Buri@Wte P@Cea@crl@W<)@w       @G(1834452600) @YArmor@W psi-melee @G41-99
+@R 41@W (>@cAs@Cura@W's Az@Buri@Wte P@Cea@crl@W<)@w       @G(1757388666) @YArmor@W psi-melee @RUnused
+@G 71@W >@M.@m: @RC@Mr@Ye@Ga@Bt@ci@mv@We License @m:@M.@W<@w        @G(1758619847) @YArmor@W psi-melee @G71-90
+@R 71@W >@M.@m: @RC@Mr@Ye@Ga@Bt@ci@mv@We License @m:@M.@W<@w        @G(1813070241) @YArmor@W psi-melee @RUnused
+@G 91@W @y>@Y}@rPho@Ren@Yix's @RPe@rrch@Y{@y<@w             @G(1584559998) @YArmor@W psi-melee @G91-140
+@R 91@W @Dthe @YAmulet @Dof @MAnubis@w            @G(1235973081) @YArmor@W psi-melee @RUnused
+@R 91@W @Dthe @YCharm @Dof @MKnowledge@w          @G(1745132926) @YArmor@W psi-melee @RUnused
+@R100@W a protective cloak skinned from @G(1695078138) @YArmor@W psi-melee @RUnused
+@G100@W a protective cloak skinned from @G(1672257124) @YArmor@W psi-melee @G100-170@W
+
+  3) You can even use the empty search string to find the usage for all of your items.  I'm
+     not copying that output into this helpfile though :)
+     "@Gdinv usage psi-melee@W"
+]])
+
+end -- inv.cli.usage.examples
+
+
+inv.cli.compare = {}
+function inv.cli.compare.fn(name, line, wildcards)
+  local priorityName = wildcards[1] or ""
+  local relativeName = wildcards[2] or ""
+
+  dbot.debug("inv.cli.compare.fn: priority=\"" .. priorityName .. "\", relativeName=\"" ..
+             relativeName .. "\"")
+
+  if (not inv.init.initializedActive) then
+    dbot.info("Skipping compare request: plugin is not yet initialized (are you AFK or sleeping?)")
+    return inv.tags.stop(invTagsCompare, line, DRL_RET_UNINITIALIZED)
+  elseif (dbot.gmcp.getState() ~= dbot.stateActive) then
+    dbot.info("Skipping compare request: character is not in the active state")
+    return inv.tags.stop(invTagsCompare, line, DRL_RET_NOT_ACTIVE)
+  end -- if
+
+  if (priorityName == "") or (relativeName == "") then
+    inv.cli.compare.usage()
+    inv.tags.stop(invTagsCompare, line, DRL_RET_INVALID_PARAM)
+  else
+    inv.set.compare(priorityName, relativeName, line)
+  end -- if
+
+end -- inv.cli.compare.fn
+
+
+function inv.cli.compare.usage()
+  dbot.print("@W    " .. pluginNameCmd .. " compare @G<priority name> <relative name>@w")
+end -- inv.cli.compare.usage
+
+
+function inv.cli.compare.examples()
+  dbot.print("@W\nUsage:\n")
+  inv.cli.compare.usage()
+
+  dbot.print(
+[[@W
+The plugin gives you the ability to see the impact that a particular item has on all
+equipment sets for all levels.  It is very difficult to determine how valuable an item
+is until you evaluate what your equipment sets would look like if it were not available.
+It isn't simply a matter of finding a replacement part and looking at the difference
+betwen the two items.  Removing one item can have a cascading effect on other wearable
+locations.  In some cases, the overall impact may be very small while in other cases it
+could be significant.
+
+The "@Ccompare@W" mode requires you to have the item you wish to evaluate in your main
+inventory.  It cannot be worn or be in a container.  You must also have a completed
+analysis available (see "@Gdinv help analyze@W") for the priority (see "@Gdinv help priority@W")
+that is specified.
+
+Once these conditions are met, the plugin will temporarily remove the item from your
+inventory table and re-run a full equipment analysis for all levels potentially impacted
+by the item.  Once the analysis is complete, it will add the item back to your inventory
+and display the impact of the item at each level.
+
+Example:
+  1) I removed my body item (A Pure and True Heart) and performed a comparison to see how
+     valuable that item is.  Having the item increaes my DR, int, and luck but decreases
+     my wis, str, dex, and con.  According to the priorities I specified, the additions
+     outweigh the negatives and the plugin chose to use this item in my equipment sets for
+     levels 200 - 211 (level 211 includes 10 levels for my T1 tier bonus.)  This is a
+     helpful and concrete way to evaulate priorities.
+     "@Gdinv compare psi-melee heart@W"
+
+@WAnalyzing optimal "@Cpsi-melee@W" equipment sets with and without "-@m=@W*@m)@WA @MP@mure @Ma@mnd @MT@mrue @WHeart@m(@W*@m=@W-@w"
+@w
+@WEquipment analysis of "@Cpsi-melee@W": @G  0%
+@WEquipment analysis of "@Cpsi-melee@W": @G 90%
+@WEquipment analysis of "@Cpsi-melee@W": @G100%
+@w
+@WPriority "@Cpsi-melee@W" advantages with "-@m=@W*@m)@WA @MP@mure @Ma@mnd @MT@mrue @WHeart@m(@W*@m=@W-":
+@w
+@W           Ave Sec  HR  DR Int Wis Lck Str Dex Con Res HitP Mana Move Effects
+@WLevel 200:   0   0   0 @G  7@W @G  8@W @R -2@W @G  2@W @R -7@W @R -2@W @R -5@W   0    0    0    0 
+@WLevel 201:   0   0   0 @G  7@W @G  8@W @R -2@W @G  2@W @R -7@W @R -2@W @R -5@W   0    0    0    0 
+@WLevel 202:   0   0   0 @G  7@W @G  8@W @R -2@W @G  2@W @R -7@W @R -2@W @R -5@W   0    0    0    0 
+@WLevel 203:   0   0   0 @G  7@W @G  8@W @R -2@W @G  2@W @R -7@W @R -2@W @R -5@W   0    0    0    0 
+@WLevel 204:   0   0   0 @G  7@W @G  8@W @R -2@W @G  2@W @R -7@W @R -2@W @R -5@W   0    0    0    0 
+@WLevel 205:   0   0   0 @G  7@W @G  8@W @R -2@W @G  2@W @R -7@W @R -2@W @R -5@W   0    0    0    0 
+@WLevel 206:   0   0   0 @G  7@W @G  8@W @R -2@W @G  2@W @R -7@W @R -2@W @R -5@W   0    0    0    0 
+@WLevel 207:   0   0   0 @G  7@W @G  8@W @R -2@W @G  2@W @R -7@W @R -2@W @R -5@W   0    0    0    0 
+@WLevel 208:   0   0   0 @G  7@W @G  8@W @R -2@W @G  2@W @R -7@W @R -2@W @R -5@W   0    0    0    0 
+@WLevel 209:   0   0   0 @G  7@W @G  8@W @R -2@W @G  2@W @R -7@W @R -2@W @R -5@W   0    0    0    0 
+@WLevel 210:   0   0   0 @G  7@W @G  8@W @R -2@W @G  2@W @R -7@W @R -2@W @R -5@W   0    0    0    0 
+@WLevel 211:   0   0   0 @G  7@W @G  8@W @R -2@W @G  2@W @R -7@W @R -2@W @R -5@W   0    0    0    0 @W
+]])
+
+end -- inv.cli.compare.examples
+
+
+inv.cli.covet = {}
+function inv.cli.covet.fn(name, line, wildcards)
+  local priorityName = wildcards[1] or ""
+  local auctionNum   = tonumber(wildcards[2] or "")
+
+  if (not inv.init.initializedActive) then
+    dbot.info("Skipping covet request: plugin is not yet initialized (are you AFK or sleeping?)")
+    return inv.tags.stop(invTagsCovet, line, DRL_RET_UNINITIALIZED)
+  elseif (dbot.gmcp.getState() ~= dbot.stateActive) then
+    dbot.info("Skipping covet request: character is not in the active state")
+    return inv.tags.stop(invTagsCovet, line, DRL_RET_NOT_ACTIVE)
+  end -- if
+
+  if (auctionNum == nil) then
+    dbot.warn("inv.cli.covet: auction # is not a number")
+    inv.cli.covet.usage()
+    return inv.tags.stop(invTagsCovet, line, DRL_RET_INVALID_PARAM)
+  end -- if
+
+  if (priorityName == "") then
+    dbot.warn("inv.cli.covet: priorityName is nil")
+    inv.cli.covet.usage()
+    return inv.tags.stop(invTagsCovet, line, DRL_RET_INVALID_PARAM)
+  end -- if
+
+  dbot.debug("inv.cli.covet.fn: priority=\"" .. priorityName .. "\", auctionNum=" .. auctionNum)
+
+  inv.set.covet(priorityName, auctionNum, line)
+end -- inv.cli.covet.fn
+
+
+function inv.cli.covet.usage()
+  dbot.print("@W    " .. pluginNameCmd .. " covet @G<priority name> <auction #>@w")
+end -- inv.cli.covet.usage
+
+
+function inv.cli.covet.examples()
+  dbot.print("@W\nUsage:\n")
+  inv.cli.covet.usage()
+
+  dbot.print(
+[[@W
+The plugin's "@Ccovet@W" mode helps you monitor short-term and long-term auctions to help
+you find items that can improve stats over your existing equipment.
+
+Pick a priority (see "@Gdinv help priority@W") that has a completed analysis available
+(see "@Gdinv help analyze@W"), find a short-term or long-term auction number and you're
+good to go.  The plugin will scrape the auction for details about the item, temporarily
+add it to your inventory table, re-run a full analysis, and then discard the item from
+your inventory table.  By comparing your equipment sets both with and without the item you
+can determine the advantages/disadvantages of using that item.
+
+Example:
+  1) Evaluate a body item at long-term market #80561.  In this case, it wasn't better than
+     my existing equipment, but that is still handy to know!  If it would have been better
+     for at least one level, the improvements would have been displayed.  See the helpfile
+     at "@Gdinv help compare@W" for examples showing how the output would have looked.
+     "@Gdinv covet psi-melee 80561@W"
+
+@WAnalyzing optimal "@Cpsi-melee@W" equipment sets with and without @Gauction 80561
+@w
+@WLvl Name of Armor            Type       HR   DR Int Wis Lck Str Dex Con Res HitP Mana Move
+@W200@w Auction #80561           @Gbody    @W @G  10@W @G  26@W   0 @G  3@W @G  3@W @G 15@W @G  5@W @G  5@W @G 19@W    0 @G 100@W @R-200
+@w
+@WPriority "@Cpsi-melee@W" advantages with @Gauction #80561@w:
+@w
+@WNo set with item "Synthetic Power" is optimal for any level between 11 and 211@W
+]])
+
+end -- inv.cli.covet.examples
+
+
+inv.cli.notify = {}
+function inv.cli.notify.fn(name, line, wildcards)
+  local level = wildcards[1] or ""
+
+  if (not inv.init.initializedActive) then
+    dbot.info("Skipping notify request: plugin is not yet initialized (are you AFK or sleeping?)")
+    return inv.tags.stop(invTagsNotify, line, DRL_RET_UNINITIALIZED)
+  elseif (dbot.gmcp.getState() ~= dbot.stateActive) then
+    dbot.info("Skipping notify request: character is not in the active state")
+    return inv.tags.stop(invTagsNotify, line, DRL_RET_NOT_ACTIVE)
+  end -- if
+
+  if (level == "none") or (level == "light") or (level == "standard") or (level == "all") then
+    dbot.notify.setLevel(level, line, true)
+  else
+    inv.cli.notify.usage()
+    inv.tags.stop(invTagsNotify, line, DRL_RET_INVALID_PARAM)
+  end -- if
+end -- inv.cli.notify.fn
+
+
+function inv.cli.notify.usage()
+  dbot.print("@W    " .. pluginNameCmd .. " notify @G[none | light | standard | all]@w")
+end -- inv.cli.notify.usage()
+
+
+function inv.cli.notify.examples()
+  dbot.print("@W\nUsage:\n")
+  inv.cli.notify.usage()
+
+  dbot.print(
+[[@W
+The notification system divides optional messages into three classes based on the message's
+priority.  The "all" notification mode displays all three optional classes and is the most
+verbose mode.  The "standard" notification mode displays the two highest-priority optional
+message classes.  The "light" notification mode displays only the most critical optional
+messages.  Take a wild guess what the "none" notification mode displays...Warnings and errors
+are never optional and the user cannot disable them.
+
+The notification system suppresses all messages -- even warnings and errors -- if the user is
+in note-writing mode.  We don't want notifications to appear on a user's note.
+]])
+
+  dbot.print("@WThe default notification mode is \"@C" .. notifyLevelDefault .. "@W\"\n")
+
+
+  -- Enable all message levels so that we can demonstrate them here
+  local origMsgLevel = dbot.notify.getLevel()
+  dbot.notify.setLevel("all", nil, false)
+
+  dbot.debug("This is a debug message that you probably don't care about.")
+  dbot.note("This is a note that might be interesting in some cases.")
+  dbot.info("This is information the user probably wants to know.")
+  dbot.warn("This is what a warning looks like.")
+  dbot.error("This is what an error looks like.")
+
+  dbot.notify.setLevel(origMsgLevel, nil, false)
+
+dbot.print(
+[[@W
+Examples:
+  1) Display all optional (debug, note, and info) messages
+     "@Gdinv notify all@W"
+
+  2) Display everything except low-priority debug messages
+     "@Gdinv notify standard@W"
+
+  3) Display only the most critical messages
+     "@Gdinv notify light@W"
+
+  4) Disable all optional messages and display only warnings and errors
+     "@Gdinv notify none@W"
+]])
+
+end -- inv.cli.notify.examples
+
+
+inv.cli.forget = {}
+function inv.cli.forget.fn(name, line, wildcards)
+  local query = wildcards[1] or ""
+
+  if (not inv.init.initializedActive) then
+    dbot.info("Skipping forget request: plugin is not yet initialized (are you AFK or sleeping?)")
+    return inv.tags.stop(invTagsForget, line, DRL_RET_UNINITIALIZED)
+  elseif (dbot.gmcp.getState() ~= dbot.stateActive) then
+    dbot.info("Skipping forget request: character is not in the active state")
+    return inv.tags.stop(invTagsForget, line, DRL_RET_NOT_ACTIVE)
+  end -- if
+
+  inv.items.forget(query, line)
+end -- inv.cli.forget.fn
+
+
+function inv.cli.forget.usage()
+  dbot.print("@W    " .. pluginNameCmd .. " forget @G<query>@w")
+end -- inv.cli.forget.usage
+
+
+function inv.cli.forget.examples()
+  dbot.print("@W\nUsage:\n")
+  inv.cli.forget.usage()
+
+  dbot.print(
+[[@W
+You may occasionally want to "forget" everything you know about an item and 
+re-identify it for your inventory table.  As noted in the plugin release notes,
+there are a few situations where this may occur.
+
+You can enchant an item yourself and the plugin will notice and update stats for
+the newly enchanted item.  However, if item caching is enabled, you could hit an
+issue if you give an item to an enchanter and receive it back after it gets a
+boost in stats.  By default, the plugin will pull information about the item from
+the cache -- but the cache now has old information.  In this case, you will need
+to "forget" the item and then re-run an inventory refresh to pick up the change.
+
+Most aard operations that modify an item's stats are detected and automatically
+trigger a re-identification.  For example, enchantment spells, sharpening,
+reinforcing, tpenchanting, and wset all are handled transparently.  The one known
+exception is the setweight command which is not currently handled by aard's invitem
+system.  Until this is changed (or until we include a trigger watching for setweight)
+you will need to use the "@Gdinv forget <query>@W" option on an item that changes
+weight in order to "forget" the old stats and then pick up the correct weight (and
+other stats) on the next inventory refresh.
+
+See the "@Gdinv help search@W" helpfile for examples and more information about
+creating search queries for items that you want to forget.
+
+Examples:
+  1) Forget and re-identify a ring you just received back from an enchanter
+     "@Gdinv forget rname 2.ring@W"
+     "@Gdinv refresh all@W"
+
+  2) Forget about all of your aard weapons (maybe you just changed their weights)
+     "@Gdinv forget type weapon keyword aardwolf@W"
+]])
+
+end -- inv.cli.forget.examples
+
+
+inv.cli.reset = {}
+function inv.cli.reset.fn(name, line, wildcards)
+  local command = wildcards[1] or ""
+  local modules = wildcards[2] or ""
+
+  dbot.debug("reset CLI: command = \"" .. command .. "\", modules = \"" .. modules .. "\"")
+
+  if (command == "list") then
+    dbot.print("@WResettable \"@G" .. pluginNameAbbr .. "@W\" modules: \"@C" .. inv.modules .. "@W\"")
+  elseif (command == "confirm") then
+    inv.reset(modules, line)
+  else
+    inv.cli.reset.usage()
+    inv.tags.stop(invTagsReset, line, DRL_RET_INVALID_PARAM)
+  end -- if
+end -- inv.cli.reset.fn
+
+
+function inv.cli.reset.usage()
+  dbot.print("@W    " .. pluginNameCmd .. " reset @G[list | confirm] <module names | all>@w")
+end -- inv.cli.reset.usage
+
+
+function inv.cli.reset.examples()
+  dbot.print("@W\nUsage:\n")
+  inv.cli.reset.usage()
+  dbot.print(
+[[@W
+In a perfect world, there would never be a reason to use the "@Creset@W" mode.
+However, it is useful to have the ability to reset particular components of the
+plugin even if (hopefully) they are never required.  Please look at "@Gdinv help
+backup@W" and create a backup before you use this.  I *really* don't want to get
+notes complaining about losing something because you reset it :).
+
+The following plugin components currently have the ability to be individually
+reset back to default values:
+  @Cconfig@W:    This holds version info and some of your preferences.  You will 
+             need to rebuild your inventory table if you reset this.
+  @Citems@W:     This is your inventory table.  You'll need to rebuild it if you
+             reset this.
+  @Ccache@W:     This clears both your "recent item cache" and "frequently used
+             item cache".
+  @Csnapshot@W:  This table stores all custom equipment set snapshots that you have
+             created.
+  @Cpriority@W:  This wipes out all custom stat priorities and implements the 
+             default values.
+  @Cset@W:       This is where all of your equipment set data is stored when you
+             run a "@Gdinv analyze create [...]@W" operation.  If your backups
+             are getting a little big, you may want to wipe the equipment sets
+             and regenerate just the ones you currently care about.
+  @CstatBonus@W: This table maintains a weighted average of your spell bonuses at
+             each level.  
+  @Cconsume@W:   This table keeps track of which consumable items (typically pills
+             and potions) you use and where you can buy the items.
+  @Ctags@W:      This table tracks which plugin tags are enabled and if the tag
+             framework is enabled.
+
+Examples:
+  1) See which modules are currently resetable with this plugin.  Hopefully the list
+     matches the components shown above in this helpfile.  If that's not the case,
+     please send a note to Durel and let me know so that I can update the helpfile.
+     "@Gdinv reset list@W"
+
+  2) Reset the "@Cset@W" component because it is filled with data for lots of junk
+     priorities and you want smaller backups.
+     "@Gdinv reset confirm set@W"
+
+  3) Reset the "@Cconfig@W" table and inventory table "@Citems@W".
+     "@Gdinv reset confirm config items@W"
+
+  4) Reset everything.  This is equivalent to whacking the entire plugin and starting
+     from scratch.
+     "@Gdinv reset confirm all@W"
+
+]])
+
+end -- inv.cli.reset.examples
+
+
+inv.cli.backup = {}
+function inv.cli.backup.fn(name, line, wildcards)
+  local command    = wildcards[1] or ""
+  local backupName = wildcards[2] or ""
+  local retval     = DRL_RET_SUCCESS
+
+  dbot.debug("backup CLI: command = \"" .. command .. "\", backupName = \"" .. backupName .. "\"")
+
+  if (not inv.init.initializedActive) then
+    dbot.info("Skipping backup request: plugin is not yet initialized (are you AFK or sleeping?)")
+    return inv.tags.stop(invTagsBackup, line, DRL_RET_UNINITIALIZED)
+  elseif (dbot.gmcp.getState() ~= dbot.stateActive) then
+    dbot.info("Skipping backup request: character is not in the active state")
+    return inv.tags.stop(invTagsBackup, line, DRL_RET_NOT_ACTIVE)
+  end -- if
+
+  if (command == "list") then
+    retval = dbot.backup.list(line)
+  elseif (command == "create") and (backupName ~= "") then
+    retval = dbot.backup.create(backupName, line)
+  elseif (command == "delete") and (backupName ~= "") then
+    retval = dbot.backup.delete(backupName, line, false)
+  elseif (command == "restore") and (backupName ~= "") then
+    retval = dbot.backup.restore(backupName, line)   
+  elseif (command == "auto") then -- Note: auto is a hidden mode and not included in the help file
+    retval = dbot.backup.current()
+  else
+    inv.cli.backup.usage()
+    retval = inv.tags.stop(invTagsBackup, line, DRL_RET_INVALID_PARAM)
+  end -- if
+
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.cli.backup.fn: Failed to perform backup request \"@Y" .. command .. " " .. backupName ..
+              "@W\": " .. dbot.retval.getString(retval))
+  end -- if
+end -- inv.cli.backup.fn
+
+
+function inv.cli.backup.usage()
+  dbot.print("@W    " .. pluginNameCmd .. " backup @G[list | create | delete | restore] <backup name>@w")
+end -- inv.cli.backup.usage
+
+
+function inv.cli.backup.examples()
+  dbot.print("@W\nUsage:\n")
+  inv.cli.backup.usage()
+  dbot.print(
+[[@W
+The plugin creates automatic backups for all of your plugin data.  It also gives
+you the ability to create manual backups at any time.  By default, the plugin
+keeps 4 automatic backups.
+
+Most automatic backup systems rotate all previous automatic backups when a new 
+backup is created.  In other words, if you have automatic backups 1, 2, 3, and 4
+and then create a new backup, the previous backup #1 would become #2, the old #2
+would become #3, #3 would become #4 and the old backup #4 would be deleted.  That's
+not quite how it works here.  I like the idea of frequently updating the most current
+backup but I also like keeping stable backups from previous days around.  If 
+something does wrong, you might not notice for a couple of days so you don't a
+situation where you overwrite all of the backups in a relatively short amount of
+time.
+
+The compromise solution implemented in this plugin is for automatic backups to only
+overwrite backup #1 and to rotate the backups at most once per day.  This gives you
+frequent backups from "today" (backup #1) and backups from three previous days
+(#2 - #4).
+
+Automatic backups are taken when you log out, once every 4 hours you are logged in,
+and every time you go AFK for at least 5 seconds.
+
+You have the option to list existing backups (sorted by creation date), create
+new manual backups, delete a backup (automatic or manual), or restore from an existing
+backup.  These options are cleverly named "@Clist@W", "@Ccreate@W", "@Cdelete@W", and "@Crestore@W".
+
+Examples:
+  1) Create a new manual backup named "dummyBackupToShowItWorksForTheHelpfile".
+     "@Gdinv backup create dummyBackupToShowItWorksForTheHelpfile@W"
+
+  2) List all current backups.  The "auto*" backups are the automatic backups and
+     all other backups were created manually.
+     "@Gdinv backup list@W"
+
+@WDINV@W Detected 6 backups
+@w  @W(@c09/18/17 18:30:57@W) @GdummyBackupToShowItWorksForTheHelpfile
+@w  @W(@c09/18/17 18:06:16@W) @Gauto
+@w  @W(@c09/17/17 22:51:49@W) @Gauto2
+@w  @W(@c09/16/17 23:12:53@W) @Gauto3
+@w  @W(@c09/15/17 23:48:40@W) @Gauto4
+@w  @W(@c09/15/17 23:42:49@W) @Gbaseline@W
+
+  3) Delete the silly manual backup "dummyBackupToShowItWorksForTheHelpfile".
+     "@Gdinv backup delete dummyBackupToShowItWorksForTheHelpfile@W"
+
+  4) Restore the first "auto" backup.  This is the most recent automatic backup
+     taken today.
+     "@Gdinv backup restore auto@W"
+]])
+
+end -- inv.cli.backup.examples
+
+
+inv.cli.cache = {}
+function inv.cli.cache.fn(name, line, wildcards)
+  local cacheCommand = wildcards[1] or ""
+  local cacheType = wildcards[2] or ""
+  local cacheSize = -1
+  local retval = DRL_RET_SUCCESS
+
+  if (wildcards[3] ~= nil) and (wildcards[3] ~= "") then
+    cacheSize = tonumber(wildcards[3]) or 0
+  end -- if
+
+  dbot.debug("command=\"" .. cacheCommand .. "\", type=\"" .. cacheType .. "\", size=" .. cacheSize)
+
+  if (not inv.init.initializedActive) then
+    dbot.info("Skipping cache request: plugin is not yet initialized (are you AFK or sleeping?)")
+    return inv.tags.stop(invTagsCache, line, DRL_RET_UNINITIALIZED)
+  elseif (dbot.gmcp.getState() ~= dbot.stateActive) then
+    dbot.info("Skipping cache request: character is not in the active state")
+    return inv.tags.stop(invTagsCache, line, DRL_RET_NOT_ACTIVE)
+  end -- if
+
+  if (cacheCommand == "reset") then
+    if (cacheType == "recent") or (cacheType == "all") then 
+      retval = inv.cache.resetCache(inv.cache.recent.name)
+    end -- if
+    if (cacheType == "frequent") or (cacheType == "all") then
+      retval = inv.cache.resetCache(inv.cache.frequent.name)
+    end -- if
+
+  elseif (cacheCommand == "display") then
+    if (cacheType == "recent") or (cacheType == "all") then
+      retval = inv.cache.dump(inv.cache.recent.table)
+    end -- if
+    if (cacheType == "frequent") or (cacheType == "all") then
+      retval = inv.cache.dump(inv.cache.frequent.table)
+    end -- if
+
+  elseif (cacheCommand == "size") then
+    if (cacheType == "recent") or (cacheType == "all") then
+      if (cacheSize < 0) then
+        dbot.print("@WRecent item cache:   " .. dbot.table.getNumEntries(inv.cache.recent.table.entries) ..
+                   " / " .. (inv.cache.getSize(inv.cache.recent.table) or 0) .. " entries are in use@w")
+      else
+        retval = inv.cache.setSize(inv.cache.recent.table, cacheSize)
+      end -- if
+    end -- if
+    if (cacheType == "frequent") or (cacheType == "all") then
+      if (cacheSize < 0) then
+        dbot.print("@WFrequent item cache: " .. dbot.table.getNumEntries(inv.cache.frequent.table.entries) ..
+                   " / " .. (inv.cache.getSize(inv.cache.frequent.table) or 0) .. " entries are in use@w")
+      else
+        retval = inv.cache.setSize(inv.cache.frequent.table, cacheSize)
+      end -- if
+    end -- if
+
+  else
+    dbot.warn("inv.cli.cache.fn: Invalid cache command \"" .. cacheCommand .. "\" detected")
+    retval = DRL_RET_INVALID_PARAM
+  end -- if
+
+  inv.tags.stop(invTagsCache, line, retval)
+
+end -- inv.cli.cache.fn
+
+
+function inv.cli.cache.usage()
+  dbot.print("@W    " .. pluginNameCmd .. 
+                " cache @G[reset | size] [recent | frequent | all] @Y<# entries>@w")
+end -- inv.cli.cache.usage
+
+
+function inv.cli.cache.examples()
+  dbot.print("@W\nUsage:\n")
+  inv.cli.cache.usage()
+  dbot.print(
+[[@W
+This plugin implements two types of item caches.  The first type is the "@Crecent item@W"
+cache.  If an identified item leaves your inventory (e.g., you dropped it or you put
+it into your vault) then information about that item is moved to the recent cache.
+If you add that item back to your inventory at some point in the future then you won't
+need to re-identify the item.  The plugin will pull the necessary info directly from the
+recent cache.  This is very convenient and speeds up accessing your vault or using a bag
+filled with keys.  By default, the recent cache keeps entries for the 500 most-recently
+used items that left your inventory but you can adjust the cache size as shown below.
+
+The second type of cache is the "@Cfrequently used@W" item cache.  The recent cache stores
+information for a specific instance of an item.  In contrast, the frequent cache keeps
+generic information for a fungible item (wow, I just used "fungible" in an appropriate
+context -- cross that off my bucket list!).  For example, if you have one duff beer, it
+will be identical to the other 99 duff beers you just bought so it would be silly to
+individually identify all 100 of those beers.  Instead, the plugin will identify your
+first duff beer and info on any subsequent duff beers will come from the frequent cache
+and avoid re-identification.  By default, the plugin will use the frequent cache for
+all potions, pills, and consumable items.  The frequent cache stores information on up
+to 100 different items at a time.
+
+Examples:
+  1) Reset just the recent cache
+     "@Gdinv cache reset recent@W"
+
+  2) Reset both the recent and frequent caches
+     "@Gdinv cache reset all@W"
+
+  3) Set the number of entries in the frequent cache to 200
+     "@Gdinv cache size frequent 200
+]])
+
+end -- inv.cli.cache.examples
+
+
+inv.cli.tags = {}
+function inv.cli.tags.fn(name, line, wildcards)
+  local retval = DRL_RET_SUCCESS
+  local tagNames = wildcards[1] or ""
+  local enabled  = wildcards[2] or ""
+
+  dbot.debug("tagNames=\"" .. tagNames .. "\", enabled=\"" .. enabled .. "\"")
+
+  if (not inv.init.initializedActive) then
+    dbot.info("Skipping tags request: plugin is not yet initialized (are you AFK or sleeping?)")
+    return DRL_RET_UNINITIALIZED
+  end -- if
+
+  if (tagNames == "all") then
+    tagNames = inv.tags.modules
+  end -- if
+
+  if (tagNames == "") then
+    if (enabled == drlInvTagOn) then
+      retval = inv.tags.enable()
+    elseif (enabled == drlInvTagOff) then
+      retval = inv.tags.disable()
+    elseif (enabled == "") then
+      retval = inv.tags.display()
+    else
+      dbot.warn("inv.cli.tags.fn: Invalid tag value")
+      retval = DRL_RET_INVALID_PARAM
+    end -- if
+  else
+    retval = inv.tags.set(tagNames, enabled)
+  end -- if
+
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.cli.tags.fn: Tags command failed: " .. dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+
+end -- inv.cli.tags.fn
+
+
+function inv.cli.tags.usage()
+  dbot.print("@W    " .. pluginNameCmd .. " tags @Y<names | all>@G [on | off]")
+end -- inv.cli.tags.usage
+
+
+function inv.cli.tags.examples()
+  dbot.print("@W\nUsage:\n")
+  inv.cli.tags.usage()
+  dbot.print(
+[[@W
+This plugin supports optional end tags for all operations.  An end tag has the
+form "@G{/the command line:return value:return value string}@W".  This gives users
+an easy way to use the plugin in other scripts because those scripts can trigger on
+the end tag to know an operation is done and what result the operation had.
+
+For example, if you type "@Gdinv refresh@W", you could trigger on an end tag that has
+this output "@G{/dinv refresh:0:success}@W" to know when the refresh completed.  Of
+course, you would want to double check the return value in the end tag to ensure
+that everything happened the way you want.
+
+The plugin tags subsystem mirrors the syntax for the aardwolf tags subsystem.  Using
+"@Gdinv tags@W" by itself will display a list of all supported tags.  You can toggle
+one or more individual tags on or off by providing the tag names as follows:
+"@Gdinv tags tagName1 tagName2 [on | off]@W".  You can also enable or disable the
+entire tag subsystem at once by using "@Gdinv tags [on | off]@W".
+
+If the plugin tags are enabled, they will echo an end tag at the conclusion of an operation.
+However, if the user goes into a state (e.g., AFK) that doesn't allow echoing then the plugin
+cannot report the end tag.  In this scenario, the plugin will notify the user about the end
+tag via a warning notification instead of an echo.  Triggers cannot catch notifications
+though so any code relying on end tags should either detect when you go AFK or cleanly time
+out after a reasonable amount of time.
+
+Examples:
+  1) Display all supported tags
+     "@Gdinv tags@W"
+
+  2) Temporarily disable the entire tags subsystem
+     "@Gdinv tags off@W"
+
+  3) Turn on tags for the "@Crefresh@W", "@Corganize@W", and "@Cset@W" components
+     "@Gdinv tags refresh organize set on@W"
+
+  4) Turn all tags off (but leave the tags subsystem enabled)
+     "@Gdinv tags all off@W"
+]])
+
+end -- inv.cli.tags.examples
+
+
+inv.cli.portal = {}
+function inv.cli.portal.fn(name, line, wildcards)
+  local command = wildcards[1] or ""
+  local portalId = tonumber(wildcards[2] or "")
+
+  if (not inv.init.initializedActive) then
+    dbot.info("Skipping portal request: plugin is not yet initialized (are you AFK or sleeping?)")
+    return DRL_RET_UNINITIALIZED
+  elseif (dbot.gmcp.getState() ~= dbot.stateActive) then
+    dbot.info("Skipping portal request: character is not in the active state")
+    return DRL_RET_NOT_ACTIVE
+  end -- if
+
+  if (portalId == nil) then
+    dbot.warn("inv.cli.portal.fn: portalId parameter is not a number")
+  else
+    dbot.debug("CLI: " .. pluginNameCmd .. " portal " .. command .. " " .. portalId)
+    inv.portal.use(portalId)
+  end -- if
+end -- inv.cli.portal.fn
+
+
+function inv.cli.portal.usage()
+  dbot.print("@W    " .. pluginNameCmd .. " portal @G[use] <portal object ID>@w")
+end -- inv.cli.portal.usage
+
+
+function inv.cli.portal.examples()
+  dbot.print("@W\nUsage:\n")
+  inv.cli.portal.usage()
+
+  dbot.print(
+[[@W
+A common situation involves holding a portal and entering it.  This is complicated
+by the fact that you might be holding something else originally and you would need
+to remember what you held to put it back when you are done with the portal.  This
+is further complicated by the portal wish which gives an additional wearable location
+that might hold the portal.
+
+Fortunately, we have the plugin to handle all of this for us :)  The plugin checks
+if you have a portal wish and uses the correct location automagically.  It also
+remembers what was at the location used by the portal so that we can put everything
+back when we are done.
+
+The plugin's portal component currently supports only a single mode: "@Cuse@W".  We
+may add additional modes in the future.  In the meantime, you can use the following
+syntax to automatically get a portal, hold it, enter it, restore anything at the
+portal's location, and then put the portal back from whence it came:
+"@Gdinv portal use [portal ID]@W".
+
+You can get a portal's unique ID by searching with the "id" query mode.  See the
+"@Gdinv help search@W" helpfile for details.  As an example, you could see the IDs
+of all of your portals by typing "@Gdinv search id type portal@W".
+
+The plugin's portal mode is particularly convenient when used in conjuction with the
+mapper's portal mode.  
+
+Examples:
+  1) Use the portal with a unique ID of 123456789
+     "@Gdinv portal use 123456789@W"
+
+  2) Tell the mapper plugin to use a particular portal automatically from the room
+     targeted by portal 123456789
+     "@Gmapper portal dinv portal use 123456789@W"
+]])
+
+end -- inv.cli.portal.examples
+
+
+inv.cli.pass = {}
+function inv.cli.pass.fn(name, line, wildcards)
+  local passNameOrId = wildcards[1] or ""
+  local useTimeSec = tonumber(wildcards[2] or "")
+
+  if (not inv.init.initializedActive) then
+    dbot.info("Skipping pass request: plugin is not yet initialized (are you AFK or sleeping?)")
+    return DRL_RET_UNINITIALIZED
+  elseif (dbot.gmcp.getState() ~= dbot.stateActive) then
+    dbot.info("Skipping pass request: character is not in the active state")
+    return DRL_RET_NOT_ACTIVE
+  end -- if
+
+  if (useTimeSec == nil) then
+    dbot.warn("inv.cli.pass.fn: # of seconds to use the pass is a required parameter")
+    inv.cli.pass.usage()
+  else
+    dbot.debug("CLI: " .. pluginNameCmd .. " pass " .. passNameOrId .. " " .. useTimeSec)
+    inv.pass.use(passNameOrId, useTimeSec)
+  end -- if
+end -- inv.cli.pass.fn
+
+
+function inv.cli.pass.usage()
+  dbot.print("@W    " .. pluginNameCmd .. " pass @G<pass ID> <# of seconds>@w")
+end -- inv.cli.pass.usage
+
+
+function inv.cli.pass.examples()
+  dbot.print("@W\nUsage:\n")
+  inv.cli.pass.usage()
+
+  dbot.print(
+[[@W
+Some areas require specific items to be in your main inventory in order for you to
+pass through certain rooms or doors.  These are not keys.  This plugin refers to
+such items as "passes".  A pass is saveable (unlike a key) and can be kept in a 
+container.
+
+What we want is the ability to quickly pull a pass out of its container, keep it
+in the main inventory for a specific period of time, and then put the pass away.
+That would allow us to uses passes easily within a mapper cexit operation.
+
+For example, the "Pet Store Employee ID Card" from the area "Giant's Pet Store"
+is not a key, is saveable, and is required to access certain rooms.  We use the
+"@Gdinv pass [name or ID] [# of seconds]@W" syntax to pull out the Employee Card
+at the appropriate time (via a cexit) and then put it away a few seconds later.
+
+Example:
+  1) Pull out the pass with the unique ID 1761322232 and hold it in main inventory
+     for 3 seconds before putting it back into its original container
+     "@Gdinv pass 1761322232 3@W"
+]])
+
+end -- inv.cli.pass.examples
+
+
+inv.cli.consume = {}
+function inv.cli.consume.fn(name, line, wildcards)
+  local command = wildcards[1] or ""
+  local itemType = wildcards[2] or ""
+  local itemName = wildcards[3] or ""
+  local itemNum = tonumber(itemName)
+  local container = wildcards[4] or ""
+
+  dbot.debug("CLI: " .. pluginNameCmd .. " consume command=\"" .. (command or "") .. "\", itemType=\"" .. 
+             (itemType or "") .. "\", itemName/Num=\"" .. (itemName or "") .. "\", container=\"" .. 
+             container .. "\"")
+
+  if (not inv.init.initializedActive) then
+    dbot.info("Skipping consume request: plugin is not yet initialized (are you AFK or sleeping?)")
+    return DRL_RET_UNINITIALIZED
+  elseif (dbot.gmcp.getState() ~= dbot.stateActive) then
+    dbot.info("Skipping consume request: character is not in the active state")
+    return DRL_RET_NOT_ACTIVE
+  end -- if
+
+  if (command == "add") then
+    inv.consume.add(itemType, itemName)
+  elseif (command == "remove") then
+    inv.consume.remove(itemType, itemName)
+  elseif (command == "display") then
+    inv.consume.display(itemType)
+  elseif (command == "buy") then
+    inv.consume.buy(itemType, itemNum, container)
+  elseif (command == drlConsumeSmall) or (command == drlConsumeBig) then
+    inv.consume.use(itemType, command, itemNum, container)
+  else
+    inv.cli.consume.usage()
+  end -- if
+
+end -- inv.cli.consume.fn
+
+
+function inv.cli.consume.usage()
+  dbot.print("@W    " .. pluginNameCmd .. " consume @G[add | remove | display | " ..
+             "buy | small | big] <type> <name or quantity> @Y<container>@w") 
+end -- inv.cli.consume.usage
+
+
+function inv.cli.consume.examples()
+  dbot.print("@W\nUsage:\n")
+  inv.cli.consume.usage()
+  dbot.print(
+[[@W
+Using consumable items such as potions, pills, and scrolls is a very common
+occurance.  The plugin facilitates this by giving users the ability to specify
+types and locations of consumable items.  Users can then ask the plugin to 
+restock or use particular types of things.  Confused yet?  Let me explain by 
+giving you a walk-through.
+
+Run to the Aylor potion shop, define a new type of consumable named "@Cfly@W", and
+then specify the name of the potion
+"@Grecall; runto potion@W"
+"@Gdinv consume add fly griff@W"
+
+We can now buy items of type "@Cfly@W".  Let's buy three for now.  We happen to
+be starting at the shop already, but we could be anywhere on the mud and the
+plugin will try to run us back to the shop before purchasing the item.
+"@Gdinv consume buy fly 3@W"
+
+On second thought, let's buy 2 more "@Cfly@W" potions and automatically put
+the fly potions in container 3.bag
+"@Gdinv consume buy fly 2 3.bag@W"
+
+Let's use a "@Cfly@W" potion!  Don't worry about the "small" option yet.  We'll
+explain that shortly.  [EDIT: I just proofread this and nearly choked on my coffee.
+Yes, we have an example here that instructs you to consume a small fly.  At least
+we stopped before the instructions said to consume a big fly.]
+"@Gdinv consume small fly@W"
+
+This looks promising.  Let's add several potions for a new type called "@Cmana@W".
+We start with one potion at the Aylor shop and then run to a shop in the Seekers' clan
+area.  You can specify the shop item either by keyword or by the shop's item number.
+It is probably easiest to just use the number and that is what we do at the Seekers'
+shop below.
+"@Grecall; runto potion@W"
+"@Gdinv consume add mana rush@W"
+"@Grecall; runto seekers; e@W"
+"@Gdinv consume add mana 1@W"
+"@Gdinv consume add mana 6@W"
+"@Gdinv consume add mana 16@W"
+
+Let's display all of our consumable types and instances of those types.  The
+output shown below is for my favorite set of items.  You can run to whatever shops
+you wish and add items of your own choice.  The consumable types that I have
+defined include "@Cmove@W", "@Cmana@W", "@Csight@W", "@Cheal@W", and "@Cfly@W.  Some of these such
+as "@Cmana@W" and "@Cheal@W" include multiple instances for different levels.  That will
+become important later on in this walk-through.
+"@Gdinv consume display@W"
+
+@WDINV Consumable Type "move"
+@W  Level  90 (@CRoom 23160@W) "@Gmoonshine@W"
+@WDINV Consumable Type "mana"
+@W  Level   1 (@CRoom 32476@W) "@Glotus rush@W"
+@W  Level  20 (@CRoom 30525@W) "@Gnachos@W"
+@W  Level  30 (@CRoom 14141@W) "@Glotus seed@W"
+@W  Level  50 (@CRoom 23160@W) "@Gtequila@W"
+@W  Level  60 (@CRoom 14141@W) "@Glotus stem@W"
+@W  Level  81 (@CRoom 47106@W) "@Gwaterspirit@W"
+@W  Level  91 (@CRoom 49373@W) "@Gblood@W"
+@W  Level 100 (@CRoom 14141@W) "@Glotus bud@W"
+@W  Level 130 (@CRoom 30525@W) "@Gpopcorn@W"
+@W  Level 150 (@CRoom 14141@W) "@Glotus bloom@W"
+@W  Level 200 (@CRoom 23160@W) "@Gdaniel@W"
+@W  Level 201 (@CRoom 14141@W) "@Glotus flower@W"
+@WDINV Consumable Type "sight"
+@W  Level   1 (@CRoom 32476@W) "@Gwolf@W"
+@WDINV Consumable Type "heal"
+@W  Level   1 (@CRoom 32476@W) "@Glight relief@W"
+@W  Level  20 (@CRoom 32476@W) "@Gserious relief@W"
+@W  Level  30 (@CRoom 14141@W) "@Gminor healing@W"
+@W  Level  60 (@CRoom 14141@W) "@Gseekers60heal@W"
+@W  Level 201 (@CRoom 50209@W) "@Gfrank@W"
+@WDINV Consumable Type "fly"
+@W  Level   1 (@CRoom 32476@W) "@Ggriff@W"@W
+
+Now we want to buy one item of type "@Cheal@W".  Note that this doesn't necessarily
+mean that it has the "heal" spell.  It could be any type of potion or pill that
+heals us in some way.
+"@Gdinv consume buy heal@W"
+
+So...out of all of the options of type "@Cheal@W", which one did the plugin choose?
+It will pick the highest level item that is accessible to you at your current
+level.  With the consumable table shown above, if you are level 25, it will
+pick the Level 20 "serious relief" potion.  If you are level 70, it would buy
+the Level 60 "seekers60heal" potion instead.
+
+What's with the "small" and "big" options?  If you are in combat and need to
+use a healing potion, you probably want to quaff the biggest and baddest potion
+that you have available: "@Gdinv consume use heal big@W".  However, if you aren't
+in the middle of combat and want to use up some lower-level healing pots that are
+just taking up space, you could use the "small" option instead.  That will use up
+the lowest-level "@Cheal@W" consumables in your inventory first before moving on to
+higher-level items.  If you want to use your three lowest-level items of type "@Cheal@W",
+use this: "@Gdinv consume small heal 3@W".
+
+The plugin will always choose to consume items that are in your main inventory
+before using an equivalent item from a container unless you specify a container.
+That makes it more efficient in combat because you don't need to waste an 
+action removing the item from a container.
+
+Examples:
+  1) Add a consumable item ("nachos") that gives something of type "mana".  Nachos
+     can be found at "runto bard; run wn" and you should be at the shopkeeper to
+     use this command.
+     "@Gdinv consume add mana nachos@W"
+
+  2) Remove "nachos" from the "mana" consumable type table
+     "@Gdinv consume remove mana nachos@W")
+
+  3) Remove the consumable type "mana" and everything that is that type
+     "@Gdinv consume remove mana@W"
+
+  4) Display info about all consumable items in the table regardless of type
+     "@Gdinv consume display@W"
+
+  5) Display info about each consumable item that is of type "mana"
+     "@Gdinv consume display mana@W"
+
+  6) Buy 5 "mana" items that are the highest level available in the table
+     "@Gdinv consume buy mana 5@W"
+
+  7) Consume (quaff, eat, etc.) the lowest level "mana" item in your inventory
+     This is useful when you want to clean out low-level potions.  You probably won't
+     use this option in combat but it is convenient out of combat.
+    "@Gdinv consume small mana@W"
+
+  8) Consume (quaff, eat, etc.) 2 of the highest-level items in your inventory that
+     are of type "mana".  This is handy in combat.
+     "@Gdinv consume big mana 2@W"
+
+  9) Consume 3 of your highest-level mana items and look in container 2.bag before
+     checking for the items in other locations
+     "@Gdinv consume big mana 3 2.bag@W"
+]])
+
+end -- inv.cli.consume.examples
+
+
+inv.cli.organize = {}
+function inv.cli.organize.fn1(name, line, wildcards)
+  local command     = wildcards[1] or ""
+  local container   = wildcards[2] or ""
+  local queryString = wildcards[3] or ""
+
+  dbot.debug("CLI: " .. pluginNameCmd .. " organize command=\"" .. (command or "") .. "\", container=\"" .. 
+             container .. "\", query=\"" .. queryString .. "\"")
+
+  if (not inv.init.initializedActive) then
+    dbot.info("Skipping organize request: plugin is not yet initialized (are you AFK or sleeping?)")
+    return inv.tags.stop(invTagsOrganize, line, DRL_RET_UNINITIALIZED)
+  elseif (dbot.gmcp.getState() ~= dbot.stateActive) then
+    dbot.info("Skipping organize request: character is not in the active state")
+    return inv.tags.stop(invTagsOrganize, line, DRL_RET_NOT_ACTIVE)
+  end -- if
+
+  if (command == "add") then
+    inv.items.organize.add(container, queryString, line or "")
+  elseif (command == "clear") then
+    inv.items.organize.clear(container, line or "")
+  else
+    inv.cli.organize.usage()
+    inv.tags.stop(invTagsOrganize, line, DRL_RET_INVALID_PARAM)
+  end -- if
+
+end -- inv.cli.organize.fn1
+
+
+function inv.cli.organize.fn2(name, line, wildcards)
+  local command = wildcards[1] or ""
+
+  dbot.debug("CLI: " .. pluginNameCmd .. " organize command=\"" .. (command or "") .. "\"")
+
+  if (not inv.init.initializedActive) then
+    dbot.info("Skipping organize request: plugin is not yet initialized (are you AFK or sleeping?)")
+    return inv.tags.stop(invTagsOrganize, line, DRL_RET_UNINITIALIZED)
+  elseif (dbot.gmcp.getState() ~= dbot.stateActive) then
+    dbot.info("Skipping organize request: character is not in the active state")
+    return inv.tags.stop(invTagsOrganize, line, DRL_RET_NOT_ACTIVE)
+  end -- if
+
+  if (command == "display") then
+    inv.items.organize.display(line or "")
+  else
+    inv.cli.organize.usage()
+    inv.tags.stop(invTagsOrganize, line, DRL_RET_INVALID_PARAM)
+  end -- if
+
+end -- inv.cli.organize.fn2
+
+
+function inv.cli.organize.fn3(name, line, wildcards)
+  local queryString = wildcards[1] or ""
+
+  dbot.debug("CLI: " .. pluginNameCmd .. " organize query=\"" .. queryString .. "\"")
+
+  if (not inv.init.initializedActive) then
+    dbot.info("Skipping organize request: plugin is not yet initialized (are you AFK or sleeping?)")
+    return inv.tags.stop(invTagsOrganize, line, DRL_RET_UNINITIALIZED)
+  elseif (dbot.gmcp.getState() ~= dbot.stateActive) then
+    dbot.info("Skipping organize request: character is not in the active state")
+    return inv.tags.stop(invTagsOrganize, line, DRL_RET_NOT_ACTIVE)
+  end -- if
+
+  inv.items.organize.cleanup(queryString, line or "")
+end -- inv.cli.organize.fn3
+
+
+function inv.cli.organize.usage()
+  dbot.print("@W    " .. pluginNameCmd .. " organize @G[add | clear | display] " ..
+             "@Y<container relative name> <query>@w") 
+end -- inv.cli.organize.usage
+
+
+function inv.cli.organize.examples()
+  dbot.print("@W\nUsage:\n")
+  inv.cli.organize.usage()
+  dbot.print(
+[[@W
+The "@Gdinv put ...@W" and "@Gdinv store ...@W" modes are incredibly convenient for putting items
+away into containers.  However, wouldn't it be even more convenient if you could assign
+one or more queries to each container and automagically store items matching those queries
+into their respective containers?  The "@Corganize@W" mode gives you this ability.
+
+You can add search queries (see "@Gdinv help search@W" for query details and examples) to
+containers.  You can also display or clear out a container's queries.
+
+Once you assign search queries to containers, you can specify one or more items in your
+inventory with a search query.  The plugin will check all items matching your query to see if
+they would also match an "organize" query for a container.  If an item matches both queries,
+the plugin moves it to that container.
+
+It's up to you to ensure that multiple containers don't match the same item(s) in an organize
+request.  If an item could be organized into two different containers, it will eventually end
+up in one, but there are no guarantees as to which of the containers it will be.  For example,
+if you assign all quest items to one container and all portals to another container, the
+aardwolf amulet will match both the quest container and the portal container in an organize
+request and it could end up in either container.
+
+Let's get to some examples!
+
+  1) Specify that all potions and pills belong in container 3.bag
+     "@Gdinv organize add 3.bag type potion || type pill@W"
+
+  2) Organize all potions and pills by moving them to 3.bag (as specified in the previous
+     example).
+     "@Gdinv organize type potion || type pill@W"
+
+  3) In my personal setup, I have one bag for potions and pills, another bag for portals, a
+     third bag for weapons, armor, and lights between levels 1 - 160, and a fourth bag for
+     weapons, armor, and lights with a level of 161 or higher.  Some quest items are flagged
+     as type "treasure" instead of type "armor" -- even if they clearly are armor.  As a result
+     I also added "|| key aardwolf ..." to the equipment bags so that they also pick up the
+     (mislabeled?) armor.  Doing this adds a conflict with the aardwolf amulet though because
+     it matches both the portal container and the aardwolf quest equipment container.  That is
+     why I added a "~key aardwolf" query to the portal container.
+
+Let's see what that looks like:
+     "@Gdinv organize display@W"
+
+@WContainers that have associated organizational queries:
+@W  "a @YBag of @RAardwolf@W": @Ctype potion || type pill
+@W  "a @YBag of @RAardwolf@W": @Ctype portal @-key aardwolf
+@W  "a @YBag of @RAardwolf@W": @Ctype armor maxlevel 160 || type weapon maxlevel 160 || type light maxlevel@C 160 || key aardwolf maxlevel 160
+@W  "a @YBag of @RAardwolf@W": @Ctype armor minlevel 161 || type weapon minlevel 161 || type light minlevel@C 161 || key aardwolf minlevel 161
+@W
+  4) If I want to put everything away, I would use an empty search query to match everything
+     in my inventory.  Bingo.  Everything is now tucked away in containers.  This will also put
+     away your worn equipment so you may want to take an equipment snapshot or ensure you have
+     a priority set available to re-wear your equipment before you do this.  
+     "@Gdinv organize@W"
+
+  5) You can clear a container's organize queries like this:
+     "@Gdinv organize clear 3.bag@W"
+
+  6) Here is how you would organize just your aardwolf quest weapons:
+     "@Gdinv organize type weapon keyword aardwolf@W"
+
+  7) If you want to organize a specific item by using a relative name, you could do
+     something like this:
+     "@Gdinv organize rname 3.cloak@W"
+
+  8) If you just want to organize all items with "sword" in their names, you can use the
+     fact that queries assume keys are names by default:
+     "@Gdinv organize sword@W"
+]])
+
+end -- inv.cli.organize.examples
+
+
+inv.cli.version = {}
+function inv.cli.version.fn(name, line, wildcards)
+  if (not inv.init.initializedActive) then
+    dbot.info("Skipping version request: plugin is not yet initialized (are you AFK or sleeping?)")
+    return inv.tags.stop(invTagsVersion, line, DRL_RET_UNINITIALIZED)
+  elseif (dbot.gmcp.getState() ~= dbot.stateActive) then
+    dbot.info("Skipping version request: character is not in the active state")
+    return inv.tags.stop(invTagsVersion, line, DRL_RET_NOT_ACTIVE)
+  end -- if
+
+  local retval = inv.version.display()
+  inv.tags.stop(invTagsVersion, line, retval)
+end -- inv.cli.version.fn
+
+
+function inv.cli.version.usage()
+  dbot.print("@W    " .. pluginNameCmd .. " version@w")
+end -- inv.cli.version.usage
+
+
+function inv.cli.version.examples()
+  dbot.print("@W\nUsage:\n")
+  inv.cli.version.usage()
+  dbot.print(
+[[@W
+You seriously want to read a helpfile about how to get this plugin's version information?!?
+Come on peeps, just type "@Gdinv version@W".  It's not that hard. :P
+]])
+
+end -- inv.cli.version.examples
+
+
+inv.cli.help = {}
+function inv.cli.help.fn(name, line, wildcards)
+  local command = wildcards[1] or ""
+
+  dbot.debug("inv.cli.help.fn: command=\"" .. command .. "\"")
+
+  if (inv.cli[command] ~= nil) and (inv.cli[command].examples ~= nil) then
+    inv.cli[command].examples()
+  else
+    inv.cli.fullUsage()
+  end -- if
+
+  inv.tags.stop(invTagsHelp, line, DRL_RET_SUCCESS) 
+end -- inv.cli.help.fn
+
+
+function inv.cli.help.usage()
+  dbot.print("@W    " .. pluginNameCmd .. " help @Y<command>@w")
+end -- inv.cli.help.usage
+
+
+function inv.cli.help.examples()
+  dbot.print("@W\nUsage:\n")
+  inv.cli.help.usage()
+  dbot.print(
+[[@W
+Run "@Gdinv help@W" by itself to see a list of this plugin's modes.  You can
+pick any of the modes and see more details and examples by running this:
+"@Gdinv help [something]@W".
+
+Examples:
+  1) Learn about building an inventory table
+     "@Gdinv help build@W"
+
+  2) Read the helpfile for analyzing equipment sets
+     "@Gdinv help analyze@W"
+
+]])
+
+end -- inv.cli.help.examples
+
+
+----------------------------------------------------------------------------------------------------
+-- Item management module: create an inventory table and provide access to it
+--
+-- Functions:
+--   inv.items.init.atInstall
+--   inv.items.init.atActive
+--   inv.items.fini
+--
+--   inv.items.save
+--   inv.items.load
+--   inv.items.reset
+--   inv.items.new
+--
+--   inv.items.getEntry
+--   inv.items.setEntry
+--   inv.items.getField
+--   inv.items.setField
+--   inv.items.getStatField
+--   inv.items.setStatField
+--
+--   inv.items.add
+--   inv.items.remove
+--   inv.items.forget
+--   inv.items.forgetCR
+--
+--   inv.items.discoverCR(maxNumItems, refreshLocations)
+--   inv.items.discoverLocation
+--   inv.items.discoverSetupFn
+--
+--   inv.items.identifyCR(maxNumItems, refreshLocations)
+--   inv.items.identifyItem
+--   inv.items.identifyItemSetupFn
+--   inv.items.identifyAtomicSetup()
+--   inv.items.identifyAtomicCleanup(resultData, retval)
+--
+--   inv.items.refresh(maxNumItems, refreshLocations, endTag, tagProxy)
+--   inv.items.refreshCR
+--   inv.items.refreshAtTime
+--   inv.items.refreshDefault()
+--   inv.items.refreshGetPeriod()
+--   inv.items.refreshSetPeriod(numMinutes)
+--   inv.items.refreshOn(minutes)
+--   inv.items.refreshOff()
+--
+--   inv.items.build
+--
+--   inv.items.get
+--   inv.items.getCR
+--   inv.items.getItem
+-- 
+--   inv.items.put
+--   inv.items.putCR
+--   inv.items.putItem
+-- 
+--   inv.items.store
+--   inv.items.storeCR
+--   inv.items.storeItem
+-- 
+--   inv.items.wearItem(objId, objLoc, commandArray, doCheckLocation)
+--   inv.items.wearSetupFn()   
+--   inv.items.wearResultFn()
+--
+--   inv.items.isWorn(objId)
+--   inv.items.isWearableLoc(wearableLoc)
+--   inv.items.isWearableType(wearableType)
+--   inv.items.wearableTypeToLocs(wearableType)
+--
+--   inv.items.removeItem(objId, commandArray)
+--   inv.items.removeSetupFn()   
+--   inv.items.removeResultFn()
+--
+--   inv.items.keyword
+--   inv.items.keywordCR
+-- 
+--   inv.items.search
+--   inv.items.searchCR
+--   inv.items.sort
+--   inv.items.compare
+--   inv.items.convertRelative
+--   inv.items.convertSetupFn
+--
+--   inv.items.display
+--   inv.items.displayCR
+--   inv.items.displayItem
+--   inv.items.colorizeStat
+--
+--   inv.items.isInvis(objId)
+--
+-- Data:
+--    inv.items.table
+--    inv.items.stateName -- name for the state file holding the table in persistent storage
+----------------------------------------------------------------------------------------------------
+
+
+-- We don't want to scan worn equipment, the main inventory, and all containers each time that we 
+-- do a refresh because that can take 5-10 seconds depending on how many containers you have.
+-- Instead, we maintain "clean" or "dirty" flags for each possible place to scan.  At startup, we
+-- consider everything to be "dirty" and we require a full scan.  After that, we mark locations as
+-- "dirty" when something new is placed at that location.  We can then selectively scan the dirty
+-- locations, identify things there, and then mark the newly scanned location as "clean".  This cuts
+-- down on refresh overhead significantly.
+--
+-- If we identify a container from the recent cache, we mark that container as being dirty because
+-- we don't know what items are in the container.  Something could have been added or removed since
+-- the last time we identified the container.
+
+invItemsRefreshLocAll   = "all"
+invItemsRefreshLocWorn  = "worn"
+invItemsRefreshLocMain  = "inventory"
+invItemsRefreshLocKey   = "keyring"
+invItemsRefreshLocDirty = "dirty"
+
+invItemsRefreshClean    = "isScanned"
+invItemsRefreshDirty    = "isNotScanned"
+
+inv.items               = {}
+inv.items.init          = {}
+inv.items.table         = {}
+
+inv.items.stateName     = "inv-items.state"
+
+inv.items.mainState     = invItemsRefreshDirty -- state for the main inventory (as detected by invdata)
+inv.items.wornState     = invItemsRefreshDirty -- state for items you are wearing (as detected by eqdata)
+inv.items.keyringState  = invItemsRefreshDirty -- state for items on your keyring (as detected by keyring data)
+
+inv.items.burstSize     = 20 -- max # of items that can be moved in one atomic operation
+
+
+function inv.items.init.atInstall()
+  local retval = DRL_RET_SUCCESS
+
+  -- Trigger on invmon
+  check (AddTriggerEx(inv.items.trigger.invmonName,
+                      "^{invmon}(.*?),(.*?),(.*?),(.*?)$",
+                      "inv.items.trigger.invmon(\"%1\",\"%2\",\"%3\",\"%4\")",
+                      drlTriggerFlagsBaseline + trigger_flag.OmitFromOutput,
+                      custom_colour.Custom11, 0, "", "", sendto.script, 0))
+
+  -- Trigger on invitem
+  check (AddTriggerEx(inv.items.trigger.invitemName,
+                      "^{invitem}(.*?),(.*?),(.*?),(.*?),(.*?),(.*?),(.*?),(.*?)$",
+                      "inv.items.trigger.itemDataStats(" ..
+                        "\"%1\",\"%2\",\"%3\",\"%4\", \"%5\",\"%6\",\"%7\",\"%8\",true)",
+                      drlTriggerFlagsBaseline + trigger_flag.OmitFromOutput,
+                      custom_colour.Custom11, 0, "", "", sendto.script, 0))
+
+  -- Trigger on the start of an identify-ish command (lore, identify, object read, bid, lbid, etc.)
+  check (AddTriggerEx(inv.items.trigger.itemIdStartName,
+                      "^(" ..
+                         ".-----------------------------------------------------------------.*|" ..
+                         "You do not have that item.*|"                ..
+                         "You dream about being able to identify.*|"   ..
+                         ".*does not have that item for sale.*|"       ..
+                         "There is no auction item with that id.*|"    ..
+                         ".*currently holds no inventory.*|"           ..
+                         "There is no marketplace item with that id.*" ..
+                      ")$",
+                      "inv.items.trigger.itemIdStart(\"%1\")",
+                      drlTriggerFlagsBaseline + trigger_flag.OmitFromOutput,
+                      custom_colour.Custom11, 0, "", "", sendto.script, 0))
+  check (EnableTrigger(inv.items.trigger.itemIdStartName, false)) -- default to off
+
+  -- Trigger on one of the detail/stat lines of an item's id report (lore, identify, bid, etc.)
+  check (AddTriggerEx(inv.items.trigger.itemIdStatsName,
+                      "^(\\| .*\\|| A full appraisal will reveal further information on this item.)$",
+                      "inv.items.trigger.itemIdStats(\"%1\")",
+                      drlTriggerFlagsBaseline + trigger_flag.OmitFromOutput,
+                      custom_colour.Custom11, 0, "", "", sendto.script, 0))
+  check (EnableTrigger(inv.items.trigger.itemIdStatsName, false)) -- default to off
+
+  -- Suppress output messages from the identification (lore, cast identify, cast object read, etc.)
+  check (AddTriggerEx(inv.items.trigger.suppressIdMsgName,
+                      "^Your natural intuition reveals the item's properties.....*$",
+                      "",
+                      drlTriggerFlagsBaseline + trigger_flag.OmitFromOutput,
+                      custom_colour.Custom11, 0, "", "", sendto.script, 0))
+  check (EnableTrigger(inv.items.trigger.suppressIdMsgName, false)) -- default to off
+
+  -- Trigger on an eqdata, invdata, or keyring data tag
+  check (AddTriggerEx(inv.items.trigger.itemDataStartName,
+                      "^{(eqdata|invdata|keyring)[ ]?([0-9]+)?}$",
+                      "inv.items.trigger.itemDataStart(\"%1\",\"%2\")",
+                      drlTriggerFlagsBaseline + trigger_flag.OmitFromOutput,
+                      custom_colour.Custom11, 0, "", "", sendto.script, 0))
+  check (EnableTrigger(inv.items.trigger.itemDataStartName, false)) -- default to off
+
+  -- Trigger on the stats for an eqdata, invdata, or keyring data item
+  check (AddTriggerEx(inv.items.trigger.itemDataStatsName,
+                      "^([0-9]+?),(.*?),(.*?),(.*?),(.*?),(.*?),(.*?),(.*?)$",
+                      "inv.items.trigger.itemDataStats" .. 
+                      "(\"%1\",\"%2\",\"%3\",\"%4\", \"%5\",\"%6\",\"%7\",\"%8\",false)",
+                      drlTriggerFlagsBaseline + trigger_flag.OmitFromOutput,
+                      custom_colour.Custom11, 0, "", "", sendto.script, 0))
+  check (EnableTrigger(inv.items.trigger.itemDataStatsName, false)) -- default to off
+
+  -- Trigger on an identify command to capture the item's object ID
+  check (AddTriggerEx(inv.items.trigger.idItemName,
+                      "^(" .. 
+                         ".------.*|"                                  ..
+                         "\\|.*|"                                      ..
+                         "You do not have that item.*|"                ..
+                         "You dream about being able to identify.*|"   ..
+                         ".*does not have that item for sale.*|"       ..
+                         "There is no auction item with that id.*|"    ..
+                         ".*currently holds no inventory.*|"           ..
+                         "There is no marketplace item with that id.*" ..
+                      "|)$", -- accept an empty capture on the last line
+                      "inv.items.trigger.idItem(\"%1\")",
+                      drlTriggerFlagsBaseline + trigger_flag.OmitFromOutput,
+                      custom_colour.Custom11, 0, "", "", sendto.script, 0))
+  check (EnableTrigger(inv.items.trigger.idItemName, false)) -- default to off
+
+  -- Trigger on "special" wear messages for unique items
+  check (AddTriggerEx(inv.items.trigger.wearSpecialName,
+                      "^(" ..
+                         "You proudly pin.*to your chest."                ..
+                         "|Your gloves tighten around.*with a loud snap!" ..
+                         "|.* feels like a part of you!"                  ..
+                         "|You are skilled with .*"                       ..
+                         "|You feel quite confident with .*"              ..
+                      ")$",
+                      "",
+                      drlTriggerFlagsBaseline + trigger_flag.OmitFromOutput,
+                      custom_colour.Custom11, 0, "", "", sendto.script, 0))
+  check (EnableTrigger(inv.items.trigger.wearSpecialName, false)) -- default to off
+
+  -- Trigger on the output of the "wear" command
+  check (AddTriggerEx(inv.items.trigger.wearName,
+                      "^(" ..
+                         "You do not have that item.*"           .. -- wear BADNAME
+                         "|You wear.*"                           .. -- wear the item
+                         "|You wield .*"                         .. -- hold weapon
+                         "|You light .*"                         .. -- wear light
+                         "|You hold .*"                          .. -- held item
+                         "|You equip .*"                         .. -- wear portal or sleeping bag
+                         "|.* begins floating around you.*"      .. -- wear float
+                         "|.* begins floating above you.*"       .. -- wear aura of trivia
+                         "|You dream about being able to wear.*" .. -- you are sleeping
+                         "|You cannot wear .*"                   .. -- item type can't be worn
+                         "|You must be at least level.*to use.*" .. -- your level is too low
+                      ")$",
+                      "inv.items.trigger.wear(\"%1\")",
+                      drlTriggerFlagsBaseline + trigger_flag.OmitFromOutput,
+                      custom_colour.Custom11, 0, "", "", sendto.script, 0))
+  check (EnableTrigger(inv.items.trigger.wearName, false)) -- default to off
+
+  -- Trigger on the output of the "remove" command
+  check (AddTriggerEx(inv.items.trigger.removeName,
+                      "^(" ..
+                         "You are not wearing that item."  .. -- remove BADNAME
+                         "|You remove .*"                  .. -- wear item
+                         "|You stop using .*"              .. -- shield
+                         "|You stop holding.*"             .. -- held item
+                         "|You stop wielding .*"           .. -- weapon
+                         "|.* stops floating around you.*" .. -- float
+                         "|.* stops floating above you.*"  .. -- above
+                         "|You stop using.* as a portal.*" .. -- portal
+                         "|You dream about removing your equipment.*" ..
+                      ")$",
+                      "inv.items.trigger.remove(\"%1\")",
+                      drlTriggerFlagsBaseline + trigger_flag.OmitFromOutput,
+                      custom_colour.Custom11, 0, "", "", sendto.script, 0))
+  check (EnableTrigger(inv.items.trigger.removeName, false)) -- default to off
+
+  -- Trigger on the output of the "get" command
+  check (AddTriggerEx(inv.items.trigger.getName,
+                      "^(" ..
+                         "You get.*"                            ..
+                         "|You do not see.*"                    ..
+                         "|You dream about being able to get.*" ..
+                      ")$",
+                      "inv.items.trigger.get(\"%1\")",
+                      drlTriggerFlagsBaseline + trigger_flag.OmitFromOutput,
+                      custom_colour.Custom11, 0, "", "", sendto.script, 0))
+  check (EnableTrigger(inv.items.trigger.getName, false)) -- default to off
+
+  -- Trigger on the output of the "put" command
+  check (AddTriggerEx(inv.items.trigger.putName,
+                      "^(" .. 
+                         "You don't have that.*"                 ..
+                         "|You do not see.*"                     ..
+                         "|You dream about putting items away.*" ..
+                         "|You put .* into .*"                   ..
+                      ")$",
+                      "inv.items.trigger.put(\"%1\")",
+                      drlTriggerFlagsBaseline + trigger_flag.OmitFromOutput,
+                      custom_colour.Custom11, 0, "", "", sendto.script, 0))
+  check (EnableTrigger(inv.items.trigger.putName, false)) -- default to off
+
+  -- Trigger on the output of the "keyring get" command
+  check (AddTriggerEx(inv.items.trigger.getKeyringName,
+                      "^(" ..
+                         "You remove.*from your keyring.*"          ..
+                         "|You did not find that on your keyring.*" ..
+                         "|You dream about being able to keyring.*" ..
+                      ")$",
+                      "inv.items.trigger.getKeyring(\"%1\")",
+                      drlTriggerFlagsBaseline + trigger_flag.OmitFromOutput,
+                      custom_colour.Custom11, 0, "", "", sendto.script, 0))
+  check (EnableTrigger(inv.items.trigger.getKeyringName, false)) -- default to off
+
+  -- Trigger on the output of the "keyring put" command
+  check (AddTriggerEx(inv.items.trigger.putKeyringName,
+                      "^(" ..
+                         "You put.*on your keyring.*"               ..
+                         "|You do not have that item.*"             ..
+                         "|You dream about being able to keyring.*" ..
+                      ")$",
+                      "inv.items.trigger.putKeyring(\"%1\")",
+                      drlTriggerFlagsBaseline + trigger_flag.OmitFromOutput,
+                      custom_colour.Custom11, 0, "", "", sendto.script, 0))
+  check (EnableTrigger(inv.items.trigger.putKeyringName, false)) -- default to off
+
+  return retval
+
+end -- inv.items.init.atInstall
+
+
+function inv.items.init.atActive()
+  local retval = inv.items.load()
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.items.init.atActive: failed to load items data from storage: " ..
+              dbot.retval.getString(retval))
+  end -- if
+
+  -- Mark all known containers as not being "clean" (i.e., fully scanned).  Someone could
+  -- have logged in without this plugin (or *gasp* used telnet) and moved items or added
+  -- and/or removed items.  We need to know exactly what items are actually present and
+  -- where those items are.
+  --
+  -- Note: This isn't a perfect solution because someone may have added a container without
+  --       us knowing and we can't mark it as being dirty if we don't know it exists.  However,
+  --       this is largely redundant with the full scan we do when we init the plugin and it
+  --       is essentially just a backup way of handling things if the user stops the full scan
+  --       for some reason.
+  for objId, _ in pairs(inv.items.table) do
+    if (inv.items.getStatField(objId, invStatFieldType) == invmon.typeStr[invmonTypeContainer]) then
+      inv.items.setField(objId, invFieldIdentifyLevel, invIdLevelNone)
+      inv.items.keyword(invItemsRefreshClean, invKeywordOpRemove, "id " .. objId, true)
+    end -- if
+  end -- for
+
+  -- If automatic refreshes are enabled (i.e., the period is > 0 minutes), kick off the 
+  -- refresh timer to periodically scan our inventory and update the inventory table
+  local refreshPeriod = inv.items.refreshGetPeriod() or inv.items.timer.refreshMin
+  if (refreshPeriod > 0) then
+    inv.items.refreshAtTime(refreshPeriod, 0)
+  else
+    dbot.deleteTimer(inv.items.timer.refreshName)
+  end -- if
+
+  return retval
+end -- inv.items.init.atActive
+
+
+function inv.items.fini(doSaveState)
+  local retval = DRL_RET_SUCCESS
+
+  dbot.deleteTrigger(inv.items.trigger.invmonName)
+  dbot.deleteTrigger(inv.items.trigger.invitemName)
+  dbot.deleteTrigger(inv.items.trigger.itemIdStartName)
+  dbot.deleteTrigger(inv.items.trigger.itemIdStatsName)
+  dbot.deleteTrigger(inv.items.trigger.suppressIdMsgName)
+  dbot.deleteTrigger(inv.items.trigger.itemDataStartName)
+  dbot.deleteTrigger(inv.items.trigger.itemDataStatsName)
+  dbot.deleteTrigger(inv.items.trigger.idItemName)
+  dbot.deleteTrigger(inv.items.trigger.wearSpecialName)
+  dbot.deleteTrigger(inv.items.trigger.wearName)
+  dbot.deleteTrigger(inv.items.trigger.removeName)
+  dbot.deleteTrigger(inv.items.trigger.getName)
+  dbot.deleteTrigger(inv.items.trigger.putName)
+  dbot.deleteTrigger(inv.items.trigger.getKeyringName)
+  dbot.deleteTrigger(inv.items.trigger.putKeyringName)
+
+  dbot.deleteTimer(inv.items.timer.refreshName)
+  dbot.deleteTimer(inv.items.timer.idTimeoutName)
+
+  if (doSaveState) then
+    -- Save our current data
+    retval = inv.items.save()
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.items.fini: Failed to save inv.items module data: " .. dbot.retval.getString(retval))
+    end -- if
+  end -- if
+
+  return retval
+end -- inv.items.fini
+
+
+function inv.items.save()
+  local retval = dbot.storage.saveTable(dbot.backup.getCurrentDir() .. inv.items.stateName,
+                                        "inv.items.table", inv.items.table)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.items.save: Failed to save items table: " .. dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+end -- inv.items.save
+
+
+function inv.items.load()
+  local retval = dbot.storage.loadTable(dbot.backup.getCurrentDir() .. inv.items.stateName, inv.items.reset)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.items.load: Failed to load table from file \"@R" .. 
+              dbot.backup.getCurrentDir() .. inv.items.stateName .. "@W\": " .. dbot.retval.getString(retval))
+  end -- if
+
+  if (inv.items.table == nil) then
+    dbot.error("inv.items.load: Failed to load inventory table")
+    return DRL_RET_INTERNAL_ERROR
+  end -- if
+
+  return retval
+end -- inv.items.load
+
+
+function inv.items.reset()
+  inv.items.table = {}
+
+  return inv.items.save()
+end -- inv.items.reset
+
+
+function inv.items.new(objId)
+  assert(objId ~= nil, "inv.items.new: objId is nil")
+
+  inv.items.table[objId] = {}
+  inv.items.table[objId][invFieldIdentifyLevel] = invIdLevelNone
+  inv.items.table[objId][invFieldObjLoc] = invItemLocUninitialized
+  inv.items.table[objId][invFieldColorName] = ""
+  inv.items.table[objId][invFieldStats] = {}
+
+  return DRL_RET_SUCCESS
+end -- inv.items.new
+
+
+function inv.items.getEntry(objId)
+  assert(objId ~= nil, "inv.items.getEntry: objId is nil")
+
+  -- dbot.debug("inv.items.getEntry: retrieved item " .. objId)
+
+  return inv.items.table[objId]
+end -- inv.items.getEntry
+
+
+function inv.items.setEntry(objId, entry)
+  assert(objId ~= nil, "inv.items.setEntry: objId is nil")
+
+  inv.items.table[objId] = entry
+  -- dbot.debug("inv.items.setEntry: updated item " .. objId)
+
+  return DRL_RET_SUCCESS
+end -- inv.items.setEntry
+
+
+invFieldIdentifyLevel = "identifyLevel"
+invFieldObjLoc        = "objectLocation"
+invFieldHomeContainer = "homeContainer"
+invFieldColorName     = "colorName"
+invFieldStats         = "stats"
+
+function inv.items.getField(objId, field)
+  -- Check the params
+  assert((objId ~= nil) and (field ~= nil), "inv.items.getField: nil parameters")
+  objId = tonumber(objId)
+  assert((objId ~= nil), "Invalid non-numeric objId detected")
+
+  local entry = inv.items.getEntry(objId)
+  if (entry == nil) then
+    dbot.debug("inv.items.getField: Failed to get field \"" .. field .. "\", entry " .. objId .. 
+               " does not exist")
+    return nil,DRL_RET_MISSING_ENTRY
+  end -- if
+
+  return entry[field], DRL_RET_SUCCESS
+end -- inv.items.getField
+
+
+function inv.items.setField(objId, field, value)
+  -- Check the params
+  assert((objId ~= nil) and (field ~= nil) and (value ~= nil), "inv.items.setField: nil parameters")
+  objId = tonumber(objId) 
+  assert((objId ~= nil), "Invalid non-numeric objId detected")
+
+  local entry = inv.items.getEntry(objId)
+  if (entry == nil) then
+    dbot.warn("inv.items.setField: Failed to set field \"" .. field .. "\", entry " .. objId .. 
+              " does not exist")
+    return DRL_RET_MISSING_ENTRY
+  end -- if
+
+  -- Update the field
+  entry[field] = value
+
+  return DRL_RET_SUCCESS
+end -- inv.items.setField
+
+
+function inv.items.getStatField(objId, field)
+  objId = tonumber(objId or "")
+  if (objId == nil) then
+    dbot.warn("inv.items.getStatField: objId parameter is missing")
+    return nil, DRL_RET_INVALID_PARAM
+  end -- if
+
+  if (field == nil) or (field == "") then
+    dbot.warn("inv.items.getStatField: field parameter is missing")
+    return nil, DRL_RET_INVALID_PARAM
+  end -- if
+
+  local entry = inv.items.table[objId]
+  if (entry == nil) then
+    dbot.debug("inv.items.getStatField failed: no inventory entry found for objectID " .. objId .. 
+               " for field " .. (field or "nil"))
+    return nil, DRL_RET_MISSING_ENTRY
+  end -- if
+
+  if (entry.stats == nil) then
+    dbot.warn("inv.items.getStatField: Missing stats for objectID " .. objId)
+    return nil, DRL_RET_UNIDENTIFIED
+  end -- if
+
+  return entry.stats[field], DRL_RET_SUCCESS
+end -- inv.items.getStatField
+
+
+function inv.items.setStatField(objId, field, value) 
+  assert(objId ~= nil, "inv.items.setStatField: nil objId parameter")
+  assert(field ~= nil, "inv.items.setStatField: nil field parameter for item " .. objId)
+  assert(value ~= nil, "inv.items.setStatField: nil value parameter for item " .. objId)
+
+  local entry = inv.items.table[objId]
+  if (entry == nil) then
+    dbot.warn("inv.items.setStatField failed: no inventory entry found for objectID " .. objId)
+    dbot.debug("Attempted to set field " .. field .. " to value \"" .. (value or "nil"))
+    return DRL_RET_MISSING_ENTRY
+  end -- if
+
+  entry.stats[field] = value
+
+end -- inv.items.setStatField
+
+
+function inv.items.add(objId) 
+  local retval = DRL_RET_SUCCESS
+  local objIdNum = tonumber(objId)
+
+  if (objIdNum == nil) then
+    dbot.warn("inv.items.add: Failed to add non-numeric objId " .. objId)
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  -- Check if we can pull details on this item instance from the "recently removed"
+  -- item cache.  If we can, do it :)  Otherwise, start a new entry for this objId.
+  local entry = inv.cache.get(inv.cache.recent.table, objId)
+  if (entry == nil) then
+    retval = inv.items.new(objId)
+  else
+    retval = inv.items.setEntry(objId, dbot.table.getCopy(entry))
+    if (retval == DRL_RET_SUCCESS) then
+      dbot.debug("Added \"" .. (inv.items.getField(objId, invFieldColorName) or "Unidentified") .. 
+               DRL_ANSI_WHITE .. "\" (" .. objId .. ") from recent item cache")
+
+      -- The item is now in our inventory table so we can remove it from the recent item cache
+      retval = inv.cache.remove(inv.cache.recent.table, objId)
+      if (retval ~= DRL_RET_SUCCESS) then
+        dbot.warn("inv.items.add: Failed to remove " .. objId .. " from recent item cache: " ..
+                dbot.retval.getString(retval))
+      end -- if
+
+      -- If the new item is a container, mark it as "dirty" so that we will rescan it on the
+      -- next discovery phase of a refresh.  We don't know the current contents of the container
+      -- since it left our possession for a while.
+      if (inv.items.getStatField(objId, invStatFieldType) == invmon.typeStr[invmonTypeContainer]) then
+        inv.items.keyword(invItemsRefreshClean, invKeywordOpRemove, "id " .. objId, true)
+      end -- if
+    end -- if
+  end -- if
+
+  return retval
+end -- inv.items.add
+
+
+function inv.items.remove(objId)
+  local retval = DRL_RET_SUCCESS
+
+  local item = inv.items.getEntry(objId)
+  if (item == nil) then 
+    dbot.warn("inv.items.removeFailed to remove item " .. objId .. 
+              " from inventory table because it is not in the table")
+    return DRL_RET_MISSING_ENTRY
+  end -- if
+
+  -- Remove any item whose location matches the objId for the removed item (it could be a container)
+  -- It would be nice if we could prune the search a bit and only do this if the item is a container.
+  -- Unfortunately, we can't be guaranteed that the item is identified enough for us to know it is a
+  -- container so we must do this for every item.  It's a bit more overhead...oh well.
+  for k,v in pairs(inv.items.table) do
+    if (v[invFieldObjLoc] ~= nil) and (v[invFieldObjLoc] == objId) then
+      dbot.debug("Removed item " .. k .. " from removed container " .. objId)
+      inv.items.remove(k)
+    end -- if
+  end -- for
+
+  -- If the item is not in the frequent item cache, then cache the item in the "recently removed" item
+  -- cache in case we want to pick it up again soon.  We could duplicate things in both the frequent
+  -- and recent caches, but it helps keep things uncluttered if we don't add an item to the recent cache
+  -- if it is easily identified from the frequent cache.
+  local name = inv.items.getStatField(objId, invStatFieldName)
+  if (name ~= nil) and (inv.cache.get(inv.cache.frequent.table, name) == nil) then
+    retval = inv.cache.add(inv.cache.recent.table, objId)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.items.remove: failed to cache \"" .. 
+                (inv.items.getField(objId, invFieldColorName) or "Unidentified") ..
+                "\" in recently removed item cache: " .. dbot.retval.getString(retval))
+    end -- if
+  end -- if
+
+  -- Whack the entry we just removed
+  inv.items.setEntry(objId, nil)
+
+  return retval
+end -- inv.items.remove
+
+
+inv.items.forgetPkg = nil
+function inv.items.forget(query, endTag)
+
+  if (inv.items.forgetPkg ~= nil) then
+    dbot.note("Skipping forget request: another forget request is in progress")
+    return inv.tags.stop(invTagsForget, endTag, DRL_RET_BUSY)
+  end -- if
+
+  inv.items.forgetPkg        = {}
+  inv.items.forgetPkg.query  = query or ""
+  inv.items.forgetPkg.endTag = endTag
+
+  wait.make(inv.items.forgetCR)
+
+  return DRL_RET_SUCCESS
+end -- inv.items.forget
+
+
+function inv.items.forgetCR()
+
+  if (inv.items.forgetPkg == nil) or (inv.items.forgetPkg.query == nil) then
+    dbot.error("inv.items.forgetCR: Aborting forget request -- forget package or query is nil!")
+    inv.items.forgetPkg = nil
+    return DRL_RET_INTERNAL_ERROR
+  end -- if
+
+  local endTag = inv.items.forgetPkg.endTag
+
+  local idArray, retval = inv.items.searchCR(inv.items.forgetPkg.query)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.items.forgetCR: failed to search inventory table: " .. dbot.retval.getString(retval))
+
+  -- Let the user know if no items matched their query
+  elseif (idArray == nil) or (#idArray == 0) then
+    dbot.info("No match found for forget query: \"" .. inv.items.forgetPkg.query .. "\"")
+
+  -- Forget everything that matched the query by removing it from the inventory table and cache
+  else
+    for _, objId in ipairs(idArray) do
+      dbot.note("Forgetting item \"" .. (inv.items.getField(objId, invFieldColorName) or "Unknown") .. "@W\"")
+      inv.items.remove(objId)
+      inv.cache.remove(inv.cache.recent.table, objId)
+    end -- for
+
+    dbot.info("Forgot " .. #idArray .. " items: run \"@Gdinv refresh all@W\" to rescan your inventory.")
+  end -- if
+
+  -- Save our changes so that they don't get picked up again accidentally if we reload the plugin
+  inv.items.save()
+
+  inv.items.forgetPkg = nil
+
+  return inv.tags.stop(invTagsForget, endTag, retval)
+end -- inv.items.forgetCR
+
+
+function inv.items.discoverCR(maxNumItems, refreshLocations)
+  local retval
+
+  -- If maxNumItems isn't given, default to 0 -- which means there is no maximum
+  maxNumItems = tonumber(maxNumItems or 0) or 0
+
+  -- If refreshLocations is not given, default to scanning everything
+  refreshLocation = refreshLocations or invItemsRefreshLocAll
+
+  -- Discover equipment that is currently worn.  We only do this if the user asked to scan "all"
+  -- locations, if the user specifically asked to scan "worn" locations, or if the user asked to
+  -- scan dirty locations and worn locations are marked as dirty because we haven't yet scanned them.
+  if (refreshLocation == invItemsRefreshLocAll) or
+     (refreshLocation == invItemsRefreshLocWorn) or
+     ((refreshLocation == invItemsRefreshLocDirty) and (inv.items.wornState == invItemsRefreshDirty)) then
+    retval = inv.items.discoverLocation(invItemLocWorn)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.debug("inv.items.discoverCR: Failed to discover worn equipment: " .. dbot.retval.getString(retval))
+      return retval
+    else
+      inv.items.wornState = invItemsRefreshClean
+    end -- if
+  end -- if
+
+  -- Discover items in the main inventory
+  if (refreshLocation == invItemsRefreshLocAll) or 
+     (refreshLocation == invItemsRefreshLocMain) or
+     ((refreshLocation == invItemsRefreshLocDirty) and (inv.items.mainState == invItemsRefreshDirty)) then
+    retval = inv.items.discoverLocation(invItemLocInventory)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.debug("inv.items.discoverCR: Failed to discover main inventory contents: " .. 
+                 dbot.retval.getString(retval))
+      return retval
+    else
+      inv.items.mainState = invItemsRefreshClean
+    end -- if
+  end -- if
+
+  -- Discover items in the keyring
+  if (refreshLocation == invItemsRefreshLocAll) or 
+     (refreshLocation == invItemsRefreshLocKey) or
+     ((refreshLocation == invItemsRefreshLocDirty) and (inv.items.keyringState == invItemsRefreshDirty)) then
+    retval = inv.items.discoverLocation(invItemLocKeyring)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.debug("inv.items.discoverCR: Failed to discover keyring contents: " .. 
+                 dbot.retval.getString(retval))
+      return retval
+    else
+      inv.items.keyringState = invItemsRefreshClean
+    end -- if
+  end -- if
+
+  -- Identify everything discovered so far (we mainly just want to find containers so that we can discover
+  -- their contents next)
+  retval = inv.items.identifyCR(maxNumItems, refreshLocations)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.debug("inv.items.discoverCR: Inventory identification did not complete: " .. 
+               dbot.retval.getString(retval))
+    return retval
+  end -- if
+
+  -- Discover all containers
+  if (refreshLocation == invItemsRefreshLocAll) or (refreshLocation == invItemsRefreshLocDirty) then
+    for objId,v in pairs(inv.items.table) do
+
+      if (inv.items.getStatField(objId, invStatFieldType) == invmon.typeStr[invmonTypeContainer]) then
+
+        -- Scan this container if the caller asked us to scan everything or if we need to scan all
+        -- dirty containers and this container is dirty (i.e., it hasn't been verified to be clean 
+        -- in a previous scan)
+        local keywordField = inv.items.getStatField(objId, invStatFieldKeywords) or ""
+        if (refreshLocation == invItemsRefreshLocAll) or
+           ((refreshLocation == invItemsRefreshLocDirty) and 
+            (not dbot.isWordInString(invItemsRefreshClean, keywordField))) then
+          dbot.note("Discovering contents of container " .. objId .. ": " .. v[invFieldColorName])
+
+          -- Discover items in the container
+          retval = inv.items.discoverLocation(objId)
+          if (retval ~= DRL_RET_SUCCESS) then
+            dbot.warn("inv.items.discoverCR: Failed to discover container " .. objId .. 
+                       ": " .. dbot.retval.getString(retval))
+          else
+            inv.items.keyword(invItemsRefreshClean, invKeywordOpAdd, "id " .. objId, true)
+          end -- if
+        end -- if
+      end -- if
+    end -- for
+  end -- if
+
+  return retval
+end -- inv.items.discoverCR
+
+
+drlInvDiscoveryTimeoutThresholdSec = 30 -- make this large enough to handle a speedwalk in the middle
+function inv.items.discoverLocation(location)
+  local retval
+  local containerId
+
+  -- Valid discovery locations are worn equipment, main inventory, the keyring, or a container
+  if (location ~= nil) then
+    containerId = tonumber(location)
+  end -- if
+  assert((location == invItemLocWorn) or (location == invItemLocInventory) or 
+         (location == invItemLocKeyring) or (containerId ~= nil),
+         "inv.items.discoverLocation: invalid location parameter")
+
+  -- Only allow one discovery request at a time
+  if (inv.items.discoverPkg ~= nil) then
+    dbot.note("Skipping inventory discovery because another discovery is in progress")
+    return DRL_RET_BUSY
+  end -- if
+
+  inv.items.discoverPkg = {}
+
+  -- Start the discovery!!!
+  local command
+  if (location == invItemLocWorn) then
+    command = "eqdata"
+  elseif (location == invItemLocInventory) then
+    command = "invdata"
+  elseif (location == invItemLocKeyring) then
+    command = "keyring data"
+  else
+    command = "invdata " .. containerId
+  end -- if
+
+  local resultData = dbot.callback.new()
+  retval = dbot.execute.safe.command(command, inv.items.discoverSetupFn, nil,
+                                     dbot.callback.default, resultData)
+  if (retval ~= DRL_RET_SUCCESS) then
+    if (retval ~= DRL_RET_IN_COMBAT) then
+      dbot.warn("inv.items.discoverLocation: Failed to execute command \"@G" .. command .. "@W\": " ..
+                dbot.retval.getString(retval))
+    end -- if
+    inv.items.trigger.itemDataEnd() -- Call this to clean up any lingering state from the failed discovery
+    return retval
+  end -- if
+
+  -- Wait for the callback to confirm that the safe execution completed
+  retval = dbot.callback.wait(resultData, drlInvDiscoveryTimeoutThresholdSec)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.note("Inventory discovery did not complete: " .. dbot.retval.getString(retval) ..
+              ".  We'll try again later.")
+    inv.items.trigger.itemDataEnd() -- Call this to clean up any lingering state from the failed discovery
+  end -- if
+
+  -- Wait until the eqdata, invdata, keyring data triggers complete
+  if (retval == DRL_RET_SUCCESS) then
+    local timeout = 0
+    while (inv.items.discoverPkg ~= nil) do
+      wait.time(drlSpinnerPeriodDefault)
+      timeout = timeout + drlSpinnerPeriodDefault
+      if (timeout > 2) then -- use a short timeout since the callback.wait() call above already waited a while
+        dbot.note("Inventory discovery timed out -- maybe you were busy.  We'll try again later...")
+        inv.items.trigger.itemDataEnd() -- Call this to clean up any lingering state from the failed discovery
+        return DRL_RET_TIMEOUT
+      end -- if
+    end -- while
+  end -- if
+
+  return retval
+end -- inv.items.discoverLocation
+
+
+function inv.items.discoverSetupFn()
+  EnableTrigger(inv.items.trigger.itemDataStartName, true)
+end -- inv.items.discoverSetupFn
+
+
+function inv.items.identifyCR(maxNumItems, refreshLocations)
+  local retval = DRL_RET_SUCCESS
+
+  -- TODO: Possibly support capping the number of items identified in one call and/or limiting
+  --       which locations have items to identify (e.g., main inventory, containers, etc.)
+  --       For now, we ignore the "maxNumItems" and "refreshLocations" parameters.
+
+  -- Count the number of items to identify and keep a record of which items require identification.
+  -- We use a temporary array for the objIds of these items so that we can avoid walking the entire
+  -- inventory table again and so that we don't need to handle the case where item idLevel changes
+  -- during identification.  For example, if the user removes an unidentified item from a container,
+  -- we mark the container as unidentified so that we can pick up the current weight statistics on
+  -- the next identification.  That scenario complicates things because we could get into a situation
+  -- where we pull lots of unidentified items from a container and then immediately re-identify the
+  -- container after each one.  The current implementation avoids that entirely by determining up front
+  -- which items should be identified during this identification pass.
+  local objsToIdentify = {}
+  local numItemsToIdentify = 0
+  for objId, _ in pairs(inv.items.table) do
+    local idLevel = inv.items.getField(objId, invFieldIdentifyLevel)
+    if (idLevel ~= nil) and (idLevel == invIdLevelNone) then
+      numItemsToIdentify = numItemsToIdentify + 1
+      table.insert(objsToIdentify, objId)
+    end -- if
+  end -- for
+
+  local numItemsIdentified = 0
+  for _, objId in ipairs(objsToIdentify) do
+    -- Stop and return if we if the user requested that we disable the refresh
+    if (inv.state == invStatePaused) then
+      retval = DRL_RET_HALTED
+      break
+    end -- if
+
+    -- Stop and return if we are not in the "active" state.  We don't want to try identifying
+    -- things when we are AFK, writing a note, sleeping, running, etc.
+    local charState = dbot.gmcp.getState()
+    if (charState ~= dbot.stateActive) then
+      dbot.note("Skipping remainder of identification request: you are now in state \"" ..
+                dbot.gmcp.getStateString(charState) .. "\"")
+      if (charState == dbot.stateCombat) then
+        retval = DRL_RET_IN_COMBAT
+      else
+        retval = DRL_RET_NOT_ACTIVE
+      end -- if
+      break
+    end -- if
+
+    -- Attempt to get both the colorized name and the regular name for the item.  If we have
+    -- the colorized name, we can get the regular name by stripping the colors from the colorized
+    -- version of the name.
+    local colorName = inv.items.getField(objId, invFieldColorName) 
+    if (colorName == "") then
+      colorName = nil
+    end -- if
+    local name = inv.items.getStatField(objId, invStatFieldName)
+    if (name == nil) or (name == "") then
+      if (colorName ~= nil) then
+        name = strip_colours(colorName)
+      else
+        name = nil
+      end -- if
+    end -- if
+
+    -- Check if we can get details on this item from the "frequently acquired" item cache.
+    -- If it is in the cache, use the cached copy instead of manually identifying it.
+    local idLevel = inv.items.getField(objId, invFieldIdentifyLevel)
+    if (idLevel ~= nil) and (idLevel == invIdLevelNone) and (name ~= nil) then
+      local cachedEntry = inv.cache.get(inv.cache.frequent.table, name)
+      if (cachedEntry ~= nil) then
+        cachedEntry.stats.id = objId
+        retval = inv.items.setEntry(objId, (cachedEntry))
+        if (retval ~= DRL_RET_SUCCESS) then
+          dbot.warn("inv.items.identifyCR: Failed to set \"" .. name .. DRL_ANSI_WHITE .. 
+                    "\" from frequent cache entry: " .. dbot.retval.getString(retval))
+        else
+          numItemsIdentified = numItemsIdentified + 1        
+          dbot.note("Identify (" .. numItemsIdentified .. " / " .. numItemsToIdentify ..
+                    ") \"" .. (colorName or name or "Unidentified") .. "@W" .. DRL_ANSI_WHITE .. 
+                    "\" (" .. objId .. ") from frequent cache")
+        end -- if
+      end -- if
+    end -- if
+
+    -- If we don't have any identification completed yet, do a basic ID
+    idLevel = inv.items.getField(objId, invFieldIdentifyLevel)
+    if (idLevel ~= nil) and (idLevel == invIdLevelNone) then
+      local resultData = dbot.callback.new()
+      numItemsIdentified = numItemsIdentified + 1
+      dbot.note(string.format("Identify (%d / %d)", numItemsIdentified, numItemsToIdentify) ..
+                ": \"" .. (colorName or name or "Unidentified") .. "@W" .. DRL_ANSI_WHITE .. 
+                "\" (" .. objId .. ")")
+      local commandArray = dbot.execute.new()
+      retval = inv.items.identifyItem(objId, idCommandBasic, resultData, commandArray)      
+
+      -- Wait until we have confirmation the identification completed
+      if (retval == DRL_RET_SUCCESS) then
+        if (commandArray ~= nil) then
+          retval = dbot.execute.safe.blocking(commandArray, inv.items.identifyAtomicSetup, nil,
+                                              inv.items.identifyAtomicCleanup, 10)
+          if (retval ~= DRL_RET_SUCCESS) then
+            dbot.note("Skipping request to identify item \"" .. (colorName or name or "Unidentified") ..
+                      "@W" .. DRL_ANSI_WHITE .. "\": " .. dbot.retval.getString(retval))
+          end -- if
+        else
+          local timeout = 0
+          while (resultData.isDone == false) do
+            wait.time(inv.items.timer.idTimeoutPeriodSec)
+            timeout = timeout + inv.items.timer.idTimeoutPeriodSec
+            if (timeout > inv.items.timer.idTimeoutThresholdSec) then
+              dbot.warn("inv.items.identifyCR: Basic identification timed out for item " .. objId  .. 
+                        ": \"" .. (colorName or name or "Unidentified") .. DRL_ANSI_WHITE .. "\"")
+              break
+            end -- if
+          end -- while
+        end -- if
+      end -- if
+    end -- if
+
+    -- If the item is an instance of a frequently acquired item (potion, pill, etc.) add it
+    -- to the "frequently acquired item" cache if it is not already in the cache.
+    -- Grab the latest name because it may have been filled in during the ID
+    name = inv.items.getStatField(objId, invStatFieldName) 
+    if (name ~= nil) then
+      local cacheEntry = inv.cache.get(inv.cache.frequent.table, name)
+      if (cacheEntry == nil) then
+        -- TODO: It would be nice if we could keep wands and staves in the frequent cache, but wands
+        -- and staves can have variable levels and they aren't necessarily identical.  Also, they
+        -- can have varying numbers of charges which means that they can't be considered identical.
+
+        itemType = inv.items.getStatField(objId, invStatFieldType)
+        if (itemType == invmon.typeStr[invmonTypePotion]) or 
+           (itemType == invmon.typeStr[invmonTypePill]) or 
+           (itemType == invmon.typeStr[invmonTypeFood]) or 
+           (itemType == invmon.typeStr[invmonTypeScroll]) then
+
+          colorName = inv.items.getField(objId, invFieldColorName)
+          retval = inv.cache.add(inv.cache.frequent.table, objId)
+          if (retval ~= DRL_RET_SUCCESS) then
+            dbot.warn("inv.items.identifyCR: Failed to add \"" .. (colorName or name or "Unidentified") ..
+                      "@W\" to frequent item cache: " .. dbot.retval.getString(retval))
+          else
+            dbot.note("Added \"" .. (colorName or "Unidentified") .. "@W\" to frequent item cache")
+          end -- if
+        end -- if
+      end -- if
+    end -- if
+
+  end -- for objId,_ in pairs
+
+  -- We are done (at least for now)
+  if (retval == DRL_RET_SUCCESS) then
+    dbot.debug("Inventory identification procedure completed")
+  elseif (retval == DRL_RET_HALTED) then
+    dbot.debug("Inventory identification halted early")
+  end -- if
+
+  return retval
+end -- inv.items.identifyCR
+
+
+idCommandBasic = "identify"
+-- Asynchronous routine to identify an item
+function inv.items.identifyItem(objId, idCommand, resultData, commandArray)
+  local retval = DRL_RET_SUCCESS
+  local command
+
+  assert((objId ~= nil) and (idCommand ~= nil), "inv.items.identifyItem: nil parameters detected")
+
+  local item = inv.items.getEntry(objId)
+  if (item == nil) then 
+    dbot.warn("inv.items.identifyItem: Failed to identify item " .. objId .. 
+              " in inventory table because it is not in the table")
+    return DRL_RET_MISSING_ENTRY
+  end -- if
+
+  -- Check where the item is (main inventory, worn location, container, etc.).  We will want to
+  -- put the item back to its original location once we finish identifying it.
+  local objLoc = inv.items.getField(objId, invFieldObjLoc)
+  if (objLoc == nil) or (objLoc == invItemLocUninitialized) then
+    dbot.warn("inv.items.identifyItem: Failed to identify item " .. objId .. 
+              ": item's location could not be determined")
+    return DRL_RET_MISSING_ENTRY
+  end -- if
+
+  -- Check if another id is in progress before we proceed
+  if (inv.items.identifyPkg ~= nil) then
+    dbot.info("inv.items.identifyItem: Skipping identification of " .. objId .. 
+              ": another identification is in progress")
+    return DRL_RET_BUSY
+  end -- if
+
+  -- Use globals to hold state for the identify triggers
+  inv.items.identifyPkg         = {}
+  inv.items.identifyPkg.objId   = objId
+  inv.items.identifyPkg.objLoc  = objLoc
+  inv.items.identifyPkg.command = idCommand
+
+  if (commandArray == nil) then
+    -- Add a timeout timer to clear the identify request if we take too long.  For example,
+    -- we may have tried to identify an item that isn't in our inventory table or we may have
+    -- tried to use an invalid identify command.
+    check (AddTimer(inv.items.timer.idTimeoutName, 0, 0, inv.items.timer.idTimeoutThresholdSec, "",
+                    timer_flag.Enabled + timer_flag.OneShot, "inv.items.timer.idTimeout"))
+  end -- if
+
+  -- Identify the item.  If it is in a container, keyring, vault, or worn, we must first put the
+  -- item into the main inventory before we ID it.  If we needed to move the item to ID it, put
+  -- it back where we got it after the ID completes.
+
+  -- Main inventory
+  if (objLoc == invItemLocInventory) then
+    command = idCommand .. " " .. objId
+    if (commandArray ~= nil) then
+      table.insert(commandArray, command)
+    else
+      retval = dbot.execute.safe.command(command, inv.items.identifyItemSetupFn, nil,
+                                         dbot.callback.default, resultData)
+      if (retval == DRL_RET_SUCCESS) then
+        retval = dbot.callback.wait(resultData, 10)
+        if (retval ~= DRL_RET_SUCCESS) then
+          dbot.note("Main inventory identify request did not complete: " .. dbot.retval.getString(retval))
+        end -- if
+      end -- if
+    end -- if
+
+  -- Keyring
+  elseif (objLoc == invItemLocKeyring) then
+    retval = inv.items.getItem(objId, commandArray)
+    if (retval == DRL_RET_SUCCESS) then
+      command = idCommand .. " " .. objId
+      if (commandArray ~= nil) then
+        table.insert(commandArray, command)
+      else
+        retval = dbot.execute.safe.command(command, inv.items.identifyItemSetupFn, nil,
+                                           dbot.callback.default, resultData)
+        if (retval == DRL_RET_SUCCESS) then
+          retval = dbot.callback.wait(resultData, 10)
+          if (retval ~= DRL_RET_SUCCESS) then
+            dbot.note("Keyring identify request did not complete: " .. dbot.retval.getString(retval))
+          end -- if
+        end -- if
+      end -- if
+
+      command = "keyring put " .. objId
+      if (commandArray ~= nil) then
+        table.insert(commandArray, command)
+      else
+        local itemName = inv.items.getField(objId, invFieldColorName) or "Unidentified"
+        dbot.note("  Putting \"" .. itemName .. "@W" .. DRL_ANSI_WHITE .. "\" onto keyring")
+
+        local resultData2 = dbot.callback.new()
+        retval = dbot.execute.safe.command(command, inv.items.putKeyringSetupFn, nil,
+                                           inv.items.putKeyringResultFn, resultData2)
+        if (retval ~= DRL_RET_SUCCESS) then
+          dbot.note("Key \"" .. itemName .. "\" was not placed onto keyring: " ..
+                    dbot.retval.getString(retval))
+        else
+          -- Wait until we have confirmation that the callback completed
+          retval = dbot.callback.wait(resultData2, 5)
+          if (retval ~= DRL_RET_SUCCESS) then
+            dbot.note("Key \"" .. itemName .. "\" was not placed onto keyring: " ..
+                      dbot.retval.getString(retval))
+          end -- if
+        end -- if
+      end -- if
+    end -- if
+
+  -- Vault
+  elseif (objLoc == invItemLocVault) then
+    dbot.error("inv.items.identifyItem: Identifying objects in a vault is not yet supported")
+    retval = DRL_RET_UNSUPPORTED
+
+  -- Auction (we may temporarily add an auction item to examine it)
+  elseif (objLoc == invItemLocAuction) then
+    command = idCommand .. " " .. objId
+    if (commandArray ~= nil) then
+      table.insert(commandArray, command)
+    else
+      retval = dbot.execute.safe.command(command, inv.items.identifyItemSetupFn, nil,
+                                         dbot.callback.default, resultData)
+      if (retval == DRL_RET_SUCCESS) then
+        retval = dbot.callback.wait(resultData, 10)
+        if (retval ~= DRL_RET_SUCCESS) then
+          dbot.note("Auction identify request did not complete: " .. dbot.retval.getString(retval))
+        end -- if
+      end -- if
+    end -- if
+
+  -- Shopkeeper (we may temporarily add an item from a shop to examine it)
+  elseif (objLoc == invItemLocShopkeeper) then
+    if (commandArray ~= nil) then
+      table.insert(commandArray, idCommand)
+    else
+      retval = dbot.execute.safe.command(idCommand, inv.items.identifyItemSetupFn, nil,
+                                         dbot.callback.default, resultData)
+      if (retval == DRL_RET_SUCCESS) then
+        retval = dbot.callback.wait(resultData, 10)
+        if (retval ~= DRL_RET_SUCCESS) then
+          dbot.note("Shop identify request did not complete: " .. dbot.retval.getString(retval))
+        end -- if
+      end -- if
+    end -- if
+
+  -- Container
+  elseif (type(objLoc) == "number") then
+
+    -- Any objLoc that is a number is a container and the objLoc is the container's ID.
+    retval = inv.items.getItem(objId, commandArray)
+    if (retval == DRL_RET_SUCCESS) then
+      if (inv.items.identifyPkg ~= nil) then
+        command = idCommand .. " " .. objId
+        if (commandArray ~= nil) then
+          table.insert(commandArray, command)
+        else
+          retval = dbot.execute.safe.command(command, inv.items.identifyItemSetupFn, nil,
+                                             dbot.callback.default, resultData)
+          if (retval == DRL_RET_SUCCESS) then
+            retval = dbot.callback.wait(resultData, 10)
+            if (retval ~= DRL_RET_SUCCESS) then
+              dbot.note("Container identify request did not complete: " .. dbot.retval.getString(retval))
+            end -- if
+          end -- if
+        end -- if
+      end -- if
+
+      retval = inv.items.putItem(objId, objLoc, commandArray, false)
+    end -- if
+
+  -- Worn
+  else
+    retval = inv.items.getItem(objId, commandArray)
+    if (retval == DRL_RET_SUCCESS) then
+      if (inv.items.identifyPkg ~= nil) then
+        command = idCommand .. " " .. objId
+        if (commandArray ~= nil) then
+          table.insert(commandArray, command)
+        else
+          retval = dbot.execute.safe.command(command, inv.items.identifyItemSetupFn, nil,
+                                             dbot.callback.default, resultData)
+          if (retval == DRL_RET_SUCCESS) then
+            retval = dbot.callback.wait(resultData, 10)
+            if (retval ~= DRL_RET_SUCCESS) then
+              dbot.note("Item identify request did not complete: " .. dbot.retval.getString(retval))
+            end -- if
+          end -- if
+        end -- if
+      end -- if
+      retval = inv.items.wearItem(objId, objLoc, commandArray, false)
+      if (retval ~= DRL_RET_SUCCESS) then
+        dbot.warn("inv.items.identifyItem: Failed to wear item " .. (objId or "nil") .. ": " ..
+                  dbot.retval.getString(retval))
+      end -- if
+    end -- if
+
+  end -- if
+
+  -- Stop the triggers if something went wrong with the identification
+  if (commandArray == nil) then
+    if (retval ~= DRL_RET_SUCCESS) then
+      inv.items.trigger.itemIdEnd()
+    end -- if
+  end -- if
+
+  return retval
+end -- inv.items.identifyItem
+
+
+function inv.items.identifyItemSetupFn()
+  EnableTrigger(inv.items.trigger.itemIdStartName, true)
+end -- inv.items.identifyItemSetupFn
+
+
+function inv.items.identifyAtomicSetup()
+  EnableTrigger(inv.items.trigger.wearName,        true)
+  EnableTrigger(inv.items.trigger.removeName,      true)
+  EnableTrigger(inv.items.trigger.getName,         true)
+  EnableTrigger(inv.items.trigger.putName,         true)
+  EnableTrigger(inv.items.trigger.getKeyringName,  true)
+  EnableTrigger(inv.items.trigger.putKeyringName,  true)
+  EnableTrigger(inv.items.trigger.wearSpecialName, true)
+  EnableTrigger(inv.items.trigger.itemIdStartName, true)
+end -- inv.items.identifyAtomicSetup
+
+
+function inv.items.identifyAtomicCleanup(resultData, retval)
+  EnableTrigger(inv.items.trigger.wearName,        false)
+  EnableTrigger(inv.items.trigger.removeName,      false)
+  EnableTrigger(inv.items.trigger.getName,         false)
+  EnableTrigger(inv.items.trigger.putName,         false)
+  EnableTrigger(inv.items.trigger.getKeyringName,  false)
+  EnableTrigger(inv.items.trigger.putKeyringName,  false)
+  EnableTrigger(inv.items.trigger.wearSpecialName, false)
+
+  inv.items.trigger.itemIdEnd() -- clears itemIdStartName and others...
+
+  dbot.callback.default(resultData, retval)
+end -- inv.items.identifyAtomicCleanup
+
+
+invStateIdle    = "idle"
+invStateRunning = "running"
+invStatePaused  = "paused"
+invStateHalted  = "halted"
+
+inv.items.refreshPkg = nil
+function inv.items.refresh(maxNumItems, refreshLocations, endTag, tagProxy)
+
+  local retval = DRL_RET_SUCCESS
+  local tagModule = invTagsRefresh
+
+  if (tagProxy ~= nil) and (tagProxy ~= "") then
+    tagModule = tagProxy
+  end -- if
+
+  dbot.debug("inv.items.refresh: #items=" .. (maxNumItems or "nil") .. ", locs=\"" ..
+             (refreshLocations or "nil") .. "\", endTag=\"" .. (endTag or "nil") .. "\"")
+
+  if (dbot.gmcp.isInitialized == false) then
+    dbot.info("Skipping refresh request: GMCP is not yet initialized")
+    return inv.tags.stop(tagModule, endTag, DRL_RET_UNINITIALIZED)
+  end -- if
+
+  local charState = dbot.gmcp.getState()
+
+  -- We want a user to run the build operation at least once before we allow
+  -- the normal refresh to occur.  We don't necessarily even need to complete
+  -- the build.  The main concern is that we don't want an auto-refresh to
+  -- clog up the system for several minutes without warning the first time the
+  -- user enables this plugin.
+  if (inv.config.table.buildExecuted == false) then
+    dbot.print(
+[[@W
+  You must perform at least one manual inventory build before we allow inventory refresh
+  requests to proceed.  Otherwise, a user's first automatic refresh could clog up the system
+  for several minutes as the entire inventory is scanned.  We don't want the user to be 
+  surprised by that behavior.
+]]) 
+    dbot.print("@W  Please see \"@G" .. pluginNameCmd .. " help build@W\" for more details.")
+    dbot.print("@W\nUsage:")
+    inv.cli.build.usage()
+    dbot.print("")
+    retval = DRL_RET_UNINITIALIZED
+
+  -- If refreshes are enabled (period > 0) but are paused (state == invStatePaused) we skip
+  -- the refresh now but we still schedule the next one
+  elseif (inv.state == invStatePaused) then
+    dbot.debug("Skipping refresh request: automatic refreshes are paused")
+    retval = DRL_RET_BUSY
+
+  -- If another refresh is in progress, try again later
+  elseif (inv.state == invStateRunning) then
+    dbot.note("Skipping refresh request: another refresh is in progress")
+    retval = DRL_RET_BUSY
+
+  elseif (inv.state == invStateHalted) then
+    dbot.info("Skipping refresh request: plugin is halted")
+    retval = DRL_RET_UNINITIALIZED
+
+  -- If we aren't in the "active" character state (sleeping, running, AFK, writing a note, etc.)
+  -- then we wait a bit and try again
+  elseif (charState ~= dbot.stateActive) then
+    dbot.note("Skipping refresh request: char is in state \"" .. dbot.gmcp.getStateString(charState) .. "\"")
+    retval = DRL_RET_NOT_ACTIVE    
+
+  -- If the char is in the active state (e.g., not AFK, in a note, in combat, etc.) refresh now
+  -- and schedule the next refresh after the default period
+  else
+    inv.state = invStateRunning
+    inv.items.refreshPkg                  = {}
+    inv.items.refreshPkg.maxNumItems      = maxNumItems
+    inv.items.refreshPkg.refreshLocations = refreshLocations
+    inv.items.refreshPkg.endTag           = endTag
+    inv.items.refreshPkg.tagModule        = tagModule
+
+    wait.make(inv.items.refreshCR)
+    retval = DRL_RET_SUCCESS
+  end -- if
+
+  -- Schedule the next refresh if automatic refreshes are enabled (i.e., the period is > 0 minutes)
+  local refreshMin = inv.items.refreshGetPeriod() or 0
+  if (refreshMin > 0) and (inv.state ~= nil) then
+    dbot.note("Scheduling automatic inventory refresh in " .. refreshMin .. " minutes")
+    inv.items.refreshAtTime(refreshMin, 0)
+  end -- if
+
+  -- If everything went as planned, we have a co-routine doing a refresh and that co-routine will 
+  -- terminate any end tags that were specified.  Otherwise, we hit an error and we should terminate
+  -- the tag now and return what we know to the caller.
+  if (retval == DRL_RET_SUCCESS) then
+    return retval
+  else
+    return inv.tags.stop(tagModule, endTag, retval)
+  end -- if
+end -- inv.items.refresh
+
+
+function inv.items.refreshCR()
+  local retval
+
+  dbot.info("Refreshing inventory: START")
+
+  -- Disable the prompt to avoid confusing output during the refresh
+  dbot.prompt.hide()
+
+  -- On each refresh request we track all items discovered and match that against the contents
+  -- of the inventory table.  If something is in the inventory table and we didn't find it 
+  -- during refresh, remove it from the inventory table because the table is out of sync.
+  inv.items.currentItems = {}
+
+  -- Discover and identify new inventory items.  Both co-routines are blocking.
+  retval = inv.items.discoverCR(inv.items.refreshPkg.maxNumItems, inv.items.refreshPkg.refreshLocations)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.debug("Skipping item discovery: " .. dbot.retval.getString(retval))
+  else -- discovery passed :)
+    -- Identify everything we just discovered
+    retval = inv.items.identifyCR(inv.items.refreshPkg.maxNumItems, inv.items.refreshPkg.refreshLocations)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.debug("Skipping item identification: " .. dbot.retval.getString(retval))
+    end -- if
+  end -- if
+
+  -- Remove any items that are in the inventory table that were not discovered during this
+  -- refresh.  It's possible that things are out of sync (e.g., the table wasn't saved after
+  -- a change to the inventory).  Of course, if the user halted the current search then we
+  -- may not have found items that actually are present so we only remove orphans if we
+  -- fully completed the discovery and identification steps above.  Also, if we are only 
+  -- scanning some locations, then we don't want to remove orphans because the items could
+  -- be at a location we didn't scan this time.
+  if (retval == DRL_RET_SUCCESS) and (inv.items.refreshPkg.refreshLocations == invItemsRefreshLocAll) then
+    for k,v in pairs(inv.items.table) do
+      if (inv.items.currentItems[k] == nil) then
+        dbot.note("Removed orphan: \"" .. (inv.items.getField(k, invFieldColorName) or "Unidentified") .. 
+                  DRL_ANSI_WHITE .. "\" (" .. k .. ")")
+        inv.items.table[k] = nil
+      end -- if
+    end -- for
+  end -- if
+
+  inv.items.currentItems = nil
+
+  -- Re-enable the prompt
+  dbot.prompt.show()
+
+  -- Save everything we just discovered and identified
+  inv.items.save()
+  inv.config.save()
+
+  if (retval == DRL_RET_SUCCESS) then
+    resultString = "SUCCESS! (Entire inventory is identified)"
+  elseif (retval == DRL_RET_HALTED) then
+    resultString = "HALTED! (Some items may still need identification)"
+  elseif (retval == DRL_RET_IN_COMBAT) then
+    resultString = "IN COMBAT! (Skipped identification because you were fighting!)"
+  elseif (retval == DRL_RET_TIMEOUT) then
+    resultString = "TIMEOUT! (Skipped identification because you were busy)"
+  elseif (retval == DRL_RET_NOT_ACTIVE) then
+    resultString = "NOT ACTIVE! (You were not ready for item identification)"
+  elseif (retval == DRL_RET_UNINITIALIZED) then
+    resultString = "UNINITIALIZED! (The plugin is not initialized)"
+  else
+    resultString = "ERROR! (" .. dbot.retval.getString(retval) .. ")"
+  end -- if
+
+  dbot.info("Refreshing inventory: " .. resultString)
+
+  inv.state = invStateIdle
+
+  return inv.tags.stop(inv.items.refreshPkg.tagModule, inv.items.refreshPkg.endTag, retval)
+
+end -- inv.items.refreshCR
+
+
+-- Kick the refresh timer to start at a time "min" minutes and "sec" seconds from the time this is called
+function inv.items.refreshAtTime(min, sec)
+  if (min == nil) or (sec == nil) then
+    dbot.warn("inv.items.refreshAtTime: nil time given as parameter")
+    return DRL_RET_INVALID_PARAMETER
+  end -- if
+
+  min = tonumber(min) or 0
+  sec = tonumber(sec) or 0
+
+  if (min == 0) and (sec == 0) then
+    dbot.warn("inv.items.refreshAtTime: invalid time period 0 detected")
+    return DRL_RET_INVALID_PARAMETER
+  end -- if
+
+  -- It's possible (but highly unlikely) that we timed out and disconnected from the mud causing
+  -- us to de-init our modules at the exact instant we schedule the next refresh.  If that happens
+  -- then our state will be nil and we shouldn't continue with the refresh.
+  if (inv.state == nil) then
+    dbot.warn("inv.items.refreshAtTime: inventory module is not initialized")
+    return DRL_RET_UNINITIALIZED
+  end -- if
+
+  -- We can't add the timer directly because we are in the function called by that timer.  Instead,
+  -- we use an intermediate timer to call back and start this timer again.  Yeah, it's a bit ugly...
+  DoAfterSpecial(0.1, -- start up in 100 ms
+                 string.format("AddTimer(%s, 0, %d, %d, \"\", %d, " ..
+                               "\"inv.items.refreshDefault\")",
+                               "inv.items.timer.refreshName", min, sec,
+                               timer_flag.Enabled + timer_flag.Replace + timer_flag.OneShot),
+                 sendto.script)
+
+  return DRL_RET_SUCCESS
+end -- inv.items.refreshAtTime
+
+
+function inv.items.refreshDefault()
+
+  if (inv.state == nil) then
+    dbot.warn("inv.items.refreshDefault: inventory module is not initialized")
+    return DRL_RET_UNINITIALIZED
+  end -- if
+
+  -- By default, refresh only dirty locations and skip item locations that don't contain any
+  -- unidentified items.
+  return inv.items.refresh(0, invItemsRefreshLocDirty, nil, nil)
+end -- inv.items.refreshDefault
+
+
+function inv.items.refreshGetPeriod()
+  return inv.config.table.refreshPeriod
+end -- inv.items.refreshGetPeriod
+
+
+function inv.items.refreshSetPeriod(numMinutes)
+  inv.config.table.refreshPeriod = tonumber(numMinutes) or inv.items.timer.refreshMin
+  return inv.config.save()
+end -- inv.items.refreshSetPeriod
+
+
+function inv.items.refreshOn(numMinutes)
+  numMinutes = tonumber(numMinutes or "") or inv.items.timer.refreshMin
+  if (numMinutes < 1) then
+    dbot.warn("inv.items.refreshOn: Automatic refreshes must have a period of at least one minute")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  inv.items.refreshSetPeriod(numMinutes)
+
+  -- Schedule the next refresh
+  return inv.items.refreshAtTime(numMinutes, 0)
+end -- inv.items.refreshOn
+
+
+function inv.items.refreshOff()
+  inv.state = invStatePaused
+  dbot.deleteTimer(inv.items.timer.refreshName)
+  return inv.items.refreshSetPeriod(0)
+end -- inv.items.refreshOff
+
+
+function inv.items.build(endTag)
+  local retval
+
+  retval = inv.items.reset()
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.items.build: inventory reset failed: " .. dbot.retval.getString(retval))
+    return inv.tags.stop(invTagsBuild, endTag, retval)
+  end -- if
+
+  retval = inv.config.reset()
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.items.build: configuration reset failed: " .. dbot.retval.getString(retval))
+    return inv.tags.stop(invTagsBuild, endTag, retval)
+  end -- if
+
+  retval = inv.cache.reset()
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.items.build: reset of all caches failed: " .. dbot.retval.getString(retval))
+    return inv.tags.stop(invTagsBuild, endTag, retval)
+  end -- if
+
+  inv.config.table.buildExecuted = true
+  inv.state = invStateIdle
+
+  -- The call to refresh is a little unusual in that we pass the build endTag to the refresh
+  -- code.  When the refresh code completes, it will output the endTag it received from build
+  -- instead of the normal refresh endTag.  We do this to avoid the need to spin here and wait
+  -- for refresh to complete before we output the build endTag indicating the build is done.
+  retval = inv.items.refresh(0, invItemsRefreshLocAll, endTag, invTagsBuild)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.items.build: refresh did not complete: " .. dbot.retval.getString(retval))
+  end -- if  
+
+  return retval
+
+end -- inv.items.build()
+
+
+----------------------------------------------------------------------------------------------------
+-- inv.items.get(query, endTag)  -- non-blocking, kicks off blocking inv.items.getCR asynchronously
+-- inv.items.getCR()  -- blocks until commands to move all matching items are queued, executed, and confirmed
+-- inv.items.getItem(itemId) -- blocks until the command to get the item is queued, executed, and confirmed
+--
+-- inv.items.getSetupFn()
+-- inv.items.getResultFn(resultData, retval)
+--
+-- inv.items.getKeyringSetupFn()
+-- inv.items.getKeyringResultFn(resultData, retval)
+--
+-- Move item(s) to main inventory
+--
+-- Suppress get verbage: 
+--   "You remove ..."                 -- remove item
+--   "You stop wielding ..."          -- remove weapon
+--   "You stop using ..."             -- remove portal
+--   "... stops floating around you." -- remove float
+--   "... stops floating above you."  -- remove aura of trivia
+--   "You are not wearing that item." -- remove BADNAME
+--   "You get ... from ..."           -- get item container
+--   "You do not see that in ..."     -- get BADNAME container
+----------------------------------------------------------------------------------------------------
+
+inv.items.getPkg = nil
+function inv.items.get(queryString, endTag)
+  if (queryString == nil) then
+    dbot.warn("inv.items.get: query is nil")
+    return inv.tags.stop(invTagsGet, endTag, DRL_RET_INVALID_PARAM)
+  end -- if
+
+  if (inv.items.getPkg ~= nil) then
+    dbot.info("Skipping get request for query \"" .. queryString .. "\", another get request is in progress")
+    return inv.tags.stop(invTagsGet, endTag, DRL_RET_BUSY)
+  end -- if
+
+  -- We use a background co-routine to perform the "get".  The co-routine can schedule
+  -- itself and block until the get completes.
+  inv.items.getPkg             = {}
+  inv.items.getPkg.queryString = queryString or ""
+  inv.items.getPkg.endTag      = endTag
+
+  wait.make(inv.items.getCR)
+
+  return DRL_RET_SUCCESS
+end -- inv.items.get
+
+
+function inv.items.getCR()
+  local retval = DRL_RET_SUCCESS
+  local idArray
+
+  -- Be paranoid!
+  if (inv.items.getPkg == nil) or (inv.items.getPkg.queryString == nil) then
+    dbot.error("inv.items.getCR: Aborting get request -- get package or query is nil!")
+    inv.items.getPkg = nil
+    return DRL_RET_INTERNAL_ERROR
+  end -- if
+
+  local endTag = inv.items.getPkg.endTag
+
+  -- Get an array of object IDs that match the get request's query string
+  idArray, retval = inv.items.searchCR(inv.items.getPkg.queryString)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.items.getCR: failed to search inventory table: " .. dbot.retval.getString(retval))
+
+  -- Let the user know if no items matched their query
+  elseif (idArray == nil) or (#idArray == 0) then
+    dbot.info("No match found for get query: \"" .. inv.items.getPkg.queryString .. "\"")
+    retval = DRL_RET_MISSING_ENTRY
+
+  -- We found items to move!
+  else
+    local commandArray = dbot.execute.new()
+    local numItemsMoved = 0
+    for _,id in ipairs(idArray) do
+      retval = inv.items.getItem(id, commandArray)
+      if (retval ~= DRL_RET_SUCCESS) then
+        dbot.debug("Skipping request to get item " .. id .. ": " .. dbot.retval.getString(retval))
+        break
+      else
+        numItemsMoved = numItemsMoved + 1
+      end -- if
+
+      if (commandArray ~= nil) and (#commandArray >= inv.items.burstSize) then
+        retval = dbot.execute.safe.blocking(commandArray, nil, nil, dbot.callback.default, 10)
+        if (retval ~= DRL_RET_SUCCESS) then
+          dbot.info("Skipping request to get items: " .. dbot.retval.getString(retval))
+          break
+        end -- if
+        commandArray = dbot.execute.new()
+      end -- if
+
+    end -- for
+
+    -- Flush any commands in the array that still need to be sent to the mud
+    if (retval == DRL_RET_SUCCESS) and (commandArray ~= nil) then
+      retval = dbot.execute.safe.blocking(commandArray, nil, nil, dbot.callback.default, 10)
+      if (retval ~= DRL_RET_SUCCESS) then
+        dbot.info("Skipping request to get items: " .. dbot.retval.getString(retval))
+      end -- if
+    end -- if
+
+    if (retval == DRL_RET_SUCCESS) then
+      dbot.info("Get request matched " .. numItemsMoved .. " items")
+    end -- if
+
+  end -- if
+
+
+  inv.items.getPkg = nil
+
+  return inv.tags.stop(invTagsGet, endTag, retval)
+end -- inv.items.getCR
+
+
+function inv.items.getItem(objId, commandArray)
+  local retval = DRL_RET_SUCCESS
+
+  if (objId == nil) or (type(objId) ~= "number") then
+    dbot.warn("inv.items.getItem: Non-numeric objId parameter detected")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  local itemLoc = inv.items.getField(objId, invFieldObjLoc)
+
+  local itemName = inv.items.getField(objId, invFieldColorName) or "Unidentified"
+  itemName = itemName .. "@W" .. DRL_ANSI_WHITE
+
+  if (commandArray == nil) then
+    dbot.prompt.hide()
+  end -- if
+
+  if (itemLoc == nil) then
+    dbot.error("inv.items.getItem: item location for objId " .. objId .. " is missing")
+    retval = DRL_RET_INTERNAL_ERROR
+  else
+    local itemLocNum = tonumber(itemLoc)
+
+    -- If the location is a number, it is a container's ID
+    if (itemLocNum ~= nil) then
+      local containerName = (inv.items.getField(itemLocNum, invFieldColorName) or "Unidentified") ..
+                            "@W" .. DRL_ANSI_WHITE
+      local containerLoc
+
+      -- It's possible that the container is a worn item.  If that is the case, we must first
+      -- remove the container before we can get something out of it.
+      if (inv.items.isWorn(itemLocNum)) then
+        containerLoc = inv.items.getField(itemLocNum, invFieldObjLoc) or ""
+        retval = inv.items.removeItem(itemLocNum, commandArray)
+        if (retval ~= DRL_RET_SUCCESS) then
+          dbot.warn("inv.items.getItem: Failed to remove container \"" .. containerName .. "\"")
+        end -- if
+      end -- if
+
+      local getCommand = "get " .. objId .. " " .. itemLocNum
+      if (commandArray ~= nil) then
+        table.insert(commandArray, getCommand)
+      else
+        dbot.note("  Getting \"" .. itemName .. "\" from \"" .. containerName .. "\"")
+
+        -- Get the item and wait for confirmation that it moved
+        local resultData = dbot.callback.new()
+        retval = dbot.execute.safe.command(getCommand, inv.items.getSetupFn, nil,
+                                           inv.items.getResultFn, resultData)
+        if (retval ~= DRL_RET_SUCCESS) then
+          dbot.note("Skipping request to get \"" .. itemName .. "\": " .. dbot.retval.getString(retval))
+        else
+          -- Wait until we have confirmation that the callback completed
+          retval = dbot.callback.wait(resultData, 5)
+          if (retval ~= DRL_RET_SUCCESS) then
+            dbot.note("Skipping request to get \"" .. itemName .. "\": " .. dbot.retval.getString(retval))
+          end -- if
+        end -- if
+
+        -- Verify that the item is now in the main inventory.  It may take a moment or two for invmon
+        -- to realize we moved the item.  We spin a bit here to give invmon the chance to update the
+        -- item's location.
+        local totTime = 0
+        local timeout = 1
+        while (invItemLocInventory ~= inv.items.getField(objId, invFieldObjLoc)) do
+          if (totTime > timeout) then
+            if inv.items.isInvis(objId) then
+              dbot.info("Failed to get invisible item \"" .. itemName .. "\" from container \"" ..
+                        containerName .. "\": can you detect invis?")
+            elseif inv.items.isInvis(itemLocNum) then
+              dbot.info("Failed to get \"" .. itemName .. "\" from invisible container \"" ..
+                        containerName .. "\": can you detect invis?")
+            else
+              dbot.warn("inv.items.getItem: Timed out before invmon confirmed item is in target container")
+            end -- if
+            retval = DRL_RET_MISSING_ENTRY
+            break
+          end -- if
+
+          wait.time(drlSpinnerPeriodDefault)
+          totTime = totTime + drlSpinnerPeriodDefault
+        end -- while
+      end -- if
+
+      -- If we pulled the item out of a worn container, we must remember to re-wear the container
+      -- now that we took the item out of it
+      if (containerLoc ~= nil) then 
+        local containerRetval = inv.items.wearItem(itemLocNum, nil, commandArray, false)
+        if (containerRetval ~= DRL_RET_SUCCESS) then
+          dbot.warn("inv.items.getItem: Failed to wear item " .. (objId or "nil") .. ": " ..
+                    dbot.retval.getString(containerRetval))
+
+          -- If we haven't hit another error yet, store the current error code
+          if (retval == DRL_RET_SUCCESS) then
+            retval = containerRetval
+          end -- if
+        end -- if
+      end -- if
+
+    elseif (itemLoc == invItemLocInventory) then
+      dbot.debug("Item \"" .. itemName .. "\" is already in your main inventory")
+
+    elseif (itemLoc == invItemLocKeyring) then
+      local getCommand = "keyring get " .. objId
+      if (commandArray ~= nil) then
+        table.insert(commandArray, getCommand)
+      else
+        dbot.note("  Getting \"" .. itemName .. "\" from keyring")
+
+        local resultData = dbot.callback.new()
+        retval = dbot.execute.safe.command(getCommand, inv.items.getKeyringSetupFn, nil,
+                                           inv.items.getKeyringResultFn, resultData)
+        if (retval ~= DRL_RET_SUCCESS) then
+          dbot.warn("inv.items.getItem: Failed to get keyring item: " .. dbot.retval.getString(retval))
+        else
+          -- Wait until we have confirmation that the callback completed
+          retval = dbot.callback.wait(resultData, 5)
+          if (retval ~= DRL_RET_SUCCESS) then
+            dbot.note("Skipping request to get key \"" .. itemName .. "\" from keyring: " ..
+                      dbot.retval.getString(retval))
+          end -- if
+        end -- if
+      end -- if
+
+    elseif (itemLoc == invItemLocUninitialized) or
+           (itemLoc == invItemLocWorn)          or
+           (itemLoc == invItemLocVault)         then
+      dbot.error("inv.items.getItem: We do not yet support uninitialized items or getting items from a vault")
+      retval = DRL_RET_UNSUPPORTED
+
+    -- The location is a string representing a wearable location
+    else
+      dbot.debug("Removing item \"" .. itemName .. "\" worn at location " .. itemLoc)
+
+      -- Remove the item and wait for confirmation that it moved
+      retval = inv.items.removeItem(objId, commandArray)
+      if (retval ~= DRL_RET_SUCCESS) then
+        dbot.debug("Skipping removal of \"" .. itemName .. "\" worn at location " .. 
+                   itemLoc .. ": " .. dbot.retval.getString(retval))
+      end -- if
+    end -- if
+
+  end -- if
+
+  if (commandArray == nil) then
+    dbot.prompt.show()
+  end -- if
+
+  return retval
+end -- inv.items.getItem
+
+
+function inv.items.getSetupFn()
+  EnableTrigger(inv.items.trigger.getName, true)
+end -- inv.items.getSetupFn
+
+
+function inv.items.getResultFn(resultData, retval)
+  EnableTrigger(inv.items.trigger.getName, false)
+  dbot.callback.default(resultData, retval)
+end -- inv.items.getResultFn
+
+
+function inv.items.getKeyringSetupFn()
+  EnableTrigger(inv.items.trigger.getKeyringName, true)
+end -- inv.items.getKeyringSetupFn
+
+
+function inv.items.getKeyringResultFn(resultData, retval)
+  EnableTrigger(inv.items.trigger.getKeyringName, false)
+  dbot.callback.default(resultData, retval)
+end -- inv.items.getKeyringResultFn
+
+
+----------------------------------------------------------------------------------------------------
+-- inv.items.put(container, query, endTag) -- non-blocking, kicks off blocking inv.items.putCR asynchronously
+-- inv.items.putCR()                       -- blocks until all items are confirmed to be moved
+-- inv.items.putItem(objId, containerId, commandArray, doCheckLocation) -- blocks until the put is done
+--
+-- inv.items.putSetupFn()
+-- inv.items.putResultFn(resultData)
+--
+-- inv.items.putKeyringSetupFn()
+-- inv.items.putKeyringResultFn(resultData)
+
+-- Move item(s) to container
+--
+-- Suppress put verbage:
+--   "You don't have that."           -- put BADNAME container
+--   "You do not see a[n] ... here."  -- put item BADNAME
+--   "You put ... into ..."           -- put item bag
+----------------------------------------------------------------------------------------------------
+
+inv.items.putPkg = nil
+function inv.items.put(container, queryString, endTag)
+
+  if (container == nil) or (container == "") then
+    dbot.warn("inv.items.put: missing container parameter")
+    return inv.tags.stop(invTagsPut, endTag, DRL_RET_INVALID_PARAM)
+  end -- if
+
+  if (queryString == nil) then
+    dbot.warn("inv.items.put: query is nil")
+    return inv.tags.stop(invTagsPut, endTag, DRL_RET_INVALID_PARAM)
+  end -- if
+
+  if (inv.items.putPkg ~= nil) then
+    dbot.info("Skipping put request for query \"" .. queryString .. "\", another put request is in progress")
+    return inv.tags.stop(invTagsPut, endTag, DRL_RET_BUSY)
+  end -- if
+
+  -- We use a background co-routine to perform the "put".  The co-routine can schedule
+  -- itself and block until the put completes.
+  inv.items.putPkg             = {}
+  inv.items.putPkg.container   = container
+  inv.items.putPkg.queryString = queryString or ""
+  inv.items.putPkg.endTag      = endTag
+
+  wait.make(inv.items.putCR)
+
+  return DRL_RET_SUCCESS
+end -- inv.items.put
+
+
+function inv.items.putCR()
+  local retval = DRL_RET_SUCCESS
+  local idArray
+  local containerId
+
+  -- Be paranoid!
+  if (inv.items.putPkg == nil) or (inv.items.putPkg.container == nil) or 
+     (inv.items.putPkg.queryString == nil) then
+    dbot.error("inv.items.putCR: Aborting put request -- put package, container or query is nil!")
+    inv.items.putPkg = nil
+    return DRL_RET_INTERNAL_ERROR
+  end -- if
+
+  local endTag = inv.items.putPkg.endTag
+
+  -- Determine the object ID for the target container.  If the container parameter is a number
+  -- then we treat it as the container's object ID.  Otherwise, we treat it as a relative name
+  -- (e.g., "3.bag") and find the container's object ID based on the relative name.
+  containerId = tonumber(inv.items.putPkg.container)
+  if (containerId == nil) then
+    _, containerId, retval = inv.items.convertRelative(invQueryKeyRelativeName, inv.items.putPkg.container)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.items.putCR: Failed to convert relative name \"" .. inv.items.putPkg.container ..
+                "\" to object ID: " .. dbot.retval.getString(retval))
+      inv.items.putPkg = nil
+      return inv.tags.stop(invTagsPut, endTag, retval)
+    end -- if
+
+    containerId = tonumber(containerId)
+    if (containerId == nil) then
+      dbot.warn("inv.items.putCR: Container \"" .. inv.items.putPkg.container .. 
+                "\" resolved to a non-numeric object ID -- aborting put request")
+      inv.items.putPkg = nil
+      return inv.tags.stop(invTagsPut, endTag, DRL_RET_INTERNAL_ERROR)
+    end -- if
+  end -- if
+
+  local containerName = (inv.items.getField(containerId, invFieldColorName) or "Unidentified") ..
+                        "@W" .. DRL_ANSI_WHITE
+
+  -- Get an array of object IDs that match the put request's query string
+  idArray, retval = inv.items.searchCR(inv.items.putPkg.queryString)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.items.putCR: failed to search inventory table: " .. dbot.retval.getString(retval))
+
+  -- Let the user know if no items matched their query
+  elseif (idArray == nil) or (#idArray == 0) then
+    dbot.info("No match found for put query: \"" .. inv.items.putPkg.queryString .. "\"")
+    retval = DRL_RET_MISSING_ENTRY
+
+  -- We found items to move!
+  else
+    local commandArray = dbot.execute.new()
+    local numItemsMoved = 0
+
+    for _,objId in ipairs(idArray) do
+      retval = inv.items.putItem(objId, containerId, commandArray, true)
+      if (retval ~= DRL_RET_SUCCESS) then
+        dbot.debug("Skipping request to put item " .. objId .. " in container \"" .. 
+                   containerName .. "\" (" .. containerId .. "): " .. dbot.retval.getString(retval))
+        break
+      else
+        numItemsMoved = numItemsMoved + 1
+      end -- if
+
+      if (commandArray ~= nil) then
+        if (#commandArray >= inv.items.burstSize) then
+          retval = dbot.execute.safe.blocking(commandArray, nil, nil, dbot.callback.default, 10)
+          if (retval ~= DRL_RET_SUCCESS) then
+            dbot.info("Skipping request to put items: " .. dbot.retval.getString(retval))
+            break
+          end -- if
+          commandArray = dbot.execute.new()
+        end -- if
+      end -- if
+    end -- for
+
+    -- Flush any commands in the array that still need to be sent to the mud
+    if (retval == DRL_RET_SUCCESS) and (commandArray ~= nil) then
+      retval = dbot.execute.safe.blocking(commandArray, nil, nil, dbot.callback.default, 10)
+      if (retval ~= DRL_RET_SUCCESS) then
+        dbot.info("Skipping request to get items: " .. dbot.retval.getString(retval))
+      end -- if
+    end -- if
+
+    if (retval == DRL_RET_SUCCESS) then
+      dbot.info("Put request matched " .. numItemsMoved .. " items")
+    end -- if
+
+  end -- if
+
+  inv.items.putPkg = nil
+
+  return inv.tags.stop(invTagsPut, endTag, retval)
+end -- inv.items.putCR
+
+
+function inv.items.putItem(objId, containerId, commandArray, doCheckLocation)
+  local retval = DRL_RET_SUCCESS
+
+  -- Parameter paranoia isn't necessarily a bad thing...
+  if (objId == nil) or (type(objId) ~= "number") then
+    dbot.warn("inv.items.putItem: Non-numeric objId parameter detected")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  if (containerId == nil) or (type(containerId) ~= "number") then
+    dbot.warn("inv.items.putItem: Non-numeric containerId parameter detected")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  -- Get the name of the target items.  This is convenient for debug, warning, and error messages.
+  local itemName = (inv.items.getField(objId, invFieldColorName) or "Unidentified") ..
+                   "@W" .. DRL_ANSI_WHITE
+
+  -- The target container may not be in our inventory (it might be on the floor or might
+  -- be furniture in a room).  
+  local containerName = (inv.items.getField(containerId, invFieldColorName) or "Room container") ..
+                        "@W" .. DRL_ANSI_WHITE
+  local isRoomContainer = false
+  if (inv.items.getEntry(containerId) == nil) then
+    isRoomContainer = true
+  end -- if
+  local containerLoc
+
+  -- If the item is not already in our main inventory, get it and put it in the main inventory
+  local itemLoc = inv.items.getField(objId, invFieldObjLoc)
+  if (itemLoc == nil) then
+    dbot.error("inv.items.putItem: item location for objId " .. objId .. " is missing")
+    return DRL_RET_INTERNAL_ERROR
+
+  elseif (itemLoc == containerId) then
+    if (commandArray == nil) or doCheckLocation then
+      dbot.note("Item \"" .. itemName .. "\" is already in container \"" .. containerName .. "\"")
+      return DRL_RET_SUCCESS
+    else
+      if (inv.items.isWorn(containerId)) then
+        containerLoc = inv.items.getField(containerId, invFieldObjLoc) or ""
+        table.insert(commandArray, "remove " .. containerId)
+      end -- if
+
+      table.insert(commandArray, "get " .. objId .. " " .. containerId)
+    end -- if
+
+  elseif (itemLoc ~= invItemLocInventory) then
+    -- It's possible that the container is a worn item.  If that is the case, we must first
+    -- remove the container before we can put something into it.
+    if (inv.items.isWorn(containerId)) then
+      containerLoc = inv.items.getField(containerId, invFieldObjLoc) or ""
+      retval = inv.items.removeItem(containerId, commandArray)
+      if (retval ~= DRL_RET_SUCCESS) then
+        dbot.note("Skipping request to remove worn container \"" .. containerName ..
+                  "\": " .. dbot.retval.getString(retval))
+      end -- if
+    end -- if
+
+    retval = inv.items.getItem(objId, commandArray)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.note("Skipping request to move item " .. objId .. " to main inventory: " .. 
+                dbot.retval.getString(retval))
+      return retval
+    end -- if
+  end -- if
+
+  local putCommand = "put " .. objId .. " " .. containerId
+  if (commandArray ~= nil) then
+    table.insert(commandArray, putCommand)
+  else
+    -- We have the item and we know the containerId that should hold the item.  Move it and wait
+    -- for confirmation that the move completed.
+    dbot.note("  Putting \"" .. itemName .. "\" into \"" .. containerName .. "\"")
+    dbot.prompt.hide()
+
+    local resultData = dbot.callback.new()
+    retval = dbot.execute.safe.command(putCommand, inv.items.putSetupFn, nil,
+                                       inv.items.putResultFn, resultData)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.note("Skipping request to put \"" .. itemName .. "\": " .. dbot.retval.getString(retval))
+    else
+      -- Wait until we have confirmation that the callback completed
+      retval = dbot.callback.wait(resultData, 5)
+      if (retval ~= DRL_RET_SUCCESS) then
+        dbot.note("Skipping request to put \"" .. itemName .. "\": " .. dbot.retval.getString(retval))
+      end -- if
+    end -- if
+
+    -- Confirm that the item is now in the target container (unless we aren't holding the container)
+    if (retval == DRL_RET_SUCCESS) and (isRoomContainer == false) then
+      local totTime = 0
+      local timeout = 1
+      while (containerId ~= inv.items.getField(objId, invFieldObjLoc)) do
+        if (totTime > timeout) then
+          if inv.items.isInvis(objId) then
+            dbot.info("Failed to put invisible item \"" .. itemName .. "\" into container \"" ..
+                      containerName .. "\": can you detect invis?")
+          elseif inv.items.isInvis(containerId) then
+            dbot.info("Failed to put \"" .. itemName .. "\" into invisible container \"" ..
+                      containerName .. "\": can you detect invis?")
+          else
+            dbot.warn("inv.items.putItem: Timed out before invmon confirmed item is in target container")
+          end -- if
+          retval = DRL_RET_TIMEOUT
+          break
+        end -- if
+
+        wait.time(drlSpinnerPeriodDefault)
+        totTime = totTime + drlSpinnerPeriodDefault
+      end -- while
+    end -- if
+
+    dbot.prompt.show()
+  end -- if
+
+  -- If we put the item into a worn container, we must remember to re-wear the container
+  if (containerLoc ~= nil) then
+    retval = inv.items.wearItem(containerId, nil, commandArray, doCheckLocation)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.items.putItem: Failed to wear container " .. (containerId or "nil") .. ": " ..
+                dbot.retval.getString(retval))
+    end -- if
+  end -- if
+
+  return retval
+end -- inv.items.putItem
+
+
+function inv.items.putSetupFn()
+  EnableTrigger(inv.items.trigger.putName, true)
+end -- inv.items.putSetupFn
+
+
+function inv.items.putResultFn(resultData, retval)
+  EnableTrigger(inv.items.trigger.putName, false)
+  dbot.callback.default(resultData, retval)
+end -- inv.items.putResultFn
+
+
+function inv.items.putKeyringSetupFn()
+  EnableTrigger(inv.items.trigger.putKeyringName, true)
+end -- inv.items.putKeyringSetupFn
+
+
+function inv.items.putKeyringResultFn(resultData, retval)
+  EnableTrigger(inv.items.trigger.putKeyringName, false)
+  dbot.callback.default(resultData, retval)
+end -- inv.items.putKeyringResultFn
+
+
+----------------------------------------------------------------------------------------------------
+-- inv.items.store(query, endTag) -- non-blocking, kicks off blocking inv.items.putCR asynchronously
+-- inv.items.storeCR()            -- blocks until all items are confirmed to be moved
+-- inv.items.storeItem(itemId)    -- blocks until the store commands are executed and confirmed
+--
+-- Move each item that matches the query string into the item's "home" container.  An item's
+-- home container is the most recent container to hold the item.  Tracking this lets us wear
+-- an item (maybe as part of a set) and then "store" the item back where we got it automagically.
+-- You can change an item's home container simply by moving it to a different container.  Easy!
+----------------------------------------------------------------------------------------------------
+
+inv.items.storePkg = nil
+function inv.items.store(queryString, endTag)
+
+  if (queryString == nil) then
+    dbot.warn("inv.items.store: query is nil")
+    inv.tags.stop(invTagsStore, endTag, DRL_RET_INVALID_PARAM)
+  end -- if
+
+  if (inv.items.storePkg ~= nil) then
+    dbot.info("Skipping store request for query \"" .. queryString .. 
+              "\", another store request is in progress")
+    inv.tags.stop(invTagsStore, endTag, DRL_RET_BUSY)
+  end -- if
+
+  -- We use a background co-routine to perform the "store".  The co-routine can schedule
+  -- itself and block until the store completes.
+  inv.items.storePkg             = {}
+  inv.items.storePkg.queryString = queryString or ""
+  inv.items.storePkg.endTag      = endTag
+
+  wait.make(inv.items.storeCR)
+
+  return DRL_RET_SUCCESS
+end -- inv.items.store(queryString)
+
+
+function inv.items.storeCR()
+  local retval = DRL_RET_SUCCESS
+  local idArray
+
+  -- Be paranoid!
+  if (inv.items.storePkg == nil) or (inv.items.storePkg.queryString == nil) then
+    dbot.error("inv.items.storeCR: Aborting store request -- store package or query is nil!")
+    inv.items.storePkg = nil
+    return DRL_RET_INTERNAL_ERROR
+  end -- if
+
+  local endTag = inv.items.storePkg.endTag
+
+  -- Get an array of object IDs that match the store request's query string
+  idArray, retval = inv.items.searchCR(inv.items.storePkg.queryString)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.items.storeCR: failed to search inventory table: " .. dbot.retval.getString(retval))
+
+  -- Let the user know if no items matched their query
+  elseif (idArray == nil) or (#idArray == 0) then
+    dbot.info("No match found for store query: \"" .. inv.items.storePkg.queryString .. "\"")
+    retval = DRL_RET_MISSING_ENTRY
+
+  -- We found items to store!
+  else
+    local commandArray = dbot.execute.new()
+    local numItemsMoved = 0
+
+    for _,objId in ipairs(idArray) do
+      retval = inv.items.storeItem(objId, commandArray)
+      if (retval ~= DRL_RET_SUCCESS) then
+        dbot.note("Skipping request to store item " .. objId .. ": " .. dbot.retval.getString(retval))
+      else
+        numItemsMoved = numItemsMoved + 1
+      end -- if
+
+      if (commandArray ~= nil) then
+        if (#commandArray >= inv.items.burstSize) then
+          retval = dbot.execute.safe.blocking(commandArray, nil, nil, dbot.callback.default, 10)
+          if (retval ~= DRL_RET_SUCCESS) then
+            dbot.info("Skipping request to store items: " .. dbot.retval.getString(retval))
+            break
+          end -- if
+          commandArray = dbot.execute.new()
+        end -- if
+      end -- if
+    end -- for
+
+    -- Flush any commands in the array that still need to be sent to the mud
+    if (retval == DRL_RET_SUCCESS) and (commandArray ~= nil) then
+      retval = dbot.execute.safe.blocking(commandArray, nil, nil, dbot.callback.default, 10)
+      if (retval ~= DRL_RET_SUCCESS) then
+        dbot.info("Skipping request to store items: " .. dbot.retval.getString(retval))
+      end -- if
+    end -- if
+
+    if (retval == DRL_RET_SUCCESS) then
+      dbot.info("Store request matched " .. numItemsMoved .. " items")
+    end -- if
+
+  end -- if
+
+  inv.items.storePkg = nil
+
+  inv.tags.stop(invTagsStore, endTag, retval)
+end -- inv.items.storeCR
+
+
+function inv.items.storeItem(objId, commandArray)
+  local retval
+  local homeLoc = tonumber(inv.items.getField(objId, invFieldHomeContainer) or "none")
+
+  -- If this item doesn't have a home container, put it in the main inventory instead
+  if (homeLoc == nil) then
+    retval = inv.items.getItem(objId, commandArray)
+  else
+    retval = inv.items.putItem(objId, homeLoc, commandArray, true)
+  end -- if
+
+  return retval
+end -- inv.items.storeItem
+
+
+----------------------------------------------------------------------------------------------------
+-- Routines to handle wearing items
+--
+-- inv.items.wearItem(objId, objLoc, commandArray, doCheckLocation) -- must be called from a co-routine
+-- inv.items.wearSetupFn()   
+-- inv.items.wearResultFn()
+--
+-- Verbage:
+--  "You do not have that item."     -- wear BADNAME
+--  "You wear ..."                   -- wear item
+--  "You wield ..."                  -- weapon
+--  "You hold ..."                   -- held item
+--  "You light ..."                  -- wear light
+--  "You equip ..."                  -- wear portal or sleeping bag
+--  "... begins floating around you" -- wear float
+--  "... begins floating above you"  -- wear aura of trivia
+----------------------------------------------------------------------------------------------------
+
+
+-- There could be cases where we know for a fact that the plugin doesn't have the correct location
+-- info (e.g., we do an atomic get/id/put) available and this give us a way to avoid unnecessary checks.
+function inv.items.wearItem(objId, targetLoc, commandArray, doCheckLocation)
+  local retval = DRL_RET_SUCCESS
+
+  objId = tonumber(objId or "")
+  if (objId == nil) then
+    dbot.warn("inv.items.wearItem: Missing valid object ID parameter")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  targetLoc = targetLoc or "" -- this is an optional parameter
+
+  local itemName = (inv.items.getField(objId, invFieldColorName) or "Unidentified") .. DRL_ANSI_WHITE .. "@W"
+
+  -- If we are already wearing the item, don't do anything -- we're good.
+  if (commandArray == nil) or doCheckLocation then
+    if inv.items.isWorn(objId) then
+      dbot.note("Item \"" .. itemName .. "\" is already worn")
+      return DRL_RET_SUCCESS
+    end -- if
+
+    -- Start with the item in your main inventory
+    retval = inv.items.getItem(objId, commandArray)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.items.wearItem: Failed to get item \"" .. itemName .. "\": " .. 
+                dbot.retval.getString(retval))
+      return retval
+    end -- if
+  end -- if
+
+  local wearCommand = "wear " .. objId .. " " .. targetLoc
+
+  if (commandArray ~= nil) then
+    table.insert(commandArray, wearCommand)
+    return retval
+  end -- if
+
+  -- Be paranoid and ensure the object is in the main inventory
+  local objLoc = inv.items.getField(objId, invFieldObjLoc) or ""
+  if (objLoc ~= invItemLocInventory) then
+    dbot.warn("inv.items.wearItem: Item \"" .. itemName .. "\" is not in main inventory as expected")
+    return DRL_RET_INTERNAL_ERROR
+  end -- if
+
+  dbot.note("  Wearing \"" .. itemName .. "\"")
+
+  -- Execute the "wear" command
+  local resultData = dbot.callback.new()
+  retval = dbot.execute.safe.command(wearCommand, inv.items.wearSetupFn, nil,
+                                     inv.items.wearResultFn, resultData)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.note("Skipping request to wear \"" .. itemName .. "\": " .. dbot.retval.getString(retval))
+  else
+    -- Wait until we have confirmation that the callback completed
+    retval = dbot.callback.wait(resultData, 5)
+    if (retval ~= DRL_RET_SUCCESS) then
+    dbot.note("Skipping request to wear \"" .. itemName .. "\": " .. dbot.retval.getString(retval))
+      return retval
+    end -- if
+
+    -- Wait until we have confirmation the invmon trigger knows we are wearing the item
+    local totTime = 0
+    local timeout = 2
+    while (inv.items.isWorn(objId) == false) do
+      if (totTime > timeout) then
+        if inv.items.isInvis(objId) then
+          dbot.info("Failed to wear invisible item \"" .. itemName .. "\": can you detect invis?")
+        else
+          dbot.warn("inv.items.wearItem: Timed out waiting for invmon to confirm we are wearing \"" .. 
+                    itemName .. "\"")
+        end -- if
+        retval = DRL_RET_MISSING_ENTRY
+        break
+      end -- if
+
+      wait.time(drlSpinnerPeriodDefault)
+      totTime = totTime + drlSpinnerPeriodDefault
+    end -- if
+  end -- if
+
+  return retval
+end -- inv.items.wearItem
+
+
+function inv.items.wearSetupFn()
+  EnableTrigger(inv.items.trigger.wearName, true)
+end -- inv.items.wearSetupFn
+
+
+function inv.items.wearResultFn(resultData, retval)
+  EnableTrigger(inv.items.trigger.wearName, false)
+  dbot.callback.default(resultData, retval)
+end -- inv.items.wearResultFn
+
+
+function inv.items.isWorn(objId)
+  local objLoc = inv.items.getField(objId, invFieldObjLoc) or ""
+
+  for _, entry in pairs(inv.wearLoc) do
+    if (objLoc == entry) then
+      dbot.debug("inv.items.isWorn: item " .. objId .. " is worn at location \"" .. entry .. "\"")
+      return true
+    end -- if
+  end -- for
+
+  return false
+end -- inv.items.isWorn
+
+
+-- This checks if the parameter is a valid wearable location (e.g, "head" or "neck2").  This is
+-- slightly different from the inv.items.isWearableType() function which checks for general types
+-- such as "neck" or "finger" instead of specific locations like "neck2" or "lfinger" like we do here.
+function inv.items.isWearableLoc(wearableLoc)
+  for _, loc in pairs(inv.wearLoc) do
+    if (wearableLoc == loc) then
+      return true
+    end -- if
+  end -- for
+
+  return false
+end -- inv.items.isValidLoc
+
+
+-- Determines if the input parameter is a general wearable location type like "neck" or "finger".
+-- This is slightly different from inv.items.isWearableLoc() which checks for specific wearable
+-- locations such as "neck2" or "rfinger".
+function inv.items.isWearableType(wearableType)
+  if (wearableType == nil) or (wearableType == "") or (inv.wearables[wearableType] == nil) then
+    return false
+  else
+    return true
+  end -- if
+end -- inv.items.isWearableType
+
+
+-- This function converts a wearable type (e.g., "neck") into a string holding the specific
+-- wearable locations that match the type (e.g., "neck1 neck2").
+function inv.items.wearableTypeToLocs(wearableType)
+  if (wearableType == nil) or (wearableType == "") or (inv.wearables[wearableType] == nil) then
+    return ""
+  end -- if
+
+  local wearableArray = inv.wearables[wearableType]
+  local wearableLocs = ""
+
+  for i, wearableLoc in ipairs(wearableArray) do
+    if (i == 1) then
+      wearableLocs = wearableLoc
+    else
+      wearableLocs = wearableLocs .. " " .. wearableLoc
+    end -- if
+  end -- for
+
+  return wearableLocs
+end -- inv.items.wearableTypeToLocs
+
+
+----------------------------------------------------------------------------------------------------
+-- Routines to handle removing items
+--
+-- inv.items.removeItem(objId, commandArray) -- must be called from a co-routine
+-- inv.items.removeSetupFn()   
+-- inv.items.removeResultFn()
+--
+-- Verbage:
+--  "You are not wearing that item."  -- remove BADNAME
+--  "You remove .*"                   -- wear item
+--  "You stop wielding .*"            -- weapon
+--  ".* stops floating around you.*"  -- float
+--  ".* stops floating above you.*"   -- above
+--  "You stop using.* as a portal.*"  -- portal
+--
+----------------------------------------------------------------------------------------------------
+
+function inv.items.removeItem(objId, commandArray)
+  local retval = DRL_RET_SUCCESS
+
+  objId = tonumber(objId or "")
+  if (objId == nil) then
+    dbot.warn("inv.items.removeItem: Missing valid object ID parameter")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  local itemName = (inv.items.getField(objId, invFieldColorName) or "Unidentified") .. DRL_ANSI_WHITE .. "@W"
+
+  -- If we are not wearing the item, don't do anything -- we're good.
+  if (inv.items.isWorn(objId) == false) then
+    --dbot.debug("Item \"" .. itemName .. "\" is not worn")
+    return DRL_RET_SUCCESS
+  end -- if
+
+  local removeCommand = "remove " .. objId
+  if (commandArray ~= nil) then
+    table.insert(commandArray, removeCommand)
+  else
+    dbot.note("  Removing \"" .. itemName .. "\"")
+
+    -- Execute the "remove" command
+    local resultData = dbot.callback.new()
+    retval = dbot.execute.safe.command(removeCommand, inv.items.removeSetupFn, nil,
+                                       inv.items.removeResultFn, resultData)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.note("Skipping remove request: " .. dbot.retval.getString(retval))
+    else
+      -- Wait until we have confirmation that the callback completed
+      retval = dbot.callback.wait(resultData, 5)
+      if (retval ~= DRL_RET_SUCCESS) then
+        dbot.note("Skipping remove request: " .. dbot.retval.getString(retval))
+        return retval
+      end -- if
+
+      -- Wait until we have confirmation the invmon trigger knows we removed the item
+      local totTime = 0
+      local timeout = 2
+      while inv.items.isWorn(objId) do
+        if (totTime > timeout) then
+          if inv.items.isInvis(objId) then
+            dbot.info("Failed to remove invisible item \"" .. itemName .. "\": can you detect invis?")
+          else
+            dbot.warn("inv.items.removeItem: Timed out waiting for invmon to confirm we removed \"" .. 
+                      itemName .. "\"")
+          end -- if
+          retval = DRL_RET_MISSING_ENTRY
+          break
+        end -- if
+
+        wait.time(drlSpinnerPeriodDefault)
+        totTime = totTime + drlSpinnerPeriodDefault
+      end -- while
+    end -- if
+  end -- if
+
+  return retval
+end -- inv.items.removeItem
+
+
+function inv.items.removeSetupFn()
+  EnableTrigger(inv.items.trigger.removeName, true)
+end -- inv.items.removeSetupFn
+
+
+function inv.items.removeResultFn(resultData, retval)
+  EnableTrigger(inv.items.trigger.removeName, false)
+  dbot.callback.default(resultData, retval)
+end -- inv.items.removeResultFn
+
+
+----------------------------------------------------------------------------------------------------
+-- Keyword support
+--
+-- We give users the ability to add user-defined keywords to items.  They can then be used in
+-- queries to search/get/put/organize items.
+--
+----------------------------------------------------------------------------------------------------
+
+invKeywordOpAdd    = "add"
+invKeywordOpRemove = "remove"
+inv.items.keywordPkg = nil
+function inv.items.keyword(keyword, keywordOperation, queryString, useQuietMode, endTag)
+  if (keyword == nil) or (keyword == "") then
+    dbot.warn("inv.items.keyword: Missing keyword")
+    return inv.tags.stop(invTagsKeyword, endTag, DRL_RET_INVALID_PARAM)
+  end -- if
+
+  if (keywordOperation == nil) or 
+     ((keywordOperation ~= invKeywordOpAdd) and (keywordOperation ~= invKeywordOpRemove)) then
+    dbot.warn("inv.items.keyword: Invalid keywordOperation")
+    return inv.tags.stop(invTagsKeyword, endTag, DRL_RET_INVALID_PARAM)
+  end -- if
+
+  useQuietMode = useQuietMode or false
+
+  if (inv.items.keywordPkg ~= nil) then
+    dbot.info("Skipping keyword request: another keyword request is in progress")
+    return inv.tags.stop(invTagsKeyword, endTag, DRL_RET_BUSY)
+  end -- if
+
+  -- We use a background co-routine to perform the keyword add or remove.  The main reason we
+  -- do this in the background is that we want to use the background search co-routine to
+  -- find items to keyword (or un-keyword) via the query string and the search co-routine only runs
+  -- in a co-routine environment due to explicit scheduling requests.
+  inv.items.keywordPkg                    = {}
+  inv.items.keywordPkg.keyword            = keyword
+  inv.items.keywordPkg.keywordOperation   = keywordOperation
+  inv.items.keywordPkg.queryString        = queryString or ""
+  inv.items.keywordPkg.useQuietMode       = useQuietMode
+  inv.items.keywordPkg.endTag             = endTag
+
+  wait.make(inv.items.keywordCR)
+
+  return DRL_RET_SUCCESS
+end -- inv.items.keyword
+
+
+function inv.items.keywordCR()
+
+  local idArray
+  local retval
+  local i
+  local objId
+  local numQueryItems = 0
+  local numUpdatedKeywords = 0
+
+  if (inv.items.keywordPkg == nil) or (inv.items.keywordPkg.keyword == nil) then
+    dbot.error("inv.items.keywordCR: Aborting keyword request -- keyword package or name is nil!")
+    inv.items.keywordPkg = nil
+    return DRL_RET_INTERNAL_ERROR
+  end -- if
+
+  local endTag = inv.items.keywordPkg.endTag
+
+  idArray, retval = inv.items.searchCR(inv.items.keywordPkg.queryString)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.items.keywordCR: failed to search inventory table: " .. dbot.retval.getString(retval))
+
+  -- Let the user know if no items matched their query
+  elseif (idArray == nil) or (#idArray == 0) then
+    dbot.info("No match found for keyword query: \"" .. inv.items.keywordPkg.queryString .. "\"")
+
+  else
+    numQueryItems = #idArray
+    -- Update the keyword for each item that matched the query string
+    for i,objId in ipairs(idArray) do
+      local keywordField = inv.items.getStatField(objId, invStatFieldKeywords) or ""
+
+      if (inv.items.keywordPkg.keywordOperation == invKeywordOpAdd) then
+        dbot.debug("Adding keyword \"" .. inv.items.keywordPkg.keyword .. "\" to object " .. objId)
+        if (keywordField == nil) or (keywordField == "") then
+          inv.items.setStatField(objId, invStatFieldKeywords, inv.items.keywordPkg.keyword)
+        elseif dbot.isWordInString(inv.items.keywordPkg.keyword, keywordField) then
+          dbot.debug("Skipping keyword of item " .. objId .. ": item is already tagged with " .. 
+                     inv.items.keywordPkg.keyword)
+        else
+          inv.items.setStatField(objId, invStatFieldKeywords, keywordField .. " " .. 
+                                 inv.items.keywordPkg.keyword)
+        end -- if
+
+        numUpdatedKeywords = numUpdatedKeywords + 1
+
+      elseif (inv.items.keywordPkg.keywordOperation == invKeywordOpRemove) then
+        local element
+        local newKeywordField = ""
+
+        -- Rebuild the keywordField and leave out any flags that match the specified removed flag
+        dbot.debug("Removing keyword \"" .. inv.items.keywordPkg.keyword ..
+                   "\" from object " .. objId)
+        for element in keywordField:gmatch("%S+") do
+          if (string.lower(element) ~= string.lower(inv.items.keywordPkg.keyword)) then
+            if (newKeywordField == "") then
+              newKeywordField = element
+            else
+              newKeywordField = newKeywordField .. " " .. element
+            end -- if
+          else
+            numUpdatedKeywords = numUpdatedKeywords + 1
+          end -- if
+        end -- for
+
+        inv.items.setStatField(objId, invStatFieldKeywords, newKeywordField)
+
+      else
+        dbot.error("inv.items.keywordCR: Invalid keyword operation detected")
+        inv.items.keywordPkg = nil
+        return inv.tags.stop(invTagsKeyword, endTag, DRL_RET_INTERNAL_ERROR)
+      end -- if
+    end -- for
+  end -- if
+
+  if (not inv.items.keywordPkg.useQuietMode) then
+    dbot.info("Updated keyword \"" .. (inv.items.keywordPkg.keyword or "Unknown")  .. "\" for " .. 
+              numUpdatedKeywords .. " out of " .. numQueryItems .. " items matching query")
+  end -- if
+
+  inv.items.keywordPkg = nil
+
+  return inv.tags.stop(invTagsKeyword, endTag, retval)
+
+end -- inv.items.keywordCR
+
+
+-- A query consists of an array of k-v arrays (e.g., { { "type", "weapon" }, { "minlevel", "100" } }).
+-- However, this function supports an array of queries and the result is the "OR" or any query matches.
+-- For example, here is an array of query arrays that matches on items that are either weapons under
+-- L100 or are shields under L100:
+--   { { { invStatFieldType, "weapon" },     { "minlevel", "100" } },
+--     { { invStatFieldWearable, "shield" }, { "minlevel", "100" } }
+--   }
+function inv.items.search(arrayOfQueryArrays)
+  local retval = DRL_RET_SUCCESS
+  local idArray = {}
+
+  if (arrayOfQueryArrays == nil) then
+    dbot.warn("inv.items.search: query array is nil")
+    return nil, DRL_RET_INVALID_PARAM
+  end -- if
+
+  for _, queryArray in ipairs(arrayOfQueryArrays) do
+
+    -- Walk through the inventory table looking for entries that match the requested queries
+    for itemId,itemObj in pairs(inv.items.table) do
+      -- Verify that the inventory entry looks reasonable
+      assert(itemId ~= nil, "inv.items.search: inventory table key is nil")
+      if (itemObj == nil) then
+        dbot.warn("inv.items.search: invalid nil entry found for item " .. itemId)
+        return nil, DRL_RET_MISSING_ENTRY
+      end -- if
+
+      -- Check if the item already matches the query.  This could happen if we have something of the
+      -- form "query1 or query2" and the item matches both query1 and query2.  If the item is already
+      -- known to match, then we don't want to waste time checking other query clauses and we don't
+      -- want to duplicate it in the array of IDs that we return.
+      local idAlreadyMatches = false
+      for _, id in ipairs(idArray) do
+        if (tonumber(itemId) == tonumber(id)) then
+          idAlreadyMatches = true
+        end -- if
+      end -- for
+
+      -- Get the stats entry for the given item and check if it matches the queries in the query array
+      local itemMatches = false
+      local objLoc = itemObj[invFieldObjLoc]
+      local stats = itemObj[invFieldStats]
+      if (stats ~= nil) and (idAlreadyMatches == false) then
+        itemMatches = true -- start by assuming we have a match and halt if we find any non-conforming query
+
+        for queryIdx,query in ipairs(queryArray) do
+          local key = string.lower(query[1])   -- Stat keys and values are lower case to avoid conflicts
+          local value = string.lower(query[2])
+          local valueNum = tonumber(query[2])
+
+          if (key == nil) or (value == nil) then
+            dbot.warn("inv.items.search: query " .. queryIdx .. " is malformed with a nil component")
+            return nil, DRL_RET_MISSING_ENTRY
+          end -- if
+
+          -- Check if the query has a prefix.  We currently support the prefixes "~", "min", and "max".
+          local prefix = ""
+          local base = ""
+          local invert = false
+
+          _, _, prefix, base = string.find(key, "(~)(%S+)")
+          if (prefix ~= nil) and (base ~= nil) then
+            invert = true
+            key = base
+          end -- if
+
+          _, _, prefix, base = string.find(key, "(min)(%S+)")
+          if (prefix ~= nil) and (base ~= nil) then
+            key = base
+          else
+            _, _, prefix, base = string.find(key, "(max)(%S+)")
+            if (prefix ~= nil) and (base ~= nil) then
+              key = base
+            end -- if
+          end -- if
+
+          local statsNum = tonumber(stats[key] or 0)
+
+          -- Ensure that "min" and "max" queries are only used on numbers
+          if (prefix == "min") or (prefix == "max") then
+            if (valueNum == nil) or (statsNum == nil) then
+              dbot.warn("inv.items.search: min or max prefix was used on non-numerical query")
+              return DRL_RET_INVALID_PARAM
+            end -- if
+          end -- if
+
+          -- We don't keep meta-information about the item (e.g., location, id level, etc.) inside the
+          -- stats table but our search queries are all relative to entries in the stats table.  One
+          -- exception to this is the objectLocation field.  It's a little awkward moving that to the
+          -- stats table and we don't want to duplicate it...so...we use a little kludge here and
+          -- explicitly check for a location query and handle it as a one-off.  Yes, I should probably
+          -- fix this at some point...
+          if (key == invQueryKeyLocation) or (key == invQueryKeyLoc) then
+            if ((invert == false) and ((valueNum ~= nil) and (valueNum ~= objLoc))) or
+               ((invert == true)  and ((valueNum ~= nil) and (valueNum == objLoc))) then
+              itemMatches = false
+              break
+            end -- if
+ 
+          -- If the current item doesn't have a field matching the given key, we don't match; try the next item.
+          -- The behavior is the same whether or not the field is inverted (i.e., "~fieldName") so we don't
+          -- bother checking for inversion in this test.
+          elseif (stats[key] == nil) then
+            itemMatches = false
+            break
+
+          -- If we are searching for an element in a string of elements (e.g., a keyword in a keyword list
+          -- or a flag in a list of flags) check if the queried string is present.  We use a case-insensitive
+          -- search by making everything in the strings lower case.  We also temporarily replace special
+          -- characters in the search strings with their escaped equivalents (e.g., "-" becomes "%-") so 
+          -- that we can search for things like "anti-evil" without the hyphen being interpreted as a
+          -- special character.
+          --
+          -- Some string fields (name and leadsTo) support a partial match.  For example, searching for 
+          -- "Nation" in the "leadsTo" field would match for both "Imperial Nation" and "The Amazon Nation".
+          -- Other string fields (keywords and flags) require an exact match so searching for the
+          -- "evil" flag won't match on "anti-evil".
+
+          elseif (key == invStatFieldName) or (key == invStatFieldLeadsTo) then
+            local escapedValue = string.gsub(value, "[%(%)%.%+%-%*%?%[%]%^%$%%]", "%%%1")
+            local noMatch = (string.find(string.lower(stats[key]), string.lower(escapedValue)) == nil)
+            if ((invert == false) and noMatch) or ((invert == true) and not noMatch) then
+              itemMatches = false
+              break
+            end -- if
+
+          elseif (key == invStatFieldKeywords) or (key == invStatFieldFlags) then
+            local statField = stats[key] or ""
+            local element
+            local isInField = false
+
+            for element in statField:gmatch("%S+") do
+              element = string.gsub(element, ",", "")
+              if (string.lower(element) == string.lower(value)) then
+                isInField = true
+                break
+              end -- if
+            end -- for
+
+            -- Yes, this reduces to "if invert == isInField" but I can't bring myself to use that
+            -- because I know I'll forget the simplifiication by the next time I look at this code...
+            if ((invert == false) and (isInField == false)) or
+               ((invert == true)  and (isInField == true)) then
+              itemMatches = false
+              break
+            end -- if
+
+          -- Check for a min or a max query
+          elseif ((invert == false) and (prefix == "min") and (statsNum <  valueNum)) or
+                 ((invert == true)  and (prefix == "min") and (statsNum >= valueNum)) or
+                 ((invert == false) and (prefix == "max") and (statsNum >  valueNum)) or
+                 ((invert == true)  and (prefix == "max") and (statsNum <= valueNum)) then
+            itemMatches = false
+            break
+
+          -- Handle a basic string query (use lowercase only to make queries a bit simpler)
+          elseif ((invert == false) and (prefix == nil) and 
+                  (string.lower(stats[key]) ~= string.lower(value))) or
+                 ((invert == true)  and (prefix == nil) and
+                  (string.lower(stats[key]) == string.lower(value))) then
+            itemMatches = false
+            break
+          end -- if
+
+        end -- for
+      end -- if
+      
+      if (itemMatches == true) then
+        table.insert(idArray, tonumber(itemId))
+      end -- if
+    end -- for
+  end -- for
+
+  return idArray, retval
+end -- inv.items.search
+
+
+-- Parse the string containing one or more search queries into an array of { key, value } where
+-- each element is one component of the full query
+-- Example queryStrings:
+--   wearable hold maxlevel 10
+--   level 11 type armor
+--   keywords aardwords
+--   flags glow minint 5
+--   loc 123456789
+--   name bob
+--   keyword shardblade
+-- Note: This must be called from within a co-routine because inv.items.convertRelative() can block
+function inv.items.searchCR(queryString) 
+  local retval = DRL_RET_SUCCESS
+  local arrayOfKvArrays = {}
+  local kvArray = {}
+  local idx = 1
+  local key = ""
+  local value = ""
+  local element
+  local numWordsInQuery = 0
+
+  -- Count the number of words in the query string.  We use an obscure form of gsub() for this.
+  -- The gsub function's 2nd return value is the number of substitutions made.  If we do a dummy
+  -- substitution for each block of non-space characters in the query, we can get a count of the
+  -- number of words in the query.
+  if (queryString ~= nil) and (queryString ~= "") then
+    _, numWordsInQuery = queryString:gsub("%S+", "")
+  end -- if
+
+  -- If there is just a single word in the queryString, assume it is a name search.
+  -- We don't really need to support this, but it is a convenient kludge.
+  if (numWordsInQuery == 1) then
+    table.insert(kvArray, { invStatFieldName, queryString })
+  else
+    -- Parse the query string into key-value pairs and pass those pairs to inv.items.search()
+    -- to search the inventory table for items matching each key-value query
+    for element in queryString:gmatch("%S+") do
+      -- If we hit the "OR" operator, close the current query and start a new one
+      if (element == "||") then
+        table.insert(arrayOfKvArrays, kvArray)
+        kvArray = {}
+
+      -- If we are in a query and we are at the key location (it goes key then value), then save the key
+      elseif ((idx % 2) ~= 0) then
+        key = element
+        idx = idx + 1
+
+      -- If we are in a query and we are at the value location (it goes key then value), then save the value
+      else
+        value = element
+        dbot.debug("key=\"" .. key .. "\", value=\"" .. value .. "\"")
+
+        -- If we are inverting the key field (e.g., "level" vs. "~level") then we want to temporarily
+        -- strip the "~" from the key, process the remaining key, and then add the "~" back before we
+        -- put the query into the returned array.  We could leave the "~" in place, but it reduces the
+        -- parsing complexity if we pull it out before we do checks against the key type.
+        local isInverted = string.find(key, "^~.*")
+        if isInverted then
+          key = string.gsub(key, "^~", "")
+        end -- if
+
+        -- If a query has a relative name or loc in it, convert the name or loc to an object ID here
+        if (key == invQueryKeyRelativeName) or (key == invQueryKeyRelativeLoc) or 
+           (key == invQueryKeyRelativeLocation) then
+          key, value, retval = inv.items.convertRelative(key, value) -- new value is ID of relative item
+          if (retval ~= DRL_RET_SUCCESS) then
+            return nil, retval
+          end -- if
+        end -- if
+
+        -- Add shortcuts to some commonly used query keys
+        if (key == invQueryKeyKey) or (key == invQueryKeyKeyword) then
+          key = invStatFieldKeywords
+        elseif (key == invQueryKeyFlag) then
+          key = invStatFieldFlags
+        end -- if
+
+        -- Add the "~" back to the key name if we stripped the inversion prefix off before parsing the key
+        if (isInverted) then
+          key = "~" .. key
+        end -- if
+
+        table.insert(kvArray, { key, value })
+        idx = idx + 1
+      end -- if
+
+    end -- for
+  end -- if
+
+  -- Close the final query and add it to the array of queries
+  table.insert(arrayOfKvArrays, kvArray)
+
+  -- Convert the series of queries in an array of object IDs that match the queries
+  local idArray, retval = inv.items.search(arrayOfKvArrays)
+
+  return idArray, retval
+
+end -- inv.items.searchCR
+
+
+-- Return an array of objIds that is a sorted version of the idArray given as an input param
+-- E.g., to sort first by type and then by level, use a fieldArray like this:
+--   fieldArray = { { field = invStatFieldType, isAscending = true },
+--                  { field = invStatFieldLevel, isAscending = true } }
+function inv.items.sort(idArray, fieldArray)
+  if (idArray == nil) or (fieldArray == nil) then
+    dbot.warn("inv.items.sort: required input parameter is nil")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  inv.items.compareArray = fieldArray
+  table.sort(idArray, inv.items.compare)
+
+  return DRL_RET_SUCCESS
+
+end -- inv.items.sort
+
+
+inv.items.compareArray = nil
+function inv.items.compare(item1, item2)
+
+  for i, sortEntry in ipairs(inv.items.compareArray) do
+
+    local fieldName = sortEntry.field
+    assert(fieldName ~= nil, "sorting field is missing")
+
+    local isAscending = sortEntry.isAscending
+    if (isAscending == nil) then
+      currentIsAscending = true -- default to "true" if the user doesn't specify an order
+    end -- if
+
+    field1 = inv.items.getStatField(item1, fieldName) or "unknown"
+    field2 = inv.items.getStatField(item2, fieldName) or "unknown"
+    fieldNum1 = tonumber(field1)
+    fieldNum2 = tonumber(field2)
+
+    -- If we are comparing one number and one string then something is wrong
+    if ((fieldNum1 == nil) and (fieldNum2 ~= nil)) or ((fieldNum1 ~= nil) and (fieldNum2 == nil)) then
+      return false
+    end -- if
+
+    -- If we have two numbers, compare the two numbers.  If they are equal, move to the next sorting element.
+    -- Otherwise, return with a boolean indicating which one is first.
+    if (fieldNum1 ~= nil) and (fieldNum2 ~= nil) and (fieldNum1 ~= fieldNum2) then
+      if (isAscending) then 
+         return fieldNum1 < fieldNum2
+      else
+         return fieldNum1 > fieldNum2
+      end -- if
+    end -- if
+
+   -- If we have two non-numerical strings, compare them!
+   if (fieldNum == nil) and (fieldNum2 == nil) and (field1 ~= field2) then
+     if (isAscending) then 
+       return field1 < field2
+     else
+       return field1 > field2
+     end -- if
+   end -- if
+
+  end -- for
+
+  -- We made it through all of the sort specifications without finding any differences between the
+  -- two items.  They are equivalent based on the fields given as parameters.
+  return false
+
+end -- inv.items.compare
+
+
+function inv.items.convertRelative(relativeName, value)
+  local key = nil
+  local id = nil
+  local retval = DRL_RET_SUCCESS
+
+  if (value == nil) then
+    dbot.warn("inv.items.convertRelative: nil value parameter detected")
+    return key, id, DRL_RET_INVALID_PARAM
+  end -- if
+
+  if (relativeName == invQueryKeyRelativeName) then
+    key = invStatFieldId
+  elseif (relativeName == invQueryKeyRelativeLoc) or (relativeName == invQueryKeyRelativeLocation) then
+    key = invQueryKeyLocation
+  end -- if
+
+  inv.lastIdentifiedObjectId = nil
+
+  local resultData = dbot.callback.new()
+  retval = dbot.execute.safe.command("identify " .. value, inv.items.convertSetupFn, nil,
+                                     dbot.callback.default, resultData)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.items.convertRelative: Failed to submit safe identification call: " ..
+              dbot.retval.getString(retval))
+    inv.lastIdentifiedObjectId = 0
+  else
+    -- Wait until we know the relative item's object ID
+    retval = dbot.callback.wait(resultData, inv.items.timer.idTimeoutThresholdSec)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.note("Skipping relative name identify request: " .. dbot.retval.getString(retval))
+      inv.lastIdentifiedObjectId = 0
+    end -- if
+  end -- if
+
+  -- Grab the ID for the most recently identified object
+  if (inv.lastIdentifiedObjectId == 0) then
+    dbot.note("Skipping request: relative name \"" .. value ..
+              "\" did not match any item in your main inventory")
+    EnableTrigger(inv.items.trigger.idItemName, false)
+    key = nil
+    id = nil
+    retval = DRL_RET_MISSING_ENTRY
+  else
+    id = inv.lastIdentifiedObjectId
+  end -- if
+
+  inv.lastIdentifiedObjectId = nil
+  
+  return key, id, retval
+end -- inv.items.convertRelative
+
+
+function inv.items.convertSetupFn()
+  EnableTrigger(inv.items.trigger.idItemName, true)
+end -- inv.items.convertSetupFn
+
+
+
+invDisplayVerbosityBasic       = "basic"      -- default mode
+invDisplayVerbosityId          = "id"
+invDisplayVerbosityFull        = "full"
+invDisplayVerbosityDiffAdd     = "diffAdd"    -- internal only (shows diff format for replaced items)
+invDisplayVerbosityDiffRemove  = "diffRemove" -- internal only (shows diff format for replaced items)
+invDisplayVerbosityRaw         = "raw"        -- internal only (shows raw table data)
+
+inv.items.displayPkg = nil
+-- Asynchronous routine to display results for a query into the inventory table
+function inv.items.display(queryString, verbosity, endTag)
+  local retval = DRL_RET_SUCCESS
+
+  -- Default to basic display verbosity if nothing is specificed as a parameter
+  verbosity = verbosity or invDisplayVerbosityBasic
+
+  -- Check if another display request is in progress before we proceed
+  if (inv.items.displayPkg ~= nil) then
+    dbot.info("inv.items.display: Skipping display query: another display query is in progress")
+    return inv.tags.stop(invTagsSearch, endTag, DRL_RET_BUSY)
+  end -- if
+
+  -- Use globals to hold state for the display co-routine
+  inv.items.displayPkg             = {}
+  inv.items.displayPkg.queryString = queryString
+  inv.items.displayPkg.verbosity   = verbosity
+  inv.items.displayPkg.endTag      = endTag
+
+  -- Sort the results first by item type, then by item level, then by location, and finally by item name
+  inv.items.displayPkg.sortCriteria = { { field = invStatFieldType,     isAscending = true },
+                                        { field = invStatFieldLevel,    isAscending = true },
+                                        { field = invStatFieldWearable, isAscending = true },
+                                        { field = invStatFieldName,     isAscending = true } }
+
+  -- Fire off the asynchronous co-routine to generate and display the results
+  wait.make(inv.items.displayCR)
+
+  return retval
+end -- inv.items.display
+
+
+inv.items.displayLastType = ""
+function inv.items.displayCR()
+  local endTag = inv.items.displayPkg.endTag
+
+  local idArray, retval = inv.items.searchCR(inv.items.displayPkg.queryString)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.items.displayCR: failed to search inventory table: " .. dbot.retval.getString(retval))
+
+  -- Let the user know if no items matched their query
+  elseif (idArray == nil) or (#idArray == 0) then
+    dbot.info("No items matched query: \"" .. inv.items.displayPkg.queryString .. "\"")
+
+  else
+    -- Sort and display the results
+    inv.items.sort(idArray, inv.items.displayPkg.sortCriteria)
+    inv.items.displayLastType = ""
+    for _, objId in ipairs(idArray) do
+      inv.items.displayItem(objId, inv.items.displayPkg.verbosity)
+    end -- for
+  end -- if
+
+  inv.items.displayPkg = nil
+
+  return inv.tags.stop(invTagsSearch, endTag, retval)
+end -- inv.items.displayCR
+
+
+function inv.items.displayItem(objId, verbosity, wearableLoc)
+  if (objId == nil) then
+    dbot.warn("inv.items.displayItem: objId is nil")
+    return DRL_RET_INVALID_PARAMETER
+  end -- if
+
+  local objIdNum = dbot.tonumber(objId)
+  if (objIdNum == nil) then
+    dbot.warn("inv.items.displayItem: objId is not a number")
+    return DRL_RET_INVALID_PARAMETER
+  end -- if
+
+  local entry = inv.items.getEntry(objId)
+  if (objId == nil) then
+    dbot.warn("inv.items.displayItem: Item " .. objId .. " is not in the inventory table")
+    return DRL_RET_INVALID_ENTRY
+  end -- if
+
+  -- Use the default verbosity mode if verbosity is not given
+  verbosity = verbosity or invDisplayVerbosityId
+
+  if (verbosity == invDisplayVerbosityRaw) then
+    print("\nInventory table key: \"" .. objId .. "\"")
+    tprint(entry)
+    return DRL_RET_SUCCESS
+  end -- if
+
+  local objLoc = inv.items.getField(objId, invFieldObjLoc)
+  if (objLoc == nil) then
+    dbot.warn("inv.items.displayItem: Item " .. objId .. " does not have a known location")
+    return DRL_RET_INTERNAL_ERROR
+  end -- if
+
+  local colorName  = inv.items.getField(objId, invFieldColorName) or "@RName is not yet identified@w"
+  local level      = inv.items.getStatField(objId, invStatFieldLevel) or 0
+  local typeField  = inv.items.getStatField(objId, invStatFieldType) or "Unknown"
+  local weaponType = inv.items.getStatField(objId, invStatFieldWeaponType) or "Unknown"
+  local damtype    = inv.items.getStatField(objId, invStatFieldDamType)  or "none"
+  local specials   = inv.items.getStatField(objId, invStatFieldSpecials) or "none"
+  local wearable   = inv.items.getStatField(objId, invStatFieldWearable) or ""
+  local leadsTo    = inv.items.getStatField(objId, invStatFieldLeadsTo) or "Unknown"
+  local spells     = inv.items.getStatField(objId, invStatFieldSpells) or {}
+
+  -- Highlight items that are currently worn (the location isn't a container or inventory)
+  local highlightOn = ""
+  local highlightOff = ""
+  local isCurrentlyWorn = false
+  if (type(objLoc) ~= "number") and (inv.items.getField(objId, invFieldObjLoc) ~= invItemLocInventory)
+     and (inv.items.getField(objId, invFieldColorName) ~= "") then
+    isCurrentlyWorn = true
+    highlightOn = "@W"
+    highlightOff = "@w"
+  end -- if
+
+  local int      = dbot.tonumber(inv.items.getStatField(objId, invStatFieldInt)      or "0")
+  local luck     = dbot.tonumber(inv.items.getStatField(objId, invStatFieldLuck)     or "0")
+  local wis      = dbot.tonumber(inv.items.getStatField(objId, invStatFieldWis)      or "0")
+  local str      = dbot.tonumber(inv.items.getStatField(objId, invStatFieldStr)      or "0")
+  local dex      = dbot.tonumber(inv.items.getStatField(objId, invStatFieldDex)      or "0")
+  local con      = dbot.tonumber(inv.items.getStatField(objId, invStatFieldCon)      or "0")
+  local avedam   = dbot.tonumber(inv.items.getStatField(objId, invStatFieldAveDam)   or "0")
+  local dam      = dbot.tonumber(inv.items.getStatField(objId, invStatFieldDam)      or "0")
+  local hit      = dbot.tonumber(inv.items.getStatField(objId, invStatFieldHit)      or "0")
+  local hp       = dbot.tonumber(inv.items.getStatField(objId, invStatFieldHP)       or "0")
+  local mana     = dbot.tonumber(inv.items.getStatField(objId, invStatFieldMana)     or "0")
+  local moves    = dbot.tonumber(inv.items.getStatField(objId, invStatFieldMoves)    or "0")
+  local weight   = dbot.tonumber(inv.items.getStatField(objId, invStatFieldWeight)   or "0")
+
+  local allphys  = dbot.tonumber(inv.items.getStatField(objId, invStatFieldAllPhys)  or "0")
+  local allmagic = dbot.tonumber(inv.items.getStatField(objId, invStatFieldAllMagic) or "0")
+
+  local slash    = dbot.tonumber(inv.items.getStatField(objId, invStatFieldSlash)    or "0")
+  local pierce   = dbot.tonumber(inv.items.getStatField(objId, invStatFieldPierce)   or "0")
+  local bash     = dbot.tonumber(inv.items.getStatField(objId, invStatFieldBash)     or "0")
+
+  local acid     = dbot.tonumber(inv.items.getStatField(objId, invStatFieldAcid)     or "0")
+  local cold     = dbot.tonumber(inv.items.getStatField(objId, invStatFieldCold)     or "0")
+  local energy   = dbot.tonumber(inv.items.getStatField(objId, invStatFieldEnergy)   or "0")
+  local holy     = dbot.tonumber(inv.items.getStatField(objId, invStatFieldHoly)     or "0")
+  local electric = dbot.tonumber(inv.items.getStatField(objId, invStatFieldElectric) or "0")
+  local negative = dbot.tonumber(inv.items.getStatField(objId, invStatFieldNegative) or "0")
+  local shadow   = dbot.tonumber(inv.items.getStatField(objId, invStatFieldShadow)   or "0")
+  local magic    = dbot.tonumber(inv.items.getStatField(objId, invStatFieldMagic)    or "0")
+  local air      = dbot.tonumber(inv.items.getStatField(objId, invStatFieldAir)      or "0")
+  local earth    = dbot.tonumber(inv.items.getStatField(objId, invStatFieldEarth)    or "0")
+  local fire     = dbot.tonumber(inv.items.getStatField(objId, invStatFieldFire)     or "0")
+  local light    = dbot.tonumber(inv.items.getStatField(objId, invStatFieldLight)    or "0")
+  local mental   = dbot.tonumber(inv.items.getStatField(objId, invStatFieldMental)   or "0")
+  local sonic    = dbot.tonumber(inv.items.getStatField(objId, invStatFieldSonic)    or "0")
+  local water    = dbot.tonumber(inv.items.getStatField(objId, invStatFieldWater)    or "0")
+  local poison   = dbot.tonumber(inv.items.getStatField(objId, invStatFieldPoison)   or "0")
+  local disease  = dbot.tonumber(inv.items.getStatField(objId, invStatFieldDisease)  or "0")
+
+  -- Calculate total physical and magical resists.  We weight a specific physical or magic resist
+  -- relative to an "all" resist.  For example, 3 "slash" resists are equivalent to 1 "all" phys resist
+  -- because there are 3 physical resist types.  Similarly, one specific magical resist is worth 1/17 of
+  -- one "all" magical resist value because there are 17 magical resistance types.
+  local physResists = allphys + (slash + pierce + bash) / 3
+  local magicResists = allmagic + (acid + cold + energy + holy + electric + negative + shadow + magic + 
+                       air + earth + fire + light + mental + sonic + water + poison + disease) / 17
+  local totResists = physResists + magicResists
+
+  local capacity        = dbot.tonumber(inv.items.getStatField(objId, invStatFieldCapacity)        or "0")
+  local holding         = dbot.tonumber(inv.items.getStatField(objId, invStatFieldHolding)         or "0")
+  local heaviestItem    = dbot.tonumber(inv.items.getStatField(objId, invStatFieldHeaviestItem)    or "0")
+  local itemsInside     = dbot.tonumber(inv.items.getStatField(objId, invStatFieldItemsInside)     or "0")
+  local totWeight       = dbot.tonumber(inv.items.getStatField(objId, invStatFieldTotWeight)       or "0")
+  local itemBurden      = dbot.tonumber(inv.items.getStatField(objId, invStatFieldItemBurden)      or "0")
+  local weightReduction = dbot.tonumber(inv.items.getStatField(objId, invStatFieldWeightReduction) or "0")
+
+  -- If we are in basic display mode, don't print the object ID; otherwise print it
+  local displayObjId = false
+  if (verbosity == invDisplayVerbosityId) or (verbosity == invDisplayVerbosityFull) then
+    displayObjId = true
+  end -- if
+
+  -- If we are in "diff" mode, we prepend the addition or removal indicator to the name of the item
+  if (verbosity == invDisplayVerbosityDiffAdd) then
+    colorName = "@G>>@W " .. colorName
+  elseif (verbosity == invDisplayVerbosityDiffRemove) then
+    colorName = "@R<<@W " .. colorName
+  end -- if
+
+  -- We color-code the ID field as follows: unidentified = red, partial ID = yellow, full ID = green
+  local formattedId = ""
+  local colorizedId = ""
+  local idPrefix = DRL_ANSI_WHITE
+  local idSuffix = DRL_ANSI_WHITE
+  local idLevel = inv.items.getField(objId, invFieldIdentifyLevel)
+  if (idLevel ~= nil) and (displayObjId == true)  then
+    if (idLevel == invIdLevelNone) then
+      idPrefix = DRL_ANSI_RED
+    elseif (idLevel == invIdLevelPartial) then
+      idPrefix = DRL_ANSI_YELLOW
+    elseif (idLevel == invIdLevelFull) then
+      idPrefix = DRL_ANSI_GREEN
+    else
+      dbot.error("inv.items.displayItem: Invalid identify level state detected: idLevel")
+      return DRL_INTERNAL_ERROR
+    end -- if
+
+    formattedId = "(" .. objId .. ") "
+    colorizedId = idPrefix .. formattedId .. idSuffix
+  end -- if
+
+  -- Format the name field for the stat display.  This is complicated because we have a fixed
+  -- number of spaces reserved for the field but color codes could take up some of those spaces.
+  -- We iterate through the string byte by byte checking the length of the non-colorized equivalent
+  -- to see when we've hit the limit that we can print.
+  local maxNameLen = 24
+  local formattedName = ""
+  local index = 0
+  while (#strip_colours(formattedName) < maxNameLen - #formattedId) and (index < 50) do
+    formattedName = string.sub(colorName, 1, maxNameLen - #formattedId + index)
+    index = index + 1
+  end
+
+  if (#strip_colours(formattedName) < maxNameLen - #formattedId) then
+    formattedName = formattedName .. string.rep(" ", maxNameLen - #strip_colours(formattedName) - #formattedId)
+  end -- if
+  -- The trimmed name could end on an "@" which messes up color codes and spacing
+  formattedName = string.gsub(formattedName, "@$", " ") .. " " .. DRL_XTERM_GREY
+  formattedName = formattedName .. colorizedId 
+
+  -- If we have a wearable location, use it in the display.  Otherwise, use the item's type.
+  local typeExtended
+  if (invIdLevelNone == inv.items.getField(objId, invFieldIdentifyLevel)) then
+    typeExtended = "Unknown"
+  elseif (wearableLoc ~= nil) and (wearableLoc ~= "") then
+    typeExtended = wearableLoc
+  elseif (typeField == invmon.typeStr[invmonTypeWeapon]) then
+    typeExtended = weaponType
+  elseif (typeField == invmon.typeStr[invmonTypeContainer]) then
+    typeExtended = "Contain"
+  elseif (wearable == "")  or (wearable == invmon.typeStr[invmonTypeHold]) then
+    typeExtended = typeField
+  else
+    typeExtended = wearable
+  end -- if
+  typeExtended = string.format("%-8s", typeExtended) 
+
+  -- Make the item's type show up in bright green if the item is currently worn
+  if (isCurrentlyWorn == true) then
+    typeExtended = DRL_ANSI_GREEN .. typeExtended .. DRL_ANSI_WHITE
+  end -- if
+
+  -- Truncate some field strings that are limits on how long they can be
+  local maxAreaNameLen = 18
+  local formattedLeadsTo = string.sub(leadsTo, 1, maxAreaNameLen)
+  local formattedType = string.format("%-17s", typeField)
+
+  -- Format the output for the item's stat display
+  local header
+  local statLine
+  if (typeField == invmon.typeStr[invmonTypePotion]) or 
+     (typeField == invmon.typeStr[invmonTypePill]) or 
+     (typeField == invmon.typeStr[invmonTypeScroll]) or 
+     (typeField == invmon.typeStr[invmonTypeWand]) or 
+     (typeField == invmon.typeStr[invmonTypeStaff]) then
+    header = "@WLvl Name of " .. formattedType .. "Type    Lvl  # Spell name@w"
+    local spellDetails = ""
+    for i,v in ipairs(spells) do
+      spellDetails = string.format("%s%3d x%1d %s ", spellDetails, v.level, v.count, v.name)
+    end -- for
+    statLine = string.format("@W%3d@w %s%s%s", level, formattedName, typeExtended, spellDetails)
+
+  elseif (typeField == invmon.typeStr[invmonTypePortal]) then
+    header = "@WLvl Name of " .. formattedType ..
+             "Type     Leads to            HR  DR Int Wis Lck Str Dex Con@w"
+    statLine = string.format("@W%3d@w %s%s %-18s %s %s %s %s %s %s %s %s",
+                             level, formattedName, typeExtended, formattedLeadsTo,
+                             inv.items.colorizeStat(hit, 3), inv.items.colorizeStat(dam, 3), 
+                             inv.items.colorizeStat(int, 3), inv.items.colorizeStat(wis, 3), 
+                             inv.items.colorizeStat(luck, 3), inv.items.colorizeStat(str, 3),
+                             inv.items.colorizeStat(dex, 3), inv.items.colorizeStat(con, 3)) 
+
+  elseif (typeField == invmon.typeStr[invmonTypeContainer]) then
+    header = "@WLvl Name of " .. formattedType .. 
+             "Type       HR   DR Int Wis Lck Str Dex Con Wght  Cap Hold Hvy #In Wgt%@w"
+
+    statLine = string.format("@W%3d@w %s%s %s %s %s %s %s %s %s %s %s %s %s %s %s %s",
+                             level, formattedName, typeExtended,
+                             inv.items.colorizeStat(hit, 4), inv.items.colorizeStat(dam, 4), 
+                             inv.items.colorizeStat(int, 3), inv.items.colorizeStat(wis, 3),
+                             inv.items.colorizeStat(luck, 3), inv.items.colorizeStat(str, 3),
+                             inv.items.colorizeStat(dex, 3), inv.items.colorizeStat(con, 3), 
+                             inv.items.colorizeStat(totWeight, 4, true), inv.items.colorizeStat(capacity, 4),
+                             inv.items.colorizeStat(holding, 4), inv.items.colorizeStat(heaviestItem, 3),
+                             inv.items.colorizeStat(itemsInside, 3), inv.items.colorizeStat(weightReduction, 4))
+
+  elseif (typeField == invmon.typeStr[invmonTypeWeapon]) then
+    header = "@WLvl Name of " .. formattedType ..
+             "Type     Ave Wgt   HR   DR Dam Type Specials Int Wis Lck Str Dex Con@w"
+    statLine = string.format("@W%3d@w %s%s %s %s %s %s %-8s %-8s %s %s %s %s %s %s",
+                             level, formattedName, typeExtended,
+                             inv.items.colorizeStat(avedam, 3), inv.items.colorizeStat(weight, 3),
+                             inv.items.colorizeStat(hit, 4), inv.items.colorizeStat(dam, 4), 
+                             damtype, specials,
+                             inv.items.colorizeStat(int, 3), inv.items.colorizeStat(wis, 3),
+                             inv.items.colorizeStat(luck, 3), inv.items.colorizeStat(str, 3),
+                             inv.items.colorizeStat(dex, 3), inv.items.colorizeStat(con, 3)) 
+  elseif (typeField == "Unknown") then
+    header = "@WLvl Name of Unknown Item     Type"
+    statLine = string.format("@WN/A@w %sItem has not yet been identified", formattedName)
+  else
+    header = "@WLvl Name of " .. formattedType .. 
+             "Type       HR   DR Int Wis Lck Str Dex Con Res HitP Mana Move@w"
+
+    statLine = string.format("@W%3d@w %s%s %s %s %s %s %s %s %s %s %s %s %s %s",
+                             level, formattedName, typeExtended,
+                             inv.items.colorizeStat(hit, 4), inv.items.colorizeStat(dam, 4), 
+                             inv.items.colorizeStat(int, 3), inv.items.colorizeStat(wis, 3),
+                             inv.items.colorizeStat(luck, 3), inv.items.colorizeStat(str, 3),
+                             inv.items.colorizeStat(dex, 3), inv.items.colorizeStat(con, 3), 
+                             inv.items.colorizeStat(totResists, 3),
+                             inv.items.colorizeStat(hp, 4), inv.items.colorizeStat(mana, 4),
+                             inv.items.colorizeStat(moves, 4)) 
+  end -- if
+
+  -- Dump the stats for this item.  We print a header if we are in full verbosity mode or if this
+  -- is the first item of its type to be displayed.
+  if (inv.items.displayLastType ~= typeField) or (verbosity == invDisplayVerbosityFull) then
+  dbot.print("\n" .. header)
+    inv.items.displayLastType = typeField
+  end -- if
+  dbot.print(statLine)
+
+  -- Return now if the user requested anything except the full view -- everything has been displayed for those
+  if (verbosity ~= invDisplayVerbosityFull) then
+    return DRL_RET_SUCCESS
+  end -- if
+
+  local score = dbot.tonumber(inv.items.getStatField(objId, invStatFieldScore) or "0")
+  local worth = dbot.tonumber(inv.items.getStatField(objId, invStatFieldWorth) or "0")
+  local keywords = inv.items.getStatField(objId, invStatFieldKeywords) or ""
+  local flags = inv.items.getStatField(objId, invStatFieldFlags) or ""
+  local material = inv.items.getStatField(objId, invStatFieldMaterial) or "Unknown"
+  local foundAt = inv.items.getStatField(objId, invStatFieldFoundAt) or "Unknown"
+  local ownedBy = inv.items.getStatField(objId, invStatFieldOwnedBy) or ""
+  local clan = inv.items.getStatField(objId, invStatFieldClan) or ""
+  local affectMods = inv.items.getStatField(objId, invStatFieldAffectMods) or ""
+  local organize = inv.items.getStatField(objId, invQueryKeyOrganize) or ""
+
+  dbot.print("    colorName:\"" .. colorName .. "\" objectID:" .. objId)
+  dbot.print("    keywords:\"" .. keywords .. "\"")
+
+  if (organize ~= "") then
+    dbot.print("    organize query:\"" .. organize .. "\"")
+  end -- if
+  dbot.print("    flags:\"" .. flags .. "\"")
+  dbot.print("    score:" .. score .. " worth:" .. worth .. " material:" .. material ..
+             " foundAt:\"" .. foundAt .. "\"")
+  dbot.print("    allphys:" .. allphys .. " allmagic:" .. allmagic .. " slash:" .. slash .. 
+             " pierce:" .. pierce .. " bash:" .. bash .. " acid:" .. acid .. " poison:" .. poison)
+  dbot.print("    disease:" .. disease .. " cold:" .. cold .. " energy:" .. energy .. 
+             " holy:" .. holy .. " electric:" .. electric .. " negative:" .. negative .. 
+             " shadow:" .. shadow)
+  dbot.print("    air:" .. air .. " earth:" .. earth .. " fire:" .. fire .. " water:" .. water .. 
+             " light:" .. light .. " mental:" .. mental .. " sonic:" .. sonic .." magic:" .. magic)
+  dbot.print("    weight:" .. weight .. " ownedBy:\"" .. ownedBy .. "\"")
+  dbot.print("    clan:\"" .. clan .. "\" affectMods:\"" .. affectMods .. "\"")
+
+  return DRL_RET_SUCCESS
+end -- inv.items.displayItem
+
+
+function inv.items.colorizeStat(value, numDigits, invertColors)
+
+  if (numDigits == nil) then
+    dbot.error("inv.items.colorizeStat: Invalid nil numDigits parameter detected")
+    return nil, DRL_RET_INTERNAL_ERROR
+  end -- if
+
+  if (value == nil) then
+    value = 0
+  end -- if
+
+  local prefix = ""
+  local suffix = ""
+
+  value = tonumber(value)
+  numDigits = tonumber(numDigits)
+
+  if (value == nil) or (numDigits == nil) then
+    dbot.warn("inv.items.colorizeStat: non-numeric parameter detected: value=\"" .. (value or "nil") .. 
+            "\", numDigits=\"" .. (numDigits or "nil") .. "\"")
+    return nil
+  end -- if
+
+  invertColors = invertColors or false
+
+  if ((value < 0) and (invertColors == false)) or ((value > 0) and (invertColors == true)) then
+    prefix = DRL_ANSI_RED
+    suffix = DRL_ANSI_WHITE
+  elseif ((value > 0) and (invertColors == false)) or ((value < 0) and (invertColors == true)) then
+    prefix = DRL_ANSI_GREEN
+    suffix = DRL_ANSI_WHITE
+  end -- if
+
+  return string.format(prefix .. "%" .. numDigits .. "d" .. suffix, value)
+end -- inv.items.colorizeStat
+
+
+function inv.items.isInvis(objId)
+  local flags = inv.items.getStatField(objId, invStatFieldFlags) or ""
+
+  if dbot.isWordInString("invis", flags) or dbot.isWordInString("invis,", flags) then
+    return true
+  else
+    return false
+  end -- if
+end -- inv.items.isInvis
+
+
+----------------------------------------------------------------------------------------------------
+--
+-- Module to organize inventory items into containers based on queries assigned to containers
+--
+-- Each container may optionally have a set of item queries assigned to it.  If we "organize" an
+-- item that matches a query on a container, we move that item to the associated container.  For
+-- example, we might assign a container a query like "type Key || flag isKey" and then we can
+-- automagically organize it to move all keys into the container.  We could do similar things to
+-- put all portals together into a container or all potions together.  We can even use more
+-- complicated queries that would put items of particular types and levels together.
+--
+-- Note: If an item matches queries on multiple containers, there currently is no way to specify
+--       container priorities and the item could end up in any matching container.  For now, it is
+--       up to the user to not create conflicting container queries.
+-- TODO: Check if there is any overlap in the item arrays returned from container queries and
+--       warn the user.  We could also implement a priority scheme for containers too, but that 
+--       seems like overkill...
+--
+-- dinv organize [add | clear] <container relative name> <query>
+-- dinv organize [display]
+-- dinv organize <query>
+--
+-- inv.items.organize.add(containerName, queryString, endTag) -- appends "| query" to existing container queries
+-- inv.items.organize.addCR() 
+-- inv.items.organize.clear(containerName, endTag)
+-- inv.items.organize.clearCR()
+-- inv.items.organize.display(endTag)
+--
+-- inv.items.organize.cleanup(queryString, endTag)
+-- inv.items.organize.cleanupCR()
+--
+----------------------------------------------------------------------------------------------------
+
+inv.items.organize = {}
+
+
+inv.items.organize.addPkg = nil
+function inv.items.organize.add(containerName, queryString, endTag) 
+  if (containerName == nil) or (containerName == "") then
+    dbot.warn("inv.items.organize.add: Missing container relative name")
+    return inv.tags.stop(invTagsOrganize, endTag, DRL_RET_INVALID_PARAM)
+  end -- if
+
+  -- We allow users to organize their entire inventory in one shot with an empty string that matches
+  -- everything.  However, we do NOT allow a single container to own everything by giving a container
+  -- an empty organization query string.  That almost certainly was not what the user intended.
+  if (queryString == nil) or (queryString == "") then
+    dbot.warn("inv.items.organize.add: Containers are not allowed to own all possible items (empty query)")
+    return inv.tags.stop(invTagsOrganize, endTag, DRL_RET_INVALID_PARAM)
+  end -- if
+
+  if (inv.items.organize.addPkg ~= nil) then
+    dbot.info("Skipping add request in organize package: another add request is in progress")
+    return inv.tags.stop(invTagsOrganize, endTag, DRL_RET_BUSY)    
+  end -- if
+
+  inv.items.organize.addPkg           = {}
+  inv.items.organize.addPkg.container = containerName
+  inv.items.organize.addPkg.query     = queryString
+  inv.items.organize.addPkg.endTag    = endTag
+  
+  wait.make(inv.items.organize.addCR)
+
+  return DRL_RET_SUCCESS
+end -- inv.items.organize.add
+
+
+function inv.items.organize.addCR() 
+  local retval
+  local objId
+  local idArray
+
+  if (inv.items.organize.addPkg == nil) then
+    dbot.error("inv.items.organize.addCR: addPkg is nil!")
+    return inv.tags.stop(invTagsOrganize, "nil end tag", DRL_RET_INTERNAL_ERROR)
+  end -- if
+
+  -- Find the unique container specified by the user via a relative name (e.g., "2.bag")
+  idArray, retval = inv.items.searchCR("type container rname " .. inv.items.organize.addPkg.container)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.items.organize.addCR: failed to search inventory table: " .. dbot.retval.getString(retval))
+  elseif (#idArray ~= 1) then
+    -- There should only be a single match to the container's relative name (e.g., "2.bag")
+    dbot.warn("Container relative name \"" .. inv.items.organize.addPkg.container .. 
+              "\" did not have a unique match: skipping organization query request")
+  else
+    -- We found a single unique match for the relative name
+    objId = idArray[1]
+  end -- if
+
+  local endTag = inv.items.organize.addPkg.endTag
+
+  -- Handle the error case where we couldn't find a matching container
+  if (objId == nil) then
+    inv.items.organize.addPkg = nil
+    return inv.tags.stop(invTagsOrganize, endTag, DRL_RET_MISSING_ENTRY)
+  end -- if
+
+  -- We have the container and a query for the container.  Append the query to any previous organization
+  -- queries for that container.
+  local organizeField = inv.items.getStatField(objId, invQueryKeyOrganize) or ""
+  if (organizeField ~= "") then
+    organizeField = organizeField .. " || "  -- on 2nd and subsequent queries, use the OR operator
+  end -- if
+  organizeField = organizeField .. inv.items.organize.addPkg.query
+  inv.items.setStatField(objId, invQueryKeyOrganize, organizeField)
+  inv.items.save()
+
+  dbot.note("Added organization query \"@C" .. inv.items.organize.addPkg.query .. "@W\" to container \"" ..
+            (inv.items.getField(objId, invFieldColorName) or "Unidentified"))
+
+  -- Clean up, print an end tag (if necessary) and return
+  inv.items.organize.addPkg = nil
+  return inv.tags.stop(invTagsOrganize, endTag, DRL_RET_SUCCESS)
+end -- inv.items.organize.addCR
+
+
+inv.items.organize.clearPkg = nil
+function inv.items.organize.clear(containerName, endTag)
+  if (containerName == nil) or (containerName == "") then
+    dbot.warn("inv.items.organize.clear: Missing container relative name")
+    return inv.tags.stop(invTagsOrganize, endTag, DRL_RET_INVALID_PARAM)
+  end -- if
+
+  if (inv.items.organize.clearPkg ~= nil) then
+    dbot.info("Skipping clear request in organize package: another clear request is in progress")
+    return inv.tags.stop(invTagsOrganize, endTag, DRL_RET_BUSY)    
+  end -- if
+
+  inv.items.organize.clearPkg           = {}
+  inv.items.organize.clearPkg.container = containerName
+  inv.items.organize.clearPkg.endTag    = endTag
+  
+  wait.make(inv.items.organize.clearCR)
+
+  return DRL_RET_SUCCESS
+end -- inv.items.organize.clear
+
+
+function inv.items.organize.clearCR()
+  local retval
+  local objId
+  local idArray
+
+  if (inv.items.organize.clearPkg == nil) then
+    dbot.error("inv.items.organize.clearCR: clearPkg is nil!")
+    return inv.tags.stop(invTagsOrganize, "nil end tag", DRL_RET_INTERNAL_ERROR)
+  end -- if
+
+  -- Find the unique container specified by the user via a relative name (e.g., "2.bag")
+  idArray, retval = inv.items.searchCR("type container rname " .. inv.items.organize.clearPkg.container)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.items.organize.clearCR: failed to search inventory table: " .. dbot.retval.getString(retval))
+  elseif (#idArray ~= 1) then
+    -- There should only be a single match to the container's relative name (e.g., "2.bag")
+    dbot.warn("Container relative name \"" .. inv.items.organize.clearPkg.container .. 
+              "\" did not have a unique match: skipping organization query request")
+  else
+    -- We found a single unique match for the relative name
+    objId = idArray[1]
+  end -- if
+
+  local endTag = inv.items.organize.clearPkg.endTag
+
+  -- Handle the error case where we couldn't find a matching container
+  if (objId == nil) then
+    inv.items.organize.clearPkg = nil
+    return inv.tags.stop(invTagsOrganize, endTag, DRL_RET_MISSING_ENTRY)
+  end -- if
+
+  -- We have the container.  Whack it!
+  inv.items.setStatField(objId, invQueryKeyOrganize, "")
+  inv.items.save()
+
+  dbot.note("Cleared all organization queries from container \"" ..
+            (inv.items.getField(objId, invFieldColorName) or "Unidentified") .. DRL_ANSI_WHITE .. "@W\"")
+
+  -- Clean up, print an end tag (if necessary) and return
+  inv.items.organize.clearPkg = nil
+  return inv.tags.stop(invTagsOrganize, endTag, DRL_RET_SUCCESS)
+end -- inv.items.organize.clearCR
+
+
+function inv.items.organize.display(endTag)
+  local foundContainerWithQuery = false
+  local retval = DRL_RET_SUCCESS
+
+  dbot.print("@WContainers that have associated organizational queries:@w")
+
+  for objId, _ in pairs(inv.items.table) do
+    local organizeQuery = inv.items.getStatField(objId, invQueryKeyOrganize) or ""
+    if (organizeQuery ~= "") then
+      dbot.print("@W  \"" .. (inv.items.getField(objId, invFieldColorName) or "Unidentified") ..
+                 DRL_ANSI_WHITE .. "@W\": @C" .. organizeQuery .. "@w")
+      foundContainerWithQuery = true
+    end -- if
+  end -- for
+
+  if (foundContainerWithQuery == false) then
+    dbot.print("@W  No containers with organizational queries were found")
+    retval = DRL_RET_MISSING_ENTRY
+  end -- if
+
+  return inv.tags.stop(invTagsOrganize, endTag, retval)
+end -- inv.items.organize.display
+
+
+inv.items.organize.cleanupPkg = nil
+function inv.items.organize.cleanup(queryString, endTag)
+
+  if (inv.items.organize.cleanupPkg ~= nil) then
+    dbot.info("Skipping request to organize inventory: another request is in progress")
+    return inv.tags.stop(invTagsOrganize, endTag, DRL_RET_BUSY)
+  end -- if
+
+  inv.items.organize.cleanupPkg        = {}
+  inv.items.organize.cleanupPkg.query  = queryString
+  inv.items.organize.cleanupPkg.endTag = endTag
+
+  wait.make(inv.items.organize.cleanupCR)
+
+  return DRL_RET_SUCCESS
+end -- inv.items.organize.cleanup
+
+
+function inv.items.organize.cleanupCR()
+  local invIdArray
+  local retval
+
+  if (inv.items.organize.cleanupPkg == nil) then
+    dbot.error("inv.items.organize.cleanupCR: cleanupPkg is nil!")
+    return inv.tags.stop(invTagsOrganize, "nil end tag", DRL_RET_INTERNAL_ERROR)
+  end -- if
+
+  local endTag = inv.items.organize.cleanupPkg.endTag
+
+  -- Track how many items we move due to organization.  It's handy to report this when we're done.
+  local numItemsOrganized = 0
+
+  -- Find all items that match the given inventory query
+  invIdArray, retval = inv.items.searchCR(inv.items.organize.cleanupPkg.query)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.items.organize.cleanupCR: failed to search inventory table: " .. 
+              dbot.retval.getString(retval))
+    inv.items.organize.cleanupPkg = nil
+    return inv.tags.stop(invTagsOrganize, endTag, retval)
+  end -- if
+
+  -- For each container that has an organization query associated with it, find all items that
+  -- match that query.  Any item that appears in both the container's ID array and the inventory
+  -- ID array belongs to the container and should be moved there.
+  for objId, _ in pairs(inv.items.table) do
+    local organizeQuery = inv.items.getStatField(objId, invQueryKeyOrganize) or ""
+    if (organizeQuery ~= "") then
+      local containerIdArray, retval = inv.items.searchCR(organizeQuery)
+      if (retval ~= DRL_RET_SUCCESS) then
+        dbot.warn("inv.items.organize.cleanupCR: failed to search inventory table: " .. 
+                  dbot.retval.getString(retval))
+        inv.items.organize.cleanupPkg = nil
+        return inv.tags.stop(invTagsOrganize, endTag, retval)
+      end -- if
+
+      local commandArray = dbot.execute.new()
+
+      -- This n^2 algorithm isn't efficient, but I don't think the speed is an issue for us
+      for _, invId in ipairs(invIdArray) do
+        for _, containerId in ipairs(containerIdArray) do
+          -- Note that we don't want to try sorting containers into other containers
+          if (invId == containerId) and 
+             (inv.items.getStatField(invId, invStatFieldType) ~= invmon.typeStr[invmonTypeContainer]) then
+            dbot.debug("Found item to organize: \"" .. 
+                       (inv.items.getField(invId, invFieldColorName) or "Unidentified") ..
+                       DRL_ANSI_WHITE .. "@W\"")
+
+            -- If the item isn't already in the container, move it there
+            local itemLoc = inv.items.getField(invId, invFieldObjLoc)
+            if (itemLoc ~= nil) and (itemLoc ~= "") and (itemLoc ~= objId) then
+              retval = inv.items.putItem(invId, objId, commandArray, true)
+              if (retval ~= DRL_RET_SUCCESS) then
+                dbot.debug("inv.items.organize.cleanupCR: failed to put item \"" ..
+                           (inv.items.getField(invId, invFieldColorName) or "Unidentified") .. 
+                           "\" in container \"" ..
+                           (inv.items.getField(objId, invFieldColorName) or "Unidentified") .. "\": " ..
+                           dbot.retval.getString(retval))
+                break
+              else
+                numItemsOrganized = numItemsOrganized + 1
+              end -- if
+
+              if (commandArray ~= nil) and (#commandArray >= inv.items.burstSize) then
+                retval = dbot.execute.safe.blocking(commandArray, nil, nil, dbot.callback.default, 10)
+                if (retval ~= DRL_RET_SUCCESS) then
+                  dbot.info("Skipping request to organize items: " .. dbot.retval.getString(retval))
+                  break
+                end -- if
+                commandArray = dbot.execute.new()
+              end -- if
+
+            end -- if          
+          end -- if
+        end -- for
+      end -- for
+
+      -- Flush any commands in the array that still need to be sent to the mud
+      if (retval == DRL_RET_SUCCESS) and (commandArray ~= nil) then
+        retval = dbot.execute.safe.blocking(commandArray, nil, nil, dbot.callback.default, 10)
+        if (retval ~= DRL_RET_SUCCESS) then
+          dbot.info("Skipping request to get items: " .. dbot.retval.getString(retval))
+          break
+        end -- if
+      end -- if
+
+      if (dbot.gmcp.getState() ~= dbot.stateActive) then
+        dbot.note("Skipping organize request: character is not in the active state")
+        retval = DRL_RET_NOT_ACTIVE
+        break
+      end -- if
+    end -- if
+  end -- for
+
+  -- Report the results
+  if (retval == DRL_RET_SUCCESS) then
+    local suffix = ""
+    if (numItemsOrganized ~= 1) then
+      suffix = "s"
+    end -- if
+    dbot.info("Organized " .. numItemsOrganized .. " item" .. suffix .. " matching query \"@C" ..
+              inv.items.organize.cleanupPkg.query .. "@W\"")
+  end -- if
+
+  -- Clean up the function, print an end tag (if necessary), and return
+  inv.items.organize.cleanupPkg = nil
+  return inv.tags.stop(invTagsOrganize, endTag, retval)
+end -- inv.items.organize.cleanupCR
+
+
+----------------------------------------------------------------------------------------------------
+-- inv.items.trigger: Trigger functions for the inv.items module
+--
+-- Functions:
+--
+--   Get or put items
+--     inv.items.trigger.get
+--     inv.items.trigger.put
+--     inv.items.trigger.getKeyring
+--     inv.items.trigger.putKeyring
+--
+--   Wear or remove items
+--     inv.items.trigger.wear
+--     inv.items.trigger.remove
+--
+--   Parses identify, auction, or shop items
+--     inv.items.trigger.itemIdStart
+--     inv.items.trigger.itemIdStats
+--     inv.items.trigger.itemIdEnd
+--
+--   Quick and dirty parse of item to get the item's object ID
+--     inv.items.trigger.idItem
+--
+--   Parses eqdata, invdata, keyring data; itemDataStats is also re-used to handle invitem
+--     inv.items.trigger.itemDataStart
+--     inv.items.trigger.itemDataStats
+--     inv.items.trigger.itemDataEnd
+--
+--   Parse invmon output
+--     inv.items.trigger.invmon
+--
+----------------------------------------------------------------------------------------------------
+
+inv.items.trigger = {}
+
+inv.items.trigger.wearSpecialName = "drlInvItemsTriggerWearSpecial"
+inv.items.trigger.wearName        = "drlInvItemsTriggerWear"
+inv.items.trigger.removeName      = "drlInvItemsTriggerRemove"
+
+inv.items.trigger.getName         = "drlInvItemsTriggerGet"
+inv.items.trigger.putName         = "drlInvItemsTriggerPut"
+inv.items.trigger.getKeyringName  = "drlInvItemsTriggerGetKeyring"
+inv.items.trigger.putKeyringName  = "drlInvItemsTriggerPutKeyring"
+
+inv.items.trigger.itemIdStartName = "drlInvItemsTriggerIdStart"
+inv.items.trigger.itemIdStatsName = "drlInvItemsTriggerIdStats"
+inv.items.trigger.itemIdEndName   = "drlInvItemsTriggerIdEnd"
+
+inv.items.trigger.suppressIdMsgName = "drlInvItemsTriggerSuppressIdMsg" -- suppress output for lore, etc.
+
+
+function inv.items.trigger.wear(line)
+  if (line ~= nil) and (line ~= "") then
+    dbot.debug("Triggered \"wear\" output on: " .. line)
+
+    if (string.find(line, "You do not have that item")) then
+      dbot.debug("inv.items.trigger.wear: Failed to wear item: You do not have that item.")
+    end -- if
+  end -- if
+end -- inv.items.trigger.wear
+
+
+function inv.items.trigger.remove(line)
+  if (line ~= nil) and (line ~= "") then
+    dbot.debug("Triggered \"remove\" output on: " .. line)
+
+    if (string.find(line, "You are not wearing that item")) then
+      dbot.debug("inv.items.trigger.wear: Failed to wear item: You are not wearing that item.")
+    end -- if
+  end -- if
+end -- inv.items.trigger.remove
+
+
+function inv.items.trigger.get(line)
+  if (line ~= nil) and (line ~= "") then
+    dbot.debug("Triggered \"get\" output on: " .. line)
+
+    if (string.find(line, "You do not see")) then
+      dbot.debug("inv.items.trigger.get: Failed to get item")
+    end -- if
+  end -- if
+end -- inv.items.trigger.get
+
+
+function inv.items.trigger.put(line)
+  if (line ~= nil) and (line ~= "") then
+    dbot.debug("Triggered \"put\" output on: " .. line)
+
+    if (string.find(line, "You don't have that")) then
+      dbot.debug("inv.items.trigger.put: Failed to put item because it is not in your inventory.")
+    elseif (string.find(line, "You do not see")) then
+      dbot.debug("inv.items.trigger.put: Failed to put item because the container is not in your inventory.")
+    end -- if
+  end -- if
+end -- inv.items.trigger.put
+
+
+function inv.items.trigger.getKeyring(line)
+  if (line ~= nil) and (line ~= "") then
+    dbot.debug("Triggered \"keyring get\" output on: " .. line)
+    local errMsg = "You did not find that"
+    if (string.find(line, errMsg)) then
+      dbot.debug("inv.items.trigger.getKeyring: Failed to get keyring item: " .. errMsg)
+    end -- if
+  end -- if
+end -- inv.items.trigger.getKeyring
+
+
+function inv.items.trigger.putKeyring(line)
+  if (line ~= nil) and (line ~= "") then
+    dbot.debug("Triggered \"keyring put\" output on: " .. line)
+    local errMsg = "You do not have that item"
+    if (string.find(line, errMsg)) then
+      dbot.debug("inv.items.trigger.putKeyring: Failed to put keyring item: " .. errMsg)
+    end -- if
+  end -- if
+end -- inv.items.trigger.putKeyring
+
+
+function inv.items.trigger.itemIdStart(line)
+
+  if (line == "You do not have that item.") or
+    string.find(line, "currently holds no inventory") or
+    string.find(line, "There is no auction item with that id") or
+    string.find(line, "There is no marketplace item with that id") or
+    string.find(line, "does not have that item for sale") then
+    inv.items.trigger.itemIdEnd()
+    return DRL_RET_MISSING_ENTRY
+  end -- if
+
+  if (inv.items.identifyPkg == nil) then
+    return DRL_INTERNAL_ERROR
+  end -- if
+
+  -- Clear the ID level field.  If we detect a partial identification this time, we
+  -- flag the item as having a partial ID.  If we don't detect a partial identification,
+  -- we flag it as having a full ID when we hit the end trigger.
+  inv.items.setField(inv.items.identifyPkg.objId, invFieldIdentifyLevel, invIdLevelNone)
+
+  -- Start watching for stat lines in the item description
+  EnableTrigger(inv.items.trigger.itemIdStatsName, true)
+
+  -- Watch for the end of the item description so that we can stop scanning
+  AddTriggerEx(inv.items.trigger.itemIdEndName,
+               "^$",
+               "inv.items.trigger.itemIdEnd()",
+               drlTriggerFlagsBaseline + trigger_flag.OmitFromOutput + trigger_flag.OneShot,
+               custom_colour.Custom11,
+               0, "", "", sendto.script, 0)
+end -- inv.items.trigger.itemIdStart
+
+
+flagsContinuation = false
+affectModsContinuation = false
+function inv.items.trigger.itemIdStats(line)
+  dbot.debug("stats for item " .. inv.items.identifyPkg.objId .. ":\"" .. line .. "\"")
+
+  local isPartialId, id, name, level, weight, wearable, score, keywords, itemType, worth, flags,
+        affectMods, continuation, material, foundAt, ownedBy, clan
+
+  isPartialId = string.find(line, "A full appraisal will reveal further information on this item")
+
+  _, _, id = string.find(line, "Id%s+:%s+(%d+)%s+")
+  _, _, name = string.find(line, "Name%s+:%s+(.-)%s+|")
+  _, _, level = string.find(line, "Level%s+:%s+(%d+)%s+")
+  _, _, weight = string.find(line, "Weight%s+:%s+([0-9,-]+)%s+")
+  _, _, wearable = string.find(line, "Wearable%s+:%s+(.*) %s+")
+  _, _, score = string.find(line, "Score%s+:%s([0-9,]+)%s+")
+  _, _, keywords = string.find(line, "Keywords%s+:%s+(.-)%s+|")
+  _, _, itemType = string.find(line, "| Type%s+:%s+(%a+)%s+")
+  _, _, worth = string.find(line, "Worth%s+:%s+([0-9,]+)%s+")
+  _, _, flags = string.find(line, "Flags%s+:%s+(.-)%s+|")
+  _, _, affectMods = string.find(line, "Affect Mods:%s+(.-)%s+|")
+  _, _, continuation = string.find(line, "|%s+:%s+(.-)%s+|")
+  _, _, material = string.find(line, "Material%s+:%s+(.*)%s+")
+  _, _, foundAt = string.find(line, "Found at%s+:%s+(.-)%s+|")
+  _, _, ownedBy = string.find(line, "Owned By%s+:%s+(.-)%s+|")
+  _, _, clan = string.find(line, "Clan Item%s+:%s+(.-)%s+|")
+
+  -- Potions, pills, wands, and staves
+  local spellUses, spellLevel, spellName
+  _, _, spellUses, spellLevel, spellName = string.find(line, "([0-9]+) uses? of level ([0-9]+) '(.*)'")
+
+  -- Portal-only fields
+  local leadsTo
+  _, _, leadsTo = string.find(line, "Leads to%s+:%s+(.*)%s+")
+
+  -- Container-only fields
+  local capacity, holding, heaviestItem, itemsInside, totWeight, itemBurden, weightReduction
+  _, _, capacity = string.find(line, "Capacity%s+:%s+([0-9,]+)%s+")
+  _, _, holding = string.find(line, "Holding%s+:%s+([0-9,]+)%s+")
+  _, _, heaviestItem = string.find(line, "Heaviest Item:%s+([0-9,]+)%s+")
+  _, _, itemsInside = string.find(line, "Items Inside%s+:%s+([0-9,]+)%s+")
+  _, _, totWeight = string.find(line, "Tot Weight%s+:%s+([0-9,-]+)%s+")
+  _, _, itemBurden = string.find(line, "Item Burden%s+:%s+([0-9,]+)%s+")
+  _, _, weightReduction = string.find(line, "Items inside weigh (%d+). of their usual weight%s+")
+
+  local int, wis, luck, str, dex, con
+  _, _, int = string.find(line, "Intelligence%s+:%s+([+-]?%d+)%s+")
+  _, _, wis = string.find(line, "Wisdom%s+:%s+([+-]?%d+)%s+")
+  _, _, luck = string.find(line, "Luck%s+:%s+([+-]?%d+)%s+")
+  _, _, str = string.find(line, "Strength%s+:%s+([+-]?%d+)%s+")
+  _, _, dex = string.find(line, "Dexterity%s+:%s+([+-]?%d+)%s+")
+  _, _, con = string.find(line, "Constitution%s+:%s+([+-]?%d+)%s+")
+
+  local hp, mana, moves
+  _, _, hp = string.find(line, "Hit points%s+:%s+([+-]?%d+)%s+")
+  _, _, mana = string.find(line, "Mana%s+:%s+([+-]?%d+)%s+")
+  _, _, moves = string.find(line, "Moves%s+:%s+([+-]?%d+)%s+")
+
+  local hit, dam
+  _, _, hit = string.find(line, "Hit roll%s+:%s+([+-]?%d+)%s+")
+  _, _, dam = string.find(line, "Damage roll%s+:%s+([+-]?%d+)%s+")
+
+  local allphys, allmagic
+  _, _, allphys = string.find(line, "All physical%s+:%s+([+-]?%d+)%s+")
+  _, _, allmagic = string.find(line, "All magic%s+:%s+([+-]?%d+)%s+")
+
+  local acid, cold, energy, holy, electric, negative, shadow, magic, air, earth, fire, light, mental,
+        sonic, water, poison, disease
+  _, _, acid = string.find(line, "Acid%s+:%s+([+-]?%d+)%s+")
+  _, _, cold = string.find(line, "Cold%s+:%s+([+-]?%d+)%s+")
+  _, _, energy = string.find(line, "Energy%s+:%s+([+-]?%d+)%s+")
+  _, _, holy = string.find(line, "Holy%s+:%s+([+-]?%d+)%s+")
+  _, _, electric = string.find(line, "Electric%s+:%s+([+-]?%d+)%s+")
+  _, _, negative = string.find(line, "Negative%s+:%s+([+-]?%d+)%s+")
+  _, _, shadow = string.find(line, "Shadow%s+:%s+([+-]?%d+)%s+")
+  _, _, magic = string.find(line, "Magic%s+:%s+([+-]?%d+)%s+")
+  _, _, air = string.find(line, "Air%s+:%s+([+-]?%d+)%s+")
+  _, _, earth = string.find(line, "Earth%s+:%s+([+-]?%d+)%s+")
+  _, _, fire = string.find(line, "Fire%s+:%s+([+-]?%d+)%s+")
+  _, _, light = string.find(line, "Light%s+:%s+([+-]?%d+)%s+")
+  _, _, mental = string.find(line, "Mental%s+:%s+([+-]?%d+)%s+")
+  _, _, sonic = string.find(line, "Sonic%s+:%s+([+-]?%d+)%s+")
+  _, _, water = string.find(line, "Water%s+:%s+([+-]?%d+)%s+")
+  _, _, poison = string.find(line, "Poison%s+:%s+([+-]?%d+)%s+")
+  _, _, disease = string.find(line, "Disease%s+:%s+([+-]?%d+)%s+")
+
+  local slash, pierce, bash
+  _, _, slash = string.find(line, "Slash%s+:%s+([+-]?%d+)%s+")
+  _, _, pierce = string.find(line, "Pierce%s+:%s+([+-]?%d+)%s+")
+  _, _, bash = string.find(line, "Bash%s+:%s+([+-]?%d+)%s+")
+
+  local avedam, inflicts, damtype, weaponType, specials
+  _, _, avedam = string.find(line, "Average Dam%s+:%s+(%d+)%s+")
+  _, _, inflicts = string.find(line, "Inflicts%s+:%s+(%a+)%s+")
+  _, _, damtype = string.find(line, "Damage Type%s+:%s+(%a+)%s+")
+  _, _, weaponType = string.find(line, "Weapon Type:%s+(%a+)%s+")
+  _, _, specials = string.find(line, "Specials%s+:%s+(%a+)%s+")
+
+  if (id ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldId, dbot.tonumber(id or ""))
+    dbot.debug("Id = \"" .. id .. "\"")
+  end -- if
+
+  if (name ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldName, name)
+    dbot.debug("Name = \"" .. name .. "\"")
+  end -- if
+
+  if (level ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldLevel, dbot.tonumber(level or ""))
+    dbot.debug("Level = \"" .. level .. "\"")
+  end -- if
+
+  if (weight ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldWeight, dbot.tonumber(weight or ""))
+    dbot.debug("Weight = \"" .. weight .. "\"")
+  end -- if
+
+  if (wearable ~= nil) then
+    wearable = Trim(wearable)
+
+    -- Portals can be either "hold" or "portal" depending on whether or not you have the portal wish
+    if (wearable == "hold, portal") then
+      if dbot.wish.has("Portal") then
+        wearable = inv.wearLoc[invWearableLocPortal]
+      else
+        wearable = inv.wearLoc[invWearableLocHold]
+      end -- if
+    end -- if
+
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldWearable, wearable)
+    dbot.debug("Wearable = \"" .. wearable .. "\"")
+  end -- if
+
+  if (score ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldScore, dbot.tonumber(score or ""))
+    dbot.debug("Score = \"" .. score .. "\"")
+  end -- if
+
+  if (keywords ~= nil) then
+    -- Merge this with any previous keywords.  Someone may have added custom keywords to the
+    -- item and then re-identified it for some reason.  For example, someone may have toggled the
+    -- keep flag which would cause invitem to flag the item to be re-identified.
+    local oldKeywords = inv.items.getStatField(inv.items.identifyPkg.objId, invStatFieldKeywords) or ""
+    local mergedKeywords = dbot.mergeFields(keywords, oldKeywords) or keywords
+
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldKeywords, mergedKeywords)
+    dbot.debug("Keywords = \"" .. mergedKeywords .. "\"")
+  end -- if
+
+  if (itemType ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldType, itemType)
+    dbot.debug("Type = \"" .. itemType .. "\"")
+  end -- if
+
+  if (worth ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldWorth, dbot.tonumber(worth))
+    dbot.debug("Worth = \"" .. worth .. "\"")
+  end -- if
+
+  if (isPartialId ~= nil) then
+    inv.items.setField(inv.items.identifyPkg.objId, invFieldIdentifyLevel, invIdLevelPartial)
+    dbot.debug("Id level = \"" .. invIdLevelPartial .. "\"")
+  end -- if
+
+  if (flags ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldFlags, flags)
+    dbot.debug("Flags = \"" .. flags .. "\"")
+
+    -- If the flags are continued (they end in a ",") watch for the continuation
+    if (string.find(flags, ",$")) then
+      flagsContinuation = true
+    else
+      flagsContinuation = false
+    end -- if
+  end -- if
+
+  if (affectMods ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldAffectMods, affectMods)
+    dbot.debug("AffectMods = \"" .. affectMods .. "\"")
+
+    -- If the affectMods are continued (they end in a ",") watch for the continuation
+    if (string.find(affectMods, ",$")) then
+      affectModsContinuation = true
+    else
+      affectModsContinuation = false
+    end -- if
+  end -- if
+
+  if (continuation ~= nil) then
+    dbot.debug("Continuation = \"" .. continuation .. "\"")
+    if (flagsContinuation) then
+      -- Add the continuation to the existing flags
+      inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldFlags,
+                             (inv.items.getStatField(inv.items.identifyPkg.objId, invStatFieldFlags) or "") ..
+                             " " .. continuation)
+
+      -- If the continued flags end in a comma, keep the continuation going; otherwise stop it
+      if not (string.find(continuation, ",$")) then
+        flagsContinuation = false
+      end -- if
+    elseif (affectModsContinuation) then
+      -- Add the continuation to the existing affectMods
+
+      inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldAffectMods,
+                            (inv.items.getStatField(inv.items.identifyPkg.objId, invStatFieldAffectMods) 
+                             or "") .. " " .. continuation)
+
+      -- If the continued affectMods end in a comma, keep the continuation going; otherwise stop it
+      if not (string.find(continuation, ",$")) then
+        affectModsContinuation = false
+      end -- if
+    else
+      -- Placeholder to add continuation support for other things (notes? others?)
+    end -- if
+  end -- if
+
+  if (material ~= nil) then
+    material = Trim(material)
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldMaterial, material)
+    dbot.debug("Material = \"" .. material .. "\"")
+  end -- if
+
+  if (foundAt ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldFoundAt, foundAt)
+    dbot.debug("Found at = \"" .. foundAt .. "\"")
+  end -- if
+
+  if (ownedBy ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldOwnedBy, ownedBy)
+    dbot.debug("Found at = \"" .. ownedBy .. "\"")
+  end -- if
+
+  if (clan ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldClan, clan)
+    dbot.debug("From clan \"" .. clan .. "\"")
+  end -- if
+
+  if (spellUses ~= nil) and (spellLevel ~= nil) and (spellName ~= nil) then
+    local spellArray = inv.items.getStatField(inv.items.identifyPkg.objId, invStatFieldSpells) or {}
+    spellUses = tonumber(spellUses) or 0
+
+    -- If we already have an entry for this spell, update the count
+    local foundSpellMatch = false
+    for _, v in ipairs(spellArray) do
+      if (v.level == spellLevel) and (v.name == spellName) then
+        v.count = v.count + spellUses
+        foundSpellMatch = true
+        break
+      end -- if
+    end -- if
+
+    -- If we don't have an entry yet for this spell, add one 
+    if (foundSpellMatch == false) then
+      table.insert(spellArray, { level=spellLevel, name=spellName, count=spellUses }) 
+    end -- if
+
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldSpells, spellArray)
+  end -- if
+
+  if (leadsTo ~= nil) then
+    leadsTo = Trim(leadsTo)
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldLeadsTo, leadsTo)
+    dbot.debug("Leads to = \"" .. leadsTo .. "\"")
+  end -- if
+
+  -- Container stats
+  if (capacity ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldCapacity, dbot.tonumber(capacity))
+    dbot.debug("Capacity = \"" .. capacity .. "\"")
+  end -- if
+
+  if (holding ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldHolding, dbot.tonumber(holding))
+    dbot.debug("Holding = \"" .. holding .. "\"")
+  end -- if
+
+  if (heaviestItem ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldHeaviestItem, dbot.tonumber(heaviestItem))
+    dbot.debug("Container heaviest item = \"" .. heaviestItem .. "\"")
+  end -- if
+
+  if (itemsInside ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldItemsInside, dbot.tonumber(itemsInside))
+    dbot.debug("Container items inside = \"" .. itemsInside .. "\"")
+  end -- if
+
+  if (totWeight ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldTotWeight, dbot.tonumber(totWeight))
+    dbot.debug("Container total weight = \"" .. totWeight .. "\"")
+  end -- if
+
+  if (itemBurden ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldItemBurden, dbot.tonumber(itemBurden))
+    dbot.debug("Container item burden = \"" .. itemBurden .. "\"")
+  end -- if
+
+  if (weightReduction ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldWeightReduction,
+                           dbot.tonumber(weightReduction))
+    dbot.debug("Container weight reduction = \"" .. weightReduction .. "\"")
+  end -- if
+
+
+  if (int ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldInt, dbot.tonumber(int))
+    dbot.debug("int = \"" .. int .. "\"")
+  end -- if
+
+  if (wis ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldWis, dbot.tonumber(wis))
+    dbot.debug("wis = \"" .. wis .. "\"")
+  end -- if
+
+  if (luck ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldLuck, dbot.tonumber(luck))
+    dbot.debug("luck = \"" .. luck .. "\"")
+  end -- if
+
+  if (str ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldStr, dbot.tonumber(str))
+    dbot.debug("str = \"" .. str .. "\"")
+  end -- if
+
+  if (dex ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldDex, dbot.tonumber(dex))
+    dbot.debug("dex = \"" .. dex .. "\"")
+  end -- if
+
+  if (con ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldCon, dbot.tonumber(con))
+    dbot.debug("con = \"" .. con .. "\"")
+  end -- if
+
+  if (hp ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldHP, dbot.tonumber(hp))
+    dbot.debug("hp = \"" .. hp .. "\"")
+  end -- if
+
+  if (mana ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldMana, dbot.tonumber(mana))
+    dbot.debug("mana = \"" .. mana .. "\"")
+  end -- if
+
+  if (moves ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldMoves, dbot.tonumber(moves))
+    dbot.debug("moves = \"" .. moves .. "\"")
+  end -- if
+
+  if (hit ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldHit, dbot.tonumber(hit))
+    dbot.debug("hit = \"" .. hit .. "\"")
+  end -- if
+
+  if (dam ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldDam, dbot.tonumber(dam))
+    dbot.debug("dam = \"" .. dam .. "\"")
+  end -- if
+
+  if (allphys ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldAllPhys, dbot.tonumber(allphys))
+    dbot.debug("allphys = \"" .. allphys .. "\"")
+  end -- if
+
+  if (allmagic ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldAllMagic, dbot.tonumber(allmagic))
+    dbot.debug("allmagic = \"" .. allmagic .. "\"")
+  end -- if
+
+
+  if (acid ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldAcid, dbot.tonumber(acid))
+    dbot.debug("acid = \"" .. acid .. "\"")
+  end -- if
+
+  if (cold ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldCold, dbot.tonumber(cold))
+    dbot.debug("cold = \"" .. cold .. "\"")
+  end -- if
+
+  if (energy ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldEnergy, dbot.tonumber(energy))
+    dbot.debug("energy = \"" .. energy .. "\"")
+  end -- if
+
+  if (holy ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldHoly, dbot.tonumber(holy))
+    dbot.debug("holy = \"" .. holy .. "\"")
+  end -- if
+
+  if (electric ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldElectric, dbot.tonumber(electric))
+    dbot.debug("electric = \"" .. electric .. "\"")
+  end -- if
+
+  if (negative ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldNegative, dbot.tonumber(negative))
+    dbot.debug("negative = \"" .. negative .. "\"")
+  end -- if
+
+  if (shadow ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldShadow, dbot.tonumber(shadow))
+    dbot.debug("shadow = \"" .. shadow .. "\"")
+  end -- if
+
+  if (magic ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldMagic, dbot.tonumber(magic))
+    dbot.debug("magic = \"" .. magic .. "\"")
+  end -- if
+
+  if (air ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldAir, dbot.tonumber(air))
+    dbot.debug("air = \"" .. air .. "\"")
+  end -- if
+
+  if (earth ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldEarth, dbot.tonumber(earth))
+    dbot.debug("earth = \"" .. earth .. "\"")
+  end -- if
+
+  if (fire ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldFire, dbot.tonumber(fire))
+    dbot.debug("fire = \"" .. fire .. "\"")
+  end -- if
+
+  if (light ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldLight, dbot.tonumber(light))
+    dbot.debug("light = \"" .. light .. "\"")
+  end -- if
+
+  if (mental ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldMental, dbot.tonumber(mental))
+    dbot.debug("mental = \"" .. mental .. "\"")
+  end -- if
+
+  if (sonic ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldSonic, dbot.tonumber(sonic))
+    dbot.debug("sonic = \"" .. sonic .. "\"")
+  end -- if
+
+  if (water ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldWater, dbot.tonumber(water))
+    dbot.debug("water = \"" .. water .. "\"")
+  end -- if
+
+  if (poison ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldPoison, dbot.tonumber(poison))
+    dbot.debug("poison = \"" .. poison .. "\"")
+  end -- if
+
+  if (disease ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldDisease, dbot.tonumber(disease))
+    dbot.debug("disease = \"" .. disease .. "\"")
+  end -- if
+
+  if (slash ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldSlash, dbot.tonumber(slash))
+    dbot.debug("slash = \"" .. slash .. "\"")
+  end -- if
+
+  if (pierce ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldPierce, dbot.tonumber(pierce))
+    dbot.debug("pierce = \"" .. pierce .. "\"")
+  end -- if
+
+  if (bash ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldBash, dbot.tonumber(bash))
+    dbot.debug("bash = \"" .. bash .. "\"")
+  end -- if
+
+
+  if (avedam ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldAveDam, dbot.tonumber(avedam))
+    dbot.debug("avedam = \"" .. avedam .. "\"")
+  end -- if
+
+  if (inflicts ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldInflicts, inflicts)
+    dbot.debug("inflicts = \"" .. inflicts .. "\"")
+  end -- if
+
+  if (damtype ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldDamType, damtype)
+    dbot.debug("damtype = \"" .. damtype .. "\"")
+  end -- if
+
+  if (weaponType ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldWeaponType, weaponType)
+    dbot.debug("weaponType = \"" .. weaponType .. "\"")
+  end -- if
+
+  if (specials ~= nil) then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldSpecials, specials)
+    dbot.debug("specials = \"" .. specials .. "\"")
+  end -- if
+
+end -- inv.items.trigger.itemIdStats
+
+
+function inv.items.trigger.itemIdEnd()
+
+  -- We are at the end of the identification trigger process.  We no longer need the
+  -- identification timeout timer and we don't want it going off later.  The deletion
+  -- can fail if we are here because the timeout timer called this function.  However,
+  -- in that case, the timer will go away anyway because it is a one-shot so we don't
+  -- care if the deletion fails.
+  dbot.deleteTimer(inv.items.timer.idTimeoutName)
+
+  -- We are done id'ing this item so disable the item's trigger
+  EnableTrigger(inv.items.trigger.itemIdStartName, false)
+  EnableTrigger(inv.items.trigger.itemIdStatsName, false)
+
+  -- Because I'm paranoid...
+  if (inv.items.identifyPkg == nil) then
+    dbot.debug("inv.items.trigger.itemIdEnd: identify package is nil!")
+    return DRL_RET_INTERNAL_ERROR
+  end -- if
+
+  -- Check if something interferred with the identification.  The "dbot.execute" package
+  -- guarantees that the user can't manually try to ID something at the same moment we 
+  -- are doing our background identification.  In theory, there shouldn't be any potential
+  -- conflict here (i.e., we get back ID results for a different item).  However, it's
+  -- probably still helpful to check if the ID we get back matches what we expect.  I'd 
+  -- rather find out what is happening the easy way than the hard way...
+  -- Note: Auctions and shop items are not ID'ed with their objId (we don't know the objID
+  --       until identification completes) so we don't worry about this check for those cases.
+  local objId = inv.items.getStatField(inv.items.identifyPkg.objId, invStatFieldId)
+  local objLoc = inv.items.getField(inv.items.identifyPkg.objId, invFieldObjLoc)
+  if (objId ~= inv.items.identifyPkg.objId) and (objLoc ~= invItemLocAuction) and 
+     (objLoc ~= invItemLocShopkeeper) then
+    dbot.debug("Identification wasn't successful for item " .. inv.items.identifyPkg.objId ..
+               ": Try again later...")
+    inv.items.identifyPkg = nil
+    return DRL_RET_BUSY
+  end -- if
+
+  -- If we made it through the identification process without discovering we have a
+  -- partial identification (e.g., "A full appraisal will reveal further information...")
+  -- then we flag it as having passed a full identification.  As a precaution, we also
+  -- verify, at a minimum, that we were able to detect the object's ID.  If something
+  -- went wrong during the item's identification then the item's stat table might be empty.
+  -- In that case, we want to leave the identifyLevel at "none" so that we re-identify the
+  -- item on the next scan.
+  if (inv.items.getField(inv.items.identifyPkg.objId, invFieldIdentifyLevel) == invIdLevelNone) then
+    inv.items.setField(inv.items.identifyPkg.objId, invFieldIdentifyLevel, invIdLevelFull)
+  end -- if
+
+  local itemType = inv.items.getStatField(inv.items.identifyPkg.objId, invStatFieldType) or ""
+  local itemName = inv.items.getStatField(inv.items.identifyPkg.objId, invStatFieldName) or ""
+  local itemWearable = inv.items.getStatField(inv.items.identifyPkg.objId, invStatFieldWearable) or ""
+  local affectMods = inv.items.getStatField(inv.items.identifyPkg.objId, invStatFieldAffectMods) or ""
+
+  -- Add "pseudo-stats" based on item effects (aard terminology is "affect mods") and on
+  -- skills specific to particular items or item types.  These make it easier to score
+  -- items and item sets.
+  if (affectMods ~= "") then
+    -- Strip out commas from the list so that we can easily pull mod words out of the string
+    local modList = string.gsub(affectMods, ",", ""):lower()
+    for mod in modList:gmatch("%S+") do
+      inv.items.setStatField(inv.items.identifyPkg.objId, mod, 1)
+    end -- for
+  end -- if
+
+  -- Add one-off item skills that are not officially affectMods but are very similar
+  if (itemName == "Aardwolf Bracers of Iron Grip") then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invItemEffectsIronGrip, 1)
+  elseif (itemName == "Aardwolf Gloves of Dexterity") then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invItemEffectsDualWield, 1)
+  elseif (itemWearable == "shield") then
+    inv.items.setStatField(inv.items.identifyPkg.objId, invItemEffectsShield, 1)
+  end -- if
+
+  -- Some items have item types that simply don't make sense.  For example, many aarditems that
+  -- are armor are labeled with type "Treasure".  Although they could certainly be considered
+  -- treasure, I think it makes more sense to treat them as armor.  Otherwise someone searching
+  -- for armor in the inventory table won't find them.  We use a kludge here to "fix" this...
+--[[ TODO: do we really want this?
+  if (itemType == "Treasure") then
+    if (itemName == "Aardwolf Aura of Sanctuary")    or
+       (itemName == "Aardwolf Ring of Regeneration") or
+       (itemName == "Aardwolf Gloves of Dexterity")  or
+       (itemName == "Aardwolf Bracers of Iron Grip") or
+       (itemName == "a ring of the Dark Eight")      then
+      inv.items.setStatField(inv.items.identifyPkg.objId, invStatFieldType, "Armor")
+    end -- if
+  end -- if
+--]]
+
+  -- The identification process is done!
+  inv.items.identifyPkg = nil
+
+end -- inv.items.trigger.itemIdEnd
+
+
+inv.items.trigger.idItemName = "drlInvItemsTriggerIdItem"
+inv.items.trigger.lastLineHyphens = false
+function inv.items.trigger.idItem(line)
+  local _, _, id = string.find(line, "Id%s+:%s+(%d+)%s+")
+  if (id ~= nil) then
+    inv.lastIdentifiedObjectId = id
+  end -- if
+
+  if (line == "You do not have that item.") then
+    dbot.debug("You do not have the relative item.")
+    inv.lastIdentifiedObjectId = 0
+  elseif (inv.items.trigger.lastLineHyphens == true) and ((line == nil) or (line == "")) then
+    EnableTrigger(inv.items.trigger.idItemName, false)
+    dbot.debug("Disabling ID trigger on line=\"" .. line .. "\"")
+  end -- if
+
+  if (string.find(line, "^[+][-]+[+]")) then
+    inv.items.trigger.lastLineHyphens = true
+  else
+    inv.items.trigger.lastLineHyphens = false
+  end -- if
+
+end -- inv.items.trigger.idItem
+
+
+inv.items.trigger.itemDataStartName = "drlInvItemsTriggerItemDataStart"
+inv.items.trigger.itemDataStatsName = "drlInvItemsTriggerItemDataStats"
+inv.items.trigger.itemDataEndName   = "drlInvItemsTriggerItemDataEnd"
+
+function inv.items.trigger.itemDataStart(dataType, containerId)
+  assert((inv.items.discoverPkg ~= nil), "Discovery start trigger executed when discovery is not in progress")
+
+  -- We are scanning worn items, main inventory items, keyring items, or a container
+  if (dataType == "eqdata") then
+    inv.items.discoverPkg.loc = invItemLocWorn
+  elseif (dataType == "invdata") then
+    containerIdNum = tonumber(containerId)
+    if (containerIdNum == nil) then
+      inv.items.discoverPkg.loc = invItemLocInventory
+    else
+      inv.items.discoverPkg.loc = containerId
+    end -- if
+  elseif (dataType == "keyring") then
+    inv.items.discoverPkg.loc = invItemLocKeyring
+  else
+    dbot.error("inv.items.trigger.itemDataStart: invalid dataType parameter")
+    inv.items.trigger.itemDataEnd() -- clean up state
+    return DRL_RET_INTERNAL_ERROR
+  end -- if
+
+  -- Watch for the eqdata, invdata, or keyring end tag so that we can stop scanning
+  AddTriggerEx(inv.items.trigger.itemDataEndName,
+               "^{/(eqdata|invdata|keyring)}$",
+               "inv.items.trigger.itemDataEnd()",
+               drlTriggerFlagsBaseline + trigger_flag.OneShot + trigger_flag.OmitFromOutput,
+               custom_colour.Custom11, 0, "", "", sendto.script, 0)
+
+  -- Start watching for eqdata or invdata stat lines in the item description
+  EnableTrigger(inv.items.trigger.itemDataStatsName, true)
+
+  return DRL_RET_SUCCESS
+end -- inv.items.trigger.itemDataStart
+
+
+function inv.items.trigger.itemDataStats(objId, flags, itemName, level, typeField, unique, wearLoc,
+                                         timer, isInvItem)
+  local retval = DRL_RET_SUCCESS
+
+  -- Verify the input params exist
+  assert(objId     ~= nil, "invitem objectId is nil")
+  assert(flags     ~= nil, "invitem flags is nil")
+  assert(itemName  ~= nil, "invitem itemName is nil")
+  assert(level     ~= nil, "invitem level is nil")
+  assert(typeField ~= nil, "invitem typeField is nil")
+  assert(unique    ~= nil, "invitem unique is nil")
+  assert(wearLoc   ~= nil, "invitem wear location is nil")
+  assert(timer     ~= nil, "invitem timer is nil")
+  assert((isInvItem == true) or (isInvItem == false), "isInvItem parameter is not a boolean")
+
+  -- Verify the numeric input params are numbers
+  objId = tonumber(objId)
+  level = tonumber(level)
+  typeField = tonumber(typeField)
+  unique = tonumber(unique)
+  wearLoc = tonumber(wearLoc)
+  timer = tonumber(timer)
+  if (objId == nil) or (level == nil) or (typeField == nil) or (unique == nil) or 
+     (wearLoc == nil) or (timer == nill) then
+    dbot.warn("inv.items.trigger.itemDataStats: Detected malformed invitem trigger: " ..
+              "numeric parameters are not numbers")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  -- Get a text name for the item type
+  assert((invmon.typeStr ~= nil) and (invmon.typeStr[typeField] ~= nil), 
+         "Invalid invdata item type " .. typeField)
+  local typeName = invmon.typeStr[typeField]
+
+  -- Get the wear location
+  local wearLocText = inv.wearLoc[wearLoc]
+  if (wearLocText == nil) or (wearLocText == "") then
+    dbot.error("inv.items.trigger.itemDataStats: undefined wear location \"" .. (wearLoc or "nil") .. "\"")
+    return DRL_RET_INTERNAL_ERROR
+  end -- if
+
+  -- Check if the item is already in the table and get a reference to it if it is
+  item = inv.items.getEntry(objId)
+
+  -- If we got here via the invitem trigger and the item already exists, then flag the item as having
+  -- possibly changed so that we can re-identify it to see what changed
+  if (isInvItem == true) then
+    if (item ~= nil) then
+      retval = inv.items.setField(objId, invFieldIdentifyLevel, invIdLevelNone)
+    else
+      -- Check if the item is in the frequent item cache.  If it is, there's no need to identify it :)
+      local cachedEntry = inv.cache.get(inv.cache.frequent.table, itemName)
+      if (cachedEntry ~= nil) then
+        cachedEntry.stats.id = objId
+        retval = inv.items.setEntry(objId, cachedEntry)
+        dbot.note("Identified \"" .. (inv.items.getField(objId, invFieldColorName) or "Unidentified") ..
+                  "@W" .. DRL_ANSI_WHITE .. "\" (" .. objId .. ") from frequent cache")
+
+        -- This item instance probably wasn't in the recent item cache because we don't cache
+        -- items that are duplicated in the frequent item cache.  However, it's possible that
+        -- the item wasn't in the frequent cache at the time it left our inventory but it is
+        -- in the cache now because another instance added it to the frequent cache.  In this
+        -- scenario, we want to ensure that we remove the instance from the recent cache to
+        -- help keep that cache uncluttered.
+        inv.cache.remove(inv.cache.recent.table, objId)
+      else
+        -- Create an entry for this item.  We don't know much yet, but fill in the little we know
+        -- about the item.  We don't know the full colorized name yet, but we can use the basic name
+        -- for now and this is sufficient to support the frequent item cache.  We will fill in the 
+        -- full colorized name once we know it.
+        retval = inv.items.add(objId)
+        -- Use a basic name for the colorized name if necessary
+        inv.items.setField(objId, invFieldColorName, itemName)
+      end -- if
+    end -- if
+  else -- we got here from an eqdata or invdata request
+    -- Remember that we saw this item during a discovery/refresh.  This lets us prune items that
+    -- are listed in the inventory table but are no longer in our inventory.  This situation could
+    -- happen if the user exited(crashed?) after making an inventory change but before saving the change.
+    -- It could also happen if the user temporarily disables invmon or if the user makes a change outside
+    -- of mushclient (e.g., via telnet).
+    inv.items.currentItems[objId] = { discovered = true }
+
+    -- Add the current item to the inventory table if it doesn't exist yet and we are in eqdata or invdata
+    -- discovery mode
+    if (item == nil) and (inv.items.discoverPkg ~= nil) then
+      retval = inv.items.add(objId)
+      if (retval ~= DRL_RET_SUCCESS) then
+        dbot.warn("inv.items.trigger.itemDataStats: Failed to add item " .. objId .. 
+                  ": error " .. dbot.retval.getString(retval))
+        return retval
+      end -- if 
+    end -- if
+
+    -- Set the item's location: worn equipment slot, main inventory, keyring, or a container
+    -- You may wonder why we always set the location instead of just doing it in the above clause
+    -- for when the item is added.  We do this to help recover from the situation where the inventory
+    -- table gets out of sync (e.g., user exits before save completes, makes changes outside of
+    -- mushclient, accidentally disables invmon, etc.)
+    if (inv.items.discoverPkg.loc == invItemLocWorn) then
+      retval = inv.items.setField(objId, invFieldObjLoc, wearLocText)
+    elseif (inv.items.discoverPkg.loc == invItemLocInventory) then
+      retval = inv.items.setField(objId, invFieldObjLoc, invItemLocInventory)
+    elseif (inv.items.discoverPkg.loc == invItemLocKeyring) then
+      retval = inv.items.setField(objId, invFieldObjLoc, invItemLocKeyring)
+    else -- the item is in a container
+      retval = inv.items.setField(objId, invFieldObjLoc, tonumber(inv.items.discoverPkg.loc))
+    end -- if
+
+    -- Set the colorized name of the
+    retval = inv.items.setField(objId, invFieldColorName, itemName)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.items.trigger.itemDataStats: Failed to set colorName for item " .. objId .. 
+                ": error " .. dbot.retval.getString(retval))
+      return retval
+     end -- if
+  end -- if
+
+  dbot.debug("inv.items.trigger.itemDataStats: object " .. objId .. ", flags=\"" .. flags .. 
+             "\", itemName=\"" .. itemName .. "@W\", level=" .. level .. ", type=" .. typeName .. 
+             ", unique=" .. unique .. ", wearLoc=\"" .. wearLocText .. "\", timer=" .. timer)
+
+  -- We're done!
+  return retval
+end -- inv.items.trigger.itemDataStats
+
+
+function inv.items.trigger.itemDataEnd()
+  -- We are done with the eqdata or invdata output
+  EnableTrigger(inv.items.trigger.itemDataStartName, false)
+  EnableTrigger(inv.items.trigger.itemDataStatsName, false)
+
+  inv.items.discoverPkg = nil
+end -- inv.items.trigger.itemDataEnd
+
+
+inv.items.trigger.invmonName  = "drlInvItemsTriggerInvmon"
+inv.items.trigger.invitemName = "drlInvItemsTriggerInvitem"
+
+function inv.items.trigger.invmon(action, objId, containerId, wearLoc)
+  local retval = DRL_RET_SUCCESS
+
+  -- Verify the input params exist
+  assert(action ~= nil, "invmon action is nil")
+  assert(objId ~= nil, "invmon objectId is nil")
+  assert(containerId ~= nil, "invmon containerId is nil")
+  assert(wearLoc ~= nil, "invmon wear location is nil")
+
+  -- Verify the input params are numbers
+  action = tonumber(action)
+  objId = tonumber(objId)
+  containerId = tonumber(containerId)
+  wearLoc = tonumber(wearLoc)
+  if (action == nil) or (objId == nil) or (containerId == nil) or (wearLoc == nil) then
+    dbot.debug("Detected malformed invmon trigger: parameters are not numbers")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  -- Get the action
+  assert(invmon.action[action] ~= nil, "Undefined invmon action " .. action)
+
+  -- Get the containerId and container basic stats (only valid for invmonActionTakenOutOfContainer
+  -- and invmonActionPutIntoContainer)
+  local containerText
+  local holding, itemsInside, totWeight, weightReduction, itemWeight
+  if (containerId == -1) then
+    containerText = "none"
+  else
+    containerText = containerId
+
+    holding = tonumber(inv.items.getStatField(containerId, invStatFieldHolding) or "")
+    itemsInside = tonumber(inv.items.getStatField(containerId, invStatFieldItemsInside) or "")
+    totWeight = tonumber(inv.items.getStatField(containerId, invStatFieldTotWeight) or "")
+    weightReduction = tonumber(inv.items.getStatField(containerId, invStatFieldWeightReduction) or "")
+    itemWeight = tonumber(inv.items.getStatField(objId, invStatFieldWeight) or "")
+  end -- if
+
+  -- Get the wear location (only valid for invmonActionRemoved or invmonActionWorn)
+  local wearLocText = inv.wearLoc[wearLoc]
+  if (wearLocText == nil) or (wearLocText == "") then
+    dbot.error("inv.items.trigger.invmon: undefined wear location \"" .. (wearLoc or "nil") .. "\"")
+    return DRL_RET_INTERNAL_ERROR
+  end -- if
+
+  dbot.debug("Invmon trigger: " .. invmon.action[action] .. " object " .. objId .. 
+             ", container=" .. containerText .. ", wearLoc=" .. wearLocText)
+
+  -- Add the current item to the inventory table if it doesn't exist yet
+  local item = inv.items.getEntry(objId)
+  if (item == nil) then
+    retval = inv.items.add(objId)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.items.trigger.invmon: Failed to add item " .. objId .. ": error " ..
+                dbot.retval.getString(retval))
+      return retval
+    end -- if 
+  end -- if
+
+  -- If the item isn't identified and we aren't already in the middle of a refresh, schedule an
+  -- inventory refresh a few seconds from now.  That will give some time to buffer up a few items
+  -- if we picked up several things.
+  local idLevel = inv.items.getField(objId, invFieldIdentifyLevel)
+  if (idLevel == invIdLevelNone) and (inv.state == invStateIdle) then
+    inv.items.refreshAtTime(0, 5)
+  end -- if
+
+  if (action == invmonActionRemoved) then
+    if (idLevel == invIdLevelNone) then
+      inv.items.mainState = invItemsRefreshDirty -- we want to rescan main inventory now
+    end -- if
+
+    retval = inv.items.setField(objId, invFieldObjLoc, invItemLocInventory)
+
+  elseif (action == invmonActionWorn) then
+    retval = inv.items.setField(objId, invFieldObjLoc, wearLocText)
+
+  elseif (action == invmonActionRemovedFromInv) then
+    -- If the item is a container, this will remove any items in the container too
+    retval = inv.items.remove(objId)
+
+  elseif (action == invmonActionAddedToInv) then
+    inv.items.mainState = invItemsRefreshDirty -- we want to rescan main inventory now
+
+    retval = inv.items.setField(objId, invFieldObjLoc, invItemLocInventory)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.items.trigger.invmon: Failed to set location for " .. objId .. ": error "
+                .. dbot.retval.getString(retval))
+      return retval
+    end -- if 
+
+  elseif (action == invmonActionTakenOutOfContainer) then
+    if (idLevel == invIdLevelNone) then
+      -- An unidentified item is now in main inventory so we want to rescan our main inventory
+      inv.items.mainState = invItemsRefreshDirty
+
+      -- The container's stats just changed because the item was removed.  We don't know the
+      -- item's weight (or anything else) yet so we can't automatically update the container's
+      -- stats.  In this case, we mark the container as not being identified so that we will
+      -- re-identify it.
+      inv.items.setField(containerId, invFieldIdentifyLevel, invIdLevelNone)
+    else
+      -- Update the container's stats based on this item's removal
+      if (holding == nil) or (itemsInside == nil) or (totWeight == nil) or 
+         (weightReduction == nil) or (weightReduction == 0) or (itemWeight == nil) then
+        -- If we don't have all of the container's stats, force a full re-identification
+        inv.items.setField(containerId, invFieldIdentifyLevel, invIdLevelNone)
+      else
+        holding = holding - (tonumber(inv.items.getStatField(objId, invStatFieldWeight) or "") or 0)
+        itemsInside = itemsInside - 1
+        totWeight = totWeight - (itemWeight * weightReduction / 100)
+      end -- if
+    end -- if
+
+    inv.items.setField(objId, invFieldHomeContainer, containerId)
+    retval = inv.items.setField(objId, invFieldObjLoc, invItemLocInventory)
+
+  elseif (action == invmonActionPutIntoContainer) then
+    -- If we are putting an item into a container before we get a chance to ID it, flag the
+    -- container as being dirty so that we rescan it at our next opportunity
+    if (idLevel == invIdLevelNone) then
+      inv.items.keyword(invItemsRefreshClean, invKeywordOpRemove, "id " .. containerId, true)
+
+      -- The container's stats just changed because the item was added.  We don't know the
+      -- item's weight (or anything else) yet so we can't automatically update the container's
+      -- stats.  In this case, we mark the container as not being identified so that we will
+      -- re-identify it.
+      inv.items.setField(containerId, invFieldIdentifyLevel, invIdLevelNone)
+    else
+      -- Update the container's stats based on this item's addition
+      if (holding == nil) or (itemsInside == nil) or (totWeight == nil) or 
+         (weightReduction == nil) or (weightReduction == 0) or (itemWeight == nil) then
+        -- If we don't have all of the container's stats, force a full re-identification
+        inv.items.setField(containerId, invFieldIdentifyLevel, invIdLevelNone)
+      else
+        holding = holding + (tonumber(inv.items.getStatField(objId, invStatFieldWeight) or "") or 0)
+        itemsInside = itemsInside + 1
+        totWeight = totWeight + (itemWeight * weightReduction / 100)
+      end -- if
+    end -- if
+
+    retval = inv.items.setField(objId, invFieldObjLoc, containerId)
+
+  elseif (action == invmonActionConsumed) then
+    retval = inv.items.remove(objId)
+
+  elseif (action == invmonActionPutIntoVault) then
+    -- If the item is a container, this will remove any items in the container too
+    retval = inv.items.remove(objId) 
+
+  elseif (action == invmonActionRemovedFromVault) then
+    inv.items.mainState = invItemsRefreshDirty -- we want to rescan main inventory now
+
+    -- If we removed a container from the vault, we'll recursively add the contents of
+    -- the container when we identify the container
+    retval = inv.items.setField(objId, invFieldObjLoc, invItemLocInventory)
+
+  elseif (action == invmonActionPutIntoKeyring) then
+    -- If we are putting an item into the keyring before we get a chance to ID it, flag the
+    -- keyring as being dirty so that we rescan it at our next opportunity
+    if (idLevel == invIdLevelNone) then
+      inv.items.keyringState = invItemsRefreshDirty
+    end -- if
+
+    retval = inv.items.setField(objId, invFieldObjLoc, invItemLocKeyring)
+
+  elseif (action == invmonActionGetFromKeyring) then
+    if (idLevel == invIdLevelNone) then
+      inv.items.mainState = invItemsRefreshDirty -- we want to rescan main inventory now
+    end -- if
+
+    retval = inv.items.setField(objId, invFieldObjLoc, invItemLocInventory)
+  end -- if
+
+  -- If we updated a container's stats by adding or removing an item and if the container is not
+  -- already in line to be re-identified, update the container's stats now.  We don't bother saving
+  -- this state because even if mushclient crashes before we save the state, the container's stats
+  -- will be re-read and updated automatically the next time the plugin is loaded.  There's no 
+  -- reason to pay for the overhead of writing out the inventory table state right now.
+  if ((action == invmonActionTakenOutOfContainer) or (action == invmonActionPutIntoContainer)) and
+     (inv.items.getField(containerId, invFieldIdentifyLevel) ~= invIdLevelNone) then
+    inv.items.setStatField(containerId, invStatFieldHolding, holding)
+    inv.items.setStatField(containerId, invStatFieldItemsInside, itemsInside)
+    inv.items.setStatField(containerId, invStatFieldTotWeight, totWeight)
+  end -- if
+
+  return retval
+
+end -- inv.items.trigger.invmon
+
+
+----------------------------------------------------------------------------------------------------
+-- inv.items.timer: Timer functions for the inv.items module
+--
+-- Functions:
+--  inv.items.timer.idTimeout()
+--
+----------------------------------------------------------------------------------------------------
+
+inv.items.timer = {}
+
+inv.items.timer.refreshName = "drlInvItemsTimerRefresh"
+inv.items.timer.refreshMin  = 5 -- by default, run the item refresh timer every 5 minutes, 0 seconds
+inv.items.timer.refreshSec  = 0
+
+inv.items.timer.idTimeoutName         = "drlInvItemsTimerIdTimeout"
+inv.items.timer.idTimeoutThresholdSec = 15  -- timeout the id request if it doesn't complete in this # sec
+inv.items.timer.idTimeoutPeriodSec    = 0.1 -- # sec to sleep between polls for an id request to complete
+
+-- If we fail to complete an identification request in the allotted time, a timer will call
+-- this function to clean up the pending identification request.
+function inv.items.timer.idTimeout()
+  dbot.warn("inv.items.timer.idTimeout: Identification timeout timer just triggered!  " ..
+            "Item identification did not complete!")
+
+  -- Clean up the identification request
+  inv.items.trigger.itemIdEnd()
+end -- inv.items.timer.idTimeout
+
+
+----------------------------------------------------------------------------------------------------
+-- Item locations and wearable locations
+----------------------------------------------------------------------------------------------------
+
+invItemLocUninitialized = "uninitialized"
+invItemLocInventory     = "inventory"
+invItemLocVault         = "vault"
+invItemLocKeyring       = "keyring"
+invItemLocWorn          = "worn"
+invItemLocAuction       = "auction"
+invItemLocShopkeeper    = "shopkeeper"
+
+invIdLevelNone    = "none"  -- item has not be ID'ed in any way
+invIdLevelPartial = "partial" -- item has been partially ID'ed  but more details are hidden
+invIdLevelFull    = "full"  -- item has been ID'ed fully and no details are hidden
+
+invWearableLocUndefined = -1
+invWearableLocLight     = 0
+invWearableLocHead      = 1
+invWearableLocEyes      = 2
+invWearableLocLear      = 3
+invWearableLocRear      = 4
+invWearableLocNeck1     = 5
+invWearableLocNeck2     = 6
+invWearableLocBack      = 7
+invWearableLocMedal1    = 8
+invWearableLocMedal2    = 9
+invWearableLocMedal3    = 10
+invWearableLocMedal4    = 11
+invWearableLocTorso     = 12
+invWearableLocBody      = 13
+invWearableLocWaist     = 14
+invWearableLocArms      = 15
+invWearableLocLwrist    = 16
+invWearableLocRwrist    = 17
+invWearableLocHands     = 18
+invWearableLocLfinger   = 19
+invWearableLocRfinger   = 20
+invWearableLocLegs      = 21
+invWearableLocFeet      = 22
+invWearableLocShield    = 23
+invWearableLocWielded   = 24
+invWearableLocSecond    = 25
+invWearableLocHold      = 26
+invWearableLocFloat     = 27
+invWearableLocAbove     = 30
+invWearableLocPortal    = 31
+invWearableLocSleeping  = 32
+
+inv.wearLoc = {}
+inv.wearLoc[invWearableLocUndefined] = "undefined"
+inv.wearLoc[invWearableLocLight]     = "light"
+inv.wearLoc[invWearableLocHead]      = "head"
+inv.wearLoc[invWearableLocEyes]      = "eyes"
+inv.wearLoc[invWearableLocLear]      = "lear"
+inv.wearLoc[invWearableLocRear]      = "rear"
+inv.wearLoc[invWearableLocNeck1]     = "neck1"
+inv.wearLoc[invWearableLocNeck2]     = "neck2"
+inv.wearLoc[invWearableLocBack]      = "back"
+inv.wearLoc[invWearableLocMedal1]    = "medal1"
+inv.wearLoc[invWearableLocMedal2]    = "medal2"
+inv.wearLoc[invWearableLocMedal3]    = "medal3"
+inv.wearLoc[invWearableLocMedal4]    = "medal4"
+inv.wearLoc[invWearableLocTorso]     = "torso"
+inv.wearLoc[invWearableLocBody]      = "body"
+inv.wearLoc[invWearableLocWaist]     = "waist"
+inv.wearLoc[invWearableLocArms]      = "arms"
+inv.wearLoc[invWearableLocLwrist]    = "lwrist"
+inv.wearLoc[invWearableLocRwrist]    = "rwrist"
+inv.wearLoc[invWearableLocHands]     = "hands"
+inv.wearLoc[invWearableLocLfinger]   = "lfinger"
+inv.wearLoc[invWearableLocRfinger]   = "rfinger"
+inv.wearLoc[invWearableLocLegs]      = "legs"
+inv.wearLoc[invWearableLocFeet]      = "feet"
+inv.wearLoc[invWearableLocShield]    = "shield"
+inv.wearLoc[invWearableLocWielded]   = "wielded"
+inv.wearLoc[invWearableLocSecond]    = "second"
+inv.wearLoc[invWearableLocHold]      = "hold"
+inv.wearLoc[invWearableLocFloat]     = "float"
+inv.wearLoc[invWearableLocAbove]     = "above"
+inv.wearLoc[invWearableLocPortal]    = "portal"
+inv.wearLoc[invWearableLocSleeping]  = "sleeping"
+
+
+inv.wearables = { light    = { "light" },
+                  head     = { "head" },
+                  eyes     = { "eyes" },
+                  ear      = { "lear", "rear" },
+                  neck     = { "neck1", "neck2" },
+                  back     = { "back" },
+                  medal    = { "medal1", "medal2", "medal3", "medal4" },
+                  torso    = { "torso" },
+                  body     = { "body" },
+                  waist    = { "waist" },
+                  arms     = { "arms" },
+                  wrist    = { "lwrist", "rwrist" },
+                  hands    = { "hands" },
+                  finger   = { "lfinger", "rfinger" },
+                  legs     = { "legs" },
+                  feet     = { "feet" },
+                  shield   = { "shield" },
+                  wield    = { "wielded", "second" },
+                  hold     = { "hold" },
+                  float    = { "float" },
+                  above    = { "above" },
+                  portal   = { "portal" },
+                  sleeping = { "sleeping" } }              
+
+
+----------------------------------------------------------------------------------------------------
+-- Definitions for fields in identified items
+----------------------------------------------------------------------------------------------------
+
+inv.stats                 = {}
+inv.stats.id              = { name = "id",
+                              desc = "Unique identifier for the item" }
+inv.stats.name            = { name = "name",
+                              desc = "List of words in the name of the item" }
+inv.stats.level           = { name = "level",
+                              desc = "Level at which you may use the item (doesn't account for tier bonuses)" }
+inv.stats.weight          = { name = "weight",
+                              desc = "Base weight of the item" }
+inv.stats.wearable        = { name = "wearable",
+                              desc = "The item is wearable.  Run \"@Gwearable@W\" to see a list of locations." }
+inv.stats.score           = { name = "score",
+                              desc = "Item's score based on aard's priorities: see \"@Gcompare set@W\"" }
+inv.stats.keywords        = { name = "keywords",
+                              desc = "List of keywords representing the item" }
+inv.stats.type            = { name = "type",
+                              desc = "Type of item: see \"@Ghelp eqdata@W\" to see available types" }
+inv.stats.worth           = { name = "worth",
+                              desc = "How much gold this item is worth" }
+inv.stats.flags           = { name = "flags",
+                              desc = "List of flags assigned to the item" }
+inv.stats.affectMods      = { name = "affectMods",
+                              desc = "List of effects given by the item" }
+inv.stats.material        = { name = "material",
+                              desc = "Specifies what the item is made of" }
+inv.stats.foundAt         = { name = "foundAt",
+                              desc = "The item was found at this area" }
+inv.stats.ownedBy         = { name = "ownedBy",
+                              desc = "Character who owns this item" }
+inv.stats.clan            = { name = "clan",
+                              desc = "If this is a clan item, this indicates which clan made it" }
+inv.stats.spells          = { name = "spells",
+                              desc = "Spells that this item can cast" }
+inv.stats.leadsTo         = { name = "leadsTo",
+                              desc = "Target destination of a portal" }
+
+inv.stats.capacity        = { name = "capacity",
+                              desc = "How much weight the container can hold" }
+inv.stats.holding         = { name = "holding",
+                              desc = "Number of items held by the container" }
+inv.stats.heaviestItem    = { name = "heaviestItem",
+                              desc = "Weight of the heaviest item in the container" }
+inv.stats.itemsInside     = { name = "itemsInside",
+                              desc = "Number of items currently inside the container" }
+inv.stats.totWeight       = { name = "totWeight",
+                              desc = "Total weight of the container and its contents" }
+inv.stats.itemBurden      = { name = "itemBurden",
+                              desc = "Number of items in the container + 1 (for the container itself)" }
+inv.stats.weightReduction = { name = "weightReduction",
+                              desc = "Container reduces an item's weight to this % of the original weight" }
+
+inv.stats.int             = { name = "int",
+                              desc = "Intelligence points provided by the item" }
+inv.stats.wis             = { name = "wis",
+                              desc = "Wisdom points provided by the item" }
+inv.stats.luck            = { name = "luck",
+                              desc = "Luck points provided by the item" }
+inv.stats.str             = { name = "str",
+                              desc = "Strength points provided by the item" }
+inv.stats.dex             = { name = "dex",
+                              desc = "Dexterity points provided by the item" }
+inv.stats.con             = { name = "con",
+                              desc = "Constitution points provided by the item" }
+
+inv.stats.hp              = { name = "hp",
+                              desc = "Hit points provided by the item" }
+inv.stats.mana            = { name = "mana",
+                              desc = "Mana points provided by the item" }
+inv.stats.moves           = { name = "moves",
+                              desc = "Movement points provided by the item" }
+
+inv.stats.hit             = { name = "hit",
+                              desc = "Hit roll bonus due to the item" }
+inv.stats.dam             = { name = "dam",
+                              desc = "Damage roll bonus due to the item " }
+
+inv.stats.allPhys         = { name = "allPhys",
+                              desc = "Resistance provided against each of the physical resistance types" }
+inv.stats.allMagic        = { name = "allMagic",
+                              desc = "Resistance provided against each of the magical resistance types" }
+
+inv.stats.acid            = { name = "acid",
+                              desc = "Resistance provided against magical attacks of type \"acid\"" }
+inv.stats.cold            = { name = "cold",
+                              desc = "Resistance provided against magical attacks of type \"cold\"" }
+inv.stats.energy          = { name = "energy",
+                              desc = "Resistance provided against magical attacks of type \"energy\"" }
+inv.stats.holy            = { name = "holy",
+                              desc = "Resistance provided against magical attacks of type \"holy\"" }
+inv.stats.electric        = { name = "electric",
+                              desc = "Resistance provided against magical attacks of type \"electric\"" }
+inv.stats.negative        = { name = "negative",
+                              desc = "Resistance provided against magical attacks of type \"negative\"" }
+inv.stats.shadow          = { name = "shadow",
+                              desc = "Resistance provided against magical attacks of type \"shadow\"" }
+inv.stats.magic           = { name = "magic",
+                              desc = "Resistance provided against magical attacks of type \"magic\"" }
+inv.stats.air             = { name = "air",
+                              desc = "Resistance provided against magical attacks of type \"air\"" }
+inv.stats.earth           = { name = "earth",
+                              desc = "Resistance provided against magical attacks of type \"earth\"" }
+inv.stats.fire            = { name = "fire",
+                              desc = "Resistance provided against magical attacks of type \"fire\"" }
+inv.stats.light           = { name = "light",
+                              desc = "Resistance provided against magical attacks of type \"light\"" }
+inv.stats.mental          = { name = "mental",
+                              desc = "Resistance provided against magical attacks of type \"mental\"" }
+inv.stats.sonic           = { name = "sonic",
+                              desc = "Resistance provided against magical attacks of type \"sonic\"" }
+inv.stats.water           = { name = "water",
+                              desc = "Resistance provided against magical attacks of type \"water\"" }
+inv.stats.poison          = { name = "poison",
+                              desc = "Resistance provided against magical attacks of type \"poison\"" }
+inv.stats.disease         = { name = "disease",
+                              desc = "Resistance provided against magical attacks of type \"disease\"" }
+
+inv.stats.slash           = { name = "slash",
+                              desc = "Resistance provided against physical attacks of type \"slash\"" }
+inv.stats.pierce          = { name = "pierce",
+                              desc = "Resistance provided against physical attacks of type \"pierce\"" }
+inv.stats.bash            = { name = "bash",
+                              desc = "Resistance provided against physical attacks of type \"bash\"" }
+
+inv.stats.aveDam          = { name = "aveDam",
+                              desc = "Average damage from the weapon" }
+inv.stats.inflicts        = { name = "inflicts",
+                              desc = "Wound type from item: see Wset column in \"@Ghelp damage types@W\"" }
+inv.stats.damType         = { name = "damType",
+                              desc = "Damage type of item: see Damtype column in \"@Ghelp damage types@W\"" }
+inv.stats.weaponType      = { name = "weaponType",
+                              desc = "Type of weapon: see \"@Ghelp weapons@W\" for a list" }
+inv.stats.specials        = { name = "specials",
+                              desc = "See \"@Ghelp weapon flags@W\" for an explanation of special behaviors" }
+
+inv.stats.location        = { name = "location",
+                              desc = "Item ID for the container holding this item" }
+inv.stats.rlocation       = { name = "rlocation",
+                              desc = "Relative name (e.g., \"3.bag\") for the container holding this item" }
+inv.stats.rname           = { name = "rname",
+                              desc = "Relative name (e.g., \"2.dagger\") for the item" }
+inv.stats.organize        = { name = "organize",
+                              desc = "Queries assigned to a container by \"@Gdinv organize ...@W\"" }
+inv.stats.loc             = { name = "loc",
+                              desc = "Shorthand for the \"@G" .. inv.stats.location.name .. "@W\" search key" }
+inv.stats.rloc            = { name = "rloc",
+                              desc = "Shorthand for the \"@G" .. inv.stats.rlocation.name .. "@W\" search key" }
+inv.stats.key             = { name = "key",
+                              desc = "Shorthand for the \"@G" .. inv.stats.keywords.name .. "@W\" search key" }
+inv.stats.keyword         = { name = "keyword",
+                              desc = "Shorthand for the \"@G" .. inv.stats.keywords.name .. "@W\" search key" }
+inv.stats.flag            = { name = "flag",
+                              desc = "Shorthand for the \"@G" .. inv.stats.flags.name .. "@W\" search key" }
+
+invStatFieldId              = string.lower(inv.stats.id.name)
+invStatFieldName            = string.lower(inv.stats.name.name)
+invStatFieldLevel           = string.lower(inv.stats.level.name)
+invStatFieldWeight          = string.lower(inv.stats.weight.name)
+invStatFieldWearable        = string.lower(inv.stats.wearable.name)
+invStatFieldScore           = string.lower(inv.stats.score.name)
+invStatFieldKeywords        = string.lower(inv.stats.keywords.name)
+invStatFieldType            = string.lower(inv.stats.type.name)
+invStatFieldWorth           = string.lower(inv.stats.worth.name)
+invStatFieldFlags           = string.lower(inv.stats.flags.name)
+invStatFieldAffectMods      = string.lower(inv.stats.affectMods.name)
+invStatFieldMaterial        = string.lower(inv.stats.material.name)
+invStatFieldFoundAt         = string.lower(inv.stats.foundAt.name)
+invStatFieldOwnedBy         = string.lower(inv.stats.ownedBy.name)
+invStatFieldClan            = string.lower(inv.stats.clan.name)
+invStatFieldSpells          = string.lower(inv.stats.spells.name)
+invStatFieldLeadsTo         = string.lower(inv.stats.leadsTo.name)
+
+invStatFieldCapacity        = string.lower(inv.stats.capacity.name)
+invStatFieldHolding         = string.lower(inv.stats.holding.name)
+invStatFieldHeaviestItem    = string.lower(inv.stats.heaviestItem.name)
+invStatFieldItemsInside     = string.lower(inv.stats.itemsInside.name)
+invStatFieldTotWeight       = string.lower(inv.stats.totWeight.name)
+invStatFieldItemBurden      = string.lower(inv.stats.itemBurden.name)
+invStatFieldWeightReduction = string.lower(inv.stats.weightReduction.name)
+
+invStatFieldInt             = string.lower(inv.stats.int.name)
+invStatFieldWis             = string.lower(inv.stats.wis.name)
+invStatFieldLuck            = string.lower(inv.stats.luck.name)
+invStatFieldStr             = string.lower(inv.stats.str.name)
+invStatFieldDex             = string.lower(inv.stats.dex.name)
+invStatFieldCon             = string.lower(inv.stats.con.name)
+
+invStatFieldHP              = string.lower(inv.stats.hp.name)
+invStatFieldMana            = string.lower(inv.stats.mana.name)
+invStatFieldMoves           = string.lower(inv.stats.moves.name)
+
+invStatFieldHit             = string.lower(inv.stats.hit.name)
+invStatFieldDam             = string.lower(inv.stats.dam.name)
+
+invStatFieldAllPhys         = string.lower(inv.stats.allPhys.name)
+invStatFieldAllMagic        = string.lower(inv.stats.allMagic.name)
+
+invStatFieldAcid            = string.lower(inv.stats.acid.name)
+invStatFieldCold            = string.lower(inv.stats.cold.name)
+invStatFieldEnergy          = string.lower(inv.stats.energy.name)
+invStatFieldHoly            = string.lower(inv.stats.holy.name)
+invStatFieldElectric        = string.lower(inv.stats.electric.name)
+invStatFieldNegative        = string.lower(inv.stats.negative.name)
+invStatFieldShadow          = string.lower(inv.stats.shadow.name)
+invStatFieldMagic           = string.lower(inv.stats.magic.name)
+invStatFieldAir             = string.lower(inv.stats.air.name)
+invStatFieldEarth           = string.lower(inv.stats.earth.name)
+invStatFieldFire            = string.lower(inv.stats.fire.name)
+invStatFieldLight           = string.lower(inv.stats.light.name)
+invStatFieldMental          = string.lower(inv.stats.mental.name)
+invStatFieldSonic           = string.lower(inv.stats.sonic.name)
+invStatFieldWater           = string.lower(inv.stats.water.name)
+invStatFieldPoison          = string.lower(inv.stats.poison.name)
+invStatFieldDisease         = string.lower(inv.stats.disease.name)
+
+invStatFieldSlash           = string.lower(inv.stats.slash.name)
+invStatFieldPierce          = string.lower(inv.stats.pierce.name)
+invStatFieldBash            = string.lower(inv.stats.bash.name)
+
+invStatFieldAveDam          = string.lower(inv.stats.aveDam.name)
+invStatFieldInflicts        = string.lower(inv.stats.inflicts.name)
+invStatFieldDamType         = string.lower(inv.stats.damType.name)
+invStatFieldWeaponType      = string.lower(inv.stats.weaponType.name)
+invStatFieldSpecials        = string.lower(inv.stats.specials.name)
+
+
+----------------------------------------------------------------------------------------------------
+-- Plugin-specific query keys
+--
+-- Queries can use all of the invStatFieldXXX values as query keys.
+-- Here are some other supported query keys that are convenient.
+----------------------------------------------------------------------------------------------------
+
+invQueryKeyLocation         = string.lower(inv.stats.location.name)
+invQueryKeyRelativeLocation = string.lower(inv.stats.rlocation.name)
+invQueryKeyRelativeName     = string.lower(inv.stats.rname.name)
+invQueryKeyOrganize         = string.lower(inv.stats.organize.name)
+
+invQueryKeyLoc              = string.lower(inv.stats.loc.name)
+invQueryKeyRelativeLoc      = string.lower(inv.stats.rloc.name)
+invQueryKeyKey              = string.lower(inv.stats.key.name)
+invQueryKeyKeyword          = string.lower(inv.stats.keyword.name)
+invQueryKeyFlag             = string.lower(inv.stats.flag.name)
+
+
+----------------------------------------------------------------------------------------------------
+-- The "affect mods" item fields (yes, I really think it should be "effect mods" but I'm sticking
+-- with the aard terminology) include effects you get by wearing certain items.  For example, the
+-- regen ring gives the "regeneration" ability.  However, some item effects are not included in
+-- the "affect mods" field and they do not have official names.  We add a few custom ones here so
+-- that we can have a way to prioritize items that prevent you from dropping weapons, allow you
+-- to dual weapons, or get a defensive bonus because it is a shield.
+----------------------------------------------------------------------------------------------------
+
+invItemEffectsIronGrip  = "irongrip"
+invItemEffectsDualWield = "dualwield"
+invItemEffectsShield    = "shield"
+
+
+----------------------------------------------------------------------------------------------------
+-- Inventory cache subsystem
+----------------------------------------------------------------------------------------------------
+-- The "recent cache" attempts to cache the items that have been most recently removed
+-- from the inventory table.  This lets us re-identify those items very quickly if we
+-- add them back to the inventory at some point.  For example, we may want to drop a bag
+-- of keys and then pick it up again later.  In that case we don't want to re-identify
+-- everything.  Also, we don't want to re-identify everything in our entire inventory
+-- if we die and lose all of our items.
+--
+-- The recent cache is indexed by objId because we are tracking specific item instances.
+-- This differs from the "frequently acquired" cache that is indexed by an item's name.
+--
+-- The "frequently acquired" cache tracks items that are frequently added to your inventory.
+-- For example, we don't want to re-identify the same healing potion 50 times if you buy a
+-- stack of 50 potions.  We keep a generic item entry for items that don't change but are
+-- acquired a lot.  We can skip the full identification procedure if the name of a potion,
+-- pill, food, etc. matches a key in the cache.  In that case, we use the cached details
+-- without performing the identification.
+--
+-- Functions:
+--   inv.cache.init.atActive()
+--   inv.cache.fini(doSaveState)
+--
+--   inv.cache.config(cacheName, numEntries)
+--   inv.cache.save()
+--   inv.cache.load()
+--   inv.cache.reset() -- reset all caches
+--
+--   inv.cache.resetCache(cacheName) -- reset a single specific cache
+--   inv.cache.add
+--   inv.cache.remove
+--   inv.cache.prune
+-- 
+--   inv.cache.get
+--   inv.cache.getSize
+--   inv.cache.setSize
+-- 
+--   inv.cache.dump
+--   inv.cache.clearOld
+-- 
+-- Data:
+--   inv.cache.recent.table
+--   inv.cache.frequent.table
+----------------------------------------------------------------------------------------------------
+
+inv.cache          = {}
+inv.cache.init     = {}
+inv.cache.recent   = {}
+inv.cache.frequent = {}
+
+inv.cache.recent.table   = nil
+inv.cache.frequent.table = nil
+
+inv.cache.recent.name   = "recent"
+inv.cache.frequent.name = "frequent"
+
+inv.cache.recent.stateName   = "inv-cache-recent.state"
+inv.cache.frequent.stateName = "inv-cache-frequent.state"
+
+inv.cache.recent.defaultNumEntries   = 500
+inv.cache.frequent.defaultNumEntries = 100
+
+inv.cache.recent.prunePercent   = 0.2
+inv.cache.frequent.prunePercent = 0.2
+
+
+function inv.cache.init.atActive()
+  local retval = DRL_RET_SUCCESS
+
+  retval = inv.cache.load()
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.cache.init.atActive: failed to load cache data from storage: " ..
+              dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+end -- inv.cache.init.atActive
+
+
+function inv.cache.fini(doSaveState)
+  local retval = DRL_RET_SUCCESS
+
+  if (doSaveState) then
+    -- Save our current data
+    retval = inv.cache.save()
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.cache.fini: Failed to save inv.cache module data: " .. dbot.retval.getString(retval))
+    end -- if
+  end -- if
+
+  return retval
+end -- inv.cache.fini
+
+
+function inv.cache.config(cacheName, numEntries)
+  if (cacheName ~= inv.cache.recent.name) and (cacheName ~= inv.cache.frequent.name) then
+    dbot.warn("inv.cache.config: Invalid cache name \"" .. (cacheName or "nil") .. "\"")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  if (numEntries == nil) or (tonumber(numEntries) == nil) then
+    dbot.warn("inv.cache.config: Invalid numEntries parameter: It is not a number")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  -- Build the cache data structure
+  local cache      = {}
+  cache.entries    = {}
+  cache.name       = cacheName
+  cache.maxEntries = tonumber(numEntries)
+
+  if (cacheName == inv.cache.recent.name) then
+    inv.cache.recent.table = cache
+  elseif (cacheName == inv.cache.frequent.name) then
+    inv.cache.frequent.table = cache
+  else
+    dbot.error("inv.cache.config: Invalid cache name detected: \"" .. (cacheName or "nil") .. "\"")
+    return DRL_RET_INTERNAL_ERROR
+  end -- if
+
+  inv.cache.save() 
+
+  return DRL_RET_SUCCESS
+end -- inv.cache.config
+
+
+function inv.cache.save()
+  local recentRetval   = DRL_RET_SUCCESS
+  local frequentRetval = DRL_RET_SUCCESS
+
+  if (inv.cache.recent.table ~= nil) then
+    recentRetval = dbot.storage.saveTable(dbot.backup.getCurrentDir() .. inv.cache.recent.stateName,
+                                                "inv.cache.recent.table", inv.cache.recent.table)
+    if (recentRetval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.cache.save: Failed to save cache.recent table: " .. dbot.retval.getString(recentRetval))
+    end -- if
+  end -- if
+
+  if (inv.cache.frequent.table ~= nil) then
+    frequentRetval = dbot.storage.saveTable(dbot.backup.getCurrentDir() .. inv.cache.frequent.stateName,
+                                                  "inv.cache.frequent.table", inv.cache.frequent.table)
+    if (frequentRetval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.cache.save: Failed to save cache.frequent table: " .. dbot.retval.getString(frequentRetval))
+    end -- if
+  end -- if
+
+  if (recentRetval ~= DRL_RET_SUCCESS) then
+    return recentRetval
+  else
+    return frequentRetval
+  end -- if
+
+end -- inv.cache.save
+
+
+function inv.cache.load()
+  local recentRetval = dbot.storage.loadTable(dbot.backup.getCurrentDir() .. inv.cache.recent.stateName,
+                                              inv.cache.reset)
+  if (recentRetval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.cache.load: Failed to load cache table from file \"@R" .. 
+              dbot.backup.getCurrentDir() .. inv.cache.recent.stateName .. "@W\": " ..
+              dbot.retval.getString(recentRetval))
+  end -- if
+
+  local frequentRetval = dbot.storage.loadTable(dbot.backup.getCurrentDir() .. inv.cache.frequent.stateName,
+                                                inv.cache.reset)
+  if (frequentRetval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.cache.load: Failed to load cache table from file \"@R" .. 
+              dbot.backup.getCurrentDir() .. inv.cache.frequent.stateName .. "@W\": " ..
+              dbot.retval.getString(frequentRetval))
+  end -- if
+
+  if (inv.version.table ~= nil) and (inv.version.table.tableFormat ~= nil) and
+     (inv.config.table ~= nil) and (inv.config.table.tableFormat ~= nil) and
+     (inv.version.table.cacheFormat ~= nil) and (inv.config.table.cacheFormat ~= nil) then
+    -- Check if the inventory table version we loaded is compatible with the current code
+    if (inv.version.table.tableFormat.major ~= inv.config.table.tableFormat.major) and
+       (inv.version.table.tableFormat.minor ~= inv.config.table.tableFormat.minor) then
+      -- TODO: This is a placeholder for when (or if?) we ever change the table format
+    end -- if
+
+    -- Check if the inventory cache version we loaded is compatible with the current code
+    if (inv.version.table.cacheFormat.major ~= inv.config.table.cacheFormat.major) and
+       (inv.version.table.cacheFormat.minor ~= inv.config.table.cacheFormat.minor) then
+      -- TODO: This is a placeholder for when (or if?) we ever change the cache format
+    end -- if
+  else
+    dbot.error("inv.cache.load: Missing inv.version components")
+    return DRL_RET_INTERNAL_ERROR
+  end -- if
+
+  if (recentRetval ~= DRL_RET_SUCCESS) then
+    return recentRetval
+  else
+    return frequentRetval
+  end -- if
+
+end -- inv.cache.load
+
+
+function inv.cache.reset()
+  local recentRetval = DRL_RET_SUCCESS
+  local frequentRetval = DRL_RET_SUCCESS
+
+  if (inv.cache.recent ~= nil) then
+    recentRetval = inv.cache.resetCache(inv.cache.recent.name)
+    if (recentRetval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.cache.reset: recent cache reset failed: " .. dbot.retval.getString(recentRetval))
+    end -- if
+  end -- if
+
+  if (inv.cache.frequent ~= nil) then
+    frequentRetval = inv.cache.resetCache(inv.cache.frequent.name)
+    if (frequentRetval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.cache.reset: frequent cache reset failed: " .. dbot.retval.getString(frequentRetval))
+    end -- if
+  end -- if
+
+  -- If the recent cache reset failed, return that error code.  Otherwise, return the frequent
+  -- cache reset's return value.
+  if (recentRetval ~= DRL_RET_SUCCESS) then
+    return recentRetval
+  else
+    return frequentRetval
+  end -- if
+
+end -- inv.cache.reset
+
+
+function inv.cache.resetCache(cacheName)
+  if (cacheName == nil) or (cacheName == "") then
+    dbot.warn("inv.cache.reset: Missing cache name")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  local numEntries = 0
+
+  if (cacheName == inv.cache.recent.name) then
+    numEntries = inv.cache.recent.defaultNumEntries
+  elseif (cacheName == inv.cache.frequent.name) then
+    numEntries = inv.cache.frequent.defaultNumEntries
+  end -- if
+ 
+  local retval = inv.cache.config(cacheName, numEntries)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.cache.resetCache: Failed to configure cache: " .. dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+end -- inv.cache.resetCache
+
+
+function inv.cache.add(cache, objId)
+  assert(cache ~= nil, "Cache is nil!!!")
+  local retval = DRL_RET_SUCCESS
+
+  assert(objId ~= nil, "Received nil objId!!!")
+  objId = tonumber(objId)
+
+  local entry = inv.items.getEntry(objId)
+  if (entry == nil) then
+    dbot.warn("inv.cache.add: Cannot add item to cache because it is not in the inventory table")
+    return DRL_RET_MISSING_ENTRY
+  end -- if
+
+  local cacheEntry = { timeCached = dbot.getTime(), entry = dbot.table.getCopy(entry) }
+
+  -- Cache the object if we've done some type of identification on it
+  local idLevel = inv.items.getField(objId, invFieldIdentifyLevel)
+  if (idLevel ~= nil) and (idLevel ~= invIdLevelNone) then
+    if (cache.name == inv.cache.recent.name) then
+      cache.entries[objId] = cacheEntry
+    elseif (cache.name == inv.cache.frequent.name) then
+      local name = inv.items.getStatField(objId, invStatFieldName)
+      if (name ~= nil) and (name ~= "") then
+        cache.entries[name] = cacheEntry
+      end -- if
+    end -- if
+
+    dbot.debug("Added \"" .. (inv.items.getField(objId, "colorName") or "Unidentified") .. "\" " ..
+               "to the \"" .. cache.name .. "\" cache")
+  end -- if
+
+  -- Check if the cache is full and remove entries as needed to reduce the size.  We always
+  -- remove the least recently used item when necessary.  As an optimization once the cache
+  -- starts to get full, we whack a certain percentage (10%? 20%?) of entries when we prune the
+  -- cache so that we don't need to go through the overhead of sorting everything every time
+  -- we drop an item.
+  if (dbot.table.getNumEntries(cache.entries) > cache.maxEntries) then
+    retval = inv.cache.prune(cache)
+  end -- if
+
+  -- Note: To cut down on overhead, we currently do not call inv.cache.save() here.  Instead,
+  --       the cache is saved in inv.cache.fini when we disconnect or reload the plugin.  There
+  --       is a chance we may miss some cache updates this way if mush exits uncleanly, but the
+  --       downside is low because we we'll just re-identify anything we need if that happens.
+
+  return retval
+end -- inv.cache.add
+
+
+function inv.cache.remove(cache, key)
+  assert(cache ~= nil, "Cache is nil!!!")
+  assert(key ~= nil, "Received nil key!!!")
+  local cacheKey = key
+
+  -- The recent cache uses a numeric object ID as a key and we do a little extra parameter
+  -- checking in this case because I'm paranoid...
+  if (cache.name == inv.cache.recent.name) then
+    cacheKey = tonumber(key)
+    if (cacheKey == nil) then
+      dbot.warn("inv.cache.remove: failed to remove item for non-numeric objId key " .. key)
+      return DRL_RET_INVALID_PARAM
+    end -- if
+
+    dbot.debug("Removed \"" .. (inv.items.getField(key, "colorName") or "Unidentified") .. "\" " ..
+               "from the \"" .. cache.name .. "\" cache")
+  end -- if
+
+  cache.entries[cacheKey] = nil
+
+  -- Note: To cut down on overhead, we currently do not call inv.cache.save() here.  Instead,
+  --       the cache is saved in inv.cache.fini when we disconnect or reload the plugin.  There
+  --       is a chance we may miss some cache updates this way if mush exits uncleanly, but the
+  --       downside is low because we we'll just re-identify anything we need if that happens.
+
+  return DRL_RET_SUCCESS
+end -- inv.cache.remove
+
+
+function inv.cache.prune(cache)
+  assert(cache ~= nil, "Cache is nil!!!")
+
+  local retval = DRL_RET_SUCCESS
+  local numEntriesInCache = dbot.table.getNumEntries(cache.entries)
+  local numEntriesToPrune = 0
+
+  -- Determine how many entries in the cache to remove in this call.  We don't want
+  -- to need to prune things on every cache access because it is expensive to sort
+  -- the arrays.  Instead, if we detect a full cache, we whack several cache entries
+  -- at once so that we can amortize the overhead of pruning over several accesses.
+  if (cache.name == inv.cache.recent.name) then
+    numEntriesToPrune = math.floor(numEntriesInCache * inv.cache.recent.prunePercent) + 1 or 0
+  elseif (cache.name == inv.cache.frequent.name) then
+    numEntriesToPrune = math.floor(numEntriesInCache * inv.cache.frequent.prunePercent) + 1 or 0
+  end -- if
+
+  dbot.note("The " .. cache.name .. " cache is full, removing the " .. 
+            numEntriesToPrune .. " least recently used items")
+
+  -- Sort the cache entries by the date they were last used.  We create a temporary array of the
+  -- entries so that we can sort them (you can't sort a table.)
+  local entryArray = {}
+  for k,v in pairs(cache.entries) do
+    table.insert(entryArray, { key=k, timeCached=v.timeCached })
+  end -- for
+  table.sort(entryArray, function (entry1, entry2) return entry1.timeCached < entry2.timeCached end)
+
+  -- Remove the "numEntriesToPrune" first entries in the array
+  for i = 1, numEntriesToPrune do
+    local key = entryArray[i].key
+    retval = inv.cache.remove(cache, entryArray[i].key)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.cache.prune: Failed to remove cache item " .. key)
+      break
+    end -- if
+  end -- for
+
+  return retval
+end -- inv.cache.prune
+
+
+function inv.cache.get(cache, key)
+
+  if (cache == nil) or (key == nil) or (key == "") then
+    return nil
+  end -- if
+
+  local cacheKey = key
+
+  -- The recent cache uses a numeric object ID as a key and we do a little extra parameter
+  -- checking in this case because I'm paranoid...
+  if (cache.name == inv.cache.recent.name) then
+    cacheKey = tonumber(key)
+    if (cacheKey == nil) then
+      dbot.warn("inv.cache.get: failed to get item for non-numeric objId key " .. key)
+      return nil
+    end -- if
+  end -- if
+
+  local cacheEntry = cache.entries[cacheKey]
+  if (cacheEntry == nil) then
+    return nil -- it isn't in the cache
+  end -- if
+
+  -- Update the timestamp
+  cacheEntry.timeCached = dbot.getTime()
+
+  -- Return a copy of the cached entry (we don't want the caller directly modifying the entry in our cache)
+  return dbot.table.getCopy(cacheEntry.entry)
+end -- inv.cache.get
+
+
+function inv.cache.getSize(cache)
+  assert(cache ~= nil, "Cache is nil!!!")
+
+  return cache.maxEntries
+end -- inv.cache.getSize
+
+
+function inv.cache.setSize(cache, numEntries)
+  assert(cache ~= nil, "Cache is nil!!!")
+  assert(tonumber(numEntries) ~= nil, "numEntries parameter is not numeric!")
+
+  cache.maxEntries = numEntries
+
+  return inv.cache.save()
+
+end -- inv.cache.getSize
+
+
+function inv.cache.dump(cache)
+  assert(cache ~= nil, "Cache is nil!!!")
+
+  tprint(cache)
+  return DRL_RET_SUCCESS
+end -- inv.cache.dump
+
+
+-- Remove all cached items older than ageInSec
+-- We don't currently use this, but it might be handy at some point
+function inv.cache.clearOld(cache, ageInSec)
+  assert(cache ~= nil, "Cache is nil!!!")
+  local currentTime = dbot.getTime()
+
+  for key,cacheEntry in pairs(cache.entries) do
+    if (cacheEntry == nil) or (cacheEntry.timeCached == nil) or 
+       (currentTime - cacheEntry.timeCached > ageInSec) then
+      inv.cache.remove(cache, key)
+    end -- if
+  end -- for
+end -- inv.cache.clearOld
+
+
+----------------------------------------------------------------------------------------------------
+--
+-- Inventory priorities
+--
+-- inv.priority.init.atActive()
+-- inv.priority.fini(doSaveState)
+--
+-- inv.priority.save()
+-- inv.priority.load()
+-- inv.priority.reset()
+--
+-- inv.priority.add(priorityName, priorityTable)
+-- inv.priority.remove(priorityName)
+-- inv.priority.get(priorityName, level)
+--
+-- inv.priority.display(priorityName, endTag)
+-- inv.priority.displayBlock(priorityBlock, priorityName)
+-- inv.priority.list(endTag)
+--
+-- inv.priority.compare(priorityName1, priorityName2, endTag)
+--
+-- inv.priority.addDefault() -- add some default priorities
+--
+-- Data:
+--   inv.priority = {}
+--   inv.priority.table = {}
+--
+----------------------------------------------------------------------------------------------------
+
+inv.priority           = {}
+inv.priority.init      = {}
+inv.priority.table     = {}
+inv.priority.stateName = "inv-priorities.state"
+
+
+function inv.priority.init.atActive()
+  local retval = DRL_RET_SUCCESS
+
+  retval = inv.priority.load()
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.priority.init.atActive: failed to load priority data from storage: " ..
+              dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+end -- inv.priority.init.atActive
+
+
+function inv.priority.fini(doSaveState)
+  local retval = DRL_RET_SUCCESS
+
+  if (doSaveState) then
+    -- Save our current data
+    retval = inv.priority.save()
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.priority.fini: Failed to save inv.priority module data: " .. dbot.retval.getString(retval))
+    end -- if
+  end -- if
+
+  return retval
+end -- inv.priority.fini
+
+
+function inv.priority.save()
+  local retval = dbot.storage.saveTable(dbot.backup.getCurrentDir() .. inv.priority.stateName,
+                                        "inv.priority.table", inv.priority.table)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.priority.save: Failed to save priority table: " .. dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+end -- inv.priority.save
+
+
+function inv.priority.load()
+
+  local retval = dbot.storage.loadTable(dbot.backup.getCurrentDir() .. inv.priority.stateName,
+                                        inv.priority.reset)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.priority.load: Failed to load table from file \"@R" .. 
+              dbot.backup.getCurrentDir() .. inv.priority.stateName .. "@W\": " .. dbot.retval.getString(retval))
+  end -- if
+
+  -- Check if the priority table version we loaded is compatible with the current code
+  if (inv.version.table ~= nil) and (inv.version.table.priorityFormat ~= nil) and
+     (inv.config.table ~= nil)  and (inv.config.table.priorityFormat ~= nil) then
+    if (inv.version.table.priorityFormat.major ~= inv.config.table.priorityFormat.major) and
+       (inv.version.table.priorityFormat.minor ~= inv.config.table.priorityFormat.minor) then
+      -- TODO: This is a placeholder for when (or if?) we ever change the priority table format
+    end -- if
+  else
+    dbot.error("inv.priority.load: Missing inventory version information")
+    retval = DRL_RET_INTERNAL_ERROR
+  end -- if
+
+  return retval
+
+end -- inv.priority.load
+
+
+function inv.priority.reset()
+  local retval
+
+  inv.priority.table = {}
+  retval = inv.priority.addDefault()
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.priority.reset: Failed to add default priorities: " .. dbot.retval.getString(retval))
+    return retval
+  end -- if
+
+  retval = inv.priority.save()
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.priority.reset: Failed to save priorities: " .. dbot.retval.getString(retval))
+    return retval
+  end -- if
+
+  return retval
+end -- inv.priority.reset
+
+
+function inv.priority.add(priorityName, priorityTable)
+  if (priorityName == nil) or (priorityName == "") then
+    dbot.warn("inv.priority.add: Missing priorityName parameter")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  if (priorityTable == nil) then
+    dbot.warn("inv.priority.add: priorityTable is nil")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  inv.priority.table[priorityName] = priorityTable
+
+  local retval = inv.priority.save()
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.priority.add: Failed to save priorities: " .. dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+end -- inv.priority.add
+
+
+function inv.priority.remove(priorityName)
+  local retval
+
+  if (priorityName == nil) or (priorityName == "") then
+    dbot.warn("inv.priority.remove: Missing priorityName parameter")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  if (inv.priority.table[priorityName] == nil) then
+    dbot.warn("inv.priority.remove: Priority table does not contain an entry for priority \"" .. 
+            priorityName .. "\"")
+    return DRL_RET_MISSING_ENTRY
+  end -- if
+
+  inv.priority.table[priorityName] = nil
+
+  retval = inv.priority.save()
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.priority.remove: Failed to save priorities: " .. dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+end -- inv.priority.remove
+
+
+-- Returns table/nil, return value
+function inv.priority.get(priorityName, level)
+
+  if (priorityName == nil) or (priorityName == "") then
+    dbot.warn("inv.priority.get: Missing priorityName parameter")
+    return nil, DRL_RET_INVALID_PARAM
+  end -- if
+
+  local levelNum = tonumber(level or "none")
+  if (levelNum == nil) then
+    dbot.warn("inv.priority.get: level parameter is not a number")
+    return nil, DRL_RET_INVALID_PARAM
+  end -- if
+
+  local priority = inv.priority.table[priorityName]
+
+  if (priority == nil) then
+    dbot.warn("inv.priority.get: Priority \"" .. priorityName .. "\" is not in the priority table")
+    return nil, DRL_RET_MISSING_ENTRY
+  end -- if
+
+  -- Find the priority block for our level
+  local priorityBlock = nil
+  for i,v in ipairs(priority) do
+    if (levelNum >= v.minLevel) and (levelNum <= v.maxLevel) then
+      priorityBlock = v
+      break;
+    end -- if
+  end -- for
+
+  -- Verify that we found an appropriate priority block for our level
+  if (priorityBlock == nil) then
+    dbot.warn("inv.priority.get: Failed to find a priority block for level " .. 
+            levelNum .. " in priority \"" .. priorityName .. "\"")
+    return nil
+  end -- if
+
+  return priorityBlock.priorities, DRL_RET_SUCCESS
+
+end -- inv.priority.get
+
+
+function inv.priority.display(priorityName, endTag)
+  local retval = DRL_RET_SUCCESS
+
+  if (priorityName == nil) or (priorityName == "") then
+    dbot.warn("inv.priority.display: Missing priorityName parameter")
+    return inv.tags.stop(invTagsPriority, endTag, DRL_RET_INVALID_PARAM)
+  end -- if
+
+  local priority = inv.priority.table[priorityName]
+
+  if (priority == nil) then
+    dbot.info("Priority \"" .. priorityName .. "\" is not in the priority table")
+    return inv.tags.stop(invTagsPriority, endTag, DRL_RET_MISSING_ENTRY)
+  end -- if
+
+  for i, priorityBlock in ipairs(priority) do
+    retval = inv.priority.displayBlock(priorityBlock, priorityName)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.priority.display: Failed to display priority block " .. i .. " for priority " ..
+                priorityName .. ": " .. dbot.retval.getString(retval))
+      break
+    end -- if
+  end -- for
+
+  return inv.tags.stop(invTagsPriority, endTag, retval)
+end -- inv.priority.display
+
+
+function inv.priority.displayBlock(priorityBlock, priorityName)
+  local retval = DRL_RET_SUCCESS
+
+  if (priorityBlock == nil) then
+    dbot.warn("inv.priority.displayBlock: Missing priority block parameter")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  if (priorityBlock.minLevel == nil) or (priorityBlock.maxLevel == nil) or
+     (priorityBlock.priorities == nil) then
+    dbot.warn("inv.priority.displayBlock: Missing priority block components")
+    return DRL_RET_MISSING_ENTRY
+  end -- if
+
+  dbot.print("@WPriority \"@C" .. priorityName .. "@W\": Levels @G" .. priorityBlock.minLevel ..
+             "@W - @G" .. priorityBlock.maxLevel)
+
+  -- We can't sort a table so create a temporary array and then sort the temporary array
+  local priorityArray = {}
+  for k, v in pairs(priorityBlock.priorities) do
+    table.insert(priorityArray, { name = k, value = v })
+  end -- for
+  table.sort(priorityArray, function (v1, v2) return v1.value < v2.value end)
+
+  -- Print the priorities in sorted order
+  for _, priorityEntry in ipairs(priorityArray) do
+    local valueColor = "@W"
+    if (priorityEntry.value < 0.7) then
+      valueColor = "@R"
+    elseif (priorityEntry.value > 1.4) then
+      valueColor = "@G"
+    end -- if
+
+    if (priorityEntry.value ~= 0) then
+      dbot.print(string.format("  @y%12s @W= %s%.3f", priorityEntry.name, valueColor, priorityEntry.value))
+    end -- if
+  end -- for
+
+  return retval
+end -- inv.priority.displayBlock
+
+
+function inv.priority.list(endTag)
+  if (inv.priority == nil) or (inv.priority.table == nil) then
+    dbot.error("inv.priority.list: Priority table is missing!")
+    return inv.tags.stop(invTagsPriority, endTag, DRL_RET_INTERNAL_ERROR)
+  end -- if
+
+  -- Alphabetize the priorities before we list them
+  local sortedPriorities = {}
+  local numPriorities = 0
+  for k,_ in pairs(inv.priority.table) do
+    table.insert(sortedPriorities, k)
+    numPriorities = numPriorities + 1
+  end -- for
+  table.sort(sortedPriorities, function (v1, v2) return v1 < v2 end)
+
+  if (numPriorities == 0) then
+    dbot.info("Priority table is empty")
+  else
+    dbot.print("@WPriorities:")
+    for _, priority in ipairs(sortedPriorities) do
+      dbot.print("@W  \"@C" .. priority .. "@W\"@w")
+    end -- for
+  end -- if
+
+  return inv.tags.stop(invTagsPriority, endTag, DRL_RET_SUCCESS)
+end -- inv.priority.list
+
+
+function inv.priority.compare(priorityName1, priorityName2, endTag)
+  local retval = DRL_RET_SUCCESS
+
+  if (priorityName1 == nil) or (priorityName1 == "") or (priorityName2 == nil) or (priorityName2 == "") then
+    dbot.warn("inv.priority.compare: missing priority name")
+    return inv.tags.stop(invTagsPriority, endTag, DRL_RET_INVALID_PARAM)
+  end -- if
+
+  if (inv.priority == nil) or (inv.priority.table == nil) then
+    dbot.error("inv.priority.list: Priority table is missing!")
+    return inv.tags.stop(invTagsPriority, endTag, DRL_RET_INTERNAL_ERROR)
+  end -- if
+
+  if (inv.priority.table[priorityName1] == nil) then
+    dbot.warn("inv.priority.compare: Priority \"" .. priorityName1 .. "\" is not present")
+    return inv.tags.stop(invTagsPriority, endTag, DRL_RET_MISSING_ENTRY)
+  end -- if
+
+  if (inv.priority.table[priorityName2] == nil) then
+    dbot.warn("inv.priority.compare: Priority \"" .. priorityName2 .. "\" is not present")
+    return inv.tags.stop(invTagsPriority, endTag, DRL_RET_MISSING_ENTRY)
+  end -- if
+
+  local startLevel = 1 + 10 * dbot.gmcp.getTier()
+  local endLevel = startLevel + 200
+  local doPrintHeader = true
+
+  dbot.print("@WDifference between optimal sets for \"@G" .. priorityName1 .. 
+                "@W\" and \"@G" .. priorityName2 .. "@W\"\n@w")
+
+  for level = startLevel, endLevel do
+    local set1 = inv.set.get(priorityName1, level)
+    local set2 = inv.set.get(priorityName2, level)
+    local didPrintHeader
+
+    if (set1 == nil) then
+      dbot.info("Priority \"@C" .. priorityName1 .. "@W\" is missing a set analysis at level " .. level .. ".")
+      dbot.info("Please run \"@Gdinv analyze create " .. priorityName1 .. "@W\" before comparing the priority.")
+      retval = DRL_RET_MISSING_ENTRY
+      break
+    elseif (set2 == nil) then
+      dbot.info("Priority \"@C" .. priorityName2 .. "@W\" is missing a set analysis at level " .. level .. ".")
+      dbot.info("Please run \"@Gdinv analyze create " .. priorityName2 .. "@W\" before comparing the priority.")
+      retval = DRL_RET_MISSING_ENTRY
+      break
+    end -- if
+
+    didPrintHeader, retval = inv.set.displayDiff(set1, set2, level, string.format("Level %3d: ", level),
+                                                 doPrintHeader)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.priority.compare: Failed to display priority differences at level " .. level ..
+              ": " .. dbot.retval.getString(retval))
+      break
+    end -- if
+
+    doPrintHeader = not didPrintHeader -- If we already printed a header, don't print one again
+  end -- for
+
+  return inv.tags.stop(invTagsPriority, endTag, retval)
+end -- inv.priority.compare
+
+
+function inv.priority.addDefault()
+  local retval
+
+  ----------------
+  -- Priority: psi
+  ----------------
+  --[[ Here are the default statistic weightings from the Aardwolf scoring system for a
+       primary psi.  This is what we will model in the "psi" priority.  Keep in mind that
+       the plugin provides *many* more options to adjust your scoring and the aardwolf
+       defaults are very simple.  Look at the "psi-melee" priority for an example of what
+       you can do.  The table below was taken by running the "compare set" command on the
+       Aardwolf mud using a primary psi character.  Hopefully it isn't copyrighted... :)
+
+                                 Default   Your  
+       Affect Bonus      Keyword Score     Score  
+       ----------------- ------- -------  -------
+       Strength          str          10       10
+       Intelligence      int          15       15
+       Wisdom            wis          15       15
+       Dexterity         dex          10       10
+       Constitution      con          10       10
+       Luck              lck          12       12
+       ------------------------------------------
+       Hit points        hp            0        0
+       Mana              mana          0        0
+       Moves             moves         0        0
+       ------------------------------------------
+       Hit roll          hr            5        5
+       Damage roll       dr            5        5
+       Saves             save          0        0
+       Resists           resist        0        0
+       ------------------------------------------
+       Damage            dam           4        4
+       ------------------------------------------
+  --]]
+  retval = inv.priority.add(
+    "psi", -- Equipment priorities using the default psi weightings from the aardwolf scoring system
+    { 
+      { -- Priorities for levels 1 - 291
+        minLevel = 1, 
+        maxLevel = 291, 
+        priorities = { 
+                       str        = 10,  
+                       int        = 15,
+                       wis        = 15,
+                       dex        = 10, 
+                       con        = 10,  
+                       luck       = 12,  
+                       hit        = 5,  
+                       dam        = 5,
+                       avedam     = 4,
+                       offhandDam = 4,
+                     }
+      }
+    })
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.priority.addDefault: Failed to add priority \"psi\": " .. dbot.retval.getString(retval))
+  end -- if
+
+  --------------------
+  -- Priority: warrior
+  --------------------
+  --[[ Here are the default statistic weightings from the Aardwolf scoring system for a
+       primary warrior.  This is what we will model in the "warrior" priority.
+
+                                 Default   Your  
+       Affect Bonus      Keyword Score     Score  
+       ----------------- ------- -------  -------
+       Strength          str          15       15
+       Intelligence      int          10       10
+       Wisdom            wis          10       10
+       Dexterity         dex          15       15
+       Constitution      con          10       10
+       Luck              lck          10       10
+       ------------------------------------------
+       Hit points        hp            0        0
+       Mana              mana          0        0
+       Moves             moves         0        0
+       ------------------------------------------
+       Hit roll          hr            5        5
+       Damage roll       dr            5        5
+       Saves             save          0        0
+       Resists           resist        0        0
+       ------------------------------------------
+       Damage            dam           4        4
+       ------------------------------------------
+  --]]
+  retval = inv.priority.add(
+    "warrior", -- Equipment priorities using the default warrior weightings from the aardwolf scoring system
+    { 
+      { -- Priorities for levels 1 - 291
+        minLevel = 1, 
+        maxLevel = 291, 
+        priorities = { 
+                       str        = 15,  
+                       int        = 10,
+                       wis        = 10,
+                       dex        = 15, 
+                       con        = 10,  
+                       luck       = 10,  
+                       hit        = 5,  
+                       dam        = 5,
+                       avedam     = 4,
+                       offhandDam = 4,
+                     }
+      }
+    })
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.priority.addDefault: Failed to add priority \"warrior\": " .. dbot.retval.getString(retval))
+  end -- if
+
+  -----------------
+  -- Priority: mage
+  -----------------
+  --[[ Here are the default statistic weightings from the Aardwolf scoring system for a
+       primary mage.  This is what we will model in the "mage" priority.
+
+                                 Default   Your  
+       Affect Bonus      Keyword Score     Score  
+       ----------------- ------- -------  -------
+       Strength          str          10       10
+       Intelligence      int          15       15
+       Wisdom            wis          10       10
+       Dexterity         dex          10       10
+       Constitution      con          10       10
+       Luck              lck          10       10
+       ------------------------------------------
+       Hit points        hp            0        0
+       Mana              mana          0        0
+       Moves             moves         0        0
+       ------------------------------------------
+       Hit roll          hr            5        5
+       Damage roll       dr            5        5
+       Saves             save          0        0
+       Resists           resist        0        0
+       ------------------------------------------
+       Damage            dam           4        4
+       ------------------------------------------
+  --]]
+  retval = inv.priority.add(
+    "mage", -- Equipment priorities using the default mage weightings from the aardwolf scoring system
+    { 
+      { -- Priorities for levels 1 - 291
+        minLevel = 1, 
+        maxLevel = 291, 
+        priorities = { 
+                       str        = 10,  
+                       int        = 15,
+                       wis        = 10,
+                       dex        = 10, 
+                       con        = 10,  
+                       luck       = 10,  
+                       hit        = 5,  
+                       dam        = 5,
+                       avedam     = 4,
+                       offhandDam = 4,
+                     }
+      }
+    })
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.priority.addDefault: Failed to add priority \"mage\": " .. dbot.retval.getString(retval))
+  end -- if
+
+  ------------------
+  -- Priority: thief
+  ------------------
+  --[[ Here are the default statistic weightings from the Aardwolf scoring system for a
+       primary thief.  This is what we will model in the "thief" priority.
+
+                                 Default   Your  
+       Affect Bonus      Keyword Score     Score  
+       ----------------- ------- -------  -------
+       Strength          str          12       12
+       Intelligence      int          10       10
+       Wisdom            wis          10       10
+       Dexterity         dex          15       15
+       Constitution      con          10       10
+       Luck              lck          10       10
+       ------------------------------------------
+       Hit points        hp            0        0
+       Mana              mana          0        0
+       Moves             moves         0        0
+       ------------------------------------------
+       Hit roll          hr            5        5
+       Damage roll       dr            5        5
+       Saves             save          0        0
+       Resists           resist        0        0
+       ------------------------------------------
+       Damage            dam           4        4
+       ------------------------------------------
+  --]]
+  retval = inv.priority.add(
+    "thief", -- Equipment priorities using the default thief weightings from the aardwolf scoring system
+    { 
+      { -- Priorities for levels 1 - 291
+        minLevel = 1, 
+        maxLevel = 291, 
+        priorities = { 
+                       str        = 12,  
+                       int        = 10,
+                       wis        = 10,
+                       dex        = 15, 
+                       con        = 10,  
+                       luck       = 10,  
+                       hit        = 5,  
+                       dam        = 5,
+                       avedam     = 4,
+                       offhandDam = 4,
+                     }
+      }
+    })
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.priority.addDefault: Failed to add priority \"thief\": " .. dbot.retval.getString(retval))
+  end -- if
+
+  -------------------
+  -- Priority: ranger
+  -------------------
+  --[[ Here are the default statistic weightings from the Aardwolf scoring system for a
+       primary ranger.  This is what we will model in the "ranger" priority.
+
+                                 Default   Your  
+       Affect Bonus      Keyword Score     Score  
+       ----------------- ------- -------  -------
+       Strength          str          10       10
+       Intelligence      int          10       10
+       Wisdom            wis          15       15
+       Dexterity         dex          10       10
+       Constitution      con          15       15
+       Luck              lck          10       10
+       ------------------------------------------
+       Hit points        hp            0        0
+       Mana              mana          0        0
+       Moves             moves         0        0
+       ------------------------------------------
+       Hit roll          hr            5        5
+       Damage roll       dr            5        5
+       Saves             save          0        0
+       Resists           resist        0        0
+       ------------------------------------------
+       Damage            dam           4        4
+       ------------------------------------------
+  --]]
+  retval = inv.priority.add(
+    "ranger", -- Equipment priorities using the default ranger weightings from the aardwolf scoring system
+    { 
+      { -- Priorities for levels 1 - 291
+        minLevel = 1, 
+        maxLevel = 291, 
+        priorities = { 
+                       str        = 10,  
+                       int        = 10,
+                       wis        = 15,
+                       dex        = 10, 
+                       con        = 15,  
+                       luck       = 10,  
+                       hit        = 5,  
+                       dam        = 5,
+                       avedam     = 4,
+                       offhandDam = 4,
+                     }
+      }
+    })
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.priority.addDefault: Failed to add priority \"ranger\": " .. dbot.retval.getString(retval))
+  end -- if
+
+  --------------------
+  -- Priority: paladin
+  --------------------
+  --[[ Here are the default statistic weightings from the Aardwolf scoring system for a
+       primary paladin.  This is what we will model in the "paladin" priority.
+
+                                 Default   Your  
+       Affect Bonus      Keyword Score     Score  
+       ----------------- ------- -------  -------
+       Strength          str          10       10
+       Intelligence      int          15       15
+       Wisdom            wis          10       10
+       Dexterity         dex          10       10
+       Constitution      con          15       15
+       Luck              lck          10       10
+       ------------------------------------------
+       Hit points        hp            0        0
+       Mana              mana          0        0
+       Moves             moves         0        0
+       ------------------------------------------
+       Hit roll          hr            5        5
+       Damage roll       dr            5        5
+       Saves             save          0        0
+       Resists           resist        0        0
+       ------------------------------------------
+       Damage            dam           4        4
+       ------------------------------------------
+  --]]
+  retval = inv.priority.add(
+    "paladin", -- Equipment priorities using the default paladin weightings from the aardwolf scoring system
+    { 
+      { -- Priorities for levels 1 - 291
+        minLevel = 1, 
+        maxLevel = 291, 
+        priorities = { 
+                       str        = 10,  
+                       int        = 15,
+                       wis        = 10,
+                       dex        = 10, 
+                       con        = 15,  
+                       luck       = 10,  
+                       hit        = 5,  
+                       dam        = 5,
+                       avedam     = 4,
+                       offhandDam = 4,
+                     }
+      }
+    })
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.priority.addDefault: Failed to add priority \"paladin\": " .. dbot.retval.getString(retval))
+  end -- if
+
+  -------------------
+  -- Priority: cleric
+  -------------------
+  --[[ Here are the default statistic weightings from the Aardwolf scoring system for a
+       primary cleric.  This is what we will model in the "cleric" priority.
+
+                                 Default   Your  
+       Affect Bonus      Keyword Score     Score  
+       ----------------- ------- -------  -------
+       Strength          str          10       10
+       Intelligence      int          10       10
+       Wisdom            wis          15       15
+       Dexterity         dex          10       10
+       Constitution      con          10       10
+       Luck              lck          10       10
+       ------------------------------------------
+       Hit points        hp            0        0
+       Mana              mana          0        0
+       Moves             moves         0        0
+       ------------------------------------------
+       Hit roll          hr            5        5
+       Damage roll       dr            5        5
+       Saves             save          0        0
+       Resists           resist        0        0
+       ------------------------------------------
+       Damage            dam           4        4
+       ------------------------------------------
+  --]]
+  retval = inv.priority.add(
+    "cleric", -- Equipment priorities using the default cleric weightings from the aardwolf scoring system
+    { 
+      { -- Priorities for levels 1 - 291
+        minLevel = 1, 
+        maxLevel = 291, 
+        priorities = { 
+                       str        = 10,  
+                       int        = 10,
+                       wis        = 15,
+                       dex        = 10, 
+                       con        = 10,  
+                       luck       = 10,  
+                       hit        = 5,  
+                       dam        = 5,
+                       avedam     = 4,
+                       offhandDam = 4,
+                     }
+      }
+    })
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.priority.addDefault: Failed to add priority \"cleric\": " .. dbot.retval.getString(retval))
+  end -- if
+
+  -------------------------
+  -- Priority: psi-no-melee
+  -------------------------
+  -- This is designed for a single-class psi.  I'm not entirely happy with the values included
+  -- in it.  I'll probably tweak those once I tier again and go back to a single class psi.  Feel
+  -- free to mess with these values and try out your own experiments.  That's fun too :)
+  retval = inv.priority.add(
+  "psi-no-melee", -- Equipment priorities for a psi with no melee classes yet
+  { 
+    { -- Priorities for levels 1 - 50
+      minLevel = 1, 
+      maxLevel = 50,
+      priorities = { int          = 1,
+                     luck         = 1, 
+                     wis          = 0.7,
+                     str          = 1,  
+                     dex          = 0.6, 
+                     con          = 0.2,  
+                     dam          = 0.7,
+                     hit          = 0.7,
+                     hp           = 0.02,
+                     mana         = 0.01,
+                     moves        = 0,
+                     allphys      = 0.03,
+                     allmagic     = 0.03,
+                     avedam       = 1,
+                     offhandDam   = 0.33, 
+                     regeneration = 5, 
+                     sanctuary    = 50,
+                     haste        = 20,
+                     detectgood   = 2,
+                     detectevil   = 2,
+                     detecthidden = 3,
+                     detectinvis  = 4,
+                     detectmagic  = 0,    -- I don't care if we can detect magic
+                     shield       = 5,
+                     dualwield    = 20,
+                     irongrip     = 2,
+                     invis        = 10,
+                     flying       = 5
+                   }
+    },
+
+    { -- Priorities for levels 51 - 70
+      minLevel = 51, 
+      maxLevel = 70, 
+      priorities = { int          = 1,
+                     luck         = 1,
+                     wis          = 0.8,
+                     str          = 1.2,
+                     dex          = 0.4,
+                     con          = 0.2,
+                     dam          = 0.8,
+                     hit          = 0.8,
+                     hp           = 0.01,
+                     mana         = 0.01,
+                     moves        = 0,
+                     allphys      = 0.05,
+                     allmagic     = 0.03,
+                     avedam       = 1,
+                     offhandDam   = 0.4,
+                     regeneration = 5,
+                     sanctuary    = 10,
+                     haste        = 5,
+                     detectgood   = 2,
+                     detectevil   = 2,
+                     detecthidden = 3,
+                     detectinvis  = 4,
+                     detectmagic  = 0,    -- I don't care if we can detect magic
+                     shield       = 5,
+                     dualwield    = 0,    -- I don't care once I have dual wield skill
+                     irongrip     = 3,
+                     invis        = 5,
+                     flying       = 4
+                   }
+    },
+
+    { -- Priorities for levels 71 - 130
+      minLevel = 71, 
+      maxLevel = 130, 
+      priorities = { int          = 1,
+                     luck         = 1,
+                     wis          = 0.9,
+                     str          = 0.8,
+                     dex          = 0.6,
+                     con          = 0.4,
+                     dam          = 0.8,
+                     hit          = 0.7,
+                     hp           = 0.01,
+                     mana         = 0.01,
+                     moves        = 0,
+                     allphys      = 0.1,
+                     allmagic     = 0.05,
+                     avedam       = 1,
+                     offhandDam   = 0.5,
+                     regeneration = 5,
+                     sanctuary    = 10,
+                     haste        = 2,
+                     detectgood   = 2,
+                     detectevil   = 2,
+                     detecthidden = 2,
+                     detectinvis  = 2,
+                     detectmagic  = 0,    -- I don't care if we can detect magic
+                     shield       = 10,
+                     dualwield    = 0,    -- I don't care once I have dual wield skill
+                     irongrip     = 20,
+                     invis        = 3,
+                     flying       = 2
+                   }
+    },
+
+    { -- Priorities for levels 131 - 170
+      minLevel = 131, 
+      maxLevel = 170, 
+      priorities = { int          = 1,
+                     luck         = 1,
+                     wis          = 1,
+                     str          = 0.7,
+                     dex          = 0.5,
+                     con          = 0.4,
+                     dam          = 0.8,
+                     hit          = 0.8,
+                     hp           = 0.01,
+                     mana         = 0.01,
+                     moves        = 0,
+                     allphys      = 0.1,
+                     allmagic     = 0.05,
+                     avedam       = 1,
+                     offhandDam   = 0.6,
+                     regeneration = 5,
+                     sanctuary    = 10,
+                     haste        = 2,
+                     detectgood   = 2,
+                     detectevil   = 2,
+                     detecthidden = 2,
+                     detectinvis  = 2,
+                     detectmagic  = 0,    -- I don't care if we can detect magic
+                     shield       = 20,
+                     dualwield    = 0,    -- I don't care once I have dual wield skill
+                     irongrip     = 20,
+                     invis        = 1,
+                     flying       = 1
+                   }
+    },
+
+    { -- Priorities for levels 171 - 200
+      minLevel = 171, 
+      maxLevel = 200, 
+      priorities = { int          = 1,
+                     luck         = 1,
+                     wis          = 1,
+                     str          = 0.7,
+                     dex          = 0.4,
+                     con          = 0.4,
+                     dam          = 0.8,
+                     hit          = 0.8,
+                     hp           = 0.01,
+                     mana         = 0.01,
+                     moves        = 0,
+                     allphys      = 0.1,
+                     allmagic     = 0.05,
+                     avedam       = 1,
+                     offhandDam   = 0.7,
+                     regeneration = 5,
+                     sanctuary    = 20,
+                     haste        = 2,
+                     detectgood   = 2,
+                     detectevil   = 2,
+                     detecthidden = 2,
+                     detectinvis  = 2,
+                     detectmagic  = 0,    -- I don't care if we can detect magic
+                     shield       = 25,
+                     dualwield    = 0,    -- I don't care once I have dual wield skill
+                     irongrip     = 25,
+                     invis        = 1,
+                     flying       = 1
+                   }
+    },
+
+    { -- Priorities for level 201 - 291
+      minLevel = 201, 
+      maxLevel = 291, 
+      priorities = { int          = 1.0,
+                     luck         = 1.0,
+                     wis          = 1.0,
+                     str          = 0.5,
+                     dex          = 0.4,
+                     con          = 0.25,
+                     dam          = 0.8,
+                     hit          = 0.8,
+                     hp           = 0.01,
+                     mana         = 0.01,
+                     moves        = 0,
+                     allphys      = 0.1,
+                     allmagic     = 0.05,
+                     avedam       = 1,
+                     offhandDam   = 0.8,
+                     regeneration = 2,
+                     sanctuary    = 5,
+                     haste        = 2,
+                     detectgood   = 2,
+                     detectevil   = 2,
+                     detecthidden = 2,
+                     detectinvis  = 2,
+                     detectmagic  = 0,    -- I don't care if we can detect magic
+                     shield       = 40,
+                     dualwield    = 0,    -- I don't care once I have dual wield skill
+                     irongrip     = 30,
+                     invis        = 1,
+                     flying       = 1
+                   }
+    }
+  })
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.priority.addDefault: Failed to add priority \"psi-no-melee\": " ..
+               dbot.retval.getString(retval))
+  end -- if
+
+  ----------------------
+  -- Priority: psi-melee
+  ----------------------
+  -- This is designed for a psi with at least one melee class.  It fits my playing style well, but
+  -- feel free to tweak it for your own use :)
+  retval = inv.priority.add(
+  "psi-melee", 
+  { 
+    { -- Priorities for levels 1 - 50
+      minLevel = 1, 
+      maxLevel = 50,
+      priorities = { int          = 0.8,
+                     luck         = 1, 
+                     wis          = 0.7,
+                     str          = 1,  
+                     dex          = 0.8, 
+                     con          = 0.2,  
+                     dam          = 0.9,
+                     hit          = 0.85,
+                     hp           = 0.02,
+                     mana         = 0.01,
+                     moves        = 0,
+                     allphys      = 0.03,
+                     allmagic     = 0.03,
+                     avedam       = 1,
+                     offhandDam   = 0.33, 
+                     regeneration = 5, 
+                     sanctuary    = 50,
+                     haste        = 20,
+                     detectgood   = 2,
+                     detectevil   = 2,
+                     detecthidden = 3,
+                     detectinvis  = 4,
+                     detectmagic  = 0,    -- I don't care if we can detect magic
+                     shield       = 5,
+                     dualwield    = 20,
+                     irongrip     = 2,
+                     invis        = 10,
+                     flying       = 5,
+                     maxint       = 0,
+                     maxluck      = 0,
+                     maxwis       = 0,
+                     maxstr       = 0,
+                     maxdex       = 0,
+                     maxcon       = 0
+                   }
+    },
+
+    { -- Priorities for levels 51 - 70
+      minLevel = 51, 
+      maxLevel = 70, 
+      priorities = { int          = 1,
+                     luck         = 1,
+                     wis          = 0.8,
+                     str          = 1,
+                     dex          = 0.5,
+                     con          = 0.2,
+                     dam          = 0.9,
+                     hit          = 0.8,
+                     hp           = 0.01,
+                     mana         = 0.01,
+                     moves        = 0,
+                     allphys      = 0.05,
+                     allmagic     = 0.03,
+                     avedam       = 1,
+                     offhandDam   = 0.4,
+                     regeneration = 5,
+                     sanctuary    = 10,
+                     haste        = 5,
+                     detectgood   = 2,
+                     detectevil   = 2,
+                     detecthidden = 3,
+                     detectinvis  = 4,
+                     detectmagic  = 0,    -- I don't care if we can detect magic
+                     shield       = 5,
+                     dualwield    = 0,    -- I don't care once I have dual wield skill
+                     irongrip     = 3,
+                     invis        = 5,
+                     flying       = 4,
+                     maxint       = 0,
+                     maxluck      = 0,
+                     maxwis       = 0,
+                     maxstr       = 0,
+                     maxdex       = 0,
+                     maxcon       = 0
+                   }
+    },
+
+    { -- Priorities for levels 71 - 130
+      minLevel = 71, 
+      maxLevel = 130, 
+      priorities = { int          = 1,
+                     luck         = 1,
+                     wis          = 0.9,
+                     str          = 0.8,
+                     dex          = 0.6,
+                     con          = 0.4,
+                     dam          = 0.85,
+                     hit          = 0.75,
+                     hp           = 0.01,
+                     mana         = 0.01,
+                     moves        = 0,
+                     allphys      = 0.1,
+                     allmagic     = 0.05,
+                     avedam       = 1,
+                     offhandDam   = 0.5,
+                     regeneration = 5,
+                     sanctuary    = 10,
+                     haste        = 2,
+                     detectgood   = 2,
+                     detectevil   = 2,
+                     detecthidden = 2,
+                     detectinvis  = 2,
+                     detectmagic  = 0,    -- I don't care if we can detect magic
+                     shield       = 10,
+                     dualwield    = 0,    -- I don't care once I have dual wield skill
+                     irongrip     = 20,
+                     invis        = 3,
+                     flying       = 2,
+                     maxint       = 0,
+                     maxluck      = 0,
+                     maxwis       = 0,
+                     maxstr       = 0,
+                     maxdex       = 0,
+                     maxcon       = 0
+                   }
+    },
+
+    { -- Priorities for levels 131 - 170
+      minLevel = 131, 
+      maxLevel = 170, 
+      priorities = { int          = 1,
+                     luck         = 1,
+                     wis          = 1,
+                     str          = 0.7,
+                     dex          = 0.5,
+                     con          = 0.4,
+                     dam          = 0.85,
+                     hit          = 0.85,
+                     hp           = 0.01,
+                     mana         = 0.01,
+                     moves        = 0,
+                     allphys      = 0.1,
+                     allmagic     = 0.05,
+                     avedam       = 1,
+                     offhandDam   = 0.6,
+                     regeneration = 5,
+                     sanctuary    = 10,
+                     haste        = 2,
+                     detectgood   = 2,
+                     detectevil   = 2,
+                     detecthidden = 2,
+                     detectinvis  = 2,
+                     detectmagic  = 0,    -- I don't care if we can detect magic
+                     shield       = 20,
+                     dualwield    = 0,    -- I don't care once I have dual wield skill
+                     irongrip     = 20,
+                     invis        = 1,
+                     flying       = 1,
+                     maxint       = 0,
+                     maxluck      = 0,
+                     maxwis       = 0,
+                     maxstr       = 0,
+                     maxdex       = 0,
+                     maxcon       = 0
+                   }
+    },
+
+    { -- Priorities for levels 171 - 200
+      minLevel = 171, 
+      maxLevel = 200, 
+      priorities = { int          = 1,
+                     luck         = 1,
+                     wis          = 1,
+                     str          = 0.7,
+                     dex          = 0.4,
+                     con          = 0.4,
+                     dam          = 0.85,
+                     hit          = 0.85,
+                     hp           = 0.01,
+                     mana         = 0.01,
+                     moves        = 0,
+                     allphys      = 0.1,
+                     allmagic     = 0.05,
+                     avedam       = 1,
+                     offhandDam   = 0.7,
+                     regeneration = 5,
+                     sanctuary    = 20,
+                     haste        = 2,
+                     detectgood   = 2,
+                     detectevil   = 2,
+                     detecthidden = 2,
+                     detectinvis  = 2,
+                     detectmagic  = 0,    -- I don't care if we can detect magic
+                     shield       = 25,
+                     dualwield    = 0,    -- I don't care once I have dual wield skill
+                     irongrip     = 25,
+                     invis        = 1,
+                     flying       = 1,
+                     maxint       = 5,
+                     maxluck      = 5,
+                     maxwis       = 5,
+                     maxstr       = 0,
+                     maxdex       = 0,
+                     maxcon       = 0
+                   }
+    },
+
+    { -- Priorities for level 201 - 291
+      minLevel = 201, 
+      maxLevel = 291, 
+      priorities = { int          = 1.0,
+                     luck         = 1.0,
+                     wis          = 1.0,
+                     str          = 0.5,
+                     dex          = 0.4,
+                     con          = 0.25,
+                     dam          = 0.8,
+                     hit          = 0.8,
+                     hp           = 0.01,
+                     mana         = 0.01,
+                     moves        = 0,
+                     allphys      = 0.1,
+                     allmagic     = 0.05,
+                     avedam       = 1,
+                     offhandDam   = 0.85,
+                     regeneration = 2,
+                     sanctuary    = 5,
+                     haste        = 2,
+                     detectgood   = 2,
+                     detectevil   = 2,
+                     detecthidden = 2,
+                     detectinvis  = 2,
+                     detectmagic  = 0,    -- I don't care if we can detect magic
+                     shield       = 40,
+                     dualwield    = 0,    -- I don't care once I have dual wield skill
+                     irongrip     = 30,
+                     invis        = 1,
+                     flying       = 1,
+                     maxint       = 20,
+                     maxluck      = 20,
+                     maxwis       = 20,
+                     maxstr       = 0,
+                     maxdex       = 0,
+                     maxcon       = 0
+                   }
+    }
+  })
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.priority.addDefault: Failed to add priority \"psi-melee\": " ..
+              dbot.retval.getString(retval))
+  end -- if
+
+  ----------------------
+  -- Priority: enchanter
+  ----------------------
+  -- This refers to anyone enchanting, not just an enchanter sub-class.  It boosts the three
+  -- stats responsible for improving enchantments.  You probably don't want to try leveling
+  -- with a set based on this :)
+  retval = inv.priority.add(
+    "enchanter", -- Equipment priorities for an enchanter (only care about int, luck, wis)
+    { 
+      { -- Priorities for levels 1 - 291
+        minLevel = 1, 
+        maxLevel = 291, 
+        priorities = { int        = 1,
+                       luck       = 1,
+                       wis        = 1
+                     }
+      }
+    })
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.priority.addDefault: Failed to add priority \"enchanter\": " ..
+             dbot.retval.getString(retval))
+  end -- if
+
+  --------------------
+  -- Priority: balance
+  --------------------
+  -- Yeah, it's a little tasteless to game the system and take advantage of the mental balance
+  -- implementation.  This priority lowers wis as much as possible while boosting int.  This
+  -- will give you the biggest possible bonus to wis when you cast mental balance.  You can then
+  -- wear your normal equipment while retaining the wis bonus.
+  retval = inv.priority.add(
+    "balance", -- Equipment priorities to game the mental balance spell
+    { 
+      { -- Priorities for levels 1 - 291
+        minLevel = 1, 
+        maxLevel = 291, 
+        priorities = { int        = 1,
+                       luck       = 0.5,
+                       wis        = -1
+                     }
+      }
+    })
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.priority.addDefault: Failed to add priority \"balance\": " .. dbot.retval.getString(retval))
+  end -- if
+
+  ------------------
+  -- Priority: debug
+  ------------------
+  -- Feel free to play around with this one :)  Look at the "psi-melee" priority for examples on
+  -- all of the options you have at your disposal.
+  retval = inv.priority.add(
+    "debug", -- Debug priorities: this is helpful when playing around with sets
+    { 
+      { -- Priorities for levels 1 - 291
+        minLevel = 1, 
+        maxLevel = 291, 
+        priorities = { int        = 1,    
+                       luck       = 1,    
+                       wis        = 1,    
+                       str        = 0.5,  
+                       dex        = 0.25, 
+                       con        = 0.2,  
+                       dam        = 0.5,  
+                       hit        = 0.33, 
+                       hp         = 0.01, 
+                       mana       = 0.005,
+                       allphys    = 0.05, 
+                       allmagic   = 0.03, 
+                       avedam     = 1,    
+                       offhandDam = 0.5,
+                       shield     = 10,
+                       sanctuary  = 50
+                     }
+      }
+    })
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.priority.addDefault: Failed to add priority \"debug\": " .. dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+end -- inv.priority.addDefault
+
+
+----------------------------------------------------------------------------------------------------
+--
+-- Module to score items and sets based on a specified priority, level, and handicap
+--
+-- We "handicap" an item or set when it is overmax on one or more stats.  Handicapping an overmax
+-- stat lets us see if we can increase the overall score of a set by prioritizing other stats
+-- instead.  In other words, we try to trade off unused overmax stats for another stat that we can
+-- actually use.
+--
+-- The base scoring function is inv.score.extended().  It takes a structure representing either an
+-- item or a set and scores that structure based on the given parameters.  The inv.score.item() and
+-- inv.score.set() functions convert an itemId or a set into the structure required by the
+-- inv.score.extended() function and then they call that function behind the scenes.
+--
+-- inv.score.item(itemId, priorityName, handicap, level)
+-- inv.score.set(set, priorityName, handicap, level)
+-- inv.score.extended(itemOrSet, priorityName, handicap, level, isOffhand)
+--
+----------------------------------------------------------------------------------------------------
+
+inv.score = {}
+
+-- The handicap and level params are optional.  If level is not given, we use the current level.
+-- This returns both a primary score and, for weapons, a score for that weapon in an offhand
+-- position.  Non-weapons do not have an offhandScore.
+function inv.score.item(itemId, priorityName, handicap, level)
+  local retval
+  local score = 0
+  local offhandScore = 0
+
+  itemId = tonumber(itemId) or ""
+  if (itemId == nil) or (itemId == "") then
+    dbot.warn("inv.score.item: itemId parameter is not a number")
+    return score, offhandScore, DRL_RET_INVALID_PARAM
+  end -- if
+
+  if (priorityName == nil) or (priorityName == "") then
+    dbot.warn("inv.score.item: priorityName parameter is missing")
+    return score, offhandScore, DRL_RET_INVALID_PARAM
+  end -- if
+
+  -- Find the item's stats entry corresponding to the given itemId
+  local itemStats = inv.items.getField(itemId, invFieldStats)
+  if (itemStats == nil) then
+    dbot.warn("inv.score.item: Object ID " .. itemId .. " does not match an identified item in your inventory")
+    return score, offhandScore, DRL_RET_MISSING_ENTRY
+  end -- if
+
+  -- Get the basic score for the item
+  score, retval = inv.score.extended(itemStats, priorityName, handicap, level, false)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.score.item: Failed to score item " .. itemId .. ": " .. dbot.retval.getString(retval))
+    return score, offhandScore, retval
+  end -- if
+
+  -- Weapons can have two scores: a primary score, and an offhand score
+  local itemType = inv.items.getStatField(itemId, invStatFieldWearable) or ""
+  if (itemType == "wield") then
+    offhandScore, retval = inv.score.extended(itemStats, priorityName, handicap, level, true)
+  end -- if
+
+  return score, offhandScore, retval
+end -- inv.score.item
+
+
+-- Get a score for either an item or a set
+function inv.score.extended(itemOrSet, priorityName, handicap, level, isOffhand)
+  local score = 0
+  local priorityTable
+  local retval
+
+  if (priorityName == nil) or (priorityName == "") then
+    dbot.warn("inv.score.extended: priorityName parameter is missing")
+    return score, DRL_RET_INVALID_PARAM
+  end -- if
+
+  if (itemOrSet == nil) then
+    dbot.warn("inv.score.extended: Missing item or set to be scored")
+    return score, DRL_RET_INVALID_PARAM
+  end -- if
+
+  -- Determine our level (this accounts for tiers so T1 L10 would have a level of 20)
+  -- The caller may tell us the target level, otherwise, we use our current level
+  level = tonumber(level)
+  if (level == nil) then
+    level = dbot.gmcp.getLevel()
+  end -- if
+
+  -- Pull out the priority table from the priority block for our level
+  priorityTable, retval = inv.priority.get(priorityName, level)
+  if (priorityTable == nil) then
+    dbot.warn("inv.score.extended: Priority \"" .. priorityName .. "\" does not have a priority table " ..
+            "for level " .. level)
+    return score, retval
+  end -- if
+
+  -- Run through all stats and add up the item's score
+  for k,v in pairs(itemOrSet) do
+    local statKey = k
+
+    -- Use the "offhandDam" priority instead of "avedam" priority if we are evaluating a weapon
+    -- for the offhand location
+    if (isOffhand == true) and (k == invStatFieldAveDam) then
+      statKey = "offhandDam"
+    end -- if
+
+    -- Update the score for any effects in the "affectMods" field (yes, I really think it should be
+    -- "effectMods", but I'm keeping the terminology aard uses)
+    if (k == invStatFieldAffectMods) and (v ~= nil) and (v ~= "") then
+      -- Strip out commas from the list so that we can easily pull mod words out of the string
+      local modList = string.gsub(v, ",", ""):lower()
+      for mod in modList:gmatch("%S+") do
+        dbot.debug("inv.score.extended: mod = \"" .. mod .. "\"")
+        local modValue = tonumber(priorityTable[mod] or "")
+        if (modValue ~= nil) and (modValue ~= 0) then
+          score = score + modValue
+        end -- if
+      end -- for
+
+    -- Update the score for individual stats
+    elseif (priorityTable[statKey] ~= nil) then
+      if (priorityTable[statKey] <= 0) then
+        multiplier = 0
+      else
+        multiplier = priorityTable[statKey]
+      end -- if
+
+      -- some stats have handicaps that reduce their score
+      if (handicap ~= nil) and (handicap[statKey] ~= nil) then
+        multiplier = multiplier + handicap[statKey]
+      end -- if
+
+      score = score + (multiplier * v)
+      dbot.debug("Score: " .. string.format("%.3f", score) .. " after key \"" .. 
+      statKey .. "\" with value \"" .. v .. "\", multiplier=" .. multiplier)
+
+    -- Update the score for consolidated stats
+    else
+      -- If a field in the item or set's stats matches a field in the priority table, we've already
+      -- accounted for that portion of the score (see the if clause above.)  In the else clause
+      -- here, we handle situations where stats are consolidated.  For example, a priority may
+      -- include the "allmagic" or "allphys" resistances while an item may list individual resists.
+      -- In that case, we count each individual resist as being worth 1/(# resists) of a full
+      -- magic or physical resist.  For example, 1 bash resist is worth 1/3 of a full physical
+      -- resist in our scoring because there are three potential types of physical resistances.
+      -- If a user wants more granularity than that, they can call out specific resistances in the
+      -- priority table (e.g., use invStatFieldBash instead of "allphys").
+      local dtype
+      local physResists  = { invStatFieldBash,    invStatFieldPierce,   invStatFieldSlash }
+      local magicResists = { invStatFieldAcid,    invStatFieldCold,     invStatFieldEnergy,
+                             invStatFieldHoly,    invStatFieldElectric, invStatFieldNegative, 
+                             invStatFieldShadow,  invStatFieldMagic,    invStatFieldAir,
+                             invStatFieldEarth,   invStatFieldFire,     invStatFieldLight, 
+                             invStatFieldMental,  invStatFieldSonic,    invStatFieldWater,
+                             invStatFieldDisease, invStatFieldPoison }
+
+      for i,v2 in ipairs(magicResists) do
+        dtype = v2:lower()
+        if (statKey == dtype) and ((priorityTable[invStatFieldAllMagic] or 0) > 0) then
+          score = score + (priorityTable[invStatFieldAllMagic] * v / #magicResists)
+          break
+        end -- if
+      end -- for
+
+      for i,v2 in ipairs(physResists) do
+        dtype = v2:lower()
+        if (statKey == dtype) and ((priorityTable[invStatFieldAllPhys] or 0) > 0) then
+          score = score + (priorityTable[invStatFieldAllPhys] * v / #physResists)
+          break
+        end -- if
+      end -- for
+    end -- if
+  end -- for
+
+  -- In some situations, we may want to give a score bump if we have maxed a particular stat.
+  -- For example, navigators gain an extra bypassed area with maxed int and wis.  In that case, 
+  -- it is far more valuable to have maxed int and wis than to be "off-by-one" and be one less
+  -- than the max.
+  local statList = "int luck wis str dex con"
+  for stat in statList:gmatch("%S+") do
+    local valueOfMaxStat = tonumber(priorityTable["max" .. stat] or 0)
+    if (valueOfMaxStat > 0) and
+       (inv.statBonus.equipBonus[level] ~= nil) and (inv.statBonus.equipBonus[level][stat] ~= nil) and
+       (tonumber(itemOrSet[stat] or 0) >= inv.statBonus.equipBonus[level][stat]) then        
+      dbot.debug("Added " .. valueOfMaxStat .. " to score for maxing stat \"@G" .. stat .. "@W\"")
+      score = score + valueOfMaxStat
+    end -- if
+  end -- for
+
+  -- Round to nearest hundredth place
+  score = tonumber(string.format("%.2f", score))
+
+  dbot.debug("Item \"" .. itemOrSet.name .. "\" has a score of " .. string.format("%.3f", score) ..
+             " for priority \"" .. priorityName .. "\"")
+
+  return score, DRL_RET_SUCCESS
+
+end -- inv.score.extended
+
+
+-- The "set" parameter is a table with wearable locations as the keys and objID as the value.
+-- Note that we don't have a "handicap" parameter here.  We don't handicap sets.  We handicap
+-- the scoring of items as we generate sets.
+function inv.score.set(set, priorityName, level)
+  local retval
+  local setStats
+  local setScore
+
+  if (set == nil) then
+    dbot.warn("inv.score.set: \"set\" parameter is missing")
+    return nil, nil, DRL_RET_INVALID_PARAM
+  end -- if
+
+  if (priorityName == nil) or (priorityName == "") then
+    dbot.warn("inv.score.set: priorityName is missing")
+    return nil, nil, DRL_RET_INVALID_PARAM
+  end -- if
+
+  setStats = inv.set.getStats(set, level)
+  setStats.name = "Set for level " .. (level or "Unknown") .. " " .. priorityName
+  setScore, _, retval = inv.score.extended(setStats, priorityName, nil, level, false)
+
+  dbot.debug("setScore = " .. setScore)
+
+  return setScore, setStats, retval
+end -- inv.score.set
+
+
+----------------------------------------------------------------------------------------------------
+--
+-- Module to manage equipment sets
+--
+-- dinv set [display | wear | stats] [priority name] <level>
+--
+-- inv.set.init.atActive()
+-- inv.set.fini(doSaveState)
+--
+-- inv.set.save()
+-- inv.set.load()
+-- inv.set.reset()
+--
+-- inv.set.create(priorityName, level, synchronous)
+-- inv.set.createCR()
+-- inv.set.createWithHandicap(priorityName, level, handicap)
+--
+-- inv.set.display(priorityName, level, endTag)
+-- inv.set.displayCR()
+-- inv.set.displaySet(setName, level, equipSet)
+--
+-- inv.set.createAndWear(priorityName, level, endTag)
+-- inv.set.createAndWearCR()
+-- inv.set.wear(equipSet)
+--
+-- inv.set.diff(set1, set2, level)
+-- inv.set.displayDiff(set1, set2, level, msgString, doPrintHeader)
+--
+-- inv.set.get(priorityName, level)
+-- inv.set.getStats(set, level)
+-- inv.set.displayStats(setStats, msgString, doPrintHeader, doDisplayIfZero)
+--
+-- inv.set.compare(priorityName, rname, endTag)
+-- inv.set.compareCR()
+--
+-- inv.set.covet(priorityName, auctionNum, endTag)
+-- inv.set.covetCR()
+--
+-- We maintain a table holding the most recently created sets for each priority and level.  This
+-- is handy when we want to analyze the usage of a particular item.  It's not a perfect system
+-- because we may need to re-run set creation after aquiring new items or getting a good spellup,
+-- but it's a decent approximation -- and the user can always re-generate the full table if they
+-- have the time and inclination.
+--
+-- Example format:
+--   inv.set.table = { enchanter = {   1 = { hands = { id = someItemId, score = myScore },
+--                                           ...
+--                                           back =  { id = someItemId, score = myScore } },
+--                                   ...
+--                                   291 = { hands = { id = someItemId, score = myScore },
+--                                           ...
+--                                           back =  { id = someItemId, score = myScore } } }
+--
+--                     psi-melee = {   1 = { abc },
+--                                   ...
+--                                   291 = { xyz } } }
+--
+----------------------------------------------------------------------------------------------------
+
+inv.set                  = {}
+inv.set.init             = {}
+inv.set.table            = {}
+inv.set.stateName        = "inv-set.state"
+inv.set.createPkg        = nil
+inv.set.displayPkg       = nil
+inv.set.createAndWearPkg = nil
+
+function inv.set.init.atActive()
+  local retval = DRL_RET_SUCCESS
+
+  retval = inv.set.load()
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.set.init.atActive: failed to load set data from storage: " ..
+              dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+end -- inv.set.init.atActive
+
+
+function inv.set.fini(doSaveState)
+  local retval = DRL_RET_SUCCESS
+
+  if (doSaveState) then
+    -- Save our current data
+    retval = inv.set.save()
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.set.fini: Failed to save inv.set module data: " .. dbot.retval.getString(retval))
+    end -- if
+  end -- if
+
+  return retval
+end -- inv.set.fini
+
+
+function inv.set.save()
+  local retval = dbot.storage.saveTable(dbot.backup.getCurrentDir() .. inv.set.stateName,
+                                        "inv.set.table", inv.set.table)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.set.save: Failed to save set table: " .. dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+end -- inv.set.save
+
+
+function inv.set.load()
+  local retval = dbot.storage.loadTable(dbot.backup.getCurrentDir() .. inv.set.stateName, inv.set.reset)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.set.load: Failed to load table from file \"@R" .. 
+              dbot.backup.getCurrentDir() .. inv.set.stateName .. "@W\": " .. dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+end -- inv.set.load
+
+
+function inv.set.reset()
+  inv.set.table = {}
+
+  return inv.set.save()
+end -- inv.set.reset
+
+
+-- Find a set of items in the equipment table that most closely matches the
+-- priorities given as a parameter.  Label each of those items in the equipment
+-- table with the given name for the set.
+--
+-- If level is not provided to us, use the character's current level
+function inv.set.create(priorityName, level, synchronous)
+  local retval
+  local priorityTable
+
+  if (priorityName == nil) or (priorityName == "") then
+    dbot.warn("inv.set.create: Missing priorityName parameter")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  -- Attempt to get a valid level.  If the caller doesn't provide a level, use our current level
+  level = tonumber(level) or ""
+  if (level == nil) or (level == "") then
+    level = dbot.gmcp.getLevel()
+  end -- if
+
+  -- If the caller doesn't specify if this is a synchronous or asynchronous call, assume it is asynch
+  if (synchronous == nil) or (synchronous == "") then
+    synchronous = drlAsynchronous
+  end -- if
+
+  -- This is a rather ugly kludge.  Checking if the char can access the dual wield skill is currently
+  -- the only reason (other than getting current stats) we might need to run asynchronously in a co-routine.
+  -- If we have already cached whether or not the ability is available, we can potentially run the set
+  -- creation synchronously.  If we haven't cached if the ability is available, we must go asynchronous.
+  if (dbot.ability.isCached("dual wield", level) == false) then
+    synchronous = drlAsynchronous
+  end -- if
+
+  -- Check if the specified priority exists for the specified level
+  priorityTable, retval = inv.priority.get(priorityName, level)
+  if (priorityTable == nil) then
+    dbot.warn("inv.set.create: Priority \"" .. priorityName .. "\" does not have a priority table " ..
+              "for level " .. level)
+    return retval
+  end -- if
+
+  -- Only allow one set creation at a time
+  if (inv.set.createPkg ~= nil) then
+    dbot.info("Set creation skipped: another set creation is in progress")
+    return DRL_RET_BUSY
+  end -- if
+
+  -- Whack the previous equipment set for this priority and level (if it exists).  The creation
+  -- of the set happens asynchronously in a co-routine.  If we want to know when the creation is
+  -- done, we can spin and wait for the set to become non-nil.
+  if (inv.set.table[priorityName] == nil) then
+    inv.set.table[priorityName] = {}
+  end -- if
+  inv.set.table[priorityName][level] = nil
+
+  -- Everything looks good :)  Kick off the actual creation of the set!
+  inv.set.createPkg = {}
+  inv.set.createPkg.level = level
+  inv.set.createPkg.name = priorityName
+  inv.set.createPkg.bonusType = invStatBonusTypeAve -- default to using a weighted average for stats
+
+  -- We want to call inv.set.createCR() but we may or may not want it in a co-routine.  If the
+  -- caller asked us to complete the set creation synchronously, we do not use a co-routine.  Also,
+  -- if we are creating a set for the user's current level, we want to use the stat bonus that
+  -- they have at this exact moment instead of using the weighted average (which is useful for
+  -- guessing bonuses when we don't have the exact data available.)  The only oddity here is that
+  -- we also use the weighted average regardless of level when this is a synchronous call.  We need
+  -- to sleep/wait to get the exact current stats and we can't do that in synchronous mode.
+  if (synchronous == drlSynchronous) then
+    inv.set.createCR() -- Call this directly instead of as a co-routine
+  elseif (synchronous == drlAsynchronous) then
+    if (level == dbot.gmcp.getLevel()) then
+      inv.statBonus.timer.update(0, 0.1)
+      inv.set.createPkg.bonusType = invStatBonusTypeCurrent
+      inv.set.createPkg.waitForStatBonus = true
+    end -- if
+    wait.make(inv.set.createCR)
+  else
+    dbot.warn("inv.set.create: Invalid synchronous parameter \"" .. (synchronous or "") .. "\"")
+    retval = DRL_INVALID_PARAM
+  end -- if
+
+  return retval
+end -- inv.set.create
+
+
+function inv.set.createCR()
+  local retval = DRL_RET_SUCCESS
+
+  -- Pull params from our co-routine package
+  local priorityName = inv.set.createPkg.name
+  local level        = inv.set.createPkg.level
+
+  -- If we want to use the exact bonuses that the char has right now instead of using the weighted
+  -- average for the level, we need to wait for the statBonus timer to complete.  In practice, we
+  -- will only stall when we are creating a set for the user's current level.  We can skip this if
+  -- the user is creating sets for analysis of other levels.
+    if (inv.set.createPkg.waitForStatBonus == true) then
+    -- Give the stat bonus timer a chance to run.  Yes, this is a little awkward and we probably
+    -- should use a call-by-reference parameter as a callback mechanism to know when the timer
+    -- completes.  This probably isn't as evil as it looks at first glance though.  This is not
+    -- time critical because this code only runs if someone wears or displays a single equipment
+    -- set and waiting a little while won't kill you.  Also, if the timer doesn't manage to
+    -- run (which isn't likely) then the worst case scenario is that we pick up the stat bonuses
+    -- from the previous set creation for the user's current level.
+    wait.time(1)
+
+    local totTime = 0
+    local timeout = 2
+    while (inv.statBonus.inProgress == true) do
+      if (totTime > timeout) then
+        dbot.warn("inv.set.createCR: timed out waiting for stat bonus to be detected")
+        retval = DRL_RET_TIMEOUT
+        break
+      end -- if
+
+      wait.time(drlSpinnerPeriodDefault)
+      totTime = totTime + drlSpinnerPeriodDefault
+    end -- while
+  end -- if
+
+  -- Determine how much each stat can increase due to equipment without hitting that stat's ceiling
+  local statDelta = inv.statBonus.get(level, inv.set.createPkg.bonusType)
+
+  -- Start with no stat handicaps.  We handicap stats when a set goes "overstat" so that we gradually
+  -- bump up the priority of "lesser" stats in an attempt to increase the set's overall score.
+  local handicap = { int = 0, wis = 0, luck = 0, str = 0, dex = 0, con = 0 }
+  local handicapDelta = 0.1 -- Amount that we increase a stat's handicap each iteration
+
+  -- Keep building new sets with greater stat handicaps until we fully compensate for any
+  -- overmax stats
+  local bestScore = 0
+  local bestSet = nil
+  local numIters = 0
+  local newSet
+  local stats
+  local score
+  repeat
+
+    newSet, stats, score = inv.set.createWithHandicap(priorityName, level, handicap)
+
+    if (score > bestScore) then
+      local wearLoc
+      local itemStruct
+
+      dbot.debug("Updating set based on handicap")
+
+      for wearLoc,itemStruct in pairs(newSet) do
+        if (bestSet ~= nil) and (bestSet[wearLoc] ~= nil) and (bestSet[wearLoc].id ~= itemStruct.id) then
+          dbot.debug("Updating set: " .. wearLoc .. " from " .. bestSet[wearLoc].id .. ", to " .. 
+                     itemStruct.id)
+        end -- if
+      end -- for
+
+      bestScore = score
+      bestSet = newSet
+    end -- if
+
+    -- For every stat that is "overstat", discount that stat by handicapping it in the next iteration
+    local handicapExistsThisIter = false -- if we see an overmax stat below, we set this to true
+    for k,v in pairs(stats) do
+      if (statDelta[k] ~= nil) then
+        dbot.debug("delta[" .. k .. "] = " .. statDelta[k] .. ", statValue = " .. v)
+      end -- if
+
+      if (statDelta[k] ~= nil) and ((v - statDelta[k]) > 0) then
+        handicap[k] = handicap[k] - handicapDelta
+        dbot.debug("Set handicap for \"" .. k .. "\" to " .. handicap[k])
+        handicapExistsThisIter = true
+      end -- if
+    end -- for
+
+    if (handicapExistsThisIter == false) then
+      break
+    end -- if
+
+    numIters = numIters + 1
+
+    -- Each iteration drops the weighting of a handicapped stat by 10%
+    if (numIters >= 8) then
+      dbot.debug("Breaking out of inv.set.createCR, looped over handicap " .. numIters .. " times")
+      break
+    end -- if
+  until (score < (bestScore * 0.7)) -- Let things anneal a bit, but cut it off if we are < x% of previous best
+
+  -- Some items can be worn in multiple locations (e.g., a ring could be on "lfinger" or "rfinger" or
+  -- a medal could be on "medal1" through "medal4").  We want to always be consistent on where items
+  -- go so that we don't unnecessarily swap 2 rings back and forth between fingers each time we wear
+  -- a set.  The "normalize" code below sorts items by object ID and puts them in order within the set.
+  -- For example, the lfinger item will always have a smaller object ID than the rfinger item.
+  for _, wlocArray in pairs(inv.wearables) do
+
+    -- If this is a wearable type with more than one location (e.g., "finger", or "medal") then
+    -- we sort the locations for that type.  The one exception is that we don't want to sort
+    -- the "wielded" and "second" locations because those have very different meanings.
+    if (#wlocArray > 1) and (wlocArray[1] ~= "wielded") then
+      local idArray = {}
+
+      for _, wloc in ipairs(wlocArray) do
+        if (bestSet ~= nil) and (bestSet[wloc] ~= nil) then
+          table.insert(idArray, bestSet[wloc])
+        end -- if
+      end -- for
+
+      table.sort(idArray, function (v1, v2) return v1.id < v2.id end)
+
+      -- We now know the order that the items should be for this wearable type
+      -- Put them back in the set in the proper order
+      for i, wloc in ipairs(wlocArray) do
+        if (i <= #idArray) then
+          bestSet[wloc] = idArray[i]
+        end -- if
+      end -- for
+    end -- if
+  end -- for
+
+  -- If our best set is empty (maybe we don't have anything in our inventory) then treat that as a 
+  -- special case and let the caller know about it
+  if (bestSet == nil) then
+    dbot.warn("inv.set.createCR: No items in your inventory fit the set.  Is your inventory empty?")
+    dbot.warn("Do you need to refresh or build your inventory?")
+  end -- if
+
+  -- Wait until the end to save the set (calling functions can know it isn't ready yet if it is nil)
+  inv.set.table[priorityName][level] = bestSet
+
+  dbot.debug("Created " .. priorityName .. "[" .. level .. "] set with score " .. 
+             string.format("%.2f", bestScore))
+
+  -- We are done!
+  inv.set.createPkg = nil
+  return DRL_RET_SUCCESS
+end -- inv.set.createCR
+
+
+function inv.set.createWithHandicap(priorityName, level, handicap)
+  local objId
+  local setScore
+  local setStats
+  local score
+  local offhandScore
+  local weaponArray = {}
+
+  -- Start a new set that we'll gradually fill in
+  local newSet = {}
+
+  -- If level is nil, use the current level
+  if (level == nil) then
+    level = dbot.gmcp.getLevel() or 0
+  end -- if
+
+  for objId,_ in pairs(inv.items.table) do
+    local objIdentified = inv.items.getField(objId, invFieldIdentifyLevel) or ""
+    local objLevel      = tonumber(inv.items.getStatField(objId, invStatFieldLevel) or "")
+    local objWearable   = inv.items.getStatField(objId, invStatFieldWearable) or ""
+    local objWeight     = tonumber(inv.items.getStatField(objId, invStatFieldWeight) or 0)
+
+    if (objIdentified == invIdLevelPartial) or (objIdentified == invIdLevelFull) and
+       (objLevel ~= nil) and (objLevel <= level) then
+
+      if (objWearable ~= nil) and (objWearable ~= "") and (inv.wearables[objWearable] ~= nil) then
+        score, offhandScore = inv.score.item(objId, priorityName, handicap, level)
+        local nextBest = { id = objId, score = score }
+
+        -- We keep track of all weapons so that we can evaluate the best combination after we
+        -- see everything in our inventory
+        if (objWearable == "wield") then
+          table.insert(weaponArray, { id = objId, score = score, offhand = offhandScore, weight = objWeight })
+        end -- if
+
+        for _,w in ipairs(inv.wearables[objWearable]) do
+          -- Set a default (low) score if we haven't used this slot yet
+          if (newSet[w] == nil) then
+            newSet[w] = { id = -1, score = -1 }
+          end -- if
+
+          -- If the current item's score is greater than the slot's score, iterate and bump
+          if (nextBest.score > newSet[w].score) then
+            local tmp = newSet[w]
+            newSet[w] = nextBest
+            local nextBestName = inv.items.getStatField(nextBest.id, invStatFieldName)
+            if (nextBestName ~= nil) then
+              dbot.debug("Upgrading \"" .. w .. "\" to \"" .. nextBestName .. "\"")
+            end -- if
+
+            nextBest = tmp
+          end -- if
+        end -- for        
+
+        -- prune slots that don't have any items 
+        for _,w in ipairs(inv.wearables[objWearable]) do
+          if (newSet[w].id == -1) then
+            newSet[w] = nil
+          end -- if
+        end -- for        
+
+      end -- if
+    end -- if
+  end -- for
+
+  -- Check if the char has access to dual weapons at this level by checking the char's
+  -- class and checking if aard gloves are in the set
+  --
+  -- If the ability is not cached, this will need to be called asynchronously so that we can
+  -- call "showskill" and see at what level the ability is available.  If the ability is cached
+  -- then we can run this synchronously if we wish.
+  local dualWieldAvailable = dbot.ability.isAvailable("dual wield", level)
+
+  -- Check if the set has aard gloves in it.  If so, we automatically have access to dual wield :)
+  if (dualWieldAvailable == false) and (newSet["hands"] ~= nil) then
+    local handsId = tonumber(newSet["hands"].id or "")
+    if (handsId ~= nil) then
+      local handsName = inv.items.getStatField(handsId, invStatFieldName) or ""
+      if (handsName == "Aardwolf Gloves of Dexterity") then
+        dualWieldAvailable = true
+      end -- if
+    end -- if
+  end -- if
+
+  -- We already know the highest scoring solo weapon (it is in the "wielded" slot).  We now
+  -- find the highest scoring combination of compatible weapons ("wielded" + "second") if the
+  -- char has access to dual wield.
+  local bestWeaponSet = { score = 0, primary = nil, offhand = nil }
+  if (dualWieldAvailable) then
+
+    -- Get sorted arrays for all primary weapons and offhand weapons
+    local offhandArray = dbot.table.getCopy(weaponArray)
+    table.sort(weaponArray, function (entry1, entry2) return entry1.score > entry2.score end)
+    table.sort(offhandArray, function (entry1, entry2) return entry1.offhand > entry2.offhand end)
+
+    for _, primary in ipairs(weaponArray) do
+      for _, offhand in ipairs(offhandArray) do
+        if (primary.weight >= offhand.weight * 2) and (primary.id ~= offhand.id) then
+          if (primary.score + offhand.offhand > bestWeaponSet.score) then
+            bestWeaponSet.score = primary.score + offhand.offhand
+            bestWeaponSet.primary = { id = primary.id, score = primary.score }
+            bestWeaponSet.offhand = { id = offhand.id, score = offhand.offhand }
+          end -- if
+
+          break -- this is the highest possible offhand score for the current primary weapon
+        end -- if
+      end -- for
+    end -- for
+
+  end -- if
+
+  local scorePrimary = 0
+  local scoreSecond  = 0
+  local scoreShield  = 0 
+  local scoreHold    = 0
+
+  if (newSet[inv.wearLoc[invWearableLocWielded]] ~= nil) then
+    scorePrimary = newSet[inv.wearLoc[invWearableLocWielded]].score or 0
+  end -- if
+  if (newSet[inv.wearLoc[invWearableLocSecond]] ~= nil) then
+    scoreSecond = newSet[inv.wearLoc[invWearableLocSecond]].score or 0
+  end -- if
+  if (newSet[inv.wearLoc[invWearableLocShield]] ~= nil) then
+    scoreShield = newSet[inv.wearLoc[invWearableLocShield]].score or 0
+  end -- if
+  if (newSet[inv.wearLoc[invWearableLocHold]] ~= nil) then
+    scoreHold = newSet[inv.wearLoc[invWearableLocHold]].score or 0
+  end -- if
+
+  -- Check if we want dual weapons or primary weapon + shield + hold.  If we are using dual weapons,
+  -- whack the shield and hold items in the set because we won't be using them.  Otherwise, stick with
+  -- the highest scoring weapon, shield, and hold items that we found in the initial search.
+  if (bestWeaponSet.score > scorePrimary + scoreShield + scoreHold) then
+    newSet[inv.wearLoc[invWearableLocWielded]] = bestWeaponSet.primary
+    newSet[inv.wearLoc[invWearableLocSecond]]  = bestWeaponSet.offhand
+    newSet[inv.wearLoc[invWearableLocShield]]  = nil
+    newSet[inv.wearLoc[invWearableLocHold]]    = nil
+  else
+    newSet[inv.wearLoc[invWearableLocSecond]] = nil
+  end -- if
+
+  setScore, setStats = inv.score.set(newSet, priorityName, level)
+
+  return newSet, setStats, setScore 
+
+end -- inv.set.createWithHandicap
+
+
+inv.set.displayPkg = nil
+function inv.set.display(priorityName, level, endTag)
+  local retval
+  local priorityTable
+
+  if (priorityName == nil) or (priorityName == "") then
+    dbot.warn("inv.set.display: missing  priorityName parameter")
+    return inv.tags.stop(invTagsSet, endTag, DRL_RET_INVALID_PARAM)
+  end -- if
+
+  level = tonumber(level) or ""
+  if (level == nil) or (level == "") then
+    level = dbot.gmcp.getLevel()
+  end -- if
+
+  -- Check if the specified priority exists for the specified level
+  priorityTable, retval = inv.priority.get(priorityName, level)
+  if (priorityTable == nil) then
+    dbot.warn("inv.set.display: Priority \"" .. priorityName .. "\" does not have a priority table " ..
+            "for level " .. level)
+    return inv.tags.stop(invTagsSet, endTag, retval)
+  end -- if
+
+  -- Only allow one set creation at a time
+  if (inv.set.displayPkg ~= nil) then
+    dbot.info("Set display skipped: another set display is in progress")
+    return inv.tags.stop(invTagsSet, endTag, DRL_RET_BUSY)
+  end -- if
+
+  inv.set.displayPkg        = {}
+  inv.set.displayPkg.name   = priorityName
+  inv.set.displayPkg.level  = level
+  inv.set.displayPkg.endTag = endTag
+
+  -- Kick off the display co-routine to display the set
+  wait.make(inv.set.displayCR)
+
+  return DRL_RET_SUCCESS
+end -- inv.set.display
+
+
+function inv.set.displayCR()
+  local retval = DRL_RET_SUCCESS
+
+  local priorityName = inv.set.displayPkg.name or "Unknown"
+  local level        = inv.set.displayPkg.level or 0
+  local endTag       = inv.set.displayPkg.endTag
+
+  -- Create the set that we want to display
+  retval = inv.set.create(priorityName, level)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.set.displayCR: failed to create set " .. priorityName .. "[" .. level .. "]: " ..
+            dbot.retval.getString(retval))
+    inv.set.displayPkg = nil
+    return inv.tags.stop(invTagsSet, endTag, retval)
+  end -- if
+
+  -- Spin and wait until the new set is not nil
+  local waitForSetDisplayTimeout = 0
+  local waitForSetDisplayThreshold = 10
+  while (inv.set.table[priorityName][level] == nil) do
+    wait.time(drlSpinnerPeriodDefault)
+    waitForSetDisplayTimeout = waitForSetDisplayTimeout + drlSpinnerPeriodDefault
+    if (waitForSetDisplayTimeout > waitForSetDisplayThreshold) then
+      dbot.error("inv.set.displayCR: Failed to create set " .. priorityName .. "[" .. level .. "] within " ..
+                 waitForSetDisplayThreshold .. " seconds")
+      inv.set.displayPkg = nil
+      return inv.tags.stop(invTagsSet, endTag, DRL_RET_TIMEOUT)
+    end -- if
+  end -- while
+
+  retval = inv.set.displaySet(priorityName, level, inv.set.table[priorityName][level])
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.set.displayCR: Failed to display set: " .. dbot.retval.getString(retval))
+  end -- if
+
+  inv.set.displayPkg = nil
+
+  return inv.tags.stop(invTagsSet, endTag, retval)
+
+end -- inv.set.displayCR
+
+
+function inv.set.displaySet(setName, level, equipSet)
+  local retval = DRL_RET_SUCCESS
+
+  if (setName == nil) or (setName == "") then
+    dbot.warn("inv.set.displaySet: missing priority name parameter")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  level = tonumber(level or "")
+  if (level == nil) then
+    dbot.print("\n@WEquipment set: \"@C" .. setName .. "@W\"\n")
+  else
+    dbot.print("\n@WEquipment set:    @GLevel " .. string.format("%3d", level) .. 
+               " @C" .. setName .. "@w\n")
+  end -- if
+
+  for _,v in pairs(inv.wearLoc) do
+    if (equipSet ~= nil) and (v ~= "undefined") and (equipSet[v] ~= nil) then
+
+      local score = equipSet[v].score
+      local objId = equipSet[v].id
+
+      dbot.print("@Y  " .. string.format("%08s", v) .. "@W(" .. string.format("%4d", score) .. 
+                 "): @GLevel " .. 
+                 string.format("%3d", inv.items.getStatField(objId, invStatFieldLevel or "Unknown")) ..
+                 "@W \"" .. (inv.items.getField(objId, invFieldColorName) or "Unidentified") .. "\"")
+    end -- if
+  end -- for
+
+  local setStats = inv.set.getStats(equipSet, level)
+  if (setStats ~= nil) then
+    dbot.print("")
+    inv.set.displayStats(setStats, "", true, true)
+  else
+    dbot.warn("inv.set.displaySet: Failed to retrieve equipment stats for set \"@C" .. setName .. "@W\"")
+    retval = DRL_RET_MISSING_ENTRY
+  end -- if
+
+  return retval
+end -- inv.set.displaySet
+
+
+function inv.set.createAndWear(priorityName, level, endTag)
+  local retval = DRL_RET_SUCCESS
+  local priorityTable
+
+  if (priorityName == nil) or (priorityName == "") then
+    dbot.warn("inv.set.createAndWear: missing priorityName parameter")
+    return inv.tags.stop(invTagsSet, endTag, DRL_RET_INVALID_PARAM)
+  end -- if
+
+  level = tonumber(level) or ""
+  if (level == nil) or (level == "") then
+    level = dbot.gmcp.getLevel()
+  end -- if
+
+  -- Check if the specified priority exists for the specified level
+  priorityTable, retval = inv.priority.get(priorityName, level)
+  if (priorityTable == nil) then
+    dbot.warn("inv.set.createAndWear: Priority \"" .. priorityName .. "\" does not have a priority table " ..
+              "for level " .. level)
+    return inv.tags.stop(invTagsSet, endTag, retval)
+  end -- if
+
+  if (inv.set.createAndWearPkg ~= nil) then
+    dbot.info("Skipping request to wear set: another request is in progress")
+    return inv.tags.stop(invTagsSet, endTag, DRL_RET_BUSY)
+  end -- if
+
+  inv.set.createAndWearPkg              = {}
+  inv.set.createAndWearPkg.priorityName = priorityName
+  inv.set.createAndWearPkg.level        = level
+  inv.set.createAndWearPkg.endTag       = endTag
+
+  wait.make(inv.set.createAndWearCR)
+
+  return retval
+end -- inv.set.createAndWear
+
+
+function inv.set.createAndWearCR()
+  local retval
+
+  if (inv.set.createAndWearPkg == nil) then
+    dbot.error("inv.set.createAndWear: package is nil!")
+    return DRL_RET_INTERNAL_ERROR
+  end -- if
+
+  local priorityName = inv.set.createAndWearPkg.priorityName or "Unknown"
+  local level        = inv.set.createAndWearPkg.level or 0
+  local endTag       = inv.set.createAndWearPkg.endTag
+
+  -- Create the set that we want to wear
+  retval = inv.set.create(priorityName, level)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.set.createAndWearCR: failed to create set " .. priorityName .. "[" .. level .. "]: " ..
+              dbot.retval.getString(retval))
+    inv.set.createAndWearPkg = nil
+    return inv.tags.stop(invTagsSet, endTag, retval)
+  end -- if
+
+  -- Spin and wait until the new set is not nil
+  local totTime = 0
+  local timeout = 10
+  while (inv.set.table[priorityName][level] == nil) do
+    if (totTime > timeout) then
+      dbot.warn("inv.set.createAndWearCR: Failed to create set " .. priorityName .. 
+                "[" .. level .. "] within " .. timeout .. " seconds")
+      inv.set.createAndWearPkg = nil
+      return inv.tags.stop(invTagsSet, endTag, DRL_RET_TIMEOUT)
+    end -- if
+
+    wait.time(drlSpinnerPeriodDefault)
+    totTime = totTime + drlSpinnerPeriodDefault
+  end -- while
+
+  -- Attempt to wear the set we just created
+  retval = inv.set.wear(inv.set.table[priorityName][level])
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.set.createAndWearCR: Failed to wear set: " .. dbot.retval.getString(retval))
+  end -- if
+
+  -- Clean up and return
+  inv.set.createAndWearPkg = nil
+  return inv.tags.stop(invTagsSet, endTag, retval)
+
+end -- inv.set.createAndWearCR
+
+
+-- Wear all items from the specified set and put away any items unequipped as
+-- part of the process.
+-- Note: This must be called from within a co-routine
+function inv.set.wear(equipSet)
+  local retval = DRL_RET_SUCCESS
+  local commandArray = dbot.execute.new()
+
+  if (equipSet == nil) then
+    dbot.warn("inv.set.wear: missing set parameter")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  local itemLoc
+  local itemInfo
+
+  -- Disable refreshes while we are in the middle of wearing an equipment set
+  local didDisableRefresh = false
+  if (inv.state == invStateIdle) then
+    inv.state = invStatePaused
+    didDisableRefresh = true
+  elseif (inv.state == invStateRunning) then
+    dbot.info("Skipping request to wear an inventory set: you are in the middle of an inventory refresh")
+    return DRL_RET_BUSY
+  end -- if
+
+  -- Suppress misc. unique messages for item slots and items (e.g., "You proudly pin Academy Graduation
+  -- Medal to your chest.")
+  EnableTrigger(inv.items.trigger.wearSpecialName, true)
+
+  -- Disable the prompt to make the output look cleaner
+  dbot.prompt.hide()
+
+  -- Store any items that simply aren't part of the current equipment set.  This typically happens
+  -- when you switch from a single weapon to a dual weapon setup.
+  for _, v in pairs(inv.wearLoc) do
+    itemLoc = v or "none"
+    if (equipSet[itemLoc] == nil) then
+      for objId, objInfo in pairs(inv.items.table) do
+        local currentLoc = inv.items.getField(objId, invFieldObjLoc) or ""
+        if (currentLoc == itemLoc) then
+          retval = inv.items.storeItem(objId, commandArray)
+          if (retval ~= DRL_RET_SUCCESS) then
+            dbot.debug("inv.set.wear: Failed to store item " .. objId .. ": " .. 
+                       dbot.retval.getString(retval))
+          end -- if
+        end -- if
+      end -- for
+    end -- if
+  end -- for
+
+  -- Execute the command to store item types that aren't part of the equipment set
+  if (commandArray ~= nil) then
+    retval = dbot.execute.safe.blocking(commandArray, nil, nil, dbot.callback.default, 30)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.note("Skipping request to store unused item types: " .. dbot.retval.getString(retval))
+    end -- if
+    commandArray = dbot.execute.new()
+  end -- if
+
+  -- Create a temporary array that we can sort by item location.  We need to wear hands before
+  -- we wear wielded or second so that we can dual wield via aard gloves if they are available.
+  -- The most convenient way to do that is to simply sort the wearable location alphabetically.
+  local sortedEq = {}
+  for itemLoc, itemInfo in pairs(equipSet) do
+    table.insert(sortedEq, { itemLoc = itemLoc, itemInfo = itemInfo })
+  end -- for
+  table.sort(sortedEq, function (v1, v2) return v1.itemLoc < v2.itemLoc end) 
+
+  -- For each item in the new set, we get the item's object ID and location and then check
+  -- what is at that item's desired location.  If it is already worn at that location, we're
+  -- done.  Otherwise, store the item that is currently worn.  It would be convenient if we
+  -- could simply wear the new item at this point.  However, some items conflict with other
+  -- items (e.g., weapon weights, shields, held items, etc.) and it is easier to simply store
+  -- everything first and then wear everything in the new set.  We know that there are no 
+  -- conflicts with the new set (otherwise it wouldn't be a set!) so we don't have to worry
+  -- about interference between items in the middle of swapping equipment.
+  for _, entry in ipairs(sortedEq) do
+    local itemLoc = entry.itemLoc
+    local newObjId = entry.itemInfo.id
+    local objId
+    local objInfo
+
+    -- Find what currently is worn at this item's location
+    for objId, objInfo in pairs(inv.items.table) do
+      local currentLoc = inv.items.getField(objId, invFieldObjLoc) or ""
+      if (currentLoc == itemLoc) then
+        if (objId == newObjId) then
+          dbot.debug("Loc \"" .. itemLoc .. "\": Keeping objId=" .. objId)
+        else
+          dbot.debug("Loc \"" .. itemLoc .. "\": Swapping " .. objId .. " for " .. newObjId)
+
+          retval = inv.items.storeItem(objId, commandArray)
+          if (retval ~= DRL_RET_SUCCESS) then
+            dbot.note("Skipping request to store item " .. objId .. ": " .. 
+                       dbot.retval.getString(retval))
+          end -- if
+        end -- if
+
+        break -- no need to keep searching for the item we are wearing at the target location
+      end -- if
+
+    end -- for
+  end -- for
+
+  -- Execute the command to store old items
+  if (commandArray ~= nil) then
+    retval = dbot.execute.safe.blocking(commandArray, nil, nil, dbot.callback.default, 30)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.note("Skipping request to store old set: " .. dbot.retval.getString(retval))
+    end -- if
+    commandArray = dbot.execute.new()
+  end -- if
+
+  local numNewWornItems = 0
+
+  -- Get all of the new items to wear and wear them!  Yes, we are doing the exact same for loop
+  -- that we did above.  It is a little redundant, but it really simplifies things if we can 
+  -- separate storing old items and wearing new items.  If we mix those two steps, we can have
+  -- conflicts where a new item is conflicting with another item worn in a different location
+  -- from the previous set (e.g., weapon weights).
+  for _, entry in ipairs(sortedEq) do
+    local itemLoc = entry.itemLoc
+    local itemInfo = entry.itemInfo
+    local currentLoc = inv.items.getField(itemInfo.id, invFieldObjLoc) or ""
+
+    -- Swap out items that are not already in the right location
+    if (currentLoc ~= itemLoc) then
+      retval = inv.items.wearItem(itemInfo.id, itemLoc, commandArray, true)
+      if (retval ~= DRL_RET_SUCCESS) then
+        dbot.debug("inv.set.wear: Failed to wear item " .. (objId or "nil") .. ": " ..
+                   dbot.retval.getString(retval))
+      else
+        numNewWornItems = numNewWornItems + 1
+      end -- if
+    end -- if
+  end -- for
+
+  -- Execute the command to wear new items
+  if (commandArray ~= nil) then
+    retval = dbot.execute.safe.blocking(commandArray, nil, nil, dbot.callback.default, 30)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.note("Skipping request to wear set: " .. dbot.retval.getString(retval))
+    end -- if
+  end -- if
+
+  if (retval == DRL_RET_SUCCESS) then
+    local suffix = ""
+    if (numNewWornItems ~= 1) then
+      suffix = "s"
+    end -- if 
+    dbot.info("Wore " .. numNewWornItems .. " new item" .. suffix)
+  end -- if
+
+  dbot.prompt.show()
+
+  -- Stop suppressing unique item or item slot wear messages (e.g., pinning a medal, aard gloves
+  -- snapping, etc.)
+  EnableTrigger(inv.items.trigger.wearSpecialName, false)
+
+  -- Re-enable refreshes if we disabled them to wear an equipment set
+  if (didDisableRefresh) then
+    inv.state = invStateIdle
+  end -- if
+
+  inv.items.save()
+  return retval
+
+end -- inv.set.wear
+
+
+function inv.set.diff(set1, set2, level)
+  local diff = {}
+
+  if (set1 == nil) or (set2 == nil) then
+    dbot.warn("inv.set.diff: nil set given as parameter")
+    return diff, DRL_RET_INVALID_PARAM
+  end -- if
+
+  local stats1 = inv.set.getStats(set1, level)
+  local stats2 = inv.set.getStats(set2, level)
+
+  if (stats1 == nil) or (stats2 == nil) then
+    dbot.warn("inv.set.diff: Failed to get stats for given sets")
+    return diff, DRL_RET_MISSING_ENTRY
+  end -- if
+
+  for statName, statValue in pairs(stats1) do
+    diff[statName] = stats2[statName] - stats1[statName]
+  end -- if
+
+  return diff, DRL_RET_SUCCESS
+end -- if
+
+
+-- Returns "didFindAStat", retval.  This is helpful in knowing if there was actually a difference
+-- between the two given sets.  The "msgString" is a prefix appended to each display line.  The
+-- "doPrintHeader" boolean indicates if we should print a stat header before displaying the stats.
+function inv.set.displayDiff(set1, set2, level, msgString, doPrintHeader)
+  if (set1 == nil) or (set2 == nil) then
+    dbot.warn("inv.set.displayDiff: nil set given as parameter")
+    return false, DRL_RET_INVALID_PARAM
+  end -- if
+
+  msgString = msgString or ""
+
+  local diffStats = inv.set.diff(set1, set2, level)
+
+  return inv.set.displayStats(diffStats, msgString, doPrintHeader, false)
+end -- inv.set.diffStats
+
+
+-- Returns a set table in the form described for the inv.set.getStats input parameter
+function inv.set.get(priorityName, level)
+  if (priorityName == nil) or (priorityName == "") then
+    dbot.warn("inv.set.get: missing priorityName parameter")
+    return nil, DRL_RET_INVALID_PARAM
+  end -- if
+
+  level = tonumber(level) or dbot.gmcp.getLevel()
+
+  if (inv.set.table[priorityName] == nil) then
+    dbot.debug("inv.set.get: priority \"" .. priorityName .. "\" sets do not exist")
+    return nil, DRL_RET_MISSING_ENTRY
+  end -- if
+
+  return inv.set.table[priorityName][level], DRL_RET_SUCCESS
+
+end -- inv.set.get
+
+
+-- The "set" parameter is a table of the form:
+--   { head = { id = someItemId, score = 123  }, lfinger = { id = anotherItemId, score = 456 }, ...  }
+-- where each wearable location is a key in the "set" table and each value in the table is a
+-- structure holding the stats for the item.
+function inv.set.getStats(set, level)
+  local retval = DRL_RET_SUCCESS
+
+  if (set == nil) then
+    dbot.warn("inv.set.getStats: Attempted to get set stats for nil set")
+    return nil, DRL_RET_INVALID_PARAM
+  end -- if
+
+  local setStats = { int = 0, wis = 0, luck = 0, str = 0, dex = 0, con = 0,
+                     hp = 0, mana = 0, moves = 0,
+                     hit = 0, dam = 0,
+                     avedam = 0, offhandDam = 0,
+                     slash = 0, pierce = 0, bash = 0,
+                     acid = 0, cold = 0, energy = 0, holy = 0, electric = 0, negative = 0, shadow = 0, 
+                     poison = 0, disease = 0, magic = 0, air = 0, earth = 0, fire = 0, light = 0,
+                     mental = 0, sonic = 0, water = 0,
+                     allphys = 0, allmagic = 0,
+
+                     haste = 0, regeneration = 0, sanctuary = 0, invis = 0, flying = 0, 
+                     detectgood = 0, detectevil = 0, detecthidden = 0, detectinvis = 0, detectmagic = 0,
+                     dualwield = 0, irongrip = 0, shield = 0 -- these last 3 are not official "affect mods"
+                   }
+
+  for itemLoc, itemStruct in pairs(set) do
+    for statName, statValue in pairs(setStats) do
+      local objId = tonumber(itemStruct.id) or 0
+      local itemValue = inv.items.getStatField(objId, statName)
+
+      -- Offhand weapons should give stats to offhandDam, not avedam
+      if (itemLoc == "second") and (statName == invStatFieldAveDam) then
+        statName = "offhandDam"
+        statValue = setStats[statName]
+      end -- if
+
+      if (itemValue ~= nil) then
+        setStats[statName] = statValue + itemValue
+      end -- if
+    end -- for
+  end -- for
+
+  -- If the level is available, use it to cap the stats if they are overmax
+  level = tonumber(level or "")
+  if (level ~= nil) then
+    local statsWithCaps = "int wis luck str dex con"
+
+    for statName in statsWithCaps:gmatch("%S+") do
+      if (inv.statBonus.equipBonus[level] ~= nil) and
+         (inv.statBonus.equipBonus[level][statName] ~= nil) and
+         (tonumber(setStats[statName] or 0) > inv.statBonus.equipBonus[level][statName]) then         
+        setStats[statName] = inv.statBonus.equipBonus[level][statName]
+      end -- if   
+    end -- for
+  end -- if
+
+  return setStats, retval
+
+end -- inv.set.getStats
+
+
+function inv.set.displayStats(setStats, msgString, doPrintHeader, doDisplayIfZero)
+  local setStr = DRL_XTERM_GREY .. (msgString or "")
+  local totResists = 0
+
+  -- Track if at least one stat has something in it.  Unless doDisplayIfZero is true, we will
+  -- skip displaying stats that don't affect things.
+  local didFindAStat = false
+
+  if (setStats == nil) then
+    dbot.warn("inv.set.displayStats: set stats are nil")
+    return didFindAStat, DRL_RET_INVALID_PARAM
+  end -- if
+
+  -- We weight a specific physical or magic resist relative to an "all" resist.  For example, 3 "slash"
+  -- resists are equivalent to 1 "all" phys resist because there are 3 physical resist types.  Similarly,
+  -- one specific magical resist is worth 1/17 of one "all" magical resist value because there are 17
+  -- magical resistance types.
+  local resistNames = {}
+  resistNames[1]  = { invStatFieldAllPhys, invStatFieldAllMagic }
+  resistNames[3]  = { invStatFieldBash,    invStatFieldPierce,   invStatFieldSlash }
+  resistNames[17] = { invStatFieldAcid,    invStatFieldCold,     invStatFieldEnergy,
+                      invStatFieldHoly,    invStatFieldElectric, invStatFieldNegative, 
+                      invStatFieldShadow,  invStatFieldMagic,    invStatFieldAir,
+                      invStatFieldEarth,   invStatFieldFire,     invStatFieldLight, 
+                      invStatFieldMental,  invStatFieldSonic,    invStatFieldWater,
+                      invStatFieldDisease, invStatFieldPoison }
+
+  for resistWeight, resistTable in pairs(resistNames) do
+    for _, resistName in ipairs(resistTable) do
+      totResists = totResists + tonumber(setStats[resistName] or 0) / tonumber(resistWeight)
+    end -- for
+  end -- for
+  setStats.totResists = totResists
+
+  local statSizes = { { avedam = 3 }, { offhandDam = 3 }, { hit = 3 }, { dam = 3 },
+                      { int = 3 }, { wis = 3 }, { luck = 3 }, { str = 3 }, { dex = 3 }, { con = 3 },
+                      { totResists = 3 }, { hp = 4 }, { mana = 4 }, { moves = 4 } } 
+
+  local basicHeader = "@W" .. string.rep(" ", #msgString) ..
+                      "Ave Sec  HR  DR Int Wis Lck Str Dex Con Res HitP Mana Move Effects"
+
+  for i, statTable in ipairs(statSizes) do
+    for statName, statDigits in pairs(statTable) do
+      if (setStats[statName] ~= nil) and (tonumber(setStats[statName]) ~= 0) then
+        didFindAStat = true
+      end -- if
+      setStr = setStr .. (inv.items.colorizeStat(setStats[statName] or 0, statDigits, false) or "nil") .. " "
+    end -- for
+  end -- for
+
+  -- Effects (these are known on aard as affectMods)
+  local effectList = "haste regeneration sanctuary invis flying dualwield irongrip shield " ..
+                     "detectgood detectevil detecthidden detectinvis detectmagic"
+  for effect in effectList:gmatch("%S+") do
+    local effectVal = tonumber(setStats[effect] or "")
+    if (effectVal ~= nil) then
+      if (effectVal > 0) then
+        setStr = setStr .. "@G" .. DRL_ANSI_GREEN .. effect .. "@W" .. DRL_ANSI_WHITE .. " "
+      elseif (effectVal < 0) then
+        setStr = setStr .. "@R" .. DRL_ANSI_RED .. effect .. "@W" .. DRL_ANSI_WHITE .. " "
+      end -- if
+    end -- if
+  end -- for
+
+  if (doDisplayIfZero == true) or (didFindAStat == true) then
+    if (doPrintHeader == true) then
+      dbot.print(basicHeader)
+    end -- if
+    dbot.print(setStr)
+  end -- if
+
+  return didFindAStat, DRL_RET_SUCCESS
+end -- inv.set.setDisplay
+
+
+inv.set.comparePkg = nil
+function inv.set.compare(priorityName, relativeName, endTag)
+  if (priorityName == nil) or (priorityName == "") then
+    dbot.warn("inv.set.compare: Missing priorityName parameter")
+    return inv.tags.stop(invTagsCompare, endTag, DRL_RET_INVALID_PARAM)
+  end -- if
+
+  if (relativeName == nil) or (relativeName == "") then
+    dbot.warn("inv.set.compare: Missing relativeName parameter")
+    return inv.tags.stop(invTagsCompare, endTag, DRL_RET_INVALID_PARAM)
+  end -- if
+
+  if (inv.set.table[priorityName] == nil) then
+    dbot.warn("inv.set.compare: priority \"" .. priorityName .. "\" does not have analysis results.  " ..
+              "You may need to run \"" .. pluginNameCmd .. " analyze create " .. priorityName .. "\".")
+    return inv.tags.stop(invTagsCompare, endTag, DRL_RET_MISSING_ENTRY)
+  end -- if
+
+  if (inv.set.comparePkg ~= nil) then
+    dbot.info("Skipping comparison of \"" .. relativeName .. "\" for priority \"" .. priorityName .. 
+              "\": another comparison is in progress")
+    return inv.tags.stop(invTagsCompare, endTag, DRL_RET_BUSY)
+  end -- if
+
+  inv.set.comparePkg              = {}
+  inv.set.comparePkg.priorityName = priorityName
+  inv.set.comparePkg.queryString  = "rname " .. relativeName
+  inv.set.comparePkg.endTag       = endTag
+
+  wait.make(inv.set.compareCR)
+
+  return DRL_RET_SUCCESS
+end -- inv.set.compare
+
+
+function inv.set.compareCR()
+  local retval = DRL_RET_SUCCESS
+  local idArray = nil
+  local startLevel = 1 + 10 * dbot.gmcp.getTier()
+  local didDisableRefresh = false
+  local endTag = inv.set.comparePkg.endTag
+
+  idArray, retval = inv.items.searchCR(inv.set.comparePkg.queryString)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.debug("inv.set.compareCR: failed to search inventory table: " .. dbot.retval.getString(retval))
+    dbot.info("Skipping compare request: could not find the specified item in main inventory")
+
+  -- Let the user know if no items matched their query
+  elseif (idArray == nil) or (#idArray == 0) then
+    dbot.info("Skipping comparison: No items matched query: \"" .. inv.set.comparePkg.queryString .. "\"")
+
+  -- We have the objId for the target item
+  elseif (#idArray == 1) then
+    objId = tonumber(idArray[1] or "")
+
+    -- Save the previous set analysis that includes the target item so that we have something to compare 
+    local tmpAnalysis = inv.set.table[inv.set.comparePkg.priorityName]
+    if (tmpAnalysis == nil) then
+      dbot.warn("inv.set.compareCR: Failed to find analysis table for priority \"" ..
+                inv.set.comparePkg.priorityName .. "\"")
+      inv.set.comparePkg = nil
+      return inv.tags.stop(invTagsCompare, endTag, DRL_RET_MISSING_ENTRY)
+    end -- if
+
+    -- Disable refresh during the comparison
+    if (inv.state == invStateIdle) then
+      inv.state = invStatePaused
+      didDisableRefresh = true
+    elseif (inv.state == invStateRunning) then
+      dbot.info("Skipping set comparison: you are in the middle of an inventory refresh")
+      inv.set.comparePkg = nil
+      return inv.tags.stop(invTagsCompare, endTag, DRL_RET_BUSY)
+    end -- if
+
+    -- We have a temporary copy of this that we will restore after we are done comparing the new analysis
+    inv.set.table[inv.set.comparePkg.priorityName] = nil
+
+    -- Get the item's level so that we can skip analyzing levels below what the item can be used.
+    -- If we don't know the item's level, start analyzing at the user's lowest possible level.
+    local itemName = inv.items.getField(objId, invFieldColorName) or "Unknown item name"
+    local itemLevel = tonumber(inv.items.getStatField(objId, invStatFieldLevel) or "")
+    if (itemLevel == nil) or (itemLevel < startLevel) then
+      itemLevel = startLevel
+    end -- if
+
+    -- Remove the item
+    retval = inv.items.remove(objId)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.set.compareCR: Failed to remove objId " .. (objId or "nil") .. ": " ..
+                dbot.retval.getString(retval))
+    else
+      dbot.print("@WAnalyzing optimal \"@C" .. inv.set.comparePkg.priorityName .. 
+                 "@W\" equipment sets with and without \"" .. itemName .. "\"\n")
+
+      -- Analyze the priority with the item removed so that we can compare the results with what
+      -- we had when the item was included
+      local resultData = dbot.callback.new()
+      retval = inv.analyze.sets(inv.set.comparePkg.priorityName, itemLevel, resultData)
+      if (retval ~= DRL_RET_SUCCESS) then
+        dbot.warn("inv.set.compareCR: Failed to analyze sets: " .. dbot.retval.getString(retval))
+      else
+        -- Wait until the analysis is complete
+        retval = dbot.callback.wait(resultData, inv.analyze.timeoutThreshold)
+        if (retval ~= DRL_RET_SUCCESS) then
+          dbot.warn("inv.set.compareCR: Analysis of comparison set failed: " .. dbot.retval.getString(retval))
+        end -- if
+      end -- if
+
+      -- Add the item back into our inventory
+      retval = inv.items.add(objId)
+      if (retval ~= DRL_RET_SUCCESS) then
+        dbot.warn("inv.set.compareCR: Failed to add objId " .. (objId or "nil") .. ": " ..
+                  dbot.retval.getString(retval))
+      end -- if
+
+      dbot.print("\n@WPriority \"@C" .. inv.set.comparePkg.priorityName .. "@W\" advantages with \"" .. 
+                 itemName .. DRL_ANSI_WHITE .. "@W\":\n")
+
+      -- Display the difference between when the item was present and when it was removed
+      local doDisplayHeader = true
+      local minCharLevel = 1 + (10 * dbot.gmcp.getTier())
+      local maxCharLevel = 200 + minCharLevel
+      for level = itemLevel, maxCharLevel do
+        local s1 = inv.set.table[inv.set.comparePkg.priorityName][level]
+        local s2 = tmpAnalysis[level]
+
+        if (s1 ~= nil) and (s2 ~= nil) then
+          didFindStat = inv.set.displayDiff(s1, s2, level, string.format("Level %3d: ", level), doDisplayHeader)
+          if (didFindStat) then
+            doDisplayHeader = false
+          end -- if
+        end -- if
+      end -- for
+
+      if (doDisplayHeader) then
+        dbot.print("No set with item \"" .. itemName .. DRL_ANSI_WHITE .. 
+                   "\" is optimal for any level between " .. minCharLevel .. " and " .. maxCharLevel)
+      end -- if
+
+    end -- if
+
+    -- Restore the original set analysis that includes the target item
+    inv.set.table[inv.set.comparePkg.priorityName] = tmpAnalysis
+
+  -- We shouldn't have more than one item match the relative name query string.  This check is just
+  -- paranoia...
+  else
+    dbot.error("inv.set.compareCR: More than one item matched query string \"" ..
+               inv.set.comparePkg.queryString .. "\"")
+    retval = DRL_RET_INTERNAL_ERROR
+  end -- if
+
+  -- Re-enable refreshes if we disabled them during the comparison
+  if (didDisableRefresh) then
+    inv.state = invStateIdle
+  end -- if
+
+  -- We may have updated and saved the interim state during the comparison.  Ensure that we have
+  -- the latest state saved now that the comparison is done and everything is back to where we started.
+  inv.items.save()
+  inv.set.save()
+
+  inv.set.comparePkg = nil
+  return inv.tags.stop(invTagsCompare, endTag, retval)
+end -- inv.set.compareCR
+
+
+inv.set.covetPkg = nil
+function inv.set.covet(priorityName, auctionNum, endTag)
+  if (priorityName == nil) or (priorityName == "") then
+    dbot.warn("inv.set.covet: Missing priorityName parameter")
+    return inv.tags.stop(invTagsCovet, endTag, DRL_RET_INVALID_PARAM)
+  end -- if
+
+  if (auctionNum == nil) or (type(auctionNum) ~= "number") then
+    dbot.warn("inv.set.covet: Auction # parameter is not a number!")
+    return inv.tags.stop(invTagsCovet, endTag, DRL_RET_INVALID_PARAM)
+  end -- if
+
+  if (inv.set.table[priorityName] == nil) then
+    dbot.warn("inv.set.covet: priority \"" .. priorityName .. "\" does not have analysis results.  " ..
+              "You may need to run \"" .. pluginNameCmd .. " analyze create " .. priorityName .. "\".")
+    return inv.tags.stop(invTagsCovet, endTag, DRL_RET_MISSING_ENTRY)
+  end -- if
+
+  if (inv.set.covetPkg ~= nil) then
+    dbot.info("Skipping evaluation of auction #" .. auctionNum .. ": another evaluation is in progress")
+    return inv.tags.stop(invTagsCovet, endTag, DRL_RET_BUSY)
+  end -- if
+
+  inv.set.covetPkg              = {}
+  inv.set.covetPkg.priorityName = priorityName
+  inv.set.covetPkg.auctionNum   = auctionNum
+  inv.set.covetPkg.endTag       = endTag
+
+  wait.make(inv.set.covetCR)
+
+  return DRL_RET_SUCCESS
+end -- inv.set.covet
+
+
+function inv.set.covetCR()
+  local startLevel = 1 + 10 * dbot.gmcp.getTier()
+  local endTag = inv.set.covetPkg.endTag
+
+  -- This is either an incredibly evil hack or a clever solution to reuse code -- I haven't decided yet.
+  -- Everything in the inventory table is predicated on having an object ID for each item.  We don't
+  -- know the item's ID yet when we are pulling info from an auction.  So...if we pretend the auction #
+  -- is the objId we can move forward with the identification and analysis.  Real object IDs should be
+  -- way outside of the range of numbers used for auctions so we are probably not in danger of a conflict
+  -- with an actual item.  Probably.
+  local objId = inv.set.covetPkg.auctionNum
+
+  -- Save the previous set analysis that includes the target item so that we have something to compare 
+  local tmpAnalysis = inv.set.table[inv.set.covetPkg.priorityName]
+  if (tmpAnalysis == nil) then
+    dbot.warn("inv.set.covetCR: Failed to find analysis table for priority \"" ..
+              inv.set.covetPkg.priorityName .. "\"")
+    inv.set.covetPkg = nil
+    return inv.tags.stop(invTagsCovet, endTag, DRL_RET_MISSING_ENTRY)
+  end -- if
+
+  -- We don't want an inventory refresh triggering in the middle of this auction item evaluation.
+  -- Disable refresh during the comparison
+  local origRefreshState = inv.state
+  if (inv.state == invStateIdle) then
+    inv.state = invStatePaused
+  elseif (inv.state == invStateRunning) then
+    dbot.info("Skipping auction evaluation: you are in the middle of an inventory refresh")
+    inv.set.covetPkg = nil
+    return inv.tags.stop(invTagsCovet, endTag, DRL_RET_BUSY)
+  end -- if
+
+  -- Temporarily create an item placeholder with a fake object ID.  We will fill in this placeholder
+  -- with information from an auction later.
+  local retval = inv.items.add(objId)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.set.covetCR: Failed to add auction fake objId " .. (objId or "nil") .. ": " ..
+              dbot.retval.getString(retval))
+    inv.set.covetPkg = nil
+    inv.state = origRefreshState
+    return inv.tags.stop(invTagsCovet, endTag, retval)
+  end -- if
+
+  -- Fake a location for the auction item
+  inv.items.setField(objId, invFieldObjLoc, invItemLocAuction)
+
+  -- Treat any auction # less than a threshold as a short-term market bid and anything over the threshold
+  -- as a long-term market bid.
+  local auctionShortLongThreshold = 1000 -- I think anything below 1000 is guaranteed to be short-term
+  local auctionCmd
+  if (inv.set.covetPkg.auctionNum < auctionShortLongThreshold) then
+    auctionCmd = "bid "
+  else
+    auctionCmd = "lbid "
+  end -- if
+
+  -- Attempt to identify the auction item and wait until we have confirmation that the ID completed
+  local resultData = dbot.callback.new()
+  retval = inv.items.identifyItem(objId, auctionCmd, resultData)
+  if (retval == DRL_RET_SUCCESS) then
+    retval = dbot.callback.wait(resultData, inv.items.timer.idTimeoutThresholdSec)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.set.covetCR: Identification timed out for auction # " .. inv.set.covetPkg.auctionNum)
+    end -- if
+  end -- if
+
+  -- Get the item's level so that we can skip analyzing levels below what the item can be used.
+  -- If we don't know the item's level, start analyzing at the user's lowest possible level.
+  local itemLevel = tonumber(inv.items.getStatField(objId, invStatFieldLevel) or "") or startLevel
+  local itemName = inv.items.getStatField(objId, invStatFieldName)
+
+  -- If the identification failed, give the user as much info as possible on the failure
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.note("inv.set.covetCR: Failed to identify auction item #" .. inv.set.covetPkg.auctionNum ..
+              ": " .. dbot.retval.getString(retval))
+
+  -- If the identification worked, we'll know the item's name.  Skip the comparison if the
+  -- identification did not fully succeed.  This is probably redundant with the above clause where
+  -- we check if (retval ~= DRL_RET_SUCCESS) but maybe there are weird corner cases and it doesn't
+  -- hurt to be extra paranoid.
+  elseif (itemName == nil) then
+    retval = DRL_RET_MISSING_ENTRY
+    dbot.note("inv.set.covetCR: Failed to identify auction item #" .. inv.set.covetPkg.auctionNum)
+
+  -- Compare the inventory with and without the auction item
+  elseif (retval == DRL_RET_SUCCESS) then
+
+    -- We have a temporary copy of this that we will restore after we are done comparing the new analysis
+    inv.set.table[inv.set.covetPkg.priorityName] = nil
+
+    dbot.print("@WAnalyzing optimal \"@C" .. inv.set.covetPkg.priorityName .. 
+               "@W\" equipment sets with and without @Gauction " .. inv.set.covetPkg.auctionNum .. "@w\n")
+
+    -- Analyze the priority with the item added so that we can compare the results with what
+    -- we had when the item was not included
+    local resultData = dbot.callback.new()
+    retval = inv.analyze.sets(inv.set.covetPkg.priorityName, itemLevel, resultData)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.set.covetCR: Failed to analyze sets: " .. dbot.retval.getString(retval))
+    else
+      -- Wait until the analysis is complete
+      retval = dbot.callback.wait(resultData, inv.analyze.timeoutThreshold, 1)
+      if (retval ~= DRL_RET_SUCCESS) then
+        dbot.warn("inv.set.covetCR: Analysis of set failed: " .. dbot.retval.getString(retval))
+      end -- if
+    end -- if
+
+    inv.items.setField(objId, invFieldColorName, "Auction #" .. inv.set.covetPkg.auctionNum)
+    inv.items.displayLastType = ""
+    inv.items.displayItem(objId, invDisplayVerbosityBasic)
+
+    dbot.print("\n@WPriority \"@C" .. inv.set.covetPkg.priorityName .. "@W\" advantages with " ..
+               "@Gauction #" .. inv.set.covetPkg.auctionNum .. "@w:\n")
+
+    -- Display the difference between when the item was present and when it was removed
+    local doDisplayHeader = true
+    local minCharLevel = 1 + (10 * dbot.gmcp.getTier())
+    local maxCharLevel = 200 + minCharLevel
+    for level = itemLevel, maxCharLevel do
+      local s1 = tmpAnalysis[level]
+      local s2 = inv.set.table[inv.set.covetPkg.priorityName][level]
+
+      if (s1 ~= nil) and (s2 ~= nil) then
+        didFindStat = inv.set.displayDiff(s1, s2, level, string.format("Level %3d: ", level), doDisplayHeader)
+        if (didFindStat) then
+          doDisplayHeader = false
+        end -- if
+      end -- if
+    end -- for
+
+    if (doDisplayHeader) then
+      dbot.print("@WNo set with item \"" .. itemName .. DRL_ANSI_WHITE .. 
+                 "\" is optimal for any level between " .. minCharLevel .. " and " .. maxCharLevel)
+    end -- if
+  end -- if
+
+  -- Remove the item from the inventory and the recent cache
+  local removeRetval = inv.items.remove(objId)
+  if (removeRetval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.set.covetCR: Failed to remove auction fake objId " .. (objId or "nil") .. ": " ..
+              dbot.retval.getString(removeRetval))
+    if (retval == DRL_RET_SUCCESS) then
+      retval = removeRetval
+    end -- if
+  end -- if
+  removeRetval = inv.cache.remove(inv.cache.recent.table, objId)
+  if (removeRetval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.set.covetCR: Failed to remove auction fake objId " .. (objId or "nil") .. ": " ..
+              " from the recent cache: " .. dbot.retval.getString(removeRetval))
+    if (retval == DRL_RET_SUCCESS) then
+      retval = removeRetval
+    end -- if
+  end -- if
+
+  -- Restore the original set analysis that predates adding the temporary auction item
+  inv.set.table[inv.set.covetPkg.priorityName] = tmpAnalysis
+
+  -- We may have saved the interim state during the comparison.  Ensure that we have the latest
+  -- state saved now that the comparison is done and everything is back to where we started.
+  inv.items.save()
+  inv.set.save()
+
+  -- Re-enable refreshes if we disabled them during the comparison
+  inv.state = origRefreshState
+
+  -- Clean up and return
+  inv.set.covetPkg = nil
+  return inv.tags.stop(invTagsCovet, endTag, retval)
+end -- inv.set.covetCR
+
+
+----------------------------------------------------------------------------------------------------
+--
+-- Module to manage snapshots of equipment sets
+--
+-- The inv.set module handles creating and wearing equipment sets automatically generated from a
+-- priority weighting of stats.  That is probably what most people will use to manage equipment
+-- sets.  However, it may be convenient to take a snapshot of what you are wearing at a particular
+-- moment and easily go back to re-wear the exact same items at a later date.  That's where this
+-- snapshot module comes in.
+--
+-- You can add and remove snapshots (big surprise) with the cleverly named inv.snapshot.add and 
+-- inv.snapshot.remove functions.  You can also re-wear the items from an existing snapshot by
+-- calling inv.snapshot.wear.  The inv.snapshot.list function prints a listing of all existing
+-- saved snapshots.  The inv.snapshot.display function prints details about a specific snapshot.
+-- Easy peasy.
+--
+-- inv.snapshot.init.atActive()
+-- inv.snapshot.fini(doSaveState)
+--
+-- inv.snapshot.save()
+-- inv.snapshot.load()
+-- inv.snapshot.reset()
+--
+-- inv.snapshot.add(snapshotName, endTag)
+-- inv.snapshot.remove(snapshotName, endTag)
+--
+-- inv.snapshot.list(endTag)
+-- inv.snapshot.display(snapshotName, endTag)
+-- inv.snapshot.wear(snapshotName, endTag)
+--
+----------------------------------------------------------------------------------------------------
+
+inv.snapshot           = {}
+inv.snapshot.init      = {}
+inv.snapshot.table     = {}
+inv.snapshot.stateName = "inv-snapshot.state"
+
+
+function inv.snapshot.init.atActive()
+  local retval = DRL_RET_SUCCESS
+
+  retval = inv.snapshot.load()
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.snapshot.init.atActive: failed to load snapshot data from storage: " ..
+              dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+end -- inv.snapshot.init.atActive
+
+
+function inv.snapshot.fini(doSaveState)
+  local retval = DRL_RET_SUCCESS
+
+  if (doSaveState) then
+    -- Save our current data
+    retval = inv.snapshot.save()
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.snapshot.fini: Failed to save inv.snapshot module data: " ..
+                dbot.retval.getString(retval))
+    end -- if
+  end -- if
+
+  return retval
+end -- inv.snapshot.fini
+
+
+function inv.snapshot.save()
+  local retval = dbot.storage.saveTable(dbot.backup.getCurrentDir() .. inv.snapshot.stateName,
+                                        "inv.snapshot.table", inv.snapshot.table)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.snapshot.save: Failed to save snapshot table: " .. dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+end -- inv.snapshot.save
+
+
+function inv.snapshot.load()
+
+  local retval = dbot.storage.loadTable(dbot.backup.getCurrentDir() .. inv.snapshot.stateName, inv.snapshot.reset)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.snapshot.load: Failed to load table from file \"@R" .. 
+              dbot.backup.getCurrentDir() .. inv.snapshot.stateName .. "@W\": " .. dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+
+end -- inv.snapshot.load()
+
+
+function inv.snapshot.reset()
+  inv.snapshot.table = {}
+
+  return inv.snapshot.save()
+end -- inv.snapshot.reset
+
+
+function inv.snapshot.add(snapshotName, endTag)
+  local retval = DRL_RET_SUCCESS
+  local numItemsInSnap = 0
+  local snap = {}
+
+  if (snapshotName == nil) or (snapshotName == "") then
+    dbot.warn("inv.snapshot.add: Missing snapshot name")
+    return inv.tags.stop(invTagsSnapshot, endTag, DRL_RET_INVALID_PARAM)  
+  end -- if
+
+  for objId, _ in pairs(inv.items.table) do
+    if inv.items.isWorn(objId) then
+      local objLoc = inv.items.getField(objId, invFieldObjLoc) or ""
+
+      if (objLoc ~= "") then
+        snap[objLoc] = { id = objId, score = 0 } -- snapshots don't have scores but the set format assumes them
+        numItemsInSnap = numItemsInSnap + 1
+      end -- if
+    end -- if
+  end -- for
+
+  local suffix = ""
+  if (numItemsInSnap ~= 1) then
+    suffix = "s"
+  end -- if
+
+  if (numItemsInSnap > 0) then
+    inv.snapshot.table[snapshotName] = snap
+    dbot.info("Created \"@C" .. snapshotName .. "@W\" snapshot with " .. numItemsInSnap .. " item" .. suffix)
+
+    retval = inv.snapshot.save()
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.snapshot.remove: Failed to save snapshot table: " .. dbot.retval.getString(retval))
+    end -- if
+  else
+    dbot.info("No items were added to snapshot \"@C" .. snapshotName .. "@W\"")
+    retval = DRL_RET_MISSING_ENTRY
+  end -- if
+
+  return inv.tags.stop(invTagsSnapshot, endTag, retval)
+end -- inv.snapshot.add
+
+
+function inv.snapshot.remove(snapshotName, endTag)
+  local retval = DRL_RET_SUCCESS
+
+  if (snapshotName == nil) or (snapshotName == "") then
+    dbot.warn("inv.snapshot.remove: Missing snapshot name")
+    return inv.tags.stop(invTagsSnapshot, endTag, DRL_RET_INVALID_PARAM)  
+  end -- if
+
+  if (inv.snapshot.table[snapshotName] == nil) then
+    dbot.warn("inv.snapshot.remove: Failed to remove snapshot \"@C" .. snapshotName .. 
+              "@W\": it does not exist")
+    return inv.tags.stop(invTagsSnapshot, endTag, DRL_RET_MISSING_ENTRY)  
+  end -- if
+
+  -- Remove the snapshot
+  inv.snapshot.table[snapshotName] = nil
+  retval = inv.snapshot.save()
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.snapshot.remove: Failed to save snapshot table: " .. dbot.retval.getString(retval))
+  end -- if
+
+  dbot.info("Removed snapshot \"@C" .. snapshotName .. "@W\"")
+
+  return inv.tags.stop(invTagsSnapshot, endTag, retval)
+end -- inv.snapshot.remove
+
+
+-- print names of all snapshots
+function inv.snapshot.list(endTag)
+  local retval = DRL_RET_SUCCESS
+  local numSnapshots = 0
+
+  for snapName, snapSet in pairs(inv.snapshot.table) do
+    if (numSnapshots == 0) then
+      dbot.print("@WSaved Snapshots:")
+    end -- if
+
+    dbot.print("  @C" .. snapName)
+    numSnapshots = numSnapshots + 1
+  end -- for
+
+  local suffix = ""
+  if (numSnapshots ~= 1) then
+    suffix = "s"
+  end -- if
+  dbot.info("Found " .. numSnapshots .. " saved snapshot" .. suffix)
+
+  return inv.tags.stop(invTagsSnapshot, endTag, retval)
+end -- inv.snapshot.list
+
+
+function inv.snapshot.display(snapshotName, endTag)
+  retval = DRL_RET_SUCCESS
+
+  if (snapshotName == nil) or (snapshotName == "") then
+    dbot.warn("inv.snapshot.display: Missing snapshot name")
+    return inv.tags.stop(invTagsSnapshot, endTag, DRL_RET_INVALID_PARAM)  
+  end -- if
+
+  if (inv.snapshot.table[snapshotName] == nil) then
+    dbot.warn("inv.snapshot.display: Failed to display snapshot \"@C" .. snapshotName .. 
+              "@W\": it does not exist")
+    return inv.tags.stop(invTagsSnapshot, endTag, DRL_RET_MISSING_ENTRY)  
+  end -- if
+
+  retval = inv.set.displaySet(snapshotName, nil, inv.snapshot.table[snapshotName])
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.snapshot.display: Failed to display snapshot \"@C" .. snapshotName .. 
+              "@W\": " .. dbot.retval.getString(retval))
+  end -- if
+
+  return inv.tags.stop(invTagsSnapshot, endTag, retval)
+end -- inv.snapshot.display
+
+
+inv.snapshot.wearPkg = nil
+function inv.snapshot.wear(snapshotName, endTag)
+  retval = DRL_RET_SUCCESS
+
+  if (snapshotName == nil) or (snapshotName == "") then
+    dbot.warn("inv.snapshot.wear: Missing snapshot name")
+    return inv.tags.stop(invTagsSnapshot, endTag, DRL_RET_INVALID_PARAM)  
+  end -- if
+
+  if (inv.snapshot.table[snapshotName] == nil) then
+    dbot.warn("inv.snapshot.wear: Failed to wear snapshot \"@C" .. snapshotName .. 
+              "@W\": it does not exist")
+    return inv.tags.stop(invTagsSnapshot, endTag, DRL_RET_MISSING_ENTRY)  
+  end -- if
+
+  if (inv.snapshot.wearPkg ~= nil) then
+    dbot.info("Skipping request to wear snapshot \"@C" .. snapshotName .. "@W\": " ..
+              dbot.retval.getString(retval))
+    return inv.tags.stop(invTagsSnapshot, endTag, DRL_RET_BUSY)  
+  end -- if
+
+  inv.snapshot.wearPkg              = {}
+  inv.snapshot.wearPkg.snapshotName = snapshotName
+  inv.snapshot.wearPkg.endTag       = endTag
+
+  wait.make(inv.snapshot.wearCR)
+
+  return retval
+end -- inv.snapshot.wear
+
+
+function inv.snapshot.wearCR()
+  local retval = DRL_RET_SUCCESS
+
+  if (inv.snapshot.wearPkg == nil) then
+    dbot.error("inv.snapshot.wearCR: wear package is nil!")
+    return inv.tags.stop(invTagsSnapshot, "", DRL_RET_INTERNAL_ERROR)
+  end -- if
+
+  local endTag = inv.snapshot.wearPkg.endTag or ""
+  local snapshotName = inv.snapshot.wearPkg.snapshotName
+
+  if (inv.snapshot.table[snapshotName] == nil) then
+    dbot.warn("inv.snapshot.wearCR: Failed to wear snapshot \"@C" .. snapshotName .. 
+              "@W\": it does not exist")
+    return inv.tags.stop(invTagsSnapshot, endTag, DRL_RET_MISSING_ENTRY)  
+  end -- if
+
+  retval = inv.set.wear(inv.snapshot.table[snapshotName])
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.snapshot.wearCR: Failed to wear snapshot \"@C" .. snapshotName ..
+              "@W\": " .. dbot.retval.getString(retval))
+  end -- if
+
+  -- Clean up and return
+  inv.snapshot.wearPkg = nil
+  return inv.tags.stop(invTagsSnapshot, endTag, retval)
+end -- inv.snapshot.wearCR
+
+
+----------------------------------------------------------------------------------------------------
+--
+-- Module to calculate how many bonuses are available to each stat due to equipment
+--
+-- There are limits to how many stat bonuses are applied due to equipment.  The limits vary based
+-- on a character's level and the spell bonuses that are active for the character.  This module
+-- checks the current stats and determines how many stats can be provided by equipment.
+--
+-- This is not an exact science.  The equipment bonuses can be very different for the same 
+-- character at the same level if the character has a good spellup on one call and a poor spellup
+-- on another call.  Our policy is to assume that the character has done their best to spellup
+-- prior to wearing a set.  They can always re-wear a set to pick up the optimal available equipment
+-- if a good (e.g., SH) spellup wears off.
+--
+-- This module remembers the current, max, and average values for each stat at each level.  This
+-- helps make bonus estimates more accurate when we are creating a set for a different level than
+-- the character currently has.
+--
+-- inv.statBonus.init.atInstall()
+-- inv.statBonus.init.atActive()
+-- inv.statBonus.fini(doSaveState)
+--
+-- inv.statBonus.save()
+-- inv.statBonus.load()
+-- inv.statBonus.reset()
+--
+-- inv.statBonus.estimate(level)
+-- inv.statBonus.get(level, bonusType) -- types include current, ave, and max
+-- inv.statBonus.set
+-- inv.statBonus.setCR
+-- inv.statBonus.setSetupFn()
+--
+-- inv.statBonus.timer.update
+--
+-- inv.statBonus.trigger.get
+-- inv.statBonus.trigger.start
+--
+----------------------------------------------------------------------------------------------------
+
+inv.statBonus              = {}
+inv.statBonus.init         = {}
+inv.statBonus.currentBonus = { int = 0, luck = 0, wis = 0, str = 0, dex = 0, con = 0 }
+
+inv.statBonus.stateNameSpells = "inv-stats-spells.state"
+inv.statBonus.stateNameEquip  = "inv-stats-equip.state"
+
+
+function inv.statBonus.init.atInstall()
+  local retval = DRL_RET_SUCCESS
+
+  -- Trigger on a call to "stats" to determine how many stat bonuses currently are available to equipment
+  check (AddTriggerEx(inv.statBonus.trigger.getName,
+                     "^(.*)$",
+                      "inv.statBonus.trigger.get(\"%1\")",
+                      drlTriggerFlagsBaseline + trigger_flag.OmitFromOutput,
+                      custom_colour.Custom11,
+                      0, "", "", sendto.script, 0))
+  check (EnableTrigger(inv.statBonus.trigger.getName, false)) -- default to off
+
+  return retval
+end -- inv.statBonus.init.atInstall
+
+
+function inv.statBonus.init.atActive()
+  local retval = DRL_RET_SUCCESS
+
+  retval = inv.statBonus.load()
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.statBonus.init.atActive: failed to load statBonus data from storage: " ..
+              dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+end -- inv.statBonus.init.atActive
+
+
+function inv.statBonus.fini(doSaveState)
+  local retval = DRL_RET_SUCCESS
+
+  dbot.deleteTrigger(inv.statBonus.trigger.getName)
+
+  dbot.deleteTimer(inv.statBonus.timer.name)
+
+  if (doSaveState) then
+    -- Save our current data
+    retval = inv.statBonus.save()
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.statBonus.fini: Failed to save inv.statBonus module data: " ..
+                dbot.retval.getString(retval))
+    end -- if
+  end -- if
+
+  inv.statBonus.currentBonus = { int = 0, luck = 0, wis = 0, str = 0, dex = 0, con = 0 }
+
+  return retval
+end -- inv.statBonus.fini
+
+
+function inv.statBonus.save()
+  local spellRetval = dbot.storage.saveTable(dbot.backup.getCurrentDir() .. inv.statBonus.stateNameSpells,
+                                             "inv.statBonus.spellBonus", inv.statBonus.spellBonus)
+  if (spellRetval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.statBonus.save: Failed to save spellBonus table: " .. dbot.retval.getString(spellRetval))
+  end -- if
+
+  local equipRetval = dbot.storage.saveTable(dbot.backup.getCurrentDir() .. inv.statBonus.stateNameEquip,
+                                             "inv.statBonus.equipBonus", inv.statBonus.equipBonus)
+  if (equipRetval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.statBonus.save: Failed to save equipBonus table: " .. dbot.retval.getString(equipRetval))
+  end -- if
+
+  if (spellRetval ~= DRL_RET_SUCCESS) then
+    return spellRetval
+  else
+    return equipRetval
+  end -- if
+
+end -- inv.statBonus.save
+
+
+function inv.statBonus.load()
+
+  local spellRetval = dbot.storage.loadTable(dbot.backup.getCurrentDir() .. inv.statBonus.stateNameSpells,
+                                             inv.statBonus.reset)
+  if (spellRetval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.statBonus.load: Failed to load spellBonus table from file \"@R" .. 
+              dbot.backup.getCurrentDir() .. inv.statBonus.stateNameSpells .. "@W\": " ..
+              dbot.retval.getString(spellRetval))
+  end -- if
+
+  local equipRetval = dbot.storage.loadTable(dbot.backup.getCurrentDir() .. inv.statBonus.stateNameEquip,
+                                             inv.statBonus.reset)
+  if (equipRetval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.statBonus.load: Failed to load equipBonus table from file \"@R" .. 
+              dbot.backup.getCurrentDir() .. inv.statBonus.stateNameEquip .. "@W\": " ..
+              dbot.retval.getString(equipRetval))
+  end -- if
+
+  -- Kick off a timer to continually update the bonuses.  Ideally, we would just call the
+  -- inv.statBonus.timer.update() function here.  Unfortunately, that function relies on mushclient
+  -- components that may not be available when we load right at the start.  Instead, we simply
+  -- kick off the timer manually and then let it self-perpetuate once it is going.
+  check (AddTimer(inv.statBonus.timer.name, 0, inv.statBonus.timer.min, inv.statBonus.timer.sec, "",
+                  timer_flag.Enabled + timer_flag.Replace + timer_flag.OneShot,
+                  "inv.statBonus.set"))
+
+  if (spellRetval ~= DRL_RET_SUCCESS) then
+    return spellRetval
+  else
+    return equipRetval
+  end -- if
+
+end -- inv.statBonus.load()
+
+
+function inv.statBonus.reset()
+  inv.statBonus.spellBonus = {}
+  inv.statBonus.equipBonus = {}
+
+  local retval = inv.statBonus.save()
+
+  return retval
+end -- inv.statBonus.reset
+
+
+-- This is a moderately crude hack.  We would like a way to know what a character's spellup bonus
+-- will be at any specific level.  The problem is that this varies dramatically from level to level.
+-- Even worse, the spellup bonuses vary even more dramatically based on what moons are present and
+-- if someone (e.g., a superhero!) gives a spellup.  So...what can we do?  This is a rough estimate
+-- for what an "average" spellup should be for an "average" mort character based on averages I saw
+-- during various morts.  Of course, this could be very different for someone else depending on what
+-- classes are available, what spellup potions are used, and if someone else (a groupmate or clannee)
+-- gives a spellup to the character.
+--
+-- The good news is that this table is just the starting point for a character.  The stat bonus
+-- timer will periodically check what spell bonuses are present on the character and track a weighted
+-- average and also the max value for each stat over time.  Those values will help improve accuracy
+-- the longer someone uses this plugin.  If someone frequently has SH spellups their estimates will
+-- eventually reflect that.  Similarly, if someone never bothers to spellup, that character's 
+-- estimated stats will reflect that too after enough time passes.
+--
+-- Also, you should note that the spellup estimates are only used when real spellup values aren't
+-- available.  If you are creating/wearing a set at your current level, we only use the actual/real
+-- values.  However, if you want to estimate what equipment you would wear at a different level then
+-- these estimates can be convenient until we have enough data to know what a particular character's
+-- "typical" spellups are.
+
+inv.statBonus.estimateTable = {}
+inv.statBonus.estimateTable[  1] = { str =  1, int =  0, wis =  0, dex =  1, con =  0, luck =  0 }
+inv.statBonus.estimateTable[  2] = { str =  1, int =  0, wis =  0, dex =  1, con =  0, luck =  0 }
+inv.statBonus.estimateTable[  3] = { str =  1, int =  0, wis =  0, dex =  1, con =  0, luck =  0 }
+inv.statBonus.estimateTable[  4] = { str =  1, int =  0, wis =  0, dex =  2, con =  0, luck =  0 }
+inv.statBonus.estimateTable[  5] = { str =  1, int =  0, wis =  0, dex =  2, con =  2, luck =  0 }
+inv.statBonus.estimateTable[  6] = { str =  2, int =  0, wis =  0, dex =  2, con =  2, luck =  0 }
+inv.statBonus.estimateTable[  7] = { str =  2, int =  0, wis =  0, dex =  3, con =  3, luck =  0 }
+inv.statBonus.estimateTable[  8] = { str =  2, int =  0, wis =  0, dex =  3, con =  3, luck =  0 }
+inv.statBonus.estimateTable[  9] = { str =  2, int =  0, wis =  0, dex =  4, con =  4, luck =  0 }
+inv.statBonus.estimateTable[ 10] = { str =  3, int =  0, wis =  0, dex =  4, con =  4, luck =  0 }
+inv.statBonus.estimateTable[ 11] = { str =  3, int =  0, wis =  0, dex =  4, con =  4, luck =  0 }
+inv.statBonus.estimateTable[ 12] = { str =  3, int =  0, wis =  0, dex =  5, con =  5, luck =  0 }
+inv.statBonus.estimateTable[ 13] = { str =  3, int =  0, wis =  0, dex =  5, con =  5, luck =  0 }
+inv.statBonus.estimateTable[ 14] = { str =  3, int =  0, wis =  0, dex =  5, con =  5, luck =  0 }
+inv.statBonus.estimateTable[ 15] = { str =  7, int =  4, wis =  4, dex =  7, con =  7, luck =  4 }
+inv.statBonus.estimateTable[ 16] = { str =  7, int =  4, wis =  4, dex =  7, con =  7, luck =  4 }
+inv.statBonus.estimateTable[ 17] = { str =  8, int =  4, wis =  4, dex =  8, con =  8, luck =  4 }
+inv.statBonus.estimateTable[ 18] = { str =  8, int =  4, wis =  4, dex =  8, con =  8, luck =  4 }
+inv.statBonus.estimateTable[ 19] = { str =  9, int =  4, wis =  4, dex =  9, con =  9, luck =  4 }
+inv.statBonus.estimateTable[ 20] = { str =  9, int =  4, wis =  5, dex =  9, con =  9, luck =  4 }
+inv.statBonus.estimateTable[ 21] = { str = 10, int =  5, wis =  5, dex = 10, con = 10, luck =  4 }
+inv.statBonus.estimateTable[ 22] = { str = 10, int =  5, wis =  5, dex = 10, con = 10, luck =  4 }
+inv.statBonus.estimateTable[ 23] = { str = 11, int =  5, wis =  5, dex = 11, con = 11, luck =  4 }
+inv.statBonus.estimateTable[ 24] = { str = 11, int =  5, wis =  5, dex = 11, con = 11, luck =  5 }
+inv.statBonus.estimateTable[ 25] = { str = 12, int =  5, wis =  6, dex = 12, con = 12, luck =  5 }
+inv.statBonus.estimateTable[ 26] = { str = 12, int =  6, wis =  6, dex = 12, con = 12, luck =  5 }
+inv.statBonus.estimateTable[ 27] = { str = 13, int =  6, wis =  6, dex = 13, con = 13, luck =  5 }
+inv.statBonus.estimateTable[ 28] = { str = 14, int =  6, wis =  6, dex = 13, con = 13, luck =  5 }
+inv.statBonus.estimateTable[ 29] = { str = 14, int =  6, wis =  7, dex = 14, con = 14, luck =  5 }
+inv.statBonus.estimateTable[ 30] = { str = 14, int =  7, wis =  7, dex = 14, con = 14, luck =  5 }
+inv.statBonus.estimateTable[ 31] = { str = 15, int =  7, wis =  7, dex = 15, con = 15, luck =  5 }
+inv.statBonus.estimateTable[ 32] = { str = 15, int =  7, wis =  7, dex = 15, con = 15, luck =  6 }
+inv.statBonus.estimateTable[ 33] = { str = 15, int =  7, wis =  8, dex = 16, con = 16, luck =  6 }
+inv.statBonus.estimateTable[ 34] = { str = 16, int =  8, wis =  8, dex = 16, con = 16, luck =  6 }
+inv.statBonus.estimateTable[ 35] = { str = 16, int =  8, wis =  8, dex = 17, con = 17, luck =  6 }
+inv.statBonus.estimateTable[ 36] = { str = 16, int =  8, wis =  9, dex = 17, con = 17, luck =  6 }
+inv.statBonus.estimateTable[ 37] = { str = 17, int =  8, wis =  9, dex = 18, con = 18, luck =  6 }
+inv.statBonus.estimateTable[ 38] = { str = 17, int =  9, wis =  9, dex = 18, con = 18, luck =  6 }
+inv.statBonus.estimateTable[ 39] = { str = 17, int =  9, wis = 10, dex = 19, con = 19, luck =  6 }
+inv.statBonus.estimateTable[ 40] = { str = 18, int =  9, wis = 10, dex = 19, con = 19, luck =  7 }
+inv.statBonus.estimateTable[ 41] = { str = 18, int =  9, wis = 11, dex = 19, con = 19, luck =  7 }
+inv.statBonus.estimateTable[ 42] = { str = 18, int = 10, wis = 11, dex = 20, con = 20, luck =  7 }
+inv.statBonus.estimateTable[ 43] = { str = 19, int = 10, wis = 11, dex = 20, con = 20, luck =  7 }
+inv.statBonus.estimateTable[ 44] = { str = 19, int = 10, wis = 12, dex = 21, con = 21, luck =  7 }
+inv.statBonus.estimateTable[ 45] = { str = 19, int = 10, wis = 12, dex = 21, con = 21, luck =  8 }
+inv.statBonus.estimateTable[ 46] = { str = 20, int = 11, wis = 12, dex = 22, con = 21, luck =  8 }
+inv.statBonus.estimateTable[ 47] = { str = 20, int = 11, wis = 13, dex = 24, con = 23, luck = 10 }
+inv.statBonus.estimateTable[ 48] = { str = 20, int = 11, wis = 13, dex = 25, con = 24, luck = 11 }
+inv.statBonus.estimateTable[ 49] = { str = 20, int = 11, wis = 13, dex = 25, con = 24, luck = 11 }
+inv.statBonus.estimateTable[ 50] = { str = 21, int = 12, wis = 13, dex = 25, con = 25, luck = 12 }
+inv.statBonus.estimateTable[ 51] = { str = 21, int = 12, wis = 13, dex = 26, con = 25, luck = 12 }
+inv.statBonus.estimateTable[ 52] = { str = 21, int = 13, wis = 14, dex = 26, con = 25, luck = 12 }
+inv.statBonus.estimateTable[ 53] = { str = 22, int = 14, wis = 15, dex = 26, con = 25, luck = 12 }
+inv.statBonus.estimateTable[ 54] = { str = 22, int = 14, wis = 15, dex = 26, con = 25, luck = 12 }
+inv.statBonus.estimateTable[ 55] = { str = 22, int = 15, wis = 16, dex = 26, con = 26, luck = 12 }
+inv.statBonus.estimateTable[ 56] = { str = 23, int = 15, wis = 17, dex = 26, con = 26, luck = 12 }
+inv.statBonus.estimateTable[ 57] = { str = 23, int = 16, wis = 18, dex = 26, con = 26, luck = 12 }
+inv.statBonus.estimateTable[ 58] = { str = 24, int = 18, wis = 18, dex = 26, con = 27, luck = 13 }
+inv.statBonus.estimateTable[ 59] = { str = 24, int = 20, wis = 19, dex = 27, con = 27, luck = 13 }
+inv.statBonus.estimateTable[ 60] = { str = 24, int = 20, wis = 19, dex = 27, con = 27, luck = 14 }
+inv.statBonus.estimateTable[ 61] = { str = 24, int = 20, wis = 19, dex = 27, con = 27, luck = 15 }
+inv.statBonus.estimateTable[ 62] = { str = 24, int = 20, wis = 19, dex = 28, con = 27, luck = 15 }
+inv.statBonus.estimateTable[ 63] = { str = 24, int = 20, wis = 19, dex = 28, con = 27, luck = 16 }
+inv.statBonus.estimateTable[ 64] = { str = 24, int = 20, wis = 19, dex = 28, con = 28, luck = 17 }
+inv.statBonus.estimateTable[ 65] = { str = 24, int = 20, wis = 19, dex = 29, con = 28, luck = 18 }
+inv.statBonus.estimateTable[ 66] = { str = 24, int = 20, wis = 19, dex = 29, con = 28, luck = 19 }
+inv.statBonus.estimateTable[ 67] = { str = 24, int = 20, wis = 19, dex = 29, con = 28, luck = 20 }
+inv.statBonus.estimateTable[ 68] = { str = 24, int = 20, wis = 19, dex = 30, con = 29, luck = 21 }
+inv.statBonus.estimateTable[ 69] = { str = 24, int = 20, wis = 19, dex = 30, con = 29, luck = 21 }
+inv.statBonus.estimateTable[ 70] = { str = 24, int = 21, wis = 19, dex = 30, con = 29, luck = 21 }
+inv.statBonus.estimateTable[ 71] = { str = 24, int = 21, wis = 19, dex = 31, con = 29, luck = 22 }
+inv.statBonus.estimateTable[ 72] = { str = 24, int = 21, wis = 19, dex = 31, con = 29, luck = 22 }
+inv.statBonus.estimateTable[ 73] = { str = 24, int = 21, wis = 19, dex = 31, con = 30, luck = 23 }
+inv.statBonus.estimateTable[ 74] = { str = 24, int = 22, wis = 19, dex = 32, con = 30, luck = 23 }
+inv.statBonus.estimateTable[ 75] = { str = 24, int = 22, wis = 20, dex = 32, con = 30, luck = 23 }
+inv.statBonus.estimateTable[ 76] = { str = 24, int = 22, wis = 20, dex = 32, con = 30, luck = 24 }
+inv.statBonus.estimateTable[ 77] = { str = 24, int = 22, wis = 20, dex = 32, con = 31, luck = 24 }
+inv.statBonus.estimateTable[ 78] = { str = 24, int = 23, wis = 20, dex = 33, con = 31, luck = 25 }
+inv.statBonus.estimateTable[ 79] = { str = 24, int = 23, wis = 20, dex = 33, con = 31, luck = 25 }
+inv.statBonus.estimateTable[ 80] = { str = 25, int = 23, wis = 20, dex = 33, con = 31, luck = 25 }
+inv.statBonus.estimateTable[ 81] = { str = 25, int = 24, wis = 20, dex = 34, con = 32, luck = 26 }
+inv.statBonus.estimateTable[ 82] = { str = 25, int = 24, wis = 20, dex = 34, con = 32, luck = 26 }
+inv.statBonus.estimateTable[ 83] = { str = 25, int = 24, wis = 20, dex = 34, con = 33, luck = 26 }
+inv.statBonus.estimateTable[ 84] = { str = 26, int = 24, wis = 20, dex = 35, con = 33, luck = 26 }
+inv.statBonus.estimateTable[ 85] = { str = 26, int = 25, wis = 21, dex = 35, con = 33, luck = 26 }
+inv.statBonus.estimateTable[ 86] = { str = 26, int = 25, wis = 21, dex = 36, con = 34, luck = 27 }
+inv.statBonus.estimateTable[ 87] = { str = 26, int = 25, wis = 21, dex = 36, con = 34, luck = 27 }
+inv.statBonus.estimateTable[ 88] = { str = 27, int = 26, wis = 22, dex = 36, con = 34, luck = 27 }
+inv.statBonus.estimateTable[ 89] = { str = 27, int = 26, wis = 22, dex = 36, con = 34, luck = 28 }
+inv.statBonus.estimateTable[ 90] = { str = 28, int = 27, wis = 22, dex = 36, con = 34, luck = 28 }
+inv.statBonus.estimateTable[ 91] = { str = 28, int = 27, wis = 22, dex = 36, con = 34, luck = 28 }
+inv.statBonus.estimateTable[ 92] = { str = 29, int = 28, wis = 22, dex = 36, con = 34, luck = 28 }
+inv.statBonus.estimateTable[ 93] = { str = 29, int = 28, wis = 22, dex = 36, con = 34, luck = 29 }
+inv.statBonus.estimateTable[ 94] = { str = 30, int = 28, wis = 22, dex = 36, con = 34, luck = 29 }
+inv.statBonus.estimateTable[ 95] = { str = 30, int = 29, wis = 22, dex = 36, con = 34, luck = 29 }
+inv.statBonus.estimateTable[ 96] = { str = 31, int = 29, wis = 22, dex = 36, con = 34, luck = 30 }
+inv.statBonus.estimateTable[ 97] = { str = 31, int = 30, wis = 22, dex = 36, con = 34, luck = 30 }
+inv.statBonus.estimateTable[ 98] = { str = 32, int = 30, wis = 22, dex = 37, con = 35, luck = 30 }
+inv.statBonus.estimateTable[ 99] = { str = 32, int = 31, wis = 22, dex = 37, con = 35, luck = 30 }
+inv.statBonus.estimateTable[100] = { str = 32, int = 31, wis = 23, dex = 37, con = 35, luck = 30 }
+inv.statBonus.estimateTable[101] = { str = 32, int = 31, wis = 24, dex = 38, con = 36, luck = 30 }
+inv.statBonus.estimateTable[102] = { str = 32, int = 32, wis = 25, dex = 38, con = 36, luck = 30 }
+inv.statBonus.estimateTable[103] = { str = 32, int = 32, wis = 26, dex = 38, con = 37, luck = 30 }
+inv.statBonus.estimateTable[104] = { str = 32, int = 32, wis = 27, dex = 38, con = 37, luck = 30 }
+inv.statBonus.estimateTable[105] = { str = 33, int = 33, wis = 28, dex = 39, con = 38, luck = 30 }
+inv.statBonus.estimateTable[106] = { str = 33, int = 33, wis = 29, dex = 39, con = 38, luck = 30 }
+inv.statBonus.estimateTable[107] = { str = 33, int = 33, wis = 30, dex = 39, con = 39, luck = 30 }
+inv.statBonus.estimateTable[108] = { str = 33, int = 33, wis = 31, dex = 40, con = 39, luck = 30 }
+inv.statBonus.estimateTable[109] = { str = 33, int = 34, wis = 32, dex = 40, con = 39, luck = 30 }
+inv.statBonus.estimateTable[110] = { str = 33, int = 35, wis = 33, dex = 40, con = 39, luck = 30 }
+inv.statBonus.estimateTable[111] = { str = 33, int = 35, wis = 33, dex = 40, con = 39, luck = 30 }
+inv.statBonus.estimateTable[112] = { str = 33, int = 36, wis = 33, dex = 40, con = 39, luck = 30 }
+inv.statBonus.estimateTable[113] = { str = 33, int = 36, wis = 34, dex = 40, con = 39, luck = 30 }
+inv.statBonus.estimateTable[114] = { str = 33, int = 37, wis = 34, dex = 40, con = 39, luck = 30 }
+inv.statBonus.estimateTable[115] = { str = 33, int = 37, wis = 34, dex = 40, con = 39, luck = 30 }
+inv.statBonus.estimateTable[116] = { str = 33, int = 37, wis = 35, dex = 40, con = 39, luck = 30 }
+inv.statBonus.estimateTable[117] = { str = 33, int = 38, wis = 35, dex = 40, con = 39, luck = 30 }
+inv.statBonus.estimateTable[118] = { str = 33, int = 38, wis = 36, dex = 40, con = 39, luck = 30 }
+inv.statBonus.estimateTable[119] = { str = 33, int = 39, wis = 36, dex = 40, con = 40, luck = 31 }
+inv.statBonus.estimateTable[120] = { str = 34, int = 40, wis = 37, dex = 41, con = 40, luck = 31 }
+inv.statBonus.estimateTable[121] = { str = 34, int = 42, wis = 38, dex = 42, con = 40, luck = 31 }
+inv.statBonus.estimateTable[122] = { str = 34, int = 44, wis = 39, dex = 43, con = 40, luck = 31 }
+inv.statBonus.estimateTable[123] = { str = 34, int = 46, wis = 40, dex = 44, con = 40, luck = 32 }
+inv.statBonus.estimateTable[124] = { str = 34, int = 47, wis = 42, dex = 45, con = 40, luck = 32 }
+inv.statBonus.estimateTable[125] = { str = 35, int = 48, wis = 43, dex = 46, con = 41, luck = 32 }
+inv.statBonus.estimateTable[126] = { str = 35, int = 50, wis = 44, dex = 47, con = 41, luck = 32 }
+inv.statBonus.estimateTable[127] = { str = 35, int = 51, wis = 46, dex = 48, con = 41, luck = 32 }
+inv.statBonus.estimateTable[128] = { str = 35, int = 52, wis = 48, dex = 49, con = 41, luck = 32 }
+inv.statBonus.estimateTable[129] = { str = 35, int = 52, wis = 50, dex = 50, con = 42, luck = 32 }
+inv.statBonus.estimateTable[130] = { str = 36, int = 53, wis = 51, dex = 51, con = 42, luck = 32 }
+inv.statBonus.estimateTable[131] = { str = 36, int = 53, wis = 51, dex = 52, con = 42, luck = 32 }
+inv.statBonus.estimateTable[132] = { str = 36, int = 53, wis = 52, dex = 52, con = 43, luck = 33 }
+inv.statBonus.estimateTable[133] = { str = 37, int = 53, wis = 53, dex = 53, con = 43, luck = 33 }
+inv.statBonus.estimateTable[134] = { str = 37, int = 54, wis = 54, dex = 53, con = 44, luck = 33 }
+inv.statBonus.estimateTable[135] = { str = 38, int = 54, wis = 54, dex = 54, con = 44, luck = 33 }
+inv.statBonus.estimateTable[136] = { str = 38, int = 54, wis = 55, dex = 54, con = 45, luck = 33 }
+inv.statBonus.estimateTable[137] = { str = 39, int = 54, wis = 55, dex = 55, con = 45, luck = 33 }
+inv.statBonus.estimateTable[138] = { str = 39, int = 54, wis = 55, dex = 55, con = 46, luck = 33 }
+inv.statBonus.estimateTable[139] = { str = 40, int = 54, wis = 56, dex = 56, con = 46, luck = 33 }
+inv.statBonus.estimateTable[140] = { str = 41, int = 55, wis = 56, dex = 58, con = 47, luck = 34 }
+inv.statBonus.estimateTable[141] = { str = 42, int = 55, wis = 56, dex = 59, con = 47, luck = 34 }
+inv.statBonus.estimateTable[142] = { str = 44, int = 55, wis = 56, dex = 60, con = 47, luck = 35 }
+inv.statBonus.estimateTable[143] = { str = 45, int = 55, wis = 56, dex = 61, con = 48, luck = 35 }
+inv.statBonus.estimateTable[144] = { str = 47, int = 55, wis = 56, dex = 62, con = 48, luck = 36 }
+inv.statBonus.estimateTable[145] = { str = 48, int = 55, wis = 56, dex = 63, con = 49, luck = 36 }
+inv.statBonus.estimateTable[146] = { str = 49, int = 55, wis = 56, dex = 64, con = 49, luck = 37 }
+inv.statBonus.estimateTable[147] = { str = 50, int = 55, wis = 56, dex = 65, con = 50, luck = 37 }
+inv.statBonus.estimateTable[148] = { str = 51, int = 55, wis = 56, dex = 66, con = 50, luck = 38 }
+inv.statBonus.estimateTable[149] = { str = 51, int = 55, wis = 56, dex = 67, con = 51, luck = 38 }
+inv.statBonus.estimateTable[150] = { str = 51, int = 55, wis = 56, dex = 67, con = 52, luck = 38 }
+inv.statBonus.estimateTable[151] = { str = 52, int = 55, wis = 56, dex = 67, con = 54, luck = 38 }
+inv.statBonus.estimateTable[152] = { str = 52, int = 55, wis = 56, dex = 67, con = 56, luck = 38 }
+inv.statBonus.estimateTable[153] = { str = 52, int = 55, wis = 56, dex = 67, con = 58, luck = 38 }
+inv.statBonus.estimateTable[154] = { str = 53, int = 55, wis = 56, dex = 67, con = 60, luck = 38 }
+inv.statBonus.estimateTable[155] = { str = 53, int = 55, wis = 56, dex = 67, con = 61, luck = 38 }
+inv.statBonus.estimateTable[156] = { str = 53, int = 55, wis = 56, dex = 67, con = 62, luck = 38 }
+inv.statBonus.estimateTable[157] = { str = 53, int = 55, wis = 56, dex = 67, con = 64, luck = 39 }
+inv.statBonus.estimateTable[158] = { str = 54, int = 55, wis = 56, dex = 67, con = 66, luck = 39 }
+inv.statBonus.estimateTable[159] = { str = 54, int = 55, wis = 56, dex = 67, con = 68, luck = 39 }
+inv.statBonus.estimateTable[160] = { str = 54, int = 55, wis = 56, dex = 67, con = 68, luck = 39 }
+inv.statBonus.estimateTable[161] = { str = 54, int = 55, wis = 56, dex = 67, con = 68, luck = 39 }
+inv.statBonus.estimateTable[162] = { str = 54, int = 55, wis = 56, dex = 67, con = 68, luck = 39 }
+inv.statBonus.estimateTable[163] = { str = 54, int = 55, wis = 56, dex = 67, con = 68, luck = 39 }
+inv.statBonus.estimateTable[164] = { str = 54, int = 55, wis = 56, dex = 67, con = 68, luck = 39 }
+inv.statBonus.estimateTable[165] = { str = 54, int = 55, wis = 56, dex = 68, con = 68, luck = 39 }
+inv.statBonus.estimateTable[166] = { str = 54, int = 55, wis = 56, dex = 68, con = 68, luck = 39 }
+inv.statBonus.estimateTable[167] = { str = 54, int = 55, wis = 56, dex = 68, con = 68, luck = 39 }
+inv.statBonus.estimateTable[168] = { str = 54, int = 55, wis = 56, dex = 68, con = 68, luck = 39 }
+inv.statBonus.estimateTable[169] = { str = 54, int = 55, wis = 56, dex = 68, con = 68, luck = 39 }
+inv.statBonus.estimateTable[170] = { str = 54, int = 55, wis = 56, dex = 67, con = 68, luck = 39 }
+inv.statBonus.estimateTable[171] = { str = 54, int = 55, wis = 56, dex = 67, con = 68, luck = 39 }
+inv.statBonus.estimateTable[172] = { str = 54, int = 55, wis = 56, dex = 67, con = 68, luck = 39 }
+inv.statBonus.estimateTable[173] = { str = 54, int = 55, wis = 56, dex = 67, con = 68, luck = 39 }
+inv.statBonus.estimateTable[174] = { str = 54, int = 55, wis = 56, dex = 67, con = 68, luck = 39 }
+inv.statBonus.estimateTable[175] = { str = 54, int = 55, wis = 56, dex = 68, con = 68, luck = 39 }
+inv.statBonus.estimateTable[176] = { str = 54, int = 55, wis = 56, dex = 68, con = 68, luck = 39 }
+inv.statBonus.estimateTable[177] = { str = 54, int = 55, wis = 56, dex = 68, con = 68, luck = 39 }
+inv.statBonus.estimateTable[178] = { str = 54, int = 55, wis = 56, dex = 68, con = 68, luck = 39 }
+inv.statBonus.estimateTable[179] = { str = 54, int = 55, wis = 56, dex = 68, con = 68, luck = 39 }
+inv.statBonus.estimateTable[180] = { str = 54, int = 56, wis = 56, dex = 69, con = 68, luck = 40 }
+inv.statBonus.estimateTable[181] = { str = 54, int = 56, wis = 56, dex = 69, con = 68, luck = 40 }
+inv.statBonus.estimateTable[182] = { str = 54, int = 57, wis = 56, dex = 69, con = 69, luck = 40 }
+inv.statBonus.estimateTable[183] = { str = 54, int = 57, wis = 56, dex = 69, con = 69, luck = 40 }
+inv.statBonus.estimateTable[184] = { str = 55, int = 57, wis = 56, dex = 70, con = 69, luck = 41 }
+inv.statBonus.estimateTable[185] = { str = 55, int = 58, wis = 56, dex = 70, con = 69, luck = 41 }
+inv.statBonus.estimateTable[186] = { str = 55, int = 58, wis = 56, dex = 70, con = 69, luck = 41 }
+inv.statBonus.estimateTable[187] = { str = 55, int = 59, wis = 56, dex = 70, con = 70, luck = 41 }
+inv.statBonus.estimateTable[188] = { str = 56, int = 59, wis = 56, dex = 70, con = 70, luck = 42 }
+inv.statBonus.estimateTable[189] = { str = 56, int = 60, wis = 56, dex = 70, con = 70, luck = 42 }
+inv.statBonus.estimateTable[190] = { str = 57, int = 62, wis = 57, dex = 71, con = 70, luck = 43 }
+inv.statBonus.estimateTable[191] = { str = 57, int = 64, wis = 57, dex = 71, con = 70, luck = 43 }
+inv.statBonus.estimateTable[192] = { str = 57, int = 66, wis = 58, dex = 71, con = 70, luck = 44 }
+inv.statBonus.estimateTable[193] = { str = 57, int = 68, wis = 59, dex = 72, con = 70, luck = 44 }
+inv.statBonus.estimateTable[194] = { str = 57, int = 70, wis = 59, dex = 72, con = 70, luck = 44 }
+inv.statBonus.estimateTable[195] = { str = 57, int = 72, wis = 60, dex = 72, con = 70, luck = 45 }
+inv.statBonus.estimateTable[196] = { str = 57, int = 74, wis = 60, dex = 72, con = 70, luck = 45 }
+inv.statBonus.estimateTable[197] = { str = 57, int = 76, wis = 61, dex = 73, con = 70, luck = 46 }
+inv.statBonus.estimateTable[198] = { str = 57, int = 77, wis = 61, dex = 73, con = 70, luck = 46 }
+inv.statBonus.estimateTable[199] = { str = 57, int = 78, wis = 62, dex = 73, con = 70, luck = 47 }
+inv.statBonus.estimateTable[200] = { str = 57, int = 78, wis = 62, dex = 73, con = 70, luck = 47 }
+inv.statBonus.estimateTable[201] = { str = 57, int = 78, wis = 62, dex = 73, con = 70, luck = 47 }
+inv.statBonus.estimateTable[202] = { str = 57, int = 78, wis = 63, dex = 73, con = 70, luck = 47 }
+inv.statBonus.estimateTable[203] = { str = 57, int = 78, wis = 63, dex = 73, con = 70, luck = 47 }
+inv.statBonus.estimateTable[204] = { str = 57, int = 79, wis = 63, dex = 73, con = 70, luck = 48 }
+inv.statBonus.estimateTable[205] = { str = 57, int = 79, wis = 64, dex = 73, con = 70, luck = 48 }
+inv.statBonus.estimateTable[206] = { str = 57, int = 79, wis = 64, dex = 73, con = 71, luck = 48 }
+inv.statBonus.estimateTable[207] = { str = 57, int = 79, wis = 64, dex = 73, con = 71, luck = 48 }
+inv.statBonus.estimateTable[208] = { str = 57, int = 79, wis = 65, dex = 73, con = 71, luck = 49 }
+inv.statBonus.estimateTable[209] = { str = 57, int = 80, wis = 65, dex = 73, con = 71, luck = 49 }
+inv.statBonus.estimateTable[210] = { str = 57, int = 78, wis = 62, dex = 73, con = 70, luck = 47 }
+inv.statBonus.estimateTable[211] = { str = 70, int = 86, wis = 70, dex = 105, con = 90, luck = 65 }
+
+
+function inv.statBonus.estimate(level)
+  level = tonumber(level or "")
+  if (level == nil) then
+    dbot.warn("inv.statBonus.estimate: Missing level parameter")
+    return nil, DRL_RET_INVALID_PARAM
+  end -- if
+
+  -- Minor hack: spell bonuses don't change much once we SH
+  if (level > 211) then
+    level = 211
+  end -- if
+
+  if (inv.statBonus.estimateTable[level] ~= nil) then
+    return inv.statBonus.estimateTable[level], DRL_RET_SUCCESS
+  else
+    dbot.warn("Failed to get stat bonus estimate for level " .. level .. ": estimate does not exist")
+    return nil, DRL_RET_MISSING_ENTRY
+  end -- if
+end -- inv.statBonus.estimate
+
+
+-- Returns a table of the form { int = 1, luck = 3, ... } where the values of each stat in the
+-- table indicate how many points of that stat are available to equipment before we hit the max
+-- stats for the specified level.
+-- Note: This function is synchronous
+invStatBonusTypeCurrent = "current"
+invStatBonusTypeAve     = "average"
+invStatBonusTypeMax     = "max"
+function inv.statBonus.get(level, bonusType)
+  local spellBonus
+  local equipBonus
+
+  -- Be paranoid about input params
+  level = tonumber(level or "")
+  if (level == nil) then
+    dbot.warn("inv.statBonus.get: Invalid level parameter")
+    return nil, DRL_RET_INVALID_PARAM
+  end -- if
+
+  -- Generate very crude default values if we don't have info for this level in the table yet.
+  -- This will get more accurate as someone uses this package and actual bonuses are available.
+  if (inv.statBonus.spellBonus[level] == nil) then
+    inv.statBonus.spellBonus[level] = {}
+    inv.statBonus.spellBonus[level].ave, retval = inv.statBonus.estimate(level)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.statBonus.get: Failed to get estimate for level " .. level .. ": " ..
+                dbot.retval.getString(retval))
+      return nil, retval
+    end -- if
+
+    -- Only update the max for values we have seen in real situations; don't use default values
+    inv.statBonus.spellBonus[level].max = { int = 0, luck = 0, wis = 0, str = 0, dex = 0, con = 0 }
+  end -- if
+
+  if (bonusType == invStatBonusTypeCurrent) then
+    spellBonus = inv.statBonus.currentBonus
+  elseif (bonusType == invStatBonusTypeAve) then
+    spellBonus = inv.statBonus.spellBonus[level].ave
+  elseif (bonusType == invStatBonusTypeMax) then
+    spellBonus = inv.statBonus.spellBonus[level].max
+  end -- if
+
+  -- Now that we know the spell bonus, calculate how many bonus stats are available to equipment
+  local levelBonus = level - (10 * dbot.gmcp.getTier())
+  if (levelBonus < 25) then
+    levelBonus = 25
+  elseif (levelBonus > 200) then
+    levelBonus = 200
+  end -- if
+
+  inv.statBonus.equipBonus[level] = { int  = levelBonus - spellBonus.int,
+                                      wis  = levelBonus - spellBonus.wis,
+                                      luck = levelBonus - spellBonus.luck,
+                                      str  = levelBonus - spellBonus.str,
+                                      dex  = levelBonus - spellBonus.dex,
+                                      con  = levelBonus - spellBonus.con }
+
+
+  return inv.statBonus.equipBonus[level], DRL_RET_SUCCESS
+
+end -- inv.statBonus.get
+
+
+function inv.statBonus.set()
+  wait.make(inv.statBonus.setCR)
+end -- inv.statBonus.set
+
+
+-- This function must run in a co-routine because it potentially blocks
+function inv.statBonus.setCR()
+  local retval = DRL_RET_SUCCESS
+  local level = tonumber(dbot.gmcp.getLevel() or "")
+  local charState = dbot.gmcp.getState()
+
+  inv.statBonus.bonusInProgress = true
+
+  -- If we are in the active state (i.e., not AFK, sleeping, running, writing a note, etc.) then
+  -- we get the current bonuses
+  if (charState == dbot.stateActive) then
+
+    dbot.prompt.hide()
+
+    -- Run the stats command so that we can trigger on the stats and save them
+    local resultData = dbot.callback.new()
+    retval = dbot.execute.safe.command("stats", inv.statBonus.setSetupFn, nil,
+                                       dbot.callback.default, resultData)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.statBonus.setCR: Failed to safely execute \"@Gstats@W\": " ..
+                dbot.retval.getString(retval))
+      dbot.deleteTrigger(inv.statBonus.trigger.startName)
+    else
+      -- Wait for the callback to confirm that the safe execution completed
+      retval = dbot.callback.wait(resultData, 10)
+      if (retval ~= DRL_RET_SUCCESS) then
+        dbot.note("Skipping statBonus \"stats\" request: " .. dbot.retval.getString(retval))
+      end -- if
+
+      -- Wait for the trigger to fill in the stat bonuses due to spells that are active right now.
+      -- We've already allocated quite a bit of time to handle the callback above.  As a result,
+      -- the trigger should have already kicked off at this point.  We allow it just a little more
+      -- time though just to be paranoid...
+      local totTime = 0
+      local timeout = 2
+      while (inv.statBonus.bonusInProgress == true) do
+        wait.time(drlSpinnerPeriodDefault)
+        totTime = totTime + drlSpinnerPeriodDefault
+        if (totTime > timeout) then
+          dbot.warn("inv.statBonus.setCR: Failed to get spell stat bonus information: timed out")
+          dbot.deleteTrigger(inv.statBonus.trigger.startName)
+          retval = DRL_RET_TIMEOUT
+          break
+        end -- if
+      end -- while
+    end -- if
+
+    dbot.prompt.show()
+
+  else
+    dbot.debug("Skipping @Glevel " .. level .. " @Wspell bonus update: you are in state \"@C" .. 
+               dbot.gmcp.getStateString(charState) .. "@W\"")
+    retval = DRL_RET_NOT_ACTIVE
+  end -- if
+
+  -- Update the spell bonus stats if we were able to get new stats
+  if (retval == DRL_RET_SUCCESS) then
+    -- If we don't have any bonus history yet, start with the bonuses we just discovered
+    if (inv.statBonus.spellBonus[level] == nil) then
+      inv.statBonus.spellBonus[level] = {}
+      inv.statBonus.spellBonus[level].ave = dbot.table.getCopy(inv.statBonus.currentBonus)
+      inv.statBonus.spellBonus[level].max = dbot.table.getCopy(inv.statBonus.currentBonus)
+
+    -- If we have bonus history, average the current stats with what we had before.  This gives
+    -- recent bonus stat scans a higher weight than older scans.  The weighted average helps keep
+    -- things up-to-date as spellups improve with additional classes.
+    else
+      local statList = "int luck wis str dex con"
+      for spellStat in statList:gmatch("%S+") do
+        -- Update the weighted average (current stats are weighted 50% by default)
+        inv.statBonus.spellBonus[level].ave[spellStat] = 
+          (inv.statBonus.currentBonus[spellStat] + inv.statBonus.spellBonus[level].ave[spellStat]) / 2  
+
+        -- Update the max stats
+        if (inv.statBonus.currentBonus[spellStat] > inv.statBonus.spellBonus[level].max[spellStat]) then
+          inv.statBonus.spellBonus[level].max[spellStat] = inv.statBonus.currentBonus[spellStat]
+        end -- if
+      end -- for
+    end -- if
+
+    dbot.debug("Updated @GL" .. level .. "@W spell bonuses: " .. 
+               string.format("@Cint@W=@G%.2f@W, @Cluck@W=@G%.2f@W, @Cwis@W=@G%.2f@W, " ..
+                             "@Cstr@W=@G%.2f@W, @Cdex@W=@G%.2f@W, @Ccon@W=@G%.2f@w",
+                             inv.statBonus.spellBonus[level].ave.int,
+                             inv.statBonus.spellBonus[level].ave.luck,
+                             inv.statBonus.spellBonus[level].ave.wis,
+                             inv.statBonus.spellBonus[level].ave.str,
+                             inv.statBonus.spellBonus[level].ave.dex,
+                             inv.statBonus.spellBonus[level].ave.con))
+
+    inv.statBonus.save()
+  end -- if
+
+  inv.statBonus.timer.update(inv.statBonus.timer.min, inv.statBonus.timer.sec)
+
+  return retval
+end -- inv.statBonus.setCR
+
+
+function inv.statBonus.setSetupFn()
+  -- Run the "stats" command and pick off the current spell bonuses
+  check (AddTriggerEx(inv.statBonus.trigger.startName,
+                      "^.*Str.*Int.*Wis.*Dex.*Con.*Luck.*Total.*$",
+                      "EnableTrigger(inv.statBonus.trigger.getName, true)",
+                      drlTriggerFlagsBaseline + trigger_flag.OneShot + trigger_flag.OmitFromOutput,
+                      custom_colour.Custom11,
+                      0, "", "", sendto.script, 0))
+end -- inv.statBonus.setSetupFn
+
+
+inv.statBonus.timer      = {}
+inv.statBonus.timer.name = "drlInvStatBonusTimer"
+inv.statBonus.timer.min  = 5
+inv.statBonus.timer.sec  = 30
+
+function inv.statBonus.timer.update(min, sec)
+  min = tonumber(min or "")
+  sec = tonumber(sec or "")
+  if (min == nil) or (sec == nil) then
+    dbot.warn("inv.statBonus.timer.update: missing parameters")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  dbot.debug("Scheduling stat bonus timer in " .. min .. " minutes, " .. sec .. " seconds")
+
+  check (AddTimer(inv.statBonus.timer.name, 0, min, sec, "",
+                  timer_flag.Enabled + timer_flag.Replace + timer_flag.OneShot,
+                  "inv.statBonus.set"))
+end -- inv.statBonus.timer.update
+
+
+inv.statBonus.trigger = {}
+
+inv.statBonus.trigger.getName   = "drlInvStatBonusTriggerGet"
+inv.statBonus.trigger.startName = "drlInvStatBonusTriggerStart"
+
+function inv.statBonus.trigger.get(line)
+
+  -- Look for the current spells bonus
+  local matchStart, matchEnd, eqStr, eqInt, eqWis, eqDex, eqCon, eqLuck = 
+    string.find(line, "Spells Bonus%s+:%s+(%d+)%s+(%d+)%s+(%d+)%s+(%d+)%s+(%d+)%s+(%d+)%s+.*$")
+
+  if (matchStart ~= nil) then
+    inv.statBonus.currentBonus.str  = tonumber(eqStr)
+    inv.statBonus.currentBonus.int  = tonumber(eqInt)
+    inv.statBonus.currentBonus.wis  = tonumber(eqWis)
+    inv.statBonus.currentBonus.dex  = tonumber(eqDex)
+    inv.statBonus.currentBonus.con  = tonumber(eqCon)
+    inv.statBonus.currentBonus.luck = tonumber(eqLuck)
+
+    inv.statBonus.bonusInProgress = false
+
+    dbot.debug("Spells bonus: str=" .. eqStr .. ", int=" .. eqInt .. ", wis=" .. eqWis ..
+               ", dex=" .. eqDex .. ", con=" .. eqCon .. ", luck=" .. eqLuck)
+  end -- if
+
+  -- Shut off the trigger if we hit the end of the stats output
+  if (string.find(line, "See \'help maxstats\' for details on limits")) then
+    EnableTrigger(inv.statBonus.trigger.getName, false)
+  end -- if
+
+end -- inv.statBonus.trigger.get
+
+
+----------------------------------------------------------------------------------------------------
+--
+-- Module to manage analysis of equipment sets
+--
+-- dinv analyze [list | create | delete | display] <priorityName> <wearable location>
+--
+-- inv.analyze.sets(priorityName, minLevel, doDisplay, wearableLoc, resultData)
+-- inv.analyze.setsCR()
+-- inv.analyze.delete(priorityName)
+-- inv.analyze.list()
+-- inv.analyze.display(priorityName, wearableLoc, endTag)
+--
+----------------------------------------------------------------------------------------------------
+
+inv.analyze                  = {}
+inv.analyze.setsPkg          = nil
+inv.analyze.timeoutThreshold = 60
+
+
+function inv.analyze.sets(priorityName, minLevel, resultData)
+  if (priorityName == nil) or (priorityName == "") then
+    dbot.warn("inv.analyze.sets: missing priorityName parameter")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  minLevel = tonumber(minLevel or "")
+  if (minLevel == nil) then
+    dbot.warn("inv.analyze.sets: invalid non-numeric minLevel parameter")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  -- Ensure we don't have multiple analyses in progress 
+  if (inv.analyze.setsPkg ~= nil) then
+    dbot.info("Skipping analysis of sets: another analysis is in progress")
+    return DRL_RET_BUSY
+  end -- if
+
+  inv.analyze.setsPkg               = {}
+  inv.analyze.setsPkg.priorityName  = priorityName
+  inv.analyze.setsPkg.minLevel      = minLevel
+  inv.analyze.setsPkg.resultData    = resultData
+
+  wait.make(inv.analyze.setsCR)
+
+  return DRL_RET_SUCCESS
+end -- inv.analyze.sets
+
+
+drlSynchronous  = "synchronous"
+drlAsynchronous = "asynchronous"
+function inv.analyze.setsCR()
+  local currentLevel
+  local didDisableRefresh = false
+  local retval = DRL_RET_SUCCESS
+  local maxLevel = 201 + 10 * dbot.gmcp.getTier()
+  local totalLevels
+
+  if (inv.state == invStateRunning) then
+    dbot.info("Skipping set analysis: you are in the middle of an inventory refresh")
+    retval = DRL_RET_BUSY
+  else   
+    totalLevels = maxLevel - inv.analyze.setsPkg.minLevel
+    if (totalLevels == 0) then
+      totalLevels = 1 -- we don't want to divide by zero in our analysis
+    elseif (totalLevels < 0) then
+      dbot.info("Skipping set analysis: minLevel " .. inv.analyze.setsPkg.minLevel .. 
+                " exceeds your current maxLevel " .. maxLevel)
+      retval = DRL_RET_SUCCESS
+    end -- if
+  end -- if
+
+  -- If we hit a problem either with the current state or with the level range, abort the request
+  -- and let the caller know what happened by updating the callback parameter.
+  if (retval ~= DRL_RET_SUCCESS) then
+    inv.analyze.setsPkg = nil
+
+    -- If the user gave us a callback, use it to let the caller know we are done because we failed in some way
+    if (inv.analyze.setsPkg.resultData ~= nil) then
+      dbot.callback.default(inv.analyze.setsPkg.resultData, retval)
+    end -- if
+
+    return retval
+  end -- if
+
+  if (inv.state == invStateIdle) then
+    inv.state = invStatePaused
+    didDisableRefresh = true
+  end -- if
+
+  if (inv.set.table[inv.analyze.setsPkg.priorityName] == nil) then
+    inv.set.table[inv.analyze.setsPkg.priorityName] = {}
+  end -- if
+
+  dbot.prompt.hide()
+
+  for currentLevel = inv.analyze.setsPkg.minLevel,maxLevel do
+    dbot.debug("Creating analysis set for " .. inv.analyze.setsPkg.priorityName .. ", level=" .. currentLevel)
+
+    inv.set.table[inv.analyze.setsPkg.priorityName][currentLevel] = nil
+    retval = inv.set.create(inv.analyze.setsPkg.priorityName, currentLevel, drlSynchronous)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.analyze.setsCR: Failed to create \"" .. (inv.analyze.setsPkg.priorityName or "nil") ..
+                "\" set at level " .. currentLevel .. ": " .. dbot.retval.getString(retval))
+      break
+    end -- if
+
+    -- Show progress and let something else run occasionally
+    local levelsChecked = currentLevel - inv.analyze.setsPkg.minLevel 
+    local progressPercent
+    if (inv.analyze.setsPkg.minLevel == maxLevel) then
+      progressPercent = 100
+    else
+      progressPercent = levelsChecked / totalLevels * 100
+    end -- if
+    if (levelsChecked % 10 == 0) or (currentLevel == maxLevel) then
+      dbot.print("@WEquipment analysis of \"@C" .. inv.analyze.setsPkg.priorityName .. "@W\": @G" ..
+                 string.format("%3d", progressPercent) .. "%")
+      wait.time(0.1)
+    end -- if
+
+    -- Wait for the table to be filled in (or time out)
+    local totTime = 0
+    local timeout = 10
+    while (inv.set.table[inv.analyze.setsPkg.priorityName][currentLevel] == nil) do
+      wait.time(drlSpinnerPeriodDefault)
+      totTime = totTime + drlSpinnerPeriodDefault
+      if (totTime > timeout) then
+        dbot.error("inv.analyze.setsCR: Failed to analyze \"" .. inv.analyze.setsPkg.priorityName ..
+                   "\" priority for level " .. currentLevel .. ": timed out")
+        retval = DRL_RET_TIMEOUT
+        break
+      end -- if
+    end -- while
+
+    -- If we had a problem with one set analysis, break out and don't continue
+    if (retval == DRL_RET_TIMEOUT) then
+      break
+    end -- if
+  end -- for
+
+  dbot.prompt.show()
+
+  -- Re-enable refreshes if we disabled them during this analysis
+  if (didDisableRefresh) then
+    inv.state = invStateIdle
+  end -- if
+
+  -- Save what we found
+  inv.set.save()
+  inv.statBonus.save()
+
+  -- If the user gave us a callback, use it to let the caller know we are done
+  if (inv.analyze.setsPkg.resultData ~= nil) then
+    dbot.callback.default(inv.analyze.setsPkg.resultData, retval)
+  end -- if
+
+  -- Clean up and return
+  inv.analyze.setsPkg = nil
+  return retval
+end -- inv.analyze.setsCR
+
+
+function inv.analyze.delete(priorityName)
+  local retval = DRL_RET_SUCCESS
+
+  if (priorityName == nil) or (priorityName == "") then
+    dbot.warn("inv.analyze.delete: missing priority name parameter")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  if (inv.set.table[priorityName] == nil) then
+    dbot.info("Analysis for priority \"@C" .. priorityName .. "@W\" does not exist")
+    retval = DRL_RET_MISSING_ENTRY
+  else
+    dbot.info("Deleted set analysis for priority \"@C" .. priorityName .. "@W\"")
+    inv.set.table[priorityName] = nil
+    inv.set.save()
+  end -- if
+
+  return retval
+end -- inv.analyze.delete
+
+
+function inv.analyze.list()
+  local retval = DRL_RET_SUCCESS
+  local numAnalyses = 0
+  local sortedNames = {}
+
+  -- Sort the analysis names
+  for name, _ in pairs(inv.set.table) do
+    table.insert(sortedNames, name)
+  end -- for
+  table.sort(sortedNames, function (v1, v2) return v1 < v2 end) 
+
+  dbot.print("@WSet analysis: @Gcomplete@W or @Ypartial@W")
+  for _, name in ipairs(sortedNames) do
+    local minLevel = 1 + 10 * dbot.gmcp.getTier()
+    local maxLevel = minLevel + 200
+    local analysisPrefix = "@G"
+    local analysisSuffix = ""
+
+    -- Scan through all levels for the analysis to see if any are missing at least one set
+    for level = minLevel, maxLevel do
+      if (inv.set.table[name][level] == nil) then
+        analysisPrefix = "@Y"
+        analysisSuffix = "@W -- Run \"@Gdinv analyze create " .. name .. "@W\" to complete the analysis"      
+        break
+      end -- if
+    end -- for
+
+    dbot.print("  " .. analysisPrefix .. name .. analysisSuffix)
+
+    numAnalyses = numAnalyses + 1
+  end -- for
+
+  if (numAnalyses == 0) then
+    dbot.print("@W  No set analyses were detected.")
+    retval = DRL_RET_MISSING_ENTRY
+  end -- if
+
+  dbot.print("")
+
+  return retval
+end -- inv.analyze.list
+
+
+function inv.analyze.display(priorityName, wearableLoc, endTag)
+  local currentLevel
+  local retval = DRL_RET_SUCCESS
+  local lastSet = nil
+  local setWearLoc
+
+  if (priorityName == nil) or (priorityName == "") then
+    dbot.warn("inv.analyze.display: Priority name parameter is missing")
+    return inv.tags.stop(invTagsAnalyze, endTag, DRL_RET_INVALID_PARAM)
+  end -- if
+
+  if (inv.set.table == nil) or (inv.set.table[priorityName] == nil) then
+    dbot.warn("inv.analyze.display: Analysis table is not populated for priority \"" .. priorityName ..
+              "\".  You need to perform a full analysis before displaying results.")
+    return inv.tags.stop(invTagsAnalyze, endTag, DRL_RET_MISSING_ENTRY)
+  end -- if
+
+  dbot.debug("inv.analyze.display: priority=\"" .. priorityName .. "\", locs=\"" .. wearableLoc .. "\"")
+
+  local tierLevel  = 10 * dbot.gmcp.getTier()
+  local startLevel = 1 + tierLevel
+  local endLevel   = 201 + tierLevel
+  for currentLevel = startLevel, endLevel do
+    local didUpdateThisLevel = false
+
+    for _,setWearLoc in pairs(inv.wearLoc) do
+     if (wearableLoc == nil) or (wearableLoc == "") or dbot.isWordInString(setWearLoc, wearableLoc) then
+        local set = inv.set.table[priorityName][currentLevel]
+        local prevSet = inv.set.table[priorityName][currentLevel - 1]
+
+        if (set ~= nil) and (set[setWearLoc] ~= nil) then
+          local objId = tonumber(set[setWearLoc].id or "")
+          local prevObjId
+          if (prevSet ~= nil) and (prevSet[setWearLoc] ~= nil) then
+            prevObjId = tonumber(prevSet[setWearLoc].id or "")
+          end -- if 
+
+          -- Display the item if this is our first level or if something changed from the previous level
+          if (objId ~= nil) and ((objId ~= prevObjId) or (currentLevel == startLevel)) then
+            if (didUpdateThisLevel == false) then
+              didUpdateThisLevel = true
+
+              dbot.print(string.format("\n@Y%s@W Level %3d @Y%s@s",
+                                       string.rep("-", 44), currentLevel, string.rep("-", 44)))
+              inv.items.displayLastType = "" -- kludge to force print the display header
+            end -- if
+
+            -- If an item was just replaced, give info on it so that we can compare it to the new item
+            if (currentLevel ~= startLevel) and (prevObjId ~= nil) then
+              inv.items.displayItem(prevObjId, invDisplayVerbosityDiffRemove, setWearLoc)
+            end -- if
+
+            inv.items.displayItem(objId, invDisplayVerbosityDiffAdd, setWearLoc)
+
+          end -- if
+        end -- if
+
+      end -- if
+    end -- for
+  end -- for
+
+  return inv.tags.stop(invTagsAnalyze, endTag, retval)
+end -- inv.analyze.display
+
+
+----------------------------------------------------------------------------------------------------
+--
+-- Module to scan equipment sets for items matching a query and then provide usage information
+-- for those items.  This includes listing all equipment sets that use the item and at what level(s)
+-- the item is used.
+--
+-- dinv usage <priority name> <query>
+--
+-- inv.usage.display(priorityName, query, endTag)
+-- inv.usage.displayCR()
+-- inv.usage.displayItem(priorityName, objId)
+-- inv.usage.get(priorityName, objId)
+--
+----------------------------------------------------------------------------------------------------
+
+inv.usage            = {}
+inv.usage.displayPkg = nil
+
+function inv.usage.display(priorityName, query, endTag)
+
+  if (priorityName == nil) or (query == nil) then
+    dbot.error("inv.usage.display: input parameters are nil!")
+    return inv.tags.stop(invTagsUsage, endTag, DRL_RET_INVALID_PARAM)
+  end -- if
+
+  if (inv.usage.displayPkg ~= nil) then
+    dbot.info("Skipping display of item usage: another request is in progress")
+    return inv.tags.stop(invTagsUsage, endTag, DRL_RET_BUSY)
+  end -- if
+
+  inv.usage.displayPkg              = {}
+  inv.usage.displayPkg.priorityName = priorityName
+  inv.usage.displayPkg.query        = query
+  inv.usage.displayPkg.endTag       = endTag
+
+  wait.make(inv.usage.displayCR)
+
+  return DRL_RET_SUCCESS
+end -- inv.usage.display
+
+
+function inv.usage.displayCR()
+
+  if (inv.usage.displayPkg == nil) then
+    dbot.error("inv.usage.displayCR: inv.usage.displayPkg is nil!")
+    return DRL_RET_INTERNAL_ERROR
+  end -- if    
+
+  local retval  
+  local idArray
+  local priorityName = inv.usage.displayPkg.priorityName or ""
+  local query        = inv.usage.displayPkg.query or ""
+  local endTag       = inv.usage.displayPkg.endTag
+
+  -- Get an array of IDs for items that match the specified query
+  idArray, retval = inv.items.searchCR(query)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.usage.displayCR: failed to search inventory table: " .. dbot.retval.getString(retval))
+
+  -- Let the user know if no items matched their query
+  elseif (idArray == nil) or (#idArray == 0) then
+    dbot.info("No match found for usage query: \"" .. query .. "\"")
+
+  else
+    -- Sort the items in the array before we display them
+    inv.items.sort(idArray, { { field = invStatFieldType,     isAscending = true },
+                              { field = invStatFieldLevel,    isAscending = true },
+                              { field = invStatFieldWearable, isAscending = true },
+                              { field = invStatFieldName,     isAscending = true } })
+
+    -- Display the items!
+    for _, id in ipairs(idArray) do
+      local wearableField = inv.items.getStatField(id, invStatFieldWearable)
+      local typeField     = inv.items.getStatField(id, invStatFieldType)
+
+      -- Only consider an item available to be used if it has a wearable location,
+      -- is not a potion, pill, or food, and if it is not both a treasure and hold item.
+      if (wearableField ~= nil) and 
+         (typeField ~= invmon.typeStr[invmonTypePotion]) and 
+         (typeField ~= invmon.typeStr[invmonTypePill]) and 
+         (typeField ~= invmon.typeStr[invmonTypeFood]) and
+         ((typeField ~= invmon.typeStr[invmonTypeTreasure]) or 
+          (wearableField ~= inv.wearLoc[invWearableLocHold])) then
+
+        if (priorityName == "all") then
+          for priority, _ in pairs(inv.priority.table) do
+            inv.usage.displayItem(priority, id)
+          end -- for
+        else
+          inv.usage.displayItem(priorityName, id)
+        end -- if
+      end -- if
+    end -- for
+
+  end -- if
+
+  -- Clean up and return
+  inv.usage.displayPkg = nil
+  return inv.tags.stop(invTagsUsage, endTag, retval)
+end -- inv.usage.displayCR
+
+
+function inv.usage.displayItem(priorityName, objId)
+
+  -- TODO: this is very similar to code in displayItem: consolidate it into a helper function
+
+  local colorName = inv.items.getField(objId, invFieldColorName) or "Unknown"
+  local maxNameLen = 44
+
+  -- We color-code the ID field as follows: unidentified = red, partial ID = yellow, full ID = green
+  local formattedId = ""
+  local colorizedId = ""
+  local idPrefix = DRL_ANSI_WHITE
+  local idSuffix = DRL_ANSI_WHITE
+  local idLevel = inv.items.getField(objId, invFieldIdentifyLevel)
+  if (idLevel ~= nil) then
+    if (idLevel == invIdLevelNone) then
+      idPrefix = DRL_ANSI_RED
+    elseif (idLevel == invIdLevelPartial) then
+      idPrefix = DRL_ANSI_YELLOW
+    elseif (idLevel == invIdLevelFull) then
+      idPrefix = DRL_ANSI_GREEN
+    end -- if
+
+    formattedId = "(" .. objId .. ") "
+    colorizedId = idPrefix .. formattedId .. idSuffix
+  end -- if
+
+  -- Format the name field for the stat display.  This is complicated because we have a fixed
+  -- number of spaces reserved for the field but color codes could take up some of those spaces.
+  -- We iterate through the string byte by byte checking the length of the non-colorized equivalent
+  -- to see when we've hit the limit that we can print.
+  local formattedName = ""
+  local index = 0
+  while (#strip_colours(formattedName) < maxNameLen - #formattedId) and (index < 50) do
+    formattedName = string.sub(colorName, 1, maxNameLen - #formattedId + index)
+
+    -- It's possible for an item to have "%@" as part of its name (e.g., Roar of Victory).  This bombs
+    -- when we try to display it because our print routine interprets it as a single format option.  We
+    -- replace it with doubled % so that the print routine knows it is a literal.
+    formattedName = string.gsub(formattedName, "%%@", "%%%%@")
+    index = index + 1
+  end
+
+  if (#strip_colours(formattedName) < maxNameLen - #formattedId) then
+    formattedName = formattedName .. string.rep(" ", maxNameLen - #strip_colours(formattedName) - #formattedId)
+  end -- if
+  -- The trimmed name could end on an "@" which messes up color codes and spacing
+  formattedName = string.gsub(formattedName, "@$", " ") .. " " .. DRL_XTERM_GREY
+  formattedName = formattedName .. colorizedId 
+
+  local levelUsage  = inv.usage.get(priorityName, objId)
+  local itemLevel   = inv.items.getStatField(objId, invStatFieldLevel) or "N/A"
+  local itemType    = DRL_ANSI_YELLOW .. (inv.items.getStatField(objId, invStatFieldType) or "No Type") ..
+                      DRL_ANSI_WHITE
+  local levelStr    = ""
+  local levelPrefix = "@G"
+  local levelSuffix = "@W"
+
+  if (levelUsage == nil) or (#levelUsage == 0) then
+    levelStr    = DRL_ANSI_RED .. "Unused"
+    levelPrefix = "@R"
+  else
+    levelStr = DRL_ANSI_GREEN
+    -- Convert the list of levels into a string with ranges
+    for i = 1, #levelUsage do
+      -- If we have consecutive numbers on either side, we are in a range and can whack this item
+      if (levelUsage[i - 1] ~= nil) and 
+         ((levelUsage[i] == levelUsage[i - 1] + 1) or (levelUsage[i - 1] == 0 )) and
+         (levelUsage[i + 1] ~= nil) and (levelUsage[i] == levelUsage[i + 1] - 1) then
+        levelUsage[i] = 0
+      end -- if
+    end -- for
+
+    local inRange = false
+    for i = 1, #levelUsage do
+      if (inRange == false) then
+        if (levelUsage[i] == 0) then
+          levelStr = levelStr .. "-"
+          inRange = true
+        elseif (i == 1) then
+          levelStr = levelStr .. levelUsage[i]
+        else
+          levelStr = levelStr .. " " .. levelUsage[i]
+        end -- if
+      elseif (levelUsage[i] ~= 0) then
+          levelStr = levelStr .. levelUsage[i]
+          inRange = false
+      end -- if
+    end -- for
+  end -- if
+
+  dbot.print(string.format("%s%3d%s " .. formattedName .. itemType .. " " .. priorityName ..
+                           " " .. levelStr, levelPrefix, itemLevel, levelSuffix))
+end -- inv.usage.displayItem
+
+
+-- Returns an array of levels in which the item is used by the specified priority
+function inv.usage.get(priorityName, objId)
+  if (priorityName == nil) then
+    dbot.warn("inv.usage.get: priorityName parameter is nil!")
+    return nil, DRL_RET_INVALID_PARAM
+  end -- if
+
+  objId = tonumber(objId or "")
+  if (objId == nil) then
+    dbot.warn("inv.usage.get: objId parameter is not a number")
+    return nil, DRL_RET_INVALID_PARAM
+  end -- if
+
+  dbot.debug("Usage: priority=\"" .. priorityName .. "\", objId=" .. objId)
+
+  local startLevel = tonumber(inv.items.getStatField(objId, invStatFieldLevel) or "")
+  local endLevel = 201 + 10 * dbot.gmcp.getTier()
+  local wearType = inv.items.getStatField(objId, invStatFieldWearable)
+  local levelArray = {}
+
+  -- wearType is a general location (e.g., wrist, finger, etc.)
+  -- wearLoc is a specific location of wearType (e.g., lwrist, rfinger, etc.)
+  --
+  -- Scan through every possible wearLoc in the priority at the specified level to
+  -- see if the current object is at that location.  If it is, remember it by putting
+  -- the level it is used in an array that we return to the caller.
+  if (wearType ~= nil) and (inv.wearables[wearType] ~= nil) then
+    for _, wearLoc in ipairs(inv.wearables[wearType]) do
+      if (wearLoc ~= nil) and (startLevel ~= nil) and (inv.set.table[priorityName] ~= nil) then
+        for level = startLevel, endLevel do
+          if (inv.set.table[priorityName][level] ~= nil) and 
+             (inv.set.table[priorityName][level][wearLoc] ~= nil) and
+             (inv.set.table[priorityName][level][wearLoc].id == objId) then
+            table.insert(levelArray, level)
+          end -- if
+        end -- for
+      end -- if
+    end -- for
+  end -- if
+
+  return levelArray, DRL_RET_SUCCESS
+end -- inv.usage.get
+
+
+----------------------------------------------------------------------------------------------------
+-- Module to track which tags are enabled
+--
+-- Tags add opening and terminating strings to the output.  They surround a particular operation
+-- so that the user can know when the operation starts, when it stops, and what the final return
+-- value of the operation is.
+--
+-- inv.tags.init.atActive()
+-- inv.tags.fini(doSaveState)
+--
+-- inv.tags.save()
+-- inv.tags.load()
+-- inv.tags.reset()
+--
+-- inv.tags.enable()
+-- inv.tags.disable()
+-- inv.tags.isEnabled()
+--
+-- inv.tags.display()
+-- inv.tags.set(tagNames, tagValue)
+--
+-- inv.tags.start(moduleName, startTag)
+-- inv.tags.stop(moduleName, endTag, returnValue)
+--
+----------------------------------------------------------------------------------------------------
+
+inv.tags           = {}
+inv.tags.init      = {}
+inv.tags.table     = {}
+inv.tags.stateName = "inv-tags.state"
+
+invTagsRefresh   = "refresh"
+invTagsBuild     = "build"
+invTagsSearch    = "search" 
+invTagsGet       = "get"
+invTagsPut       = "put"
+invTagsStore     = "store"
+invTagsKeyword   = "keyword"
+invTagsOrganize  = "organize"
+invTagsSet       = "set"
+invTagsSnapshot  = "snapshot"
+invTagsPriority  = "priority"
+invTagsAnalyze   = "analyze"
+invTagsUsage     = "usage"
+invTagsCompare   = "compare"
+invTagsCovet     = "covet"
+invTagsBackup    = "backup"
+invTagsReset     = "reset"
+invTagsForget    = "forget"
+invTagsNotify    = "notify"
+invTagsCache     = "cache"
+invTagsVersion   = "version"
+invTagsHelp      = "help"
+
+inv.tags.modules = invTagsBuild     .. " " ..
+                   invTagsRefresh   .. " " ..
+                   invTagsSearch    .. " " ..
+                   invTagsGet       .. " " ..
+                   invTagsPut       .. " " ..
+                   invTagsStore     .. " " ..
+                   invTagsKeyword   .. " " ..
+                   invTagsOrganize  .. " " ..
+                   invTagsSet       .. " " ..
+                   invTagsSnapshot  .. " " ..
+                   invTagsPriority  .. " " ..
+                   invTagsAnalyze   .. " " ..
+                   invTagsUsage     .. " " ..
+                   invTagsCompare   .. " " ..
+                   invTagsCovet     .. " " ..
+                   invTagsBackup    .. " " ..
+                   invTagsReset     .. " " ..
+                   invTagsForget    .. " " ..
+                   invTagsNotify    .. " " ..
+                   invTagsCache     .. " " ..
+                   invTagsVersion   .. " " ..
+                   invTagsHelp
+
+
+drlInvTagOn      = "on"
+drlInvTagOff     = "off"
+
+
+function inv.tags.init.atActive()
+  local retval = DRL_RET_SUCCESS
+
+  -- Pull in what we already know
+  retval = inv.tags.load()
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.tags.init.atActive: Failed to load tags data: " .. dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+end -- inv.tags.init.atActive
+
+
+function inv.tags.fini(doSaveState)
+  local retval = DRL_RET_SUCCESS
+
+  if (doSaveState) then
+    -- Save our current tags data
+    retval = inv.tags.save()
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.tags.fini: Failed to save tags data: " .. dbot.retval.getString(retval))
+    end -- if
+  end -- if
+
+  return retval
+end -- inv.tags.fini
+
+
+function inv.tags.save()
+  local retval = dbot.storage.saveTable(dbot.backup.getCurrentDir() .. inv.tags.stateName,
+                                        "inv.tags.table", inv.tags.table)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.tags.save: Failed to save tags table: " .. dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+end -- inv.tags.save
+
+
+function inv.tags.load()
+  local retval = dbot.storage.loadTable(dbot.backup.getCurrentDir() .. inv.tags.stateName, inv.tags.reset)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.tags.load: Failed to load table from file \"@R" .. 
+              dbot.backup.getCurrentDir() .. inv.tags.stateName .. "@W\": " .. dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+end -- inv.tags.load
+
+
+function inv.tags.reset()
+  inv.tags.table = {}
+
+  for tag in inv.tags.modules:gmatch("%S+") do
+    inv.tags.table[tag] = drlInvTagOff
+  end -- for
+
+  -- This is a top-level flag enabling or disabling all other tags
+  inv.tags.table["tags"] = drlInvTagOn
+
+  local retval = inv.tags.save()
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.tags.reset: Failed to save tags persistent data: " .. dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+end -- inv.tags.reset
+
+
+function inv.tags.enable()
+  inv.tags.table["tags"] = drlInvTagOn
+  dbot.info("Tags module is @GENABLED@W (specific tags may or may not be enabled)")
+  return inv.tags.save()
+end -- inv.tags.enable
+
+
+function inv.tags.disable()
+  inv.tags.table["tags"] = drlInvTagOff
+  dbot.info("Tags module is @RDISABLED@W (individual tag status is ignored when the module is disabled)")
+  return inv.tags.save()
+end -- inv.tags.disable
+
+
+function inv.tags.isEnabled()
+  if (inv.tags.table ~= nil) and (inv.tags.table["tags"] ~= nil) and
+     (inv.tags.table["tags"] == drlInvTagOn) then
+    return true
+  else
+    return false
+  end -- if
+end -- inv.tags.isEnabled
+
+
+function inv.tags.display()
+  local retval = DRL_RET_SUCCESS
+  local isEnabled
+
+  if inv.tags.isEnabled() then
+    isEnabled = "@GENABLED@W"
+  else
+    isEnabled = "@RDISABLED@W"
+  end -- if
+
+  dbot.print("@y" .. pluginNameAbbr .. "@W : tags are " .. isEnabled)
+  dbot.print("@WSupported tags")
+
+  for tag in inv.tags.modules:gmatch("%S+") do
+    local tagValue = inv.tags.table[tag] or "uninitialized"
+    local valuePrefix
+
+    if (tagValue == drlInvTagOn) then
+      valuePrefix = "@G"
+    else
+      valuePrefix = "@R"
+    end -- if
+
+    dbot.print(string.format("@C  %10s@W = ", tag) .. valuePrefix .. tagValue)
+  end -- for
+
+  return retval
+end -- inv.tags.display
+
+
+function inv.tags.set(tagNames, tagValue)
+  local retval = DRL_RET_SUCCESS
+
+  if (tagValue ~= drlInvTagOn) and (tagValue ~= drlInvTagOff) then
+    dbot.warn("inv.tags.set: Invalid tag value \"" .. (tagValue or "nil") .. "\"")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  for tag in tagNames:gmatch("%S+") do
+    if dbot.isWordInString(tag, inv.tags.modules) then
+      inv.tags.table[tag] = tagValue
+
+      local valuePrefix
+      if (tagValue == drlInvTagOn) then
+        valuePrefix = "@G"
+      else
+        valuePrefix = "@R"
+      end -- if
+
+      dbot.note("Set tag \"@C" .. tag .. "@W\" to \"" .. valuePrefix .. tagValue .. "@W\"")
+    else
+      dbot.warn("inv.tags.set: Failed to set tag \"@C" .. tag .. "@W\": Unsupported tag")
+      retval = DRL_RET_INVALID_PARAM
+    end -- if
+  end -- for
+
+  local saveRetval = inv.tags.save()
+  if (saveRetval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.tags.set: Failed to save tags persistent data: " .. dbot.retval.getString(saveRetval))
+  end -- if
+
+  -- If the only problem that arose was with the save, return the save's return value.  Otherwise,
+  -- return whatever return value we hit while setting the tags.
+  if (retval == DRL_RET_SUCCESS) and (saveRetval ~= DRL_RET_SUCCESS) then
+    return saveRetval
+  else
+    return retval
+  end -- if
+end -- inv.tags.set
+
+
+function inv.tags.start(moduleName, startTag)
+  local retval = DRL_RET_SUCCESS
+
+--[[ TODO: I don't think that we actually want to use this after all.  The problem is that
+           the start tag won't be displayed until any pending commands that are queued up on
+           the server actually complete.  We could wait until we get confirmation that the
+           command finished and our completion message was displayed before we continue.
+           However, that would add quite a bit of latency and overhead for the user.
+
+           Also, I'm not convinced that seeing a start tag is that helpful.  If someone kicks
+           off a command, they probably are much more interested in knowing when it is done
+           (i.e., seeing the end tag) than knowing that they made the original request -- which
+           really shouldn't be a surprise since they are the ones that made the request ;-)
+
+  if (moduleName ~= nil) and (startTag ~= nil) and (startTag ~= "") and 
+     (inv.tags.table ~= nil) and (inv.tags.table[moduleName] == drlInvTagOn) and
+     inv.tags.isEnabled() then
+    retval = dbot.execute.fast.command("echo " .. "{" .. startTag .. "}")
+  end -- if
+--]]
+
+  return retval
+end -- inv.tags.start
+
+
+function inv.tags.stop(moduleName, endTag, retval)
+  if (retval == nil) then
+    retval = DRL_RET_INTERNAL_ERROR
+  end -- if
+
+  if (moduleName ~= nil) and (endTag ~= nil) and (endTag ~= "") and 
+     (inv.tags.table ~= nil) and (inv.tags.table[moduleName] == drlInvTagOn) and
+     inv.tags.isEnabled() then
+    local tagMsg = "{/" .. endTag .. ":" .. retval .. ":" .. dbot.retval.getString(retval) .. "}"
+    local charState = dbot.gmcp.getState()
+
+    -- If we are in a state that allows echo'ing messages, send the end tag.  Otherwise, warn the
+    -- user.
+    if (charState == dbot.stateActive)   or
+       (charState == dbot.stateCombat)   or
+       (charState == dbot.stateSleeping) or
+       (charState == dbot.stateTBD)      or
+       (charState == dbot.stateResting)  or
+       (charState == dbot.stateRunning)  then
+      dbot.execute.fast.command("echo " .. tagMsg)
+    else
+      dbot.warn("You are in state \"@C" .. dbot.gmcp.getStateString(charState) ..
+                "@W\": Could not echo end tag \"@G" .. tagMsg .. "@W\"")
+    end -- if
+  end -- if
+
+  return retval
+end -- inv.tags.end
+
+
+----------------------------------------------------------------------------------------------------
+--
+-- Module to manage buying and using consumables (potions, pills, scrolls, etc.)
+--
+-- dinv consume add     [type] [itemName]
+--              remove  [type] <itemName>
+--              display <type>
+--              list
+--              buy     [type] <numItems>
+--              small   [type] <numItems>
+--              big     [type] <numItems>
+--
+-- inv.consume.init.atActive()
+-- inv.consume.fini(doSaveState)
+--
+-- inv.consume.save()
+-- inv.consume.load()
+-- inv.consume.reset()
+--
+-- inv.consume.add(typeName, itemName)
+-- inv.consume.addCR() -- async so that we can appraise the new item
+-- inv.consume.remove(typeName, itemName)
+-- inv.consume.display(typeName) -- if typeName is missing, display all types
+-- inv.consume.displayType(typeName)
+--
+-- inv.consume.buy(typeName, numItems, containerName)
+-- inv.consume.buyCR() -- async so that we can run to the shopkeeper
+-- inv.consume.get(typeName, size, containerId)
+-- inv.consume.use(typeName, size, numItems, containerName)
+-- inv.consume.useCR()
+-- inv.consume.useItem(objId, commandArray)
+-- 
+-- Consumable table format:
+--   table[typeName] = 
+--     { heal  = { { level=1,   name="light relief",   room="32476", fullName="(!(Light Relief)!)" },
+--                 { level=20,  name="serious relief", room="32476", fullName="(!(Serious Relief)!)" } },
+--       mana  = { { level=1,   name="lotus rush",     room="32476", fullName="(!(Lotus Rush)!)" } },
+--       fly   = { { level=1,   name="griff",          room="32476", fullName="(!(Griffon's Blood)!)" } }
+--     }
+-- 
+----------------------------------------------------------------------------------------------------
+
+inv.consume           = {}
+inv.consume.init      = {}
+inv.consume.table     = {}
+inv.consume.stateName = "inv-consume.state"
+
+
+function inv.consume.init.atActive()
+  local retval = DRL_RET_SUCCESS
+
+  retval = inv.consume.load()
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.consume.init.atActive: failed to load consume data from storage: " .. 
+              dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+end -- inv.consume.init.atActive
+
+
+function inv.consume.fini(doSaveState)
+  local retval = DRL_RET_SUCCESS
+
+  if (doSaveState) then
+    -- Save our current data
+    retval = inv.consume.save()
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.consume.fini: Failed to save inv.consume module data: " .. dbot.retval.getString(retval))
+    end -- if
+  end -- if
+
+  return retval
+end -- inv.consume.fini
+
+
+function inv.consume.save()
+  local retval = dbot.storage.saveTable(dbot.backup.getCurrentDir() .. inv.consume.stateName,
+                                        "inv.consume.table", inv.consume.table)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.consume.save: Failed to save consume table: " .. dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+end -- inv.consume.save
+
+
+function inv.consume.load()
+  local retval = dbot.storage.loadTable(dbot.backup.getCurrentDir() .. inv.consume.stateName, inv.consume.reset)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.consume.load: Failed to load table from file \"@R" .. 
+              dbot.backup.getCurrentDir() .. inv.consume.stateName .. "@W\": " .. dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+end -- inv.consume.load
+
+
+function inv.consume.reset()
+  local retval
+
+  -- Start with a few basic consumables from the Aylor potion shop ("runto potion")
+  inv.consume.table =
+    { heal  = { { level=1,   name="light relief",   room="32476", fullName="(!(Light Relief)!)" },
+                { level=20,  name="serious relief", room="32476", fullName="(!(Serious Relief)!)" } },
+      mana  = { { level=1,   name="lotus rush",     room="32476", fullName="(!(Lotus Rush)!)" } },
+      fly   = { { level=1,   name="griff",          room="32476", fullName="(!(Griffon's Blood)!)" } }
+    }
+
+  retval = inv.consume.save()
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.consume.reset: Failed to save consumable data: " .. dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+end -- inv.consume.reset
+
+
+inv.consume.addPkg = nil
+function inv.consume.add(typeName, itemName)
+  if (typeName == nil) or (typeName == "") then
+    dbot.warn("inv.consume.add: Missing type name")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  if (itemName == nil) or (itemName == "") then
+    dbot.warn("inv.consume.add: Missing item name")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  itemLevel = tonumber(itemLevel or "")
+
+  if (inv.consume.addPkg ~= nil) then
+    dbot.info("Skipping request to add a consumable item: another request is in progress")
+    return DRL_RET_BUSY
+  end -- if
+
+  inv.consume.addPkg       = {}
+  inv.consume.addPkg.type  = typeName
+  inv.consume.addPkg.name  = itemName
+  inv.consume.addPkg.level = itemLevel
+  inv.consume.addPkg.room  = roomId
+
+  wait.make(inv.consume.addCR)
+
+  return DRL_RET_SUCCESS
+
+end -- inv.consume.add
+
+
+function inv.consume.addCR()
+  local retval = DRL_RET_SUCCESS
+  local typeName = inv.consume.addPkg.type
+  local itemName = inv.consume.addPkg.name or ""
+  local itemLevel = inv.consume.addPkg.level
+
+  -- We don't want an inventory refresh triggering in the middle of this shop item evaluation.
+  local origRefreshState = inv.state
+  if (inv.state == invStateIdle) then
+    inv.state = invStatePaused
+  elseif (inv.state == invStateRunning) then
+    dbot.info("Skipping shop item addition: you are in the middle of an inventory refresh")
+    inv.consume.addPkg = nil
+    return DRL_RET_BUSY
+  end -- if
+
+  -- If the optional room ID is not present, use the current room
+  local roomId = tonumber(inv.consume.addPkg.room or "")
+  if (roomId == nil) then
+    roomId = dbot.gmcp.getRoomId() or 0
+  end -- if
+
+  if (inv.consume.table[typeName] == nil) then
+    inv.consume.table[typeName] = {}
+  end -- if
+
+  -- Temporarily create an item placeholder with a fake object ID and a fake location.
+  -- We will fill in this placeholder with information from a shopkeeper appraisal later.
+  local objId = 42
+  retval = inv.items.add(objId)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.consume.addCR: Failed to add fake objId " .. (objId or "nil") .. ": " ..
+              dbot.retval.getString(retval))
+    inv.consume.addPkg = nil
+    inv.state = origRefreshState
+    return retval
+  end -- if
+
+  -- Fake a location for the shop item
+  inv.items.setField(objId, invFieldObjLoc, invItemLocShopkeeper)
+
+  -- Attempt to identify the shopkeeper item and wait until we have confirmation that the ID completed
+  local resultData = dbot.callback.new()
+  retval = inv.items.identifyItem(objId, "appraise " .. itemName, resultData)
+  if (retval == DRL_RET_SUCCESS) then
+    retval = dbot.callback.wait(resultData, inv.items.timer.idTimeoutThresholdSec)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.consume.addCR: Appraisal timed out for shopkeeper item" .. 
+                inv.consume.addPkg.auctionNum)
+    end -- if
+  end -- if
+
+  -- Get the level of the shop item we just identified
+  itemLevel = tonumber(inv.items.getStatField(objId, invStatFieldLevel) or "")
+  local fullName = inv.items.getStatField(objId, invStatFieldName) or ""
+
+  -- Remove the temporary item and ensure it isn't stuck in the cache
+  inv.items.remove(objId)
+  inv.cache.remove(inv.cache.recent.table, objId)
+
+  if (itemLevel ~= nil) then
+
+    -- If the item is already in the table, don't add it again!
+    local itemExists = false
+    for i, entry in ipairs(inv.consume.table[typeName]) do
+      if (entry.level == itemLevel) and (entry.name == itemName) then
+        dbot.note("Skipping addition of consumable item \"" .. itemName .. "\" of type \"" .. 
+                  typeName .. "\": item already exists")
+        itemExists = true
+        break
+      end -- if
+    end -- for
+
+    -- If the item isn't already in the consumable table, add it and then re-sort the table to
+    -- account for the new item
+    if (itemExists == false) then
+      table.insert(inv.consume.table[typeName], 
+                  { level = itemLevel, name = itemName, room = roomId, fullName = fullName })
+      table.sort(inv.consume.table[typeName], function (v1, v2) return v1.level < v2.level end) 
+      inv.consume.save()
+    end -- if
+  else
+    dbot.warn("inv.consume.addCR: Failed to identify shop item \"" .. itemName .. "\" in room \"" .. roomId)
+    retval = DRL_MISSING_ENTRY
+  end -- if
+
+  -- Restore the original refresh state (we may have paused it during this operation)
+  inv.state = origRefreshState
+
+  -- Clean up and return
+  inv.consume.addPkg = nil
+  return retval
+end -- inv.consume.addCR
+
+
+function inv.consume.remove(typeName, itemName)
+  if (typeName == nil) or (typeName == "") then
+    dbot.warn("inv.consume.remove: Missing type name")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  if (inv.consume.table == nil) or (inv.consume.table[typeName] == nil) then
+    dbot.info("Type \"" .. typeName .. "\" is not in the consumable table")
+    return DRL_RET_MISSING_ENTRY
+  end -- if
+
+  local retval = DRL_RET_MISSING_ENTRY
+
+  -- If itemName is nil, remove all of the specified type
+  if (itemName == nil) or (itemName == "") then
+    inv.consume.table[typeName] = nil
+    retval = DRL_RET_SUCCESS
+
+  -- Search the table for the item matching "itemName" and remove just that item
+  else
+    for i, entry in ipairs(inv.consume.table[typeName]) do
+      if (entry.name == itemName) then
+        dbot.note("Removed \"" .. itemName .. "\" from \"" .. typeName .. "\" consumable table")
+        table.remove(inv.consume.table[typeName], i)
+        inv.consume.save()
+        retval = DRL_RET_SUCCESS
+        break
+      end -- if
+    end -- for
+  end -- if
+
+  if (retval == DRL_RET_MISSING_ENTRY) then
+    dbot.info("Skipping removal of consumable \"" .. itemName .. "\": item is not in consumable table")
+  end -- if
+
+  return retval
+end -- inv.consume.remove
+
+
+-- If typeName is nil or "", display all types in the table
+function inv.consume.display(typeName)
+  local retval = DRL_RET_SUCCESS
+
+  local numEntries = 0
+  if (typeName ~= nil) and (typeName ~= "") then
+    numEntries = inv.consume.displayType(typeName)
+  else
+    for itemType,_ in pairs(inv.consume.table) do
+      numEntries = numEntries + inv.consume.displayType(itemType)
+    end -- for
+  end -- if
+
+  if (numEntries == 0) then
+    dbot.print("@W  No items of type \"" .. typeName .. "\" are in the consumable table@w")
+    retval = DRL_RET_MISSING_ENTRY
+  end -- if
+
+  return retval
+end -- inv.consume.display
+
+
+function inv.consume.displayType(typeName)
+  local numEntries = 0
+
+  if (inv.consume.table == nil) or (typeName == nil) or (typeName == "") or 
+     (inv.consume.table[typeName] == nil) then
+    dbot.warn("inv.consume.displayType: Type \"" .. (typeName or "nil") .. 
+              "\" is not in the consumable table")
+    return numEntries, DRL_RET_MISSING_ENTRY
+  end -- if
+
+  dbot.print("@W" .. pluginNameAbbr .. " Consumable Type \"" .. typeName .. "\"@w")
+  if (inv.consume.table[typeName] ~= nil) then
+    for _, entry in ipairs(inv.consume.table[typeName]) do
+      dbot.print("@W  Level " .. string.format("%3d", (entry.level or "")) .. 
+                 " (@CRoom " .. string.format("%3d", (entry.room or 0)) .. "@W)" ..
+                 " \"@G" .. (entry.name or "") .. "@W\"@w")
+      numEntries = numEntries + 1
+    end -- for
+  end -- if
+
+  return numEntries, DRL_RET_SUCCESS
+end -- inv.consume.displayType
+
+
+inv.consume.buyPkg = nil
+function inv.consume.buy(typeName, numItems, containerName)
+  if (typeName == nil) or (typeName == "") then
+    dbot.warn("inv.consume.buy: Missing type name")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  -- If the user didn't specify how many items to buy, default to 1 item
+  numItems = tonumber(numItems or "")
+  if (numItems == nil) or (numItems == "") then
+    numItems = 1
+  end -- if
+
+  -- If there are no entries of the specified type, there's no need to keep searching
+  if (inv.consume.table[typeName] == nil) then
+    dbot.info("No items of type \"" .. typeName .. "\" are in the consumable table")
+    return DRL_RET_MISSING_ENTRY
+  end -- if
+
+  -- The containerName parameter is optional.  If it is present, we move the bought items
+  -- into the container after the purchase is complete.
+  containerName = containerName or ""
+
+  -- Find the highest level item that is available to the char that matches typeName
+  local curLevel = dbot.gmcp.getLevel()
+  local bestEntry = nil
+  for _, entry in ipairs(inv.consume.table[typeName]) do
+    if (entry.level < curLevel) then
+      bestEntry = entry
+    end -- if
+  end -- for
+
+  if (bestEntry == nil) then
+    dbot.info("No items of type \"" .. typeName .. "\" are available at level " .. curLevel)
+    return DRL_RET_MISSING_ENTRY
+  end -- if
+
+  if (inv.consume.buyPkg ~= nil) then
+    dbot.info("Skipping request to buy consumable \"" .. typeName .. "\": another request is in progress")
+    return DRL_RET_BUSY
+  end -- if
+
+  inv.consume.buyPkg               = {}
+  inv.consume.buyPkg.room          = bestEntry.room
+  inv.consume.buyPkg.itemName      = bestEntry.name
+  inv.consume.buyPkg.numItems      = numItems
+  inv.consume.buyPkg.containerName = containerName
+
+  wait.make(inv.consume.buyCR)
+
+  return DRL_RET_SUCCESS
+end -- inv.consume.buy
+
+
+-- need to block so that we can run to the shopkeeper
+function inv.consume.buyCR() 
+  local retval = DRL_RET_SUCCESS
+  local room = tonumber(inv.consume.buyPkg.room or "")
+
+  if (room == nil) then
+    dbot.warn("inv.consume.buyCR: Target room is missing")
+    inv.consume.buyPkg = nil
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  dbot.debug("Running to \"" .. inv.consume.buyPkg.room .. "\" to buy \"" .. inv.consume.buyPkg.numItems ..
+             "\" of \"" .. inv.consume.buyPkg.itemName .. "\"")
+
+  -- Run!
+  dbot.execute.fast.command("mapper goto " .. inv.consume.buyPkg.room)
+
+  -- Wait until we get to the target room
+  local totTime = 0
+  local timeout = 10
+  while (room ~= tonumber(dbot.gmcp.getRoomId())) do
+    wait.time(drlSpinnerPeriodDefault)
+    totTime = totTime + drlSpinnerPeriodDefault
+    if (totTime > timeout) then
+      dbot.warn("inv.consume.buyCR: Timed out running to room " .. room)
+      reval = DRL_RET_TIMEOUT
+      break
+    end -- if
+  end -- if 
+
+  -- Buy the items if no problems came up going to the room
+  if (retval == DRL_RET_SUCCESS) then
+    local commands = {}
+    table.insert(commands, "buy " .. inv.consume.buyPkg.numItems .. " " .. inv.consume.buyPkg.itemName)
+
+    if (inv.consume.buyPkg.containerName ~= nil) and (inv.consume.buyPkg.containerName ~= "") then
+      table.insert(commands, 
+                   "put all.\'" .. inv.consume.buyPkg.itemName .. "\' " .. inv.consume.buyPkg.containerName)
+    end -- if
+
+    dbot.execute.fast.commands(commands)
+  end -- if
+
+  -- Clean up and return
+  inv.consume.buyPkg = nil
+  return retval
+end -- inv.consume.buyCR
+
+
+-- Returns objId for an item 
+function inv.consume.get(typeName, size, containerId)
+  local curLevel = dbot.gmcp.getLevel()
+
+  if (typeName == nil) or (typeName == "") then
+    dbot.warn("inv.consume.get: type name is missing")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  if (inv.consume.table[typeName] == nil) then
+    dbot.warn("inv.consume.get: no consumables of type \"" .. typeName .. "\" are available")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  -- If the user specified a preferred container, use items from that container first.  If they
+  -- didn't specify a preferred container, use items from the main inventory first before using
+  -- items from other locations.
+  local preferredLocation
+  containerId = tonumber(containerId or "")
+  if (containerId ~= nil) then
+    preferredLocation = containerId
+  else
+    preferredLocation = invItemLocInventory
+  end -- if
+
+  -- If we are getting a "small" item, keep the default table order of small-to-big so that we
+  -- hit small items first.  If we are getting a "big" item, get a copy of the table (so we don't
+  -- mess up the original) and then sort the copy in reverse order with high-level items first.
+  local typeTable
+  if (size == drlConsumeBig) then
+    typeTable = dbot.table.getCopy(inv.consume.table[typeName])
+    table.sort(typeTable, function (v1, v2) return v1.level > v2.level end)
+  elseif (size == drlConsumeSmall) then
+    typeTable = inv.consume.table[typeName]
+  else
+    dbot.warn("inv.consume.get: invalid size parameter")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  for _, entry in pairs(typeTable) do
+    if (entry.level <= curLevel) then
+      -- If we have one of these items available, return the ID for it.  Otherwise, try the next entry
+      -- in the consumable table
+      local objInContainerId = nil
+      local finalId = nil
+
+      for objId, itemEntry in pairs(inv.items.table) do
+        local itemLevel = tonumber(inv.items.getStatField(objId, invStatFieldLevel) or "")
+        local itemName  = inv.items.getStatField(objId, invStatFieldName) or ""
+
+        if (entry.level == itemLevel) and (entry.fullName == itemName) then
+          -- We try to use items from the preferred location first (e.g., a user-specified container or
+          -- the main inventory if no container is specified).  If we find an item instance at the
+          -- preferred location, break immediately and use it.  Otherwise, remember the item and keep
+          -- searching for something at the preferred location.
+          finalId = objId
+          if (inv.items.getField(objId, invFieldObjLoc) == preferredLocation) then
+            break
+          end -- if
+        end -- if
+      end -- for
+
+      -- If we found a matching item instance, return it!
+      if (finalId ~= nil) then
+        dbot.note("@WFound \"@C" .. typeName .. "@W\"@G L" .. entry.level .. " @W\"@Y" ..
+                  (inv.items.getStatField(finalId, invStatFieldName) or "") ..
+                  "@W\" @@ \"@R" .. (inv.items.getField(finalId, invFieldObjLoc) or "") .. "@W\"")
+        return finalId, DRL_RET_SUCCESS
+      end -- if
+
+    end -- if
+  end -- for
+
+  return 0, DRL_RET_MISSING_ENTRY
+end -- inv.consume.get
+
+
+drlConsumeBig   = "big"
+drlConsumeSmall = "small"
+inv.consume.usePkg = nil
+function inv.consume.use(typeName, size, numItems, containerName)
+  if (typeName == nil) or (typeName == "") then
+    dbot.warn("inv.consume.use: Missing type name")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  -- If the number of items isn't specified, use a single item as the default
+  numItems = tonumber(numItems or "")
+  if (numItems == nil) then
+    numItems = 1
+  end -- if
+
+  if (inv.consume.usePkg ~= nil) then
+    dbot.info("Skipping request to use \"" .. typeName .. "\": another request is in progress")
+    return DRL_RET_BUSY
+  end -- if
+
+  if (size ~= drlConsumeBig) and (size ~= drlConsumeSmall) then
+    dbot.warn("inv.consume.use: size must be either \"" .. drlConsumeBig .. "\" or \"" .. 
+              drlConsumeSmall .. "\"")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  -- The containerName parameter is optional.  If it is present, we use items from the 
+  -- specified container before we items outside of that container.
+  containerName = containerName or ""
+
+  inv.consume.usePkg           = {}
+  inv.consume.usePkg.numItems  = numItems
+  inv.consume.usePkg.typeName  = typeName
+  inv.consume.usePkg.size      = size
+  inv.consume.usePkg.container = containerName
+
+  wait.make(inv.consume.useCR)
+
+  return DRL_RET_SUCCESS
+end -- inv.consume.use
+
+drlConsumeMaxConsecutiveItems = 4
+function inv.consume.useCR()
+  local retval = DRL_RET_SUCCESS
+  local objId
+
+  if (inv.consume.usePkg == nil) or (inv.consume.usePkg.size == nil) or 
+     (inv.consume.usePkg.numItems == nil) or (inv.consume.usePkg.typeName == nil) then
+    dbot.error("inv.consume.useCR: usePkg is nil or contains nil components")
+    return DRL_RET_INTERNAL_ERROR
+  end -- if
+
+  if (inv.consume.usePkg.numItems > drlConsumeMaxConsecutiveItems) then
+    dbot.note("Capping number of \"" .. inv.consume.usePkg.size .. "\" items to consume to " ..
+              drlConsumeMaxConsecutiveItems .. " in one burst")
+    inv.consume.usePkg.numItems = drlConsumeMaxConsecutiveItems
+  end -- if
+
+  -- If the user specified a preferred container, use items from that container first
+  local containerId = nil
+  if (inv.consume.usePkg.container ~= nil) and (inv.consume.usePkg.container ~= "") then
+    local idArray, retval = inv.items.searchCR("rname " .. inv.consume.usePkg.container)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.consume.useCR: failed to search inventory table: " .. dbot.retval.getString(retval))
+    elseif (#idArray ~= 1) then
+      -- There should only be a single match to the container's relative name (e.g., "2.bag")
+      dbot.warn("Container relative name \"" .. inv.consume.usePkg.container .. 
+                "\" did not have a unique match: no preferred container will be used for consume request")
+    else
+      -- We found a single unique match for the relative name
+      containerId = idArray[1]
+    end -- if
+  end -- if
+
+  local commandArray = {}
+  for i = 1, inv.consume.usePkg.numItems do
+    objId, retval = inv.consume.get(inv.consume.usePkg.typeName, inv.consume.usePkg.size, containerId)
+    if (objId ~= nil) and (retval == DRL_RET_SUCCESS) then
+      retval = inv.consume.useItem(objId, commandArray)
+      if (retval ~= DRL_RET_SUCCESS) then
+        dbot.warn("inv.consume.useCR: Failed to consume item: " .. dbot.retval.getString(retval))
+        break
+      end -- if
+    end -- if
+
+    if (retval ~= DRL_RET_SUCCESS) then
+      break;
+    end -- if
+  end -- for
+
+  -- We use the "fast" mode instead of "safe" mode because we don't want the extra overhead when
+  -- consuming items.  There's a good chance that you are in combat and stalling combat isn't a
+  -- great idea.  The worst case scenario is that the user goes AFK or something silly in the
+  -- middle of consuming the items and we try to consume them anyway.  It's not a huge issue.
+  if (commandArray ~= nil) then
+    if (#commandArray > 0) then
+      retval = dbot.execute.fast.commands(commandArray)
+      if (retval ~= DRL_RET_SUCCESS) then
+        dbot.note("Skipping request to consume items: " .. dbot.retval.getString(retval))
+      end -- if
+    else
+      dbot.note("Skipping request to consume items: no items matching the request were found")
+    end -- if
+  end -- if
+
+  -- Clean up
+  inv.consume.usePkg = nil
+  return retval
+end -- inv.consume.useCR
+
+
+function inv.consume.useItem(objId, commandArray)
+  local retval = DRL_RET_SUCCESS
+  local itemType = inv.items.getStatField(objId, invStatFieldType) or ""
+  local consumeCmd
+
+  if (itemType == "Potion") then
+    consumeCmd = "quaff"
+  elseif (itemType == "Pill") then
+    consumeCmd = "eat"
+  else
+    --TODO: we don't currently handle wands or staves here yet
+    dbot.warn("inv.consume.useItem: Unsupported item type \"" .. itemType .. "\"")
+    return DRL_RET_UNSUPPORTED
+  end -- if  
+
+  -- If the item isn't already in the main inventory, get it so that we can consume it!
+  if (inv.items.getField(objId, invFieldObjLoc) ~= invItemLocInventory) then
+    retval = inv.items.getItem(objId, commandArray)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("inv.consume.useItem: Failed to get item " .. objId .. ": " .. dbot.retval.getString(retval))
+      return retval
+    end -- if
+  end -- if
+
+  -- Consume the item and wait until we have confirmation the command executed
+  if (commandArray ~= nil) then
+    table.insert(commandArray, consumeCmd .. " " .. objId)
+
+    -- We don't want the next consume command to try to use the same item again and we also
+    -- don't want to wait for confirmation that we consumed it.  We might be in combat and have
+    -- lots of commands queued up on the mud server so delaying everything until we know we
+    -- consumed the item would take more overhead than we are willing to have.  If something goes
+    -- wrong (e.g., the user goes AFK unexpectedly) and we don't actually end up consuming the item
+    -- then we'll re-identify this item automagically on the next refresh so there isn't much harm done.
+    retval = inv.items.remove(objId) 
+  end -- if
+
+  return retval
+end -- inv.consume.useItem
+
+
+----------------------------------------------------------------------------------------------------
+--
+-- Module to manage portals
+--
+-- dinv portal use portalId
+--
+-- inv.portal.use(portalId)
+--
+----------------------------------------------------------------------------------------------------
+
+inv.portal = {}
+
+function inv.portal.use(portalId)
+
+  local origId, origLoc
+
+  local portalWish = dbot.wish.has("Portal")
+
+  portalId = tonumber(portalId) or "" 
+  if (portalId == nil) then
+    dbot.warn("inv.portal.use: Invalid portal ID parameter")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  -- If we have the portal wish, the new portal will go into the "portal" slot.  If we do not
+  -- have the portal wish, we will use the "held" slot.  This checks if anything is already at
+  -- the target location.  If something is there, remember what it is so that we can put it
+  -- back when we are done.
+  for objId, objInfo in pairs(inv.items.table) do
+    local currentLoc = inv.items.getField(objId, invFieldObjLoc) or ""
+
+    -- Check if we are holding a portal in either the "held" slot or the "portal" slot.  If we
+    -- have the portal wish, we have the portal slot; otherwise portals are in the held slot.
+    if ((currentLoc == inv.wearLoc[invWearableLocPortal]) and (portalWish == true)) or
+       ((currentLoc == inv.wearLoc[invWearableLocHeld])   and (portalWish == false)) then
+      origLoc = currentLoc
+      origId = objId
+      break
+    end -- if
+  end -- for
+
+  -- If the new portal is already at the target location, enter it and return success.  Easy peasy.
+  if (origId == portalId) then
+    return dbot.execute.fast.command("enter")
+  end -- if
+
+  -- Queue up several commands to use the portal and then send them to the mud in one burst.  This
+  -- is a bit more efficient than sending them one at a time and waiting for the result.
+  local commands = {}
+
+  -- If something is at the target location, move it to your main inventory
+  if (origId ~= nil) then
+    table.insert(commands, "remove " .. origId)
+  end -- if
+
+  -- Find the target portal.  If it is in a container, get it out of the container.
+  local objLoc = inv.items.getField(portalId, invFieldObjLoc) or ""
+  local objLocNum = tonumber(objLoc)
+  if (objLoc ~= invItemLocInventory) and (objLocNum ~= nil) then
+    table.insert(commands, "get " .. portalId .. " " .. objLocNum)
+  end -- if
+
+  -- We have the portal ready.  Hold it and go whoosh.
+  table.insert(commands, "hold " .. portalId)
+  table.insert(commands, "enter")
+  table.insert(commands, "remove " .. portalId)
+
+  -- If we were holding something at the beginning, hold it again now
+  if (origId ~= nil) then
+    table.insert(commands, "wear " .. origId .. " " .. origLoc)
+  end -- if
+
+  -- Put the portal away if we pulled it out of a container to use it here
+  if (objLoc ~= invItemLocInventory) and (objLocNum ~= nil) then
+    table.insert(commands, "put " .. portalId .. " " .. objLoc)
+  end -- if
+
+  return dbot.execute.safe.commands(commands, nil, nil, nil, nil)
+end -- inv.portal.use
+
+
+----------------------------------------------------------------------------------------------------
+--
+-- Module to manage saveable passes
+--
+-- Some areas require certain items to be in your main inventory in order to move through the
+-- area.  These items, which we will refer to as "passes", are not keys and are saveable.  For
+-- example, the area "Giant's Pet Store" requires an employee ID card as part of the process to
+-- get a set of keys.  The card is on a mob and we cannot (without botting) automatically kill
+-- the mob to get the ID card.
+--
+-- If a user has aquired a pass and stored it in a container, the "dinv pass" option provides
+-- automatic access to the pass whenever desired.  For example, a custom exit could call
+-- "dinv pass 12345678 3" to automagically grab the pass item with object ID 12345678 and put
+-- it in main inventory and then automagically put the pass item back into its home container
+-- after 3 seconds.
+--
+-- dinv pass [pass id or name] [# seconds]
+--
+-- inv.pass.use(passNameOrId, useTimeSec)
+--
+----------------------------------------------------------------------------------------------------
+
+inv.pass = {}
+
+function inv.pass.use(passNameOrId, useTimeSec)
+  if (passNameOrId == nil) or (passNameOrId == "") then
+    dbot.warn("inv.pass.use: Missing pass name")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  useTimeSec = tonumber(useTimeSec or "")
+  if (useTimeSec == nil) then
+    dbot.warn("inv.pass.use: useTimeSec parameter is not a number")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  -- Find anything that has an objectId or name matching the "passNameOrId" parameter and put it
+  -- in main inventory
+  local retval = inv.items.get("id " .. passNameOrId .. " || name " .. passNameOrId)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("inv.pass.use: Failed to get pass \"" .. passNameOrId .. "\": " ..
+              dbot.retval.getString(retval))
+    return retval
+  end -- if
+
+  -- Schedule a timer to put the pass away after the specified amount of time.  The inv.items.store()
+  -- function puts each specified item into the container that was most recently used to hold the item.
+  local storeCommand = "inv.items.store(\"" .. "id " .. passNameOrId .. " || name " .. passNameOrId .. "\")"
+  check (DoAfterSpecial(useTimeSec, storeCommand, sendto.script))
+
+  return retval
+end -- inv.pass.use
+
+
+
+--[[
+
+Durel's Bag-of-Tricks (dbot) Layout
+-----------------------------------
+
+dbot init     : Init / de-init code for the dbot package
+dbot generic  : Top-level generic utility functions (e.g., custom version of tonumber, etc.)
+dbot.retval   : Return values / error codes
+dbot.table    : Convenient functions to manage table accesses
+dbot.notify   : Message notification sub-system
+dbot.gmcp     : Character and world state access functions via the GMCP protocol
+dbot.storage  : Save and load data using persistent storage
+dbot.backup   : System to support backing up and restoring all plugin state
+dbot.emptyLine: Module to allow suppression of empty output lines
+dbot.prompt   : Module to transparently enable or disable the prompt and related output
+dbot.invmon   : Module to check if invmon is enabled
+dbot.ability  : Module to track if a character has access to a particular skill or spell
+dbot.wish     : Module to track which wishes a character has purchased
+dbot.pagesize : Module to determine a character's current page size (# lines before page prompt)
+dbot.execute  : Execute one or more commands without contention from user-entered commands
+dbot.callback : Module to help manage callback functions and parameters
+
+--]]
+
+
+----------------------------------------------------------------------------------------------------
+-- Base module
+----------------------------------------------------------------------------------------------------
+
+dbot = {}
+
+
+----------------------------------------------------------------------------------------------------
+-- Init / de-init routines for the dbot package
+--
+-- Some modules should be initialized at "install" time.  Others should be initialized only once
+-- the user is at the "active" state after a login.
+--
+-- Triggers, timers, and aliases most likely should be initialized at "install" time.
+--
+-- Loading state most likely should be done at "active" time (because we need the username to get
+-- the correct state and the username isn't available at install time)
+--
+-- dbot.init.atInstall()
+-- dbot.init.atActive()
+-- dbot.fini(doSaveState)
+--
+----------------------------------------------------------------------------------------------------
+
+dbot.init = {}
+
+dbot.init.initializedInstall = false
+dbot.init.initializedActive  = false
+
+-- storage should be first (to create state directories) and gmcp should be last (so we can save data)
+dbot.modules = "storage emptyLine backup notify ability prompt invmon wish execute pagesize gmcp"
+
+
+function dbot.init.atInstall()
+  local retval = DRL_RET_SUCCESS
+
+  -- Loop through all of the dbot modules that need to be initialized at "install" time and then call
+  -- the init functions of those modules
+  for module in dbot.modules:gmatch("%S+") do
+    if (dbot[module].init.atInstall ~= nil) then
+      local initVal = dbot[module].init.atInstall()
+      if (initVal ~= DRL_RET_SUCCESS) then
+        dbot.warn("dbot.init.atInstall: Failed to initialize \"at install\" dbot." .. module .. " module: " .. 
+                  dbot.retval.getString(initVal))
+        retval = initVal
+      else
+        dbot.debug("Initialized \"at install\" module dbot." .. module)
+      end -- if
+    end -- if
+
+  end -- for
+
+  -- Return success or the most recently encountered init error
+  return retval
+end -- dbot.init.atInstall
+
+
+function dbot.init.atActive()
+  local retval = DRL_RET_SUCCESS
+
+  -- Loop through all of the dbot modules that need to be initialized when the user is at the "active"
+  -- state and call those modules' init functions
+  for module in dbot.modules:gmatch("%S+") do
+    if (dbot[module].init.atActive ~= nil) then
+      local initVal = dbot[module].init.atActive()
+      if (initVal ~= DRL_RET_SUCCESS) then
+        dbot.warn("dbot.init.atActive: Failed to initialize \"at active\" dbot." .. module .. " module: " .. 
+                  dbot.retval.getString(initVal))
+        retval = initVal
+      else
+        dbot.debug("Initialized \"at active\" module dbot." .. module)
+      end -- if
+    end -- if
+  end -- for
+
+  -- Return success or the most recently encountered init error
+  return retval
+end -- dbot.init.atActive
+
+
+function dbot.fini(doSaveState)
+  local retval = DRL_RET_SUCCESS
+
+  -- Loop through all of the dbot modules and call their de-init functions
+  for module in dbot.modules:gmatch("%S+") do
+    if (dbot[module].fini ~= nil) then
+      local initVal = dbot[module].fini(doSaveState)
+      if (initVal ~= DRL_RET_SUCCESS) then
+        dbot.warn("dbot.fini: Failed to de-initialize dbot." .. module .. " module: " .. 
+                  dbot.retval.getString(initVal))
+        retval = initVal
+      else
+        dbot.debug("De-initialized dbot module \"" .. module .. "\"")
+      end -- if
+
+      dbot.debug("De-initialized module dbot." .. module)
+    end -- if
+  end -- for
+
+  dbot.init.initializedInstall = false
+  dbot.init.initializedActive  = false
+
+  return retval
+end -- dbot.fini
+
+
+----------------------------------------------------------------------------------------------------
+-- dbot.print: Basic print function that supports color codes
+--
+-- This accepts strings that include aard, xterm, and ANSI color codes
+--
+-- Examples:
+--   "@Wthis is white"
+--   DRL_ANSI_RED .. "this is red"
+--   DRL_XTERM_YELLOW .. "this is yellow"
+----------------------------------------------------------------------------------------------------
+
+function dbot.print(string)
+  -- Only print the string to the output if we are not in the middle of writing a note.  If GMCP
+  -- isn't initialized yet, assume that we aren't writing a note and display the message.
+  if (dbot.gmcp.isInitialized == false) or (dbot.gmcp.getState() ~= dbot.stateNote) then
+    AnsiNote(stylesToANSI(ColoursToStyles(string)))
+  end -- if
+end -- dbot.print
+
+
+----------------------------------------------------------------------------------------------------
+-- dbot.getTime returns the native time in seconds
+----------------------------------------------------------------------------------------------------
+
+function dbot.getTime()
+  return tonumber(os.time()) or 0
+end -- dbot.getTime
+
+
+----------------------------------------------------------------------------------------------------
+-- dbot.tonumber: version of tonumber that strips out commas from a number
+----------------------------------------------------------------------------------------------------
+
+function dbot.tonumber(numString)
+  noCommas = string.gsub(numString, ",", "")
+  return tonumber(noCommas)
+end -- dbot.tonumber
+
+
+----------------------------------------------------------------------------------------------------
+-- dbot.isWordInString: Returns boolean indicating if the word (separated by spaces) in in the
+--                      specified string
+----------------------------------------------------------------------------------------------------
+
+function dbot.isWordInString(word, field)
+  if (word == nil) or (word == "") or (field == nil) or (field == "") then
+    return false
+  end -- if
+
+  for element in field:gmatch("%S+") do
+    if (string.lower(word) == string.lower(element)) then
+      return true
+    end -- if
+  end -- for
+
+  return false
+end -- dbot.isWordInString
+
+
+----------------------------------------------------------------------------------------------------
+-- dbot.mergeFields: Returns a string containing all of the unique words in the two input parameters
+--
+-- For example: merging "hello world" and "goodbye world" would yield "hello world goodbye"
+----------------------------------------------------------------------------------------------------
+
+function dbot.mergeFields(field1, field2)
+  local mergedField = field1 or ""
+
+  if (field2 ~= nil) and (field2 ~= "") then
+    for word in field2:gmatch("%S+") do
+      if (not dbot.isWordInString(word, field1)) then
+        mergedField = mergedField .. " " .. word
+      end -- if
+    end -- for
+  end -- if
+
+  return mergedField
+end -- dbot.mergeFields
+    
+
+----------------------------------------------------------------------------------------------------
+-- dbot.deleteTrigger: Wrapper around DeleteTrigger that checks the mush error codes
+----------------------------------------------------------------------------------------------------
+
+function dbot.deleteTrigger(name)
+  local retval = DRL_RET_SUCCESS
+
+  if (name == nil) or (name == "") then
+    dbot.warn("dbot.deleteTrigger: Attempted to delete a trigger missing a name")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  local mushRetval = IsTrigger(name)
+  if (mushRetval == error_code.eOK) then
+    check (DeleteTrigger(name))
+    retval = DRL_RET_SUCCESS
+
+  elseif (mushRetval == error_code.eTriggerNotFound) then
+    -- We don't consider it an error if we try to delete a trigger that isn't instantiated.  Our
+    -- de-init code tries to whack all triggers without checking if they exist or not.
+    retval = DRL_RET_SUCCESS
+
+  elseif (mushRetval == error_code.eInvalidObjectLabel) then
+    dbot.warn("dbot.deleteTrigger: Failed to delete trigger: trigger name \"" .. name ..
+              "\" isn't a valid label")
+    retval = DRL_RET_INVALID_PARAM
+
+  else
+    dbot.warn("dbot.deleteTrigger: Detected unknown error code " .. mushRetval)
+    retval = DRL_RET_INTERNAL_ERROR
+  end -- if
+
+  return retval
+end -- dbot.deleteTrigger
+
+
+----------------------------------------------------------------------------------------------------
+-- dbot.deleteTimer: Wrapper around DeleteTimer that checks the mush error codes
+----------------------------------------------------------------------------------------------------
+
+function dbot.deleteTimer(name)
+  local retval = DRL_RET_SUCCESS
+
+  if (name == nil) or (name == "") then
+    dbot.warn("dbot.deleteTimer: Attempted to delete a timer missing a name")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  local mushRetval = IsTimer(name)
+  if (mushRetval == error_code.eOK) then
+    DeleteTimer(name)
+    retval = DRL_RET_SUCCESS
+
+  elseif (mushRetval == error_code.eTimerNotFound) then
+    -- We don't consider it an error if we try to delete a timer that isn't instantiated.  Our
+    -- de-init code tries to whack all timers without checking if they exist or not.
+    retval = DRL_RET_SUCCESS
+
+  elseif (mushRetval == error_code.eInvalidObjectLabel) then
+    dbot.warn("dbot.deleteTimer: Failed to delete timer: timer name \"" .. name .. "\" isn't a valid label")
+    retval = DRL_RET_INVALID_PARAM
+
+  else
+    dbot.warn("dbot.deleteTimer: Detected unknown error code " .. mushRetval)
+    retval = DRL_RET_INTERNAL_ERROR
+  end -- if
+
+  return retval
+end -- dbot.deleteTimer
+
+
+----------------------------------------------------------------------------------------------------
+-- dbot.normalizeMobName strips out prefix articles from a mob's name
+----------------------------------------------------------------------------------------------------
+
+function dbot.normalizeMobName(fullMobName)
+
+  mobName = fullMobName
+  mobName = mobName:gsub("^a (.-)$", "%1")
+  mobName = mobName:gsub("^A (.-)$", "%1")
+  mobName = mobName:gsub("^an (.-)$", "%1")
+  mobName = mobName:gsub("^An (.-)$", "%1")
+  mobName = mobName:gsub("^the (.-)$", "%1")
+  mobName = mobName:gsub("^The (.-)$", "%1")
+  mobName = mobName:gsub("^some (.-)$", "%1")
+  mobName = mobName:gsub("^Some (.-)$", "%1")
+
+  -- These are convenient hacks for common mobs
+  mobName = mobName:gsub("^.*soul of (.-)$", "%1") -- Silver Volcano
+  mobName = mobName:gsub("^(.-) sea snake$", "%1") -- Woobleville
+
+  return mobName
+end -- normalizeMobName
+
+
+----------------------------------------------------------------------------------------------------
+-- dbot.retval: Return values (AKA error codes)
+--
+-- Functions:
+--   dbot.retval.getString(retval)
+--
+-- Data:
+--   dbot.retval.table  -- this is an in-memory static table that is not saved to persistent storage
+----------------------------------------------------------------------------------------------------
+
+DRL_RET_SUCCESS        =  0
+DRL_RET_UNINITIALIZED  = -1
+DRL_RET_INVALID_PARAM  = -2
+DRL_RET_MISSING_ENTRY  = -3
+DRL_RET_BUSY           = -4
+DRL_RET_UNSUPPORTED    = -5
+DRL_RET_TIMEOUT        = -6
+DRL_RET_HALTED         = -7
+DRL_RET_INTERNAL_ERROR = -8
+DRL_RET_UNIDENTIFIED   = -9
+DRL_RET_NOT_ACTIVE     = -10
+DRL_RET_IN_COMBAT      = -11
+
+
+dbot.retval = {}
+dbot.retval.table = {}
+dbot.retval.table[DRL_RET_SUCCESS]        = "success"
+dbot.retval.table[DRL_RET_UNINITIALIZED]  = "component is not initialized"
+dbot.retval.table[DRL_RET_INVALID_PARAM]  = "invalid parameter"
+dbot.retval.table[DRL_RET_MISSING_ENTRY]  = "missing entry"
+dbot.retval.table[DRL_RET_BUSY]           = "resource is in use"
+dbot.retval.table[DRL_RET_UNSUPPORTED]    = "unsupported feature"
+dbot.retval.table[DRL_RET_TIMEOUT]        = "timeout"
+dbot.retval.table[DRL_RET_HALTED]         = "component is halted"
+dbot.retval.table[DRL_RET_INTERNAL_ERROR] = "internal error"
+dbot.retval.table[DRL_RET_UNIDENTIFIED]   = "item is not yet identified"
+dbot.retval.table[DRL_RET_NOT_ACTIVE]     = "you are not in the active state"
+dbot.retval.table[DRL_RET_IN_COMBAT]      = "you are in combat!"
+
+
+function dbot.retval.getString(retval)
+  local string = dbot.retval.table[retval]
+
+  if (string == nil) then
+    string = "Unknown return value"
+  end -- if
+
+  return string
+end -- dbot.retval.getString
+
+
+----------------------------------------------------------------------------------------------------
+-- dbot.table.getCopy(origTable)
+--   Returns a copy of the original table
+--   Derived from: http://lua-users.org/wiki/CopyTable
+----------------------------------------------------------------------------------------------------
+
+dbot.table = {}
+function dbot.table.getCopy(origItem)
+  local newItem
+
+  if type(origItem) == 'table' then
+    newItem = {}
+
+    for origKey, origValue in next, origItem, nil do
+      newItem[dbot.table.getCopy(origKey)] = dbot.table.getCopy(origValue)
+    end -- for
+    setmetatable(newItem, dbot.table.getCopy(getmetatable(origItem)))
+  else
+    newItem = origItem
+  end -- if
+
+  return newItem
+end -- dbot.table.getCopy
+
+
+----------------------------------------------------------------------------------------------------
+-- We can't use #someTable to get the number of entries in it like we can do for an array.
+-- This function counts the number of entries in a table and returns the count.
+----------------------------------------------------------------------------------------------------
+
+function dbot.table.getNumEntries(theTable)
+  local numEntries = 0
+
+  if (theTable ~= nil) then
+    for k,v in pairs(theTable) do
+      numEntries = numEntries + 1
+    end -- for
+  end -- if
+
+  return numEntries
+end -- dbot.table.getNumEntries
+
+
+----------------------------------------------------------------------------------------------------
+-- Baseline trigger flags
+----------------------------------------------------------------------------------------------------
+
+drlTriggerFlagsBaseline = trigger_flag.Enabled + trigger_flag.RegularExpression + trigger_flag.Replace
+
+
+----------------------------------------------------------------------------------------------------
+-- Spin-loops are common.  This is the default time period to sleep after each loop.
+----------------------------------------------------------------------------------------------------
+
+drlSpinnerPeriodDefault = 0.1
+
+
+----------------------------------------------------------------------------------------------------
+-- dbot: Color code definitions
+----------------------------------------------------------------------------------------------------
+
+DRL_COLOR_GREEN  = "46"
+DRL_COLOR_RED    = "160"
+DRL_COLOR_YELLOW = "226"
+DRL_COLOR_WHITE  = "231"
+DRL_COLOR_GREY   = "255"
+
+DRL_XTERM_GREEN  = "@x" .. DRL_COLOR_GREEN
+DRL_XTERM_RED    = "@x" .. DRL_COLOR_RED
+DRL_XTERM_YELLOW = "@x" .. DRL_COLOR_YELLOW
+DRL_XTERM_WHITE  = "@x" .. DRL_COLOR_WHITE
+DRL_XTERM_GREY   = "@x" .. DRL_COLOR_GREY
+
+-- Older versions of mush severely broke color codes.  This gives a work-around for those versions.
+drlMushClientVersion = tonumber(Version() or "")
+if (drlMushClientVersion ~= nil) and (drlMushClientVersion < 5.06) then
+  DRL_ANSI_GREEN  = ANSI(DRL_COLOR_GREEN)
+  DRL_ANSI_RED    = ANSI(DRL_COLOR_RED)
+  DRL_ANSI_YELLOW = ANSI(DRL_COLOR_YELLOW)
+  DRL_ANSI_WHITE  = ANSI(DRL_COLOR_WHITE)
+else
+  -- TODO: Yes, these aren't really ANSI color codes but it make the rest of the code compatible
+  --       with the ANSI work-arounds.  At some point, I'd love to stop supporting old 4.x 
+  --       mush builds and then we could remove all of the ANSI color references in this plugin.
+  DRL_ANSI_GREEN  = "@G"
+  DRL_ANSI_RED    = "@R"
+  DRL_ANSI_YELLOW = "@Y"
+  DRL_ANSI_WHITE  = "@W"
+end -- if
+
+----------------------------------------------------------------------------------------------------
+-- Plugin info fields used by GetPluginInfo()
+----------------------------------------------------------------------------------------------------
+
+dbot.pluginInfo = {}
+dbot.pluginInfo.dir = 20
+-- TODO: add other pluginInfo fields
+
+
+----------------------------------------------------------------------------------------------------
+-- Notification Module
+--
+-- This provides wrapper functions to print various notification messages.  If we are in "Note" 
+-- mode (i.e., we are writing a note) we suppress all of these notifications.  Otherwise, we
+-- print all warnings and errors and any debug, note, and info messages that are above the
+-- user-supplied threshold.  This lets a user change the verbosity of the plugin at runtime.  If
+-- a problem is happening, they could enable everything including debug messages.  Once they are
+-- comfortable with the plugin, they could suppress lower-priority messages and only leave the
+-- highest priority notifications enabled.  If they are particularly brave, they could disable
+-- all optional messages and only leave warnings and errors on.
+--
+-- dbot.notify.init.atActive()
+-- dbot.notify.fini(doSaveState)
+--
+-- dbot.notify.save()
+-- dbot.notify.load()
+-- dbot.notify.reset()
+--
+-- dbot.notify.msg
+-- dbot.notify.getLevel
+-- dbot.notify.setLevel(value, endTag, isVerbose)
+--
+-- dbot.debug
+-- dbot.note
+-- dbot.info
+-- dbot.warn
+-- dbot.error
+--
+----------------------------------------------------------------------------------------------------
+
+dbot.notify        = {}
+dbot.notify.init   = {}
+dbot.notify.prefix = pluginNameAbbr
+
+dbot.notify.name = "dbot-notify.state"
+
+drlDbotNotifyUserLevelNone     = "none"
+drlDbotNotifyUserLevelLight    = "light"
+drlDbotNotifyUserLevelStandard = "standard"
+drlDbotNotifyUserLevelAll      = "all"
+
+notifyLevelDefault = drlDbotNotifyUserLevelStandard
+
+notifyLevelDebug = "DEBUG"
+notifyLevelNote  = "NOTE"
+notifyLevelInfo  = "INFO"
+notifyLevelWarn  = "WARN"
+notifyLevelError = "ERROR"
+
+dbot.notify.level = {}
+dbot.notify.level[notifyLevelDebug] = { enabled = false, bg = "black", fg = "orange" }
+dbot.notify.level[notifyLevelNote]  = { enabled = true,  bg = "white", fg = "green"  }
+dbot.notify.level[notifyLevelInfo]  = { enabled = true,  bg = "white", fg = "blue"   }
+dbot.notify.level[notifyLevelWarn]  = { enabled = true,  bg = "black", fg = "yellow" }
+dbot.notify.level[notifyLevelError] = { enabled = true,  bg = "white", fg = "red"    }
+
+
+function dbot.notify.init.atActive()
+  local retval
+
+  retval = dbot.notify.load()
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("dbot.notify.init.atActive: Failed to load notify data from storage: " ..
+              dbot.retval.getString(retval))
+  end -- if
+
+  retval = dbot.notify.setLevel(dbot.notify.table.notifyLevel, nil, false)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("dbot.notify.init.atActive: Failed to set notify level from storage: " ..
+              dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+end -- dbot.notify.init.atActive
+
+
+function dbot.notify.fini(doSaveState)
+  local retval = DRL_RET_SUCCESS
+
+  if (doSaveState) then
+    retval = dbot.notify.save()
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("dbot.notify.fini: Failed to save notify data to storage: " .. dbot.retval.getString(retval))
+    end -- if
+  end -- if
+
+  return retval
+end -- dbot.notify.fini
+
+
+function dbot.notify.save()
+  if (dbot.notify.table == nil) then
+    return dbot.notify.reset()
+  end -- if
+
+  local retval = dbot.storage.saveTable(dbot.backup.getCurrentDir() .. dbot.notify.name,
+                                        "dbot.notify.table", dbot.notify.table, true)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("dbot.notify.save: Failed to save notify table: " .. dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+end -- dbot.notify.save
+
+
+function dbot.notify.load()
+  local retval = dbot.storage.loadTable(dbot.backup.getCurrentDir() .. dbot.notify.name, dbot.notify.reset)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("dbot.notify.load: Failed to load table from file \"@R" .. 
+              dbot.backup.getCurrentDir() .. dbot.notify.name .. "@W\": " .. dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+end -- dbot.notify.load
+
+
+function dbot.notify.reset()
+  dbot.notify.table = { notifyLevel = notifyLevelDefault }
+
+  -- We handle saving dbot.module state a little differently than other modules.  Most modules can
+  -- check if dbot.init.initializeActive is true before saving state, but dbot modules don't have that
+  -- luxury because we may need to reset something before we are fully initialized.  Instead, we use
+  -- the "doForceSave" parameter of dbot.storage.saveTable() to explicitly force saving state on a
+  -- reset.  We don't use that parameter on a normal dbot.notify.save() call.
+  local retval = dbot.storage.saveTable(dbot.backup.getCurrentDir() .. dbot.notify.name,
+                                        "dbot.notify.table", dbot.notify.table, true)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("dbot.notify.reset: Failed to save notification data: " .. dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+end -- dbot.notify.reset
+
+
+function dbot.notify.setLevel(value, endTag, isVerbose)
+
+  if (value == drlDbotNotifyUserLevelNone) then
+    dbot.notify.level[notifyLevelDebug].enabled = false
+    dbot.notify.level[notifyLevelNote].enabled  = false
+    dbot.notify.level[notifyLevelInfo].enabled  = false
+
+  elseif (value == drlDbotNotifyUserLevelLight) then
+    dbot.notify.level[notifyLevelDebug].enabled = false
+    dbot.notify.level[notifyLevelNote].enabled  = false
+    dbot.notify.level[notifyLevelInfo].enabled  = true
+
+  elseif (value == drlDbotNotifyUserLevelStandard) then
+    dbot.notify.level[notifyLevelDebug].enabled = false
+    dbot.notify.level[notifyLevelNote].enabled  = true
+    dbot.notify.level[notifyLevelInfo].enabled  = true
+
+  elseif (value == drlDbotNotifyUserLevelAll) then
+    dbot.notify.level[notifyLevelDebug].enabled = true
+    dbot.notify.level[notifyLevelNote].enabled  = true
+    dbot.notify.level[notifyLevelInfo].enabled  = true
+
+  else
+    dbot.warn("dbot.notify.setLevel: invalid value parameter")
+    return inv.tags.stop(invTagsNotify, endTag, DRL_RET_INVALID_PARAM)
+  end -- if
+
+  if (isVerbose) then
+    dbot.info("Set notification level to \"@C" .. value .. "@W\"")
+  end -- if
+
+  dbot.notify.table.notifyLevel = value
+  dbot.notify.save()
+
+  return inv.tags.stop(invTagsNotify, endTag, DRL_RET_SUCCESS)
+end -- dbot.notify.setLevel
+
+
+function dbot.notify.getLevel()
+  return dbot.notify.table.notifyLevel
+end -- dbot.notify.getLevel
+
+
+function dbot.notify.msg(level, msg)
+  if (level == nil) or (level == "") then
+    dbot.warn("dbot.notify.msg: missing level")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  if (dbot.notify.level[level] == nil) then
+    dbot.warn("dbot.notify.msg: level \"" .. level .. "\" is not supported")
+    return DRL_RET_UNSUPPORTED
+  end -- if
+
+  msg = msg or ""
+
+  if (dbot.notify.level[level].enabled) then
+
+    -- Suppress messages if we are writing a note
+    if dbot.gmcp.isInitialized and (dbot.gmcp.getState() == dbot.stateNote) then
+      return DRL_RET_BUSY
+    end -- if
+
+    ColourTell(dbot.notify.level[level].bg, dbot.notify.level[level].fg, dbot.notify.prefix) 
+    dbot.print("@W " .. msg .. "@w")
+  end -- if
+
+  return DRL_RET_SUCCESS
+end -- dbot.notify.msg
+
+
+function dbot.debug(msg)
+  return dbot.notify.msg(notifyLevelDebug, msg)
+end -- dbot.debug
+
+
+function dbot.note(msg)
+  return dbot.notify.msg(notifyLevelNote, msg)
+end -- dbot.note
+
+
+function dbot.info(msg)
+  return dbot.notify.msg(notifyLevelInfo, msg)
+end -- dbot.info
+
+
+function dbot.warn(msg)
+  return dbot.notify.msg(notifyLevelWarn, msg)
+end -- dbot.warn
+
+
+function dbot.error(msg)
+  return dbot.notify.msg(notifyLevelError, msg)
+end -- dbot.error
+
+
+----------------------------------------------------------------------------------------------------
+--
+-- Module to access live data via the GMCP protocol
+--
+--  dbot.gmcp.init.atActive
+--  dbot.gmcp.fini
+--
+--  dbot.gmcp.getState
+--  dbot.gmcp.getStateString
+--
+--  dbot.gmcp.getArea
+--  dbot.gmcp.getClass
+--  dbot.gmcp.getLevel
+--  dbot.gmcp.getRoomId
+--  dbot.gmcp.getTier
+--
+--  dbot.gmcp.isInCombat
+--
+----------------------------------------------------------------------------------------------------
+
+dbot.gmcp      = {}
+dbot.gmcp.init = {}
+
+dbot.gmcp.isInitialized = false  -- initialized when OnPluginBroadcast detects a GMCP message
+
+dbot.stateLogin    = "1"
+dbot.stateMOTD     = "2" 
+dbot.stateActive   = "3"
+dbot.stateAFK      = "4" 
+dbot.stateNote     = "5"
+dbot.stateBuilding = "6"
+dbot.statePaged    = "7"
+dbot.stateCombat   = "8"
+dbot.stateSleeping = "9"
+dbot.stateTBD      = "10" -- not defined in the docs
+dbot.stateResting  = "11"
+dbot.stateRunning  = "12"
+
+dbot.stateNames = {}
+dbot.stateNames[dbot.stateLogin]    = "Login"
+dbot.stateNames[dbot.stateMOTD]     = "MOTD"
+dbot.stateNames[dbot.stateActive]   = "Active"
+dbot.stateNames[dbot.stateAFK]      = "AFK"
+dbot.stateNames[dbot.stateNote]     = "Note"
+dbot.stateNames[dbot.stateBuilding] = "Building"
+dbot.stateNames[dbot.statePaged]    = "Paged"
+dbot.stateNames[dbot.stateCombat]   = "Combat"
+dbot.stateNames[dbot.stateSleeping] = "Sleeping"
+dbot.stateNames[dbot.stateTBD]      = "Uninitialized"
+dbot.stateNames[dbot.stateResting]  = "Resting"
+dbot.stateNames[dbot.stateRunning]  = "Running"
+
+
+function dbot.gmcp.init.atActive()
+  local retval = DRL_RET_SUCCESS
+
+  -- Placeholder: nothing to do for now...
+
+  return retval
+end -- dbot.gmcp.init.atActive
+
+
+function dbot.gmcp.fini(doSaveState)
+  local retval = DRL_RET_SUCCESS
+
+  dbot.gmcp.isInitialized = false
+
+  -- Note: we don't use doSaveState yet because this module doesn't have state to save
+
+  return retval
+end -- dbot.gmcp.fini
+
+
+function dbot.gmcp.getState()
+  local charStatus
+
+  if dbot.gmcp.isInitialized then
+    charStatus = gmcp("char.status")
+  else
+    dbot.debug("dbot.gmcp.getState: GMCP is not initialized")
+  end -- if
+
+  if (charStatus == nil) then
+    return dbot.stateTBD
+  else
+    -- dbot.showStateString(charStatus.state) 
+    return charStatus.state
+  end -- if
+end -- dbot.gmcp.getState
+
+
+function dbot.gmcp.getStateString(state)
+  return (dbot.stateNames[state] or "Unknown")
+end -- dbot.gmcp.getStateString
+
+
+function dbot.gmcp.getArea()
+  local roomInfo
+  local area
+
+  if dbot.gmcp.isInitialized then
+    roomInfo = gmcp("room.info")
+    area = roomInfo.zone
+  else
+    dbot.note("dbot.gmcp.getArea: GMCP is not initialized")
+  end -- if
+
+  dbot.debug("dbot.gmcp.getArea returns " .. (area or "nil"))
+  return area
+end -- dbot.gmcp.getArea
+
+
+function dbot.gmcp.getClass()
+  local char, class, subclass
+
+  if dbot.gmcp.isInitialized then
+    char = gmcp("char.base")
+    class = char.class
+    subclass = char.subclass
+  else
+    dbot.note("dbot.gmcp.getClass: GMCP is not initialized")
+  end -- if
+
+  return class, subclass
+end -- dbot.gmcp.getClass
+
+
+dbot.gmcp.charName = "unknown"
+dbot.gmcp.charPretitle = "unknown"
+function dbot.gmcp.getName()
+  local char
+
+  if dbot.gmcp.isInitialized then
+    char = gmcp("char.base")
+    dbot.gmcp.charName = char.name
+    dbot.gmcp.charPretitle = char.pretitle
+  else
+    dbot.debug("dbot.gmcp.getName: GMCP is not initialized")
+  end -- if
+
+  return dbot.gmcp.charName, dbot.gmcp.charPretitle
+end -- dbot.gmcp.getClass
+
+
+function dbot.gmcp.getLevel()
+  local charStatus, myLevel
+
+  if dbot.gmcp.isInitialized then
+    charStatus = gmcp("char.status")
+    myLevel = tonumber(charStatus.level) + (dbot.gmcp.getTier() * 10)
+  else
+    dbot.note("dbot.gmcp.getLevel: GMCP is not initialized")
+    myLevel = 1
+  end -- if
+
+  dbot.debug("dbot.gmcp.getLevel returns " .. myLevel)
+  return myLevel
+
+end -- dbot.gmcp.getLevel
+
+
+function dbot.gmcp.getRoomId()
+  local roomInfo, roomId
+
+  if dbot.gmcp.isInitialized then
+    roomInfo = gmcp("room.info")
+    roomId = roomInfo.num
+  else
+    dbot.note("dbot.gmcp.getRoomId: GMCP is not initialized")
+    roomId = 0
+  end -- if
+
+  dbot.debug("dbot.gmcp.getRoomId returns " .. roomId)
+  return roomId
+end -- dbot.gmcp.getRoomId
+
+
+function dbot.gmcp.getTier()
+  local charBase, myTier
+
+  if dbot.gmcp.isInitialized then
+    charBase = gmcp("char.base")
+    myTier = tonumber(charBase.tier)
+  else
+    dbot.note("dbot.gmcp.getTier: GMCP is not initialized")
+    myTier = 0
+  end -- if
+
+  dbot.debug("dbot.gmcp.getTier returns " .. myTier)
+  return myTier
+
+end -- dbot.gmcp.getTier
+
+
+function dbot.gmcp.isInCombat()
+  local isInCombat = (dbot.gmcp.getState() == dbot.stateCombat)
+
+  if (isInCombat) then
+    dbot.debug("dbot.isInCombat(): You are in combat!")
+  end -- if
+
+  return isInCombat
+end -- dbot.gmcp.isInCombat()
+
+
+----------------------------------------------------------------------------------------------------
+-- Module to manage loading and saving data to persistent storage
+----------------------------------------------------------------------------------------------------
+--
+-- Functions:
+--   dbot.storage.init.atActive()
+--   dbot.storage.fini(doSaveState)
+--
+--   dbot.storage.flush() -- Saves mushclient world or plugin state
+--
+--   dbot.storage.saveTable(fileName, tableName, theTable)
+--   dbot.storage.loadTable(fileName, resetFn)
+--
+----------------------------------------------------------------------------------------------------
+
+dbot.storage      = {} 
+dbot.storage.init = {}
+
+dbot.storage.fileVersion = 1
+dbot.storage.hashChars   = (2 * 20) -- utils.hash uses a 160-bit (20 byte) hash w/ 2 hex chars per byte
+
+function dbot.storage.init.atActive()
+
+  -- Create directories for our state if they do not yet exist
+  assert(os.execute("if not exist \"" .. pluginStatePath .. "\" mkdir " .. pluginStatePath .. " > nul"),
+         "dbot.backup.init.atActive: Failed to create plugin state directory \"" .. pluginStatePath .. "\"")
+
+  local baseDir = dbot.backup.getBaseDir()
+  dbot.debug("dbot.backup.init.atActive: baseDir=\"" .. baseDir .. "\"")
+  assert(os.execute("if not exist \"" .. baseDir .. "\" mkdir " .. baseDir .. " > nul"),
+         "dbot.backup.init.atActive: Failed to create character-specific state directory \"" .. baseDir .. "\"")
+
+  local currentDir = dbot.backup.getCurrentDir()
+  dbot.debug("dbot.backup.init.atActive: currentDir=\"" .. currentDir .. "\"")
+  assert(os.execute("if not exist \"" .. currentDir .. "\" mkdir " .. currentDir .. " > nul"),
+         "dbot.backup.init.atActive: Failed to create current state directory \"" .. currentDir .. "\"")
+
+  return DRL_RET_SUCCESS
+
+end -- dbot.storage.init.atActive
+
+
+function dbot.storage.fini(doSaveState)
+  -- Placeholder: nothing to clean up here yet
+
+  return DRL_RET_SUCCESS
+end -- dbot.storage.fini
+
+
+-- Save all of our state to disk.  The modules all have xyz.save() functions to update their variables.
+-- We just need to flush the state out to disk.
+function dbot.storage.flush()
+
+  local isInPlugin = true
+
+  local pluginName = GetPluginName()
+  if (pluginName == "") then
+    isInPlugin = false
+  end -- if
+
+  if (isInPlugin) then
+    SaveState()
+  else
+    Save("")
+  end -- if
+
+  return DRL_RET_SUCCESS
+end -- dbot.storage.flush
+
+
+function dbot.storage.saveTable(fileName, tableName, theTable, doForceSave)
+  local retval = DRL_RET_SUCCESS
+
+  if (not dbot.init.initializedActive) and (not doForceSave) then
+    dbot.info("Skipping save for \"" .. (tableName or "Unknown") .. "\" table: plugin is not initialized")
+    dbot.info("Are you AFK?  You must be in the active state to complete initialization.")
+    return DRL_RET_UNINITIALIZED
+  end -- if
+
+  if (fileName == nil) or (fileName == "") then
+    dbot.warn("dbot.storage.saveTable: Missing fileName parameter")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  if (tableName == nil) or (tableName == "") then
+    dbot.warn("dbot.storage.saveTable: Missing tableName parameter")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  if (theTable == nil) then
+    dbot.warn("dbot.storage.saveTable: Missing table parameter")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  local shortName = string.gsub(fileName, ".*\\", "")
+  --dbot.debug("dbot.storage.saveTable: Saving \"@G" .. shortName .. "@W\"")
+
+  local fileData = "\n" .. serialize.save(tableName, theTable) 
+  local fileHash = utils.hash((fileData or "") .. dbot.storage.fileVersion)
+
+  local f = assert(io.open(fileName, "w+"))
+
+  assert(f:write(dbot.storage.fileVersion .. "\n", fileHash, fileData))
+  assert(f:flush())
+  assert(f:close())
+
+  return retval
+end -- dbot.storage.saveTable
+
+
+function dbot.storage.loadTable(fileName, resetFn)
+  local retval = DRL_RET_SUCCESS
+
+  if (fileName == nil) or (fileName == "") or (resetFn == nil) then
+    dbot.warn("dbot.storage.loadTable: Missing parameter")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  local shortName = string.gsub(fileName, ".*\\", "")
+  dbot.debug("dbot.storage.loadTable: Loading \"@G" .. shortName .. "@W\"")
+
+  local f = io.open(fileName, "r")
+  if (f ~= nil) then
+    local fileVersion, fileHash, savedState = assert(f:read("*l", dbot.storage.hashChars, "*a"))
+    if (fileHash ~= utils.hash((savedState or "") .. fileVersion)) then
+      dbot.error("dbot.storage.loadTable: failed to load table from file \"@R" .. fileName ..
+                 "@W\": file is corrupted -- see \"dinv help backup\" to restore from a backup)")
+      resetFn()
+      return DRL_RET_INTERNAL_ERROR
+    end -- if
+
+    -- This is a placeholder for if/when we ever change the format of our saved state files
+    if (tonumber(fileVersion or "") ~= tonumber(dbot.storage.fileVersion or "")) then
+      dbot.error("File \"@G" .. fileName .. "@W\" uses an old file format")
+      return DRL_RET_UNSUPPORTED
+    end -- if
+
+    loadstring(savedState)()
+    assert(f:close())
+  else
+    retval = resetFn()
+  end -- if
+
+  return retval
+end -- dbot.storage.loadTable
+
+
+----------------------------------------------------------------------------------------------------
+-- Module to handle saving and backing up state
+----------------------------------------------------------------------------------------------------
+--
+-- dinv backup [list | create | delete | restore] [name]
+--
+-- Directory layout
+--   dinv-[pluginId]/charname
+--     current
+--     backups
+--       auto1-[date]
+--       auto2-[date]
+--       auto3-[date]
+--       auto4-[date]
+--       [name]-[date]
+--
+-- Functions:
+--  dbot.backup.init.atActive()
+--  dbot.backup.fini(doSaveState)
+--
+--  dbot.backup.getBaseDir()
+--  dbot.backup.getCharDir()
+--  dbot.backup.getCurrentDir()
+--  dbot.backup.getBackupDir()
+--
+--  dbot.backup.getBackups() -- returns list of backup dir names
+--  dbot.backup.getFile(name)
+--
+--  dbot.backup.current()    -- if auto1-date ~= current date, rotates current and the "autoN" backups
+--
+--  dbot.backup.list(endTag)
+--  dbot.backup.create(name, endTag)
+--  dbot.backup.delete(name, endTag, isQuiet)
+--  dbot.backup.restore(name, endTag)
+--
+--  dbot.backup.timer
+
+----------------------------------------------------------------------------------------------------
+
+dbot.backup      = {}
+dbot.backup.init = {}
+
+dbot.backup.timer = {}
+dbot.backup.timer.name = "drlInvBackupTimer"
+dbot.backup.timer.hour = 4
+dbot.backup.timer.min  = 0
+dbot.backup.timer.sec  = 30
+
+
+function dbot.backup.init.atActive()
+  local retval = DRL_RET_SUCCESS
+
+  local backupDir = dbot.backup.getBackupDir()
+  dbot.debug("dbot.backup.init.atActive: backupDir=\"" .. backupDir .. "\"")
+  assert(os.execute("if not exist \"" .. backupDir .. "\" mkdir " .. backupDir .. " > nul"),
+         "dbot.backup.init.atActive: Failed to create backup directory \"" .. backupDir .. "\"")
+
+  -- Add a backup timer to periodically back up the plugin state
+  check (AddTimer(dbot.backup.timer.name, 
+                  dbot.backup.timer.hour, dbot.backup.timer.min, dbot.backup.timer.sec, "",
+                  timer_flag.Enabled + timer_flag.Replace,
+                  "dbot.backup.current"))
+
+  return retval
+end -- dbot.backup.init.atActive
+
+
+function dbot.backup.fini(doSaveState)
+  local retval = DRL_RET_SUCCESS
+
+  dbot.deleteTimer(dbot.backup.timer.name)
+
+  return retval
+end -- dbot.backup.fini
+
+
+function dbot.backup.getBaseDir()
+  return pluginStatePath .. "\\" .. dbot.gmcp.getName() .. "\\", DRL_RET_SUCCESS
+end -- dbot.backup.getBaseDir
+
+
+function dbot.backup.getCurrentDir()
+  return pluginStatePath .. "\\" .. dbot.gmcp.getName() .. "\\current\\" , DRL_RET_SUCCESS
+end -- dbot.backup.getCurrentDir
+
+
+function dbot.backup.getBackupDir()
+  return pluginStatePath .. "\\" .. dbot.gmcp.getName() .. "\\backup\\" , DRL_RET_SUCCESS
+end -- dbot.backup.getBackupDir
+
+
+-- Returns an array of backup directory names
+function dbot.backup.getBackups()
+  local backupNames = {}
+  local backupDir, retval = dbot.backup.getBackupDir()
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("dbot.backup.getBackups: Failed to get backup directory: " .. dbot.retval.getString(retval))
+    return backupNames, retval
+  end -- if
+
+  local tmpFile = backupDir .. "temp.txt"
+
+  assert(os.execute("dir /s /b /o:n /a:d " .. backupDir .. " > \"" .. tmpFile .. "\""))
+
+  for dirName in io.lines(tmpFile) do
+    local fullName = string.gsub(dirName, "^.*backup.*\\", "") or ""
+    local baseName, baseTime
+    _, _, baseName, baseTime = string.find(fullName, "(.*)-(%d+)$")
+    baseName = baseName or "No name available"
+    baseTime = tonumber(baseTime or 0)
+
+    table.insert(backupNames,
+                 { dirName = dirName, fullName = fullName, baseName = baseName, baseTime = baseTime })
+  end -- for
+
+  -- Sort the backups by date from most recent to oldest
+  if (#backupNames > 0) then
+    table.sort(backupNames, function (back1, back2) return back1.baseTime > back2.baseTime end)
+  end -- if
+
+  assert(os.remove(tmpFile))
+
+  return backupNames, retval
+end -- dbot.backup.getBackups
+
+
+-- Returns a table holding info on the specific backup or nil if it doesn't exist, error code
+function dbot.backup.getFile(name)
+
+  local backupNames, retval = dbot.backup.getBackups()
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("dbot.backup.getFileName: Failed to get backup list: " .. dbot.retval.getString(retval))
+    return nil, retval
+  end -- if
+
+  for _, backupName in ipairs(backupNames) do
+    if (backupName.baseName == name) then
+      return backupName, DRL_RET_SUCCESS
+    end -- if
+  end -- for
+
+  return nil, DRL_RET_SUCCESS
+end -- dbot.backup.getFile(name)
+
+
+-- The automatic backup scheme: auto --> auto2 --> auto3 --> auto4
+function dbot.backup.current()
+  local retval
+  local backupFile
+  local autoPrefix = "auto"
+  local maxNumAutoBackups = 4
+  local newestBackupName = autoPrefix
+  local oldestBackupName = autoPrefix .. maxNumAutoBackups
+
+  if (dbot.gmcp.isInitialized == false) then
+    dbot.debug("dbot.backup.current: Skipping backup request: GMCP is not initialized")
+    return DRL_RET_UNINITIALIZED
+  end -- if
+
+  if dbot.gmcp.isInCombat() then
+    dbot.info("Skipping automatic backup: You are in combat!  We'll try again later.")
+    return DRL_RET_IN_COMBAT
+  end -- if
+
+  -- Check if the newest backup was made today.  If it was, update it with the current data, leave
+  -- the other backups alone, and return.  Otherwise, rotate the backups down one slot chronologically.
+  backupFile, retval = dbot.backup.getFile(newestBackupName)
+  if (backupFile ~= nil) then
+    if (os.date("%x", os.time()) == os.date("%x", backupFile.baseTime)) then
+      retval = dbot.backup.create(newestBackupName, nil)
+      if (retval ~= DRL_RET_SUCCESS) then
+        dbot.warn("dbot.backup.current: Failed to create newest automatic backup \"@G" .. newestBackupName ..
+                  "@W\": " .. dbot.retval.getString(retval))
+      end -- if
+      return retval
+    end -- if
+  end -- if  
+
+  -- We need to rotate the backups.  Whack the oldest auto backup if we have hit our max number of
+  -- supported auto backups.
+  backupFile, retval = dbot.backup.getFile(oldestBackupName)
+  if (backupFile ~= nil) then
+    retval = dbot.backup.delete(oldestBackupName)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("dbot.backup.current: Failed to delete backup \"@G" .. oldestBackupName .. "@W\"" ..
+                dbot.retval.getString(retval))
+    end -- if
+  end -- if
+
+  -- Now rename any other auto backups by bumping them back in the order (e.g., auto2 --> auto3)
+  for backupNum = (maxNumAutoBackups - 1), 1, -1 do
+    local currentBackup = autoPrefix .. backupNum
+    local olderBackup = autoPrefix .. (backupNum + 1)
+
+    -- As a one-off, we don't call the most recent backup "auto1".  Instead, we just call it "auto".
+    -- I think this is a little more clear and it looks cleaner when the user sees that we just made
+    -- a backup named "auto".
+    if (backupNum == 1) then
+      currentBackup = autoPrefix
+    end -- if
+
+    backupFile, retval = dbot.backup.getFile(currentBackup)
+    if (backupFile ~= nil) then
+      dbot.note("Moving backup \"@G" .. currentBackup .. "@W\" to \"@G" .. olderBackup .. "@W\"")
+      local fullOlderBackup = string.gsub(backupFile.dirName, currentBackup, olderBackup)
+      dbot.debug("CLI: " .. "move " .. backupFile.dirName .. " " .. fullOlderBackup .. " > nul")
+      assert(os.execute("move " .. backupFile.dirName .. " " .. fullOlderBackup .. " > nul"))
+    end -- if
+  end -- for
+
+  -- Finally, create a new auto backup by mirroring the current state
+  retval = dbot.backup.create(newestBackupName, nil)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("dbot.backup.current: Failed to create newest automatic backup \"@G" .. newestBackupName ..
+              "@W\": " .. dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+end -- dbot.backup.current
+
+
+-- If may be convenient for us to make an auto-backup if someone is AFK for a while.  This
+-- function will do that.  This could potentially be called in OnPluginTelnetOption when we
+-- detect that we entered AFK mode.  It's not clear if this will be useful or annoying...
+-- We'll kick the tires of this optimization and see if it sticks.
+function dbot.backup.atAFK()
+  local retval = DRL_RET_SUCCESS
+
+  if dbot.gmcp.isInitialized and (dbot.gmcp.getState() == dbot.stateAFK) then
+    retval = dbot.backup.current()
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("dbot.backup.atAFK: Failed to backup plugin state: " .. dbot.retval.getString(retval))
+    end -- if
+  end -- if
+
+  return retval
+end -- dbot.backup.atAFK
+
+
+function dbot.backup.list(endTag)
+  local backupNames, retval = dbot.backup.getBackups()
+
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("dbot.backup.list: Failed to get backup list: " .. dbot.retval.getString(retval))
+  elseif (backupNames == nil) or 
+         ((backupNames ~= nil) and (#backupNames == 0)) then
+    dbot.info("No backups detected")
+  else
+    local suffix = ""
+    if (#backupNames ~= 1) then
+      suffix = "s"
+    end -- if
+    dbot.info("Detected " .. #backupNames .. " backup" .. suffix)
+    for _, backupName in ipairs(backupNames) do
+      dbot.print("  @W(@c" .. os.date("%c", backupName.baseTime) .. "@W) @G" .. backupName.baseName)
+    end -- if
+  end -- if
+
+  return inv.tags.stop(invTagsBackup, endTag, retval)
+end -- dbot.backup.list
+
+
+function dbot.backup.create(name, endTag)
+  local retval = DRL_RET_SUCCESS
+
+  if (name == nil) or (name == "") then
+    dbot.warn("dbot.backup.create: Missing name parameter")
+    return inv.tags.stop(invTagsBackup, endTag, DRL_RET_INVALID_PARAM)
+  end -- if
+
+  local currentDir, retval = dbot.backup.getCurrentDir()
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("dbot.backup.create: Failed to get current directory: " .. dbot.retval.getString(retval))
+    return inv.tags.stop(invTagsBackup, endTag, retval)
+  end -- if
+
+  local backupDir, retval = dbot.backup.getBackupDir()
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("dbot.backup.create: Failed to get backup directory: " .. dbot.retval.getString(retval))
+    return inv.tags.stop(invTagsBackup, endTag, retval)
+  end -- if
+
+  -- Remove any old backups with the same name.  Creating a backup "foo" will remove any previous
+  -- backups that were created with the name "foo".
+  retval = dbot.backup.delete(name, nil, true)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("dbot.backup.create: Failed to remove old backup \"@G" .. name .. "@W\"" ..
+              dbot.retval.getString(retval))
+    return inv.tags.stop(invTagsBackup, endTag, retval)
+  end -- if
+
+  -- We append the time to the end of the backup name to help track it
+  local backupTime = os.time()
+  local newBackupDir = backupDir .. name .. "-" .. backupTime
+  dbot.debug("dbot.backup.create: CLI = \"@y" .. "xcopy /E /I " .. currentDir .. " " .. newBackupDir ..
+             " > nul@W\"")
+  assert(os.execute("xcopy /E /I " .. currentDir .. " " .. newBackupDir .. " > nul"))
+
+  dbot.info("Created backup @W(@c" .. os.date("%c", backupTime) .. "@W) @G" .. name)
+
+  return inv.tags.stop(invTagsBackup, endTag, retval)
+end -- dbot.backup.create
+
+
+function dbot.backup.delete(name, endTag, isQuiet)
+  local retval = DRL_RET_SUCCESS
+
+  if (name == nil) or (name == "") then
+    dbot.warn("dbot.backup.delete: Missing name parameter")
+    return inv.tags.stop(invTagsBackup, endTag, DRL_RET_INVALID_PARAM)
+  end -- if
+
+  local backupNames, retval = dbot.backup.getBackups()
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("dbot.backup.delete: Failed to get backup list: " .. dbot.retval.getString(retval))
+    return inv.tags.stop(invTagsBackup, endTag, retval)
+  end -- if
+
+  -- Check if the backup name we want to delete is one of the available backups and whack it if it is
+  local numBackupsDeleted = 0
+  for _, backupName in ipairs(backupNames) do
+    if (backupName.baseName == name) then
+      dbot.debug("dbot.backup.delete: Executing \"rmdir /s /q " .. backupName.dirName .. "\"")
+      assert(os.execute("rmdir /s /q " .. backupName.dirName .. " > nul"))
+      if (isQuiet == false) then
+        dbot.info("Deleted backup @W(@c" .. os.date("%c", backupName.baseTime) ..
+                  "@W) @G" .. backupName.baseName)
+      end -- if
+      numBackupsDeleted = numBackupsDeleted + 1
+    end -- if
+  end -- if
+
+  if (numBackupsDeleted == 0) and (isQuiet == false) then
+    dbot.info("Failed to delete backup: No backups matching name \"@G" .. name .. "@w\" were found")
+  end -- if
+
+  return inv.tags.stop(invTagsBackup, endTag, retval)
+end -- dbot.backup.delete
+
+
+function dbot.backup.restore(name, endTag)
+  local retval = DRL_RET_SUCCESS
+
+  if (name == nil) or (name == "") then
+    dbot.warn("dbot.backup.restore: Missing name parameter")
+    return inv.tags.stop(invTagsBackup, endTag, DRL_RET_INVALID_PARAM)
+  end -- if
+
+  local backupNames, retval = dbot.backup.getBackups()
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("dbot.backup.restore: Failed to get backup list: " .. dbot.retval.getString(retval))
+    return inv.tags.stop(invTagsBackup, endTag, retval)
+  end -- if
+
+  local currentDir, retval = dbot.backup.getCurrentDir()
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("dbot.backup.restore: Failed to get current directory: " .. dbot.retval.getString(retval))
+    return inv.tags.stop(invTagsBackup, endTag, retval)
+  end -- if
+
+  -- Check if the backup name we want to restore is one of the available backups and use it if it is
+  local didRestore = false
+  for _, backupName in ipairs(backupNames) do
+    if (backupName.baseName == name) then
+      dbot.info("Restoring backup @W(@c" .. os.date("%c", backupName.baseTime) ..
+                "@W) @G" .. backupName.baseName)
+      assert(os.execute("rmdir /s /q " .. currentDir .. " > nul"))
+      assert(os.execute("xcopy /E /I " .. backupName.dirName .. " " .. currentDir .. " > nul"))
+      dbot.debug("dbot.backup.restore: \"@y" .. "xcopy /E /I " .. backupName.dirName .. " " ..
+                 currentDir   .. "@W\"")
+
+      -- We want to re-init everything to pick up the restored state.  We don't want to save the
+      -- current state which will be overwritten.
+      local retval = inv.reload(drlDoNotSaveState)
+      if (retval ~= DRL_RET_SUCCESS) then
+        dbot.warn("dbot.backup.restore: Failed to reload plugin: " .. dbot.retval.getString(retval))
+      end -- if
+
+      didRestore = true
+      break -- Don't restore multiple backups if they have the same name but a different date
+    end -- if
+  end -- if
+
+  if (not didRestore) and (retval == DRL_RET_SUCCESS) then
+    dbot.warn("Failed to restore backup \"@G" .. name .. "@W\": could not find backup")
+    retval = DRL_RET_MISSING_ENTRY
+  end -- if
+
+  return inv.tags.stop(invTagsBackup, endTag, retval)
+end -- dbot.backup.restore
+
+
+----------------------------------------------------------------------------------------------------
+-- Telnet low-level definitions
+----------------------------------------------------------------------------------------------------
+
+dbot.telnet = {}
+
+dbot.telnet.IAC          = 255
+dbot.telnet.SB           = 250
+dbot.telnet.SE           = 240
+dbot.telnet.promptOption = 52
+dbot.telnet.optionOn     = 1
+dbot.telnet.optionOff    = 2
+
+
+----------------------------------------------------------------------------------------------------
+--
+-- Module to disable and enable empty lines
+--
+-- Many of the commands this plugin runs in the background generate empty lines of output.  We don't
+-- want the user to suddenly see empty lines showing up without warning so we provide a way to 
+-- suppress empty lines when desired.
+--
+--
+-- dbot.emptyLine.init.atInstall()
+-- dbot.emptyLine.fini(doSaveState)
+--
+-- dbot.emptyLine.disable()
+-- dbot.emptyLine.enable()
+--
+----------------------------------------------------------------------------------------------------
+
+dbot.emptyLine         = {}
+dbot.emptyLine.init    = {}
+dbot.emptyLine.trigger = {}
+
+dbot.emptyLine.trigger.suppressEmptyName = "drlDbotEmptyLineTrigger"
+dbot.emptyLine.numEnables = 1 -- empty lines are enabled by default
+
+
+function dbot.emptyLine.init.atInstall()
+  local retval = DRL_RET_SUCCESS
+
+  -- Suppress empty lines (white space only)
+  check (AddTriggerEx(dbot.emptyLine.trigger.suppressEmptyName,
+                      "^[ ]*$",
+                      "",
+                      drlTriggerFlagsBaseline + trigger_flag.OmitFromOutput,
+                      custom_colour.Custom11, 0, "", "", sendto.script, 0))
+  check (EnableTrigger(dbot.emptyLine.trigger.suppressEmptyName, false)) -- default to off
+
+  return retval
+end -- dbot.emptyLine.init.atInstall
+
+
+function dbot.emptyLine.fini(doSaveState)
+  dbot.deleteTrigger(dbot.emptyLine.trigger.suppressEmptyName)
+
+  dbot.emptyLine.numEnables = 1 -- empty lines are enabled by default
+
+  -- NOTE: if we ever add persistent data to this module we should use the doSaveState param to determine
+  -- if we need to save it
+
+  return DRL_RET_SUCCESS
+end -- dbot.emptyLine.fini
+
+
+function dbot.emptyLine.disable()
+  local retval = DRL_RET_SUCCESS
+
+  dbot.emptyLine.numEnables = dbot.emptyLine.numEnables - 1
+  if (dbot.emptyLine.numEnables == 0) then
+    dbot.debug("dbot.emptyLine.disable: suppressing empty lines")
+    EnableTrigger(dbot.emptyLine.trigger.suppressEmptyName, true)
+  end -- if
+
+  return retval
+end -- dbot.emptyLine.disable
+
+
+function dbot.emptyLine.enable()
+  local retval = DRL_RET_SUCCESS
+
+  dbot.emptyLine.numEnables = dbot.emptyLine.numEnables + 1
+  if (dbot.emptyLine.numEnables == 1) then
+    dbot.debug("dbot.emptyLine.enable: allowing empty lines")
+    EnableTrigger(dbot.emptyLine.trigger.suppressEmptyName, false)
+  end -- if
+
+  return retval
+end -- dbot.emptyLine.enable
+
+
+----------------------------------------------------------------------------------------------------
+--
+-- Module to disable and enable the prompt
+--
+-- This uses low-level telnet 102 commands so that we can change the prompt status even if the
+-- character is AFK.
+--
+-- dbot.prompt.init.atActive()
+-- dbot.prompt.fini(doSaveState)
+--
+-- dbot.prompt.disable()
+-- dbot.prompt.enable()
+-- dbot.prompt.hide() -- disables both the prompt and empty lines
+-- dbot.prompt.show() -- enables both the prompt and empty lines
+-- dbot.prompt.getStatusCR()
+--
+-- dbot.prompt.trigger.onEnable()
+-- dbot.prompt.trigger.onDisable()
+-- dbot.prompt.trigger.onToggle(msg)
+--
+----------------------------------------------------------------------------------------------------
+
+dbot.prompt         = {}
+dbot.prompt.init    = {}
+dbot.prompt.trigger = {}
+
+dbot.prompt.trigger.onEnableName      = "drlDbotPromptTriggerOnEnable"
+dbot.prompt.trigger.onDisableName     = "drlDbotPromptTriggerOnDisable"
+dbot.prompt.trigger.onToggleName      = "drlDbotPromptTriggerOnToggle"
+
+dbot.prompt.isEnabled = true -- by default, assume the prompt is enabled if we can't get the real status
+
+
+function dbot.prompt.init.atActive()
+  local retval = DRL_RET_SUCCESS
+
+  -- Detect when the prompt is enabled
+  check (AddTriggerEx(dbot.prompt.trigger.onEnableName,
+                      "^You will now see prompts.$",
+                      "dbot.prompt.trigger.onEnable()",
+                      drlTriggerFlagsBaseline + trigger_flag.OmitFromOutput,
+                      custom_colour.Custom11, 0, "", "", sendto.script, 0))
+  check (EnableTrigger(dbot.prompt.trigger.onEnableName, false)) -- default to off
+
+  -- Detect when the prompt is disabled
+  check (AddTriggerEx(dbot.prompt.trigger.onDisableName,
+                      "^You will no longer see prompts.$",
+                      "dbot.prompt.trigger.onDisable()",
+                      drlTriggerFlagsBaseline + trigger_flag.OmitFromOutput,
+                      custom_colour.Custom11, 0, "", "", sendto.script, 0))
+  check (EnableTrigger(dbot.prompt.trigger.onDisableName, false)) -- default to off
+
+  -- Detect when the prompt is toggled.  This is very similar to the onEnableName and the
+  -- onDisableName triggers above, but we don't suppress the output in this trigger like we
+  -- do with those triggers.  That is because it tracks when the user manually toggles the
+  -- prompt and we don't want to hide that from the user.
+  --
+  -- The prompt code runs in two stages.  First, we toggle the prompt twice in the background
+  -- and suppress the output so that we can detect if the prompt is enabled without the user
+  -- knowing that we did anything.  Once we complete that, then we enable the onToggle trigger.
+  -- The onToggle trigger is never active at the same time as the onEnable or onDisable triggers.
+  check (AddTriggerEx(dbot.prompt.trigger.onToggleName,
+                      "^(You will no longer see prompts|You will now see prompts).*$",
+                      "dbot.prompt.trigger.onToggle(\"%1\")",
+                      drlTriggerFlagsBaseline,
+                      custom_colour.NoChange, 0, "", "", sendto.script, 0))
+  check (EnableTrigger(dbot.prompt.trigger.onToggleName, false)) -- default to off
+
+  -- We will fill this in when we call dbot.prompt.isEnabledCR.  We need to manually toggle "prompt"
+  -- two times and see what the output is in order to determine what the actual status of the prompt
+  -- is.  We can't do that synchronously here so we kick off a co-routine to get that info.
+  dbot.prompt.statusEnables = 1
+
+  -- The *.init.atActive code runs in a co-routine so we don't need to explicitly kick off another CR here
+  dbot.prompt.getStatusCR()
+
+  return retval
+end -- dbot.prompt.init.atActive
+
+
+function dbot.prompt.fini(doSaveState)
+  dbot.deleteTrigger(dbot.prompt.trigger.onEnableName)
+  dbot.deleteTrigger(dbot.prompt.trigger.onDisableName)
+  dbot.deleteTrigger(dbot.prompt.trigger.onToggleName)
+
+  dbot.prompt.isEnabled = true
+
+  -- NOTE: if we ever add persistent data to this module we should use the doSaveState param to determine
+  -- if we need to save it
+
+  return DRL_RET_SUCCESS
+end -- dbot.prompt.fini
+
+
+function dbot.prompt.disable()
+  if (dbot.prompt.statusEnables ~= nil) then
+    -- The moment we transition from having 1 enable to 0 enables, we disable the prompt.  Someone
+    -- could call multiple consecutive disables but we'd only do the disabling once.  
+    dbot.prompt.statusEnables = dbot.prompt.statusEnables - 1
+    if (dbot.prompt.statusEnables == 0) then
+      SendPkt(string.char (dbot.telnet.IAC, dbot.telnet.SB, 102, dbot.telnet.promptOption,
+                           dbot.telnet.optionOff, dbot.telnet.IAC, dbot.telnet.SE))
+    end -- if
+  end -- if
+end -- dbot.prompt.disable
+
+
+function dbot.prompt.enable()
+  if (dbot.prompt.statusEnables ~= nil) then
+    dbot.prompt.statusEnables = dbot.prompt.statusEnables + 1
+    if (dbot.prompt.statusEnables == 1) then
+      SendPkt(string.char (dbot.telnet.IAC, dbot.telnet.SB, 102, dbot.telnet.promptOption,
+                           dbot.telnet.optionOn, dbot.telnet.IAC, dbot.telnet.SE))
+    end -- if
+  end -- if
+end -- dbot.prompt.enable
+
+
+-- Disable the prompt and suppress empty lines
+function dbot.prompt.hide()
+  dbot.emptyLine.disable()
+  dbot.prompt.disable()
+end -- dbot.prompt.hide
+
+
+function dbot.prompt.show()
+  dbot.prompt.enable()
+
+  -- TODO: This is an awkward situation.  We want to stop suppressing empty lines (resulting
+  --       from some actions this plugin executes in the background) but we don't want to do
+  --       that until all of the commands queued up on the server are executed.  Yes, we could
+  --       do some extra synchronization to catch the end of the command queue, but that's
+  --       more work than I want to deal with for this minor issue.  In the meantime, there
+  --       might be one or two empty lines of output that show up near the end of a large
+  --       operation.
+  dbot.emptyLine.enable()
+end -- dbot.prompt.show
+
+
+function dbot.prompt.getStatusCR()
+  local retval = DRL_RET_SUCCESS
+
+  dbot.prompt.foundEnable = false
+  dbot.prompt.foundDisable = false
+
+  -- Enable the prompt triggers so that we can catch what happens when we run "prompt"
+  EnableTrigger(dbot.prompt.trigger.onEnableName,  true)
+  EnableTrigger(dbot.prompt.trigger.onDisableName, true)
+
+  -- Disable empty lines while we toggle the prompt so that we don't spew empty lines in the background
+  dbot.emptyLine.disable()
+
+  -- Run "prompt" and see what happens.  Note that we can't run dbot.execute.safe.command() here because
+  -- that could potentially toggle the prompt status and we want to know what is going on right now.
+  check (Send("prompt"))
+  check (Send("prompt"))
+
+  -- Spin until both the enable trigger and disable trigger are detected (both "prompt" commands complete)
+  local totTime = 0
+  local timeout = 5
+  retval = DRL_RET_TIMEOUT
+  while (totTime <= timeout) do
+    if (dbot.prompt.foundEnable == true) and (dbot.prompt.foundDisable == true) then
+      retval = DRL_RET_SUCCESS
+      break
+    end -- if
+    wait.time(drlSpinnerPeriodDefault)
+    totTime = totTime + drlSpinnerPeriodDefault
+  end -- while
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("dbot.prompt.getStatusCR: Failed to detect prompt enable/disable: " .. 
+              dbot.retval.getString(retval))
+  end -- if
+
+  EnableTrigger(dbot.prompt.trigger.onEnableName,  false)
+  EnableTrigger(dbot.prompt.trigger.onDisableName, false)
+
+  -- Re-enable empty lines again if we disabled them during the prompt toggling test
+  dbot.emptyLine.enable()
+
+  if dbot.prompt.isEnabled then
+    dbot.prompt.statusEnables = 1
+  else
+    dbot.prompt.statusEnables = 0
+  end -- if
+
+  -- Once we know the current state, we monitor when the user manually toggles the prompt so
+  -- that we can keep our state up-to-date
+  EnableTrigger(dbot.prompt.trigger.onToggleName, true)
+
+  return retval
+end -- dbot.prompt.getStatusCR
+
+
+function dbot.prompt.trigger.onEnable()
+  dbot.prompt.isEnabled = true
+  dbot.prompt.foundEnable = true
+end -- dbot.prompt.trigger.onEnable
+
+
+function dbot.prompt.trigger.onDisable()
+  dbot.prompt.isEnabled = false
+  dbot.prompt.foundDisable = true
+end -- dbot.prompt.trigger.onDisable
+
+
+function dbot.prompt.trigger.onToggle(msg)
+
+  if (msg == "You will no longer see prompts") then
+    dbot.debug("dbot.prompt.trigger.onToggle: user manually turned the prompt off")
+    dbot.prompt.statusEnables = 0
+    inv.config.table.isPromptEnabled = false
+
+  elseif (msg == "You will now see prompts") then
+    dbot.debug("dbot.prompt.trigger.onToggle: user manually turned the prompt on")
+    dbot.prompt.statusEnables = 1
+    inv.config.table.isPromptEnabled = true
+
+  else
+    dbot.error("dbot.prompt.trigger.onToggle: triggered on unsupported message \"" .. (msg or "nil") .. "\"")
+  end -- if
+
+  if (dbot.init.initializedActive) then
+    inv.config.save()
+  end -- if
+
+end -- dbot.prompt.trigger.onToggle
+
+
+----------------------------------------------------------------------------------------------------
+--
+-- Module to check the status of invmon
+--
+-- dbot.invmon.init.atInstall()
+-- dbot.invmon.init.atActive()
+-- dbot.invmon.fini(doSaveState)
+--
+-- dbot.invmon.getStatusCR()
+--
+-- dbot.invmon.trigger.onEnable()
+-- dbot.invmon.trigger.onDisable()
+-- dbot.invmon.trigger.onToggle(msg)
+--
+----------------------------------------------------------------------------------------------------
+
+dbot.invmon         = {}
+dbot.invmon.init    = {}
+dbot.invmon.trigger = {}
+
+dbot.invmon.isEnabled = true -- by default, assume the invmon is enabled
+
+dbot.invmon.trigger.onEnableName      = "drlDbotInvmonTriggerOnEnable"
+dbot.invmon.trigger.onDisableName     = "drlDbotInvmonTriggerOnDisable"
+dbot.invmon.trigger.onToggleName      = "drlDbotInvmonTriggerOnToggle"
+
+
+function dbot.invmon.init.atInstall()
+  local retval = DRL_RET_SUCCESS
+
+  -- Detect when the invmon is enabled
+  check (AddTriggerEx(dbot.invmon.trigger.onEnableName,
+                      "^You will now see inventory update tags.$",
+                      "dbot.invmon.trigger.onEnable()",
+                      drlTriggerFlagsBaseline + trigger_flag.OmitFromOutput,
+                      custom_colour.Custom11, 0, "", "", sendto.script, 0))
+  check (EnableTrigger(dbot.invmon.trigger.onEnableName, false)) -- default to off
+
+  -- Detect when the invmon is disabled
+  check (AddTriggerEx(dbot.invmon.trigger.onDisableName,
+                      "^You will no longer see inventory update tags.$",
+                      "dbot.invmon.trigger.onDisable()",
+                      drlTriggerFlagsBaseline + trigger_flag.OmitFromOutput,
+                      custom_colour.Custom11, 0, "", "", sendto.script, 0))
+  check (EnableTrigger(dbot.invmon.trigger.onDisableName, false)) -- default to off
+
+  -- Detect when the invmon is toggled.  This is very similar to the onEnableName and the
+  -- onDisableName triggers above, but we don't suppress the output in this trigger like we
+  -- do with those triggers.  That is because it tracks when the user manually toggles the
+  -- invmon and we don't want to hide that from the user.
+  --
+  -- The invmon code runs in two stages.  First, we toggle the invmon twice in the background
+  -- and suppress the output so that we can detect if the invmon is enabled without the user
+  -- knowing that we did anything.  Once we complete that, then we enable the onToggle trigger.
+  -- The onToggle trigger is never active at the same time as the onEnable or onDisable triggers.
+  check (AddTriggerEx(dbot.invmon.trigger.onToggleName,
+                      "^(" ..
+                         "You will no longer see inventory update tags." ..
+                         "|You will now see inventory update tags."      ..
+                      ").*$",
+                      "dbot.invmon.trigger.onToggle(\"%1\")",
+                      drlTriggerFlagsBaseline,
+                      custom_colour.NoChange, 0, "", "", sendto.script, 0))
+  check (EnableTrigger(dbot.invmon.trigger.onToggleName, false)) -- default to off
+
+  return retval
+end -- dbot.invmon.init.atInstall
+
+
+function dbot.invmon.init.atActive()
+  local retval = DRL_RET_SUCCESS
+
+  -- We will fill this in when we call dbot.invmon.isEnabledCR.  We need to manually toggle "invmon"
+  -- two times and see what the output is in order to determine what the actual status of the invmon
+  -- is.  We can't do that synchronously here so we kick off a co-routine to get that info.
+  dbot.invmon.statusEnables = 0
+
+  -- The *.init.atActive code runs in a co-routine so we don't need to explicitly kick off another CR here
+  dbot.invmon.getStatusCR()
+
+  return retval
+end -- dbot.invmon.init.atActive
+
+
+function dbot.invmon.fini(doSaveState)
+  dbot.deleteTrigger(dbot.invmon.trigger.onEnableName)
+  dbot.deleteTrigger(dbot.invmon.trigger.onDisableName)
+  dbot.deleteTrigger(dbot.invmon.trigger.onToggleName)
+
+  dbot.invmon.isEnabled = true
+
+  -- NOTE: if we ever add persistent data to this module we should use the doSaveState param to determine
+  -- if we need to save it
+
+  return DRL_RET_SUCCESS
+end -- dbot.invmon.fini
+
+
+function dbot.invmon.getStatusCR()
+  local retval = DRL_RET_SUCCESS
+
+  dbot.invmon.foundEnable = false
+  dbot.invmon.foundDisable = false
+
+  -- Enable the invmon triggers so that we can catch what happens when we run "invmon"
+  EnableTrigger(dbot.invmon.trigger.onEnableName,  true)
+  EnableTrigger(dbot.invmon.trigger.onDisableName, true)
+
+  -- Disable the prompt while we toggle invmon so that we don't output lines
+  dbot.prompt.hide()
+
+  -- Run "invmon" and see what happens
+  dbot.execute.fast.command("invmon")
+  dbot.execute.fast.command("invmon")
+
+  -- Spin until both the enable trigger and disable trigger are detected (both "invmon" commands complete)
+  local totTime = 0
+  local timeout = 5
+  retval = DRL_RET_TIMEOUT
+  while (totTime <= timeout) do
+    if (dbot.invmon.foundEnable == true) and (dbot.invmon.foundDisable == true) then
+      retval = DRL_RET_SUCCESS
+      break
+    end -- if
+    wait.time(drlSpinnerPeriodDefault)
+    totTime = totTime + drlSpinnerPeriodDefault
+  end -- while
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("dbot.invmon.getStatusCR: Failed to detect invmon enable/disable: " .. 
+              dbot.retval.getString(retval))
+  end -- if
+
+  EnableTrigger(dbot.invmon.trigger.onEnableName,  false)
+  EnableTrigger(dbot.invmon.trigger.onDisableName, false)
+
+  -- Re-enable the prompt (we disabled it before running invmon twice)
+  dbot.prompt.show()
+
+  if dbot.invmon.isEnabled then
+    dbot.invmon.statusEnables = 1
+  else
+    dbot.invmon.statusEnables = 0
+    dbot.warn("The " .. pluginNameAbbr .. " plugin requires invmon.  Please type \"invmon\" to enable it.")
+  end -- if
+
+  -- Once we know the current state, we monitor when the user manually toggles invmon so
+  -- that we can keep our state up-to-date
+  EnableTrigger(dbot.invmon.trigger.onToggleName, true)
+
+  return retval
+end -- dbot.invmon.getStatusCR
+
+
+function dbot.invmon.trigger.onEnable()
+  dbot.invmon.isEnabled = true
+  dbot.invmon.foundEnable = true
+end -- dbot.invmon.trigger.onEnable
+
+
+function dbot.invmon.trigger.onDisable()
+  dbot.invmon.isEnabled = false
+  dbot.invmon.foundDisable = true
+end -- dbot.invmon.trigger.onDisable
+
+
+function dbot.invmon.trigger.onToggle(msg)
+  if (msg == "You will no longer see inventory update tags.") then
+    dbot.debug("dbot.invmon.trigger.onToggle: user manually turned invmon off")
+    dbot.invmon.statusEnables = dbot.invmon.statusEnables - 1
+    dbot.warn("You just disabled invmon!")
+    dbot.warn("The " .. pluginNameAbbr .. " plugin requires invmon.  Please type \"invmon\" to enable it again.")
+  elseif (msg == "You will now see inventory update tags.") then
+    dbot.debug("dbot.invmon.trigger.onToggle: user manually turned invmon on")
+    dbot.invmon.statusEnables = dbot.invmon.statusEnables + 1
+  else
+    dbot.error("dbot.invmon.trigger.onToggle: triggered on unsupported message \"" .. (msg or "nil") .. "\"")
+  end -- if
+end -- dbot.invmon.trigger.onToggle
+
+
+----------------------------------------------------------------------------------------------------
+-- Invmon helper code and definitions
+----------------------------------------------------------------------------------------------------
+
+invmon = {} 
+
+invmonActionRemoved             = 1
+invmonActionWorn                = 2
+invmonActionRemovedFromInv      = 3
+invmonActionAddedToInv          = 4
+invmonActionTakenOutOfContainer = 5
+invmonActionPutIntoContainer    = 6
+invmonActionConsumed            = 7
+invmonActionPutIntoVault        = 9
+invmonActionRemovedFromVault    = 10
+invmonActionPutIntoKeyring      = 11
+invmonActionGetFromKeyring      = 12
+
+invmon.action = {}
+invmon.action[invmonActionRemoved]             = "Removed"
+invmon.action[invmonActionWorn]                = "Worn"
+invmon.action[invmonActionRemovedFromInv]      = "Removed from inventory"
+invmon.action[invmonActionAddedToInv]          = "Added to inventory"
+invmon.action[invmonActionTakenOutOfContainer] = "Taken out of container"
+invmon.action[invmonActionPutIntoContainer]    = "Put into container"
+invmon.action[invmonActionConsumed]            = "Consumed"
+invmon.action[invmonActionPutIntoVault]        = "Put into vault"
+invmon.action[invmonActionRemovedFromVault]    = "Removed from vault"
+invmon.action[invmonActionPutIntoKeyring]      = "Put into keyring"
+invmon.action[invmonActionGetFromKeyring]      = "Get from keyring"
+
+invmonTypeNone           = 0
+invmonTypeLight          = 1
+invmonTypeScroll         = 2
+invmonTypeWand           = 3
+invmonTypeStaff          = 4
+invmonTypeWeapon         = 5
+invmonTypeTreasure       = 6
+invmonTypeArmor          = 7
+invmonTypePotion         = 8
+invmonTypeFurniture      = 9
+invmonTypeTrash          = 10
+invmonTypeContainer      = 11
+invmonTypeDrinkContainer = 12
+invmonTypeKey            = 13
+invmonTypeFood           = 14
+invmonTypeBoat           = 15
+invmonTypeMobCorpse      = 16
+invmonTypePlayerCorpse   = 17
+invmonTypeFountain       = 18
+invmonTypePill           = 19
+invmonTypePortal         = 20
+invmonTypeBeacon         = 21
+invmonTypeGiftCard       = 22
+invmonTypeUnused         = 23
+invmonTypeRawMaterial    = 24
+invmonTypeCampfire       = 25
+invmonTypeForge          = 26
+invmonTypeRunestone      = 27
+
+invmon.typeStr = {}
+invmon.typeStr[invmonTypeNone]           = "None"
+invmon.typeStr[invmonTypeLight]          = "Light"
+invmon.typeStr[invmonTypeScroll]         = "Scroll"
+invmon.typeStr[invmonTypeWand]           = "Wand"
+invmon.typeStr[invmonTypeStaff]          = "Staff"
+invmon.typeStr[invmonTypeWeapon]         = "Weapon"
+invmon.typeStr[invmonTypeTreasure]       = "Treasure"
+invmon.typeStr[invmonTypeArmor]          = "Armor"
+invmon.typeStr[invmonTypePotion]         = "Potion"
+invmon.typeStr[invmonTypeFurniture]      = "Furniture"
+invmon.typeStr[invmonTypeTrash]          = "Trash"
+invmon.typeStr[invmonTypeContainer]      = "Container"
+invmon.typeStr[invmonTypeDrinkContainer] = "Drink container"
+invmon.typeStr[invmonTypeKey]            = "Key"
+invmon.typeStr[invmonTypeFood]           = "Food"
+invmon.typeStr[invmonTypeBoat]           = "Boat"
+invmon.typeStr[invmonTypeMobCorpse]      = "Mob corpse"
+invmon.typeStr[invmonTypePlayerCorpse]   = "Player corpse"
+invmon.typeStr[invmonTypeFountain]       = "Fountain"
+invmon.typeStr[invmonTypePill]           = "Pill"
+invmon.typeStr[invmonTypePortal]         = "Portal"
+invmon.typeStr[invmonTypeBeacon]         = "Beacon"
+invmon.typeStr[invmonTypeGiftCard]       = "Gift card"
+invmon.typeStr[invmonTypeUnused]         = "Unused"
+invmon.typeStr[invmonTypeRawMaterial]    = "Raw material"
+invmon.typeStr[invmonTypeCampfire]       = "Campfire"
+invmon.typeStr[invmonTypeForge]          = "Forge"
+invmon.typeStr[invmonTypeRunestone]      = "Runestone"
+
+
+----------------------------------------------------------------------------------------------------
+--
+-- dbot.ability: Module to check if a character has access to a specific skill or spell
+--
+-- dbot.ability.init.atInstall()
+-- dbot.ability.fini(doSaveState)
+--
+-- dbot.ability.isAvailable
+-- dbot.ability.isCached
+--
+-- dbot.ability.trigger.haveAbilityStart
+-- dbot.ability.trigger.haveAbilityLevel
+--
+-- dbot.ability.setupFn() -- enable the ability trigger during a safe execute call
+--
+----------------------------------------------------------------------------------------------------
+
+-- This function can block so it must be called from a co-routine
+dbot.ability              = {}
+dbot.abilityPkg           = {}
+dbot.ability.init         = {}
+dbot.ability.trigger      = {}
+dbot.ability.isInProgress = false
+
+dbot.ability.trigger.startName = "drlDbotAbilityTriggerStart"
+dbot.ability.trigger.levelName = "drlDbotAbilityTriggerLevel"
+
+
+function dbot.ability.init.atInstall()
+  local retval = DRL_RET_SUCCESS
+
+  -- Trigger on the output of "showskill" and watch for an empty line indicating that we are done
+  check (AddTriggerEx(dbot.ability.trigger.levelName,
+                      "^(.*)$", -- This is only enabled when we confirm we have started the output
+                      "dbot.ability.trigger.levelFn(\"%1\")",
+                      drlTriggerFlagsBaseline + trigger_flag.OmitFromOutput,
+                      custom_colour.Custom11,
+                      0, "", "", sendto.script, 0))
+
+  check (EnableTrigger(dbot.ability.trigger.levelName, false)) -- default to off
+
+  return retval
+end -- dbot.ability.init.atInstall
+
+
+function dbot.ability.fini(doSaveState)
+  local retval = DRL_RET_SUCCESS
+
+  dbot.deleteTrigger(dbot.ability.trigger.levelName)
+  dbot.deleteTrigger(dbot.ability.trigger.startName)
+
+  -- NOTE: if we ever add persistent data to this module we should use the doSaveState param to determine
+  -- if we need to save it
+
+  return retval
+end -- dbot.ability.fini
+
+
+function dbot.ability.isAvailable(ability, level)
+  local retval = DRL_RET_SUCCESS
+  local abilityIsAvailable = false
+
+  if (ability == nil) or (ability == "") then
+    dbot.warn("dbot.ability.isAvailable: missing ability parameter")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  if (level == nil) or (tonumber(level) == nil) then
+    dbot.warn("dbot.ability.isAvailable: level parameter is not a number")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  level = tonumber(level)
+
+  if (dbot.ability.isInProgress) then
+    dbot.info("Skipping check for skill or spell availability: another request is in progress")
+    return false, DRL_RET_BUSY
+  end -- if
+
+  -- We are starting a new request
+  dbot.ability.isInProgress = true
+
+  -- If we already cached whether or not the user has the specified ability, use the cached value.
+  -- Otherwise, call "showskill" and pick out the level at which the ability is available.
+  if dbot.ability.isCached(ability, level) then
+    dbot.debug("Using cached ability useLevel = " .. dbot.abilityPkg.useLevel)
+  else
+    dbot.abilityPkg.ability    = ability
+    dbot.abilityPkg.checkLevel = level
+    dbot.abilityPkg.useLevel   = nil
+
+    -- Kick off the command that will trigger the level availability info
+    local resultData = dbot.callback.new()
+    retval = dbot.execute.safe.command("showskill " .. ability, dbot.ability.setupFn, nil,
+                                       dbot.callback.default, resultData)
+    if (retval == DRL_RET_SUCCESS) then
+      -- Wait for the callback to confirm that the showskill safe command completed
+      retval = dbot.callback.wait(resultData, 10)
+      if (retval ~= DRL_RET_SUCCESS) then
+        dbot.note("Skipping ability \"showskill\" request: " .. dbot.retval.getString(retval))
+      end -- if
+
+      -- Wait for the trigger to find the info
+      local waitForHaveAbilityTimeout = 0
+      local waitForHaveAbilityThreshold = 10
+      while (dbot.abilityPkg.useLevel == nil) do
+        wait.time(drlSpinnerPeriodDefault)
+        waitForHaveAbilityTimeout = waitForHaveAbilityTimeout + drlSpinnerPeriodDefault
+        if (waitForHaveAbilityTimeout > waitForHaveAbilityThreshold) then
+          dbot.error("dbot.ability.isAvailable: Failed to get level availability: timed out")
+          dbot.deleteTrigger(dbot.ability.trigger.startName)
+          abilityIsAvailable = false
+          retval = DRL_RET_TIMEOUT
+          break
+        end -- if
+      end -- while
+    end -- if
+  end -- if
+
+  -- Check the level info we found
+  if (dbot.abilityPkg.useLevel ~= nil) and 
+     (dbot.abilityPkg.useLevel + (10 * dbot.gmcp.getTier()) <= level) then
+      abilityIsAvailable = true
+  end -- if
+
+  -- Clean up and return
+  dbot.ability.isInProgress = false
+  return abilityIsAvailable, retval
+
+end -- dbot.ability.isAvailable
+
+
+function dbot.ability.isCached(ability, level)
+  -- Check if we already checked for this ability at a previous level.  If we are at a higher
+  -- level than before and we had the ability before, there is no need to check it again -- we
+  -- don't lose ability as we get higher level.  We could generate a big table for each ability
+  -- but we probably will only use this for one skill (dual wield) so we simply cache just the
+  -- previous ability.  We can extend this later if we want to.  The worst case is that we do
+  -- some extra "showskill" requests.
+  if (dbot.abilityPkg.ability    ~= nil) and (dbot.abilityPkg.ability    == ability) and
+     (dbot.abilityPkg.checkLevel ~= nil) and (dbot.abilityPkg.checkLevel <= level)   and
+     (dbot.abilityPkg.useLevel   ~= nil) then
+    return true
+  else
+    return false
+  end -- if
+end -- dbot.ability.isCached
+
+
+function drlHaveAbilityStartTriggerFn(line)
+  if string.find(line, "is not a valid skill or spell") or string.find(line, "You cannot use this") then
+    dbot.abilityPkg.useLevel = 300 -- we can't use this
+    return
+  end -- if
+
+  -- Enable a trigger to watch for the output of the ability availability output.  The trigger
+  -- will disable itself when it sees an empty line that indicates the output is done.
+  EnableTrigger(dbot.ability.trigger.levelName, true)
+end -- drlHaveAbilityStartTriggerFn
+
+
+function dbot.ability.trigger.levelFn(line)
+  local useLevel
+  _, _, useLevel = string.find(line, "Your Level%s+:%s+(%d+)")
+
+  -- If we hit an empty line, we know that the output is done and we can disable this trigger
+  if (line == "") then
+    EnableTrigger(dbot.ability.trigger.levelName, false)
+
+  -- If we can't use the skill, set the useLevel out of reach
+  elseif string.find(line, "You cannot use this") then
+    dbot.abilityPkg.useLevel = 300 
+
+  -- Check if we found our level in a line like: "Your Level   : 22                    Learned:  95% "
+  elseif (useLevel ~= nil) and (tonumber(useLevel) ~= nil) then
+    dbot.abilityPkg.useLevel = tonumber(useLevel)
+  
+  end -- if
+end -- dbot.ability.trigger.levelFn
+
+
+function dbot.ability.setupFn()
+  -- Add a trigger series that will pull out the level at which the character can use the ability
+  check (AddTriggerEx(dbot.ability.trigger.startName,
+                      "^.*(" ..
+                           "------------------------------------------------------|" ..
+                           "is not a valid skill or spell" ..
+                      ").*$",
+                      "drlHaveAbilityStartTriggerFn(\"%1\")",
+                      drlTriggerFlagsBaseline + trigger_flag.OneShot + trigger_flag.OmitFromOutput,
+                      custom_colour.Custom11,
+                      0, "", "", sendto.script, 0))
+end -- dbot.ability.setupFn
+
+
+----------------------------------------------------------------------------------------------------
+--
+-- Module to track wishes
+--
+-- dbot.wish.init.atActive()
+-- dbot.wish.fini(doSaveState)
+--
+-- dbot.wish.save()
+-- dbot.wish.load()
+-- dbot.wish.reset()
+--
+-- dbot.wish.get()
+-- dbot.wish.getCR()
+-- dbot.wish.has(wishName)
+--
+-- dbot.wish.trigger.fn()
+-- dbot.wish.setupFn() -- enable the trigger during a safe execute call
+--
+----------------------------------------------------------------------------------------------------
+
+dbot.wish         = {}
+dbot.wish.table   = {}
+dbot.wish.init    = {}
+dbot.wish.trigger = {}
+dbot.wish.timer   = {}
+
+dbot.wish.name = "dbot-wish.state"
+
+dbot.wish.trigger.startName = "drlDbotWishTriggerStart"
+dbot.wish.trigger.itemName  = "drlDbotWishTriggerItem"
+
+dbot.wish.timer.name = "drlDbotWishTimer"
+dbot.wish.timer.min = 1
+dbot.wish.timer.sec = 0
+
+
+function dbot.wish.init.atActive()
+  local retval = DRL_RET_SUCCESS
+
+  -- Pull in what we already know
+  retval = dbot.wish.load()
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("dbot.wish.init.atActive: Failed to load wish data: " .. dbot.retval.getString(retval))
+  end -- if
+
+  -- Trigger on the output of "wish list" and watch for an empty line indicating that we are done
+  check (AddTriggerEx(dbot.wish.trigger.itemName,
+                      "^(.*)$",
+                      "dbot.wish.trigger.fn(\"%1\")",
+                      drlTriggerFlagsBaseline + trigger_flag.OmitFromOutput,
+                      custom_colour.Custom11,
+                      0, "", "", sendto.script, 0))
+
+  check (EnableTrigger(dbot.wish.trigger.itemName, false)) -- default to off
+
+  -- Kick off a timer to update the wishes.  It would be convenient to just run dbot.wish.get()
+  -- right here instead of scheduling it to run 1 second from now.  However, there are cases where
+  -- we our telnet options code detects that we are out of AFK causing us to run this init routine
+  -- before GMCP notices that our state changed.  If that happens, no real harm is done and we simply
+  -- reschedule the wish detection to try again later.  However, we can (probably) avoid that extra
+  -- overhead if we simply give GMCP a chance to detect the state change so we are willing to wait
+  -- an extra second here to give it that chance. 
+  check (AddTimer(dbot.wish.timer.name, 0, 0, 1, "",
+                  timer_flag.Enabled + timer_flag.Replace + timer_flag.OneShot,
+                  "dbot.wish.get"))
+
+  return retval
+end -- dbot.wish.init.atActive
+
+
+function dbot.wish.fini(doSaveState)
+  local retval = DRL_RET_SUCCESS
+
+  dbot.deleteTrigger(dbot.wish.trigger.itemName)
+  dbot.deleteTrigger(dbot.wish.trigger.startName)
+
+  -- Whack the timer just in case it is running
+  dbot.deleteTimer(dbot.wish.timer.name)
+
+  if (doSaveState) then
+    -- Save our current wish data
+    retval = dbot.wish.save()
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("dbot.wish.fini: Failed to save wish data: " .. dbot.retval.getString(retval))
+    end -- if
+  end -- if
+
+  return retval
+end -- dbot.wish.fini
+
+
+function dbot.wish.save()
+  local retval = dbot.storage.saveTable(dbot.backup.getCurrentDir() .. dbot.wish.name,
+                                        "dbot.wish.table", dbot.wish.table)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("dbot.wish.save: Failed to save wish table: " .. dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+end -- dbot.wish.save
+
+
+function dbot.wish.load()
+  local retval = dbot.storage.loadTable(dbot.backup.getCurrentDir() .. dbot.wish.name, dbot.wish.reset)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("dbot.wish.load: Failed to load table from file \"@R" .. 
+              dbot.backup.getCurrentDir() .. dbot.wish.name .. "@W\": " .. dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+end -- dbot.wish.load
+
+
+function dbot.wish.reset()
+  dbot.wish.table = {}
+
+  -- We handle saving dbot.module state a little differently than other modules.  Most modules can
+  -- check if dbot.init.initializeActive is true before saving state, but dbot modules don't have that
+  -- luxury because we may need to reset something before we are fully initialized.  Instead, we use
+  -- the "doForceSave" parameter of dbot.storage.saveTable() to explicitly force saving state on a
+  -- reset.  We don't use that parameter on a normal dbot.wish.save() call.
+  local retval = dbot.storage.saveTable(dbot.backup.getCurrentDir() .. dbot.wish.name,
+                                        "dbot.wish.table", dbot.wish.table, true)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("dbot.wish.reset: Failed to save wish persistent data: " .. dbot.retval.getString(retval))
+  end -- if
+
+  return retval
+end -- dbot.wish.reset
+
+
+dbot.wish.inProgress = false
+function dbot.wish.get()
+  if (dbot.wish.inProgress == true) then
+    dbot.info("Skipping request to get list of active wishes: another request is in progress")
+    return DRL_RET_BUSY
+  end -- if
+
+  dbot.wish.inProgress = true
+
+  wait.make(dbot.wish.getCR)
+
+  return DRL_RET_SUCCESS
+end -- dbot.wish.get
+
+
+function dbot.wish.getCR()
+  local retval = DRL_RET_SUCCESS
+  local charState = dbot.gmcp.getState()
+  local pageLines, retval = dbot.pagesize.get()
+
+  -- If we are not in the active state (i.e., AFK, sleeping, running, writing a note, etc.) then
+  -- we can't get the list of wishes and we need to try again later
+  if (charState ~= dbot.stateActive) then
+    dbot.note("Skipping request to get list of active wishes: you are in the state \"" .. 
+            dbot.gmcp.getStateString(charState) .. "\"")
+    retval = DRL_RET_NOT_ACTIVE
+
+  -- We are in the active state and can execute commands on the server side
+  elseif (pageLines ~= nil) then
+
+    -- Execute the "wish list" command
+    local commandArray = {}
+    table.insert(commandArray, "pagesize 0")
+    table.insert(commandArray, "wish list")
+    table.insert(commandArray, "pagesize " .. pageLines)
+
+    local resultData = dbot.callback.new()
+    retval = dbot.execute.safe.commands(commandArray, dbot.wish.setupFn, nil,
+                                        dbot.wish.resultFn, resultData)
+    if (retval ~= DRL_RET_SUCCESS) then
+      dbot.warn("dbot.wish.getCR: Failed to safely execute \"@Gwish list@W\": " ..
+                dbot.retval.getString(retval))
+    else
+      -- Wait for confirmation that the "wish list" safe execution command completed
+      retval = dbot.callback.wait(resultData, 30)
+      if (retval ~= DRL_RET_SUCCESS) then
+        dbot.note("Skipping \"wish list\" request: " .. dbot.retval.getString(retval))
+      end -- if
+
+      -- Wait for the wish trigger to complete
+      local totTime = 0
+      local timeout = 5
+      while (dbot.wish.inProgress == true) do
+        if (totTime > timeout) then
+          dbot.warn("dbot.wish.getCR: Timed out getting list of wishes")
+          retval = DRL_RET_TIMEOUT
+          break
+        end -- if
+
+        wait.time(drlSpinnerPeriodDefault)
+        totTime = totTime + drlSpinnerPeriodDefault
+      end -- while
+    end -- if
+
+  else
+    dbot.warn("Failed to detect # of lines in the page size: " .. dbot.retval.getString(retval))
+  end -- if
+
+  dbot.wish.inProgress = false
+
+  -- If we weren't able to snag the list of wishes, try again later
+  if (retval ~= DRL_RET_SUCCESS) then
+    -- We can't add the timer directly because we are in the function called by that timer.  Instead,
+    -- we use an intermediate timer to call back and start this timer again.  Yeah, it's a bit ugly...
+    DoAfterSpecial(0.1, 
+                   "AddTimer(dbot.wish.timer.name, 0, dbot.wish.timer.min, dbot.wish.timer.sec, \"\", " ..
+                   "timer_flag.Enabled + timer_flag.Replace + timer_flag.OneShot, \"dbot.wish.get\")",
+                   sendto.script)
+  else
+    -- We found the wishes.  Save them!
+    dbot.debug("dbot.wish.getCR: detected purchased wishes!")
+    dbot.wish.save()
+  end -- if
+
+  return retval
+end -- dbot.wish.getCR
+
+
+function dbot.wish.trigger.fn(line)
+  local wishName = string.match(line, ".*[-][-] ([^ -]+)[ ]*$")
+
+  if (line == nil) or (line == "") then
+    EnableTrigger(dbot.wish.trigger.itemName, false)
+    dbot.wish.inProgress = false
+  end -- if
+
+  if (wishName ~= nil) then
+    dbot.wish.table[wishName] = true
+    dbot.debug("Found wish name \"" .. wishName .. "\"")
+  end -- if
+
+end -- dbot.wish.trigger.fn
+
+
+function dbot.wish.has(wishName)
+  if (wishName == nil) or (wishName == "") or 
+     (dbot.wish.table == nil) or (dbot.wish.table[wishName] == nil) then
+    return false
+  else
+    return true
+  end -- if
+end -- dbot.wish.has
+
+
+function dbot.wish.setupFn()
+  -- Add a trigger to watch for the start of the "wish list" output
+  check (AddTriggerEx(dbot.wish.trigger.startName,
+                      "^.*Base.*Cost.*Adjustment.*Your.*Cost.*Keyword.*$",
+                      "EnableTrigger(dbot.wish.trigger.itemName, true)",
+                      drlTriggerFlagsBaseline + trigger_flag.OneShot + trigger_flag.OmitFromOutput,
+                      custom_colour.Custom11,
+                      0, "", "", sendto.script, 0))
+
+  dbot.pagesize.hide()
+
+end -- dbot.wish.setupFn
+
+
+function dbot.wish.resultFn(resultData, retval)
+  dbot.pagesize.show()
+
+  dbot.callback.default(resultData, retval)
+end -- dbot.wish.resultFn
+
+----------------------------------------------------------------------------------------------------
+--
+-- Module to get and set the mud's output page size
+--
+-- Page size refers to the number of lines of output that are displayed in one command before the mud
+-- gives the user a page prompt
+--
+-- dbot.pagesize.init.atActive()
+-- dbot.pagesize.fini(doSaveState)
+--
+-- dbot.pagesize.get() -- Note: this must be called from within a co-routine
+--
+-- dbot.pagesize.hide()
+-- dbot.pagesize.show()
+--
+-- dbot.pagesize.trigger.fn()                 -- catch the # lines output
+-- dbot.pagesize.setupFn(setupData)           -- enable the trigger
+-- dbot.pagesize.resultFn(resultData, retval) -- disable the trigger
+--
+-- Output syntax:
+--   You currently display 55 lines per page.
+--   Use 'pagesize <lines>' to change, or 'pagesize 0' to disable paging.
+----------------------------------------------------------------------------------------------------
+
+dbot.pagesize         = {}
+dbot.pagesize.init    = {}
+dbot.pagesize.trigger = {}
+dbot.pagesize.lines   = nil
+
+dbot.pagesize.trigger.getName      = "drlDbotPageSizeTrigger"
+dbot.pagesize.trigger.suppressName = "drlDbotPageSizeSuppressTrigger"
+
+
+function dbot.pagesize.init.atActive()
+  local retval = DRL_RET_SUCCESS
+
+  -- Trigger on the output of "pagesize" and watch for an empty line indicating that we are done
+  check (AddTriggerEx(dbot.pagesize.trigger.getName,
+                      "^$" ..
+                      "|You currently display ([0-9]+) lines per page." ..
+                      "|Use .* to disable paging.",
+                      "dbot.pagesize.trigger.fn(\"%1\")",
+                      drlTriggerFlagsBaseline + trigger_flag.OmitFromOutput,
+                      custom_colour.Custom11, 0, "", "", sendto.script, 0))
+  check (EnableTrigger(dbot.pagesize.trigger.getName, false)) -- default to off
+
+  check (AddTriggerEx(dbot.pagesize.trigger.suppressName,
+                      "^(Paging disabled.|Page size set to .* lines.)$",
+                      "",
+                      drlTriggerFlagsBaseline + trigger_flag.OmitFromOutput,
+                      custom_colour.Custom11, 0, "", "", sendto.script, 0))
+  check (EnableTrigger(dbot.pagesize.trigger.suppressName, false)) -- default to off
+
+  return retval
+end -- dbot.pagesize.init.atActive
+
+
+function dbot.pagesize.fini(doSaveState)
+  local retval = DRL_RET_SUCCESS
+
+  dbot.deleteTrigger(dbot.pagesize.trigger.getName)
+  dbot.deleteTrigger(dbot.pagesize.trigger.suppressName)
+
+  -- We don't currently save the state of the page size, but we could add that here if we wanted to
+
+  return retval
+end -- dbot.pagesize.fini
+
+
+function dbot.pagesize.get()
+  local retval = DRL_RET_SUCCESS  
+  local commandArray = { "pagesize" }
+
+  retval = dbot.execute.safe.blocking({"pagesize"}, dbot.pagesize.setupFn, nil, dbot.pagesize.resultFn, 10)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.note("Skipped getting \"@Gpagesize@W\": " ..
+              dbot.retval.getString(retval))
+  else
+    dbot.debug("Read current page size: " .. (dbot.pagesize.lines or "nil"))
+  end -- if
+
+  return dbot.pagesize.lines, retval
+end -- dbot.pagesize.get
+
+
+function dbot.pagesize.hide()
+  EnableTrigger(dbot.pagesize.trigger.suppressName, true)
+end -- dbot.pagesize.hide
+
+
+function dbot.pagesize.show()
+  EnableTrigger(dbot.pagesize.trigger.suppressName, false)
+end -- dbot.pagesize.show
+
+
+function dbot.pagesize.trigger.fn(size)
+  local lines = tonumber(size or "")
+
+  if (lines ~= nil) then
+    dbot.pagesize.lines = lines
+  end -- if
+end -- dbot.pagesize.trigger.fn
+
+
+function dbot.pagesize.setupFn(setupData)
+  EnableTrigger(dbot.pagesize.trigger.getName, true)
+end -- dbot.pagesize.setupFn
+
+
+function dbot.pagesize.resultFn(resultData, retval)
+  EnableTrigger(dbot.pagesize.trigger.getName, false)
+  dbot.callback.default(resultData, retval)
+end -- dbot.pagesize.resultFn
+
+
+----------------------------------------------------------------------------------------------------
+--
+-- Module to execute one more commands on the mud server side
+--
+-- Commands come in two flavors:
+--  1) "Fast": these are non-atomic and can be interrupted at any time.  There are no guarantees that
+--     we will know when "fast" commands execute which means that we can't know for certain if triggers
+--     are matching on any particular command output.
+--  2) "Safe": safe commands guarantee that there will be no contention with any commands sent by the
+--     user.  Safe commands run atomically on the mud at a time when we guarantee that no other commands
+--     can execute on the mud server.  We do this by halting any new commands (via the OnPluginSend()
+--     callback) and queuing up those commands to run after our atomic critical section completes.  We
+--     guarantee that no user commands are lost and they will execute in the same order as they were
+--     sent.  We also guarantee that user-supplied setup and cleanup callbacks will be executed during
+--     the critical section without any contention from commands the user enters.  This allows us to
+--     set up and clean up triggers and know that if a trigger goes off that it is triggering on the
+--     output we want -- not something that the user entered at the command line.  Safe commands are
+--     very convenient because they also let us cleanly handle cases where the user sleeps, enters
+--     combat, or goes AFK unexpectedly.  Knowing that these state changes can't occur during one of
+--     our "safe" critical sections greatly simplifies the code.
+--
+-- Here are the steps to safely run a background command without interference
+--   1) Spin until we are in the "active" state (e.g., not AFK, sleeping, etc.)
+--   2) Prevent new commands from going to the mud by watching for them in OnPluginSend() and queuing
+--      them up for future execution
+--   3) Add a one-shot trigger to catch a unique prefix message we will echo to the mud
+--   4) Echo a unique prefix message to the mud
+--   5) Wait for the trigger to hit and tell us that our unique prefix message was executed by
+--      the mud.  No other commands can be pending at the mud's server side at this point.
+--   6) Send the command(s) we want to run atomically
+--   7) Execute any user-supplied setup callback to configure triggers
+--   8) Capture the output (either success or failure) with user-supplied triggers 
+--   9) Add a one-shot trigger to catch a unique suffix message we will echo to the mud
+--  10) Send a unique suffix message to the mud
+--  11) Wait until our trigger detects that the mud echoed our suffix
+--  12) If the caller provided us a cleanup/result callback function, execute it now to let the caller
+--      know that we are done and to tell the caller the result status
+--  13) Send any pending commands that we queued up during the safe critical section
+--  14) Unblock the OnPluginSend() callback so that new commands from the user go straight to the mud again
+--
+-- Functions:
+--
+-- dbot.execute.init.atActive()
+-- dbot.execute.fini(doSaveState)
+--
+-- dbot.execute.fast.command(commandString)
+-- dbot.execute.fast.commands(commandArray)
+--
+-- dbot.execute.safe.command(commandString, setupFn, setupData, resultFn, resultData)
+-- dbot.execute.safe.commands(commandArray, setupFn, setupData, resultFn, resultData)
+-- dbot.execute.safe.commandsCR()
+-- dbot.execute.safe.blocking(commandArray, setupFn, setupData, resultFn, timeout)
+--
+-- dbot.execute.queue.enable()
+-- dbot.execute.queue.disable()
+-- dbot.execute.queue.pushFast(command)
+-- dbot.execute.queue.pushSafe(commandArray, setupFn, setupData, resultFn, resultData)
+-- dbot.execute.queue.pop()
+-- dbot.execute.queue.fence()
+-- dbot.execute.queue.bypass(command)
+-- dbot.execute.queue.dequeueCR()
+-- dbot.execute.queue.getCommandString(commandArray)
+-- dbot.execute.new()
+--
+-- Data:
+--   dbot.execute.table
+--
+----------------------------------------------------------------------------------------------------
+
+dbot.execute                    = {}
+dbot.execute.table              = {}
+dbot.execute.queue              = {}
+dbot.execute.init               = {}
+dbot.execute.fast               = {}
+dbot.execute.safe               = {}
+
+dbot.execute.doDelayCommands    = false
+dbot.execute.isDequeueRunning   = false
+dbot.execute.afkIsPending       = false
+dbot.execute.quitIsPending      = false
+dbot.execute.fenceIsDetected    = false
+dbot.execute.bypassPrefix       = "DINV_BYPASS "
+
+dbot.execute.trigger            = {}
+dbot.execute.trigger.fenceName  = "drlDbotExecuteFenceTrigger"
+
+drlDbotExecuteTypeFast = "fast"
+drlDbotExecuteTypeSafe = "safe"
+
+
+function dbot.execute.init.atActive()
+  -- Placeholder: nothing to do here yet
+  return DRL_RET_SUCCESS
+end -- dbot.execute.init.atActive
+
+
+function dbot.execute.fini(doSaveState)
+  -- These are one-shot triggers and shouldn't exist here, but it doesn't hurt to verify
+  -- that they are gone
+  dbot.deleteTrigger(dbot.execute.trigger.fenceName)
+
+  dbot.execute.doDelayCommands  = false
+  dbot.execute.isDequeueRunning = false
+  dbot.execute.afkIsPending     = false
+  dbot.execute.quitIsPending    = false
+
+  if (doSaveState) then
+    -- Placeholder: If we ever add state to the execute module we should save it here
+  end -- if
+
+  return DRL_RET_SUCCESS
+end -- dbot.execute.fini
+
+
+function dbot.execute.fast.command(commandString)
+  local origEchoInput = GetEchoInput()
+
+  SetEchoInput(false)
+  check (Execute(commandString))
+  SetEchoInput(origEchoInput)
+
+  return DRL_RET_SUCCESS
+end -- dbot.execute.fast.command
+
+
+-- This function simply pushes the commands in the command array to the mud server.  It doesn't
+-- do any type of error checking or handling for the commands that are sent.  It does not require
+-- a co-routine because it executes all in one shot and never yields.
+function dbot.execute.fast.commands(commandArray)
+  local retval = DRL_RET_SUCCESS
+
+  if (commandArray == nil) then
+    dbot.warn("dbot.execute.fast.commands: Missing command array parameter")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  -- We don't want all of our commands to echo to the client.  Remember what the original echo
+  -- state is so that we can restore that state when we are done.
+  local origEchoInput = GetEchoInput()
+  SetEchoInput(false)
+
+  for _, command in ipairs(commandArray) do
+    if (command ~= nil) and (command ~= "") then
+      check (Execute(command))
+    end -- if
+  end -- for
+
+  -- Restore the echo state before we return
+  SetEchoInput(origEchoInput)
+  
+  return retval
+end -- dbot.execute.fast.commands
+
+
+-- This is a special case for the dbot.execute.safe.commands() call which uses just a
+-- single command string.  The command is run atomically with nothing else in the mud's
+-- command queue to interfere with it.
+function dbot.execute.safe.command(commandString, setupFn, setupData, resultFn, resultData)
+  local commandArray = {}
+  table.insert(commandArray, commandString)
+
+  return dbot.execute.safe.commands(commandArray, setupFn, setupData, resultFn, resultData)
+end -- dbot.execute.safe.command
+
+
+function dbot.execute.safe.commands(commandArray, setupFn, setupData, resultFn, resultData)
+  local retval
+
+  -- Enter a critical section if one isn't already in progress
+  dbot.execute.queue.enable()
+
+  -- Push the current request onto the end of the command queue
+  retval = dbot.execute.queue.pushSafe(commandArray, setupFn, setupData, resultFn, resultData)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("dbot.execute.safe.commads: Failed to push request onto queue: " ..
+              dbot.retval.getString(retval))
+  else
+    -- We just added a new command to the command queue.  If we don't already have a 
+    -- co-routine processing commands on that queue, start one now.
+    if (not dbot.execute.queue.isDequeueRunning) then
+      dbot.execute.queue.isDequeueRunning = true
+      wait.make(dbot.execute.queue.dequeueCR)
+    end -- if
+  end -- if
+
+  return retval
+end -- dbot.execute.safe.commands
+
+
+function dbot.execute.safe.blocking(commandArray, setupFn, setupData, resultFn, timeout)
+
+  if (commandArray == nil) then
+    dbot.warn("dbot.execute.safe.blocking: Missing command array parameter")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  timeout = tonumber(timeout or "")
+  if (timeout == nil) then
+    dbot.warn("dbot.execute.safe.blocking: Missing timeout parameter")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  -- If there is nothing to do, do it successfully :)
+  if (#commandArray < 1) then
+    return DRL_RET_SUCCESS
+  end -- if
+
+  local resultData = dbot.callback.new()
+
+  local retval = dbot.execute.safe.commands(commandArray, setupFn, setupData, resultFn, resultData)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.debug("dbot.execute.safe.blocking: Failed to execute command array: " ..
+               dbot.retval.getString(retval))
+  else
+    -- Wait for the callback to confirm that the safe execution completed
+    retval = dbot.callback.wait(resultData, timeout)
+  end -- if
+
+  return retval
+end -- dbot.execute.safe.blocking
+
+
+function dbot.execute.queue.enable()
+  dbot.execute.doDelayCommands = true
+end -- dbot.execute.queue.get
+
+
+function dbot.execute.queue.disable()
+  dbot.execute.doDelayCommands = false
+end -- dbot.execute.queue.get
+
+
+-- command table format:
+--   { commandType  = drlDbotExecuteTypeFast,  -- or drlDbotExecuteTypeSafe
+--     commands     = { "command 1",
+--                      "command 2",
+--                      ...
+--                      "command N"
+--                    }
+--     setupFn      = mySetupFunctionCallback
+--     setupData    = mySetupDataParameter
+--     resultFn     = myResultFunctionCallback
+--     resultData   = myResultDataParameter
+--   }
+function dbot.execute.queue.pushFast(command)
+  local commandEntry
+
+  if (command == nil) then
+    dbot.warn("dbot.execute.queue.pushFast: command is missing")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  commandEntry              = {}
+  commandEntry.commandType  = drlDbotExecuteTypeFast
+  commandEntry.commands     = { command }
+  commandEntry.setupFn      = nil
+  commandEntry.setupData    = nil
+  commandEntry.resultFn     = nil
+  commandEntry.resultData   = nil 
+
+  table.insert(dbot.execute.table, commandEntry)
+
+  dbot.debug("Queued fast command: \"@G" .. command .. "@W\"")
+
+  return DRL_RET_SUCCESS
+end -- dbot.execute.queue.pushFast
+
+
+function dbot.execute.queue.pushSafe(commandArray, setupFn, setupData, resultFn, resultData)
+  local commandEntry
+
+  if (commandArray == nil) then
+    dbot.warn("dbot.execute.queue.pushSafe: command array is missing")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  commandEntry              = {}
+  commandEntry.commandType  = drlDbotExecuteTypeSafe
+  commandEntry.commands     = commandArray
+  commandEntry.setupFn      = setupFn
+  commandEntry.setupData    = setupData
+  commandEntry.resultFn     = resultFn
+  commandEntry.resultData   = resultData
+
+  table.insert(dbot.execute.table, commandEntry)
+
+  local commandString = dbot.execute.queue.getCommandString(commandArray)
+  dbot.debug("Queued safe commands: \"@G" .. commandString .. "@W\"")
+
+  return DRL_RET_SUCCESS
+end -- dbot.execute.queue.pushSafe
+
+
+function dbot.execute.queue.pop()
+  local commandEntry = table.remove(dbot.execute.table, 1)
+
+  return commandEntry
+end -- dbot.execute.queue.pop
+
+
+-- We need a unique prefix to attach to a fence command so that we don't confuse one fence
+-- with another.  The simplest way to do that is to simply count fence commands and prepend
+-- the count to the fence name.
+dbot.execute.queue.fenceCounter = 1
+
+-- The fence call sends an echo command to the mud server and blocks until the echo is detected.
+-- This is very useful in conjuction with our OnPluginSend() code that queues up and delays user
+-- commands.  If we delay new commands from going to the mud and we detect our fence output, then
+-- we know that no other commands are pending on the mud server and there won't be interference
+-- on what we send next.
+--
+-- We only call fence() from within a critical section where we have checked that we are in a
+-- user state that allows the fence to proceed.  We don't need to worry about being AFK here.
+function dbot.execute.queue.fence()
+
+  local uniqueString = "{ dbot.execute.queue.fence " .. dbot.execute.queue.fenceCounter .. " }"
+
+  -- We will spin on this until we match the fence command in our trigger
+  dbot.execute.fenceIsDetected = false
+
+  -- Add a one-shot trigger to catch the fence message that we will echo to the mud
+  check (AddTriggerEx(dbot.execute.trigger.fenceName,
+                      "^.*" .. uniqueString .. ".*$",
+                      "dbot.execute.fenceIsDetected = true",
+                      drlTriggerFlagsBaseline + trigger_flag.OneShot + trigger_flag.OmitFromOutput,
+                      custom_colour.Custom11, 0, "", "", sendto.script, 0))
+
+  -- If we are blocking new commands, we must explicitly bypass that protection in order to send
+  -- a command to the mud server.
+  local retval = dbot.execute.queue.bypass("echo " .. uniqueString)
+  if (retval ~= DRL_RET_SUCCESS) then
+    dbot.warn("dbot.execute.queue.fence: Failed to bypass command: " .. dbot.retval.getString(retval))
+    return retval
+  end -- if
+
+  -- Spin until we have confirmation that the mud received the fence message or until we detect
+  -- that we are in a state that will prevent the message from completing
+  totTime = 0
+  timeout = 20 -- wait a while since we there might be a lot of stuff queued up on the server
+  while (dbot.execute.fenceIsDetected == false) do
+    local charState = dbot.gmcp.getState()
+
+    if (inv.state == invStateHalted) then
+      dbot.note("Skipping fence request: plugin is halted!")
+      retval = DRL_RET_UNINITIALIZED
+      break
+
+    elseif (totTime > timeout) then
+      dbot.note("Skipping fence request: fence message timed out")
+      retval = DRL_RET_TIMEOUT
+      break
+
+    elseif ((charState ~= dbot.stateActive) and
+            (charState ~= dbot.stateCombat) and
+            (charState ~= dbot.stateRunning)) then
+      dbot.note("Skipping fence request: you are in the \"@C" .. dbot.gmcp.getStateString(charState) ..
+                "@W\" state")
+      retval = DRL_RET_NOT_ACTIVE
+      break
+    end -- if
+
+    wait.time(drlSpinnerPeriodDefault)
+    totTime = totTime + drlSpinnerPeriodDefault
+  end -- while
+  
+  -- Remove the trigger if an error occurred and the one-shot trigger is still pending
+  if (retval ~= DRL_RET_SUCCESS) then
+    DeleteTrigger(dbot.execute.trigger.fenceName)
+  end -- if
+
+  dbot.execute.queue.fenceCounter = dbot.execute.queue.fenceCounter + 1
+
+  return retval
+end -- dbot.execute.queue.fence
+
+
+function dbot.execute.queue.bypass(command)
+  if (command == nil) then
+    dbot.warn("dbot.execute.queue.bypass: missing command parameter")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  --dbot.note("Bypassing command \"@G" .. command .. "@W\"")
+  check (SendNoEcho(dbot.execute.bypassPrefix .. command))
+
+  return DRL_RET_SUCCESS
+end -- dbot.execute.queue.bypass
+
+
+function dbot.execute.queue.dequeueCR()
+  local retval = DRL_RET_SUCCESS
+
+  while (#dbot.execute.table > 0) do
+    local charState = dbot.gmcp.getState()
+
+    -- Get the next command (or array of commands) from the queue
+    local commandEntry = dbot.execute.queue.pop()
+    if (commandEntry == nil) then
+      dbot.warn("dbot.execute.queue.dequeueCR: Popped a nil entry off of a non-empty queue")
+      break
+    end -- if
+
+    -- Creating a string that concatenates all of the commands is helpful for debugging and notifications
+    local commandString = dbot.execute.queue.getCommandString(commandEntry.commands)
+
+    -- If we have a "fast" command, send it directly to the mud.  Easy peasy.
+    if (commandEntry.commandType == drlDbotExecuteTypeFast) then
+      if (commandEntry.commands ~= nil) then
+        for _, command in ipairs(commandEntry.commands) do
+          dbot.debug("Executing queued fast command \"@G" .. command .. "@W\"")
+          retval = dbot.execute.queue.bypass(command)
+        end -- for
+      end -- if
+
+    elseif (commandEntry.commandType == drlDbotExecuteTypeSafe) then
+
+      -- If we are in the running state, wait for a while until we get out of that state.
+      -- The char can't run forever :)  We could also wait if we are in another state that
+      -- prevents us from executing, but the odds of someone coming out of AFK or sleeping
+      -- at just the right moment are low.  We know that a run will end relatively soon so
+      -- we handle that case a little differently to reduce the odds of aborting a request.
+      local totTime = 0
+      local timeout = 20
+      while (timeout < totTime) do
+        charState = dbot.gmcp.getState()
+        if (charState ~= dbot.stateRunning) then
+          break
+        end -- if
+
+        wait.time(drlSpinnerPeriodDefault)
+        totTime = totTime + drlSpinnerPeriodDefault
+      end -- while
+
+      -- We can only run safe execution commands when we are either active or in combat
+      --
+      -- If a safe execution command cannot run because the user is too busy or if the user
+      -- is in the wrong state (AFK, sleeping, note, etc.) we let the caller know via the
+      -- callback parameter's return value field.  It is up to the caller to resubmit the 
+      -- request if they really want it to run.  We do not try to re-queue the request here.
+      -- Yes, we could re-queue the request and set a timer to attempt to run it later, but
+      -- that's a lot of complexity for low odds of success.  If the user really is AFK or
+      -- sleeping, the calling function will almost certainly time out before the state is
+      -- what we need so we make it our policy to leave everything in the caller's hands.
+      if (charState ~= dbot.stateActive) and (charState ~= dbot.stateCombat) then
+        dbot.note("Skipping queued safe commands: \"@G" .. commandString .. "@W\": you are in state \"@C" ..
+                  dbot.gmcp.getStateString(charState) .. "@W\"")
+        retval = DRL_RET_NOT_ACTIVE
+
+      elseif dbot.execute.quitIsPending then
+        dbot.note("Skipping queued safe commands: \"@G" .. commandString .. 
+                  "@W\": a request to quit is pending on the mud server")
+        retval = DRL_RET_UNINITIALIZED
+
+      elseif dbot.execute.afkIsPending then
+        dbot.note("Skipping queued safe commands: \"@G" .. commandString .. 
+                  "@W\": a request to go AFK is pending on the mud server")
+        retval = DRL_RET_NOT_ACTIVE
+
+      else
+        retval = dbot.execute.queue.fence()
+        if (retval ~= DRL_RET_SUCCESS) then
+          dbot.debug("dbot.execute.queue.dequeueCR: Failed to execute prefix fence: " ..
+                    dbot.retval.getString(retval))
+        else
+          if (commandEntry.setupFn ~= nil) then
+            commandEntry.setupFn(commandEntry.setupData)
+          end -- if
+
+          dbot.prompt.hide()
+
+          if (commandEntry.commands ~= nil) then
+            for _, command in ipairs(commandEntry.commands) do
+              dbot.debug("Executing queued safe command \"@G" .. command .. "@W\"")
+              dbot.execute.queue.bypass(command)
+            end -- for
+          else
+            dbot.warn("dbot.execute.queue.dequeueCR: commands array is nil!!!")
+          end -- if
+
+          retval = dbot.execute.queue.fence()
+          if (retval ~= DRL_RET_SUCCESS) then
+            dbot.warn("dbot.execute.queue.dequeueCR: Failed to execute suffix fence: " ..
+                      dbot.retval.getString(retval))
+          end -- if
+
+          dbot.prompt.show()
+        end -- if
+      end -- if
+
+    else
+      dbot.warn("dbot.execute.queue.dequeueCR: invalid commandType field \"@R" ..
+                (commandEntry.commandType or "nil") .. "@W\"")
+      retval = DRL_RET_INTERNAL_ERROR
+    end -- if
+
+    if (commandEntry.resultFn ~= nil) then
+      commandEntry.resultFn(commandEntry.resultData, retval)
+    end -- if
+
+  end -- while
+
+  dbot.execute.queue.isDequeueRunning = false
+  dbot.execute.queue.disable()
+
+end -- dbot.execute.queue.dequeueCR
+
+
+-- Build up a command string containing all commands in the command array delimited by semicolons.
+-- This is useful for notification messages and debugging.
+function dbot.execute.queue.getCommandString(commandArray)
+  local commandString = ""
+
+  if (commandArray ~= nil) and (#commandArray > 0) then
+    for _, command in ipairs(commandArray) do
+      if (command ~= "") then
+        if (commandString == nil) or (commandString == "") then
+          commandString = command
+        else
+          commandString = commandString .. "; " .. command
+        end -- if
+      end -- if
+    end -- for
+  end -- if
+
+  return commandString
+end -- dbot.execute.queue.getCommandString
+
+
+function dbot.execute.new()
+  if (not inv.inSafeMode) then
+    return {}
+  end -- if
+
+  return nil
+end -- dbot.execute.newCommands
+
+
+----------------------------------------------------------------------------------------------------
+-- Module to assist with callback management
+--
+-- dbot.callback.new()
+-- dbot.callback.setReturn(resultData, value)
+-- dbot.callback.getReturn(resultData)
+-- dbot.callback.isDone(resultData) -- returns true or false
+-- dbot.callback.default(resultData, retval))
+-- dbot.callback.wait(resultData, timeoutInSec, periodInSec)
+--
+----------------------------------------------------------------------------------------------------
+
+dbot.callback = {}
+
+
+function dbot.callback.new()
+  return { isDone = false, retval = DRL_RET_UNINITIALIZED }
+end -- dbot.callback.new
+
+
+function dbot.callback.setReturn(resultData, value)
+  if (resultData == nil) then
+    dbot.warn("dbot.callback.setReturn: callback parameter is nil")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  if (value == nil) then
+    dbot.warn("dbot.callback.setReturn: missing value parameter")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  resultData.retval = value
+
+  return DRL_RET_SUCCESS
+end -- dbot.callback.setReturn
+
+
+function dbot.callback.getReturn(resultData)
+  if (resultData == nil) then
+    dbot.warn("dbot.callback.getReturn: callback parameter is nil")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  return resultData.retval
+end -- dbot.callback.getReturn
+
+
+function dbot.callback.isDone(resultData) -- returns true or false
+  if (resultData ~= nil) then
+    return resultData.isDone
+  else
+    return false
+  end -- if
+end -- dbot.callback.isDone
+
+
+function dbot.callback.default(resultData, retval)
+  if (resultData ~= nil) then
+    if (retval ~= nil) then
+      dbot.callback.setReturn(resultData, retval)
+    end -- if
+
+    resultData.isDone = true
+  end -- if
+end -- dbot.callback.default
+
+
+function dbot.callback.wait(resultData, timeout, period)
+  local retval = DRL_RET_SUCCESS
+  local totTime = 0
+
+  if (resultData == nil) then
+    dbot.warn("dbot.callback.wait: missing callback parameter")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  timeout = tonumber(timeout or "")
+  if (timeout == nil) then
+    dbot.warn("dbot.callback.wait: missing timeout parameter")
+    return DRL_RET_INVALID_PARAM
+  end -- if
+
+  -- The period is optional.  If it isn't provided, use the default value.
+  if (period == nil) then
+    period = drlSpinnerPeriodDefault
+  end -- if
+
+  while (dbot.callback.isDone(resultData) == false) do
+    if (totTime > timeout) then
+      dbot.debug("dbot.callback.wait: timed out waiting for a callback to complete")
+      retval = DRL_RET_TIMEOUT
+      break
+    end -- if
+
+    wait.time(period)
+    totTime = totTime + period
+  end -- while
+
+  -- If there was a problem accessing the callback, return an error corresponding to the problem
+  -- we hit.  Otherwise, return the return value for the operation executed by the callback.
+  if (retval ~= DRL_RET_SUCCESS) then
+    return retval
+  else
+    return dbot.callback.getReturn(resultData)
+  end -- if
+end -- dbot.callback.wait
+
+
+]]>
+</script>
+
+
+<!--  Plugin help  -->
+
+<aliases>
+  <alias
+   script="OnHelp"
+   match="dinv:help"
+   enabled="y"
+  >
+  </alias>
+</aliases>
+
+<script>
+<![CDATA[
+function OnHelp ()
+  world.Note (world.GetPluginInfo (world.GetPluginID (), 3))
+end
+]]>
+</script> 
+
+</muclient
+>