on *:TEXT:!insane:#: {
alias insane
sockClose insaneforum
sockOpen insaneforum www.insanescripting.comze.com 80
msg $chan [Wait Receiving data...]
}
on *:SockOpen:insaneforum: {
sockwrite -nt insaneforum GET /infusions/who_is_online/who_is_online.php HTTP/1.0
sockwrite -nt insaneforum Host: www.insanescripting.comze.com
sockwrite -nt insaneforum $crlf
}
on *:SockRead:insaneforum: {
var %read
sockRead %read
if (*Registered users and* iswm %read) { tokenize 32 %read | echo -a [InSane Site] $remove(%read, <td class="catSides",colspan="3" height="28">,<span class="cattitle"><b>,</b></span></td>) }
if ((*There are* iswm %read) && (*Guest users online* iswm %read)) { tokenize 32 %read | echo -a [InSane Site] $remove(%read, <td class="catSides" colspan="3" height="28"><span class="cattitle"><b>,</b></span></td>) }
}