2e3
@verb #4457:"do_e do_a do_d" none none none rxdo #4457
@program #4457:"do_e do_a do_d" none none none
{number} = args
number = toint(number)
if (verb[$] == "e")
  player:tell("Editing ", this.awaym[number])
  new = $cmd_utils:read("Enter the new message.")
  player:tell("message #", number, " changed from ", this.awaym[number], " to ", this.awaym[number] = new)
elseif (verb[$] == "a")
  new = $cmd_utils:read("Enter the new message.")
  this.awaym = {@this.awaym, new}
  player:tell("New message ", new, " added at position ", new in this.awaym, ".")
else
  this.awaym = setremove(this.awaym, this.awaym[number])
  player:tell("Removed message.")
endif
"Last modified by Dax (#789) on Tue May  3 14:09:35 2005 MDT."
.

0