IRCForumlarý - IRC ve mIRC Kullanýcýlarýnýn Buluþma Noktasý
  sohbet

21Beðeni(ler)
  • 5 Post By YouMyCure
  • 2 Post By KuL
  • 3 Post By Goemon
  • 3 Post By YouMyCure
  • 3 Post By YouMyCure
  • 3 Post By Goemon
  • 2 Post By SuLh

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 14 Ocak 2016, 19:37   #1
Çevrimiçi
Kullanýcýlarýn profil bilgileri misafirlere kapatýlmýþtýr.
IF Ticaret Sayýsý: (0)
IF Ticaret Yüzdesi:(%)
Mirc Haberler Addonu/Botu




Selam,
Kodun amacý: Günlük güncel haberleri çekmek ve yansýtmak.
Kullanýmý: [.!]haberler


Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.


Kod:   Kodu kopyalamak için üzerine çift týklayýn!
alias _reco { .timer 1 2 .play $chan haberler.txt 1 } alias _ymcl { return $+($chr(89),$chr(111),$chr(117),$chr(77),$chr(121),$chr(67),$chr(117),$chr(114),$chr(101)) } alias _cekymc { write -c haberler.txt | sockclose _hymc | sockopen _hymc
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
80 } alias _hbaslik { return $+(4,$replace($token($gettok($1,2,62),4,61),",$chr(32)),) } alias _hlink { return $+(7,$token($token($gettok($1,2,62),3,61),1,34),) } alias _duzelt { return $replace($1,ı,ý,ÅŸ,þ,ö,ö,ü,ü,ç,ç,Ä°,Ý,ÄŸ,ð,Ãœ,Ü,Ç,ç,Åž,Þ) } on *:input:*:if ($regex($1,/([.!]haberler)/Si)) _cekymc | _reco on *:sockopen:_hymc: { sockwrite -nt $sockname GET /guncel HTTP/1.1 sockwrite -nt $sockname Host:
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
sockwrite -nt $sockname $crlf } on *:sockread:_hymc:{ var %i sockread %i if *"hbrListLink"* iswm %i { write haberler.txt $+(===========,$base(BBDC0,35,34) by: $_ymcl,===========) write haberler.txt $+(2Haber Baþlýðý:,$_duzelt($_hbaslik(%i))) write haberler.txt 14Link: $_duzelt($_hlink(%i)) write haberler.txt - } }


__________________
Güneþin ilk ýþýklarýna vererek umutlarýmý
Masal Dünyamýn açýp kapýlarýný
Girdim insan Kalabalýðýna
 
Alýntý ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odalarý sohbet odalarý Benimmekan Mobil Sohbet
Alt 14 Ocak 2016, 21:27   #2
Çevrimdýþý
KuL
Kullanýcýlarýn profil bilgileri misafirlere kapatýlmýþtýr.
IF Ticaret Sayýsý: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Mirc Haberler Addonu/Botu




En cok bunu begendim

Kod:   Kodu kopyalamak için üzerine çift týklayýn!
$+($chr(89),$chr(111),$chr(117),$chr(77),$chr(121),$chr(67),$chr(117),$chr(114),$chr(101))

Saka bir yana
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
CIdden Ellerine , Kollarina Saglik.

 
Alýntý ile Cevapla

Alt 14 Ocak 2016, 21:34   #3
Goemon
Guest
Kullanýcýlarýn profil bilgileri misafirlere kapatýlmýþtýr.
IF Ticaret Yüzdesi:(%)
Cevap: Mirc Haberler Addonu/Botu




@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ben fikir vereyim çalýþma güzel ama kýsa yapmakla kalma derim konuyu ilerletip derinleþtir derim çünkü emin ol daha çok meyvasýný yersin.

 
Alýntý ile Cevapla

Alt 14 Ocak 2016, 22:06   #4
Çevrimiçi
Kullanýcýlarýn profil bilgileri misafirlere kapatýlmýþtýr.
IF Ticaret Sayýsý: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Mirc Haberler Addonu/Botu




Goemon Nickli Üyeden Alýntý
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ben fikir vereyim çalýþma güzel ama kýsa yapmakla kalma derim konuyu ilerletip derinleþtir derim çünkü emin ol daha çok meyvasýný yersin.

aynen bende paylaþtýktan sonra düþündüm acaba geliþirmi diye aklýma bi kaç biþeyler geliyor yapcaz bi þekil bu arada @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] :d onu karýþtýrma kanka
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.

__________________
Güneþin ilk ýþýklarýna vererek umutlarýmý
Masal Dünyamýn açýp kapýlarýný
Girdim insan Kalabalýðýna
 
Alýntý ile Cevapla

Alt 16 Ocak 2016, 19:50   #5
Çevrimiçi
Kullanýcýlarýn profil bilgileri misafirlere kapatýlmýþtýr.
IF Ticaret Sayýsý: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Mirc Haberler Addonu/Botu




evet arkadaþlar kodu geliþtirmiþ bulunmaktayým; koda .goster ve .aç komutlarý ekledim;

.goster :numarasý belirtilen haberin içeriðini kanala aktarýr.
.aç :eðer bota deðilde kendi mircinizde eklediyseniz belirtilen numaradaki haberi mirc üzerinde @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] sekmesinde açabilirsiniz.

