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

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/)
-   -   Giren cıkan ipleri not tutma (https://www.ircforumlari.net/mirc-scripting-sorunlari/432386-giren-cikan-ipleri-not-tutma.html)

Kimimben 04 Aralık 2011 03:31
Giren cıkan ipleri not tutma
 
Mrb arkadaslar söyle bir kod varmıdır.mesela kanala giren bir nick ve ipi
ali ip ( 78.xx.x) bu Nıck kaldan cıkıp 15 dkk sonra aynı iple ama baska nıckle girdigi zaman daha onceki girdigi nickleri gosteren bir kod varmıdır arkadaslar simdiden tskler

Heartbroken 04 Aralık 2011 04:11
Cevap: Giren cıkan ipleri not tutma
 
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Forum'da bunun için kodlar mevcut.

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] burdan arama yaparsanız diğer kodlarada ulaşırsınız.

Kimimben 04 Aralık 2011 21:02
Cevap: Giren cıkan ipleri not tutma
 
Kod:
on 1:start: { .hmake nicksch 3600 }
on 1:part:#: { if ( $comchan($nick,0) < 9999 ) { nicksgrab $nick $site } }
on 1:quit: { nicksgrab $nick $site }
on 1:kick:#: { 
  if ( $comchan($knick,0) < 9999 ) {
    if ( $ial($knick).host != $null ) { nicksgrab $knick $ifmatch }
  } 
}
alias nicksgrab { 
  .hadd nicksch $iif(($gettok($2,-1,46) == virtuel) && ($numtok($2,46) > 3),$+($gettok($2,1-2,46),.virtuel),$2) $1
}
alias NicksTrouve {
  var %a = $iif(($gettok($2,-1,46) == virtuel) && ($numtok($2,46) > 3),$+($gettok($2,1-2,46),.virtuel),$2)
  return $iif($hget(nicksch,%a) != $1,$ifmatch)
}
on 1:JOIN:#: {
  var %NickPrecedent = $iif($NicksTrouve($nick,$site), 4 [12> > > > >  Kanal 4 $chan 12 Şimdiki nick >>> 4 $nick 12 Önceki Nicki4 >>> $ifmatch  ) 
  if ( %NickPrecedent ) { 
    echo $chan $ifmatch 
    $iif(!$window(@NickTakip),window -ne @NickTakip)
    var %NickPrecedent = $iif($NicksTrouve($nick,$site), 4 [12> > > > >  Kanal 4 $chan 12 Şimdiki nick >>> 4 $nick 12 Önceki Nicki4 >>> $ifmatch  ) 
    if ( %NickPrecedent ) {
      echo 4 @NickTakip 3[ $+ $time $+ 3] $chan $ifmatch
    }
  }
 


Boyle bir kodu mrcimde Remotome ekledim arkadaslar ama sorun oldugunu gosteriyor statude cunku giren cıkanda su sorunu gosteriyor

* /hadd: Böyle bir Tablo yok 'nicksch' (Satır 11, script5.ini)

bu Kod zaten Script5.ini olan kod bu yukarıdakki kodda sorun oldugunu goruyoruz düzeltmek icin ne yapılması gerekli Yardımlarınız icin simdiden Tsk ederim.
Satır 11 : .hadd nicksch $iif(($gettok($2,-1,46) == virtuel) && ($numtok($2,46) > 3),$+($gettok($2,1-2,46),.virtuel),$2) $1


Lucifer 05 Aralık 2011 02:09
Cevap: Giren cıkan ipleri not tutma
 
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,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 4Takip Raporu: 2 $nick nickinin %cSj 4saniye içinde kullandığı nickler: 1 $hget(Takip,$address($nick,2)) }
  if ($gettok($hget(Takip,$address($nick,2)),0,43) > 2 && $me isop $chan) { ban $chan $nick 2 | kick $chan $nick 0,1 /4!0\14,1 0S14pam 4/ 0C14lone 4/ 0I14nviter 4/ 0B14ots 4?0,1 /4!0\ 0(140N14icks 0M14atches0: 0,1 4  ( 4 $+ $hget(Takip,$address($nick,2))) $+ 15 )  }
}
#Takip end

Bunu kullanabilirsin.

[02:08] 4Takip Raporu: 2 asdlklkdas nickinin 300 4saniye içinde kullandığı nickler: 1 d2d + asdassda + blablabla

Not : Kodu ekledikden sonra yeniden aç mIRC'ini.

Set 05 Aralık 2011 02:12
Cevap: Giren cıkan ipleri not tutma
 
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

