IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
Sayfa 1 Toplam 2 Sayfadan 1 2
Konuya ait 40 Mesajı başka Sayfada göster

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   takip modu (https://www.ircforumlari.net/mirc-scripting-sorunlari/180763-takip-modu.html)

fener1907 17 Şubat 2009 14:21
takip modu
 
PHP- Kodu:
on 1:connect:{ .IAL On | takip + 600 }
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,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 4Takip Raporu:12 $nick 5nickinin %cSj saniye içinde kullandığı nickler:14 $hget(Takip,$address($nick,2)) }
  if $gettok($hget(Takip,$address($nick,2)).data,0,43) > 3 { ban -k $chan $nick 2 Nick Change } 
}
#Takip end 
arkadaslar elimde böyle bir kod var ben burdaki 600 yerine mesela 100000 yazsam 100000saniye takip modu devrede olur mu yoksa başka bir yerindede değişiklik yapmalıyım.
yardımlarınız için şimdiden teşekkürler...

muratt_aziz 17 Şubat 2009 15:13
Cevap: takip modu
 
Budaha iyi tavsiye derim sorunun cevabına gelınce bence olur.

Kod:
on *:connect: { .hashtable profil.ini }
on *:JOIN:#:{
  if ($nick != $me) {
    set %nick $nick
    set %mask $address($nick,2)
    set %nick2 $readini profil.ini %mask nick
    set %mask2 $readini profil.ini %mask mask
    if (%mask == %mask2) {
      if (%nick != %nick2) {
        set %quand $readini profil.ini %mask quand
        $iif(!$window(@İP_Takip),window -enz @İP_Takip)
        aline -hp @İP_Takip 0- $+ $time $+ - 14( $+ $chan $+ )4 $nick Nicki'nin Aynı İP de Bundan Önce Kullandıgı Nick %nick2 7( %quand )
        var %c = 1
        while (%c <= $comchan($nick,0)) {
          echo @İP_Takip 0- $+ $time $+ - $comchan($nick,%c) 4 $+ $nick  Nicki'nin Aynı İP de Bundan Önce Kullandıgı Nick 4 $+ %nick2 7(saat $gettok(%quand,1,45) 7gün $gettok(%quand,2,45) $+ 7)
          inc %c
        }
      }
    }
    if (!$ini(profil.ini,mask)) hashtable
  }
}
alias hashtable { if (!$hget(profil)) { hmake profil 5 } | hadd profil nick %nick | hadd profil mask %mask | hadd profil quand $time $+ - $+ $date | hsave -ai profil profil.ini $hget(profil,mask) | hfree profil }

adigeragip 17 Şubat 2009 15:46
Cevap: takip modu
 
bu senınkınde sure yok sanırım yanılıyo muyum?

Difuzyon 17 Şubat 2009 16:04
Cevap: takip modu
 
Evet murat_aziz'in verdiği süresiz.
Sunucudan çıkan ,aynı host bilgisine sahip birisinin tekrar giriş yaptığında önceki nicki veren bir çalışma.

fener1907'in kodu ise;çıkış yaptıktan sonra aynı hosttan giriş yapan (600 sn. içinde)
3'ten fazla giriş olursa kanaldan banlayan bir kod.Ordaki süreyi uzatmak veya düşürmek size kalmış bir durum.100000 diyorsun buda yaklaşık 27 saat denk gelen bir durum,o kadar online isen yazarsın...

Heavenly 17 Şubat 2009 18:54
Cevap: takip modu
 
