The old version or my db version? Also it was made originally as pgroup only because those kind of raid functions should really be kept out of guild chat.

Here's a converted db version which "should" work, haven't tried it yet.

<?
  /*
   * Callers.php - Designate and list "Callers" for raids and events.
   *
   * BeBot - An Anarchy Online Chat Automaton
   * Copyright (C) 2004 Jonas Jax
   *
   * Developed by Blondengy (RK1)
   * Special thanks goes out to Khalem (RK1) for his support.
   *
   * File last changed at $LastChangedDate: 2004-12-29 01:41:32 +0100 (Wed, 29 Dec 2004) $
   * Revision: $Id: Callers.php 8 2004-12-29 00:41:32Z blondengy $
   *
   * MySQL Version modifed by Malosar: 12/10/2006
   * GC Function added at request by Malosar: 05/10/2006
   */

  $db -> query("CREATE TABLE IF NOT EXISTS callers
              (id INT NOT NULL AUTO_INCREMENT PRIMARY KEY,
              name VARCHAR(30))");

 
  $callers = new Callers($bot);


  $commands["pgmsg"]["caller"] = &$callers;
  $commands["pgmsg"]["callers"] = &$callers;
  $commands["gc"]["caller"] = &$callers;
  $commands["gc"]["callers"] = &$callers;




  /*
    The Class itself...
  */
  class Callers
  {
    var $bot;
    var $callers;
   
   

    /*
      Constructor:
        Hands over a referance to the "Bot" class.
    */
    function Callers (&$bot)
    {
      $this -> bot = &$bot;
      $this -> callers = array();
    }
   
   
   
    /*
      This gets called on a msg in the privgroup with the command
    */
    function pgmsg($name, $msg)
    {
      if ($this -> bot -> is_member($name))
      {
        if (preg_match("/^" . $this -> bot -> commpre . "callers/i", $msg))
          $this -> bot -> send_pgroup($this -> show_callers());
        else if (preg_match("/^" . $this -> bot -> commpre . "caller add (.+)/i", $msg, $info))
          $this -> bot -> send_pgroup($this -> caller_add($info[1]));
        else if (preg_match("/^" . $this -> bot -> commpre . "caller del (.+)/i", $msg, $info))
          $this -> bot -> send_pgroup($this -> caller_del($info[1]));
      }
      else
        $this -> bot -> send_pgroup("You must be a member to use this command.");
    }
   
    /*
      This gets called on a msg in the guildchannel with the command
    */
    function gc($name, $msg)
    {
      if ($this -> bot -> is_member($name))
      {
        if (preg_match("/^" . $this -> bot -> commpre . "callers/i", $msg))
          $this -> bot -> send_gc($this -> show_callers());
        else if (preg_match("/^" . $this -> bot -> commpre . "caller add (.+)/i", $msg, $info))
          $this -> bot -> send_gc($this -> caller_add($info[1]));
        else if (preg_match("/^" . $this -> bot -> commpre . "caller del (.+)/i", $msg, $info))
          $this -> bot -> send_gc($this -> caller_del($info[1]));
      }
      else
        $this -> bot -> send_gc("You must be a member to use this command.");
    }



    /*
      Add a caller
    */
    function caller_add($name)
    {
    $name = ucfirst(strtolower($name));

    if ($this -> bot -> aoc -> get_uid($name))
      {
$this -> bot -> db -> query("INSERT INTO callers (name) VALUES ('". $name ."')");
        $ret = "<font color=#ffff00>" . $name . "</font> has been added to caller list. " . $this -> show_callers();
      }
      else
        $ret = "Player <font color=#ffff00>" . $name . "</font> does not exist.";
return $ret;
    }



    /*
      Remove a caller
    */
    function caller_del($name)
    {
    $name = ucfirst(strtolower($name));

if ($this -> bot -> aoc -> get_uid($name) != -1)
      {
        if ($this -> bot -> db -> select("SELECT id, name FROM callers ORDER BY name"))
        {
  $this -> bot -> db -> query("DELETE FROM callers WHERE name = '" . $msg . "'");
          $ret = "<font color=#ffff00>" . $name . "</font> has been removed from caller list. " . $this -> show_callers();
        }
        else
          $ret = "<font color=#ffff00>" . $name . "</font> is not on list of callers. " . $this -> show_callers();
      }
      else
        $ret = "Player <font color=#ffff00>" . $name . "</font> does not exist.";
return $ret;
    }
   
   
   
    /*
      Return the list of callers
    */
    function show_callers()
    {
      $call = $this -> bot -> db -> select("SELECT id, name FROM callers ORDER BY name");
      if (empty($call))
        return "No callers on list.";
      else
      {
        $list = "<font color=CCInfoHeadline>::: List of callers :::</font>\n\n";
        foreach ($call as $player)
          $list .= " - <a href='chatcmd:///macro ".$player[1]." /assist ".$player[1]."'>".$player[1]."</a>\n";
        return $this -> bot -> make_blob("List of Callers", $list);
      }
    }
  }
?>