IRC ve mIRC Kullanıcılarının Buluşma Noktası
  Reklam Ver


Forum tutkunlarının tek adresi Türkiye Sohbet Odaları Sohbetteyiz herkes burda

ayna chat muhabbetbayilik veren firmalar

Şeker Shell  Sohbet


mIRC Scripting Hazır Kodlar

mIRC Scriptinglerinizde kullanabileceğiniz hazır kodlara bu başlık altından ulaşabilirsiniz.



6Beğeni(ler)
  • 6 Post By pCkOpAt

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 06 Mart 2017, 05:37   #1
Çevrimiçi
Güncel mIRC Socket !burc Kod


-- Sponsor Baglantı --


Merhabalar,

Bu işleri pek bilmesem de gördüğüm öğrendiğim kadarıyla birşeyler yapmaya çalıştım. Yanlış yapmış olabilirim ama bu olayı öğrenmemde ve mantığını kavramamda yardımcı olan @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 'a teşekkür ediyorum. Kendisinin örnek verdiği kod üzerinden bir deneme yaptım burclarla ilgili olarak kendim denedim çalışıyor. Sizlerle paylaşmak istedim sizler daha pratik yolunu geliştirebilirsiniz. Yanlış anlaşılma olmasın ben yazmadım @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 'ın anlattıkları, bu forumdan gördüklerim ve izlediğim videolardan yola çıkarak bir şeyler yapmaya çalıştım.

Kullanımı: !burc burcunuz şekildedir.
Örnek: !burc oglak

Not: Androirc ve AndChatte denenmiştir. Türkçe karakterlerin hepsi gözüküyor.

Not2: Türkçe karakter veya büyük harf şeklinde sorgulama yapabilirsiniz.
Örnek: !burc oğlak veya !burc BAŞAK

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias burc { if $sock(burc) { sockclose burc } sockopen burc mahmure.hurriyet.com.tr 80 set %brcs $1 } alias htmlfree { var %x, %i = $regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } on *:sockopen:burc:{ var %burc = sockwrite -n burc %burc GET /astroloji/burclar/ $+ %brcs HTTP/1.1 %burc Host: mahmure.hurriyet.com.tr %burc User-Agent: Mozilla/5.0 (Windows NT 6.1; Win64; x64; rv:48.0) Gecko/20100101 Firefox/48.0 %burc Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8 %burc Accept-Language: tr-TR,tr;q=0.8,en-US;q=0.5,en;q=0.3 ;%burc Accept-Encoding: gzip, deflate %burc Cookie: hcatFrom=astroloji; _sgf_user_id=gb.636240726995469550-dfbd235b-ab04-4914-a4bc-2ff0f7878eee; hrp_gb=gb.636240726995469550-dfbd235b-ab04-4914-a4bc-2ff0f7878eee; __atuvc=6%7C10; ASP.NET_SessionId=4a4giokhxmtt1wa2hbiqfpqs; __atuvs=58bc94ec413b9cfb000; semPageCounter=2 %burc Connection: keep-alive %burc Upgrade-Insecure-Requests: 1 %burc $crlf } on *:sockread:burc:{ var %burcc sockread %burcc var %text $htmlfree(%burcc) var %rtext $replace(%text,&bull;, ,&ccedil;,$chr(231),&ouml;,$chr(246),&uuml;,$chr(252),ı,$chr(253),ÅŸ,$chr(254),ÄŸ,$chr(240),Ä°,$chr(221),Å,$chr(222),Ç,$chr(199),ç,$chr(231),Ãœ,$chr(220),ö,$chr(246),Ö,$chr(214),ü,$chr(252),Ãœ,$chr(220),&rsquo;,$chr(146),&acirc;,$chr(226)) if (<div class="burcDetail mBot30px"> isin %burcc) { msg %:chan 2 %rtext | sockclose burc } } on $*:text:/^[.!]bur[cç]/Si:#:{ if (!$2) { msg $chan $+($chr(3),4,$nick) 2Burç belirtmediniz } elseif $hget(burc,$nick) { .notice $nick $hget(burc,$nick).unset saniye içersinde, Yalnız 1 defa [!]burc Komutunu Kullanabilirsiniz. } else { .set -u2 %:chan $chan .timer -h 1 500 burc $replace($lower($2),İ,i,I,i,Ğ,g,ğ,g,Ş,s,ş,s,Ü,u,ü,u,ö,o,Ö,o,ı,i) .hinc -mu30 burc $nick } }

