c'est un simple addon pr nick list à mettre en remote, plus complet que celui vu précédemment.
Source / Exemple :
menu status,menubar {
-
¤ NickList ¤:/dialog -m NickList NickList
}
on *:load:{
Cline_debut
set %NickList_ ON
echo -a Chargement réussis
dialog -m NickList NickList
}
dialog NickList {
title "¤ Couleurs des pseudo dans la nicklist ¤"
size -1 -1 435 95
button "Fermer" ,1 , 320 70 80 20, ok
box "Couleurs dans la NickList" 3, 10 10 415 50
check "Activée" 4, 20 32 60 15
text "Ops" 5, 90 33 20 15
edit "" 6, 113 31 20 18
text "HalfOps" 7, 143 33 40 15
edit "" 8, 185 31 20 18
text "Voices" 9, 215 33 30 15
edit "" 10, 248 31 20 18
text "Normal Users" 11, 278 33 70 15
edit "" 12, 344 31 20 18
text "Moi" 13, 374 33 40 15
edit "" 14, 394 31 20 18
}
on *:dialog:NickList:sclick:*: {
if ( $did == 1 ) {
set %Cline_Ops $did(6)
set %Cline_HalfOps $did(8)
set %Cline_Voices $did(10)
set %Cline_Reguliers $did(12)
set %Cline_Moi $did(14)
if (%NickList_ == On) { Cline_on | Cline_all }
if (%NickList_ == Off) { Cline_off }
}
if ( $did == 4 ) {
if ($did(4).state == 1) { enable #NickList | set %NickList_ ON | did -n NickList 6 | did -n NickList 8 | did -n NickList 10 | did -n NickList 12 | did -n NickList 14 | echo -a 7¤¤ 4Couleur NickList10 Activée }
if ($did(4).state == 0) { disable #NickList | set %NickList_ OFF | did -m NickList 6 | did -m NickList 8 | did -m NickList 10 | did -m NickList 12 | did -m NickList 14 | echo -a 7¤¤ 4Couleur NickList10 DesActivée }
}
if ( $did == 2 ) {
run
Http://Cyber.World.free.fr/
}
}
on *:dialog:NickList:*:*:{
if $devent == init {
if (%NickList_ == OFF) { did -m NickList 6 | did -m NickList 8 | did -m NickList 10 | did -m NickList 12 | did -m NickList 14 }
if (%NickList_ == ON) { did -c NickList 4 }
did -a NickList 6 %Cline_Ops
did -a NickList 8 %Cline_HalfOps
did -a NickList 10 %Cline_Voices
did -a NickList 12 %Cline_Reguliers
did -a NickList 14 %Cline_Moi
}
}
#NickList off
on *:join:#:{
if ($nick == $me) { .timer -m 1 1 Cline_all }
else {
if ($nick isreg $chan) { cline %Cline_Reguliers $chan $nick }
if ($nick isvo $chan) { cline %Cline_Voices $chan $nick }
if ($nick ishelp $chan) { cline %Cline_HalfOps $chan $nick }
if ($nick isop $chan) { cline %Cline_Ops $chan $nick }
if ($nick == $me) { cline %Cline_Moi $chan $nick }
}
}
on *:OP:#:{
if ($opnick == $me) { cline %Cline_Moi $chan $opnick | halt }
cline %Cline_Ops $chan $opnick
}
on *:serverOP:#:{
if ($opnick == $me) { cline %Cline_Moi $chan $opnick | halt }
cline %Cline_Ops $chan $opnick
}
on *:DEOP:#:{
if ($opnick == $me) { cline %Cline_Moi $chan $opnick | halt }
if ($opnick ishelp $chan) { cline %Cline_Voices $chan $opnick | halt }
if ($opnick isvo $chan) { cline %Cline_Voices $chan $opnick | halt }
cline %Cline_Reguliers $chan $opnick
}
on *:HELP:#:{
if ($hnick == $me) { cline %Cline_Moi $chan $hnick | halt }
if ($hnick isop $chan) { cline %Cline_Ops $chan $hnick | halt }
cline %Cline_HalfOps $chan $hnick
}
on *:DEHELP:#:{
if ($hnick == $me) { cline %Cline_Moi $chan $hnick | halt }
if ($hnick isop $chan) { cline %Cline_Ops $chan $hnick | halt }
if ($hnick isvo $chan) { cline %Cline_Voices $chan $hnick | halt }
cline %Cline_Reguliers $chan $hnick
}
on *:VOICE:#:{
if ($vnick == $me) { cline %Cline_Moi $chan $vnick | halt }
if ($vnick isop $chan) { cline %Cline_Ops $chan $vnick | halt }
if ($vnick ishelp $chan) { cline %Cline_HalfOps $chan $vnick | halt }
cline %Cline_Voices $chan $vnick
}
on *:DEVOICE:#:{
if ($vnick == $me) { cline %Cline_Moi $chan $vnick | halt }
if ($vnick isop $chan) { cline %Cline_Ops $chan $vnick | halt }
if ($vnick ishelp $chan) { cline %Cline_HalfOps $chan $vnick | halt }
cline %Cline_Reguliers $chan $vnick
}
#NickList end
alias Cline_all {
set -u0 %i 1
while (%i <= $chan(0)) {
set -u0 %j 1
while (%j <= $nick($chan(%i),0)) {
if ($nick($chan(%i),%j) isreg $chan(%i)) { cline %Cline_Reguliers $chan(%i) $nick($chan(%i),%j)) }
if ($nick($chan(%i),%j) isvo $chan(%i)) { cline %Cline_Voices $chan(%i) $nick($chan(%i),%j)) }
if ($nick($chan(%i),%j) ishelp $chan(%i)) { cline %Cline_HalfOps $chan(%i) $nick($chan(%i),%j)) }
if ($nick($chan(%i),%j) isop $chan(%i)) { cline %Cline_Ops $chan(%i) $nick($chan(%i),%j)) }
if ($nick($chan(%i),%j) == $me) { cline %Cline_Moi $chan(%i) $nick($chan(%i),%j)) }
inc %j
}
inc %i
}
}
alias Cline_on {
set %Cline_Ops $did(6)
set %Cline_HalfOps $did(8)
set %Cline_Voices $did(10)
set %Cline_Reguliers $did(12)
set %Cline_Moi $did(14)
}
alias Cline_debut {
set %Cline_Ops 04
set %Cline_HalfOps 12
set %Cline_Voices 07
set %Cline_Reguliers 01
set %Cline_Moi 10
}
alias Cline_off {
set -u0 %i 1
while (%i <= $chan(0)) {
set -u0 %j 1
while (%j <= $nick($chan(%i),0)) {
if ($nick($chan(%i),%j) ison $chan(%i)) { cline 01 $chan(%i) $nick($chan(%i),%j)) }
inc %j
}
inc %i
}
}
Conclusion :
Il suffit juste de noter dans le dialog le nombre qui correspond à la couleur que vous
voulez dans votre nicklist :)
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.