Çevrimdışı

merhaba arkadaşlar ben şöyle bir şey istiyorum. örneğin Benim zurna kanalım var ve zurnaop kanalına bot yapıcam ama unban botu zurna kanalına gelen userlerin özeline gidip zurna kanalından banınızı kaldırmak için şu komutu yazınız gibi bir şey demesini istiyorum registerli ve registersiz nick'lere. '' ßilgi PayLaştıkca GüseLdir '' Sizden Bir Cevap Bekliyorum Lütfen

 

Çevrimdışı

istediğin kodların 2 side sitede mevcut hatta daha fazlası sana kalan bunları birleştirmek. Saygılar.

 

Çevrimdışı

on *:text:!unban &:?:{
if $me isop $2 {
var %| = 1, %. = 0 | while $ibl($2,%|) {
if $ibl($2,%|) iswm $+($nick,!,$address) { mode $2 -b $v1 | inc %. }
inc %|
}
if %. >= 1 { .msg $nick $2 kanalında $v1 banınız kaldırıldı. } | else { .msg $nick $2 kanalında banlı değilsin. }
}
else { .msg $nick $2 kanalında op değilim. }
}

ßanını Açtırtmak için bunu kullanaßilirsin.

 

Çevrimdışı

otomatik o kanala girenlerin banınımı acıyor bu nelix ?

 

Çevrimdışı

hayir botun özeline !unban #kanal yazması lazim o zaman açabilir..

 

Çevrimdışı

olmuyor nelix banınız kaldırıldı diyor ama kanaldan banı kaldırmak istedigim zaman kanaldan ban filan kaldirmiyor deli oldum nerde yanlıs yapdim acaba bilemiyorum 1 az dikkatli olursanız sevirinirim eminim ince bir ayrıntısı var dir bi bakarsanız sevinirim

 

Çevrimdışı

Bi Serverde Var Reklam Vermiyimde
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Root Admini Özeline !Unban #Kanala Yazdıgında Seni #Kanal
Sokuyor Ama Ban Man Kaldırmıyo /Sajoin Yapıyo Herhalde
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Ole Bi Kod Yapın İşte Ban Kaldırmak Yerine
Ben Yardımcı Olmak İsterdim Ama Anlamıyorum
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 

Çevrimdışı

msl adam reklam, kufur yada bad nick atıldı dielim adam gelip !unban #kanal yazdıgında adamın nikine veya ıp sine baqacak daha once bu adresten veya niick ten reklam yapıldı kufur edildi diecek ve banı acmayıp adamı bulundugu kanaldan atacak bunu nasıl yaparız ?? ama akick ile olacak . . .

 

Çevrimdışı

Op olduğunuz kanallardan herhangi birinde kicklenen biri kicksnbans.#kanal-adı.txt dosyasına "kick #kanal-adı kicklenen-nick:kicklenen-nick-ipsi:kickleyen-nick kicklendiği-zaman kick-sebebi" şeklinde kaydediliyor. Daha sonra eğer bu nick banlanırsa, kicksnbans.#kanal-adı.txt'de kick varsa bu kick kbanla değişiyor ve banmaskı da ekleniyor, bu kişi kanala geri girdiğinde .txt dosyasından o kişiyle ilgili bilgi siliniyor ya da banı açıldığında .txt dosyasındaki bilgi siliniyor. Özelinize gelip !unban #kanal-adı yazdığında ise #kanal-adı kanalından kicklendiği/banlandığı/kickbanlandığı ve ne zaman kim tarafından hangi sebeble atıldığı yazıyor. Kodu denedim ve çalışıyor, tek yapmanız gereken mIRC'de Remote'a koymak. İstenilirse daha da geliştirilebilir, İşte kod:


