| Carpediem | 30 Ocak 2026 12:16 |
Nick takip raporu
HTML-Kodu:
; ---------- Pencereyi aç ----------
alias TakipPencere {
if (!$window(@Nick-Takip)) window -ae @Nick-Takip
}
; ---------- Takip Modu ----------
on 1:connect:{
.IAL On
if (!$hget(Takip)) hmake Takip 1000
takip + 300
}
alias takip {
if ($1 == +) {
.enable #Takip
if (!$hget(Takip)) hmake Takip 1000
set %cSj $iif($2,$2,300)
TakipPencere
echo @Nick-Takip 4[TAKİP MODU AÇILDI] Süre: %cSj sn.
}
else {
.disable #Takip
unset %cSj
echo @Nick-Takip 14[TAKİP MODU KAPANDI]
}
}
#Takip on
on ^*:QUIT:{
if (!$hget(Takip)) hmake Takip 1000
; Nicki tekrar eklemeden önce kontrol et
if (!$istok($hget(Takip,$address($nick,2)),$nick,32)) {
hadd $iif($address($nick,2),$+(-u,%cSj),$+(-u1)) Takip $address($nick,2) $iif($hget(Takip,$address($nick,2)),$hget(Takip,$address($nick,2)) $+ $nick,$nick)
}
}
on !^*:JOIN:#:{
if (!$hget(Takip)) hmake Takip 1000
; Sadece yeni nick geldiğinde raporla
if ($hget(Takip,$address($nick,2)) && $hget(Takip,$address($nick,2)) != $nick) {
if ($v1 != $nick) {
TakipPencere
; Listeyi temiz ve alt alta göstermek için
var %nicklist = $hget(Takip,$address($nick,2))
var %formatted = $replace(%nicklist, , $crlf)
echo @Nick-Takip 4Takip Raporu:12 $nick 5(%cSj sn içinde kullandığı nickler:)
echo @Nick-Takip 14 %formatted
set -u $v1 $nick
}
}
if ($gettok($hget(Takip,$address($nick,2)).data,0,43) > 3) {
ban -k $chan $nick 2 Nick Change
}
}
; ---------- Hotlink Ayarları ----------
menu @Nick-Takip {
dclick:*:{
if ($1 != $null) {
echo -a 4[İŞLEM] $1 için komut seçin:
echo -a Sağ tık → Komut Menüsü
}
}
}
menu nicklist,@Nick-Takip {
----- Takip İşlemleri -----
Kill: /kill $$1 Flood/Takip Koruması
Shun: /shun $$1 30s Flood/Takip
Gzline: /gzline $$1 1h Flood/Takip
Ban: /ban -k # $$1 2 Takip Koruması
}
|