Teşekkürler,
İyi forumlar.
Merhabalar,

Bu işleri pek bilmesem de gördüğüm öğrendiğim kadarıyla birşeyler yapmaya çalıştım. Yanlış yapmış olabilirim ama bu olayı öğrenmemde ve mantığını kavramamda yardımcı olan @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 'a teşekkür ediyorum. Kendisinin örnek verdiği kod üzerinden bir deneme yaptım burclarla ilgili olarak kendim denedim çalışıyor. Sizlerle paylaşmak istedim sizler daha pratik yolunu geliştirebilirsiniz. Yanlış anlaşılma olmasın ben yazmadım @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 'ın anlattıkları, bu forumdan gördüklerim ve izlediğim videolardan yola çıkarak bir şeyler yapmaya çalıştım.

Kullanımı: !burc burcunuz şekildedir.
Örnek: !burc oglak

Not: Androirc ve AndChatte denenmiştir. Türkçe karakterlerin hepsi gözüküyor.

Not2: Türkçe karakter veya büyük harf şeklinde sorgulama yapabilirsiniz.
Örnek: !burc oğlak veya !burc BAŞAK

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias burc { if $sock(burc) { sockclose burc } sockopen burc mahmure.hurriyet.com.tr 80 set %brcs $1 } alias htmlfree { var %x, %i = $regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } on *:sockopen:burc:{ var %burc = sockwrite -n burc %burc GET /astroloji/burclar/ $+ %brcs HTTP/1.1 %burc Host: mahmure.hurriyet.com.tr %burc User-Agent: Mozilla/5.0 (Windows NT 6.1; Win64; x64; rv:48.0) Gecko/20100101 Firefox/48.0 %burc Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8 %burc Accept-Language: tr-TR,tr;q=0.8,en-US;q=0.5,en;q=0.3 ;%burc Accept-Encoding: gzip, deflate %burc Cookie: hcatFrom=astroloji; _sgf_user_id=gb.636240726995469550-dfbd235b-ab04-4914-a4bc-2ff0f7878eee; hrp_gb=gb.636240726995469550-dfbd235b-ab04-4914-a4bc-2ff0f7878eee; __atuvc=6%7C10; ASP.NET_SessionId=4a4giokhxmtt1wa2hbiqfpqs; __atuvs=58bc94ec413b9cfb000; semPageCounter=2 %burc Connection: keep-alive %burc Upgrade-Insecure-Requests: 1 %burc $crlf } on *:sockread:burc:{ var %burcc sockread %burcc var %text $htmlfree(%burcc) var %rtext $replace(%text,&bull;, ,&ccedil;,$chr(231),&ouml;,$chr(246),&uuml;,$chr(252),ı,$chr(253),ÅŸ,$chr(254),ÄŸ,$chr(240),Ä°,$chr(221),Å,$chr(222),Ç,$chr(199),ç,$chr(231),Ãœ,$chr(220),ö,$chr(246),Ö,$chr(214),ü,$chr(252),Ãœ,$chr(220),&rsquo;,$chr(146),&acirc;,$chr(226)) if (<div class="burcDetail mBot30px"> isin %burcc) { msg %:chan 2 %rtext | sockclose burc } } on $*:text:/^[.!]bur[cç]/Si:#:{ if (!$2) { msg $chan $+($chr(3),4,$nick) 2Burç belirtmediniz } elseif $hget(burc,$nick) { .notice $nick $hget(burc,$nick).unset saniye içersinde, Yalnız 1 defa [!]burc Komutunu Kullanabilirsiniz. } else { .set -u2 %:chan $chan .timer -h 1 500 burc $replace($lower($2),İ,i,I,i,Ğ,g,ğ,g,Ş,s,ş,s,Ü,u,ü,u,ö,o,Ö,o,ı,i) .hinc -mu30 burc $nick } }

Teşekkürler,
İyi forumlar.

Konu pCkOpAt tarafından (16 Ocak 2018 Saat 22:02 ) değiştirilmiştir. Sebep: Kod güncellenmiştir.
  Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
Cevapla

Etiketler
!burc, burc kod, socket burc

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 Açık
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
mIRC Socket BNC v2 (Sckbnc v2) Set IRCd Botlar 30 12 Ekim 2016 23:47
mIRC Web Proxy Security ( Socket Sistem ) Set mIRC Scripting Hazır Kodlar 15 19 Mayıs 2011 20:35
mIRC Botu na Socket Bot Actırma rX mIRC Scripting Sorunları 5 25 Mart 2009 19:49