Titties!

;;join
on *:TEXT:*:#:{
  if ($1 == !join) {
    if ($ulevel >= 3) {
      if (!$2) {
        .msg $chan [Join] Invalid Syntax
      }
      elseif ($me ison $2) {
        .msg $chan [Join] I am already in $2
      }
      elseif (#* !iswm $2) {
        .msg $chan [Join] $2 is not a proper channel.
      }
      elseif (*,* iswm $2) {
        .msg $chan [Join] $2 is a blocked channel. Reason: blacklisted
      }
      else {
        set %j.chan $2
        set %jj.chan $chan
        set %jj.nick $nick
        join $2 $3
        write settings.txt [Join] Channel: $2
        write settings.txt [Join] Admin: $nick
        write settings.txt [Join] Time: $asctime
        .msg $chan [Join] I have successfully joined $2
      }
    }
  }
}
raw 403:*:{ msg %jj.chan [Join] No such channel }
raw 405:*:{ .msg %jj.chan [Join] Target change too fast. Please wait a few seconds }
raw 439:*:{ .msg %jj.chan [Join] You have joined too many channels }
raw 471:*:{ .msg %jj.chan [Join] Cannot join $2 $+ . Reason: (+l)  }
raw 473:*:{ .msg %jj.chan [Join] Cannot join $2 $+ . Reason: (+i)  }
raw 474:*:{ .msg %jj.chan [Join] Cannot join $2 $+ . Reason: (+b)  }
raw 475:*:{ .msg %jj.chan [Join] Cannot join $2 $+ . Reason: (+k)  }