| Bozkurt- | 08 Nisan 2023 22:31 |
Şüpheli gördüğünüz nickleri takip edin.
Kod:
menu * {
.-
.• © Lamer Nick Takip !
..• Açık !:.enable #ncktkp | .echo -a 0,7 1 Lamer Nick Takip Açıldi… %logo
..• Kapalı !:.disable #ncktkp | .echo -a 0,7 1 Lamer Nick Takip Kapatildi.. %logo
..• ..Durum < $replace($group(#ncktkp).status, disable, Kapali, enable, Açik) >:.
.-
}
#ncktkp on
on *:snotice:*:{
if $regex($1-,/Client connecting (on port|at) (.+)\: (.+) \((.+)@(.+)\)/Si) {
var %_nick $regml(3), %_ip $regml(5)
if $hget(Takipnick,%_nick) {
window -e @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Takip
echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Takip 0,4Nick Takip Uyarısı : 4Takip Edilen Nick : %_nick 4IP : %_ip 7ile giriş yaptı.
}
}
}
alias takipnick {
if $regex($1,/^ekle$/Si) {
if !$regex($2,/./i) { echo -a :Lütfen nick belirtiniz. ÖRN; 4/takipnick ekle 2<Nick> | return }
elseif $hget(Takipnick,$strip($2)) { echo -a $+(,$strip($2),) Nick takip listesinde ekli. | return }
var %n = $left($md5($calc($ctime * $rand(1000,9999))),$r(10,25))
.hadd -m Takipnick $strip($2) %n
.hsave -o Takipnick takip.nick
echo -a $+(,$strip($2),) Nick takip listesine eklendi.
}
elseif $regex($1,/^s[ıiİ]l$/Si) {
if !$regex($2,/./i) { echo -a Lütfen nick belirtiniz. ÖRN; 4/takipnick sil 2<Nick> | return }
elseif !$hget(Takipnick,$strip($2)) { echo -a $+(,$strip($2),) Nick takip listesinde ekli değil. | return }
.hdel -m Takipnick $strip($2)
.hsave -o Takipnick takip.nick
echo -a $+(,$strip($2),) Nick takip listesinden silindi.
}
elseif $regex($1,/^l[ıiİ]st$/Si) {
if ($hget(Takipnick,0).data == 0) { echo -a Nick Takip listesinde kayıt bulunmamaktadır. | return }
echo -a :Nick Takip Listesi
echo -a :
var %i = 1 | while (%i <= $hget(Takipnick,0).data) {
echo -a $+(%i,-4,$chr(41),) $hget(Takipnick,%i).item
inc %i
}
echo -a :
echo -a :Nick Takip Listesi Sonu
}
}
#ncktkp End
on *:start: {
hmake Takipnick
$iif($isfile(takip.nick),hload Takipnick takip.nick)
echo -a Takip Nick Listesi Yüklendi.
}
on $^*:hotlink:/./S:@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]takip: return $true
on *:hotlink:*:@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]takip: gline $1 :1,4Takip Listemdesin.
Aşağıdaki Kodu Farklı Bir Sayfaya Ekleyiniz.
Kod:
#ncktkp on
on *:snotice:*:{
if $regex($1-,/has changed his/her nickname/Si) {
if $hget(Takipnick,$11) {
window -e @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Takip
echo @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]takip 4 $4 7nickini Takip Listesindeki Nick Olan 2 $11 7olarak değiştirdi..4 Ip Adresi : 2 $gettok($remove($5,$chr(41)),2,64)
}
}
}
Farklı bir nick takip kodu. İlk kod sunucuya girişte ikinci kodda ise farklı bir nickle gelip takipteki nicke geçtiğinde bilgi vermektedir.
|
