Kod: Kodu kopyalamak için üzerine çift tıklayın!
alias haberler { sockclose haberler | sockopen haberler
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80 }
alias htmlfree {
var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, )
return %x
}
on *:sockopen:haberler: {
sw $sockname GET /rss.php HTTP/1.1
sw $sockname Host:
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
sw $sockname Connection: keep-alive
sw $sockname Cache-Control: max-age=0
sw $sockname Accept: text/html,application/xhtml+xml,application/xml;q=0.9,image/webp,*/*;q=0.8
sw $sockname User-Agent: Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/37.0.2062.120 Safari/537.36
sw $sockname Accept-Language: tr-TR,tr;q=0.8,en-US;q=0.6,en;q=0.4
sw $sockname $crlf
}
on *:sockread:haberler: {
var %i
sockread %i
if *<title><![CDATA[* iswm %i { echo -a 12Haberin Konusu: $gettok($gettok(%i,3,91),1,93) }
if *<link>* iswm %i { echo -a 4Haberin Linki: $htmlfree(%i) }
}