Accueil > > > PANNEAU DE CONFIGURATION POUR CHANGER D'ÉCRITURE
PANNEAU DE CONFIGURATION POUR CHANGER D'ÉCRITURE
Information sur la source
Description
Bonjour, c'est un petit panneau de configuration pour la couleur d'écriture d'un script mais complet à la fois. Pour le mettre dans votre script, faites un C/C dans vos remotes. (dans une nouvelle fenêtre de préférence)
Source
- ;Pour l'ouvir allez ensuite dans votre menubar ;)
- menu menubar {
- Couleur d'écriture:/dialog -m couleurs couleurs
- }
- dialog couleurs {
- title "Changer de couleur d'écriture"
- size 1 -1 300 400 350
- text "Choisis la couleur:" 2, 100 5 90 19
- text "Première lettre:" 3, 100 25 90 19
- button "Rouge" 4, 100 40 90 19
- button "Bleu" 5, 100 60 90 19
- button "Vert" 6, 100 80 90 19
- button "Noire" 7, 100 100 90 19
- text "Texte:" 8, 100 180 90 19
- button "Noir" 9, 100 195 90 19
- button "Bleu" 10, 100 215 90 19
- button "Rouge" 11, 100 235 90 19
- button "Vert" 12, 100 255 90 19
- button "OK" 13, 100 365 90 30, ok
- button "Gras" 14, 5 55 90 19
- button "Sans gras" 15, 5 75 90 19
- text "Gras/Sans gras:" 16, 5 25 90 30
- text "Gras text/Sans gras:" 17, 5 180 95 30
- button "Gras" 18, 5 210 90 19
- button "Sans gras" 19, 5 230 90 19
- text "Souligné/Pas souligné:" 20, 210 25 90 28
- button "Souligné" 21, 195 55 90 19
- button "Pas souligné" 22, 195 75 90 19
- text "Souligner le text/Pas [...] :" 23, 195 180 90 28
- button "Souligner" 24, 195 210 90 19
- button "Pas souligner" 25, 195 230 90 19
- button "Réinitialiser" 26, 5 365 90 30
- button "Tester" 27, 195 365 90 30
- button "Gris" 28, 100 120 90 19
- button "Orange" 29, 100 140 90 19
- button "Violet" 30, 100 160 90 19
- button "Gris" 31, 100 275 90 19
- button "Orange" 32, 100 295 90 19
- button "Violet" 33, 100 315 90 19
- }
- on *:dialog:couleurs:sclick:*:{
- if ($did == 1) { /dialog -m couleurs couleurs }
- if ($did == 4) {
- set %premierelettre 4
- }
- if ($did == 5) {
- set %premierelettre 12
- }
- if ($did == 6) {
- set %premierelettre 3
- }
- if ($did == 7) {
- set %premierelettre 1
- }
- if ($did == 9) {
- set %text 1
- }
- if ($did == 10) {
- set %text 12
- }
- if ($did == 11) {
- set %text 4
- }
- if ($did == 12) {
- set %text 3
- }
- if ($did == 14) {
- set %graspl
- }
- if ($did == 15) {
- set %graspl
- }
- if ($did == 18) {
- set %grastext
- }
- if ($did == 19) {
- set %grastext
- }
- if ($did == 21) {
- set %soulettre
- }
- if ($did == 22) {
- set %soulettre
- }
- if ($did == 24) {
- set %soutext
- }
- if ($did == 25) {
- set %soutext
- }
- if ($did == 26) {
- unset %soulettre
- unset %premierelettre
- unset %graspl
- unset %text
- unset %grastext
- unset %soutext
- echo -at Couleurs réinitialisées - Couleur par défaut
- }
- if ($did == 27) {
- echo -at 4(Test de la couleur) %soulettre $+ %premierelettre $+ %graspl $+ N $+ %soulettre $+ %graspl $+ %text $+ %grastext $+ %soutext $+ at0_Script Color
- }
- if ($did == 28) {
- set %premierelettre 14
- }
- if ($did == 29) {
- set %premierelettre 7
- }
- if ($did == 30) {
- set %premierelettre 6
- }
- if ($did == 31) {
- set %text 14
- }
- if ($did == 32) {
- set %text 7
- }
- if ($did == 33) {
- set %text 6
- }
- }
- on *:input:*: {
- if ($left($1-,1) != /) && ($left($1-,1) != !) && ($left($1-,1) != =) && ($left($1-,1) != &) && ($left($1-,1) != ^) && ($left($1-,1) != -) && ($left($1-,1) != +) && ($left($1-,1) != :) && ($left($1-,1) != ;) {
- say $+(%soulettre $+ %premierelettre $+ %graspl $+ $left($1-,1)) $+ $+ %soulettre $+ %graspl $+ %text $+ %grastext $+ %soutext $+ $mid($1-,2)) $+ | halt
- }
- }
;Pour l'ouvir allez ensuite dans votre menubar ;)
menu menubar {
Couleur d'écriture:/dialog -m couleurs couleurs
}
dialog couleurs {
title "Changer de couleur d'écriture"
size 1 -1 300 400 350
text "Choisis la couleur:" 2, 100 5 90 19
text "Première lettre:" 3, 100 25 90 19
button "Rouge" 4, 100 40 90 19
button "Bleu" 5, 100 60 90 19
button "Vert" 6, 100 80 90 19
button "Noire" 7, 100 100 90 19
text "Texte:" 8, 100 180 90 19
button "Noir" 9, 100 195 90 19
button "Bleu" 10, 100 215 90 19
button "Rouge" 11, 100 235 90 19
button "Vert" 12, 100 255 90 19
button "OK" 13, 100 365 90 30, ok
button "Gras" 14, 5 55 90 19
button "Sans gras" 15, 5 75 90 19
text "Gras/Sans gras:" 16, 5 25 90 30
text "Gras text/Sans gras:" 17, 5 180 95 30
button "Gras" 18, 5 210 90 19
button "Sans gras" 19, 5 230 90 19
text "Souligné/Pas souligné:" 20, 210 25 90 28
button "Souligné" 21, 195 55 90 19
button "Pas souligné" 22, 195 75 90 19
text "Souligner le text/Pas [...] :" 23, 195 180 90 28
button "Souligner" 24, 195 210 90 19
button "Pas souligner" 25, 195 230 90 19
button "Réinitialiser" 26, 5 365 90 30
button "Tester" 27, 195 365 90 30
button "Gris" 28, 100 120 90 19
button "Orange" 29, 100 140 90 19
button "Violet" 30, 100 160 90 19
button "Gris" 31, 100 275 90 19
button "Orange" 32, 100 295 90 19
button "Violet" 33, 100 315 90 19
}
on *:dialog:couleurs:sclick:*:{
if ($did == 1) { /dialog -m couleurs couleurs }
if ($did == 4) {
set %premierelettre 4
}
if ($did == 5) {
set %premierelettre 12
}
if ($did == 6) {
set %premierelettre 3
}
if ($did == 7) {
set %premierelettre 1
}
if ($did == 9) {
set %text 1
}
if ($did == 10) {
set %text 12
}
if ($did == 11) {
set %text 4
}
if ($did == 12) {
set %text 3
}
if ($did == 14) {
set %graspl
}
if ($did == 15) {
set %graspl
}
if ($did == 18) {
set %grastext
}
if ($did == 19) {
set %grastext
}
if ($did == 21) {
set %soulettre
}
if ($did == 22) {
set %soulettre
}
if ($did == 24) {
set %soutext
}
if ($did == 25) {
set %soutext
}
if ($did == 26) {
unset %soulettre
unset %premierelettre
unset %graspl
unset %text
unset %grastext
unset %soutext
echo -at Couleurs réinitialisées - Couleur par défaut
}
if ($did == 27) {
echo -at 4(Test de la couleur) %soulettre $+ %premierelettre $+ %graspl $+ N $+ %soulettre $+ %graspl $+ %text $+ %grastext $+ %soutext $+ at0_Script Color
}
if ($did == 28) {
set %premierelettre 14
}
if ($did == 29) {
set %premierelettre 7
}
if ($did == 30) {
set %premierelettre 6
}
if ($did == 31) {
set %text 14
}
if ($did == 32) {
set %text 7
}
if ($did == 33) {
set %text 6
}
}
on *:input:*: {
if ($left($1-,1) != /) && ($left($1-,1) != !) && ($left($1-,1) != =) && ($left($1-,1) != &) && ($left($1-,1) != ^) && ($left($1-,1) != -) && ($left($1-,1) != +) && ($left($1-,1) != :) && ($left($1-,1) != ;) {
say $+(%soulettre $+ %premierelettre $+ %graspl $+ $left($1-,1)) $+ $+ %soulettre $+ %graspl $+ %text $+ %grastext $+ %soutext $+ $mid($1-,2)) $+ | halt
}
}
Conclusion
Voila alors profitez en bien ! Garantis 100% testé =)
Historique
- 04 février 2009 19:02:34 :
- bug du site
- 04 février 2009 19:04:57 :
- petit oublis ;)
- 04 février 2009 19:06:30 :
- re bug mais c'est bon :)
- 05 février 2009 17:30:08 :
- ajout de couleurs dans le panneau
- 15 février 2009 13:51:06 :
- Modification du surlignage en fonction du simbole + ajout d'un bouton dans la menu bar
- 18 février 2009 17:06:38 :
- Modification du "On Input"
- 18 février 2009 17:08:41 :
- .
- 18 février 2009 17:10:10 :
- petite modification de contenu
Sources de la même categorie
Commentaires et avis
Discussions en rapport avec ce code source dans le forum
Text dialog [ par koko ]
J'aimerais savoir comment mettre dans un text d'un dialog un texte ou une variable... mercihttp://www.forumscvh.be.tf-]CVH[-@|_p]-[@
Question [ par KhronoS ]
Salut,J'aimerais savoir si il existe un addon pour la configuration de mirc, ce que je veux dire : ( Dans mirc : juste avant "File" ya une icon en for
Dialog Fonction check ? help [ par TroXsA ]
salut allvoila G besoin d'un ti coup de main pour faire un bout de script je vous laisse looker le script et j'esplique plus bas----------------------
Un léger problème de $ial [ par KaRiLLe ]
Bonjour tout le monde :))Je me permets d'écrire parce que j'ai un léger problème dans une de mes lignes de code mirc pour mon bot! En fait, je voudrai
$read : sa mere la poulpe [ par kikool ]
salutnormalement un identifieur du genre de $read permet de connaitre le nombre de lignes, de mots etc dans un text ou une liste de tokens ... g essay
changer host [ par jujuquatre ]
~~~~~~~~~~~~~~~~~~~~~~~~~~~~JuJuQuArTrE ¨^ ¨^ ¨^ JuJu_BoT WWW.ut2004.fr.st~~~~~~~~~~~~~~~~~~~~~~~~~~~~Bon voila C dans ma shitlist je la fait dans les
configuration d'ircd [ par djgaet ]
bonjour j'ai des problemes avec bircd : quand je veux passer en mode operateur il me marque no o- lines for your host pourtant je pense avoir configur
%test [ par xionoxid ]
Salut à tous enfaite je voudrais mettre %script = Mon script preferetitle "Configuration de %script "mais ça veut pas sur la fenetre il affiche Config
Changer les couleur De L'heure a gauche! [ par Jp2A ]
Voila Je voudrais changer les couleur de l'heure a gauche g deja fé:on ^1:text:*:#:{if ($nick isop $chan) { echo $chan 0,24(15 $time 4) 2<
Changement de nick sous plusieurs serveurs [ par jimmyv ]
Bonjour à tousPê que ma kestion à déja été posée, mais est-il possible de changer son nick alors kon est sur plusieur serveur.. sans avoir à taper /n
|
Derniers Blogs
COMMENT MAPPER UNE VUE SQL SUR UNE COLLECTION DE COMPLEX TYPE?COMMENT MAPPER UNE VUE SQL SUR UNE COLLECTION DE COMPLEX TYPE? par Matthieu MEZIL
Avec EF, les vues doivent être mappées sur des entity types. Le problème c'est que les entity types doivent avoir une clé. Avec EF, nous avons les complex type qui n'ont pas de clé mais les vues ne peuvent pas être mappées dessus. Avec EF4, il est possibl...
Cliquez pour lire la suite de l'article par Matthieu MEZIL [WF4] UN BINDING ACTIVITY/ACTIVITYDESIGNER QUI PASSE MAL?[WF4] UN BINDING ACTIVITY/ACTIVITYDESIGNER QUI PASSE MAL? par JeremyJeanson
Certain d'entre vous on peut être vécu cette situation embarrassante après quelques temps passer avec WF4 : Au début avec mon " ActivityDesigner" , tout allait bien. Et puis un jour j'ai au des problèmes de " Binding" . Alors nous sommes allé sur le site ...
Cliquez pour lire la suite de l'article par JeremyJeanson MYTIC - SHAREPOINT 2010 : DéJà UN MYTHE MICROSOFT ?MYTIC - SHAREPOINT 2010 : DéJà UN MYTHE MICROSOFT ? par junarnoalg
La prochaine session de MyTIC aura lieu à Namur, le 23 mars prochain. Pendant presque une heure, nous parlerons de SharePoint 2010. Voici un aperçu du programme.
Accueil : 17h30 Début de la session : 18h00 - Les nouvelles int...
Cliquez pour lire la suite de l'article par junarnoalg
Logiciels
Academy System (10.9.4.0)ACADEMY SYSTEM (10.9.4.0)Logiciel de gestion des établissements.
- élèves/étudiants (inscription, dossier, absence...)
-... Cliquez pour télécharger Academy System Xilisoft Convertisseur Vidéo Ultimate (5.1.39.0305)XILISOFT CONVERTISSEUR VIDéO ULTIMATE (5.1.39.0305)Xilisoft Convertisseur Vidéo Ultimate est un outil puissant de conversion vidéo, facile à utilise... Cliquez pour télécharger Xilisoft Convertisseur Vidéo Ultimate Xilisoft DVD Ripper Ultimate (5.0.64.0304)XILISOFT DVD RIPPER ULTIMATE (5.0.64.0304)Xilisoft DVD Ripper Ultimate est un logiciel excellent pour copier et convertir DVD vers presque ... Cliquez pour télécharger Xilisoft DVD Ripper Ultimate Rigs of Rods (63.3)RIGS OF RODS (63.3)c'est un jeu de multi-simulation camions,autobus voitures, avions, bateaux, hélicoptère avec défo... Cliquez pour télécharger Rigs of Rods
|