Çevrimdışı

Amigo Nickli Üyeden Alıntı

ArkadsaLar Bunu NormaL Ben Degilde Akick SekLınde NasıL AtabiLiriz.

ban $chan $address($nick,2) | kick $chan $nick Badnick

bölümünü kaldir şunu yaz..

cs akick $chan add $address($nick,2) Bad Nick | cs akick $chan enforce | cs akick $chan del $address($nick,2)

olarak deistirrr...

 

Çevrimdışı

 

Çevrimdışı

Selamlar Arkadaşlar ..
ben mIRC'e komut ile Badnick listesine Ekleme yapmak istiyorum nasıl yapabilirim..yani demek istediğim F1 tuşuna eklicem alias öyle olmalıkı F1'e Bastığımda o nick otomatik badnick listeme eklenmeli.

 

Çevrimdışı

sselam arkadaşlar ben mırc açıkken komutla badnick dosyasına nasıl ekleme yaparım

 

Çevrimdışı

biraz arama yapilda coder kardesler gercektende cok guzel is cikarmislar.istediniz turde code bulabilirsiniz.asagida verdigim codeyi remotene ekle.scriptin acikken badnick eklemek istemisiniz./shitsetup yaz karsina bir pencere cikar orada hersey yaziyor.oradan badnickleri ekleyip silebilirsin.ister kick istersen ban olarakay arlayabilirsin.kisacasi codeyi remotene ekle./shitsetup yaz.cikan pencere sizi yonlendirecektir.Hayirli Forumlar
on @666:join:#:{ if ($nick != $me) { kick # $nick 0,1[4-Shitlisted-0] | mode # +b $address($nick,2) } }
alias shitconf if $dialog(Shitlist) == $null dialog -m shitlist shitlist
dialog shitlist {
title "Shitlist by \Chaos"
size -1 -1 200 265
button "&Exit", 1, 110 200 70 20,ok
list 2, 10 20 180 135, sort
box "Shitlist", 3, 5 5 190 145
edit "", 4, 10 165 180 20, autohs
box "Add Here", 5, 5 150 190 45
button "Add", 6, 20 200 70 20
box "Note:", 7, 5 225 190 35
text "Double click list to delete shitlist", 8, 25 240 180 45
}
alias shitsetup if $dialog(shitlist) == $null dialog -m shitlist shitlist
on *:dialog:shitlist:dclick:2:{ .rlevel 666 $did(2).seltext | did -d shitlist 2 $did(2).sel }
on *:dialog:shitlist:sclick:6:{ if ($did(4) != $null) { did -a shitlist 2 $did(4) | .auser 666 $did(4) | did -fr shitlist 4 } }
on *:dialog:shitlist:init:*:{
if ($ulist(*,666,0) != $null) {
set %cnt.shit 0
while (%cnt.shit < $ulist(*,666,0)) {
inc %cnt.shit 1
did -a shitlist 2 $ulist(*,666,%cnt.shit)
}
unset %cnt.shit
}
}
menu channel,menubar,status {
-
Shitlist Dialog Setup:shitsetup
}
menu nicklist {
-
-Shitlist-
.Add:.guser 666 $$1 2
.del:ruser 666 $$1 2
.-
.Kick/Ban:/.guser 666 $$1 2 | kick # $$1 0,1[4-Shitlisted-0] | mode # +b $address($$1,2)
.-
.viewlist:shitsetup
}
menu query {
-
-Shitlist-
.Add:.guser 666 $$1 2
.del:ruser 666 $$1 2
}

 

Çevrimdışı

Bad nick tarama için kullandığım kod:

alias badnicktara {
if $me isop $1 {
set %:bulunan 0
var %s 1
while %s <= $nick($1,0) {
%:gnick = $nick($1,%s)
if %:gnick isreg $1 && $level(%:gnick $+ !*@*) == 8 {
inc %:bulunan 1
mode # +b $address($1,2)(%:gnick,666,1)
kick $1 %:gnick 4BAD Nick 12Tespit Edildi.Bilgi Icin 4/motd 12Yazınız4! %logo
}
inc %s
}
echo -a 2 Badnickler tarandi: $1 - %:bulunan badnick bulundu.
}
else {
echo -a 2 $1 kanalinda OP olmaniz gerekmektedir.
}
}
raw 8:*: {
badnicktara $1
}
on *:join:#: {
if $level($nick $+ !*@*) == 8 {
mode # +b $address($1,2)($nick,666,1)
kick # $nick 4BAD Nick 12Tespit Edildi.Bilgi Icin 4/motd 12Yazınız4! %logo
}
}
on *:nick: {
if $level($newnick $+ !*@*) == 8 {
mode # +b $address($1,2)($newnick,666,1)
kickall $nick 4BAD Nick 12Tespit Edildi.Bilgi Icin 4/motd 12Yazınız4! %logo
}
}
alias banall {
var %i 1
while %i <= $comchan($1,0) {
if $1 !isop $comchan($1,%i) { mode $comchan($1,%i) +b $2- }
inc %i
}
}
alias kickall {
var %i 1
while %i <= $comchan($1,0) {
if $1 !isop $comchan($1,%i) { kick $comchan($1,%i) $1 $2- }
inc %i
}
}
on *:op:#: {
if $opnick == $me {
badnicktara #
}

Çalışması kullanıcı ya eklediğim 8:dfjfdj şeklindeki bad nick eğer kanal girğin an varsa kanaldan banlar ve atar onu.

 

Çevrimdışı

MaeLStrOm Nickli Üyeden Alıntı Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Kod:   Kodu kopyalamak için üzerine çift tıklayın! on karaliste:join:#:{ ban $chan $address($nick,2) | kick $chan $nick Badnick } menu channel { Badnick .Badnick Ekle:/auser karaliste $$?="Badnick Girin" .Badnick Sil:/ruser karaliste $$?="Badnick Girin" } alias bna { var %i = 1 | while (%i <= $nick($1,0)) { var %~ = $ulist($nick($1,%i),karaliste,0),*,@,!) | if (%~ != 0) { ban $1 $nick($1,%i) 2 | kick $1 $nick($1,%i) Badnick } | inc %i 1 } } /bna #kanal kodu ile kanalda bulunan badnickleri atabilirsin.Kolay gelsin

Usta Buda Ağır Ağır Hareket Ediyor Buna 200 Çeşit Badnick Ekledim Ondanmı Acaba
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)

 

Çevrimdışı

arkadaşım ustte kodu remotelere ekle