Clones Scanner/Kicker Manual

By eyiezinc on Oct 15, 2009

Scanning Clone with kick options

;--------------------------------------------------RIMAUCREWZ && EYIEZINC SCRIPTING DEVELOPMENT--------------------------------------------------;
;Addon Name:Clones Scanner/Kicker Manual                                                          
;Created By: Lestat   
;Tester By: MasTer-PriNce                                                                                                                                  
;Description: Scanning Clone with kick options                                               
;How To Use: Load This Addon's In Your Remote/Script Editor Then Right Click At  Status,Channel
;And It Will Appear The Menu "Scanner"
;If Any Error Found Please Inform Us At 6667 "#rimau,#eyiezinc,#myx"
menu channel {
  .Clone Scanner:cscan
  .$iif($me !isop $chan,$style(2)) Clone Kick:cskick 
alias cscan {
  echo $chan 14:15:0: $+(4[8,$chan,4]) 7Clone Scanner4....
  .timerlinef 1 1 echo $chan 11,11:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::    
  var %t = 1
  while ($nick(#,%t)) {
    if ($ialchan($address($nick(#,%t),4),#,0) > 1) {
      var %ips = 1
      while ($ialchan($address($nick(#,%t),4),#,%ips)) {
        set $+(%,ipclone,.,$address($nick(#,%t),4)) $addtok($($+(%,ipclone,.,$address($nick(#,%t),4)),2),$ialchan($address($nick(#,%t),4),#,%ips).nick,32)
        inc %ips
      .timerip $+ $address($nick(#,%t),4) 1 1 echo $chan 14:15:0: $+(4[8,$ialchan($address($nick(#,%t),4),#,0),4]) 7total clones with ip $+(4[8,$address($nick(#,%t),4),4])
      .timer $+ $address($nick(#,%t) ,4) 1 1 echo $chan 14:15:0: 4[8Nick4]9:14 $($+(%,ipclone,.,$address($nick(#,%t),4)),2)
      .timerlinel $+ $address($nick(#,%t),4) 1 1 echo $chan 11,11:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::    
      .timerendscan 1 2 echo $chan 14:15:0: $+(4[8,$chan,4]) 7End Of Scanner   
    inc %t

alias cskick { var %t = 1 | while ($nick(#,%t)) {  if ($ialchan($address($nick(#,%t),4),#,0) > 1) { .timercskick $+ $address($nick(#,%t),4) -m 1 700 kick $chan $address($nick(#,%t),4) Clones } | inc %t } }



Sign in to comment.
[85]   -  Oct 28, 2010

/me like

gooshie   -  Oct 15, 2009

This may be better menu item.
$iif($nick(#,$me,~&@%),Clone Kick):cskick

This would be shorter for all those colons.
echo # 11,11 $str(:,82)

Type 4 ==> $address($nick(#,%t),4) <== is a tad harse.
The type 4 mask will give unexpected results at times.
It is possible that all users from the same isp would
appear the same. A common isp practice is to report the
host mask such as:
The ip address would be between the @ and the first dot.
When mIRC wildcards the mask using type 4 it makes a
very simple decision about the part after the @. If at
least one dot devides up a series of all numbers it will
star () the last group of numbers after the last dot.
However if any letters are in the part after the @ then
it must have two dots before it puts a star in place of
the part after the @ and before the first dot. What this
means is that $mask(Nick!user@,4) would
!@53.217.34. which could be somewhat usefull.
But, with $mask(Nick!,4)
mIRC would return !@* thus matching every
user from that isp. For clone detection and basic popup
bans and bot bans it may be best to use type 2 mask.

Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.