All pastes #83428 Raw Edit

Untitled

public text v1 · immutable
·published 2006-07-09 20:15 UTC
rendered paste body
on *:text:@getabot *:#avidbots:{
  if ($me == AvidServ) {
    if ($chr(44) !isin $2) && ($2 != #) {
      msg # Checking $2 Please wait!
      join $2
      set %chan $2
      set %nick $nick
    }
  }
}
on *:JOIN:#:{
  if ($chan == %chan) && ($nick == $me) {
    if (ChanServ ison %chan) {
      set %sendbot $rand(1,15)
      set %sendbot $iif($mid(AvidBot- $+ %sendbot,10) == $null,$replace(Avidbot- $+ %sendbot,-,-0),$replace(AvidBot- $+ %sendbot,-,-))
      scon %sendbot JOIN %chan
      scon AvidServ part %chan Done checking requirements. Sending %sendbot
      scon AvidServ msg #AvidBots Sending %sendbot to %chan Thank you for using AvidBots.
      unset %chan | unset %nick
    }
  }
}