bu konuyuda inceleyebilirsiniz.

Lucifer 05 Aralık 2011 02:16
Cevap: Giren cıkan ipleri not tutma
 
Alıntı:
KiMiiMBeN Nickli Üyeden Alıntı (Mesaj 1040944598)
Kod:
on 1:start: { .hmake nicksch 3600 }
on 1:part:#: { if ( $comchan($nick,0) < 9999 ) { nicksgrab $nick $site } }
on 1:quit: { nicksgrab $nick $site }
on 1:kick:#: { 
  if ( $comchan($knick,0) < 9999 ) {
    if ( $ial($knick).host != $null ) { nicksgrab $knick $ifmatch }
  } 
}
alias nicksgrab { 
  .hadd nicksch $iif(($gettok($2,-1,46) == virtuel) && ($numtok($2,46) > 3),$+($gettok($2,1-2,46),.virtuel),$2) $1
}
alias NicksTrouve {
  var %a = $iif(($gettok($2,-1,46) == virtuel) && ($numtok($2,46) > 3),$+($gettok($2,1-2,46),.virtuel),$2)
  return $iif($hget(nicksch,%a) != $1,$ifmatch)
}
on 1:JOIN:#: {
  var %NickPrecedent = $iif($NicksTrouve($nick,$site), 4 [12> > > > >  Kanal 4 $chan 12 Şimdiki nick >>> 4 $nick 12 Önceki Nicki4 >>> $ifmatch  ) 
  if ( %NickPrecedent ) { 
    echo $chan $ifmatch 
    $iif(!$window(@NickTakip),window -ne @NickTakip)
    var %NickPrecedent = $iif($NicksTrouve($nick,$site), 4 [12> > > > >  Kanal 4 $chan 12 Şimdiki nick >>> 4 $nick 12 Önceki Nicki4 >>> $ifmatch  ) 
    if ( %NickPrecedent ) {
      echo 4 @NickTakip 3[ $+ $time $+ 3] $chan $ifmatch
    }
  }
 


Boyle bir kodu mrcimde Remotome ekledim arkadaslar ama sorun oldugunu gosteriyor statude cunku giren cıkanda su sorunu gosteriyor

* /hadd: Böyle bir Tablo yok 'nicksch' (Satır 11, script5.ini)

bu Kod zaten Script5.ini olan kod bu yukarıdakki kodda sorun oldugunu goruyoruz düzeltmek icin ne yapılması gerekli Yardımlarınız icin simdiden Tsk ederim.
Satır 11 : .hadd nicksch $iif(($gettok($2,-1,46) == virtuel) && ($numtok($2,46) > 3),$+($gettok($2,1-2,46),.virtuel),$2) $1


Ayrıca bu kodu aktif hale getirebilmen için, Script'i tamamen kapatıp bir kez yeniden açman gerekiyor. Ondan dolayı o hatayı alıyorsun yoksa kodda herhangi bir problem yok. İkisinide deneyebilirsin.

Kimimben 05 Aralık 2011 02:32
Cevap: Giren cıkan ipleri not tutma
 
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,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 4Takip Raporu: 2 $nick nickinin %cSj 4saniye içinde kullandığı nickler: 1 $hget(Takip,$address($nick,2)) } if ($gettok($hget(Takip,$address($nick,2)),0,43) > 2 && $me isop $chan) { ban $chan $nick 2 | kick $chan $nick 0,1 /4!0\14,1 0S14pam 4/ 0C14lone 4/ 0I14nviter 4/ 0B14ots 4?0,1 /4!0\ 0(140N14icks 0M14atches0: 0,1 4 ( 4 $+ $hget(Takip,$address($nick,2))) $+ 15 ) } } #Takip end
Lucifer Kardesim Once senin codu denedim Remotede yeni sayfa actım kodu ekledım sonra mrci actım kapattım ama Code silinmiş remoteden sasırdım ekledıgım cod siliniyor.
Diğer verdgim codu dedigin gibi yaptım evet duzeldi ama Verdigi bilgiler dogru cıkmadı mesela
az onceki nicki bu diyor ipi ile kıyaslama yapıyorum tutmuyorum benım verdigim cod da gordugum kadarıyla dogru cvplamıyor cunku az onceki nickin ipi ile simdi giren ipler farklı apayrı nıckler ve ipleri Uyarı olarak gosterdi



