Discussion :

[1toumou1]

je cherche a avoir la première lettre d'une couleur et en majuscule et le reste en noir par default

j'ai réussi a avoir la majuscule et le couleur mais sur toute la phrase pas que sur la première lettre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Menu channel {
  Choisir ma couleur:/macouleur
}
On 1:input:*:{
  %codecouleur = %nbre
  %ecriture = %codecouleur $+ $1- $1-
  If ($left($1-,1) != !) && ($left($1-,1) != /) { say %codecouleur $+($upper($left($1-,1)),$right($1-,$calc($len($1-) - 1))) | halt }
}
Dialog CouleursPerm {
  Title Ma Couleur
  Option dbu
  Size -1 -1 120 40
  Box "Choix de couleur" ,1, 5 5 50 25
  Edit %nbre ,2, 10 14 20 12
  Button "Valider" ,10, 65 17 45 12,ok
}
On *:dialog:CouleursPerm:sclick:10:{
  Set %nbre $did(2)
  Echo -a %nbre Couleur Activée
}

alias macouleur dialog -m CouleursPerm CouleursPerm

merci d'avance

merci a Wims pour m'avoir aidé
le script est

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
on *:input:*:if (!$istok(/.!,$left($1,1),46)) { msg $active $+($chr(3),couleur,$upper($left($1,1)),$chr(3),$mid($1-,2-)) | haltdef }

ou couleur est le chiffre de la couleur voulu sur la première lettre
voilou
pour choisir la couleur plus facilement

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Menu channel {
  Choisir ma couleur:/macouleur
}

on *:input:*:if (!$istok(/.!,$left($1,1),46)) { msg $active $+($chr(3),%nbre,$upper($left($1,1)),$chr(3),$mid($1-,2-)) | haltdef }

Dialog CouleursPerm {
  Title Ma couleur
  Option dbu
  Size -1 -1 120 40
  Box "Choix de couleur" ,1, 5 5 50 25
  Edit %nbre ,2, 10 14 20 12
  Button "Valider" ,10, 65 17 45 12,ok
}

On *:dialog:CouleursPerm:sclick:10:{
  Set %nbre $did(2)
  Echo -a %nbre Couleur Activée
}

Alias macouleur dialog -m CouleursPerm CouleursPerm

clique droit dans la fenêtre du channel et choisir ma couleur pouis voila la couleur de votre 1ère lettre est changé

[Altor]

Pour préciser la nature de l'erreur aux internautes qui passent sur ce forum, la raison pour laquel le code affichais une majuscule à chaque mot est simple: sur le premier code, la ligne:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

  If ($left($1-,1) != !) && ($left($1-,1) != /) { say %codecouleur $+($upper($left($1-,1)),$right($1-,$calc($len($1-) - 1))) | halt }

contient une erreur. C'est l'erreur de la balise "$upper($left($1-,1))". L'identificateur $1- le tiret signifie tous les mots a partir du 1 eme mot. Pour sélectionner uniquement le premier mot, il faut enlever le tiret, ce qui affiche donc:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

  If ($left($1-,1) != !) && ($left($1-,1) != /) { say %codecouleur $+($upper($left($1,1)),$right($1-,$calc($len($1-) - 1))) | halt }

Ce qui, si on décortique les modifications, permet à la balise $upper($left($1,1)) de ne sélectionner la première lettre du premier mot de la phrase uniquement.

Voilà.