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

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - Nick Takip (https://www.ircforumlari.net/mirc-scripting-sorunlari/435859-nick-takip.html)

Kod:

 

alias abo { enable #abo } 

alias ado { disable #abo } 

#abo on

on 1:connect:{ .IAL On | takip + 300 } 

alias takip { 

  if $1 == + { $iif($hget(Takip),hfree Takip) | .enable #Takip | $iif(!$hget(Takip),hmake Takip 1000) | set %cSj $iif($2,$2,300) | echo -ta 4Takip Modu Devrede!.. $+([,%cSj,sn.,]) } 

  else { .disable #Takip | unset %cSj | echo -ta 14Takip Modu DevreDışı ! } 

} 

#Takip on ^*:QUIT:{ hadd $iif($address($nick,2),$+(-u,%cSj),$+(-u1)) Takip $address($nick,2) $iif($istok($hget(Takip,$address($nick,2)),$nick,3 2),$hget(Takip,$address($nick,2)),$iif($hget(Takip ,$address($nick,2)),$hget(Takip,$address($nick,2)) /!\ $nick,$nick)) } 

on ^*:part:#: { hadd $iif($address($nick,2),$+(-u,%cSj),$+(-u1)) Takip $address($nick,2) $iif($istok($hget(Takip,$address($nick,2)),$nick,3 2),$hget(Takip,$address($nick,2)),$iif($hget(Takip ,$address($nick,2)),$hget(Takip,$address($nick,2)) /!\ $nick,$nick)) } 

on !^*:JOIN:#:{ 

  if ($hget(Takip,$address($nick,2)) && $hget(Takip,$address($nick,2)) != $nick) { echo -t $chan 14,1 Takip Raporu: 3 $nick 14nickinin3 %cSj 14saniye içinde kullandığı nickler 4:3 $hget(Takip,$address($nick,2)) } 

} 

#Takip end 

#abo end

Eskilerden Böyle Bi Kod Buldum. Calısıyormu Bilmiyorum fakat ŞöLe ßir Hata ile karsılasıyorum; * /hadd: Böyle bir Tablo yok 'Takip' Bu kodu calısır duruma getirebilir misiniz acaba ?

Cevap: Nick Takip

[09:54:11] Takip Raporu: edaaa nickinin 300 saniye içinde kullandığı nickler : deniz__
[09:54:11] *** Giriş: edaaa

Kodda 1 kaç yerde hata vardı düzelttim Çalışıyor. Bu şekilde denermisin.

Kod:

on 1:connect:{ .IAL On | takip + 300 } 

alias takip { 

  if $1 == + { 

    $iif($hget(Takip),hfree Takip) | .enable #Takip | $iif(!$hget(Takip),hmake Takip 1000) | set %cSj $iif($2,$2,300) | echo -ta 4Takip Modu Devrede!.. $+([,%cSj,sn.,]) 

  } 

  else { .disable #Takip | unset %cSj | echo -ta 14Takip Modu DevreDışı !  

  } 

} 
 

#takip on
 

on ^*:QUIT:{ hadd $iif($address($nick,2),$+(-u,%cSj),$+(-u1)) Takip $address($nick,2) $iif($istok($hget(Takip,$address($nick,2)),$nick,32),$hget(Takip,$address($nick,2)),$iif($hget(Takip ,$address($nick,2)),$hget(Takip,$address($nick,2)) /!\ $nick,$nick)) } 

on ^*:part:#: { hadd $iif($address($nick,2),$+(-u,%cSj),$+(-u1)) Takip $address($nick,2) $iif($istok($hget(Takip,$address($nick,2)),$nick,32),$hget(Takip,$address($nick,2)),$iif($hget(Takip ,$address($nick,2)),$hget(Takip,$address($nick,2)) /!\ $nick,$nick)) } 

on !^*:JOIN:#:{ 

  if ($hget(Takip,$address($nick,2)) && $hget(Takip,$address($nick,2)) != $nick) { echo -t $chan 14,1 Takip Raporu: 3 $nick 14nickinin3 %cSj 14saniye içinde kullandığı nickler 4:3 $hget(Takip,$address($nick,2)) } 

}

#takip end

Cevap: Nick Takip

Tskler Calısıyor. ßuna ßirde Sağ Tuş'a Nick Takip Ac Kapat Komutu ekleyebilir miyiz ?

Cevap: Nick Takip

Alıntı:

breakwolf Nickli Üyeden Alıntı (Mesaj 1040961550)

Tskler Calısıyor. ßuna ßirde Sağ Tuş'a Nick Takip Ac Kapat Komutu ekleyebilir miyiz ?

Popupslara mı?

Cevap: Nick Takip

Yok papus'a değiL ßoş Ekranda Sağ Tuş Yapınca Cıkıyor Ya.

Cevap: Nick Takip

Alıntı:

breakwolf Nickli Üyeden Alıntı (Mesaj 1040961593)

Yok papus'a değiL ßoş Ekranda Sağ Tuş Yapınca Cıkıyor Ya.

İşte o dediğin şey popups oluyor her neyse.

Kod:

menu * { 

  .-

  Nick takip

  .Açık:.takip +

  .-

  .Kapalı:.takip -

  .-

}

Remotene ekle.

Cevap: Nick Takip

Kod:

menu channel,query {

  Nick Takip

  .Aç:$iif($group(#takip) == on,echo -a 4Takip Modu Zaten Devrede.,takip + 300)

  .Kapat:$iif($group(#takip) == off,echo -a 14Takip Modu Zaten Devre Dışı,takip)

}

Kanalda veya Özelde Sağ tıkladığın Zaman Karşına Çıkacaktır.
Açık'a tıkladıgında Açık'sa Uyarı verecek Açık değilse Açacaktır. Kapalıdada Aynı şekilde.

Cevap: Nick Takip

buna birde ip kısmınıda ekleyemezmiyiz?

Kod:

 echo -t $chan 14,1 Takip Raporu: 3 $nick 14nickinin3 %cSj 14saniye içinde kullandığı nickler 4:3 $hget(Takip,$address($nick,2)) , :ip no : ipvsvs }

gibi

Cevap: Nick Takip

Popups Aç/Kapat ve İp gösterimi Editlenmiş Şekli Aşağıdadır.

Kod:

on 1:connect:{ .IAL On | takip + 300 } 

alias takip { 

  if $1 == + { 

    $iif($hget(Takip),hfree Takip) | .enable #Takip | $iif(!$hget(Takip),hmake Takip 1000) | set %cSj $iif($2,$2,300) | echo -ta 4Takip Modu Devrede!.. $+([,%cSj,sn.,]) 

  } 

  else { .disable #Takip | unset %cSj | echo -ta 14Takip Modu DevreDışı !  

  } 

} 
 

#takip on
 

on ^*:QUIT:{ hadd $iif($address($nick,2),$+(-u,%cSj),$+(-u1)) Takip $address($nick,2) $iif($istok($hget(Takip,$address($nick,2)),$nick,32),$hget(Takip,$address($nick,2)),$iif($hget(Takip ,$address($nick,2)),$hget(Takip,$address($nick,2)) /!\ $nick,$nick)) } 

on ^*:part:#: { hadd $iif($address($nick,2),$+(-u,%cSj),$+(-u1)) Takip $address($nick,2) $iif($istok($hget(Takip,$address($nick,2)),$nick,32),$hget(Takip,$address($nick,2)),$iif($hget(Takip ,$address($nick,2)),$hget(Takip,$address($nick,2)) /!\ $nick,$nick)) } 

on !^*:JOIN:#:{ 

  if ($hget(Takip,$address($nick,2)) && $hget(Takip,$address($nick,2)) != $nick) { echo -t $chan 14,1 Takip Raporu: 3 $nick 14nickinin3 %cSj 14saniye içinde kullandığı nickler 4:3 $hget(Takip,$address($nick,2)) 14 İp: $+(4[,3,$gettok($address($nick,2),2,64),4])  } 

}

#takip end
 

menu channel,query {

  Nick Takip

  .Aç:$iif($group(#takip) == on,echo -a 4Takip Modu Zaten Devrede.,takip + 300)

  .Kapat:$iif($group(#takip) == off,echo -a 14Takip Modu Zaten Devre Dışı,takip)

}

Cevap: Nick Takip

ip verisi tam çıkmıyor

(19:19:24) 0,1 Takip Raporu4: 14 ezgii18 0nickinin 4 900 0,1saniye içinde kullandığı nickler 4:10 ezgii18 [/!\] secil_burak 14 ip numarası: 4[10525DEE09.79FD7554.EA667B7E.IP4]

normal 78.111.441 gibi çıksa 525DEE09.79FD7554.EA667B7E.IP yerine