Boring, Senseless Random Messages
Platform: mIRC
Published Jun 19, 2011
Updated Jun 25, 2012
This script will send a boring, random message to the active channel when the irc server pings you.
(You must have your client looking at the active channel window) It's useful when your nickname idles in a quiet channel, where activity is scarce and that you're away from keyboard every so often.
Below are some random ones emitted when you get pinged by the server:
Quote
<Bot> I'm in Illinois
<Bot> hello hello!
<Bot> Is there evrybody some there
<Bot> see ya
<Bot> Hola desde España
<Bot> Holy Sh*t!!
<Bot> I feel like such a spy...if your really live...grab your head..
<Bot> Are you workin' hard or hardly workin'?
<Bot> CATS MEOW MEOW MEOW
Usage: right-click on your nick list or channel to toggle the script on and off.
menu nicklist,channel {
Turn Random Messages
.On:enable #rm
.Off:disable #rm
}
#rm on
on *:sockread:rm:{
var %rm
sockread %rm
if ($regex(%rm,/<h1>(.*)<\/h1>/)) {
[ [ $sock(rm).mark ] ]
sockclose rm
}
}
on *:ping:{
if ($sock(rm)) sockclose $v1
sockopen rm www.randommessages.com 80
var %m = 1
while ($comchan($me,%m)) {
if ($v1 == $iif($active ischan,$v1)) {
sockmark rm msg $v1 $!regml(1)
}
inc %m
}
}
on *:sockopen:rm:{
tokenize 94 $left($str(sockwrite -nt rm^,2),-1)
var %- 1, %` GET / HTTP/1.1^Host: $!+($sock(rm).addr,$str($crlf,2))
while $gettok(%`,%-,94) {
[ [ $+($,%-,$chr(32),$v1) ] ]
inc %-
}
}
#rm end
