IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - Konuşan Scripts (https://www.ircforumlari.net/mirc-scripting-sorunlari/297785-konusan-scripts.html)

Konuşan Scripts

Quaneket yabancı kanallarda dikkatimi çeken bişe var adamlar öyle bir kod yazmışlar kı haberleri otomatik olarak kanallarında yayınlıyor mesela :
(12:20:49) 02(+DutchNews) 9»0x9« [0Fok!9] 9»0x9«0 Utrechtse autochtoon ernstigste veelpleger 9»0x9«0 [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 9»0x9«
(12:20:55) 02(+DutchNews) 9»0x9« [0Fok!9] 9»0x9«0 Domino Day trekt bijna 2,9 miljoen kijkers 9»0x9«0 [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 9»0x9«
(12:25:49) 02(+DutchNews) 9»0x9« [0Fok!9] 9»0x9«0 Belg wil Beneluxsysteem kilometerheffing 9»0x9«0 [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 9»0x9«
(12:30:49) 02(+DutchNews) 9»0x9« [0Fok!9] 9»0x9«0 Dissidenten China opgepakt bezoek Obama 9»0x9«0 [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 9»0x9«

Ve sadece 1 tane siteden geliyor bu haberler,siteye haber eklenınce otomatık olarak botada ekleniyor ve kanal icinde belırlı aralıklarla dönuyor
bunu yapabilicek usta coderlerimiz el atabilir mi ? :D

Cevap: Konuşan Scripts

Ve sadece 1 tane siteden geliyor bu haberler,siteye haber eklenınce otomatık olarak botada ekleniyor ve kanal icinde belırlı aralıklarla dönuyor
bunu yapabilicek usta coderlerimiz el atabilir mi ?

ben bunu uzun zamandır yapıyorum açtığım haber kanalında 30'dan fazla siteden RSS yayını yapıyorum.

21:04:01: <Broken-Dream> C* Anadolu-Ajansi GÜL, ERGİN VE GERÇEKER'İ KABUL EDECEK -
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
_id=406708Anadolu-Ajansi C*
21:11:19: <Broken-Dream> C* CNN-Türk-Dünya ispanya'dan Türkiye'nin AB üyeliğine destek -
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
size="2">CNN-Türk-Dünya C*
21:12:26: <Broken-Dream> C* CNN-Türk-Dünya israil'den Erdoğan'a "Tarafsız değil" -
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
size="2">CNN-Türk-Dünya C*
21:15:15: <Broken-Dream> C* Anadolu-Ajansi KOLEZYUMA YEŞİL IŞIK -
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
_id=406719Anadolu-Ajansi C*
2 yıla yakın süredir hatasız sorunsuz işliyor..

Cevap: Konuşan Scripts

Alıntı:

skylord Nickli Üyeden Alıntı (Mesaj 870762)

Senin İstedigin Su Sekılde Birsey mi ??

Kod:

alias sondakika {

unset %haber

sockclose s4

sockopen s4 sondakika.hurriyet.com.tr 80

}

alias -l sw sockwrite -n $sockname $1-

on *:sockopen:s4: {

if (!$sockerr) {

sw GET /?sid=0 HTTP/1.1

sw Host: sondakika.hurriyet.com.tr

sw User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; tr; rv:1.9.0.5) Gecko/2008120122 Firefox/3.0.5

sw Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8

sw Accept-Language: tr-TR,tr;q=0.8,en-us;q=0.5,en;q=0.3

sw Accept-Encoding: gzip,deflate

sw Accept-Charset: ISO-8859-9,utf-8;q=0.7,*;q=0.7

sw Connection: Close

sw $crlf

}

}

alias htmlfree {

var %x, %i = $regsub($replace($1-,,-, ,¿,DiÄŸer haberler iÃ§in tÄ±klayÄ±n…,difuzyonnnn),/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9))

return %x

}

on *:sockread:s4: {

sockread %a

if (class=”hurtextverdana”> isin %a) {

set %haber $htmlfree(%a)

var %i = 1 , %id $numtok(%haber,191)

while (%i <= $calc(%id – 1)) { var %s $gettok(%haber,%i,191) if (difuzyon isin %s) halt .msg %habernick $replace(%s,-,4-01) inc %i } } } on *:text:!haberler:#haber:set $+(%,haber,nick) $nick | sondakika | .msg %habernick 3Son dakika haberleri listeleniyor : alias haberler { unset %haberler sockclose s6 sockopen s6 sondakika.hurriyet.com.tr 80 } on *:sockopen:s6: { if (!$sockerr) { if $window(@Haberler) { clear @Haberler | window -a @Haberler } else { window -adCk0 +let @Haberler 0 0 500 270 Verdana 13 } sw GET /?sid=0 HTTP/1.1 sw Host: sondakika.hurriyet.com.tr sw User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; tr; rv:1.9.0.5) Gecko/2008120122 Firefox/3.0.5 sw Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8 sw Accept-Language: tr-TR,tr;q=0.8,en-us;q=0.5,en;q=0.3 sw Accept-Encoding: gzip,deflate sw Accept-Charset: ISO-8859-9,utf-8;q=0.7,*;q=0.7 sw Connection: Close sw $crlf } } on *:sockread:s6: { sockread %cenk if (class=”hurtextverdana”> isin %cenk) {

set %haberler $htmlfree(%cenk)

var %iks = 1 , %ide $numtok(%haberler,191)

while (%iks <= $calc(%ide – 1)) {

var %srdr $gettok(%haberler,%iks,191)

if (difuzyon isin %srdr) { halt }

aline 7 @Haberler $replace(%srdr,-,4-10)

inc %iks

}

}

}

Cevap: Konuşan Scripts

Hangi siteden haber aldıgı sorun deil , hürriyet olur mynet olur sabah olur , güncel haberlerı quakenet kanalımda yayınlayacak bi bot scrips istiyorum :) umarım elinden gelir polye ellerine emeğine sağlık bekliyorum :)