Çevrimdışı

Benim Güvenlik Botuna Şöyle Birşey yapmak mümkün mü?; KanaLda Ki Bütün Opların her nicke ayrı ayrı kaç tane ban attıklarını kaydedcek. ve ben bota <NeLix> NeLix Ban List Dediğimde NeLix nickinin kaç tane ban attığını söylicek ßöyle birşey yapmak mümkün mü ? yardım eder misiniz ?

 

Çevrimdışı

Kanalda "NeLix Ban List" yazınca o kanalda daha önce atılan ve %ban.#kanal.nick şeklinde saklanmış olan ban sayıları tek bir satırda kanala mesaj atılır. Yeşille yazılmış nickler bu komutu kullanabilecek kişileri gösterir. Space ile ayırarak sende istediğin nicki ekleyebilirsin. $getban(#kanal) aliasıda custom kullanım içindir. İşte kod:


on *:BAN:#:{ inc $+(%,ban.,#,.,$nick) }
alias getban { if $me ison $1 { var %; = 1, %: | while $var($+(%,ban.,$1,.*),%;) { %: = $addtok(%:,$+($gettok($v1,3,46),:,$($v1,2)),32) | inc %; } | return $iif(%:,Ban listesi durumu[Ban atan:ban sayısı]> %:,$1 kanalında ban atan yok.) } }
on *:text:NeLix Ban List:#:{ if $istok(NeLix NeLix2,$nick,32) { msg # $getban(#) } }


Umarım işine yarar..

 

Çevrimdışı

El33t Ağßi code çalışmiyor yaws benim demek istediğim şu; Mesala GüvenLik botunun Masterinde Bir Nick Var. Masterinde ki o nick Güvenlik botuna Bugün Kim Ne kadar Ban Atmıs Onları Listeliyecek. ama olmadı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 

Çevrimdışı

on *:rawmode:#: if $1 == +b { write ban.txt $nick $2- }
on master:text:NeLix Ban List:#: {
var %= 1
while %= <= $lines(ban.txt) {
msg # $read(ban.txt,%
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

inc %= } }

auser'da master seviyesinden ekli nicklerin kanala NeLix Ban List yazması yeterlidir
umarım işine yarar

__________________
TurkSohbet.NET | #XPass

 

Çevrimdışı

<NeLix> G-u-v-e-n-L-i-k Ban List
<G-u-v-e-n-L-i-k> 21/04/2006
<G-u-v-e-n-L-i-k> Maxi: 50
<G-u-v-e-n-L-i-k> NeLix:60
<G-u-v-e-n-L-i-k> Sfex: 30
<G-u-v-e-n-L-i-k> nike: 10
<G-u-v-e-n-L-i-k> Course: 50
<G-u-v-e-n-L-i-k> cannibal: 5
<G-u-v-e-n-L-i-k> Kes Ban Attılar.

