Best Club Penguin Bots
Hello, you are not logged in. You may log in or register.
Latest topics
» This forum died
Thu Mar 30, 2017 11:10 pm by _Skate_

» Introduce yourselves!
Fri Jan 23, 2015 7:21 pm by Gizmo92883

» Anybody else come to this forum for the memories?
Wed Nov 26, 2014 12:46 am 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

» CPPS GLICH "Auto Talker"
Sat Aug 11, 2012 12:25 am by 43nînjâ17

Navigation
 Portal
 Index
 Memberlist
 Profile
 FAQ
 Search
Club Penguin Events
Advertisement

commands in emotes

View previous topic View next topic Go down

commands in emotes

Post  Gizmo92883 on Sun Feb 27, 2011 2:34 pm

Hey guys i found a way to add commands in emotes check it out

Code:
sub handleSendEmote {
  my $self = shift;
  my $room_id_internal = shift;
  my $PenguinID = shift;
  my $emote_code = shift;

  if (my $u = $self->{penguin}->{$PenguinID}) {
    my $who = $u->{name};
    $u->{update} = time;
    if ($target and $who =~ /$target/i) {
      select(undef,undef,undef,0.0);
      $self->doSendEmote($emote_code);
    }
  }
  if ($emote_code =~ "1"){
  $target = "bullettime";
  } 
  if ($emote_code =~ "30"){
  $target = "mike 92";
  }
}

with "" you put the emote id and then what to do if you know how to make a script you know that.

i just made smile make it follow me
and mike 92 is banned forever so it could never follow him. just stop following me.

i hope you guys can find a way to use this.
avatar
Gizmo92883

Posts : 113
Reputation : 0
Join date : 2010-09-08
Age : 22
Location : Retired Member

Back to top Go down

Re: commands in emotes

Post  Ozzyozborn13 on Sun Feb 27, 2011 4:02 pm

Gizmo92883 wrote:Hey guys i found a way to add commands in emotes check it out

Code:
sub handleSendEmote {
  my $self = shift;
  my $room_id_internal = shift;
  my $PenguinID = shift;
  my $emote_code = shift;

  if (my $u = $self->{penguin}->{$PenguinID}) {
    my $who = $u->{name};
    $u->{update} = time;
    if ($target and $who =~ /$target/i) {
      select(undef,undef,undef,0.0);
      $self->doSendEmote($emote_code);
    }
  }
  if ($emote_code =~ "1"){
  $target = "bullettime";
  } 
  if ($emote_code =~ "30"){
  $target = "mike 92";
  }
}

with "" you put the emote id and then what to do if you know how to make a script you know that.

i just made smile make it follow me
and mike 92 is banned forever so it could never follow him. just stop following me.

i hope you guys can find a way to use this.
Nice find dude, i'm gonna do some experimenting with this.

_________________
[You must be registered and logged in to see this image.]



[You must be registered and logged in to see this link.]

[You must be registered and logged in to see this link.]



[You must be registered and logged in to see this image.]
avatar
Ozzyozborn13
Admin

Posts : 211
Reputation : 19
Join date : 2010-08-28

http://www.youtube.com/ozzyozborn13

Back to top Go down

Thanks.

Post  Gizmo92883 on Sun Feb 27, 2011 11:23 pm

Yea ive tried that for awile ive finally got it to work.
avatar
Gizmo92883

Posts : 113
Reputation : 0
Join date : 2010-09-08
Age : 22
Location : Retired Member

Back to top Go down

Re: commands in emotes

Post  Sponsored content


Sponsored content


Back to top Go down

View previous topic View next topic Back to top

- Similar topics

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