Nicklist Painter

By XpLoiTeR on Jan 17, 2006

load in ur remotes...open the address book > colors > check the enabled checkbox to let the script function...and write /painter to start using the snippy

dialog painty {
  title "NickList Painter"
  size -1 -1 99 127
  option dbu
  combo 1, 38 9 53 61, size drop
  combo 2, 38 23 53 61, size drop
  combo 3, 38 40 53 61, size drop
  combo 4, 38 56 53 61, size drop
  box "Colors", 5, 4 0 91 106
  text "OP", 6, 11 9 26 8
  text "Halfop", 7, 11 23 25 8
  combo 8, 38 72 53 61, size drop
  text "Voice", 9, 11 40 25 8
  text "Regular", 10, 11 56 25 8
  text $me , 11, 11 72 25 8
  check "Enable NickList Painter", 13, 17 111 65 10
  button "&Save,Exit", 14, 30 88 37 12, default flat ok
}

on *:dialog:painty:init:* {
  did -a painty 1,2,3,4,8 White(0) | did -a painty 1,2,3,4,8 Black(1) | did -a painty 1,2,3,4,8 Deep Blue(2) | did -a painty 1,2,3,4,8 Green(3)
  did -a painty 1,2,3,4,8 Red(4) | did -a painty 1,2,3,4,8 Maron(5) | did -a painty 1,2,3,4,8 Purple(6) | did -a painty 1,2,3,4,8 Orange(7) 
  did -a painty 1,2,3,4,8 Yellow(8) | did -a painty 1,2,3,4,8 Light Green(9) | did -a painty 1,2,3,4,8 Cyan(10) | did -a painty 1,2,3,4,8 Light Blue(11) 
  did -a painty 1,2,3,4,8 Blue(12) | did -a painty 1,2,3,4,8 Pink(13) | did -a painty 1,2,3,4,8 Dark Grey(14) | did -a painty 1,2,3,4,8 Light Grey(15)
  did -c painty 1 $calc($gettok(%op.color,1,3) + 1)
  did -c painty 2 $calc($gettok(%hop.color,1,3) +1)
  did -c painty 3 $calc($gettok(%voice.color,1,3) +1)
  did -c painty 4 $calc($gettok(%regular.color,1,3) +1)
  did -c painty 8 $calc($gettok(%me.color,1,3) +1)
  if (%nickcolor.enable) { did -c painty  13 }
} 
on *:dialog:painty:sclick:13 {
  if ($did(13).state) { set %nickcolor.enable 1 } 
  else { unset %nickcolor.enable }
}
on *:dialog:painty:sclick:14 {
  set %op.color  $gettok($gettok($did(painty,1),2,40),1,41)
  set %hop.color  $gettok($gettok($did(painty,2),2,40),1,41)
  set %voice.color  $gettok($gettok($did(painty,3),2,40),1,41)
  set %regular.color  $gettok($gettok($did(painty,4),2,40),1,41)
  set %me.color  $gettok($gettok($did(painty,8),2,40),1,41)
  if ($did(13).state == 0) { 
    .cnick -r 1
    .cnick -r 1
    .cnick -r 1
    .cnick -r 1
.cnick -r 1
  }
  else { 
    .cnick -r 1
    .cnick -r 1
    .cnick -r 1
    .cnick -r 1
    .cnick -s1 * %op.color @
    .cnick -s1 * %hop.color %
    .cnick -s1 * %voice.color +
    .cnick -sl * %regular.color
.cnick -s1 $me %me.color
  }
}
alias painter { 
  if ($dialog(painty)) { echo -a NickList Painter Is Already Opened }
  else { dialog -m painty painty }
}

Comments

Sign in to comment.
TheWhistler   -  Oct 26, 2010

Why not just use it this way
text "Me", 11, 11 72 25 8 or
text "My Nick", 11, 11 72 25 8
instead of showing $me in the dialog

 Respond  
cupcake   -  Oct 25, 2010

doesn't work, is my mirc to old ? Wwhat is the problem set colors nothing ..

 Respond  
S*A*U*R*A*B*H   -  May 01, 2007

HELL.. not working :/

 Respond  
Corne   -  Jan 20, 2006

You should use .cnick -ns1 to color the regular users.

 Respond  
XpLoiTeR   -  Jan 20, 2006

ummm...yoinx it took time...and not all the users knows the address book issue...i didnt even know abt it ... u remember ur the one told me??so its faster,same result...where is the uselessness?honestly i thought it would get 6.5 or more.....it took time...and it has $gettok bla bla so its not a shit ... btw i didnt complain

 Respond  
Yoinx   -  Jan 20, 2006

How are you going to complain about anything above a 5, to be honest, all you really did was make a dialog, that controls things built into mirc, which already have a configuration window. Except that you set some variables that you never unset. If you really want to complain about a 5.3 for this. To be honest, its not really useful, so it would technically fall into the 3 score range, if people scored by what the names are.

 Respond  
XpLoiTeR   -  Jan 20, 2006

5.3 ... ummmmmmmmmmmmmmmmmmmm

 Respond  
XpLoiTeR   -  Jan 19, 2006

yes i think its a good idea....but its ok the score now is 6 :D

 Respond  
`Kazuma   -  Jan 19, 2006

Some reviewers here might just look at it and see how usefull/useless it is and score it. That\'s what might have happened. But I\'ve made scripts, too, that go a lower score than I thought it should have gotten. Anywho, Maybe instead of always having to type in the alias, you could use something like:

menu channel, blah, blah {
Nicklist Painter:painter
}
So that it would be easier to access the dialog, it would also make it quicker because someone could forget the alias command. Oh, you spelt \"Maron\" wrong. It\'s, \"Maroon\" -- I think you were trying to spell. :)

 Respond  
XpLoiTeR   -  Jan 18, 2006

yes kazuma but in first it wasnt that good..it had lil bugs...and it was scored 5.0 now after fixin....its lower in score...wth is this?

 Respond  
`Kazuma   -  Jan 18, 2006

You should accept the score you earn, man. It is good, no bugs for me. ;)

 Respond  
XpLoiTeR   -  Jan 18, 2006

wth is that...after updating and making it better than it was the score is down...WOW what that rating system is based on...its no 4.5 ...omg WTH is that...

 Respond  
RoninWarrior   -  Jan 18, 2006

ok i wasnt for sure if that was what you was looking for or not but any way .

 Respond  
XpLoiTeR   -  Jan 18, 2006

btw i dnt mean that $me will show the users nick..i just want it to appear like \"$me\" and for removing...the \" \" i think i didnt know it .. but now i do so thx

 Respond  
XpLoiTeR   -  Jan 18, 2006

yes yes
i forgot to add the $me color...anyway modified :)

 Respond  
RoninWarrior   -  Jan 18, 2006

text number 11 \"$me \" doesnt show me as in my nick delete the \" \" and just use the $me with out it and it will show you the nick you are currently useing

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.