on @*:KICK:#:{
var %. = $+(kicksnbans.,#,.txt)
if $read(%.,w,ban # $knick $+ :*) { write $+(-l,$readn) %. kban # $+($knick,:,$gettok($wildsite,2,64),:,$gettok($get tok($read(%.,$readn),3,32),3,58)) $nick $ctime $strip($1-) } | else { write %. kick # $+($knick,:,$gettok($wildsite,2,64)) $nick $ctime $strip($1-) }
}
on @*:BAN:#:{
var %: = $ialchan($banmask,#,0) | while %: {
var %. = $ialchan($banmask,#,%:)
if $gettok(%.,1,33) != $nick {
write $iif($read($+(kicksnbans.,#,.txt),w,kick # $gettok(%.,1,33) $+ *),$+(-l,$readn) $+(kicksnbans.,#,.txt) kban,$+(kicksnbans.,#,.txt) ban) # $+($gettok(%.,1,33),:,$gettok(%.,2,64),:,$banmask) $nick $ctime $gettok($read($+(kicksnbans.,#,.txt),$readn),6-,32)
}
dec %:
}
}
on @*:UNBAN:#:{
var %. = $+(kicksnbans.,#,.txt) | if $read(%.,w,*ban # *: $+ $banmask $+ *) { write $+(-dl,$readn) %. }
}
on @*:JOIN:#:{
var %. = $+(kicksnbans.,#,.txt) | if $read(%.,w,kick # $nick $+ :*) || $read(%.,w,*ban # $nick $+ : $+ $gettok($wildsite,2,64) $+ :*) { write $+(-dl,$readn) %. }
}
on *:text:!unban &:?:{
if $me isop $2 {
var %' = $+(kicksnbans.,$2,.txt)
if $read(%',w,kban $2 $nick $+ :*) || $read(%',w,kick $2 $nick $+ :*) { var %d = $readn | .msg $nick $2 kanalında $+(,$duration($calc($ctime - $gettok($read(%',%d),5,32))),) önce $+(,$gettok($read(%',%d),4,32),) tarafından $+(",$gettok($read(%',%d),6-,32),") sebebiyle $iif($gettok($read(%',%d),1,32) == kban,$+(,$gettok($gettok($read(%',%d),3,32),3,58) ,) banmaskın banlandı ve) kicklendin. }
elseif $read(%',w,ban $2 $nick $+ :*) { var %d = $readn | .msg $nick $2 kanalında $+(,$duration($calc($ctime - $gettok($read(%',%d),5,32))),) önce $+(,$gettok($read(%',%d),4,32),) tarafından $+(,$gettok($gettok($read(%',%d),3,32),3,58),) banmaskın banlandı. }
elseif $checkibl($2,$wildsite) { .msg $nick $2 kanalında banlısın. $v1 }
if $checkibl($2,$+($nick,!*@*)) { .msg $nick $2 kanalında banlısın. $v1 }
else { .msg $nick $2 kanalında kick/ban/kickban kaydın bulunamadı. }
}
else { .msg $nick $+(,$2,) kanalında op değilim. }
}
alias checkibl { if $me isop $1 && $2 { var %: = $ibl($1,0), %ç | while %: { if $ibl($1,%:) iswm $2 { %ç = $addtok(%ç,$+(banmask:,$chr(160),,$v1,,$chr(160) ,banlayan:,$chr(160),$ibl($1,%:).by,,$chr(160),. .,$duration($calc($ctime - $ibl($1,%:).ctime)) önce),32) } | dec %: } | return $iif(%ç,%ç,$false) } }


Umarım işinize yarar..

Edit: Biraz daha geliştirdim, eğer kanal kick ve banlarının saklandığı dosyada nickle ilgili kayıt yoksa kanal ban listesine bakıyor ve orda varsa ordaki bilgileri nicke yansıtıyor. Denedim çalışıyor.

 

on @*
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
AN:#:{
.set %kisi $2-
}
on @*:unBAN:#:{
if %kisi == $2- {
.msg %acilan Banınız Açılmıştır..
}
}
on @*:kick:#: {
.msg $knick Ban yedin açmak için !unban #kanal yaz
}
on *:text:*:?: {
if !unban * iswm $1- {
.mode $2 -b %kisi
.mode $2 -b $nick
.set %acilan $nick
}
}




denedim