Works great, tested it looked interesting, Good Job Cheiron.

hi kohinoor .. which version are you using.. my script or the edit from Jethro_ or EL's ?

ehhhh.... why can't i get it to work? help

@Taerar: You can do it this way:

on @!*:JOIN:#channel: {
  var %x = $isupper($left($regsubex($nick,/\W+/g,$null),1))
  mode $chan $iif(!%x,-v $nick,+v $nick)
}
on !@*:NICK: {
  var %x = $isupper($left($regsubex($newnick,/\W+/g,$null),1))
  if ($newnick ison #channel) && (%x) { mode #channel $iif(%x,+v $newnick) }
  else { mode #channel -v $newnick } 
}

Change #channel to your actual channel name

#uppercheck on

alias -l _c return #channel
alias startwithupper {
  if ( $1 ) {
    return $isupper($left($regsubex($$1,/\W+/g,$null),1))
  }
  else return $true
}

on *:JOIN:#channel:{
  if ( $startwithupper($nick) == $true ) {
    mode $_c +v $nick
  }
}

on *:NICK:{
  if ( ( $startwithupper($newnick) == $true ) && ( $newnick !isvoice $_c ) ) {
    ; New nick is with upper case and previous is unvoiced
    mode $_c +v $newnick
  }
  if ( ( $startwithupper($newnick) == $false ) && ( $newnick isvoice $_c ) ) {
    ; New nick is with lower case and previous is voiced
    mode $_c -v $newnick
  }
}

#uppercheck end

there ya go :D

I've been playing with this script but I am at ends, I want it to do the opposite. I want it to voice upper case names and then devoice if they change to lower.

• Rips hair out * x.x;

im totally green about scripts so im easy to impress, but i love this thing. thanks :)

many thanks for the feedback ToadKing. much appreciated my more unique snippets have found a working home heh. :)

Works like a charm! Thanks a million and keep up the good work.

lol yeah i think i ll have to regex Perv outta connecting to my server tho lol.An an thanks i ll post a code some time soon i think.`-.-

hehehe.. well as avenue q sang... \"the internet is for porn\" so why not have Perv instead of Guest or Anon lol. thanks for the rating and welcome back :)

Yes works.Nice nick selection btw XD

Yes. the first thing the script does is look for the first Letter of the nick. it will ignore anything before the first letter ( the ^ { [ ` ) etc. then it decides whether the first letter is a Capital or not. if it is not a capital, then it will give a voice. if the letter is a capital then it will not voice it. if however the nick changes from a lowercased to an upper case or vice versa, then the script will auto voice or devoice accordingly as per this example..

Ahh nice like i said in the PM i sent you back,very unique as well.Ah an i was messin around for a few more minutes an i think you can make this even shorter.I made this in like a few minutes 2 lol i just thought of it after i sent the PM so i ll post it here.:

;Change the #channelname to a channel you have op in.
on @*:NICK:{
  if ($regex($newnick,/^[A-Z]/) == 1) { 
    mode #channelname +v $newnick
  }
  else {
    mode #channelname -v $nick
  }
}
on @*:JOIN:#channelname:{
  if ($regex($nick,/^[A-Z]/) == 1) {
    mode $chan +v $nick
  }
}

Tested it a few time seems to work.Good stuff anyways nice an refreshing to see codes done differently.\"Rate it or Hate it?\"...7/10.`-.-

P.S: Yea can add a loop to voice an devoice for multi channels depending on how many channel your bots on i guess.

The regex works, I havent tested your script.

nods still a bit out of my comprehension atm but i am slowly getting there on the learning side of things. just struggling to grasp the more advanced stuff atm. but appreciate the feedback as i do have a good readup on the help files on comments made by people.

many thanks Lindrian :)

ps.. did you test it at all to see it working?

ah.
You could just use:
$regex(nick,$1,/(\\w)/)
and
$isupper($regml(nick,1))

some nicks obviously are taken so in order to keep the nick, people use characters infront of the nick.. ie.. ^helen {helen} [helen] `helen etc..... what the script is doing is ignoring those characters until it finds the first letter. then it checks whether it is upper or lower case. if it is lowercase, then mode +v is given.. on change to an Uppercase letter at the start of the name.. the script will remove the voice. hope that clears it up.. the regex is there to sift through the code.. this was the original

uppercheck on

alias startwithupper {
if ( $1 == $null ) {
return $false
}
return $isupper($left($$1,1))
}

on @*:JOIN:#Channel:{
if ( $startwithupper($nick) == $true ) {
mode #Channel +v $nick
}
}

on @*:NICK:{
if ( ( $startwithupper($newnick) == $true ) && ( $newnick !isvoice #Channel ) ) {
; New nick is with upper case and previous is unvoiced
mode #Channel +v $newnick
}
if ( ( $startwithupper($newnick) == $false ) && ( $newnick isvoice #Channel ) ) {
; New nick is with lower case and previous is voiced
mode #Channel -v $newnick
}
}

uppercheck end

but that was for an uppercase nick getting the voice. sdamon did the debug for me with help from Warder to clean it up.\"i\'ve updated your code to check $1 whilst removing characters such as ` and {. I\'ve also dumped that long channel name into a local alias ($_c) to return it; makes it easier and cleaner\"

hope that answers your questions :)

I dont get this alias

alias startwithupper {
  if ( $1 ) {
    return $isupper($left($regsubex($$1,/\\W+/g,$null),1))
  }
  else return $false
}

Whats it supposed to do? Why do you use regsubex?