Script: Mastercrier

inherits globals;

member list Q641;

trigger message("towncrieradd")
{
  obj it = args[0x00];
  if (!isInList(Q641, it))
  {
    appendToList(Q641, it);
  }
  return (0x01);
}

trigger message("towncrierremove")
{
  obj it = args[0x00];
  if (isInList(Q641, it))
  {
    removeSpecificItem(Q641, it);
  }
  return (0x01);
}

function void Q55I(string Q56W, list args)
{
  int num = numInList(Q641);
  for(int i = 0x00; i < num; i++)
  {
    obj it = Q641[i];
    multiMessage(it, Q56W, args);
  }
  return ();
}

trigger message("towncrieraddmessage")
{
  Q55I("towncrieraddmessage", args);
  return (0x01);
}

trigger message("towncrierremovemessage")
{
  Q55I("towncrierremovemessage", args);
  return (0x01);
}

trigger decay
{
  return (0x00);
}