Çevrimdışı

alias badtara {
var %jnk 1
while %jnk <= $nick($1,0) {
if $ulist($nick($1,%jnk),bad,0) && $level($nick($1,%jnk)) != koruma {
mode $chan +b $nick($1,%jnk)
kick $chan $nick($1,%jnk) badnick yasak!
}
inc %jnk
}
}
menu status,channel,query {
.Bad Tarama
..ON://timerTARA 1 1 /badtara $$?="Taranacak kanal?" | /echo -a Tarama aktif edildi.
..OFF://timerTARA off | /echo -a Tarama deaktif edildi.
}

yanlı hatırlamıyorsam bu tarama kodunu da Difüzyon arkadasımızdan almıstım.
/badtara #kanal
veya üst kısımda ki alias bastara kısmını
alias !badtara yaparak
!badtara #kanal seklinde de calıstırabilirsin
ama komuta gerek yok menü status kısmı var zaten.

 

Çevrimdışı

merhaba
elimde bi code var users bölmünde bulunan badnickler kanala girdinde .
Badnick girişi yapıldı : greeneyes
diye rekli bir şekilde daha rahat görmemi sağlayan bir code.ban atmıyo sadece renkli bişekilde gösteriyoki rahat görüyorum badnick ise f1 tuşu ile kendim atıyorum.
users bölmündeki nickler
8:*k*l*k*
8:*l*e*s*
8:*g*c*k*
8:*k*c*s*
8:*o*l*n*
8:*g*s*t*r*
bu şekilde eklediğim icin badnick olmayan nicklerde oluyo
Badnick girişi yapıldı : beykozlu
buşekilde
ben bu codeye şöyle bişiy eklemek istiyorum
Badnick girişi yapıldı : beykozlu hemen karışısında >> Badnick deilse Ekle
Badnick girişi yapıldı : beykozlu >> Badnick deilse Ekle

ekle yazısının üstüne maus ile tıklayıp muaf nick olarak user bölmüne otomatik ekleyebilirmiyiz.
on @*:join:#: {
if ($ulist($nick,koruma,0) >= 1) { return }
if ($server == irc.sunucu.com) {
if $level($nick $+ !*@*) == 8 {
echo #turkiye 10Badnick girişi yapıldı :1,0 $nick 
}
}
}
kullanıcı bölmünde ekli olanlar aşşadaki gibi. koruma ya aldım nickler muaf oluyove badnickolarak uyarı vermiyo.

koruma:sürgün
koruma:iskenderun
koruma:Aysegul
8:*k*l*k*
8:*l*e*s*
8:*g*c*k*
8:*k*c*s*
8:*o*l*n*
8:*g*s*t*r*

 

Çevrimdışı

Bu kodu da ilave etmeniz halinde,ekranınızda beliren:

Badnick girişi yapıldı : beykozlu >> Badnick değilse Ekle

yazısında Ekle kısmına mouse sürüklendiğinde imleç belirecektir.Ekle yazısına çift tıklamanız halinde belirtilen nicki Kullanıcı kısmında koruma seviyesine ekleyecektir.

Dizilim formatı önemlidir,cümle Ekle kelimesi ile son bulma şartı vardır.Aynı zamanda cümledeki 5. kelimeyi Kullanıcı kısmına ekleme şartı vardır.Cümle yapısını ileride değiştirmeniz halinde kod içerisindeki dizaynı bu duruma göre yeniden şartlandırmanız gerekecektir.

Hoşca paylaşımlar...

 

Çevrimdışı

tşkler fakat bi sorun cıktı muaf olan nickler kullanıcı kısmına üste eklenince çalışıyo
Alta eklenirse çalışmıyo ve senin verdiğin şuan alt kısma ekliyo nasıl olcak

koruma:yağmur >> üstte
koruma:FanatiK
8:*k*l*k*
8:*l*e*s*
8:*g*c*k*
8:*k*c*s*
8:*o*l*n*

Altta olursa çalışmıyo

8:*k*l*k*
8:*l*e*s*
8:*g*c*k*
8:*k*c*s*
8:*o*l*n*
koruma:yağmur >> altta
koruma:FanatiK

 

Çevrimdışı

Altta\Üstte\Sıralı\Sırasız olması bu kodun çalışmasını engelleyecek bir durum değil.

 

Çevrimdışı

pardon evet girişlerde çalışıyo bide bende badnick taraması var badnicktara dediğimde
.nadnicktara #kanal
#› BADNICK : Metin_yas_46 >> Ekle
#› BADNICK : mIRCTR-488495 >> Ekle
#› BADNICK : mIRCTR-565771 >> Ekle
#› BADNICK : mIRCTR-834582çiçek >> Ekle
#› BADNICK : mIRCTR-835889
bunlar cıkıyo cıkmaması gerek cünki mirc kelimesi muaf listesinde var.
8:*d*v*d*
8:*0TL*
koruma:*mIRC*
koruma:*geveze*
fakat muaf olan nickler üste olunca normal çalışıyo bi sorun yok .
.badnicktara #kanal
#› BADNICK : Metin_yas_46 >> Ekle
#› BADNICK : murat31hatay >> Ekle
#› BADNICK : musa28_A >> Ekle
mIRCTR-835889 << gibi gecen nickleri dikkate almadı koruma kısmı üste olduğu için

