<?php
/*
** AirTurtles' Formation Follow Bot
** Copyright (C) 2010 AirTurtles
*/
$pclkey = 'betas';
require ("Pickle.php");

DEFINE('USERS', 1); // How many users do we have?
$Username = array();
$Password = array();
$Server = "Icicle"; // What server should we go on? DEFAULT: Icicle
$EachUsernameOffsets = array();

$Username[1] = "1st Username here";
$Password[1] = "1st Password here";

for($CP = 1; $CP <= USERS; $CP++){
$p[$CP] = new Pickle();
$p[$CP]->connect($Username[$CP], $Password[$CP], $Server);
if($p[$CP]->run){
}else{
echo("Pickle: {$Username[$CP]} has failed to login!");
psleep(9001);
die();
}
}

while(true){
for($CP = 1; $CP <= USERS; $CP++){
        $rawPack = $p[$CP]->readRawPacket();
        $p[$CP]->findBuddy($targetID);

        if (stripos($rawPack, "xt%bf%" . $p[$CP]->intRoomID . "%")){
            $roomID = $p[$CP]->stribet($rawPack, "%xt%bf%" . $p[$CP]->intRoomID . "", "%");
            if ($roomID < 900){
                $p[$CP]->joinRoom($roomID, 0, 0);
                echo("Found target in room $roomID\n");
            }
            elseif (($roomID > 900) and ($roomID < 1000)){
                echo("Target is in a game. Waiting for game to end...\n");
                psleep(10);
                $p[$CP]->findBuddy($targetID);
            }
            elseif ($roomID > 999){
                $p[$CP]->joinRoom($roomID, 0, 0);
                echo("Found target in Igloo #" . $roomID . "\n");
            }
            else{
                echo("Target not found in this server\n");
            }
        }

        while(true){
            $rawPack = $p[$CP]->readRawPacket();

            if (stripos($rawPack, "xt%sm%" . $p[$CP]->intRoomID . "%" . $targetID)){
                $message = $p[$CP]->stribet($rawPack, "%xt%sm%" . $p[$CP]->intRoomID . "%" . $targetID . "%", "%");
                $p[$CP]->sendMessage($message);
                echo("Message: '$message'\n");
            }
            elseif (stripos($rawPack, "xt%ss%". $p[$CP]->intRoomID . "%" . $targetID)) {
                $safeMessage = $p[$CP]->stribet($rawPack, "%xt%ss" . "%" . $p[$CP]->intRoomID . "%" . $targetID . "%", "%");
                $p[$CP]->sendSafe($safeMessage);
                echo("Message: $safeMessage\n");
            }
            elseif (stripos($rawPack, "xt%sl%". $p[$CP]->intRoomID . "%" . $targetID)) {
                $lineMessage = $p[$CP]->stribet($rawPack, "%xt%sl" . "%" . $p[$CP]->intRoomID . "%" . $targetID . "%", "%");
                $p[$CP]->sendLine($lineMessage);
                echo("Message: $lineMessage\n");
            }
            elseif (stripos($rawPack, "xt%sq%". $p[$CP]->intRoomID . "%" . $targetID)) {
                $quickMessage = $p[$CP]->stribet($rawPack, "%xt%sq" . "%" . $p[$CP]->intRoomID . "%" . $targetID . "%", "%");
                $p[$CP]->sendQuick($quickMessage);
                echo("Message: $quickMessage\n");
            }
            elseif (stripos($rawPack, "xt%sg%". $p[$CP]->intRoomID . "%" . $targetID)) {
                $guideMessage = $p[$CP]->stribet($rawPack, "%xt%sg" . "%" . $p[$CP]->intRoomID . "%" . $targetID . "%", "%");
                $p[$CP]->sendGuide($guideMessage);
                echo("Message: $guideMessage\n");
            }
            elseif (stripos($rawPack, "xt%sj%". $p[$CP]->intRoomID . "%" . $targetID)) {
                $jokeMessage = $p[$CP]->stribet($rawPack, "%xt%sj" . "%" . $p[$CP]->intRoomID . "%" . $targetID . "%", "%");
                $p[$CP]->sendJoke($jokeMessage);
                echo("Message: $jokeMessage\n");
            }
            elseif (stripos($rawPack, "xt%se%". $p[$CP]->intRoomID . "%" . $targetID)) {
                $id = $p[$CP]->stribet($rawPack, "%xt%se%" . $p[$CP]->intRoomID . "%" . $targetID . "%", "%");
                $p[$CP]->sendEmote($id);
                echo("Emote: $id\n");
            }
            elseif (stripos($rawPack, "xt%sp%" . $p[$CP]->intRoomID . "%" . $targetID)) {
                $x = $p[$CP]->stribet($rawPack, "%xt%sp%" . $p[$CP]->intRoomID . "%" . $targetID . "%", "%");
                $y = $p[$CP]->stribet($rawPack, "%xt%sp%" . $p[$CP]->intRoomID . "%" . $targetID . "%" . $x . "%", "%");
                $p[$CP]->sendPosition($x + $xoff, $y + $yoff);
                echo("Position: $x, $y\n");
            }
            elseif (stripos($rawPack, "xt%sb%" . $p[$CP]->intRoomID . "%" . $targetID)) {
                $x = $p[$CP]->stribet($rawPack, "%xt%sb%" . $p[$CP]->intRoomID . "%" . $targetID . "%", "%");
                $y = $p[$CP]->stribet($rawPack, "%xt%sb%" . $p[$CP]->intRoomID . "%" . $targetID . "%". $x . "%", "%");
                $p[$CP]->snowBall($x, $y);
                echo("Snowball: $x, $y\n");
            }
            elseif (stripos($rawPack, "xt%sa%" . $p[$CP]->intRoomID . "%" . $targetID)) {
                $id = $p[$CP]->stribet($rawPack, "%xt%sa%" . $p[$CP]->intRoomID . "%" . $targetID . "%", "%");
                $p[$CP]->sendAction($id);
                echo("Action: $id\n");
            }
            elseif (stripos($rawPack, "xt%sf%" . $p[$CP]->intRoomID . "%" . $targetID)) {
                $id = $p[$CP]->stribet($rawPack, "%xt%sf%" . $p[$CP]->intRoomID . "%" . $targetID . "%", "%");
                $p[$CP]->sendFrame($id);
                echo("Frame: $id\n");
            }
            elseif (stripos($rawPack, "xt%at%" . $p[$CP]->intRoomID . "%" . $targetID)) {
                $p[$CP]->openNewspaper();
            }
            elseif (stripos($rawPack, "xt%rt%" . $p[$CP]->intRoomID . "%" . $targetID)) {
                $p[$CP]->closeNewspaper();
            }
            elseif (stripos($rawPack, "xt%mr%-1%") ){
                $packet = explode("%", $rawPack);
                if ($packet[5] == $targetID){
                    $id = $packet[6];
                    $p[$CP]->sendMail($targetID, $id);
                    echo "Mail: $id\n";
                }
            }
            elseif (stripos($rawPack, "xt%rp%-1%" . $targetID)) {
                $p[$CP]->findBuddy($targetID);
            }
            elseif (stripos($rawPack, "xt%bf%" . $p[$CP]->intRoomID . "%")){
                $roomID = $p[$CP]->stribet($rawPack, "%xt%bf%" . $p[$CP]->intRoomID . "%", "%");
                if (($roomID < 900) and ($roomID != $p[$CP]->extRoomID)){
                    $p[$CP]->joinRoom($roomID, 0, 0);
                    echo("Found target in room $roomID\n");
                }
                elseif (($roomID > 900) and ($roomID < 1000)){
                    echo("Target is in a game. Waiting for game to end...\n");
                    psleep(10);
                    $p[$CP]->findBuddy($targetID);
                }
                elseif (($roomID > 999) and ($roomID != $extRoomID)){
                    $p[$CP]->joinRoom($roomID, 0, 0);
                    echo("Found target in Igloo #" . $roomID . "\n");
                }
                else{
                    echo("Target not found in this server $rawPack\n");
                }
            }
                elseif(stripos($rawPack, "xt%ma%")){
                        echo "MOD ACTION ALERT: $rawPack \n";
                }

        }
    }
    }


    ?>