Auto-voicing on Capped up names ..only.

I'm looking for a script that will auto voice a capped up name upon entering a channel and devoice them if they should lowercase their name within the confines of said channel... is that possible?

Any help would greatly be appreciated...

Thank you

Change #mychannel to your channel name.
This only works if you are opped.

Code:

on @*:JOIN:#mychannel: {
  if ($nick isupper) mode $chan +v $nick
}

on @*:NICK:#mychannel: {
  if ($newnick !isupper) mode $chan -v $newnick
}

Slight correction to the ON NICK event, as it's not channel specific.

Code:

on *:NICK:{
  if ($newnick !isupper) && ($me isop #mychannel) .mode $v2 -v $newnick
}

My thanks to you both for your help - I appreciate it.

I'll definitely give it a whirl.

Again, thank you.