All pastes #719099 Raw Edit

Anonymous

public text v1 · immutable
#719099 ·published 2007-09-28 22:49 UTC
rendered paste body
on *:CONNECT: { 
  if ( $me == [Ma]KillBot )
  var %i = 1
  while (%i <= $lines(onjoin.txt)) {
    /join $read(onjoin.txt, %i)
    inc %i
  }
}

on *:TEXT:!autojoin [Ma]KillBot*:#KillBot: { 
  if ( $nick isop #killbot ) || ( $nick ishop #killBot ) {
    if ((!$2) || ($3)) { /notice $nick 7[JOIN]14 Incorrect Syntax: 7!autojoin #channel
    }
    elseif $read(onjoin.txt, w, $($+($2),2)) { /notice $nick 7[JOIN]14 Sorry $nick $+ ,7 $2 14 is already on my autojoin list.
    }
    else {
      /write onjoin.txt $2
      /msg $2 7[JOIN] $2 14 was added to my autojoin list by7 $nick $+ .
      /notice $nick 7[JOIN]14 Thank you.7 $2 14has now been added to my autojoin list.
    }
  }
  else { /notice $nick 7[JOIN] 14You do not have permissions to do that.
  }
}

on *:TEXT:removeautojoin [MA]KillBot:#KillBot: { 
  if ( $nick isop #killBot ) || ( $nick ishop #killBot ) {
    if ((!$2) || ($3)) { /notice $nick 7[JOIN]14 Incorrect Syntax: 7!removeautojoin #channel
    }
    elseif !$read(onjoin.txt, w, $($+($2),2)) { /notice $nick 7[JOIN]14 Sorry $nick $+ ,7 $2 14 is not on my autojoin list.
    }
    else { 
      /write $($+(-ds,$2),2) onjoin.txt
      /msg $2 7[JOIN] $2 14 was removed from my autojoin list by7 $nick $+ .
      /notice $nick 7[JOIN]14 Thank you.7 $2 14has now been removed from my autojoin list.
    }
  }
  else { /notice $nick 7[JOIN] 14You do not have permissions to do that.
  }
}