mIRC Scripting

mIRC Scripting (https://www.mircscripting.net/)
-   Help - Yardım (https://www.mircscripting.net/help-yardym/)
-   -   Koruma Botu İcin Oylama (https://www.mircscripting.net/help-yardym/430-koruma-botu-ycin-oylama.html)

Aykut 06 Ekim 2009 21:27

Koruma Botu İcin Oylama
 
Foruma Yeni Üye Oldum Ilk Konum Yardım Bolumune Oldugu İcin Kusura Bakmayın Arkadaslar. Soket Bota Koruma Yapmaya Calıstım Yapamadım Hasan Hocamın Bi Kodunu Buldum Bir Forumda Bunu Duzenlemek Istıyorum Fakat Basaramadım

Alıntı:

on *:text:*:#: { if $1 == atılsın && $2 ison # { hinc -mu600 at $gettok($address($nick,2),2,64) 1 | if $hget(at,$gettok($address($nick,2),2,64)) >= 2 { notice $nick Tekrar oy kullanmak için, 10 dakika beklemelisiniz. | halt } | else { hinc -m at2 $2 1 | notice $nick Tarafınızdan atılsın oyu verilen: $2 kullanıcısının şuanki, atılsın oy sayısı: $hget(at2,$2) - Kanaldan atılması için kanal oy sayısı: $calc(5-$hget(at2,$2)) | describe # $2 nick'inin atılması için kalan oy miktarı: $calc(5-$hget(at2,$2)) | if $hget(at2,$2) == 5 { ban -k # $2 2 Oylama kararı ile kanal'dan uzaklaştırıldınız. | hdel at2 $2 } } } }
Yardımcı Olursanız Cok Sevinirim.

WeiLSiDe 06 Ekim 2009 21:42

Ne demek istediğini anlayamadım.. Yukardaki kod oylama ile kişiyi atmak için kullanılmış. Yani atılsın nick şeklinde. 5 farklı kişi oy verirse kişi kanaldan atılır. Senin istediğin ne?

Aykut 06 Ekim 2009 21:47

Bende Bota Beş Farklı Kişi Atılsın Nick Yazınca Atılsın İstiyorum. Detaya Inersek Tam Olarak Istedigim Sey Bir Kişi On Dakikada Bir Oy Verebilsin. Kisi Kanalda OLmasa Bile ip Adresini BanLamak İstiyorum. Bu Kisi Nick Degistirirse Yada Kanaldan Cıkarsa Yine Oyun GecerLi OLması Yada Gzline İle Atılması Da Cok Iyı Olur Eski Mynet teki Gibi.
Bu Konuda Yol Gosterır Yada Yardımcı OLursanız Cok Sevinirim=)

L4roXyL 07 Ekim 2009 01:39

Sen aynı işlevleri socket botta uygulatmakmı istiyorsun?
Bana ayrıntılı bir şekilde tam olarak ne istediğini yaz bakalım.

Aykut 07 Ekim 2009 16:57

Pm Attım Hocam Yanlış Yapmadıysam.

L4roXyL 08 Ekim 2009 07:25

Yeni müsait olabildim.
İşini görebilecek bir sistem yazdım. Kalın olarak belirttiğim yerlere dikkat et.
Ve o kısımları kendi socket bağlantı ismi ile değiş. Sorunsuz çalışır.
Not: Sistem !atılsın nick şeklinde çalışır.

-

if ($2 = 352) {
var %add = $6,%_n = $8,%v1
if ($hget(n_,%_n)) {
%v1 = $v1 | hinc -m _y %add 1
if ($hget(_y,%add) = 5) { sockwrite -n SOCKET-İSMİ gline $3 Toplam 5 farklı lişi tarafından oy aldınız vs. | hdel _y %add | hdel n_ %_n | return }
sockwrite -n SOCKET-İSMİ notice %v1 Tarafınızdan atılsın oyu verilen: %_n kullanıcısının şuanki, atılsın oy sayısı: $hget(_y,%add) - Kanaldan atılması için kanal oy sayısı: $calc(5- $hget(_y,%add))
sockwrite -n SOCKET-İSMİ notice $4 $3 nick'inin atılması için kalan oy miktarı: $calc(5- $hget(_y,%add))
}
}
if ($2 = PRIVMSG) {
var %n = $gettok($gettok($1,1,33),1,58),%_unst
if ($right($4,-1) = !atılsın && $5) {
%_unst = $$hget(_t,$1).unset | hinc -mu600 _t $1 1
if ($hget(_t,$1) >= 2) { sockwrite -n SOCKET-İSMİ notice %n Tekrar oy kullanabilmek için: %_unst saniye bekleyiniz. | return }
else { hadd -m n_ $5 %n | sockwrite -n SOCKET-İSMİ who +cn $3 $5 }
}

Aykut 08 Ekim 2009 23:40

Hasan Hocam Teşekkür Ederim Sistem İçin Fakat Çalıştıramadım. İki Farklı Soket Botta Denedim Ama Olmadı Başka Birşey Dahamı Eklemem GereKiyor. Bende Kanal Komutları $4 Acaba Ondanmı Diye Denedim Yapamadım
Bırde GLine Yerine İp Adresini Nasıl Banlatabilirim $5 De Nicke Atıyor Ama Ip Adresine Yapamıyorum

L4roXyL 09 Ekim 2009 03:14

Çalışmaması için bir sebeb yok. Sen hangi şekilde kullanıyorsun?
Ek olarak /gline komutu zaten kişinin IP numarasını banlar. Nick belirtsen dahi IP numarası banlanır. İlla IP-i göreceğim, yok kline/zline atacağım diyorsan, farklı işlemler yapman gerekiyor. Buda biraz daha fazla kod yazmanı gerektirir.
-
Neyse ben sana örnek vereyim;

on *:sockread:socket-ismi:if ($sockerr) { return } | var %1 | sockread %1 | tokenize 32 %1 | sock_a $1-
alias sock_a {
if ($sock(socket-ismi)) {
if ($2 = 352) {
var %add = $6,%_n = $8,%v1
if ($hget(n_,%_n)) {
%v1 = $v1 | hinc -m _y %add 1
if ($hget(_y,%add) = 5) { sockwrite -n SOCKET-ISMI gline $3 Toplam 5 farklı lişi tarafından oy aldınız vs. | hdel _y %add | hdel n_ %_n | return }
sockwrite -n SOCKET-ISMI notice %v1 Tarafınızdan atılsın oyu verilen: %_n kullanıcısının şuanki, atılsın oy sayısı: $hget(_y,%add) - Kanaldan atılması için kanal oy sayısı: $calc(5- $hget(_y,%add))
sockwrite -n SOCKET-ISMI notice $4 $3 nick'inin atılması için kalan oy miktarı: $calc(5- $hget(_y,%add))
}
}
if ($2 = PRIVMSG) {
var %n = $gettok($gettok($1,1,33),1,58),%_unst
if ($right($4,-1) = !atılsın && $5) {
%_unst = $$hget(_t,$1).unset | hinc -mu600 _t $1 1
if ($hget(_t,$1) >= 2) { sockwrite -n SOCKET-ISMI notice %n Tekrar oy kullanabilmek için: %_unst saniye bekleyiniz. | return }
else { hadd -m n_ $5 %n | sockwrite -n SOCKET-ISMI who +cn $3 $5 }
}
}
}

Socket-ismi olan kısımları kendi socket bağlantının ismi ile değiş. Sorunsuz çalışır.

Aykut 10 Ekim 2009 01:27

Hasan Hocam Çok Teşekkür Ederim Kod Çok Güzel Çalıştı Fakat Oy Veren Kişi Sunucudan Cıkıp Başka Bi Nickle Gelirse Oy Verebiliyor Tekrar Aynı İple Bunu Düzeltemedim
Birde GLine Yerine Kanalda İp adresine Ban Attırmayı Denedim Bi Türlü Başaramadım Hocam

Aykut 12 Ekim 2009 01:55

Konu Güncel Arkadaşlar Oy Kullanan İkinci Defa Oy Kullanabiliyor Süre Dolmadan Nick Değiştirirse. Buna Nasıl Cozum Buluruz Birde Gline Yerine Kanaldan Kick Ban Attırmayı. En Cok Goruntulenen Ikı Konuda Socket Bot Konusu Bı Arkadas Yardımcı Olursa Cok Sevinecem Hasan Hocamın Koda Eklenti Olarak..


++ mIRCScripting.net hakkında kısaca:

mS; "Gayri resmi mIRC" kullanıcı ve tasarımcı topluluğudur.
2009 yılında kurulan mS; tasarımcı ve geliştiricileri bir araya getiren etkileşim ve iletişim sağlayan bir platformdur.
mS; tasarım, programlama, geliştirme, düzenleme vb. pek çok konu etrafında bir araya gelmiş "mIRC" meraklısı bir çok insan tarafından yaratılan içeriğiyle; kullanıcı dostu, özgün elit, nitelikli kişi ve konularla hizmet sunan mIRC Scripting platformudur.

Özgün içerikten onay almaksızın içeriği yaratan kullanıcılarımız tamamen yada kısmen sorumludur, aynı zamanda söz konusu içerik mS yetkilileri izni olmaksızın, kaynak gösterilse dahi(!) kopyalanamaz ve/ya paylaşılamaz.   Site/içerik hakkında görüş, öneri ve şikayetleriniz için sikayet[at]mircscripting[dot]net e-posta ve ya İletişim adresinden bizlere ulaştırabilirsiniz.



mIRC mIRC Orjinal mIRC İndir mIRC Download mIRC Tutorials mIRC Socket mIRC Commands mIRC Komutlar mIRC Yükle mIRC Dersler mIRC Hazır Kodlar mIRC Classentifier mIRC DLL mIRC Dialog mIRC IRC mIRC FTP mIRC Telnet mIRC Help
mIRC Yardım mIRC Iconlar mIRC Com Object mIRC Binary Files mIRC Picture Windows mIRC Unicode mIRC Forum mIRC Hazır Kodlar mIRC Kod mIRC Script mIRC File Handling mIRC Scripting Language mIRC Scripting Dili mIRC Scripting Info
mIRC Scripting Tutorials



User Alert System provided by Advanced User Tagging v3.1.3 (Lite) - vBulletin Mods & Addons Copyright © 2026 DragonByte Technologies Ltd. Runs best on HiVelocity Hosting.

1 2 13 14 16 17 18 19 21 22 23 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 49 50 51 52 54 55 56 57 58 59 60 61 62 63 67 68 69 70 71 72 73 74 75 76

SEO by vBSEO 3.6.1