|
Joined: Oct 2005
Posts: 51
Babel fish
|
OP
Babel fish
Joined: Oct 2005
Posts: 51 |
hello all im have a little bit of trouble well i been using this addon for about 6 months or longer and im getting sick of how the colors are what i mean is when you set colors up
~ & @ are all the same color but % is ok + is ok reg ok
does any1 no of good nick color list out there so everything will be diff color so i dont have 3 status the same ~ & @ and mayb even a diff color for irc ops and if possible away has any seen a addon like this i searched and search the last 2 weeks can find nothing but normal nick color addons i tested a few all the same there was 1 i got it has settings to do ~ & @ % + and irc op and away but none of it worked lol so i tried 2 edit addon i had it not work so i figured i ask here because i got some good answers from here b4
thank you
|
|
|
|
Joined: Aug 2004
Posts: 7,252
Hoopy frood
|
Hoopy frood
Joined: Aug 2004
Posts: 7,252 |
You can forget about that code and use the options available through the address book. /abook - Colors Tab
or if you want to use the script, please post it, or a link to it (if you got it from the internet) so that we can review and modify it per your request.
|
|
|
|
Joined: Oct 2005
Posts: 51
Babel fish
|
OP
Babel fish
Joined: Oct 2005
Posts: 51 |
well here is code i was using and tried 2 edit but not working
on *:load:{
beep
}
menu menubar,channel,query {
NickList Color
.NickList Color Settings:nicklistcl
}
alias nicklistcl {
if ($dialog(background) == $null) { dialog -m background background }
}
alias _vr {
if ($exists(data\setting.ini) == $false) { mkdir data | write -c data\setting.ini }
return $readini data\setting.ini $$1 $$2
}
alias _vw {
if ($exists(data\setting.ini) == $false) { mkdir data | write -c data\setting.ini }
writeini data\setting.ini $$1 $$2 $$3-
}
alias _vrem {
if ($exists(data\setting.ini) == $false) { mkdir data | write -c data\setting.ini }
remini data\setting.ini $$1 $$2
}
dialog background {
title "NickList Colors"
size -1 -1 86 132
option dbu
icon 100, 10 87 172 82
button "Apply", 50, 15 116 25 10
button "Close", 51, 45 116 25 10, default ok
box "NickList Color", 14, 2 1 83 125
check "Enable Color Nicklist", 2, 5 9 62 10
check "Owner", 61, 5 24 24 10
check "AOps", 62, 5 35 22 10
check "Ops", 3, 5 46 22 10
check "Voice", 4, 5 57 27 10
check "Half-ops", 30, 5 68 29 10
check "Regular", 5, 5 79 27 10
check "Own Nick", 6, 5 90 33 10
text "Background", 33, 6 102 32 9
combo 63, 45 24 37 50, drop
combo 64, 45 35 37 50, drop
combo 7, 45 46 37 50, drop
combo 8, 45 57 37 50, drop
combo 12, 45 66 37 50, drop
combo 9, 45 77 37 50, drop
combo 10, 45 88 37 50, drop
combo 11, 45 99 37 50, drop
}
on *:dialog:background:sclick:*:{
if ($did == 2) {
var %xt = 3
:loop
did - $+ $iif($did(2).state,e,b) background %xt
if (%xt < 6) { inc %xt | goto loop }
_vw nicklist switch 0
}
if ($did == 63) { _vw nicklist owner $calc($did(background,63).sel - 1) }
if ($did == 64) { _vw nicklist aops $calc($did(background,64).sel - 1) }
if ($did == 7) { _vw nicklist ops $calc($did(background,7).sel - 1) }
if ($did == 8) { _vw nicklist voice $calc($did(background,8).sel - 1) }
if ($did == 12) { _vw nicklist hops $calc($did(background,12).sel - 1) }
if ($did == 9) { _vw nicklist reg $calc($did(background,9).sel - 1) }
if ($did == 10) { _vw nicklist me $calc($did(background,10).sel - 1) }
if ($did == 30) {
if ($_vr(nicklist,s.hops) == 1) { _vw nicklist s.hops 0 }
else { _vw nicklist s.hops 1 }
}
if ($did == 3) {
if ($_vr(nicklist,s.ops) == 1) { _vw nicklist s.ops 0 }
else { _vw nicklist s.ops 1 }
}
if ($did == 4) {
if ($_vr(nicklist,s.voice) == 1) { _vw nicklist s.voice 0 }
else { _vw nicklist s.voice 1 }
}
if ($did == 5) {
if ($_vr(nicklist,s.reg) == 1) { _vw nicklist s.reg 0 }
else { _vw nicklist s.reg 1 }
}
if ($did == 6) {
if ($_vr(nicklist,s.me) == 1) { _vw nicklist s.me 0 }
else { _vw nicklist s.me 1 }
}
if ($did == 61) {
if ($_vr(nicklist,s.owner) == 1) { _vw nicklist s.owner 0 }
else { _vw nicklist s.owner 1 }
}
if ($did == 62) {
if ($_vr(nicklist,s.aops) == 1) { _vw nicklist s.aops 0 }
else { _vw nicklist s.aops 1 }
}
if ($did == 50) {
cl.apply
}
}
on *:dialog:background:init:*:{
.timer -m 1 1 nl.back
_vrem background window | _vrem background type | _vrem background default
did - $+ $iif($_vr(nicklist,switch),c,u) background 2
nfcolor 7 | nfcolor 8 | nfcolor 9 | nfcolor 10 | nfcolor 11 | nfcolor 12 | nfcolor 63 | nfcolor 64
did -c background 63 $calc($_vr(nicklist,owner) + 1)
did -c background 64 $calc($_vr(nicklist,aops) + 1)
did -c background 7 $calc($_vr(nicklist,ops) + 1)
did -c background 8 $calc($_vr(nicklist,voice) + 1)
did -c background 12 $calc($_vr(nicklist,hops) + 1)
did -c background 9 $calc($_vr(nicklist,reg) + 1)
did -c background 10 $calc($_vr(nicklist,me) + 1)
if ($_vr(nicklist,s.hops) == 1) { did -c background 30 }
if ($_vr(nicklist,s.owner) == 1) { did -c background 61 }
if ($_vr(nicklist,s.aops) == 1) { did -c background 62 }
if ($_vr(nicklist,s.ops) == 1) { did -c background 3 }
if ($_vr(nicklist,s.voice) == 1) { did -c background 4 }
if ($_vr(nicklist,s.reg) == 1) { did -c background 5 }
if ($_vr(nicklist,s.me) == 1) { did -c background 6 }
}
alias -l nl.back {
if ($_vr(background,nicklist) == $null) { _vw background nicklist black }
if ($colour(listbox) == $null) { _vw background nicklist black | did -c background 11 2 }
elseif ($colour(listbox) == 0) { did -c background 11 1 }
elseif ($colour(listbox) == 1) { did -c background 11 2 }
elseif ($colour(listbox) == 2) { did -c background 11 3 }
elseif ($colour(listbox) == 3) { did -c background 11 4 }
elseif ($colour(listbox) == 4) { did -c background 11 5 }
elseif ($colour(listbox) == 5) { did -c background 11 6 }
elseif ($colour(listbox) == 6) { did -c background 11 7 }
elseif ($colour(listbox) == 7) { did -c background 11 8 }
elseif ($colour(listbox) == 8) { did -c background 11 9 }
elseif ($colour(listbox) == 9) { did -c background 11 10 }
elseif ($colour(listbox) == 10) { did -c background 11 11 }
elseif ($colour(listbox) == 11) { did -c background 11 12 }
elseif ($colour(listbox) == 12) { did -c background 11 13 }
elseif ($colour(listbox) == 13) { did -c background 11 14 }
elseif ($colour(listbox) == 14) { did -c background 11 15 }
elseif ($colour(listbox) == 15) { did -c background 11 16 }
}
alias -l chan.l {
var %channum = 0
:findchan
inc %channum 1
var %chan = $chan(%channum)
if (%chan == $null) { goto end }
if ($dialog(background) != $null) { did -i background 43 1 %chan }
goto findchan
:end
}
alias cl.apply {
_vw nicklist switch $did(background,2).state
var %xt = 3
:start
if (%xt < 6) { inc %xt | goto start }
var %xt = 7
:loop
if (%xt < 10) { inc %xt | goto loop }
if ($_vr(nicklist,switch) == 0) { colour listbox 0 }
else colour listbox $calc($did(background,11).sel - 1)
clchans
}
on *:join:#:{
if ($_vr(nicklist,switch) == $null) { _vw nicklist switch 1 }
if ($_vr(nicklist,s.owner) == $null) { _vw nicklist s.owner 1 }
if ($_vr(nicklist,s.aops) == $null) { _vw nicklist s.aops 1 }
if ($_vr(nicklist,s.ops) == $null) { _vw nicklist s.ops 1 }
if ($_vr(nicklist,s.reg) == $null) { _vw nicklist s.reg 1 }
if ($_vr(nicklist,s.voice) == $null) { _vw nicklist s.voice 1 }
if ($_vr(nicklist,s.me) == $null) { _vw nicklist s.me 1 }
if ($_vr(nicklist,owner) == $null) { _vw nicklist owner 63 }
if ($_vr(nicklist,aops) == $null) { _vw nicklist aops 64 }
if ($_vr(nicklist,ops) == $null) { _vw nicklist ops 12 }
if ($_vr(nicklist,voice) == $null) { _vw nicklist voice 8 }
if ($_vr(nicklist,s.hops) == $null) { _vw nicklist s.hops 1 }
if ($_vr(nicklist,reg) == $null) { _vw nicklist reg 3 }
if ($_vr(nicklist,hops) == $null) { _vw nicklist hops 10 }
if ($_vr(nicklist,me) == $null) { _vw nicklist me 4 }
cl.nick $chan $nick
if ($nick == $me) && ($_vr(background,channel) == on) {
if ($exists($_vr(background,channelback)) == $true) { .background - $+ $_vr(background,channeltype) $chan $_vr(background,channelback)" }
elseif ($exists($_vr(background,channelback)) == $false) _vrem background channelback
}
}
on *:part:#:{
if ($nick == $me) { background -x $chan }
}
on *:help:#:cl.nick $chan $hnick
on *:dehelp:#:cl.nick $chan $hnick
on *:deop:#:cl.nick $chan $opnick
on *:devoice:#:cl.nick $chan $vnick
on *:op:#:cl.nick $chan $opnick
on *:serverdeop:#:cl.nick $chan $opnick
on *:serverop:#:cl.nick $chan $opnick
on *:voice:#:cl.nick $chan $vnick
raw 366:*:if ($me ison $2) { cl.loop $2 }
alias -l cl.loop {
var %t = $nick($1,0)
var %t2 = 1
while (%t2 <= %t) { cl.nick $1 $nick($1,%t2) | inc %t2 1 }
}
alias -l clchans {
if ($_vr(nicklist,switch) == 1) {
var %c = $chan(0)
var %c1 = 1
while (%c1 <= %c) { cl.loop $chan(%c1) | inc %c1 1 }
}
}
alias -l cl.nick {
if ($2) {
if ($_vr(nicklist,switch) == 1) {
if ($2 == $me) && ($_vr(nicklist,s.me) == 1) { cline $_vr(nicklist,me) $1 $nick($1,$2) }
elseif ($2 ishop $1) && ($_vr(nicklist,s.hops) == 1) { cline $_vr(nicklist,hops) $1 $nick($1,$2) }
elseif ($2 isop $1) && ($_vr(nicklist,s.ops) == 1) { cline $_vr(nicklist,ops) $1 $nick($1,$2) }
elseif ($2 isowner $1) && ($_vr(nicklist,s.owner) == 1) { cline $_vr(nicklist,owner) $1 $nick($1,$2) }
elseif ($2 isaop $1) && ($_vr(nicklist,s.aops) == 1) { cline $_vr(nicklist,aops) $1 $nick($1,$2) }
elseif ($2 isvoice $1) && ($_vr(nicklist,s.voice) == 1) { cline $_vr(nicklist,voice) $1 $nick($1,$2) }
elseif ($2 isreg $1) && ($_vr(nicklist,s.reg)) { cline $_vr(nicklist,reg) $1 $nick($1,$2) }
else { cline $colour(nick) $1 $nick($1,$2) }
}
}
}
alias -l vcl.nick {
var %a = $nick($active,0)
var %a1 = 1
while (%a1 <= %a) {
if ($nick($active,%a1) isop $active) { cline 3 $1 %a1 }
elseif ($nick($active,%a1) isowner $active) { cline 63 $1 %a1 }
elseif ($nick($active,%a1) isaop $active) { cline 64 $1 %a1 }
elseif ($nick($active,%a1) isvoice $active) { cline 8 $1 %a1 }
elseif ($nick($active,%a1) isreg $active) { cline 7 $1 %a1 }
elseif ($nick($active,%a1) ishop $active) { cline 12 $1 %a1 }
cline 4 $1 $nick($active,$me)
inc %a1 1
}
}
alias flash.off {
.timer91 off
.timer92 off
clchans
}
on *:INPUT:*: {
.timer91 off
.timer92 off
;clchans
}
alias -l nfcolor {
did -r background $1
did -a background $1 White
did -a background $1 Black
did -a background $1 Blue
did -a background $1 Green
did -a background $1 Lightred
did -a background $1 Brown
did -a background $1 Purple
did -a background $1 Orange
did -a background $1 Yellow
did -a background $1 Lightgreen
did -a background $1 Cyan
did -a background $1 Lightcyan
did -a background $1 Lightblue
did -a background $1 Pink
did -a background $1 Grey
did -a background $1 Lightgrey
}
as you can see were i edited i used very high numbers so i wouldnt get any doubles then have conflict well ty for help
|
|
|
|
Joined: Dec 2002
Posts: 417
Fjord artisan
|
Fjord artisan
Joined: Dec 2002
Posts: 417 |
wouldn't it be better to use raw 352 instead of 366? I tried your script but it crashed on me several times in a small channel of 7 nicks
if you use Raw 352 $7 is equal to
* == IRCop @ == Op nick G == Away nick or (set as away) + == Voice nick i == invisible mode x == identified with network H == Here nick or (not set as away) % == Helper nick & == xop ~ == channel owner
Last edited by Othello; 23/07/06 10:13 PM.
Intelligence: It's better to ask a stupid question, then to prove it by not asking....
|
|
|
|
Joined: Oct 2005
Posts: 51
Babel fish
|
OP
Babel fish
Joined: Oct 2005
Posts: 51 |
well i put that raw in Raw 352 $7 but it still dont change color on ~ owner or & sop mayb take another look at code 2 see whats wrong thank you
|
|
|
|
Joined: Oct 2005
Posts: 51
Babel fish
|
OP
Babel fish
Joined: Oct 2005
Posts: 51 |
i edited it alittle
}
if ($did == 63) { _vw nicklist ~ $calc($did(background,63).sel - 1) }
if ($did == 64) { _vw nicklist & $calc($did(background,64).sel - 1) }
if ($did == 7) { _vw nicklist @ $calc($did(background,7).sel - 1) }
if ($did == 8) { _vw nicklist + $calc($did(background,8).sel - 1) }
if ($did == 12) { _vw nicklist % $calc($did(background,12).sel - 1) }
if ($did == 9) { _vw nicklist reg $calc($did(background,9).sel - 1) }
if ($did == 10) { _vw nicklist me $calc($did(background,10).sel - 1) }
if ($did == 30) {
if ($_vr(nicklist,s.%) == 1) { _vw nicklist s.% 0 }
else { _vw nicklist s.% 1 }
}
if ($did == 3) {
if ($_vr(nicklist,s.@) == 1) { _vw nicklist s.@ 0 }
else { _vw nicklist s.@ 1 }
}
if ($did == 4) {
if ($_vr(nicklist,s.+) == 1) { _vw nicklist s.+ 0 }
else { _vw nicklist s.+ 1 }
}
if ($did == 5) {
if ($_vr(nicklist,s.reg) == 1) { _vw nicklist s.reg 0 }
else { _vw nicklist s.reg 1 }
}
if ($did == 6) {
if ($_vr(nicklist,s.me) == 1) { _vw nicklist s.me 0 }
else { _vw nicklist s.me 1 }
}
if ($did == 61) {
if ($_vr(nicklist,s.~) == 1) { _vw nicklist s.~ 0 }
else { _vw nicklist s.~ 1 }
}
if ($did == 62) {
if ($_vr(nicklist,s.&) == 1) { _vw nicklist s.& 0 }
else { _vw nicklist s.& 1 }
}
if ($did == 50) {
----------------------------------------------------------
did -c background 63 $calc($_vr(nicklist,~) + 1)
did -c background 64 $calc($_vr(nicklist,&) + 1)
did -c background 7 $calc($_vr(nicklist,@) + 1)
did -c background 8 $calc($_vr(nicklist,+) + 1)
did -c background 12 $calc($_vr(nicklist,%) + 1)
did -c background 9 $calc($_vr(nicklist,reg) + 1)
did -c background 10 $calc($_vr(nicklist,me) + 1)
if ($_vr(nicklist,s.~) == 1) { did -c background 61 }
if ($_vr(nicklist,s.&) == 1) { did -c background 62 }
if ($_vr(nicklist,s.%) == 1) { did -c background 30 }
if ($_vr(nicklist,s.@) == 1) { did -c background 3 }
if ($_vr(nicklist,s.+) == 1) { did -c background 4 }
if ($_vr(nicklist,s.reg) == 1) { did -c background 5 }
if ($_vr(nicklist,s.me) == 1) { did -c background 6 }
}
------------------------------------------------------------
raw 352:*:if ($me ison $2) { cl.loop $2 }
alias -l cl.loop {
var %t = $nick($1,0)
var %t2 = 1
while (%t2 <= %t) { cl.nick $1 $nick($1,%t2) | inc %t2 1 }
}
alias -l clchans {
if ($_vr(nicklist,switch) == 1) {
var %c = $chan(0)
var %c1 = 1
while (%c1 <= %c) { cl.loop $chan(%c1) | inc %c1 1 }
}
}
alias -l cl.nick {
if ($2) {
if ($_vr(nicklist,switch) == 1) {
if ($2 == $me) && ($_vr(nicklist,s.me) == 1) { cline $_vr(nicklist,me) $1 $nick($1,$2) }
elseif ($2 isowner $1) && ($_vr(nicklist,s.~) == 1) { cline $_vr(nicklist,~) $1 $nick($1,$2) }
elseif ($2 isprotect $1) && ($_vr(nicklist,s.&) == 1) { cline $_vr(nicklist,&) $1 $nick($1,$2) }
elseif ($2 ishop $1) && ($_vr(nicklist,s.%) == 1) { cline $_vr(nicklist,%) $1 $nick($1,$2) }
elseif ($2 isop $1) && ($_vr(nicklist,s.@) == 1) { cline $_vr(nicklist,@) $1 $nick($1,$2) }
elseif ($2 isvoice $1) && ($_vr(nicklist,s.+) == 1) { cline $_vr(nicklist,+) $1 $nick($1,$2) }
elseif ($2 isreg $1) && ($_vr(nicklist,s.reg)) { cline $_vr(nicklist,reg) $1 $nick($1,$2) }
else { cline $colour(nick) $1 $nick($1,$2) }
}
}
those were a few places were i change status to the status symbols everything works but the owner\founder ~ and the Sop & now in these 2 lines of code
elseif ($2 isowner $1) && ($_vr(nicklist,s.~) == 1) { cline $_vr(nicklist,~) $1 $nick($1,$2) }
elseif ($2 isprotect $1) && ($_vr(nicklist,s.&) == 1) { cline $_vr(nicklist,&) $1 $nick($1,$2) }
i tried owner and founder i get error in status window of mirc when i use founder and i tried protect and aop sop mayb even xop any help would be great ful ty
|
|
|
|
|