Tmm hocam simdi oldu senın codu duzgun yerlesmedıgı icin sılınmıs sımdı duzgun yerlestı ve kod dedigin gibi Calısıyor peki bu 300 saniye diyor bunu zamanını yukseltmek icin mesela son 15-20 dkk once gırmıs birisini bulmak icin Coddaki tum 300 olanları farklı saniyelermi yazacagız

Lucifer 05 Aralık 2011 03:04
Cevap: Giren cıkan ipleri not tutma
 
mIRC'de nick takip ile alakalı ne kadar kod varsa kaldır. Sonra hangi kodu ekleyeceksen, mIRC'in ana dizininde /load -rs isim.txt şeklinde ekle, mIRC'i kapat yeniden aç ve sunucuya bağlan. Vermiş olduğun koda göre bende hata vermedi tekrar kontrol et derim.

Giant 24 Kasım 2020 10:08
Cevap: Giren cıkan ipleri not tutma
 
Arkadaşlar şu kodda bir sorun var!


Kod:
on 1:start: { .hmake nicksch 3600 }

on 1:part:#: { if ( $comchan($nick,0) < 9999 ) { nicksgrab $nick $site } }

on 1:quit: { nicksgrab $nick $site }

on 1:kick:#: {

  if ( $comchan($knick,0) < 9999 ) {

    if ( $ial($knick).host != $null ) { nicksgrab $knick $ifmatch }

  }

}

alias nicksgrab {

  .hadd nicksch $iif(($gettok($2,-1,46) == virtuel) && ($numtok($2,46) > 3),$+($gettok($2,1-2,46),.virtuel),$2) $1

}

alias NicksTrouve {

  var %a = $iif(($gettok($2,-1,46) == virtuel) && ($numtok($2,46) > 3),$+($gettok($2,1-2,46),.virtuel),$2)

  return $iif($hget(nicksch,%a) != $1,$ifmatch)

}

on 1:JOIN:#: {

  var %NickPrecedent = $iif($NicksTrouve($nick,$site), 4 [12> > > > >  Kanal 4 $chan 12 Şimdiki nick >>> 4 $nick 12 Önceki Nicki4 >>> $ifmatch  )

  if ( %NickPrecedent ) {

    echo $chan $ifmatch

    $iif(!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Takip),window -ne @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Takip)

    var %NickPrecedent = $iif($NicksTrouve($nick,$site), 4 [12> > > > >  Kanal 4 $chan 12 Şimdiki nick >>> 4 $nick 12 Önceki Nicki4 >>> $ifmatch  )

    if ( %NickPrecedent ) {

      echo 4 @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Takip [ $+ $time $+ 3] $chan $ifmatch

    }

  }
@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Takip açılıyor fakat..



[08:26:533] #XXX 4 [12> > > > > Kanal 4 #XXX 12 Şimdiki nick >>> 4 mhfzkr 12 Önceki Nicki4 >>>


Arıza veriyor düzenleyebilecek biri varmı?

--IRCForumlari.NET ; Flood Engellendi -->-> Yeni yazılan mesaj 10:08 -->-> Daha önceki mesaj 08:28 --

Düzenlendi Arkadaşlar kodu kullanabilirsiniz.





Kod:
on 1:start: { .hmake nicksch 5000 }

on 1:part:#: { if ( $comchan($nick,0) < 9999 ) { nicksgrab $nick $site } }

on 1:quit: { nicksgrab $nick $site }

on 1:kick:#: {

  if ( $comchan($knick,0) < 9999 ) {

    if ( $ial($knick).host != $null ) { nicksgrab $knick $ifmatch }

  }

}

alias nicksgrab {

  .hadd nicksch $iif(($gettok($2,-1,46) == virtuel) && ($numtok($2,46) > 3),$+($gettok($2,1-2,46),.virtuel),$2) $1

}

alias NicksTrouve {

  var %a = $iif(($gettok($2,-1,46) == virtuel) && ($numtok($2,46) > 3),$+($gettok($2,1-2,46),.virtuel),$2)

  return $iif($hget(nicksch,%a) != $1,$ifmatch)

}

on 1:JOIN:#: {

  var %NickPrecedent = $iif($NicksTrouve($nick,$site),  $chan $nick Önceki Nick > $ifmatch  )

  if ( %NickPrecedent ) {

    echo $chan $ifmatch

    $iif(!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Takip),window -ne @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Takip)

    var %NickPrecedent = $iif($NicksTrouve($nick,$site), >  $chan $nick Önceki Nick > $ifmatch  )

    if ( %NickPrecedent ) {

      echo 4 @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]Takip [ $+ $time $+ 3] $chan $ifmatch

    }

  }


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 21:46.

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