scoket bot kod yardim
 

Selam arkadaşlar bi kod yaptim siteye göre ama siteden yazilari aliyor yanliz bilgileri almiyor bakarsaniz sevinirim, yardımcı olurmusunuz ?

Kod ;

on *:sockopen:wm:{
sockwrite -n $sockname GET / HTTP/1.1
sockwrite -n $sockname Host: wmaraci.com $+ $crlf $+ $crlf
}
on *:sockread:wm:{
if ($sockerr) {
echo 4 -st Hata. | halt
}
else {
var %arac
sockread %arac
if (*<span class="moreinfo" id="moreinfoQuantcastRank">* iswm %arac) { privmsg #iddaa 2 $remove($htmlfree(%arac),$chr(9)) }
if (*<span id="resultQuantcastRank">* iswm %arac) { privmsg #arac 4 PR Değerlendirme $remove($htmlfree(%arac),$chr(9)) }
}
}
alias htmlfree {
var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,&nbsp;)
return %x
}
on *:text:*:#:{
if $1 == !arac {
/sockopen wm [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80
.timer 1 2 /sockclose wm
}
}