4-18:41:40- 14(#sohbet)4 aysegul_cam Nicki'nin Aynı iP de Bundan Önce Kullandıgı Nick zilan1111111 7( 18:35:32-17/02/2009 )
4-18:41:40- #sohbet4aysegul_cam  Nicki'nin Aynı iP de Bundan Önce Kullandıgı Nick 4zilan1111111 7(saat 18:35:32 7Tarih 17/02/20097)

kod guzel ama neden ıkı kere yazıyo ?

muratt_aziz 17 Şubat 2009 23:10
Cevap: takip modu
 
Kod:
  aline -hp    @İP_Takip 0- $+ $time $+ - 14( $+ $chan $+ )4 $nick Nicki'nin Aynı İP de Bundan Önce Kullandıgı Nick %nick2 7( %quand )
KOD DAN SU BOLUMU SILERSEN TEK YAZAR kodu xclusive den almıstım ben oyle kullandım bir bildiği vardır sanıyorum tşk..

Heavenly 18 Şubat 2009 00:58
Cevap: takip modu
 
onu sıldıgımızde kod calısmıyo

muratt_aziz 18 Şubat 2009 01:07
Cevap: takip modu
 
Kod:
on *:connect: { .hashtable profil.ini }
on *:JOIN:#:{
  if ($nick != $me) {
    set %nick $nick
    set %mask $address($nick,2)
    set %nick2 $readini profil.ini %mask nick
    set %mask2 $readini profil.ini %mask mask
    if (%mask == %mask2) {
      if (%nick != %nick2) {
        set %quand $readini profil.ini %mask quand
        $iif(!$window(@İP_Takip),window -enz @İP_Takip)
        var %c = 1
        while (%c <= $comchan($nick,0)) {
          echo @İP_Takip  0- $+ $time $+ - $comchan($nick,%c) 4 $+ $nick  Nicki'nin Aynı İP de Bundan Önce Kullandıgı Nick 4 $+ %nick2 7(saat $gettok(%quand,1,45) 7gün $gettok(%quand,2,45) $+ 7)   
          inc %c
        }
      }
    }
    if (!$ini(profil.ini,mask)) hashtable
  }
}
alias hashtable { if (!$hget(profil)) { hmake profil 5 } | hadd profil nick %nick | hadd profil mask %mask | hadd profil quand $time $+ - $+ $date | hsave -ai profil profil.ini $hget(profil,mask) | hfree profil }
bende calısıyor yanlıs bıyerı sılmıs olmayasın...

Kod:
-00:47:46- #kelebek beyazkelebek  Nicki'nin Aynı İP de Bundan Önce Kullandıgı Nick yesilkelebek (saat 00:46:16 gün 18/02/2009)
-00:47:46- #istanbul beyazkelebek  Nicki'nin Aynı İP de Bundan Önce Kullandıgı Nick yesilkelebek (saat 00:46:16 gün 18/02/2009)
-00:47:46- #net sarikelebek  Nicki'nin Aynı İP de Bundan Önce Kullandıgı Nick beyazkelebek (saat 00:47:46 gün 18/02/2009)
-00:47:46- #kelebekmuhabbet sarikelebek  Nicki'nin Aynı İP de Bundan Önce Kullandıgı Nick beyazkelebek (saat 00:47:46 gün 18/02/2009)
-00:48:15- #kelebek KelebekMedia5117  Nicki'nin Aynı İP de Bundan Önce Kullandıgı Nick KelebekMedia3768 (saat 00:45:47 gün 18/02/2009)
-00:49:10- #istanbul brindarim  Nicki'nin Aynı İP de Bundan Önce Kullandıgı Nick istgay (saat 09:51:00 gün 22/01/2009)
-00:49:16- #net sarikelebek  Nicki'nin Aynı İP de Bundan Önce Kullandıgı Nick yesilkelebek (saat 00:47:47 gün 18/02/2009)
-00:49:16- #kelebekmuhabbet sarikelebek  Nicki'nin Aynı İP de Bundan Önce Kullandıgı Nick yesilkelebek (saat 00:47:47 gün 18/02/2009)
-00:49:16- #kelebek beyazkelebek  Nicki'nin Aynı İP de Bundan Önce Kullandıgı Nick sarikelebek (saat 00:49:16 gün 18/02/2009)
-00:49:16- #istanbul beyazkelebek  Nicki'nin Aynı İP de Bundan Önce Kullandıgı Nick sarikelebek (saat 00:49:16 gün 18/02/2009)
-00:49:16- #istanbul yesilkelebek  Nicki'nin Aynı İP de Bundan Önce Kullandıgı Nick beyazkelebek (saat 00:49:16 gün 18/02/2009)
-00:49:34- #net gencasik  Nicki'nin Aynı İP de Bundan Önce Kullandıgı Nick slave_boy (saat 00:40:22 gün 18/02/2009)
-00:50:02- #net KelebekSCR9341  Nicki'nin Aynı İP de Bundan Önce Kullandıgı Nick KelebekSCR4456 (saat 00:47:25 gün 18/02/2009)
-00:50:46- #net sarikelebek  Nicki'nin Aynı İP de Bundan Önce Kullandıgı Nick yesilkelebek (saat 00:49:16 gün 18/02/2009)