koruma:*mIRC*
koruma:*geveze*
8:*d*v*d*
8:*0TL*
ama verdiğin code alta eklediğinden macburel alt kısımda olmuş oluyo ve çalışmıyo.neyse girişleri hallettik en azından tekrar tşkler

 

Çevrimdışı

Tarama ile alakalı kodu paylaşırsanız,daha sağlıklı bir yorumda bulunabiliriz.

 

Çevrimdışı

tam olarak böle

alias badnicktara {
if ($server == irc.sunucu.org) {
if $me isop $1 {
set %kanal $chan
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
echo -a  4#3› 4BADNICK :1,0 %:gnick 0,1>> Ekle
}
inc %s
}
echo -a 0,7Badnickler tarandi: $1 - %:bulunan badnick bulundu.
}
else {
echo -a 0,2 $1 kanalinda OP olmaniz gerekmektedir.
}
}
}
raw 8:*: {
badnicktara $1
}
on @*:nick: {
if ($server == irc.sunucu.org) {
if $level($newnick $+ !*@*) == 8 { { var %2 = 1 | while $comchan($newnick,%2) { if $me isop $comchan($newnick,%2) { echo #turkiye 0,7 $newnick 4: 10 Badnick olarak algılandı 10Ekle } | inc %2 } | return $true } | inc %1 } | return $false }
}
on *:op:#turkiye: {
if ($server == irc.sunucu.org) {
if $opnick == $me {
badnicktara #
}
}
}
on ^$*:hotlink:/Ekle$/S:*:if ($strip($1) == Ekle) { return } | halt
on *:hotlink:*:*:auser koruma $token($hotline,5,32) | echo -a $token($hotline,5,32) nicki koruma olarak eklendi.
on @*:join:#Turkiye: {
if ($server == irc.sunucu.org) {
if ($ulist($nick,koruma,0) >= 1) { return }
if $level($nick $+ !*@*) == 8 {
echo #Turkiye 10Badnick girişi yapıldı :1,0 $nick 10Badnick değilse >> 10Ekle
}
}
}

 

Çevrimdışı

Bir önceki mesajınızda belirtmiş olduğunuz sorununuz,tarama yapılan aliasta koruma seviyesinde bulunan kullanıcılara bir tanımlama getirmediğinizden kaynaklanıyor.

if %:gnick isreg $1 && $level(%:gnick $+ !*@*) == 8 {
satırı aşağıdaki gibi olacak
if %:gnick isreg $1 && $ulist(%:gnick,8,0) && !$ulist(%:gnick,koruma,0) {


NICK eventında da aynı durum söz konusu,

if $level($newnick $+ !*@*) == 8 { { var ......
satırı aşağıdaki gibi olacak
$ulist($newnick,8,0) && !$ulist($newnick,koruma,0) { { var ......

JOIN eventında da aşağıdaki işlemi yapmalısınız.

if $level($nick $+ !*@*) == 8 {
satırı aşağıdaki gibi olacak
if $ulist($nick,8,0) {

 

Çevrimdışı

sölediğin yerleri deiştirdim hata veriyor
> 1 Yalnış komut.
> 0 Yalnış komut.
> 2 Yalnış komut.
alias badnicktara {
if ($server == irc.sunucu.org) {
if $me isop $1 {
set %kanal $chan
set %:bulunan 0
var %s 1
while %s <= $nick($1,0) {
%:gnick = $nick($1,%s)
if %:gnick isreg $1 && $ulist(%:gnick,8,0) && !$ulist(%:gnick,koruma,0) {
inc %:bulunan 1
echo -a  4#3› 4BADNICK :1,0 %:gnick 0,1>> Ekle
}
inc %s
}
echo -a 0,7Badnickler tarandi: $1 - %:bulunan badnick bulundu.
}
else {
echo -a 0,2 $1 kanalinda OP olmaniz gerekmektedir.
}
}
}
raw 8:*: {
badnicktara $1
}
on @*:nick: {
if ($server == irc.sunucu.org) {
$ulist($newnick,8,0) && !$ulist($newnick,koruma,0) { { var %2 = 1 | while $comchan($newnick,%2) { if $me isop $comchan($newnick,%2) { echo #turkiye 0,7 $newnick 4: 10 Badnick olarak algılandı 10Ekle } | inc %2 } | return $true } | inc %1 } | return $false }
}
on *:op:#turkiye: {
if ($server == irc.sunucu.org) {
if $opnick == $me {
badnicktara #
}
}
}
on ^$*:hotlink:/Ekle$/S:*:if ($strip($1) == Ekle) { return } | halt
on *:hotlink:*:*:auser koruma $token($hotline,5,32) | echo -a $token($hotline,5,32) nicki koruma olarak eklendi.
on @*:join:#Turkiye: {
if ($server == irc.sunucu.org) {
if ($ulist($nick,koruma,0) >= 1) { return }
if $ulist($nick,8,0) {
echo #Turkiye 10Badnick girişi yapıldı :1,0 $nick 10Badnick değilse >> 10Ekle
}
}
}