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
SESSION SILVERLIGHT 5 3D : SLIDES ET DEMOSSESSION SILVERLIGHT 5 3D : SLIDES ET DEMOS par Groc
Durant les techdays, j'ai eu le plaisir d'animer une session sur Silverlight 5 et la 3D avec Simon Ferquel. Comme promis, voici nos slides et mes démos (celles avec le viper BSG) ici et là. Pour mémoire, les démos utilisent toutes le viper BSG...
Cliquez pour lire la suite de l'article par Groc [TECHDAYS 2012] SESSION WEBMATRIX 2 : LE COUTEAU SUISSE GRATUIT POUR VOS DéVELOPPEMENTS WEB - SLIDES[TECHDAYS 2012] SESSION WEBMATRIX 2 : LE COUTEAU SUISSE GRATUIT POUR VOS DéVELOPPEMENTS WEB - SLIDES par gpommier
Suite à la session que j'ai présenté sur WebMatrix 2, vous pouvez trouver les slides ici, ainsi que les démos en packages nuget : démos1 et démos2 J'en profite pour remercier chaleureusement tous ceux qui sont venus très nombreux à cette sess...
Cliquez pour lire la suite de l'article par gpommier [SHAREPOINT] LES SESSIONS TECHDAYS 2012.[SHAREPOINT] LES SESSIONS TECHDAYS 2012. par Patrick Guimonet
Voici donc pour ceux qui n'ont pas pu venir, ou ceux qui n'ont pas pu toutes les suivre la liste des sessions SharePoint aux TechDays 2012, que je mettrais à jour dès que les liens des vidéo seront disponibles. Ou ici : http...
Cliquez pour lire la suite de l'article par Patrick Guimonet TECHDAYS PARIS 2012 : SESSION PLEINIèRE JOUR 3TECHDAYS PARIS 2012 : SESSION PLEINIèRE JOUR 3 par ROMELARD Fabrice
Speaker: Bernard Ourghanlian Cette session est comme chaque jour transmise en live par BrainSonic, et j'ai donc suivi cette troisième pleinière par ce moyen sur mon iPad . Elle est dédiée comme chaque année à la mise en perspective de l'é...
Cliquez pour lire la suite de l'article par ROMELARD Fabrice MISHRA READER : UN LECTEUR RSS TRèS ZUNE STYLE EN OPEN SOURCE !MISHRA READER : UN LECTEUR RSS TRèS ZUNE STYLE EN OPEN SOURCE ! par Vko
Hier durant une session dédiée aux Techdays 2012, j'ai eu le plaisir d'annoncer la sortie de la Béta 2 de Mishra Reader. C'est quoi ? Pour les utilisateurs, c'est une vraie expérience de lecture de flux RSS sur Windows. Rien à voir avec les produit...
Cliquez pour lire la suite de l'article par Vko
Forum
RE : AIDERE : AIDE par Nico26000
Cliquez pour lire la suite par Nico26000 RE : AIDERE : AIDE par WorldDMT
Cliquez pour lire la suite par WorldDMT AIDEAIDE par Nico26000
Cliquez pour lire la suite par Nico26000
Logiciels
Tribler (2012)TRIBLER (2012)Tribler est un client pair à pair (P2P/Peer-to-Peer) open source avec la capacité de regarder des... Cliquez pour télécharger Tribler OneSwarm (2012)ONESWARM (2012)Le peer-to-peer qui protège votre vie privée, c'est OneSwarm.
Ce logiciel de peer-to-peer crypté... Cliquez pour télécharger OneSwarm PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V8.4)PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO (V8.4)PONAMEDIA TV DEVIENS HELLLOOO FLASH
LA TV SUR VOTRE ORDINATEUR.
Toute une plateforme Multi... Cliquez pour télécharger PONAMEDIA PREMIUM - HELLLOOO FLASH DEMO Academy System (17.2.1.0)ACADEMY SYSTEM (17.2.1.0)Logiciel de gestion des établissements.
- élèves/étudiants (inscription, dossier, absence...)
-... Cliquez pour télécharger Academy System Easy-Planning (1.0.0.1)EASY-PLANNING (1.0.0.1)Basé sur les mêmes principes que MyPlanning, Easy-Planning permet de créer des plannings sous la ... Cliquez pour télécharger Easy-Planning
|