ANTITOUT :-)

on *:Start:*:{ 
set %version ¢ÅRþ?§¢ßYþ? APRIL 2003 - Visit htpp://www.onlyu.fr.st 
}
on *:OPEN:*:*:{ .msg $nick salut, si c urgent tapes 4 AIDE  sinon, merci de me laisser ton message 
  
haltdef }

on *:TEXT:*HELP*:PRIVMSG:{ /splay sounds\pv.wav 
if ( AIDE == $1 ) { .splay sounds\crie.wav } }

on *:NOTICE:*:{ set %texte.notify.none No one in your notify list is on IRC
  if ( No isin %texte.notify.none && one isin %texte.notify.none && your isin %texte.notify.none ) { echo -a personne de ta liste de notifiés n'est sur l'IRC }
}

set %version Carpe$cript_November_2003
;************ antiban **************
on *:rawmode:#: {
  If ($nick == $me) { halt }
  If (( +b isin $1- ) && ( $me isin $1- )) {
    set %chan $chan
    set %akicker $nick
    msg chanserv unban %chan $me
    join %chan
    Mode # +o $me
    msg chanserv op $chan $me
    timer 1 1 Mode $chan +b %akicker 
    timer 1 1 Mode $chan +b $mask($address(%akicker,2),7)
    timer 1 1 Mode $chan +b $address ( %akicker ,0 )
    timer 1 1 kick $chan $nick Pas De Ban Sur MOI ! ( Antikick Rawmode )
  }
}

on *:rawmode:#: {
  If ($nick == $me) { halt }
  If (( ban isin $1- ) && ( $me isin $1- )) {
    set %chan $chan
    set %akicker $nick
    msg chanserv unban %chan $me
    join %chan
    Mode # +o $me
    msg chanserv op $chan $me
    timer 1 1 Mode $chan +b %akicker 
    timer 1 1 Mode $chan +b $mask($address(%akicker,2),7)
    timer 1 1 Mode $chan +b $address ( %akicker ,0 )
    timer 1 1 kick $chan $nick Pas De Ban Sur MOI ! ( Antikick Rawmode )
  }
}

on *:rawmode:#:{  If ($nick == $me) { halt }
  If (( kick isin $1- ) && ( $me isin $1- )) {
    set %chan $chan
    set %akicker $nick
    msg chanserv unban %chan $me
    join %chan
    Mode # +o $me
    msg chanserv op $chan $me
    timer 1 1 Mode $chan +b %akicker 
    timer 1 1 Mode $chan +b $mask($address(%akicker,2),7)
    timer 1 1 Mode $chan +b $address ( %akicker ,0 )
    timer 1 1 kick $chan $nick Pas De Ban Sur MOI ! ( Antikick Rawmode )
} }

on *:kick:#:{ 
  if ($knick == $me) { set %Akicker $nick | set %chanKick $chan | goto kickprotect }
  else { halt }
  :kickprotect
  join %chanKick
  .msg chanserv op $chan $me
  .msg $chan op
  .msg $chan kick sur %Akicker
  .kick %chanKick %Akicker [antiKiCk %version ] ! 
}


on *:MODE:#rougedune: {
  if ((i isin $1-) || (k isin $1-) || (l isin $1-) || (R isin $1-) || (z isin $1-) || (L isin $1-)) {
    /notice $nick mode ( $right( $1- ,-1) ) interdit !! 
    /mode $chan - $+ $right( $1- ,-1)
  }
}