In: , , ,
On: 2003 / 07 / 18 Viewed: 74363 times
Shorter URL for this post: http://ozh.in/b

This is the perl version of my "famous" KIKOO Script for mIRC. Written for a psybnc bouncer, you can adapt it for XChat (see the kikoo script).

  1. #!/usr/bin/perl
  2. $nick = uc join(' ', @ARGV);
  3. $front = int(rand(13))+1;
  4. $back = int(rand(13))+1;
  5. while($back == $front) {
  6.         $back = int(rand(13))+1;
  7. }
  8. $xclam = int(rand(11))+2;
  9. $oo = int(rand(11))+2;
  10. $par = int(rand(11))+2;
  11.  
  12. $output = "\002\003" . "$front,$back" . " KIKOO" . "O" x $oo . " $nick " . "!" x $xclam . " :o" . ")" x $par ." ";
  13. print "PRIVMSG &&partyline :$output\n";

Shorter URL

Want to share or tweet this post? Please use this short URL: http://ozh.in/b

Metastuff

This entry "KIKOO script, perl version" was posted on 18/07/2003 at 1:51 pm and is tagged with , , ,
Watch this discussion : Comments RSS 2.0.

2 Blablas

  1. Kikoo script pour xchat

    Merci à Ozh pour son Kikoo script. Je viens de l'adapter pour xchat

    #!/usr/bin/perl
    # script original par Ozh
    # http://planetozh.com/blog//archives/2003/07/18/kikoo-script-perl-version/
    # Adapté pour xchat par Yoda-BZH

Leave a Reply

XHTML: You can use these tags: <a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <s> <strike> <strong>
Gravatars: Curious about the little images next to each commenter's name ? Go to Gravatar and sign for a free account
Spam: Various spam plugins may be activated. I'll put pins in a Voodoo doll if you spam me.

Read more ?