Konu: Nick Takip
Tekil Mesaj gösterimi
Alt 01 Ekim 2015, 12:49   #6
Çevrimdışı
IrCbaStarD
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Nick Takip




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
;İlk önce bi takip aliasi olusturuyoruz.. alias takip { ;İlk önce takip edilicek nicklerin listesini yapiyoruz. if $1 = ekle { ;Bir sorgu ekliyoruz. sorgumuz 1. kelime ekle ise calisicak olan komutlarimiz. if $istok(%takip,$2,32) { echo 3 -a *** $2 Takip listesinde bulunuyor. } ;2. kelime ekliyeceimiz nick %takip değişkenimizde var mi kontrol ediyoruz. varsa komutu durduruyoruz. else { set %takip $addtok($2,%takip,32) | echo 4 -a *** $2 Takip listesine eklendi. } ;2. kelime listede yok ise $addtok ile %takip değişkenine aliyoruz ve bize bilgi mesaji vermesini sağliyoruz. } ;ve ilk ekle satirini bitiriyoruz, ekleme isi tamam. if $1 = sil { ;Bir sorgu daha yapiyoruz bu nicki silmek icin. if !$istok(%takip,$2,32) { echo 3 -a *** $2 Takip listesinde yok. } ;eğer silicegimiz nick yok ise listede bize bilgi vermesini sağliyoruz üstte $istok kullanmistik onun olumsuz ifadesini yaziyoruz. ;!$istok olumsuzlugu ifade eder. Eğer silicegimiz nick %takip değişkeninde yok ise komuta devam ediyoruz. else { set %takip $remtok(%takip,$2,32) | echo 5 -a *** $2 Takip listesinden silindi. } ;if then else derslerine bi göz atmalisin. Nick varsa %takip değişkeninde $remtok kullanarak nicki siliyoruz. ve bilgi mesajini tekrar yansitiyoruz. } } ;Ve artik aliasimiz hazir bunu event'e oturtmaliyiz. on *:text:*:#:{ ;on text eventini aciyoruz kanala veya özele gönderilen mesajlari text eventi ile gözlemleyebiliriz. if $istok(%takip,$nick,32) { ;text eventinde belirli identifierlar vardir, bunlar "$nick" "$chan" "$1-" Nick kanal ve mesaji alabiliriz, $1- Tümünü alicaktir mesajin $1 $2 $3 diyede gidebiliriz sadece kelimeleri almak icin. ;kelimelerin kacinci sirada oldugunu $regsubex($1-,/(\S+)/g,\n-\1) bu sekil bi identifierla görebilrisin. neyse bu konumuz dısında. :D ;istok identifier'inda bi sorgulama yapiyoruz, Eğer kanala yazilan nickler %takip değişkenin icindeyse diyerek basliyoruz. $iif(!$window(@takip),window -z @Takip) ;icinde var ise bi sorgu daha yapiyoruz, @Takip penceresi acik değilse aciyoruz. echo -t @takip $+([,$chan,]) $+(<,$nick,>) $1- ;Ve devam ediyoruz. Takip penceresine yansitiyoruz saati kanali nicki ve mesaji. } ;Bu sekilde bitiriyoruz. }


 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet reklamver