on *:SOCKREAD:Bluh.*:{
var %rb | sockread %rb
if ($regex(%rb,/^
1.gif) | $/Si)) {
var %sk = $regml(1)
while (( !iswm %rb) && ( !iswm %rb)) {
sockread %rb
if ((* iswm %rb) && ($htmlfree(%rb) != not ranked)) {
sockread %rb
echo -a Ok: %sk $htmlfree(%rb)
break
}
}
}
}
on *:SOCKREAD:Bluh.*:{
while ($sock($sockname).rq) {
var %rb | sockread %rb
if ($regex(%rb,/^ | 1.gif) | $/Si)) {
var %sk = $regml(1)
while (( !iswm %rb) && ( !iswm %rb)) {
sockread %rb
if ((* iswm %rb) && ($htmlfree(%rb) != not ranked)) {
sockread %rb
echo -a Ok: %sk $htmlfree(%rb)
break
}
}
}
sockread %rb
}
} |