Nouvelle Campagne..

..de lutte contre l'homophobie dans les universités.

Communiqué du 15 juin 2009:

<< 40 000 affiches sont diffusées dans les universités afin de lutter contre l'homophobie. Objectif : sensibiliser étudiants et personnels aux discriminations liées à l'orientation sexuelle.


Valérie Pécresse, ministre de l’Enseignement supérieur et de la Recherche, a lancé une première campagne d’affichage visant à lutter contre l’homophobie dans les établissements d’enseignement supérieur.

Cette campagne a été réalisée en étroite collaboration avec les acteurs associatifs, qui y travaillent depuis un an avec le ministère. Elle vise à sensibiliser les étudiants et l’ensemble des personnels universitaires aux difficultés rencontrées par certains étudiants encore trop souvent victimes de discrimination en raison de leur orientation sexuelle ainsi qu’aux conséquences parfois dramatiques d’actes et de comportements homophobes.

40 000 affiches seront diffusées au total :
* 20 000 affiches seront diffusées dans l’ensemble des établissements universitaires, des CROUS, et des autres lieux d’accueil des étudiants (foyers, maisons des étudiants, etc.) ;
* et 20 000 autres seront mises à disposition des associations d’étudiants luttant contre l’homophobie.

Cette campagne sera relancée à la rentrée universitaire 2009/2010. >>

Page Source

Bon, chuis pas fan de V. Pécresse, surtout après l'épisode Karoutchi, mais toute initiative est bonne à saluer. Attendons de voir ;)

-MyLzz59-

"Ma Vie En Rose"

Voici l'un des quelques films qui me tiennent tout particulièrement à coeur, l'émouvant "Ma Vie en Rose", avec dans les rôles principaux Michèle Laroque (la mère), et le poignant petit (à l'époque) Georges du Fresne (Ludovic).

Ci-après, voici un résumé de la totalité dudit film, ce qui n'enlève rien à son intérêt, car ce qui importe n'est pas l'intrigue en elle-même mais le jeu des acteurs, et donc le message que ce film véhicule. Enfin, faîtes comme vous le sentez..


*) Dans un coquet quartier privilégié de banlieue parisienne (91), vient d'emménager la famille Fabre, avec leurs quatre enfants, dont Ludovic, 7 ans. Ils organisent une grande fête dans leur jardin pour la pendaison de crémaillère. Mais au moment où le père, présentant ses enfants aux voisins, annonce Zoé, l'ainée, c'est Ludovic qui s'avance, en robe, coiffé, maquillé. "Qu'est-ce qui t'a pris ?" lui demande-t-il. "Je voulais me faire belle.." Le père fait passer Ludovic pour un blagueur. Jérôme, le fils d'Albert, voisin et supérieur direct du père, est attiré par cette fille, Ludovic.

Un peu plus tard, la grand-mère maternelle, Elisabeth dite Granny, afin de réveiller les danseurs déjà quelque peu cuits pour certains, remplace "Emmène-moi danser ce soir" (de Michèle Torr) par un titre plus "remuant", et s'élance sur la piste. Le père: "Toujours aussi timbrée ta mère." Réponse de sa femme: "Elle est restée jeune." "Elle se déguise en jeune, nuance". Entendant cela, Ludovic, qui a été obligé de se changer, court la rejoindre. La fête repart..



*) Lundi matin, Ludovic va à l'école. Son père lâche à un voisin "Courage, plus qu'une semaine avant le week-end !" Comme les autres, Ludovic a amené un objet fétiche, un couple de poupées, Pam la Fée et Ben son amoureux. Jérôme a amené une boucle d'oreille, celle perdue par Ludovic la veille. A la récréation, ils sympathisent.

Le soir, Elisabeth récupère Ludovic, lequel fait signe à Jérôme. "Vous vous entendez bien ?" "Ouais, on va se marier lorsque je ne serai plus un garçon."

*) A la télévision est diffusé un feuilleton, "le monde de Pam", une fée humaine qui vole dans un monde de poupée. Ludovic interprète la danse de Pam devant le téléviseur. Elisabeth le rejoint.



