Advertisement
SaNCaK

mIRC CLone Dedector On/Off

Feb 1st, 2014
413
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
mIRC 0.90 KB | None | 0 0
  1. menu status,menubar,channel {  
  2. $iif(%clonededector,$style(1)) CLone Dedector ( $+ $iif(%clonededector,On,Off) $+ ) {
  3.     if (%clonededector) { unset %clonededector | .disable #clonededector | echo -a $timestamp 2,15CLone Dedector  4CLOSE }
  4.     else { set %clonededector on | .enable #clonededector | echo -a $timestamp 2,15CLone Dedector  3OPEN }
  5.   }
  6. }
  7. #clonededector on
  8. on *:join:#:{
  9.   if ($nick != $me) {
  10.     if ($ial($address($nick,2),0) > 1) {
  11.       set %clone.count [ $+ [ $nick ] ] $ial($address($nick,2),0)
  12.       :cloop
  13.       if (%clone.count [ $+ [ $nick ] ] < 1) { goto clend }
  14.       set %clecho %clecho 2 $+ $ial($address($nick,2), %clone.count [ $+ [ $nick ] ] ).nick
  15.       dec %clone.count [ $+ [ $nick ] ]
  16.       goto cloop
  17.       :clend
  18.       echo $chan $timestamp Clone 4( $+ %clecho $address($nick,2) $+ )
  19.     }
  20.     unset %clecho*
  21.     unset %clone.count*
  22.   }
  23. }
  24.  
  25. #clonededector end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement