online takip edit
 

online takip kod'unu sadece master listesindekilerin kullana bilmesi için değiştirdim ama olmadı hangi kısımları değiştirrmem gerek yardımcı olurmusunuz kırmızı ile belirtirseniz değişen kısımları iyi olur

on *:text:*:#zurna@: {
if ($1 == !online) {
if (!$2) { return }
if !$var($+(%,$replace($2,[,~,],~)),0) { msg # $2 nin OnLine Süresi Yok. | return }
if (!$ini(takip.ini,$replace($2,[,~,],~))) { msg # $2 Listede EkLi değil | return }
kayit $replace($2,[,~,],~)
msg # 4 $str(-,10) $2 Nicki iÇin Takip Listesi $str(-,10)
.play $+(-t,$replace($2,[,~,],~)) # takip.ini 300
$+(.timerlist,$2) 1 3 msg # 4 $str(-,10) Listenin Sonu $str(-,10)
}
if $level($nick) == master {
if ($1 == !ekle) { if (!$2) { return }
if ($2 == $me) { msg # Beni takip listesine alamazsın $nick $+ :) | return }
if ($ini(takip.ini,$replace($2,[,~,],~))) { msg # $+ $2 Nicki Zaten Listede EkLi Durumda. | return }
else {
writeini -n takip.ini $replace($2,[,~,],~) Pazartesi 0
writeini -n takip.ini $replace($2,[,~,],~) Salı 0
writeini -n takip.ini $replace($2,[,~,],~) Çarşamba 0
writeini -n takip.ini $replace($2,[,~,],~) Perşembe 0
writeini -n takip.ini $replace($2,[,~,],~) Cuma 0
writeini -n takip.ini $replace($2,[,~,],~) Cumartesi 0
writeini -n takip.ini $replace($2,[,~,],~) Pazar 0
.auser takip $2
msg # $+ $2 Listeye EkLenmiştir.!!
if ($2 ison #zurna) { $+(.timertakip,$2) 0 1 inc -e $+(%,$replace($2,[,~,],~)) }
}
}
}
if ($1 == !sil) {
if (!$2) { return }
if (!$ini(takip.ini,$replace($2,[,~,],~))) { msg # $2 Listede EkLi değiL | return }
else { .remini takip.ini $replace($2,[,~,],~) | .ruser takip $2 | msg # $2 Listeden siLindi.
if $+($timertakip,($2)) { $+(timertakip,$2) off | unset $+(%,$replace($2,[,~,],~)) }
}
}
if ($1 == !sıfırla) {
var %\ = $ulist(*,takip,0)
while %\ {
$+(.timertakip,$ulist(*,takip,%\)) off
set $+(%,$replace($ulist(*,takip,%\),[,~,],~)) 0
writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Pazartesi 0
writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Salı 0
writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Çarşamba 0
writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Perşembe 0
writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Cuma 0
writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Cumartesi 0
writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Pazar 0
if ($ulist(*,takip,%\) ison #help) { $+(.timertakip,$ulist(*,takip,%\)) 0 1 inc -e $+(%,$replace($ulist(*,takip,%\),[,~,],~)) }
dec %\
}
msg # Tüm OnLine SüreLeri SıfırLanıp Yeniden BaşLadı
}
if ($1 == !temizle) {
write -c takip.ini
var %\ = $ulist(*,takip,0)
while %\ {
$+(.timertakip,$ulist(*,takip,%\)) off
.timer 1 1 unset $+(%,$replace($ulist(*,takip,%\),[,~,],~))
.ruser takip $ulist(*,takip,%\)
dec %\
}
msg # Tüm OnLine takipler silindi
}
}
on takip:join:#zurna@: { $+(.timertakip,$nick) 0 1 inc -e $+(%,$replace($nick,[,~,],~)) }
on takip:part:##zurna@:{ if $+($timertakip,($nick)) { $+(.timertakip,$nick) off | kayit $replace($nick,[,~,],~) } }
on takip:quit: { if $+($timertakip,($nick)) { $+(timertakip,$nick) off | kayit $replace($nick,[,~,],~) } }
alias kayit { .remini takip.ini $1 $gün | writeini -n takip.ini $1 $gün $replace($duration($($+(%,$1),2)),mins,Dakika,hrs, Saat,secs,Saniye,min,Dakika,hr,Saat,sec,Saniye,day ,Gün,days,Gün) }
alias gün { return $replace($asctime($ctime,dddd),monday,Pazartesi,su nday,Pazar,wednesday,Çarşamba,friday,Cuma,saturday ,Cumartesi,tuesday,Salı,thursday,Perşembe) }

Cevap: online takip edit
 

on master:text:*:#zurna@: {

1. satırı bu şekilde yaparsan,tüm komutlardan sadece "master" listesinde olanlar yararlanabilir.

-------

Sadece kalın yazıyla belirttiğin yerden aşağısını kullanabilsinlerd ediysen:

if $level($nick) != master { return }

yapmalısın.

Cevap: online takip edit
 

sonbir sorum olcak hocam on text eventinde master listesindekiler e işlem yapmamak nasıl olur örneğin küfür korumasında master listesinde varsa atma gibi
if $level($nick) != master { halt }

bu şekilde yaptım olmadı

Cevap: online takip edit
 

Küfür korumasını bir görelim,ona göre yorum yapalım.Ayrıca master listen ne şekilde eklenmiş onuda bir görelim.

master:Ahmet ?
master:*!*@*oper.com ?

ki ona göre doğru cevabı bulmaya çalışalım.

Cevap: online takip edit
 

master:selim01

gibi ekle

on *:text:*:#:{
if $regex($1-,/(zie|sie|uza|amk|*****)/i) {
inc -eu600 $+(%,$nick,#) 1
if $($+(%,$nick,#),2) == 3 {
msg $chan $nick akıllı ol
ignore -u900 $nick
closemsg $nick
unset $+(%,$nick,#)
}
}
}

mesela bu kod a nasıl koyarım birde sorum var host şeklinde master listesine eklene biliyo galiba öylemi ? ve
master:Ahmet ?


senin yazdığın "?" işareti ne anlama geliyor öyle master listesine eklenirmi yoksa bunun gibimi ekledin demek istedin teşekkürler yardımın için şimdiden

Cevap: online takip edit
 

iyi okursan, küfür korumanı istiyor senden ona göre bi sistem geliştirecek;idea

Cevap: online takip edit
 

" ve nick master levelinde değilse " anlamına gelir.
Tabi level eklerken nick!ident@host hatta info bile eklenebilir.

/auser master *!*@*oper* (master listesine ekledik)
/iuser *!*@*oper* Sunucu yetkilileridir. (info girmiş olduk)

Level tanımlamalarında örnekte olduğu gibi wilcard uygulayabiliyoruz.
Burda dikkat edilmesi gereken husus,
master:selim01
master:*!*@*oper*

Böylesi bir eklemede sağlıklı verim alabilmek için,uygun identifier'ı uygun eventlarda kullanmak lazım.
//echo -a $level(selim01) = master
//echo -a $ulist(selim01,master,1) = selim01
//echo -a $ulist(*selim*,master,1) = yanıt vermez,çünkü wilcard olarak düzenlenmedi.
//echo -a $ulist(*!*@superoper,master,1) = *!*@*oper*
//echo -a $ulist(*!*@operator,master,1).info = Sunucu yetkilileridir.


Kullanımı oldukça geniştir.Çoğu arkadaşlarımız özellikle badnick koruması yaparken .txt olarak istiyorlar ama bu şekilde kullanılması en avantajlı olanıdır.Tabi doğru yerde doğru identifier'la kullanıldığı takdirde.

Bu örnekler umarım işine yarar...

Cevap: online takip edit
 

Anlatım için çok tşk ler hocam da kod çalışmadı master listesinde ekli olmasına rağmen o kişiyi yine uyarıyor boş scriptte denedim ama bendemi bir hata var kontrol edermisin

Cevap: online takip edit
 

Kodu denedim,çalışıyor.Şayet master listesine aşağıdaki gibi ekliyse:
master:ahmet

--------------------
Eğer master listene aşağıdaki gibi eklediysen:
master:*ornek*!*@*

bu durumda kod içerisinde etkilenmemesi için !$ulist($fulladdress,master,0) identifier'ını kullanman gerekir.(Kanala yazan kişinin fulladdress = nick!ident@host bilgisi,master listesinde uyan bir tanımı yoksa,anlamına gelir.)

Cevap: online takip edit
 

on *:text:*:#zurna@: {
if ($1 == !online) {
if (!$2) { return }
if !$var($+(%,$replace($2,[,~,],~)),0) { msg # $2 nin OnLine Süresi Yok. | return }
if (!$ini(takip.ini,$replace($2,[,~,],~))) { msg # $2 Listede EkLi değil | return }
kayit $replace($2,[,~,],~)
msg # 4 $str(-,10) $2 Nicki iÇin Takip Listesi $str(-,10)
.play $+(-t,$replace($2,[,~,],~)) # takip.ini 300
$+(.timerlist,$2) 1 3 msg # 4 $str(-,10) Listenin Sonu $str(-,10)
}
if $level($nick) != master { return }
if ($1 == !ekle) { if (!$2) { return }
if ($2 == $me) { msg # Beni takip listesine alamazsın $nick $+ :) | return }
if ($ini(takip.ini,$replace($2,[,~,],~))) { msg # $+ $2 Nicki Zaten Listede EkLi Durumda. | return }
else {
writeini -n takip.ini $replace($2,[,~,],~) Pazartesi 0
writeini -n takip.ini $replace($2,[,~,],~) Salı 0
writeini -n takip.ini $replace($2,[,~,],~) Çarşamba 0
writeini -n takip.ini $replace($2,[,~,],~) Perşembe 0
writeini -n takip.ini $replace($2,[,~,],~) Cuma 0
writeini -n takip.ini $replace($2,[,~,],~) Cumartesi 0
writeini -n takip.ini $replace($2,[,~,],~) Pazar 0
.auser takip $2
msg # $+ $2 Listeye EkLenmiştir.!!
if ($2 ison #zurna) { $+(.timertakip,$2) 0 1 inc -e $+(%,$replace($2,[,~,],~)) }
}
}
}
if ($1 == !sil) {
if (!$2) { return }
if (!$ini(takip.ini,$replace($2,[,~,],~))) { msg # $2 Listede EkLi değiL | return }
else { .remini takip.ini $replace($2,[,~,],~) | .ruser takip $2 | msg # $2 Listeden siLindi.
if $+($timertakip,($2)) { $+(timertakip,$2) off | unset $+(%,$replace($2,[,~,],~)) }
}
}
if ($1 == !sıfırla) {
var %\ = $ulist(*,takip,0)
while %\ {
$+(.timertakip,$ulist(*,takip,%\)) off
set $+(%,$replace($ulist(*,takip,%\),[,~,],~)) 0
writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Pazartesi 0
writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Salı 0
writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Çarşamba 0
writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Perşembe 0
writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Cuma 0
writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Cumartesi 0
writeini -n takip.ini $replace($ulist(*,takip,%\),[,~,],~) Pazar 0
if ($ulist(*,takip,%\) ison #help) { $+(.timertakip,$ulist(*,takip,%\)) 0 1 inc -e $+(%,$replace($ulist(*,takip,%\),[,~,],~)) }
dec %\
}
msg # Tüm OnLine SüreLeri SıfırLanıp Yeniden BaşLadı
}
if ($1 == !temizle) {
write -c takip.ini
var %\ = $ulist(*,takip,0)
while %\ {
$+(.timertakip,$ulist(*,takip,%\)) off
.timer 1 1 unset $+(%,$replace($ulist(*,takip,%\),[,~,],~))
.ruser takip $ulist(*,takip,%\)
dec %\
}
msg # Tüm OnLine takipler silindi
}
}
on takip:join:#zurna@: { $+(.timertakip,$nick) 0 1 inc -e $+(%,$replace($nick,[,~,],~)) }
on takip:part:##zurna@:{ if $+($timertakip,($nick)) { $+(.timertakip,$nick) off | kayit $replace($nick,[,~,],~) } }
on takip:quit: { if $+($timertakip,($nick)) { $+(timertakip,$nick) off | kayit $replace($nick,[,~,],~) } }
alias kayit { .remini takip.ini $1 $gün | writeini -n takip.ini $1 $gün $replace($duration($($+(%,$1),2)),mins,Dakika,hrs, Saat,secs,Saniye,min,Dakika,hr,Saat,sec,Saniye,day ,Gün,days,Gün) }
alias gün { return $replace($asctime($ctime,dddd),monday,Pazartesi,su nday,Pazar,wednesday,Çarşamba,friday,Cuma,saturday ,Cumartesi,tuesday,Salı,thursday,Perşembe) }

Difuzyon hocam son olarak bir isteğim olacak, Şimdi örnek uzman Nicki kanalda ama bot kanala girdiğinde uzman nickini online süresine kaydetmeye devam etmiyor sadece bot kanaldayken ekli durumda olan nick girdiğinde kayıt a başlıyor bu sorun için bir şey yapamazmıyız

fikir: bot kanala girdiğinde levesl bölümünü tarasa ve online listesinde var ise kayıtlı nickler kaydetmeye devam etse

bilmişlik felan diye algılamazsınız umarım sadece istediğimi daha iyi ifade etmek için firikir = örnek veridm şimdiden tşk

hocam kırmızı ile belirtirseniz eklediğiniz bölümü iyi olur