Auto voice is easy, use search next time wink

Code:
on 1:JOIN:#:{
  if ($me isop #) {
    if (%Voice.Count == $null) { inc %Voice.Count 1 | mode # +v $nick }
    if (%Voice.Count < 5) { inc %Voice.Count 1 | mode # +v $nick }
    set -u5 %Voice.Count %Voice.Count
  }
} 
Tested and works!Replace "if ($me isop #) {" with " if ($me isop #your channel) {"

Autokick: first you need to create an badnicks.ini file, like this:
filename=badnicks.ini
line 1 = [kicknick]
line 2 = whore
line3 = gayman
line4 = etc etc
(this will only work this way)
Code:
on 1:JOIN:#:{
  if ($me isop #) {
    if ($nick isin $readini(badnicks.ini,kicknick) { ban #channel $nick | kick #channel $nick [reason] }
  } 
} 
should work, if $nick event works here.
Combined:
Code:
on 1:JOIN:#:{
  if ($me isop #) {
    if (%Voice.Count == $null) { inc %Voice.Count 1 | mode # +v $nick }
    if (%Voice.Count < 5) { inc %Voice.Count 1 | mode # +v $nick }
    set -u5 %Voice.Count %Voice.Count
    if ($nick isin $readini(badnicks,kicknick) { ban #channel $nick | kick #channel $nick [reason]  }
  }
}