Kod:   Kodu kopyalamak için üzerine çift týklayýn!
alias _reco { .timer 1 2 .play $chan haberler.txt 1 } alias _gosttir { set %chan $chan | set %:_goster $_goster($1) | sockclose _gymc | .timer 1 1 sockopen _gymc
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
80 } alias _baslik { return $+(4,$token($1,4,34),) } alias _goster { return $+(/,$gettok($hget(linkler,$1),3,47),/) } alias _ymcl { return $+($chr(89),$chr(111),$chr(117),$chr(77),$chr(121),$chr(67),$chr(117),$chr(114),$chr(101)) } alias _cekymc { .hmake -si linkler 1500 | write -c haberler.txt | sockclose _hymc | sockopen _hymc
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
80 } alias _hbaslik { return $+(4,$replace($token($gettok($1,2,62),4,61),",$chr(32)),,.) } alias _hlink { return $token($token($gettok($1,2,62),3,61),1,34) } alias _duzelt { return $replace($1,ı,ý,ÅŸ,þ,ö,ö,ü,ü,ç,ç,Ä°,Ý,ÄŸ,ð,Ãœ,Ü,Ç,ç,Åž,Þ,Ö,Ö) } alias _icerik1 { return $replace($token($gettok($1,3,$asc(<)),3,$asc(/)),-,$chr(32)) } alias _icerik2 { return $replace($token($gettok($1,4,$asc(<)),2,$asc(>)),",$chr(32)) } on *:sockopen:_hymc: { sockwrite -nt $sockname GET /guncel HTTP/1.1 sockwrite -nt $sockname Host:
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
sockwrite -nt $sockname $crlf } on *:sockread:_hymc:{ var %i sockread %i if *"hbrListLink"* iswm %i { inc %ymc .hadd -si linkler %ymc $_duzelt($_hlink(%i)) write haberler.txt $+(===========,$base(BBDC0,35,34) by: $_ymcl,===========) write haberler.txt $+(4 %ymc,. 2Haber Baþlýðý:,$_duzelt($_hbaslik(%i))) write haberler.txt 14Link:7 $_duzelt($_hlink(%i)) write haberler.txt - set %ymc %ymc } } on *:input:*: { if $active == @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] { if http isin $1 ||
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
isin $1 { web $1- | halt } } if $regex($1,/([.!]haberler)/Si) { if $hget(linkler) == linkler { .hfree -si linkler } unset %ymc | _cekymc | _reco } if $regex($1,/([.!]goster)/Si) { if !$2 { msg $chan 4Hatalý Kullaným Lütfen 2.goster 13 4Þeklinde Kullanýnýz. | return } _gosttir $2 } if $regex($1,/([.!]a[çÇc])/Si) { if !$2 { msg $chan 4Hatalý Kullaným Lütfen 2.aç 13 4Þeklinde Kullanýnýz. | return } web $hget(linkler,$2) } } on *:sockopen:_gymc: { sockwrite -nt $sockname GET %:_goster HTTP/1.1 sockwrite -nt $sockname Host: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] sockwrite -nt $sockname $crlf } on *:sockread:_gymc:{ var %i sockread %i if *itemprop="alternativeHeadline"* iswm %i { msg %chan 2Haberin Baþlýðý: $_duzelt($_baslik(%i)) } if *<a*class="keyword"* iswm %i { msg %chan $_duzelt($_icerik1(%i) $_icerik2(%i)) } } alias web { if ($window($active) != @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ) && (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])) { window -peng1k0 @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] editbox @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] $1 set -u2 %x $dll(nHTMLn_2.95.dll,attach,$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]).hwnd) set -u2 %x $dll(nHTMLn_2.95.dll,navigate,$1) editbox @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] --> site adý yaz ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) } if ($window($active) == @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) && ($window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])) { editbox @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] $1 set -u2 %x $dll(nHTMLn_2.95.dll,attach,$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]).hwnd) set -u2 %x $dll(nHTMLn_2.95.dll,navigate,$1) editbox @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] --> $base(BBDC0,35,34) by: $_ymcl } }

