Çevrimdışı

yok yaw gene olmadı valla ben bu çalıştıramadımya benden başkada kimse çalıştıramaz çalıştıracak adamında elinden öperim ustam derim
aslında mantık gayet basit

on *:sockopen:haber: {
if $sockerr {
return
}
sockwrite -nt $sockname GET / HTTP/1.1
sockwrite -nt $sockname Host: sondakika.internethaber.com
sockwrite -nt $sockname User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; tr-TR; rv:1.7.8) Gecko/20050511 Firefox/1.0.4
sockwrite -nt $sockname Accept: text/xml,application/xml,application/xhtml+xml,text/html;q=0.9,text/plain;q=0.8,image/pn
sockwrite -nt $sockname Accept-Language: en-us,en;q=0.5
sockwrite -nt $sockname Accept-Encoding: gzip,deflate
sockwrite -nt $sockname Accept-Charset: ISO-8859-9,utf-8;q=0.7,*;q=0.7
sockwrite -nt $sockname Keep-Alive: 300
sockwrite -nt $sockname Connection: keep-alive
sockwrite -nt $sockname Cache-Control: max-age=0
sockwrite -nt $sockname
}
on *:sockread:haber: {
sockread %h
tokenize 32 %h
if <td class=row_date* iswm $1- {
var %tarih $gettok($gettok($1-,3,59),1,38)
var %x $remove($1-,$mid($1-,1,123))
var %link [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]= $+ $gettok($gettok(%x,1,62),2,61)
var %haber $gettok($gettok(%x,2,62),1,60)
if !$read(haber.txt,w,* $+ %haber $+ *,1) {
if $lines(haber.txt) >= 50 {
write -c haber.txt
}
write haber.txt 06 $+ %tarih 3:4 %haber * 12 $+ %link
sw nomercy PRIVMSG #haberler :5***
sw nomercy PRIVMSG #haberler :5***
sw nomercy PRIVMSG #haberler :6Son dakika haberi! (TR saatiyle: %tarih $+ )
sw nomercy PRIVMSG #haberler :4 $+ %haber 5*** 2Bu haberin ayrintilari icin: 12 $+ %link
sw nomercy PRIVMSG #haberler :5***
sw nomercy PRIVMSG #haberler :5***
}
}
}
alias randhaber {
sw nomercy PRIVMSG #haberler :2Haber hatirlatmasi: $read(haber.txt)
}



var %link [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]= $+ $gettok($gettok(%x,1,62),2,61)
bu adresten aldığını haber.txt içine yazıyo ordan okuyup #haberler kanalına yazıyo mantık bu ama bir yerde bir yanlış var ama nerde