Similar topics
Latest topics
Club Penguin Events
Advertisement
command script by happeh walrus
Page 1 of 1
command script by happeh walrus
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- Posts : 14
Reputation : 1
Join date : 2010-09-26
Similar topics
» panic script by walrus
» (This is not my script) i just made the formation (Bot Army)
» CP Bot Script/with Command *POST LINK IF YOU KNOW ANY!*
» (This is not my script) i just made the formation (Bot Army)
» CP Bot Script/with Command *POST LINK IF YOU KNOW ANY!*
Page 1 of 1
Permissions in this forum:
You cannot reply to topics in this forum
|
|
Tue Feb 05, 2019 5:36 am by Gizmo92883
» Anybody else come to this forum for the memories?
Tue Jun 12, 2018 12:07 am by Cooldude21
» This forum died
Thu Mar 30, 2017 11:10 pm by _Skate_
» Introduce yourselves!
Fri Jan 23, 2015 7:21 pm by Gizmo92883
» Ozzy's Bot Script
Mon May 13, 2013 8:31 am by Pig
» Goodbye BCPB Forums.
Tue Sep 18, 2012 6:37 pm by 43nînjâ17
» Follow bot script (100% Credit to Cp-Cheater )
Sun Sep 16, 2012 4:55 pm by Dentonbrooks
» Xat Main Owner Hacker
Fri Aug 17, 2012 2:32 am by 43nînjâ17
» xat message big
Sat Aug 11, 2012 12:32 am by 43nînjâ17