Best Club Penguin Bots
Hello, you are not logged in. You may log in or register.

Join the forum, it's quick and easy

Best Club Penguin Bots
Hello, you are not logged in. You may log in or register.
Best Club Penguin Bots
Would you like to react to this message? Create an account in a few clicks or log in to continue.
Latest topics
» Add me on discord if you want to catch up!
command script by happeh walrus EmptyTue Feb 05, 2019 5:36 am by Gizmo92883

» Anybody else come to this forum for the memories?
command script by happeh walrus EmptyTue Jun 12, 2018 12:07 am by Cooldude21

» This forum died
command script by happeh walrus EmptyThu Mar 30, 2017 11:10 pm by _Skate_

» Introduce yourselves!
command script by happeh walrus EmptyFri Jan 23, 2015 7:21 pm by Gizmo92883

» Ozzy's Bot Script
command script by happeh walrus EmptyMon May 13, 2013 8:31 am by Pig

» Goodbye BCPB Forums.
command script by happeh walrus EmptyTue Sep 18, 2012 6:37 pm by 43nînjâ17

» Follow bot script (100% Credit to Cp-Cheater )
command script by happeh walrus EmptySun Sep 16, 2012 4:55 pm by Dentonbrooks

» Xat Main Owner Hacker
command script by happeh walrus EmptyFri Aug 17, 2012 2:32 am by 43nînjâ17

» xat message big
command script by happeh walrus EmptySat Aug 11, 2012 12:32 am by 43nînjâ17

Navigation
 Portal
 Index
 Memberlist
 Profile
 FAQ
 Search
Club Penguin Events
Advertisement

command script by happeh walrus

Go down

command script by happeh walrus Empty command script by happeh walrus

Post  Cooldude1234 Sun Oct 03, 2010 2:40 pm

thanks to happeh walrus
Code:

 <?php
        $pclkey = "betas";
        echo "Welcome to Happehwalrus' command bot.\n";
        require "Pickle.php";
        $Username = "so its me1";
        $Password = "";
        $Server = 144; //Server ID (or name)
        $TargetID = 137847350  ; //ID of the penguin you want to follow/listen to
        $p = new Pickle;
        $p->connect($Username, $Password, $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+60, $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 . "%" . "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 . "%" . "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";
      }
      }
    ?>
Cooldude1234
Cooldude1234

Posts : 14
Reputation : 1
Join date : 2010-09-26

Back to top Go down

Back to top

- Similar topics

 
Permissions in this forum:
You cannot reply to topics in this forum