unban botu
 

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

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

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.

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

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

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

- TuTKuN -
 

Bi Serverde Var Reklam Vermiyimde :)
Root Admini Özeline !Unban #Kanala Yazdıgında Seni #Kanal
Sokuyor Ama Ban Man Kaldırmıyo /Sajoin Yapıyo Herhalde :)
Ole Bi Kod Yapın İşte Ban Kaldırmak Yerine
Ben Yardımcı Olmak İsterdim Ama Anlamıyorum :)

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 . . .

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.

Yanıt: unban botu
 

on @*:BAN:#:{
.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