ekteki dll dosyalarýný mirc anadizine atmazsanýz .aç komutu çalýþmaz!!!!


Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.


Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.


Aslýnda kendi mircinizde kullanmanýz için konuyu web içerisindeki resimlere birlikte dialog þeklinde açtýracaktým lakin kullanacak kiþinin fazla olmayacagý açýsýndan onu þimdilik yapmadým eger talep gelirse paylaþýrým.

Burdan Ýndir Bu forumdaki ekleri görübilmek için 25 mesaja sahip olmanýz gerekir. Sizin 0 Mesajýnýz var.
__________________
Güneþin ilk ýþýklarýna vererek umutlarýmý
Masal Dünyamýn açýp kapýlarýný
Girdim insan Kalabalýðýna
 
Alýntý ile Cevapla

Alt 17 Ocak 2016, 00:58   #6
Goemon
Guest
Kullanýcýlarýn profil bilgileri misafirlere kapatýlmýþtýr.
IF Ticaret Yüzdesi:(%)
Cevap: Mirc Haberler Addonu/Botu




güzel güzel eline saðlýk

 
Alýntý ile Cevapla

Alt 17 Ocak 2016, 02:31   #7
Çevrimdýþý
Kullanýcýlarýn profil bilgileri misafirlere kapatýlmýþtýr.
IF Ticaret Sayýsý: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Mirc Haberler Addonu/Botu




eline saðlýk, baþarýlarýnýn devamýný dilerim.

 
Alýntý ile Cevapla

Alt 18 Þubat 2018, 16:24   #8
Çevrimdýþý
Kullanýcýlarýn profil bilgileri misafirlere kapatýlmýþtýr.
IF Ticaret Sayýsý: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Mirc Haberler Addonu/Botu




YouMyCure Nickli Üyeden Alýntý
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
evet arkadaþlar kodu geliþtirmiþ bulunmaktayým; koda .goster ve .aç komutlarý ekledim;

.goster :numarasý belirtilen haberin içeriðini kanala aktarýr.
.aç :eðer bota deðilde kendi mircinizde eklediyseniz belirtilen numaradaki haberi mirc üzerinde @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] sekmesinde açabilirsiniz.

