Changeset 361 for trollforgeTweet

Timestamp:

06/24/10 22:18:56 (3 years ago)

Author:

rucas

Message:

DEMOLISHED

File:

• trollforge/jenk/webchat.pl (modified) (3 diffs)

trollforge/jenk/webchat.pl

@@ -12 +12 @@
 my $proxyfile = "proxies.txt";
 my $debug = 0;
-our $channel = '#bls';
+our $channel = '#freenode';
 our $troll = "AESOP EATS SHITS";
-our $random = 0;  #1 will use trolldb, 0 will use message above
+our $random = 1;  #1 will use trolldb, 0 will use message above
 
 my @proxies;
@@ -59 +59 @@
     print "...\n";
 
-    my $base = "http://webchat.freenode.net/dynamic/one";
+    my $base = "http://webchat.freenode.net/dynamic/two";
 
     my $t = 0;
@@ -104 +104 @@
 
     $post_req->('/e/n', nick => $nick);
-    $post_req->('/e/s'); # t=1
     $post_req->('/e/s'); # t=2
     $post_req->('/e/p', c => 'JOIN '.$channel); # t=3
     $post_req->('/e/s'); # t=4
-    $post_req->('/e/p', c => "NOTICE frigg :\001VERSION qwebirc v0.85, copyright (C) Chris Porter 2008-2009 -- Mozilla/5.0 (Macintosh; U; Intel Mac OS X 10.6; en-US; rv:1.9.1.8) Gecko/20100202 Firefox/3.5.8\001"); # t=5
-    $post_req->('/e/s'); # t=6
-    $post_req->('/e/s'); # t=7
+    $post_req->('/e/s'); # t=5
     if($random==1) {
         $mech->get('http://rolloffle.churchburning.org/troll_me_text.php');
         $troll=$mech->content( format => 'text' );
     }
-    $post_req->('/e/p', c => 'PRIVMSG '.$channel.' :'.$troll); # t=8
+    $post_req->('/e/p', c => 'PRIVMSG '.$channel.' :A message from BIKCMP: '.$troll); # t=8
 }