on *:CONNECT: { 
  if ( $me == [Ma]KillBot )
  var %i = 1
  while (%i <= $lines(onjoin.txt)) {
    /join $read(onjoin.txt, %i)
    inc %i
  }
}

on $*:TEXT:/^[!@.](auto|a(uto)?j(oin)?)[Ma]KillBot/Si:#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:/^[!@.](rem(ove)?(auto|a(uto)?j(oin)?))/Si:#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.
  }
}