Gestion de couleurs

Contenu du snippet

Alors c'est mon tout premier code couleur (alors vous moquez pas svp). Il n'ya que les options principales : ecriture, fond, souligné et gras (mais bon c'est déjà pas mal quoi :P)

Source / Exemple :


menu menubar,channel {
  Couleurs : /dialog -m coul coul
}

dialog coul {
  title "Ecritures couleur par ---Anonyme---"
  size -1 -1 227 222
  option dbu
  box "Ecriture", 1, 3 4 221 50
  button "Blanc", 2, 7 11 37 12, flat
  button "Noir", 3, 51 11 37 12, flat
  button "Bleu foncé", 4, 95 11 37 12, flat
  button "Vert", 5, 139 11 37 12, flat
  button "Rouge", 6, 183 11 37 12, flat
  button "Marron", 7, 7 25 37 12, flat
  button "Violet", 8, 51 25 37 12, flat
  button "Orange", 9, 95 25 37 12, flat
  button "Jaune", 10, 139 25 37 12, flat
  button "Vert clair", 11, 183 25 37 12, flat
  button "Cyan", 12, 7 39 37 12, flat
  button "Bleu clair", 13, 51 39 37 12, flat
  button "Bleu marine", 14, 95 39 37 12, flat
  button "Rose", 15, 139 39 37 12, flat
  button "Gris", 16, 183 39 37 12, flat
  box "Fond", 17, 3 57 221 50
  button "Blanc", 18, 7 64 37 12, flat
  button "Noir", 19, 51 64 37 12, flat
  button "Bleu foncé", 20, 95 64 37 12, flat
  button "Vert", 21, 139 64 37 12, flat
  button "Rouge", 22, 183 64 37 12, flat
  button "Marron", 23, 7 78 37 12, flat
  button "Violet", 24, 51 78 37 12, flat
  button "Orange", 25, 95 78 37 12, flat
  button "Jaune", 26, 139 78 37 12, flat
  button "Vert clair", 27, 183 78 37 12, flat
  button "Cyan", 28, 7 92 37 12, flat
  button "Bleu clair", 29, 51 92 37 12, flat
  button "Bleu marine", 30, 95 92 37 12, flat
  button "Rose", 31, 139 92 37 12, flat
  button "Gris", 32, 183 92 37 12, flat
  box "Avant et après", 33, 3 110 221 50
  text "Texte Avant :", 34, 26 132 33 8
  edit %Avant, 35, 59 131 41 10, autohs
  text "Texte Après :", 36, 117 132 34 8
  edit %Après, 37, 151 131 41 10, autohs
  box "Autres Options", 38, 3 163 221 48
  text "Gras", 39, 44 179 18 8
  text "Souligné", 40, 44 192 25 8
  button "Activer", 41, 93 176 37 12
  button "Désactiver", 42, 141 176 37 12
  button "Activer", 43, 93 190 37 12
  button "Désactiver", 44, 141 190 37 12
  button "OK", 45, 3 213 221 8, flat ok
}

on 1:dialog:coul:sclick:02 { set %Ec.Coul 0 }
on 1:dialog:coul:sclick:03 { set %Ec.Coul 1 }
on 1:dialog:coul:sclick:04 { set %Ec.Coul 2 }
on 1:dialog:coul:sclick:05 { set %Ec.Coul 3 }
on 1:dialog:coul:sclick:06 { set %Ec.Coul 4 }
on 1:dialog:coul:sclick:07 { set %Ec.Coul 5 }
on 1:dialog:coul:sclick:08 { set %Ec.Coul 6 }
on 1:dialog:coul:sclick:09 { set %Ec.Coul 7 }
on 1:dialog:coul:sclick:10 { set %Ec.Coul 8 }
on 1:dialog:coul:sclick:11 { set %Ec.Coul 9 }
on 1:dialog:coul:sclick:12 { set %Ec.Coul 10 }
on 1:dialog:coul:sclick:13 { set %Ec.Coul 11 }
on 1:dialog:coul:sclick:14 { set %Ec.Coul 12 }
on 1:dialog:coul:sclick:15 { set %Ec.Coul 13 }
on 1:dialog:coul:sclick:16 { set %Ec.Coul 14 }

on 1:dialog:coul:sclick:18 { set %Ec.coul.fd 0 | set %Ec.coul.fd2 ,0 }
on 1:dialog:coul:sclick:19 { set %Ec.coul.fd 1 | set %Ec.coul.fd2 ,1 }
on 1:dialog:coul:sclick:20 { set %Ec.coul.fd 2 | set %Ec.coul.fd2 ,2 }
on 1:dialog:coul:sclick:21 { set %Ec.coul.fd 3 | set %Ec.coul.fd2 ,3 }
on 1:dialog:coul:sclick:22 { set %Ec.coul.fd 4 | set %Ec.coul.fd2 ,4 }
on 1:dialog:coul:sclick:23 { set %Ec.coul.fd 5 | set %Ec.coul.fd2 ,5 }
on 1:dialog:coul:sclick:24 { set %Ec.coul.fd 6 | set %Ec.coul.fd2 ,6 }
on 1:dialog:coul:sclick:25 { set %Ec.coul.fd 7 | set %Ec.coul.fd2 ,7 }
on 1:dialog:coul:sclick:26 { set %Ec.coul.fd 8 | set %Ec.coul.fd2 ,8 }
on 1:dialog:coul:sclick:27 { set %Ec.coul.fd 9 | set %Ec.coul.fd2 ,9 }
on 1:dialog:coul:sclick:28 { set %Ec.coul.fd 10 | set %Ec.coul.fd2 ,10 }
on 1:dialog:coul:sclick:29 { set %Ec.coul.fd 11 | set %Ec.coul.fd2 ,11 }
on 1:dialog:coul:sclick:30 { set %Ec.coul.fd 12 | set %Ec.coul.fd2 ,12 }
on 1:dialog:coul:sclick:31 { set %Ec.coul.fd 13 | set %Ec.coul.fd2 ,13 }
on 1:dialog:coul:sclick:32 { set %Ec.coul.fd 14 | set %Ec.coul.fd2 ,14 }

on 1:dialog:coul:sclick:41 { set %gras  }
on 1:dialog:coul:sclick:42 { set %gras  }
on 1:dialog:coul:sclick:43 { set %souligné  }
on 1:dialog:coul:sclick:44 { set %souligné  }

on 1:dialog:coul:edit:35 { set %Avant $did(coul,35) }
on 1:dialog:coul:edit:37 { set %Après $did(coul,37) }

on *:INPUT:*:{ 
  if (%Ec.coul != $null ) {
    if (! isin $1) { goto fin } 
    if ( / isin $1 ) { goto fin }  
    msg $active   $+ %Avant   $+ %Ec.coul $+ %Ec.coul.fd2 $+ %gras $+ %souligné $1-   %Après
    haltdef  
    :fin
  }  
}

Conclusion :


Bah voilou vous mettez ça en remote et dans le menu bar vous cliquez sur "couleurs"

A voir également

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.