Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- <?php
- $pclkey = "betas";
- echo "Welcome to Happehwalrus' command bot.\n";
- require "Pickle.php";
- $Username = "tramrom";
- $Password = "tuxytuxy";
- $Username2 = "tramrom2";
- $Password2 = "tuxytuxy";
- $Username3 = "tramrom3";
- $Password3 = "tuxytuxy";
- $Username4 = "tramrom4";
- $Password4 = "tuxytuxy";
- $Username5 = "tramrom5";
- $Password5 = "tuxytuxy";
- $Server = "Tuxedo"; //Server ID (or name)
- $TargetID = 38394446; // tuxytronex
- $p = new Pickle;
- $p->connect($Username, $Password, $Server);
- $p->connect($Username2, $Password2, $Server);
- $p->connect($Username3, $Password3, $Server);
- $p->connect($Username4, $Password4, $Server);
- $p->connect($Username5, $Password5, $Server);
- $p->joinRoom(800);
- echo "$Username is now at the Dock\n";
- echo "If you want $Username to do commands, follow you, and copy you must first join the Dock.\n";
- while(true){
- $rawPack = $p->readRawPacket();
- $MikeTurnsMeOn = true;
- if (stripos($rawPack, "xt%sp%". $p->intRoomID . "%" . $TargetID)) {
- $x = $p->stribet($rawPack, "%xt%sp%" . $p->intRoomID . "%" . $TargetID . "%", "%");
- $y = $p->stribet($rawPack, "%xt%sp%" . $p->intRoomID . "%" . $TargetID . "%" . $x . "%", "%");
- $p->sendPosition($x+50, $y+0); //Change this to make your bot follow you by a cordinate.
- }
- elseif (stripos($rawPack, "xt%bf%" . $p->intRoomID . "%")) {
- $RoomID = $p->stribet($rawPack, "%xt%bf%" . $p->intRoomID . "%", "%");
- $p->joinRoom($RoomID);
- }
- if (stripos($rawPack, "xt%rp%-1%" . $TargetID)) {
- $p->findBuddy($TargetID);
- }
- elseif (stripos($rawPack, "xt%sm" . "%" . $p->intRoomID . "%" . $TargetID . "%" . "dance" . "%")) {
- $p->sendFrame(26);
- echo "$Username is now dancing.\n";
- }
- elseif (stripos($rawPack, "xt%sm" . "%" . $p->intRoomID . "%" . $TargetID . "%" . "spin" . "%")) {
- $p->sendRawPacket("%xt%s%u#sf%2%2%");
- sleep(1);
- $p->sendRawPacket("%xt%s%u#sf%2%3%");
- sleep(1);
- $p->sendRawPacket("%xt%s%u#sf%2%4%");
- sleep(1);
- $p->sendRawPacket("%xt%s%u#sf%2%5%");
- sleep(1);
- $p->sendRawPacket("%xt%s%u#sf%2%6%");
- sleep(1);
- $p->sendRawPacket("%xt%s%u#sf%2%7%");
- sleep(1);
- $p->sendRawPacket("%xt%s%u#sf%2%8%");
- sleep(1);
- $p->sendRawPacket("%xt%s%u#sf%2%1%");
- echo "$Username has spun.\n";
- }
- elseif (stripos($rawPack, "xt%sm" . "%" . $p->intRoomID . "%" . $TargetID . "%" . "rainbow" . "%")) {
- $color = 1;
- while($color<=14) {
- $p->addItem($item);
- $item++;
- }
- $rainbow = 1;
- while($rainbow<=14) {
- $p->sendRawPacket("%xt%s%u#upc%" . $p->intRoomID . "%" . $rainbow . "%");
- sleep(1);
- $rainbow++;
- }
- }
- elseif (stripos($rawPack, "xt%sm" . "%" . $p->intRoomID . "%" . $TargetID . "%" . "wave" . "%")) {
- $p->sendAction(25);
- echo "$Username waved.\n";
- }
- elseif (stripos($rawPack, "xt%sm" . "%" . $p->intRoomID . "%" . $TargetID . "%" . "emoticon" . "%")) {
- $emoteID = rand(1, 24);
- $p->sendEmote($emoteID);
- echo "$Username has sent a random emote\n";
- }
- elseif (stripos($rawPack, "xt%sm" . "%" . $p->intRoomID . "%" . $TargetID . "%" . "snowball" . "%")) {
- $x = rand(0, 900);
- $y = rand(0, 900);
- $p->snowBall($x, $y);
- echo "$Username threw a snowball at random coordinates.\n";
- }
- elseif (stripos($rawPack, "xt%sm" . "%" . $p->intRoomID . "%" . $TargetID . "%" . "fast" . "%")) {
- $x = rand(10000, 10000000);
- $y = rand(10000, 10000000);
- $p->snowBall($x, $y);
- echo "$Username threw a fastball.\n";
- }
- elseif (stripos($rawPack, "xt%sm" . "%" . $p->intRoomID . "%" . $TargetID . "%" . "card" . "%")) {
- $CardID = rand(1, 50);
- $p->sendMail($TargetID, $CardID);
- echo "$Username sent the target a random card.\n";
- }
- elseif (stripos($rawPack, "xt%sm" . "%" . $p->intRoomID . "%" . $TargetID . "%" . "sit" . "%")) {
- $p->sendFrame(17);
- echo "$Username is now sitting.\n";
- }
- elseif (stripos($rawPack, "xt%sm" . "%" . $p->intRoomID . "%" . $TargetID . "%" . "stop" . "%")) {
- $p->sendFrame(1);
- echo "$Username has stopped.\n";
- }
- elseif (stripos($rawPack, "xt%sm" . "%" . $p->intRoomID . "%" . $TargetID . "%" . "walk" . "%")) {
- $x = rand(0, 900);
- $y = rand(0, 900);
- $p->sendPosition($x, $y);
- echo "$Username walked at random coordinates.\n";
- }
- elseif (stripos($rawPack, "xt%sm" . "%" . $p->intRoomID . "%" . $TargetID . "%" . "color" . "%")) {
- echo "What color ID would you like your penguin to turn into? 1 = blue, 2 = green, 3 = pink, 4 = black, 5 = red, 6 = orange, 7 = yellow, 8 = purple, 9 = brown, 10 = peach, 11 = dark green, 12 is aqua (light blue), and 13 is lime green.\n";
- $colorID = trim(fgets(STDIN));
- $p->sendRawPacket("%xt%s%s#upc%" . $p->intRoomID . "%" . $colorID . "%");
- echo "$Username has changed colors.\n";
- }
- elseif (stripos($rawPack, "xt%sm" . "%" . $p->intRoomID . "%" . $TargetID . "%" . "room" . "%")) {
- echo "Which room ID would you like your penguin to join?\n";
- $RoomID = trim(fgets(STDIN));
- $p->joinRoom($RoomID);
- echo("$Username joined room ID: $RoomID\n");
- }
- elseif (stripos($rawPack, "xt%ss%". $p->intRoomID . "%" . $TargetID)) {
- $safeMessage = $p->stribet($rawPack, "%xt%ss" . "%" . $p->intRoomID . "%" . $TargetID . "%", "%");
- $p->sendSafe($safeMessage);
- echo "$Username has copied the target's safe message.\n";
- }
- elseif (stripos($rawPack, "xt%sl%". $p->intRoomID . "%" . $TargetID)) {
- $lineMessage = $p->stribet($rawPack, "%xt%sl" . "%" . $p->intRoomID . "%" . $TargetID . "%", "%");
- $p->sendLine($lineMessage);
- }
- elseif (stripos($rawPack, "xt%sq%". $p->intRoomID . "%" . $TargetID)) {
- $quickMessage = $p->stribet($rawPack, "%xt%sq" . "%" . $p->intRoomID . "%" . $TargetID . "%", "%");
- $p->sendQuick($quickMessage);
- echo "$Username has copied the target's quick message.\n";
- }
- elseif (stripos($rawPack, "xt%sm%" . $p->intRoomID . "%" . $TargetID)){
- $message = $p->stribet($rawPack, "%xt%sm%" . $p->intRoomID . "%" . $TargetID . "%", "%");
- $p->sendMessage($message);
- echo "$Username has copied the target's message.\n";
- }
- elseif (stripos($rawPack, "xt%se%". $p->intRoomID . "%" . $TargetID)) {
- $id = $p->stribet($rawPack, "%xt%se%" . $p->intRoomID . "%" . $TargetID . "%", "%");
- $p->sendEmote($id);
- echo "$Username has copied the target's emote.\n";
- }
- elseif (stripos($rawPack, "xt%sb%" . $p->intRoomID . "%" . $TargetID)) {
- $x = $p->stribet($rawPack, "%xt%sb%" . $p->intRoomID . "%" . $TargetID . "%", "%");
- $y = $p->stribet($rawPack, "%xt%sb%" . $p->intRoomID . "%" . $TargetID . "%". $x . "%", "%");
- $p->snowBall($x, $y);
- echo "$Username has thrown a snowball where the target did.\n";
- }
- elseif (stripos($rawPack, "xt%sa%" . $p->intRoomID . "%" . $TargetID)) {
- $id = $p->stribet($rawPack, "%xt%sa%" . $p->intRoomID . "%" . $TargetID . "%", "%");
- $p->sendAction($id);
- echo "$Username has copied the target's action.\n";
- }
- elseif (stripos($rawPack, "xt%sf%" . $p->intRoomID . "%" . $TargetID)) {
- $id = $p->stribet($rawPack, "%xt%sf%" . $p->intRoomID . "%" . $TargetID . "%", "%");
- $p->sendFrame($id);
- echo "$Username has copied the target's frame.\n";
- }
- elseif (stripos($rawPack, "xt%sj%". $p->intRoomID . "%" . $TargetID)) {
- $jokeMessage = $p->stribet($rawPack, "%xt%sj" . "%" . $p->intRoomID . "%" . $TargetID . "%", "%");
- $p->sendJoke($jokeMessage);
- sleep(8);
- echo "$Username has copied the target's joke.\n";
- }
- elseif (stripos($rawPack, "xt%at%" . $p->intRoomID . "%" . $TargetID)) {
- $p->openNewspaper();
- echo "$Username has opened the newspaper.\n";
- }
- elseif (stripos($rawPack, "xt%rt%" . $p->intRoomID . "%" . $TargetID)) {
- $p->closeNewspaper();
- echo "$Username has closed the newspaper.\n";
- }
- }
- ?>
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement