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

 Kayıt ol  Topluluk
10Beğeni(ler)

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 02 Ağustos 2019, 13:25   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Kanala girene shun gline kill




aslihan ( Hatalı görünüm olan kısım )

[13:19] Part « GhostLy (09@149.****)
[13:19] Giriş » GhostLy (09@149.****) | Gline | Shun | Kill |

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
#opergiris on on *:snotice:*: { if (Client connecting isin $1-) { ;ipcont $remove($gettok($10,2,64),$chr(41)) if (!$hget(Giris)) { hmake giris 100 } hadd -m Giris $9 $10 } if (Client exiting isin $1-) { if !$hget(Giris,$6) { hadd -m Giris $6 $7 } } } on ^*!:join:#: { haltdef if ($hget(Giris,$nick)) { echo $chan $+($chr(3),$color(join))14 $+ $timestamp Giriş » 2 $nick 5 $hget(Giris,$nick) 14 $chr(124) 12Gline14 $chr(124) 4Shun14 $chr(124) 7Kill14 $chr(124) } elseif (!$hget(Giris,$nick)) { set -u3 %gnick $nick | set -u3 %gchan $chan | giris | .timer 1 1 .userip $nick } } on ^*:quit: { haltdef var %i = 1, %t = $comchan($nick,0) while (%i <= %t) { echo $comchan($nick,%i) $+($chr(3),$color(quit))14 $+ $timestamp Çıkış « 2 $nick 5 $hget(Giris,$nick) 14 $chr(124) 14Gzline14 $chr(124) 6 $1- inc %i } hdel -m Giris $nick } raw 340:*: { haltdef hadd -m Giris $gettok($2,1,61) $+($chr(40),$gettok($2,2,43),$chr(41)) } on ^*!:Part:#: { haltdef if ($hget(Giris,$nick)) { echo $chan $+($chr(3),$color(part))14 $+ $timestamp Part « 2 $nick 5 $hget(Giris,$nick) } elseif (!$hget(Giris,$nick)) { set -u5 %pnick $nick | set -u %pchan $chan | cikis | .timer 1 1 .userip $nick } } alias giris { echo %gchan %gnick $hget(Giris,%gnick) } alias cikis { echo %pchan %pnick $hget(Giris,%pnick) } #IPGoster End on *:Exit: { .disable #IPGoster } raw 381:*: { .enable #IPGoster } 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 ($1 == Shun) { .shun $gettok($hotline,5,32) 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 $gettok($hotline,5,32) 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 $remove($+(*@,$gettok($gettok($hotline,6,32),2,64)),$chr(41)) 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 $gettok($hotline,5,32) Yonetim Hava al Gel | halt } } #opergiris end


Yukarıdaki gibi bir kodum var ama bir sorun ve cözmedim bir türlü kullanıcı sunucuya girdiğinde aslına gibi gösteriyor part edip joinler de ise benim görmek istediğim gibi normal olanı

ilk girişinde de bunu nasıl ayarlaya bilirim ?


Konu ZenqerDenq tarafından (02 Ağustos 2019 Saat 13:27 ) değiştirilmiştir.
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Benimmekan Mobil Sohbet
Alt 02 Ağustos 2019, 17:09   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Kanala girene shun gline kill




ZenqerDenq Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
aslihan ( Hatalı görünüm olan kısım )

[13:19] Part « GhostLy (09@149.****)
[13:19] Giriş » GhostLy (09@149.****) | Gline | Shun | Kill |


Yukarıdaki gibi bir kodum var ama bir sorun ve cözmedim bir türlü kullanıcı sunucuya girdiğinde aslına gibi gösteriyor part edip joinler de ise benim görmek istediğim gibi normal olanı

ilk girişinde de bunu nasıl ayarlaya bilirim ?

böyle denermisin


Kod:   Kodu kopyalamak için üzerine çift tıklayın!
#opergiris on on *:snotice:*: { if (Client connecting isin $1-) { ;ipcont $remove($gettok($10,2,64),$chr(41)) if (!$hget(Giris)) { hmake giris 100 } hadd -m Giris $9 $10 } if (Client exiting isin $1-) { if !$hget(Giris,$6) { hadd -m Giris $6 $7 } } } on ^*!:join:#: { echo $chan $+($chr(3),$color(join))14 $+ $timestamp Giriş » 2 $nick 5 $hget(Giris,$nick) 14 $chr(124) 12Gline14 $chr(124) 4Shun14 $chr(124) 7Kill14 $chr(124) halt } on ^*:quit: { haltdef var %i = 1, %t = $comchan($nick,0) while (%i <= %t) { echo $comchan($nick,%i) $+($chr(3),$color(quit))14 $+ $timestamp Çıkış « 2 $nick 5 $hget(Giris,$nick) 14 $chr(124) 14Gzline14 $chr(124) 6 $1- inc %i } hdel -m Giris $nick } raw 340:*: { haltdef hadd -m Giris $gettok($2,1,61) $+($chr(40),$gettok($2,2,43),$chr(41)) } on ^*!:Part:#: { haltdef if ($hget(Giris,$nick)) { echo $chan $+($chr(3),$color(part))14 $+ $timestamp Part « 2 $nick 5 $hget(Giris,$nick) } elseif (!$hget(Giris,$nick)) { set -u5 %pnick $nick | set -u %pchan $chan | cikis | .timer 1 1 .userip $nick } } alias giris { echo %gchan %gnick $hget(Giris,%gnick) } alias cikis { echo %pchan %pnick $hget(Giris,%pnick) } #IPGoster End on *:Exit: { .disable #IPGoster } raw 381:*: { .enable #IPGoster } 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 ($1 == Shun) { .shun $gettok($hotline,5,32) 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 $gettok($hotline,5,32) 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 $remove($+(*@,$gettok($gettok($hotline,6,32),2,64)),$chr(41)) 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 $gettok($hotline,5,32) Yonetim Hava al Gel | halt } } #opergiris end


__________________
Güneşin ilk ışıklarına vererek umutlarımı
Masal Dünyamın açıp kapılarını
Girdim insan Kalabalığına
 
Alıntı ile Cevapla

Alt 03 Ağustos 2019, 16:03   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Kanala girene shun gline kill




@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] tşkler güzel oldu eline emeğine sağlık lakin suan ip adreslerini göremiyorum


Konu ZenqerDenq tarafından (03 Ağustos 2019 Saat 16:05 ) değiştirilmiştir.
 
Alıntı ile Cevapla

Alt 03 Ağustos 2019, 17:10   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Kanala girene shun gline kill




ZenqerDenq Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] tşkler güzel oldu eline emeğine sağlık lakin suan ip adreslerini göremiyorum

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on ^*!:join:#: { echo $chan $+($chr(3),$color(join))14 $+ $timestamp Giriş » 2 $nick 5 $hget(Giris,$nick) 14 $chr(124) 12Gline14 $chr(124) 4Shun14 $chr(124) 7Kill14 $chr(124) halt }

bu satirları
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on ^*!:join:#: { echo $chan $+($chr(3),$color(join))14 $+ $timestamp Giriş » 2 $nick 5 $right($address(fenomen,1),-3) 14 $chr(124) 12Gline14 $chr(124) 4Shun14 $chr(124) 7Kill14 $chr(124) halt }

bu şekilde değiş

__________________
Güneşin ilk ışıklarına vererek umutlarımı
Masal Dünyamın açıp kapılarını
Girdim insan Kalabalığına
 
Alıntı ile Cevapla

Alt 03 Ağustos 2019, 17:31   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Kanala girene shun gline kill




YouMyCure Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on ^*!:join:#: { echo $chan $+($chr(3),$color(join))14 $+ $timestamp Giriş » 2 $nick 5 $hget(Giris,$nick) 14 $chr(124) 12Gline14 $chr(124) 4Shun14 $chr(124) 7Kill14 $chr(124) halt }

bu satirları
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on ^*!:join:#: { echo $chan $+($chr(3),$color(join))14 $+ $timestamp Giriş » 2 $nick 5 $right($address(fenomen,1),-3) 14 $chr(124) 12Gline14 $chr(124) 4Shun14 $chr(124) 7Kill14 $chr(124) halt }

bu şekilde değiş

Bir şey değişmedi malesef.

 
Alıntı ile Cevapla

Alt 03 Ağustos 2019, 17:49   #6
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Kanala girene shun gline kill




ZenqerDenq Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Bir şey değişmedi malesef.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on ^*!:join:#: { echo $chan $+($chr(3),$color(join))14 $+ $timestamp Giriş » 2 $nick 5 $+($chr(40),$right($address($nick,1),-3),$chr(41)) 14 $chr(124) 12Gline14 $chr(124) 4Shun14 $chr(124) 7Kill14 $chr(124) halt }

bu şekilde denediğimde hiç bir sorun gözükmüyor kardeşim

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

__________________
Güneşin ilk ışıklarına vererek umutlarımı
Masal Dünyamın açıp kapılarını
Girdim insan Kalabalığına

Konu YouMyCure tarafından (03 Ağustos 2019 Saat 17:50 ) değiştirilmiştir.
 
Alıntı ile Cevapla

Alt 04 Ağustos 2019, 01:12   #7
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Kanala girene shun gline kill




YouMyCure Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on ^*!:join:#: { echo $chan $+($chr(3),$color(join))14 $+ $timestamp Giriş » 2 $nick 5 $+($chr(40),$right($address($nick,1),-3),$chr(41)) 14 $chr(124) 12Gline14 $chr(124) 4Shun14 $chr(124) 7Kill14 $chr(124) halt }

