All pastes #607696 Raw Edit

Anonymous

public text v1 · immutable
·published 2007-07-07 20:57 UTC
rendered paste body
on ^*:QUIT:{
  var %x = 1, %chans = $comchan($nick, 0)
  while (%x <= %chans) {
    var %chan = $comchan($nick, %x)
    echo 03 -t %chan 3* Quit:12 $nick 3(14 $+ $address $+ 3) has quit IRC: (12 $+ $1- $+ 3) 
    inc %x
  }
  haltdef
}

on ^*:NICK:{
  var %x = 1 
  var %chans = $comchan($newnick, 0)
  while (%x <= %chans) {
    var %chan = $comchan($newnick, %x)
    echo 03 -t %chan 3* NickChange:12 $nick 3(14 $+ $address $+ 3) in12 $chan 3is now known as:12 $newnick 
    inc %x
  }
  haltdef
} 

on ^*:JOIN:#:{ 
  echo 03 -t $chan * Join:12 $nick 3(14 $+ $address $+ 3) 
  haltdef 
} 

on ^*:PART:#:{ 
  echo 03 -t $chan * Part:12 $nick 3(14 $+ $address $+ 3) 
  haltdef 
} 

on ^*:VOICE:#:{ 
  echo 03 -t $chan * Mode:12 $nick 3(14 $+ $address $+ 3) has given the channel mode: 2VOICE 3(2+v3) to:12 $vnick 
  haltdef 
} 

on ^*:DEVOICE:#:{ 
  echo 03 -t $chan * Mode:12 $nick 3(14 $+ $address $+ 3) has given the channel mode: 2DEVOICE 3(2-v3) to:12 $vnick 
  haltdef 
} 

on ^*:HELP:#:{  
  echo 03 -t $chan * Mode:12 $nick 3(14 $+ $address $+ 3) has given the channel mode: 7HALFOP 3(7+h3) to:12 $hnick 
  haltdef 
} 

on ^*:DEHELP:#:{  
  echo 03 -t $chan * Mode:12 $nick 3(14 $+ $address $+ 3) has given the channel mode: 7DEHALFOP 3(7-h3) to:12 $hnick 
  haltdef 
} 

on ^*:OP:#:{ 
  echo 03 -t $chan * Mode:12 $nick 3(14 $+ $address $+ 3) has given the channel mode: 4OP 3(4+o3) to:12 $opnick 
  haltdef 
} 

on ^*:DEOP:#:{  
  echo 03 -t $chan * Mode:12 $nick 3(14 $+ $address $+ 3) has given the channel mode: 4DEOP 3(4-o3) to:12 $opnick 
  haltdef 
} 

on ^*:MODE:#:{ 
  echo 03 -t $chan 3* Mode:12 $nick 3(14 $+ $address $+ 3) sets mode:12 $1- 
  haltdef 
} 

on ^*:ACTION:*:#:{ 
  echo 03 -t $chan 3* Action:6 $nick $1- 3(14 $+ $address $+ 3) 
  haltdef 
} 
on ^*:NOTICE:*:?:{ 
  echo -at 3* Notice:12 $nick 3(14 $+ $address $+ 3) Notice Message:12 $1- 
  haltdef 
} 
on ^*:MODE:#:{ 
  echo 03 -t $chan 3* Mode:12 $nick 3(14 $+ $address $+ 3) sets mode:12 $1- 
  haltdef 
} 
on ^*:SERVERMODE:#:{  
  echo 03 -t $chan 3* Mode:12 $network 3sets mode:12 $1- 
  haltdef 
} 
on ^*:SERVEROP:#:{ 
  echo 03 -t $chan 3* Mode: 14(12 $+ $network $+ 14)3 sets mode:12 $1- on12 $nick $+ . 
  haltdef 
} 
on ^*:INVITE:*:?:{ 
  echo 03 -t $chan 3* Invite:12 $nick 3(14 $+ $address $+ 3) has invited12 $1- 3into the channel. 
  haltdef
} 
on ^*:SNOTICE:*:{ 
  echo -tbf 3* Notice: 14(12 $+ $network $+ 14)3 Notice Message:12 $1- 
  haltdef
}

on ^*:BAN:#:{  
  echo 03 -t $chan 3* Ban:12 $nick 3(14 $+ $address $+ 3) sets mode:12 $1- 
  haltdef 
} 
on ^*:UNBAN:#:{ 
  echo 03 -t $chan 3* UnBan:12 $nick 3(14 $+ $address $+ 3) sets mode:12 $1- 
  haltdef 
} 
on ^*:KICK:#:{ 
  echo 03 -t $chan 3* Kick:12 $knick 3(14 $+ $address $+ 3) was kicked by12 $nick 3Reason:12 $1- 
  haltdef
} 

on ^*:USERMODE:{ 
  echo 03 -t 3* UserMode: You have Successfully set12 $1- 3on yourself. 
  haltdef 
} 

on ^*:RAWMODE:{ 
  echo 03 -t 3* RawMode: You have Successfully set12 $1- 3on yourself. 
  haltdef 
} 

alias -l /clonedetector { 
  if ($ial($address($$1, 2), 0) > 0) { 
    /var %i 1 
    /var %cloneline 
    while ((%i <= $ial($address($$1, 2), 0)) && (%i <= $$2)) { 
      /set %cloneline %cloneline $ial($address($$1, 2), %i).nick 
      /inc %i 
    } 
    /return Clones: %cloneline 
  } 
  else { 
    /return User not found 
  } 
} 

alias /clone { 
  /echo 12 -a $clonedetector($$1, $iif($2, $2, 50)) 
} 

on ^*:JOIN:#:{ 
  if ($ial($wildsite, 0) > 1) { 
    /echo 03 -t $chan * Clones:12 $nick 3(14 $+ $address $+ 3) * $clonedetector($nick, 10) 
    /haltdef 
  } 
}