Elle lui explique son secret pour rester aussi "jeune": "Je ferme les yeux et le monde devient celui que je veux." Ludovic ferme les yeux, et se voit princesse dans le monde de Pam.



*) Jérôme a invité Ludovic à jouer chez lui. Il découvre une porte interdite, celle de la chambre de la soeur de Jérôme, qui est "partie" (en fait, décédée). Ludovic entre, trouve une robe, l'enfile, et les deux enfants mettent en scène leur mariage. Au moment du baiser (qui n'aura pas lieu), la mère de Jérôme, qui a assisté, s'évanouit.

Au moment de se faire disputer, Pam apparaît à Ludovic et l'emporte dans les airs. Il se voit ramené par sa mère, et tombe.

*) Alors que les parents de Ludovic envisagent de lui faire suivre une thérapie chez un psy, à l'école Jérôme demande à changer de place "sinon j'irai en enfer".

La psy demande aux parent "quel enfant désiriez-vous ?". Ludovic, qui écoute la conversation tout en jouant, s'exclame "Je suis un garçon, alors ?"

Dès lors il va se comporter en garçon, mais dans la rue, en s'approchant d'une copine afin de lui arracher un baiser, celle_ci le repoussera: "Hé, j'embrasse pas les filles !"

*) Ludovic assiste à une dispute entre voisins, le père de Jérôme accusant la fille de l'autre d'avoir traité son fils de "tapette". "Retiens bien ça, chez nous on n'a pas de tapette." Ludovic sort de sa cachette et demande à ce voisin ce qu'est une "tapette". Il ne répondra pas.

A la maison, Ludovic réitère sa question. Son père, s'énervant, lui sort une tapette à mouches. "Tu deviens comme Albert, tu te fâches pour rien."

*) Barbecue-party, la discussion vient à tourner autour de la transsexualité. De leur côté, la séance de travail entre le père de Ludovic et celui de Jérôme s'envenime. Le père de Ludovic décide de lui faire pratiquer du football, mais ce n'est visiblement pas son truc..



*) Zoé explique à Ludovic la différence entre filles et garçons par les chromosomes XX et XY. Il s'imagine Dieu lisant "Ludovic Fabre: fille", mais lorsqu'il lance deux X et un Y, l'un des X loupe la cheminée. Il dit au crucifix: "Pff.. C'est malin.."



Aux toilettes de l'école, Ludovic démontre à Jérôme qu'il est un "garçon-fille", car il fait pipi assis, mais que Dieu va réparer ça..

Zoé ressent la douleur de ses premières règles. Ludovic entend qu'il s'agit de la "preuve d'une vraie gonzesse", il interroge Zoé qui le rembarre.

*) Au spectacle de l'école, Ludovic profite d'une pause pipi de Blanche-Neige pour lui subtiliser la place sur scène. Le chevalier, Jérôme, hésite à l'embrasser, et recule, dévoilant Ludovic. Stupeur dans la salle, la famille Fabre est obligée de s'éclipser.


Le dîner qui suit est pesant. "Mon fils est un garçon, et malgré les fortunes qu'on dépense chez la psy.." Le père se retient de gifler sa femme.

Devant la psy, Ludovic ré-explique la théorie du "garçon-fille". Ses parents en viennent à se disputer dans le cabinet.

*) Devant certains gestes déplacés, la maîtresse commence une clarification sur les différences, mais Ludovic se retrouve renvoyé de l'école, le directeur ayant convoqué les parents pour leur parler de la pétition signée par tous les voisins..

Plus tard, au football, Ludovic est lynché par les autres enfants, car il hésitait à se déshabiller. Ses frères ne prennent pas sa défense. Ludovic disparaît.

Toute la famille le recherche, c'est sa mère qui, allant fumer pour se calmer dans le garage, le découvre allongé dans le congélateur, tenant serré contre lui un crucifix.

Trop heureux de l'avoir retrouvé, ils lui promettent d'exercer un de ses souhaits. Ils vont regretter leurs paroles, car Ludovic souhaite se rendre à l'anniversaire d'une copine, Sophie, en ..jupe ! "Après tout, pourquoi pas ?", dit Elisabeth.


