Tam olarak amacını anlamadım ama bu şekilde düzenleme yaptım. IP gözükmesine gerek kalmadan girişte kaydettiği ip yi işlemlerde uygular. Ek gereksiz şeyleri kaldırdım. Opersen gzline,gline,kill,shun vs..aktif olur değilsen normal gözükür.
Kod: Kodu kopyalamak için üzerine çift tıklayın!
on *:snotice:*: {
if (Client connecting isin $1-) { hadd -m Giris $9 $regsubex($10,/.+(\x40\S+)\x29/gi,$+(*,\1)) }
if (Client exiting isin $1-) { hdel Giris $6 }
}
on ^*!:join:#: {
haltdef
$iif(!$hget(Giris,$nick),userip $nick)
if $regex(opers,$usermode,o) { echo $chan $+($chr(3),$color(join))14 $+ $timestamp Giriş » $regsubex($address($nick,5),/(\S+)!(\S+)/gi,$+(\1,$chr(32),$chr(40),\2,$chr(41))) 14 $chr(124) 12Gline14 $chr(124) 10Gzline14 $chr(124) 4Shun14 $chr(124) 7Kill14 $chr(124) }
else { echo $chan $+($chr(3),$color(join))14 $+ $timestamp Giriş » $regsubex($address($nick,5),/(\S+)!(\S+)/gi,$+(\1,$chr(32),$chr(40),\2,$chr(41))) }
}
on ^*!:Part:#: {
haltdef
$iif(!$hget(Giris,$nick),userip $nick)
if $regex(opers,$usermode,o) { echo $chan $+($chr(3),$color(part))14 $+ $timestamp Part « $regsubex($address($nick,5),/(\S+)!(\S+)/gi,$+(\1,$chr(32),$chr(40),\2,$chr(41))) 14 $chr(124) 12Gline14 $chr(124) 10Gzline14 $chr(124) 4Shun14 $chr(124) 7Kill14 $chr(124) }
else { echo $chan $+($chr(3),$color(part))14 $+ $timestamp Part « $regsubex($address($nick,5),/(\S+)!(\S+)/gi,$+(\1,$chr(32),$chr(40),\2,$chr(41))) }
}
on ^1:HOTLINK:*shun*:#:if ($1 == shun) return | halt
on ^1:HOTLINK:*Gline*:#:if ($1 == Gline) return | halt
on ^1:HOTLINK:*Kill*:#:if ($1 == Kill) return | halt
on ^1:HOTLINK:*Gzline*:#:if ($1 == Gzline) return | halt
on *:hotlink:*:*:{
if $hget(Giris,$regsubex($hotline,/.+(»|«)\x20(\S+)\x20.+/gi,\2)) {
if ($1 == Shun) { .shun $hget(Giris,$regsubex($hotline,/.+(»|«)\x20(\S+)\x20.+/gi,\2)) 8,1 8,115Sunucumuzda 4Reklam15/4Kufur15/4Saldiri 15Tespit Edilmistir4.15 Kosullara Gore gerekli Mudahalelerde Bulunma Uyeyi Odadan Men etme Kanali veya Rumuzu Kapatma Yasaklama ve Uyelik iptali Haklarina ve Yetkilerine Sahiptir. 4Lutfen 15Sohbet kurallarina Uyunuz. | halt }
if ($1 == Gline) { .Gline $hget(Giris,$regsubex($hotline,/.+(»|«)\x20(\S+)\x20.+/gi,\2)) 8,1 8,115Sunucumuzda 4Reklam15/4Kufur15/4Saldiri 15Tespit Edilmistir4.15 Kosullara Gore gerekli Mudahalelerde Bulunma Uyeyi Odadan Men etme Kanali veya Rumuzu Kapatma Yasaklama ve Uyelik iptali Haklarina ve Yetkilerine Sahiptir. 4Lutfen 15Sohbet kurallarina Uyunuz. | halt }
if ($1 == Gzline) { .Gzline $hget(Giris,$regsubex($hotline,/.+(»|«)\x20(\S+)\x20.+/gi,\2)) 8,1 8,115Sunucumuzda 4Reklam15/4Kufur15/4Saldiri 15Tespit Edilmistir4.15 Kosullara Gore gerekli Mudahalelerde Bulunma Uyeyi Odadan Men etme Kanali veya Rumuzu Kapatma Yasaklama ve Uyelik iptali Haklarina ve Yetkilerine Sahiptir. 4Lutfen 15Sohbet kurallarina Uyunuz. | halt }
if ($1 == Kill) { .Kill $regsubex($hotline,/.+(»|«)\x20(\S+)\x20.+/gi,\2) Yonetim Hava al Gel | halt }
}
else { echo -at İşlem uygulamak istediğiniz $regsubex($hotline,/.+(»|«)\x20(\S+)\x20.+/gi,\2) sunucudan çıkmış. }
}
raw 340:*: {
haltdef
hadd -m Giris $gettok($2,1,61) $+($chr(40),$gettok($2,2,43),$chr(41))
}