IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  sohbet

 Kayıt ol  Topluluk
Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 05 Şubat 2009, 13:47   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
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 $+
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
| 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) }

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Benimmekan Mobil Sohbet
Alt 05 Şubat 2009, 14:38   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
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.


Konu Difuzyon tarafından (05 Şubat 2009 Saat 14:46 ) değiştirilmiştir.
 
Alıntı ile Cevapla

Alt 05 Şubat 2009, 15:10   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
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ı

 
Alıntı ile Cevapla

Alt 05 Şubat 2009, 15:21   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
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.

 
Alıntı ile Cevapla

Alt 05 Şubat 2009, 15:45   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
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

 
Alıntı ile Cevapla

Alt 05 Şubat 2009, 15:50   #6
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: online takip edit




Difuzyon Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
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.


iyi okursan, küfür korumanı istiyor senden ona göre bi sistem geliştirecek
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

__________________
Lucifer dediler bana, kötülüğü anlatmak için. Halbuki, ışık ve güzelliği anlatırdı Lucifer. Ben kötüyüm bu düzen için; ama değilim asla kötülük.
 
Alıntı ile Cevapla

Alt 05 Şubat 2009, 16:05   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: online takip edit




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#:{ if $regex($1-,/(zie|sie|uza|amk|*****)/i) && $level($nick) != master { inc -eu600 $+(%,$nick,#) 1 if $($+(%,$nick,#),2) == 3 { msg $chan $nick akıllı ol ignore -u900 $nick closemsg $nick unset $+(%,$nick,#) } } }

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

 
Alıntı ile Cevapla

Alt 05 Şubat 2009, 17:04   #8
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
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

 
Alıntı ile Cevapla

Alt 05 Şubat 2009, 17:26   #9
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
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.)

 
Alıntı ile Cevapla

Alt 05 Şubat 2009, 20:09   #10
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
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 $+
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
| 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


Konu Selim01 tarafından (05 Şubat 2009 Saat 20:18 ) değiştirilmiştir.
 
Alıntı ile Cevapla

Cevapla

Etiketler
edit, mirc, mirc download, mirc indir, online, takip


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Online Takip Sistemi MaJoR mIRC Scripting Sorunları 16 21 Şubat 2014 06:43
online takip Bilecikli mIRC Scripting Sorunları 10 04 Kasım 2013 00:37
online takip sniper mIRC Scripting Sorunları 84 19 Ekim 2013 00:18
Helpbot online takip kaLwi mIRC Scripting Sorunları 3 17 Aralık 2008 13:46
Online Süresi Takip ? Cem mIRC Scripting Sorunları 1 22 Şubat 2008 20:44