A sa vue, les enfants s'enfuient. Grand froid. "C'est un remède, quand l'interdit devient permis ça n'est plus intéressant", expliquent aux autres les parents de Ludovic. La fête se poursuit, avec "Les Rois-Mages", de Sheila.

*) Son père rentre ivre à la maison. "Compression de personnel", annonce-t-il pour dire qu'il a été licencié. Ludovic demande "c'est ma faute ?"

Chez la psy, Ludovic se met à jouer avec un camion. Celle-ci lui sort "peut-être que tu devrais attendre d'être plus grand.."

Convaincue qu'Albert est à l'origine du licenciement, la mère de Ludovic attrape ce dernier alors qu'il s'apprêtait à monter dans sa voiture, et lui roule une pelle devant sa femme qui lui fera une scène. "Vous êtes le diable !", lui criera-t-il. "Kss..", répondra-t-elle.

*) En se réveillant, Ludovic a mal au ventre, et croit avoir ses règles lui aussi. Les parents découvrent "dehors tapettes" tagué sur leur garage. Aussi quand Ludovic sort annoncer ses "règles", se fait-il recevoir..

"Pourquoi il faut mettre le machin pour chasser les mouches dehors ?", s'étonne innocemment Ludovic. Réponse de sa mère: "une tapette c'est aussi un garçon qui aime les garçons. Comme toi." Puis elle tond la coupe "casque" de Ludovic. Zoé s'éclipse..

Sur le chemin de l'école, Ludovic hurle qu'il veut aller vivre chez Granny (Elisabeth, bien plus ouverte d'esprit).

*) Retour à la maison, la famille fête le nouveau boulot du père, mais à ..Clermont-Ferrand ! De nouveau, Ludovic veut rester chez Granny.

Au lit, Ludovic, ivre du verre de champagne qu'il a bu d'un trait, rêve de son mariage avec Jérôme.

La famille déménage. Granny s'enfuit au moment des adieux pour qu'on ne la voie pas pleurer. Dans le coffre, la valise de Ludovic s'ouvre, et sa robe s'envole, pour atterrir aux pieds de Jérôme..

*) A Clermont-Ferrand, Ludovic, désoeuvré et scalpé, a pris l'habitude de contempler, assis sur un banc, une affiche pour "le monde de Pam", quand il reçoit un petit projectile..

Chris, un rouquin armé d'une fronde, émerge, et l'invite à jouer avec lui, mais Ludovic ne veut pas. Il change d'opinion sur Chris en entendant sa mère l'appeler ..Christine !

La mère de Christine, Fabienne Deloigne, vient à la rencontre d'Hanna, celle de Ludovic, et en profite pour inviter ce dernier à l'anniversaire de sa fille, qui y tient. Hanna est pour le moins surprise..

*) A l'anniversaire, Christine (habillée en princesse) et Ludovic (en mousquetaire) s'ennuient. Chris lui propose d'échanger leurs tenues, mais il refuse, conscient des précédents.. Chris hèle ses copains, qui le forcent à se changer.

En voyant Chris avec la tenus de Ludovic, Hanna poursuit et gifle ce dernier, bien qu'il prétende ne pas être responsable. Il faudra l'intervention d'autres adultes, et l'aveu de Chris, pour qu'elle cesse. Mais Ludovic s'enfuit de nouveau..

Sa mère se précipite vers le congélateur, mais il est vide. En chemin, elle aperçoit l'affiche "le monde de Pam", la porte sur celle-ci est ouverte, et une échelle y est appuyée. Elle monte.

Par la porte, elle découvre le monde de Pam, et Ludovic qui lui annonce: "ici au moins je ne gâcherai pas votre vie, je vous laisserai en paix." Elle se penche, et tombe.

Hanna se réveille dans le canapé, chez Chris. Elle appelle Ludovic, et lui demande: "tu ne voulais pas vraiment partir avec cette poupée ?" Ludovic a un petit sourire.

"Quoi qu'il arrive tu seras toujours mon enfant." Le père rectifie: "notre enfant." La fête reprend, Ludovic reste en robe, et Chris en mousquetaire. Dans le ciel, passe Pam la Fée..

============================================================

Ce magnifique film grand public datant de 1997 n'est à ma connaissance pas sorti à petit prix, mais il mérite amplement de figurer dans toute DVDthèque tant il est un appel à la tolérance face à la trans-identité, et plus largement un appel au respect de la communauté LGBT.

Aux côtés de Georges du Fresne, criant de vérité et de justesse dans le rôle de Ludovic, citons la magnifique Michèle Laroque (Hanna, la mère), Hélène Vincent (super-mamie), et Julien Rivière (Jérôme).

La chanson fil rouge et générique, "Rose",

signée Dominique Dalcan,

est interprétée par une certaine Zazie..

-MyLzz59-

Cadeau bonus trouvé sur le net (tant que ça fonctionne)..

Baisser de Rideau..

Ce soir, comme quasiment tous les soirs depuis plus d'un an, Mylène tiendra son blog comme elle monterait sur scène.

Ce soir encore, Mylène montera sur scène, mais le coeur n'y est plus.

Ce soir encore, Mylène regardera dans la salle, mais ne verra rien. Rien que du noir. Seule en scène, Mylène se sentira aussi seule face à cette salle toute noire. Aucun applaudissement, aucun sifflement, presque aucun bruit.

Un vide pesant.

Ce soir encore, Mylène devinera bien qu'il y aura eu du passage dans cette salle, des sons de pas, de fauteuils bougés, mais aucune parole. Pour un peu, Mylène finirait par douter de l'existence de cette salle, par se croire face à un simple mur peint en noir.

Ce soir, Mylène fera sa dernière représentation avant de partir en vacances. Mylène sature, Mylène en a ras-le-bol.

Ce soir encore, Mylène montera sur scène, mais le coeur n'y est plus. Machinalement, pour un public peut-être indifférent, peut-être même inexistant, Mylène fera en somme son boulot. Une dernière fois encore, et partira en congés.

Une dernière fois encore, et ce blog, son blog, s'ensommeillera pour deux semaines, baisser de rideau.

Contrairement à d'ordinaire, Mylène n'assurera pas, cette fois, d'apparitions durant ces vacances. Mylène sature, Mylène en a ras-le-bol. Baisser de rideau.

Pendant ces deux semaines, Mylène n'emportera pas sa scène, Mylène n'emportera pas son PC, Mylène ne se connectera pas. Mylène sature, Mylène en a ras-le-bol. Mylène s'éloignera, tentera de se ressourcer, tentera de retrouver cette petite flamme qui l'animait, cette petite flamme qui à force de vaciller face à cette salle fantôme, ce mur peint en noir peut-être, a fini par s'éteindre. Ou alors couve-t-elle simplement, Mylène ne le sait, Mylène tentera de le découvrir durant ces congés, durant ses congés, durant cette coupure rendue nécessaire.

Mylène ensommeille ce blog, son blog, sa scène, aucune apparition pendant ces deux semaines. Ras-le-bol, baisser de rideau.

Bien sûr, Mylène a encore des choses à dire. Plusieurs articles traînent déjà dans les coulisses de ce blog, articles pour certains même terminés, attendant d'être publiés, d'être joués. Attendant peut-être de ne jamais être joués, tout dépendra de cette petite flamme.

Dans deux semaines, Mylène reviendra, peut-être rechargée à bloc, prête à reprendre du service, à remonter sur scène pour nombre encore de représentations, ou peut-être pas.

Dans deux semaines, Mylène reviendra, c'est sûr, mais ce sera peut-être pour sa toute dernière représentation, le baisser de rideau final et définitif de ce blog, sa fin. Sans la petite flamme, autant fermer ce blog, cette scène, à quoi bon chercher à continuer.

Voilà. Mylène est allée au bout de ce qu'elle souhaitait vous dire ce soir. Mylène a terminé cette dernière représentation, sa dernière représentation. Un dernier regard vers ce mur noir qu'est la salle, sa salle, son blog, et Mylène se retourne, se dirige vers les quelques marches qui mènent en coulisse. Un dernier petit signe adressé à son public peut-être indifférent, peut-être même inexistant, et Mylène n'est déjà plus là. Bruit de porte, Mylène s'en est allée vers ses vacances, vers son destin, celui de ce blog aussi.