bu şekilde denediğimde hiç bir sorun gözükmüyor kardeşim

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Şimdi oldu tşkler. lakin sunucunun verdiği hostu gösteriyor bu.. gercek ip adresini değil

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
[01:21] <Hamza> hoşbuldum. [01:21] Giriş » RekS (09@149.140.145.247) | Gline | Shun | Kill | [01:21] <Sua> Pazartesi evde olcak o [01:21] <Sua> :)

Part edip tekrar joinden sonra ki hali bu yani gerçek ip adresi.


Konu ZenqerDenq tarafından (04 Ağustos 2019 Saat 01:22 ) değiştirilmiştir.
 
Alıntı ile Cevapla

Alt 04 Ağustos 2019, 11:29   #8
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Kanala girene shun gline kill




@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]


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)) }


 
Alıntı ile Cevapla

Alt 04 Ağustos 2019, 19:16   #9
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Kanala girene shun gline kill




Alper Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]


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)) }


tşkler alper güzel bir çalışma olmuş emeğine sağlık yukarıda anlatmak istediğim şu siteye ilk girişte ip adresini görerek işlem menüsü olması gline shun kill gibi yukarıdaki kodumda siteye ilk girişte kanallara join yaptığında gözükmüyor lakin part edip tekrar join olduğunda gözüküyordu ama buda güzel olmuş gercekten emeğine sağlık.

 
Alıntı ile Cevapla

Alt 20 Ocak 2022, 14:50   #10
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Kanala girene shun gline kill




Alper Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]


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)) }



Bu addon çalışmıyor sadece kill atoyor diyerlerini uygalamıyor bakarsanız sevinirim teşekkürler

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 14:50 -->-> Daha önceki mesaj 14:48 --

YouMyCure Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
böyle denermisin


Kod:   Kodu kopyalamak için üzerine çift tıklayın!
#opergiris on on *:snotice:*: { if (Client connecting isin $1-) { ;ipcont $remove($gettok($10,2,64),$chr(41)) if (!$hget(Giris)) { hmake giris 100 } hadd -m Giris $9 $10 } if (Client exiting isin $1-) { if !$hget(Giris,$6) { hadd -m Giris $6 $7 } } } on ^*!:join:#: { echo $chan $+($chr(3),$color(join))14 $+ $timestamp Giriş » 2 $nick 5 $hget(Giris,$nick) 14 $chr(124) 12Gline14 $chr(124) 4Shun14 $chr(124) 7Kill14 $chr(124) halt } on ^*:quit: { haltdef var %i = 1, %t = $comchan($nick,0) while (%i <= %t) { echo $comchan($nick,%i) $+($chr(3),$color(quit))14 $+ $timestamp Çıkış « 2 $nick 5 $hget(Giris,$nick) 14 $chr(124) 14Gzline14 $chr(124) 6 $1- inc %i } hdel -m Giris $nick } raw 340:*: { haltdef hadd -m Giris $gettok($2,1,61) $+($chr(40),$gettok($2,2,43),$chr(41)) } on ^*!:Part:#: { haltdef if ($hget(Giris,$nick)) { echo $chan $+($chr(3),$color(part))14 $+ $timestamp Part « 2 $nick 5 $hget(Giris,$nick) } elseif (!$hget(Giris,$nick)) { set -u5 %pnick $nick | set -u %pchan $chan | cikis | .timer 1 1 .userip $nick } } alias giris { echo %gchan %gnick $hget(Giris,%gnick) } alias cikis { echo %pchan %pnick $hget(Giris,%pnick) } #IPGoster End on *:Exit: { .disable #IPGoster } raw 381:*: { .enable #IPGoster } 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 ($1 == Shun) { .shun $gettok($hotline,5,32) 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 $gettok($hotline,5,32) 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 $remove($+(*@,$gettok($gettok($hotline,6,32),2,64)),$chr(41)) 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 $gettok($hotline,5,32) Yonetim Hava al Gel | halt } } #opergiris end


Kod gayet cok güzel çalışıyor ama oper girmedende çalışıyor şöyle olamazmı öper girdikten sonra çalışsa ve gizline olayı da baştan cıksa user sunucudan cıkınca cıkıyor teşekkürler başarılar dilerim

__________________

Kullanıcı imzalarındaki bağlantı ve resimleri görebilmek için en az 20 mesaja sahip olmanız gerekir ya da üye girişi yapmanız gerekir.
 
Alıntı ile Cevapla

Cevapla

Etiketler
kanala girişte shun


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
Sqline List'ten girene gline cashmare mIRC Scripting Sorunları 5 05 Şubat 2011 16:15
zline / shun / gline sorunu Geri_geri Unreal IRCd 2 13 Şubat 2008 02:12
belirli ident dışında girene gline paLe mIRC Scripting Sorunları 3 05 Şubat 2007 22:46
Belli bir porttan girene oto gline . yepaa mIRC Scripting Sorunları 3 27 Ekim 2006 21:29
Shun & Gline temizleme addon Sunay mIRC Scripting Sorunları 6 09 Ağustos 2006 13:20