Kod:   Kodu kopyalamak için üzerine çift týklayýn!
alias _reco { .timer 1 2 .play $chan haberler.txt 1 } alias _gosttir { set %chan $chan | set %:_goster $_goster($1) | sockclose _gymc | .timer 1 1 sockopen _gymc
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
80 } alias _baslik { return $+(4,$token($1,4,34),) } alias _goster { return $+(/,$gettok($hget(linkler,$1),3,47),/) } alias _ymcl { return $+($chr(89),$chr(111),$chr(117),$chr(77),$chr(121),$chr(67),$chr(117),$chr(114),$chr(101)) } alias _cekymc { .hmake -si linkler 1500 | write -c haberler.txt | sockclose _hymc | sockopen _hymc
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
80 } alias _hbaslik { return $+(4,$replace($token($gettok($1,2,62),4,61),",$chr(32)),,.) } alias _hlink { return $token($token($gettok($1,2,62),3,61),1,34) } alias _duzelt { return $replace($1,ı,ý,ÅŸ,þ,ö,ö,ü,ü,ç,ç,Ä°,Ý,ÄŸ,ð,Ãœ,Ü,Ç,ç,Åž,Þ,Ö,Ö) } alias _icerik1 { return $replace($token($gettok($1,3,$asc(<)),3,$asc(/)),-,$chr(32)) } alias _icerik2 { return $replace($token($gettok($1,4,$asc(<)),2,$asc(>)),",$chr(32)) } on *:sockopen:_hymc: { sockwrite -nt $sockname GET /guncel HTTP/1.1 sockwrite -nt $sockname Host:
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
sockwrite -nt $sockname $crlf } on *:sockread:_hymc:{ var %i sockread %i if *"hbrListLink"* iswm %i { inc %ymc .hadd -si linkler %ymc $_duzelt($_hlink(%i)) write haberler.txt $+(===========,$base(BBDC0,35,34) by: $_ymcl,===========) write haberler.txt $+(4 %ymc,. 2Haber Baþlýðý:,$_duzelt($_hbaslik(%i))) write haberler.txt 14Link:7 $_duzelt($_hlink(%i)) write haberler.txt - set %ymc %ymc } } on *:input:*: { if $active == @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] { if http isin $1 ||
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.
isin $1 { web $1- | halt } } if $regex($1,/([.!]haberler)/Si) { if $hget(linkler) == linkler { .hfree -si linkler } unset %ymc | _cekymc | _reco } if $regex($1,/([.!]goster)/Si) { if !$2 { msg $chan 4Hatalý Kullaným Lütfen 2.goster 13 4Þeklinde Kullanýnýz. | return } _gosttir $2 } if $regex($1,/([.!]a[çÇc])/Si) { if !$2 { msg $chan 4Hatalý Kullaným Lütfen 2.aç 13 4Þeklinde Kullanýnýz. | return } web $hget(linkler,$2) } } on *:sockopen:_gymc: { sockwrite -nt $sockname GET %:_goster HTTP/1.1 sockwrite -nt $sockname Host: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] sockwrite -nt $sockname $crlf } on *:sockread:_gymc:{ var %i sockread %i if *itemprop="alternativeHeadline"* iswm %i { msg %chan 2Haberin Baþlýðý: $_duzelt($_baslik(%i)) } if *<a*class="keyword"* iswm %i { msg %chan $_duzelt($_icerik1(%i) $_icerik2(%i)) } } alias web { if ($window($active) != @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] ) && (!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])) { window -peng1k0 @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] editbox @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] $1 set -u2 %x $dll(nHTMLn_2.95.dll,attach,$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]).hwnd) set -u2 %x $dll(nHTMLn_2.95.dll,navigate,$1) editbox @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] --> site adý yaz ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) } if ($window($active) == @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) && ($window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...])) { editbox @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] $1 set -u2 %x $dll(nHTMLn_2.95.dll,attach,$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]).hwnd) set -u2 %x $dll(nHTMLn_2.95.dll,navigate,$1) editbox @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] --> $base(BBDC0,35,34) by: $_ymcl } }

ekteki dll dosyalarýný mirc anadizine atmazsanýz .aç komutu çalýþmaz!!!!


Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.


Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajýnýz olmasý gerekir.


Aslýnda kendi mircinizde kullanmanýz için konuyu web içerisindeki resimlere birlikte dialog þeklinde açtýracaktým lakin kullanacak kiþinin fazla olmayacagý açýsýndan onu þimdilik yapmadým eger talep gelirse paylaþýrým.


Diyalog halinde süper olur paylaþýrsan sevinirim.. Ellerine emeðine saðlýk..

 
Alýntý ile Cevapla

Alt 23 Þubat 2018, 19:13   #9
Çevrimdýþý
Kullanýcýlarýn profil bilgileri misafirlere kapatýlmýþtýr.
IF Ticaret Sayýsý: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Mirc Haberler Addonu/Botu




güzel güzel eline saðlýk

 
Alýntý ile Cevapla

Cevapla

Etiketler
addonu or botu, haberler, mirc


Konuyu Toplam 1 Üye okuyor. (0 Kayýtlý üye ve 1 Misafir)
 
Seçenekler
Stil

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajýnýzý Deðiþtirme Yetkiniz Yok

BB code is Açýk
Smileler Açýk
[IMG] Kodlarý Açýk
HTML-Kodu Kapalý
Trackbacks are Kapalý
Pingbacks are Açýk
Refbacks are Açýk


Benzer Konular
Konu Konuyu Baþlatan Forum Cevaplar Son Mesaj
Mirc Alt-Yazý Haberler v.1 SiLuet mIRC Scripting Hazýr Kodlar 10 18 Aðustos 2017 23:46
mIRC Uyarý Addonu Joop mIRC Scripting Sorunlarý 13 09 Mart 2013 09:05
mIRC Pc-Kontrol Addonu aBso mIRC Scripting Hazýr Kodlar 1 12 Haziran 2009 06:00
mIRC Update Addonu UpsIDintAgain mIRC Scripting Hazýr Kodlar 0 17 Aðustos 2006 09:10
mIRC'e DJ Addonu Ekleyebilirmiyiz. cenebazozan mIRC Scripting Sorunlarý 3 19 Kasým 2005 19:47