Mylène vous souhaite de bonnes vacances aussi, ou bon courage si vous bossez. Mylène vous embrasse. A dans deux semaines.

-MyLzz59-

Poignante Paris Jackson

-MyLzz59-

Vidéo Souvenirs :P

Trouvé ça sur le Net. Comme quoi faut faire gaffe.. ;)

<< Californie, États-Unis - Une enseignante qui a réalisé une vidéo de souvenirs pour les élèves de sa classe y a inséré une séquence de ses ébats amoureux par erreur.

Une enseignante d'une école élémentaire du nord de la Californie a voulu réaliser pour ses 24 élèves, une vidéo afin qu'ils se souviennent de l'année achevée. Mais suite à une erreur de manipulation, la vidéo en question contenait une séquence de 6 secondes où l'on pouvait voir l'institutrice en plein acte sexuel. Cet incident a été découvert lorsque l'un des parents d'élèves a contacté l'institutrice pour le lui signaler. L'institutrice a alors avisé tous les parents d'élèves pour leur demander de détruire le DVD. Initialement, l'administration de l'école avait demandé aux parents de retourner les vidéos puis finalement de les détruire. >>

-MyLzz59-

La Fille de la Casse

-MyLzz59-

Oua Oua

Cette chanson traditionnelle hawaïenne sert actuellement de musique aux spots de pub d'une eau aux effets secondaires.. comment dire.. :D



OK, la chanson aussi :P

-MyLzz59-

Chez Mickey..

Ce week-end nous sommes allées passer une journée chez Mickey, avec deux copines de la Miss. Journée fort chargée, de notre arrivée en rer pour l'ouverture, à notre retour, toujours en rer, à la ..fermeture du parc ;)

Nous avons, grâce à la connaissance du lieu de la maman de l'une des copines, qui nous accompagnait, réussi à profiter de 13 attractions, eu le temps de faire un bon repas, et même quelques boutiques avant de repartir..

Quelques Attractions..

* Space Mountain
Paraît que c'est génial, moi j'ai pas aimé. Je voulais essayer, histoire de savoir, ben maintenant je sais. Je sais que j'ai pas apprécié. OK ça va vite, mais hélas ça secoue beaucoup trop, non que je n'aime pas ça :P mais là c'en était désagréable. Je suis ressortie de là décoiffée à cause de l'appuie-tête, et avec un léger mal de crâne, qui s'est dissipé un peu après..

* Hollywood Tower Hotel (Twilight Zone Tower of Terror)
Dernière installation en date, c'est l'attraction à ne pas manquer. J'ai adoré ça, et s'il n'y avait pas eu tant de queue, j'y serais volontiers retournée. Ma p'tite femme, au contraire n'a aspiré qu'à une chose: en sortir au plus vite, cramponnée à mon bras dès le premier mouvement de l'ascenseur :D

En effet, basée sur le concept de la série "La Quatrième Dimension" (mais rattachée à aucun des 156 épisodes), cette attraction reprend l'histoire d'un hôtel qui aurait été partiellement détruit par la foudre en 1939, et où 5 personnes dans un ascenseur auraient disparu dans la quatrième dimension (twilight zone).

