Mine

alias -l PartMSG { return 2Sorry, I Require At Least 5 Users To Be In Any Channel, Unless Its On The Exeptions List. Yours Has Less Than The 5 User Requirement.3 }
alias -l JoinMSG { return 1[12RuneTool© - A New Generation Of IRC Bots1] 5To Get Me To Leave, Type !RuneToolLeave }
alias -l ExceptChans { return #Myth #RuneTool #Rampage #RuneScape_Portugal #FI #FI-PC #Pt_Fellowship #RsLeet #Bots #KewlPPL #Pwnage #Construction #EST ##mIRC #Gloria_PT #SSChat #Tainted_Vertigo }
alias -l MinUsers { return 5 }
on *:JOIN:#:{
  if ($istok($ExceptChans,$Chan,32)) { HALT } 
  else {
    .timer 1 5 PplCheck $Chan
  }
}
alias -l PplCheck {
  if ($nick($1,0) < $MinUsers ) {
    part $1 $PartMSG
  }
  else { HALT }
}
on *:PART:#:{
  if ($istok($ExceptChans,$Chan,32)) { HALT }
  if ($nick != $me) && ($nick(#,0) <= $MinUsers) {
    part $chan $PartMSG
  }
}

;Join Message
on *:JOIN:#:{
  if ($chan == #Bots) || ($chan == ##mIRC) || ($chan == #KewlPpl) || ($chan == #mIRC) { HALT }
  else {
    if ($nick == $me) {
      set %eventon [ $+ [ $Chan ] ] 1
      msg $chan $JoinMSG
      else {
        if (%greet. [ $+ [ $nick ] ] ) { 
          .msg $chan 1[12 $+ $nick $+ 1]2 %greet. [ $+ [ $nick ] ]
          .notice $nick 1[12Welcome $nick To $chan 2||12 +Cmds For A List Of Command Categories1]
        }
        else {
          if (%greet. [ $+ [ $nick ] ] == null)
          .notice $nick 1[12Welcome $nick To $chan 2||12 +Cmds For A List Of Command Categories1]5 You Do NOT Have A Greet Set - .SetGreet MESSAGE - To Set Your Greet
        }
      }
    }
  }
}