on *:JOIN:#cp-clan:{
sockclose cpnews
set %display notice $nick
sockopen cpnews z3.invisionfree.com 80
}
on *:SOCKOPEN:cpnews: {
sockwrite -nt $sockname GET /Corrupt_Pures/index.php?act=idx HTTP/1.1
sockwrite -nt $sockname Host: z3.invisionfree.com
sockwrite -nt $sockname $crlf
}
on *:SOCKREAD:cpnews:{
if ($sockerr) {
%display Socket error /ms send $me Sockerror in cpnews
}
else {
var %reader
sockread %reader
if (*
1.
* iswm %reader) {
%display [CP NEWS] $nohtml(%reader)
}
if (*
2.
* iswm %reader) {
%display [CP NEWS] $nohtml(%reader)
unset %display
}
}
}