Demek istediğim bu şekilde ama dieforyou senin ki ban listesini söyliyor o işime yaramadı yaw
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
((

 

Çevrimdışı

Aşağıdaki identifier $banlcheck(#kanal) şeklinde çalışır ve o anda kanaldaki ban listesindeki banları nicklere göre sayar ve tek satır halinde kimin kaç ban attığını gösterir. Eğer sen kanala girdiğinde senden önce ban atılmışsa on me:*:join:#:mode # +b yaparak senden önce atılan banları da görebilirsin, böylece daha sağlıklı çalışacaktır. İşte kod:

alias banlcheck {
if $1 ischan {
unset $+(%bl.,$1,.*)
var %_ = 1 | while $ibl($1,%_).by {
inc -e $+(%,bl.,$1,.,$gettok($v1,1,33))
inc %_
}
var %= = 1, %; | while $var($+(%,bl.,$1,.*),%=) {
%; = $addtok(%;,$+($gettok($v1,3,46),:,$($v1,2),),3 2)
inc %=
}
return $+([,$1,]) $date - $iif(%;,$sorttok(%;,32),kanalda ban yok.) | unset $+(%bl.,$1,.*)
}
return Bu identifier bir kanal ile çalışır.
}

Senin istediğin gibi botun nicki ban list yazdığında kanala mesaj olarak gitmesini istiyorsan şu kodu kullanabilirsin.

on *:text:$( $+ $me Ban List $+ ):#:msg # $banlcheck(#)

Ben denedim ve çalıştı, umarım işine yarar..

 

Çevrimdışı

<NeLix> NeLBoT ban list
<NeLBoT> [#gelişim] 28/04/2006 - :

Abi Bu Şekilde Diyor. Kısacası Nicki Söylemiyor..

 

Çevrimdışı

on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
#:{ if $hget(ban,$+(#,$nick)) { hinc ban $+(#,$nick) 1 | halt } | elseif !$hget(ban,$+(#,$nick)) { hadd ban $+(#,$nick) 1 } }
alias hban { var %a $hget(ban,0).item | while %a { echo -a $hget(ban,%a).item $hget(ban,%a).data | dec %a } }
on *:text:NeLix Ban List:#:{ var %ü $hget(ban,0).item | while %ü { if $regex($hget(ban,%ü).item,#) { msg # $hget(ban,%ü).item : $hget(ban,%ü).data } | dec %ü } }
on *:disconnect: hsave ban hash |
on *:connect: hmake ban 100 | hload ban hash

 

Çevrimdışı

Deneyerek verdiğim kodun çalışmaması gerçekten ilginç. Kodları nereye/nasıl koyacağınızı bildiğinizi varsayarak ve detaylı açıklamayı yaparak veriyorum. Yazdığım kodları saklamadığım için olduğu gibi yukardaki alias banlcheck ve on text ile başlayan kodları aldım, mIRC'de Remote'a koydum ve kanalda cloneum varken 7 tane ban ekledim:

(10:46.34a) * el33t sets mode: +bbbbbbb qw!*@* qt!*@* qr!*@* qu!*@* qo!*@* qp!*@* qz!*@*

Daha sonra cloneum kanala:

(10:46.44a) <ARSLAN> el33t ban list

yazdı ve benden otomatik olarak şu mesaj kanala gitti:

(10:46.45a) <@el33t> [#mirc] 23/04/2006 - el33t:7

-
Bende çalışan kodun sende çalışmaması garip. Internal ban listesine baktığı için yani kanala çift tıkladığında çıkan penceredeki banları kimin attığına göre çalıştığı için sen kanala girdikten sonra senden önce atılan banların listesini alman gerekir, aksi takdirde mIRC sadece sen girdikten sonraki banları o ban listesinde sayacaktır. Onun için de hangi kodu kullanman gerektiğini yazmıştım ve tekrar yazıyorum.

on me:*:join:#:mode # +b

Yani sen herhangi bir kanala girdiğinde kanal ban listesini mIRC alıyor, böylece bu kod tam anlamıyla çalışıyor.

 

Çevrimdışı

alias banlcheck {
if $1 ischan {
unset $+(%bl.,$1,.*)
var %_ = 1 | while $ibl($1,%_).by {
inc -e $+(%,bl.,$1,.,$gettok($v1,1,33))
inc %_
}
var %= = 1, %; | while $var($+(%,bl.,$1,.*),%
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
{
%; = $addtok(%;,$+($gettok($v1,3,46),:,$($v1,2),),3 2)
inc %=
}
return $+([,$1,]) $date - $iif(%;,$sorttok(%;,32),kanalda ban yok.) | unset $+(%bl.,$1,.*)
}
return Bu identifier bir kanal ile çalışır.
}

GüvenLik botunda Bunu Ayrı Bir Remote Ye

on *:text:$( $+ $me Ban List $+ ):#:msg # $banlcheck(#)

Bunu da Ayrı bir Remote ye kayıddettim. GüvenLik botunda NeLix Nickine Master Ekledim. Ban List dediğimde ne nicki söylüyor nede ne kadar ban attığını..
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.