All pastes #508721 Raw Edit

Something

public text v1 · immutable
·published 2007-05-25 03:45 UTC
rendered paste body
RAFFLE_MODULE.php
===========================
<?
$MODULE_NAME = "RAFFLE_MODULE";
bot::regcommand("msg", "$MODULE_NAME/raffle.php", "raffle", "all");
bot::regcommand("priv", "$MODULE_NAME/raffle.php", "raffle", "all");
bot::regcommand("guild", "$MODULE_NAME/raffle.php", "raffle", "all");

bot::regcommand("msg", "$MODULE_NAME/join.php", "joinRaffle", "all");
bot::regcommand("msg", "$MODULE_NAME/leave.php", "leaveRaffle", "all");

//Help files
bot::help("Raffle", "$MODULE_NAME/raffle.txt", "guild", "Start/Join/Leave Raffles", "Raffles");
//Setup
bot::event("setup", "$MODULE_NAME/setup.php");

?>
=================================================
raffle.txt
=================================================
<header>::::: Help on Raffle Commands. :::::<end>

<highlight>Raffle off an item to orgmates<end>
<tab><symbol>raffle 'insert your item here'

<highlight>Join the raffle<end>
<tab><symbol>joinRaffle

<highlight>Leave the raffle<end>
<tab><symbol>leaveRaffle
===================================================
raffle.php
===================================================
<?
if (eregi ("^raffle <a href=\"itemref:\/\/([0-9]+)\/([0-9]+)\/([0-9]+)\">(.+)$", $message, $arr))
{

    $lowID=$arr[1];
    $hiID=$arr[2];
    $ql=$arr[3];
    $name=substr($arr[4], 0, strpos($arr[4], "<"));
    $item=bot::makeItem($lowID, $hiID,  $ql, $name);

    $jnRflMsg = "Click <a href='chatcmd:///tell <myname> joinRaffle'</a>here</a> to join the raffle!";
    $link=bot::makeLink("here", $jnRflMsg);
    $msg="----------------------------------------------------------------------------------------
    A raffle for " . $item . " has been started by " . $sender . "!
    Click ". $link ."  Raffle will end in 'time'.
    -------------------------------------------------------------------------------------------------------------";

        if($type== "msg")
                bot::send($msg, "guild");
      	elseif($type == "priv")
	 	bot::send($msg, "guild");
	elseif($type == "guild")
	  	bot::send($msg, "guild");

}
 else if("^raffle")
 {
       $activeRaffle=false;
        $msg = "You need to specify an item to be raffled!";
   	if($type == "msg")
		bot::send($msg, $sender);
	elseif($type == "priv")
	 	bot::send($msg, $sender);
	elseif($type == "guild")
	  	bot::send($msg, "guild");
}
?>