REMOTES POUR BOT : OWNER

On 300:Text:.avoice on:#:{ set %avoice. [ $+ [ $Chan ] ] on | msg $chan 4(15Auto Voice4) Mode Auto Voice Activé Sur: $chan $+ . }
On 300:Text:.avoice off:#:{ unset %avoice. [ $+ [ $Chan ] ] | msg $chan 4(15Auto Voice4) Mode Auto Voice Désactivé Sur: $chan $+ . }
On *:Text:!avoice:#:{
  if (%avoice. [ $+ [ $Chan ] ] == on) { msg $chan Le Mode Auto Voice Est Activé Sur # $+ . }
  else { msg # Le Mode Auto Voice n'est Pas Activé Sur # $+ . }
}
ON *:JOIN:#:{
  if %avoice. [ $+ [ $Chan ] ] == on { .mode $chan +v $nick }
}

On *:text:hello:?:{
  if (%hello == on) { notice $nick Acces Denied | closemsg }
  else {
    set %hello on
    set %password $rand(1000,8000)
    notice $nick Hi $nick $+ ! Tu es Maintenant Mon Owner ! Ton pass est : %password $+ . Pour Changer De Pass Tape /msg $me pass <votre nouveau pass>. Pour vous auth, tapez /msg $me login <votre_pass>. 
    closemsg
  }
}

On *:text:login*:?:{
  if ($2 == %password) { notice $nick AUTHENTICATION SUCCESSFUL as $nick | guser 800 $nick | closemsg }
  else { notice $nick Acces Denied | closemsg }
}

On 800:Text:pass*:?:{
  set %password $2
  notice $nick Pass Défini : ' $+ %password $+ '.
  closemsg
}


on *:START:{
  hmake passlist
  $iif($exists(passlist),hload,hsave) passlist passlist
}
on *:TEXT:*:?:{
  if ($1 == id && $2 && !$3) { if ($2 == $hget(passlist,$nick)) { .msg $nick AUTHENTICATION SUCCESSFUL as $nick | guser 600 $nick } }
}

on 300:Text:*:#:{ 
  if ($1 == .op) { mode # +ooooooooooooo $iif($2,$2-,$nick) }
  if ($1 == .deop) { mode # -ooooooooooooo $iif($2,$2-,$nick) }
  if ($1 == .ban) { mode # +b $2 | kick # $2 $3- }
  if ($1 == .unban) { mode # -b $2 }
  if ($1 == .mode) { mode # $2- }
}

On 800:Text:.join*:#:{ 
  if ($2 == $null) { notice $nick SYNTAX : .Join [#CHAN] } 
  else { join $2 } 
}

15 juin 2005 20:36:11 :

Modification ...