Après une attente dans le hall d'entrée, où des objets abandonnés témoignent de l'abandon soudain du lieu, nous pénétrons dans la bibliothèque, où une vidéo nous plonge dans l'ambiance, puis nous descendons dans les sous-sols rejoindre les ascenseurs de service. Nous nous asseyons, et attachons notre ceinture. On range soigneusement tout objet susceptible de ..s'envoler ! Car ces ascenseurs, après deux séquences de mises en bouche, vont grimper plusieurs fois à 66 mètres (13 étages), et chuter à 13,6 m/s (vitesse supérieure à la chute libre), nous décollant de notre siège (état d'apesanteur).

La Video d'Introduction	Présentation par Travel TV
Présentation au JT de France2	Reportage sur la Conception

* It's a Small World

Une attraction bien tranquille, destinée aux enfants, et aux adultes qui en ont gardé l'âme. Installé(e)s dans des barques tractées, nous traversons à l'intérieur d'un bâtiment des scènes naïves, clichés même, "caractéristiques" de nombreux pays, toutes en poupées (automates) animées, lesquelles interprètent une même sympathique chanson en autant de langues. Enfin, sympathique, si l'on fait abstraction du fait qu'elle "colle" aux neurones d'une façon abominable ! Vous vous surprendrez pendant au moins trois jours à ..chanter cette chanson :D



Maintenant, si vous êtes assez malade :P pour carrer cette chanson dans votre baladeur mp3 ou votre GSM, ben vous pouvez la récupérer (a priori) légalement là ou là...

-MyLzz59-

Mylénia..

Au Royaume de Mylénia..

Nan, je ne prends pas pour Barbie Fairytopia :D

Le Royaume de Mylénia est un pays magique, caché dans un recoin de la galaxie Internet, dans lequel j'aime à me réfugier, débarrassée de Minos, totalement libre de voleter, virevolter, mes ailes d'ordinaire engoncées dans mon déguisement francilien grandes déployées. Au Royaume de Mylénia, vous croiserez des couples virevoltant en amoureuses, certaines soeurs encore chenilles attendant au sol l'heure de leur éclosion, et sur les larges chemins ensoleillés ou ombragés d'autres visiteurs, parfois juste de passage, et quelques habitués ici chez eux..

-MyLzz59-

BlondeBox

<< Activations laborieuses, migrations lentes, unification des offres, perturbations diverses, nouveau firmware ... Ah oui, çà bouge ! Mais ... est-ce dans le bon sens ? [..] >>

Ainsi commence l'édito actuel de l'excellent site c-@lice

Et à moins que l'avenir finisse par nous démontrer le contraire, elle a toutes les raisons de tirer la gueule, la Vanessa. Depuis plusieurs mois, depuis la phagocyt.. le rachat du p'tit FAI par le gros, rien ne va plus sans qu'on ait pu faire nos jeux.. Je ne vais pas reprendre ici la litanie des utilisateurs, vous la trouverez facilement.

Quand j'ai souscrit il y a quelques années, j'ai hésité entre ..Alice et Free, pour des raisons diamétralement opposées. Free pour la réputation de pionniers en la matière qu'ils avaient encore, Alice non pas pour leur professionnalisme (ne vous étranglez pas, ils étaient lamentables. 3/4h de "woo-hoo" en boucle avant de devoir franchir plusieurs hotliners incapables pour espérer tomber sur l'individu qui connaissait son métier. Remarquez, je ne regrette pas, ça a été un sport instructif et formateur) mais pour la tirlipotée de cadeaux que la généreuse Blonde offrait en dédommagement.
Si vous voulez vous resservir une couche de "Woo-hoo":
"A Black Horse and a Cherry Tree", par KT Tunstall (ton modem ? :D)

Pis un jour, l'offre qui m'a décidée.. En faisant nos courses dans notre grande surface, un camelot nous aborde en nous proposant sa belle grosse boîte toute rouge (Tss.. moi.. :D ). En plus de tous les cadeaux (mois de surf, de téléphonie) d'Alice, le magasin offrait un bon d'achat de la valeur de la box, pourtant remboursée par Alice. Après avoir torturé questionné le vendeur pour qu'il se rencarde et nous confirme notre éligibilité, nous repartions avec la boîte, vivre le début de notre calvaire épopée.

Au bout de plusieurs semaines de silence radio (ponctuées de longs appels heureusement gratuits depuis chez un voisin compatissant), dégroupage total oblige, le Bidule gris aux deux p'tites antennes se décida enfin, et ne posa guère de gros souci depuis. Du bol ? P't'êt'.. (N'est-ce pas, Soeurette x-( )

..Jusqu'à il y a peu, où mon débit s'est cassé la g.. effondré sans la moindre raison apparente, et malgré mes divers bricolages ("root":"h4y2svl0" :D) ainsi qu'un appel à un technicien Alice (sympa et compétent, si si y'en a), pas moyen de moyenner, comme une boîte de vitesses coincée sur la première :(

Pis ce matin, dernière crasse blague en date: en zyeutant machinalement le Bidule, surprise, le voyant Wi-Fi, fonctionnalité que j'ai désactivée car comme je n'en ai aucun usage (mes machines sont en RL Ethernet) je ne vais pas en faire cadeau à mes voisins :P ), était grand allumé ! Je me précipite sur un des PC, me connecte sur la BlondeBox (http://192.168.1.1), "root" non reconnu. ??? Heureusement, "support" répond.

Mais au lieu de l'interface habituelle:

je découvre cette horreur:

Je le concède, c'est moins austère, voire plus joli (mouais) que le firmware V1, mais nettement moins fonctionnel. J'ai été victime d' subi eu droit sans crier gare à un remplacement de l'interface avancée originelle par un firmware V2 orienté simple utilisateur x-( De plus, cette "montée" de version en pleine nuit a remis en marche un Wi-Fi non sécurisé x-(

Deux claques la Blonde, oui !!

-MyLzz59-

Ne pas perdre de vue..

..la principale facette de ce blog

Non que je renie les sisters trans-*, ou la programmation VB,
mais ce blog, c'est avant tout

ceci.

-MyLzz59-

DigiClock sous Word

.
Présentation

Dans la même veine (la même inutilité ?) que la précédente (que je vous invite à relire tant elles se ressemblent), voici toujours sous Word, et avec des Segments, une Horloge ..Numérique, aussi appelée "7 Segments".

Si vous êtes pressé(e)s de la voir à l'oeuvre, vous pouvez commencer par l'intégrer à un nouveau document, et vous préoccuper des explications ultérieurement. Sinon, elles figurent sous ce code..

Le Code

Démarrez Word (version 2000 ou supérieure), ouvrez un nouveau document (vierge), et lancez l'éditeur VBA via le menu Outils > Macros, ou les touches Alt-F11. Repérez (ou affichez) l'explorateur de projets, et double-cliquez sur "ThisDocument". Ceci ouvre une fenêtre de code "ThisDocument (Code)". Effacez les lignes qui s'y trouveraient éventuellement, et collez le code ci-dessous.

Enregistrez (l'icône disquette ou Ctrl-S) le document, refermez l'éditeur VBA, ainsi que le document sauvegardé. Vérifiez au besoin (menu Outils > Macros > Sécurité) que le niveau de sécurité des macros ne soit pas sur "haut". Rouvrez le document, le code devrait démarrer, moyennant peut-être de valider "Activer les macros"..

' -----------------
' Zone Déclarations
' -----------------
Dim TD As Document

' ---------------------
' SUB: Horloge Digitale
' ---------------------
Private Sub Document_Open()
' Nettoyage
Set TD = ThisDocument
TD.Content.Delete
' Création des Chiffres ("L01" à "L42")
N = 0: X0 = 16: Y0 = 70
Z0$ = "1,0;3,0;4,1;4,3;4,5;4,7;3,8;1,8;0,7;0,5;0,3;0,1;1,4;3,4;"
For T = 1 To 6
    Z$ = Z0$: X0 = X0 + 64 + 16 * (T Mod 2): GoSub SS1
Next T
' Création des Points ("L43" to "L46")
For X0 = 220 To 364 Step 144
    Z$ = "0,2;0,3;0,5;0,6;": GoSub SS1
Next X0
' Boucle Infinie
Do
    ' Attente
    Do: K$ = Time$: DoEvents: Loop While K$ = K0$: K0$ = K$
    ' Décryptage
    For T = 1 To 6
        V0 = Val(Mid$(K$, Int(1.4 * T), 1)): N = 7 * T - 6
        V = V0 <> 1 And V0 <> 4: GoSub SS2
        V = V0 < 5 Or V0 > 6: GoSub SS2
        V = V0 <> 2: GoSub SS2
        V = (V0 Mod 3) <> 1: GoSub SS2
        V = (V0 Mod 2) = 0 And V0 <> 4: GoSub SS2
        V = V0 = 0 Or (V0 > 3 And V0 <> 7): GoSub SS2
        V = V0 > 1 And V0 <> 7: GoSub SS2
    Next T
    DoEvents
Loop
Exit Sub
' SSUB: Ajout Segments
SS1:
    While Z$ <> ""
        T1 = InStr(Z$, ","): T2 = InStr(T1 + 1, Z$, ";")
        T3 = InStr(T2 + 1, Z$, ","): T4 = InStr(T3 + 1, Z$, ";")
        N = N + 1: Z2$ = "L" + Format$(N, "00")
        TD.Shapes.AddLine( _
            X0 + 10 * Val(Left$(Z$, T1 - 1)), _
            Y0 + 10 * Val(Mid$(Z$, T1 + 1, T2 - T1 - 1)), _
            X0 + 10 * Val(Mid$(Z$, T2 + 1, T3 - T2 - 1)), _
            Y0 + 10 * Val(Mid$(Z$, T3 + 1, T4 - T3 - 1)) _
            ).Name = Z2$
        Z$ = Mid$(Z$, T4 + 1)
        TD.Shapes(Z2$).Line.Weight = 11
        TD.Shapes(Z2$).Line.ForeColor = &H800000
    Wend
Return
' SSUB: Etat d'un Segment
SS2: TD.Shapes("L" + Format$(N, "00")).Visible _
    = IIf(V, msoTrue, msoFalse): N = N + 1
Return
End Sub

Explications

Nous ne nous attarderons pas sur la création-même des Segments, ils ont été détaillés précédemment. Notez qu'ici la façon de les créer est "pilotée" par la chaîne Z$. Pour chacun des 6 Chiffres, la même séquence sera répétée.

En observant Z$, une séquence s'y reproduit, c'est "X,Y;". Pris séquentiellement par deux, ces Points (X,Y) serviront à créer et positionner les segments de chaque chiffre dans un ordre précis. Accessoirement, ces segments seront nommés également séquentiellement, pour le premier chiffre (dizaines d'heures) de "L01" à "L07", le second de "L08" à "L14", etc.. jusqu'au sixième (unités de secondes) de "L36" à "L42". Cette numérotation permet d'adresser un segment par deux paramètres: la position du chiffre, et la position du segment dans le chiffre.


La même méthode de construction est appliquée pour la création des deux paires de points ("L43" à "L46").

La boucle infinie, ainsi que la boucle d'acquisition de l'heure sont les mêmes que dans l'horloge précédente, à ce détail près: nous allons récupérer l'heure non pas via le Timer, mais la fonction Texte Time$(), plus adaptée ici, d'autant que nous n'utiliserons pas de centièmes pour faire clignoter les deux deux-points. Time$() renvoie une chaîne de 8 caractères selon ce motif: "hh:mm:ss". Une formule simple permet de transformer {1;2;3;4;5;6} et {1;2;4;5;7;8} afin d'éliminer les deux-points..

Reste la partie la plus intéressante, la conversion d'un chiffre de 0 à 9 en l'allumage ou l'extinction des 7 segments qui stylisent ce chiffre. Dressons le tableau..

	0	1	2	3	4	5	6	7	8	9
L01	#		#	#		#	#	#	#	#
L02	#	#	#	#	#			#	#	#
L03	#	#		#	#	#	#	#	#	#
L04	#		#	#		#	#		#	#
L05	#		#				#		#
L06	#				#	#	#		#	#
L07			#	#	#	#	#		#	#

Il suffit alors de relire ce tableau, d'abord en français, puis en code..
(V0 est la valeur du chiffre, et V l'état allumé/éteint résultant)

L01 s'allume pour les valeurs autres que 1 et 4
=> V = V0 <> 1 And V0 <> 4

L02 s'allume si la valeur est inférieure à 5 ou supérieure à 6
=> V = V0 < 5 Or V0 > 6

L03 s'allume si la valeur est différente de 2
=> V = V0 <> 2

L04 s'allume pour toute valeur dont le reste de la division entière par 3 n'est pas 1
=> V = (V0 Mod 3) <> 1

..et ainsi de suite (essayez avec les 3 segments restants) !

Dernière chose: les DoEvents permettent de rendre du temps CPU au système lorsque le programme n'en requiert pas 100%, par exemple pour ..rafraîchir l'affichage :)

-MyLzz59-