adigeragip 18 Şubat 2009 01:13
Cevap: takip modu
 
PHP- Kodu:
on *:JOIN:#:{ 
  if ($nick != $me) {
    set %nick $nick
    set %mask $address($nick,2)
    set %nick2 $readini profil.ini %mask nick
    set %mask2 $readini profil.ini %mask mask
    if (%mask == %mask2) {
      if (%nick != %nick2) {
        set %quand $readini profil.ini %mask quand
        $iif(!$window(@İP_Takip),window -enz @İP_Takip)
        aline -hp @İP_Takip 0- $+ $time $+ - 14( $+ $chan $+ )4 $nick Nicki'nin Aynı İP de Bundan Önce Kullandıgı Nick %nick2 7( %quand )
        var %c = 1
        while (%c <= $comchan($nick,0)) { 
          echo @İP_Takip 0- $+ $time $+ - $comchan($nick,%c) 4 $+ $nick  Nicki'nin Aynı İP de Bundan Önce Kullandıgı Nick 4 $+ %nick2 7(saat $gettok(%quand,1,45) 7gün $gettok(%quand,2,45) $+ 7)
          inc %c 
        }
      }
    }
    if (!$ini(profil.ini,mask)) hashtable
  }
}
alias hashtable { if (!$hget(profil)) { hmake profil 5 } | hadd profil nick %nick | hadd profil mask %mask | hadd profil quand $time $+ - $+ $date | hsave -ai profil profil.ini $hget(profil,mask) | hfree profil } 

bu koda bi ses eklemek mumkün mü yani bu uyarıyı verınce aynı mesaj gelmis gibi bi ses cıksa

muratt_aziz 18 Şubat 2009 21:40
Cevap: takip modu
 
Kod:
on *:connect: { .hashtable profil.ini }
on *:JOIN:#:{
  if ($nick != $me) {
    set %nick $nick
    set %mask $address($nick,2)
    set %nick2 $readini profil.ini %mask nick
    set %mask2 $readini profil.ini %mask mask
    if (%mask == %mask2) {
      if (%nick != %nick2) {
        set %quand $readini profil.ini %mask quand
        splay sounds\a.wav
        $iif(!$window(@İP_Takip),window -enz @İP_Takip)
        var %c = 1
        while (%c <= $comchan($nick,0)) {
          echo @İP_Takip  0- $+ $time $+ - $comchan($nick,%c) 4 $+ $nick  Nicki'nin Aynı İP de Bundan Önce Kullandıgı Nick 4 $+ %nick2 7(saat $gettok(%quand,1,45) 7gün $gettok(%quand,2,45) $+ 7)   
          inc %c
        }
      }
    }
    if (!$ini(profil.ini,mask)) hashtable
  }
}
alias hashtable { if (!$hget(profil)) { hmake profil 5 } | hadd profil nick %nick | hadd profil mask %mask | hadd profil quand $time $+ - $+ $date | hsave -ai profil profil.ini $hget(profil,mask) | hfree profil }
mircin sounds klasoru icindeki a.wav dosyası koydum calışıyor denedim kod da kırmızı belirttiğim yere ses dosyanı koyarsan sorun olmaz yada sen ses dosyana gore yolu belirlersin.. kolay gelsin


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 20:38.
Sayfa 1 Toplam 2 Sayfadan 1 2
Konuya ait 40 Mesajı başka Sayfada göster

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk