queue = {}

table.insert(queue, "say Hello!")
table.insert(queue, {interp=true, text="tell @person Hello!"})
table.insert(queue, {interp=true, script=true, text="Send('tell @person Hello!')"})

function remove_alias(name)
  EnableAlias(name, false)
  DoAfterSpecial (1, "DeleteAlias ('" .. name .. "')", 12) -- delete it
end

function sendQueue()
  local tosend = table.remove(queue)
  
  -- if its a plain string then we don't need to do anything special
  --
  if type(tosend) == "string" then
    Send(tosend)
    return
    
  -- if its a table then we need to execute it through an alias
  --
  elseif type(tosend) == "table" then
  
    -- set the default flags for the alias
    local flags = alias_flag.Enabled + alias_flag.Temporary
    
    -- if the "interp" option is set then alias needs to expand variables
    flags = tosend.interp and (flags + alias_flag.ExpandVariables) or flags
    
    -- get a unique number to use for alias' match and name
    local alias_id = GetUniqueID()
    
    -- create the alias
    AddAlias("queue_alias_" .. alias_id, alias_id, tosend.text, flags, "remove_alias")
    
    -- if the "script" option is set then the alias must also send to scripting
    --
    if tosend.script then
      SetAliasOption("queue_alias_" .. alias_id, "send_to", "12")
    end
    
    -- execute the alias
    Execute(alias_id)
    
  end
 
end

-- test it
--
sendQueue()
sendQueue()
sendQueue()

<aliases>
  <alias
   match="queue *"
   enabled="y"
   send_to="12"
   sequence="100"
  >
  <send>queue = queue or {}  -- make table if it doesn't exist

do
  local command = [[%1]]  -- get wildcard 1
  
  local errors =  {} -- no errors yet
  
  -- function to do the replacements for string.gsub
  
  local function replace_variables (s)
    s = string.sub (s, 2)  -- remove the @
    replacement = GetVariable (s)    -- look up variable
    if not replacement then  -- not there, add to errors list
      table.insert (errors, s)
      return
    end -- not there
    return replacement  -- return variable
  end -- replace_variables 
  
  -- replace all variables starting with @
  
  command = string.gsub (command, "@%a[%w_]*", replace_variables)
  
  -- report any errors
  
  if table.getn (errors) &gt; 0 then
    for k, v in ipairs (errors) do
      ColourNote ("white", "red", "Variable '" .. v .. "' does not exist")
    end -- for
    return
  end -- error in replacing
  
  -- add to queue
  
  table.insert (queue, command)
end  -- do
</send>
  </alias>
</aliases>

<timers>
  <timer enabled="y" second="2.00"    send_to="12"
>
  <send>if type (queue) ~= "table" then
  return
end -- if no queue

if table.getn (queue) == 0 then
  return
end -- if nothing in queue

-- get head of queue, send to MUD
Send (table.remove (queue, 1))</send>

  </timer>
</timers>