Advertisement
Tlams

Gen_pw_developpez

Mar 1st, 2014
2,005
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. ;
  2. ; AutoHotkey Version: 1.x
  3. ; Language:       French
  4. ; Platform:       Win9x/NT/XP/VISTA/W7/W8
  5. ; Author:         Tlams <tlams@free.fr>
  6. ; Licence:        GPLv2
  7. ;
  8. ; Script Function:
  9. ;   Générateur de mots de passes
  10. ;
  11.  
  12. #NoEnv  ; Recommended for performance and compatibility with future AutoHotkey releases.
  13. SendMode Input  ; Recommended for new scripts due to its superior speed and reliability.
  14. SetWorkingDir %A_ScriptDir%  ; Ensures a consistent starting directory.
  15. #Persistent ; Maintient le script lancé
  16. #SingleInstance, force ;Force le remplacement de l'instance si double lancement
  17.  
  18. ; Liste des mots
  19. word_list_1 = je|tu|il|nous|vous|ils|elles|lui|le|la|les|leurs|eux|on|une|un
  20. word_list_3 = etre|avoir|ne|son|que|se|qui|ce|dans|pour|pas|que|par|sur|faire|plus|dire|me|on|mon|comme|mais|pouvoir|avec|tout|aller|voir|en|bien|ou|sans|tu|ou|leur|homme|si|deux|mari|moi|vouloir|te|femme|venir|quand|grand|celui|si|notre|devoir|la|jour|prendre|meme|votre|tout|rien|petit|encore|aussi|quelque|dont|tout|mer|trouver|donner|temps|ça|peu|meme|falloir|sous|parler|alors|main|chose|ton|mettre|vie|savoir|yeux|passer|autre|apres|regarder|toujours|puis|jamais|cela|aimer|non|heure|croire|cent|monde|donc|enfant|fois|seul|autre|entre|vers|chez|demander|jeune|jusque|tres|moment|rester|repondre|tout|tete|pere|fille|mille|premier|car|entendre|ni|bon|trois|cœur|ainsi|an|quatre|un|terre|contre|dieu|monsieur|voix|penser|quel|arriver|maison|devant|coup|beau|connaitre|devenir|air|mot|nuit|sentir|eau|vieux|sembler|moins|tenir|ici|comprendre|oui|rendre|toi|vingt|depuis|attendre|sortir|ami|trop|porte|lequel|chaque|amour|pendant|deja|pied|tant|gens|parce que|nom|vivre|reprendre|entrer|porter|pays|ciel|avant|frere|regard|chercher|ame|cote|mort|revenir|noir|maintenant|nouveau|ville|rue|enfin|appeler|soir|chambre|mourir|pas|partir|cinq|esprit|soleil|dernier|jeter|dix|roi|etat|corps|beaucoup|suivre|bras|ecrire|blanc|montrer|tomber|place|ouvrir|ah|parti|assez|leur|cher|voila|annee|loin|point|visage|bruit|lettre|franc|fond|force|arreter|perdre||commencer|paraitre|aucun|marcher|milieu|saint|idee|presque|ailleurs|travail|lumiere|long|seulement|mois|fils|neuf|tel|lever|raison|effet|gouvernement|permettre|pauvre|asseoir|point|plein|personne|VRAI|peuple|fait|parole|guerre|toute|ecouter|pensee|affaire|quoi|matin|pierre|monter|bas|vent|doute|front|ombre|part|maitre|aujourd'hui|besoin|question|apercevoir|recevoir|mieux|peine|tour|servir|oh|autour|pres|finir|famille|pourquoi|souvent|rire|dessus|madame|sorte|figure|droit|peur|bout|lieu|silence|gros|chef|eh|six|bois|mari|histoire|crier|jouer|feu|tourner|doux|longtemps|fort|heureux|comme|garder|partie|face|mouvement|fin|reconnaitre|quitter|personne|comment|route|des|manger|livre|arbre|courir|cas|huit|lorsque|mur|ordre|continuer|bonheur|oublier|descendre|haut|interet|cacher|l'un|chacun|profond|argent|cause|poser|autant|est|travers|grand|instant|façon|d'abord|oeil|tirer|forme|presenter|ajouter|agir|retrouver|chemin|cheveu|offrir|surtout|certain|plaisir|suite|apprendre|malgre|tuer|rouge|sang|retourner|rencontrer||||sentiment|fleur|cependant|service|plusieurs|table|vite|paix|envoyer|moyen|dormir|pousser|lit|humain|voiture|rappeler|etre|lire|general|nature|or|pouvoir|nouveau|français|joie|sept|tard|president|pourtant|bouche|changer|petit|froid|compter|occuper|sens|cri|cheval|loi|sombre|ci|sur|espece|voici|ancien|tandis que|frapper|ministre|puisque|selon|travailler|expliquer|propre|obtenir|rentrer|mal|pleurer|essayer|repeter|societe|parfois|politique|oreille|payer|politique|apporter|fenetre|derriere|possible|fortune|compte|champ|manier|vraiment|immense|action|boire|public|garçon|pareil|bleu|sourire|couleur|coucher|papier|d'autres|mal|fort|bientot|causer|piece|montagne|sol|œuvre|partout|trente|exister|cours|raconter|serrer|songer|desir|manquer|cour|nommer|bord|douleur|conduire|salle|saisir|premier|comment|projet|demeurer|simple|etude|remettre|journal|geste|disparaitre|battre|toucher|situation|oiseau|necessaire|exemple|siecle|apparaitre|souffrir|million|prix|groupe|centre|malheur|honneur|fermer|accepter|garde|mauvais|tendre|naitre|sauver|entier|parmi|probleme|larme|avancer|chien|peau|reste||||traverser|nombre|debout|mesure|social|souvenir|article|vue|couvrir|age|gagner|systeme|long|former|plaire|embrasser|reve|oser|afin de|passion|auquel|rapport|refuser|important|decider|produire|soldat|levre|signe|verite|charger|mariage|meler|certain|plan|cesser|ressembler|dos|marche|souvenir|dame|chanter|plutot|conseil|sou|triste|coin|jardin|joli|soit|empecher|doigt|objet|fer|lendemain|lentement|combien|approcher|prier|train|esperer|papa|different|valeur|jeu|echapper|glisser|secret|haut|vieillard|briller|docteur|bruler|terrible|placer|ton|jambe|juger|suffire|endroit|minute|atteindre|nuage|presence|fou|epaule|leger|feuille|liberte|journee|libre|annoncer|avenir|sourire|hier|resultat|elever|acheter|mener|preparer|pourquoi|hotel|semaine|foret|assurer|pur|qualite|prince|bien|egalement|deviner|medecin|considerer|volonte|seigneur|effort|quelque|vert|art|moindre|demain|quarante|cinquante|foule|appartenir|aussitot|ligne|representer|tromper|interieur|vendre|beaute|riche|craindre|etrange|emporter|ensuite|soin|naturel|hasard|puis|condition|quinze|classe|voyage|aupres|present|caractere|attention|gris||||or|rouler|faible|posseder|scene|difficile|français|reveiller|foi|aider|decouvrir|odeur|choisir|musique|oncle|evenement|prononcer|village|taire|envie|midi|ensemble|expression|herbe|vieux|pluie|pres|bas|rever|appuyer|etendre|apres|general|lutte|trembler|reponse|grace|espace|habitude|defendre|memoire|creer|grave|maintenir|verre|campagne|quelqu'un|juge|genou|impossible|fete|indiquer|pret|promettre|relever|abandonner|ignorer|large|parent|colere|exprimer|etoile|devoir|conscience|existence|accompagner|immobile|adresser|observer|juste|puissance|matiere|sable|separer|marier|prevoir|vivant|accord|hiver|retour|autrefois|genre|d'autres|vif|amener|obliger|acte|image|horizon|eclairer|poursuivre|danger|livrer|role|escalier|gout|bete|ceci|recherche|membre|pain|phrase|contenir|rire|fuir|couler|terme|eaux|moyen|police|rocher|proposer|tranquille|unique|eprouver|retenir|type|vin|superieur|attacher|voler|sec|justice|epoque|passage|somme|science|surprendre|cote|doucement|gauche|faute|ecole|bon|ensemble|rayon|briser|sujet|imaginer|diriger|douze|en|l'une|dernier|avis|parvenir|ouvert|penetrer|poete|meilleur||||paysan|remarquer|chair|eviter|soudain|succes|ile|etablir|reussir|pencher|habiter|entourer|declarer|detail|arme|realite|confiance|masse|crise|etonner|poste|dresser|durer|depuis|FAUX|fixer|enorme|principe|direction|taille|desirer|sante|ventre|marche|puissant|simplement|environ|tellement|arracher|entrainer|soutenir|couper|trou|inconnu|pont|lune|dehors|certes|beaux|robe|douter|retirer|cesse|brusquement|entree|source|camarade|dent|quant a|connaissance|cou|but|promener|vague|element|fil|voie|nez|forcer|particulier|discours|maladie|chaleur|gloire|vide|examiner|revoir|aide|debut|ennemi|second|aile|flamme|chaise|lourd|sein|veritable|toit|remplir|terminer|vaste|nu|poussiere|nord|tenter|emotion|hors|un|remonter|revolution|theatre|armee|court|noir|appartement|semblable|installer|haine|jeune|position|seconde|frais|appel|soulever|espoir|allumer|imposer|avant|respirer|arriere|baisser|droite|poitrine|mort|jeunesse|bureau|sac|etranger|courage|souffler|jaune|page|etranger|etc|miser|passe|rapide|digne|chaud|propos|attirer|preter|clair|amuser|occasion|voile|eclater|importance|quartier|soi||||auteur|religion|palais|reunir|traiter|flot|intelligence|tantot|voisin|carte|secret|animal|ete|trainer|cabinet|morceau|employer|capable|souffrance|marquer|prouver|importer|titre|desert|facile|spectacle|exiger|reposer|depart|fier|danser|demande|saluer|lueur|joue|saint|accorder|priere|achever|avouer|distinguer|emmener|fonction|durant|haut|aspect|sommeil|eclat|moitie|demi|calme|contraire|colline|agiter|hesiter|terrain|rare|poids|sonner|changement|charge|davantage|composer|enlever|poche|rejoindre|son|interieur|veille|ramener|fruit|complet|etudier|partager|croix|suivant|chasser|interrompre|eloigner|tresor|compagnie|etroit|cuisine|reduire|engager|egal|empire|nation|eteindre|recommencer|sauter|plaindre|conversation|soiree|violent|impression|trait|devant|preferer|reveler|sien|magnifique|desespoir|temoin|visite|respect|solitude|subir|dela|prochain|anglais|rapporter|couter|reflechir|officier|remercier|deposer|fauteuil|fumer|tot|affirmer|relation|fumee|convenir|branche|malade|circonstance|ouvrage|compagnon|vetir|experience|port|accomplir|avec|resoudre|plonger|goutte|mien|chant|detruire|combat|personnage|aventure|interesser|disposer|absence|machine|aucun|grace|chaine||||honte|fait|lisser|faim|plaine|verser|pointe|obeir|preuve|eternel|lutter|pretendre|bataille|construire|energie|victime|sauvage|soumettre|usage|peser|double|tache|guere|hauteur|troubler|tendre|beau|curiosite|repandre|glace|resister|froid|prison|etage|billet|droit|serieux|proteger|pauvre|rose|enfermer|attitude|dur|mode|neuf|crainte|creuser|grandir|enfoncer|vetement|envelopper|vague|prevenir|violence|inspirer|inutile|content|courant|folie|pitie|intention|ramasser|endormir|inventer|trace|toile|presser|confier|effacer|reculer|user|blanc|nourrir|dangereux|poesie|sommet|remplacer|souhaiter|avance|autorite|epais|inquietude|choix|tombe|marchand|nombreux|muet|signer|absolument|cercle|interroger|dominer|defaut|enfance|faveur|reel|commander|supposer|depasser|sourd|cruel|dimanche|erreur|cerveau|accuser|arrivee|rapidement|vol|habiller|condamner|lors|menacer|seuil|ecraser|perte|troisieme|chance|vieil|meme|ceder|douceur|droite|vide|autrement|drole|ruine|ecarter|rang|reclamer|chiffre|voisin|militaire|roche|distance|apparence|dessiner|conclure|françois|lier|discussion|admettre|banc|terreur|attaquer|vers|respecter|rose|silencieux|anglais|course||||portier|chat|pendre|supporter|tempete|parfaitement|paysage|quart|figurer|profiter|accrocher|calmer|satisfaire|public|race|valoir|barbe|signifier|couche|inquieter|colon|desormais|fidele|assister|rideau|inviter|dechirer|fatigue|risquer|regle|gauche|parcourir|present|rejeter|naissance|loup|renoncer|completement|extraordinaire|veiller|transformer|tracer|chute|divers|resistance|contenter|chemise|mince|naturellement|siege|as|patron|calme|meriter|printemps|angoisse|precipiter|rompre|habitant|plein|caresser|metier|etouffer|animer|note|passe|fine|fixe|casser|fusil|rond|agent|fonder|roman|franchir|plante|abattre|discuter|fatiguer|humide|reflexion|consentir|accent|curieux|repas|etendue|regretter|joindre|profondement|secours|commencement|corde|secretaire|vaincre|saison|precieux|precis|consulter|hair|repousser|paupiere|certainement|tapis|noire|chasse|executer|nerveux|nul|commun|exposer|clef|claire|voyager|haute|renverser|sueur|age|ferme|rassurer|retomber|decrire|mentir|instinct|armer|paquet|drame|absolu|savoir|mine|vision|etaler|sentier|demain|beau|blond|essuyer|planche|preceder|dehors|salut|tache|designer|fin|abri|detacher|recueillir|rencontre|croiser|entretenir|rouge||||professeur|surveiller|visible|perdu|reserver|bas|lien|queue|bande|confondre|grain|mensonge|degager|probablement|illusion|incapable|parer|epreuve|immediatement|attente|visiter|instrument|evidemment|auparavant|detourner|explication|regulier|reproche|souci|plier|extreme|accueillir|juif|leçon|redevenir|approuver|parfait|emparer|aborder|heurter|tel|noyer|semer|ferme|manche|rage|gre|guider|piquer|meilleur|
  21. word_list_2 = abaisse|abandonne|abasourdi|abattre|abeti|abhorre|abime|aboli|abonde|abonne|aborde|abouti|aboye|abrege|abreuve|abrite|abruti|absente|absoudre|absteni|abstraire|abuse|accable|accapare|accede|accelere|accentue|accepte|accole|accommode|accompagne|accompli|accorde|accouche|accouri|accroche|accroire|accroitre|accroupi|accueilli|accumule|accuse|acharne|achemine|achete|acheve|aciere|acisele|acqueri|acquiesce|acquitte|acte|active|actualise|adapte|additionne|adhere|adire|adjoindre|admettre|administre|admire|adonne|adopte|adore|adouci|adresse|adveni|aere|affaibli|affecte|affectionne|affere|affermi|affiche|affine|affirme|afflige|affole|affranchi|affronte|agace|agenouille|aggrave|agi|agite|agoni|agrafe|agrandi|agree|agrege|agresse|agrippe|aguerri|aide|aiguille|aiguise|aille|aime|aire|ajoute|alerte|aliene|aligne|alimente|alite|alleche|allege|allegue|alle|allie|allonge|alloue|allume|alourdi|altere|alune|aluni|amarre|amasse|ameliore|amenage|amene|amenuise|amerri|amoindri|amoncele|amorce|amorti|amoure|amplifie|amuï|amuse|analyse|aneanti|anime|annihile|annonce|annote|annule|anticipe|apaise|apercevoi|apeure|apitoye|aplani|aplati|apparaitre|apparente|apparie|apparoi|apparteni|appauvri|appele|appendre|applaudi|applique|apporte|appose|apprecie|apprehende|apprendre|apprete|approche|approfondi|approprie|approuve|approvisionne|appuye|arbore|argue|arrache|arrange|arrete|arrive|arrondi|arrose|aspire|assagi|assailli|assaini|assassine|assavoi|assemble|assene|assene|asseoi|asservi|assiege|assimile|assiste|associe|assombri|assomme|assorti|assoupi|assoupli|assouvi|assujetti|assume|assure|astreindre|attache|attaque|attarde|atteindre|attele|attendre|attendri|attente|attenue|atterre|atterri|atteste|attire|attise|attrape|attribue|augmente|autorise|autosuggestionne|avale|avance|aventure|avere|averti|avise|avoi|avoue|avoye|axe|baigne|baille|baille|baisse|balade|balance|balaye|balbutie|bande|banni|baptise|barre|barri|bascule|base|bate|bati|battre|bavarde|bave|baye|bee|begaye|bele|beneficie|beni|berce|besogne|bienveni|bine|bipe|bise|blague|blame|blanchi|blemi|blesse|bleui|bloque|blotti|boire|boise|boite|boite|bonde|bondi|bonifie|bosse|botte|bouche|boude|bouffe|bouge|bouilli|boule|bouleverse|bourre|bouscule|boute|braire|brame|branche|brandi|branle|braye|brevete|bricole|brille|brimbale|brise|bronze|brosse|broute|broye|bruire|brule|brume|bruni|budgete|burine|cache|cachete|calcule|cale|calme|cane|capele|cape|capte|caquete|caracole|caracterise|caresse|carrele|case|casse|cause|cave|cede|ceindre|celebre|cele|cerne|certifie|cesse|chahute|chaloi|chancele|change|chante|charge|charme|charrie|chasse|chatie|chauffe|chausse|cherche|cheri|cherre|chevauche|chiale|choi|choisi|chope|choque|choye|chuchote|chute|circoncire|circonscrire|circule|cire|cisele|cite|claque|clarifie|classe|clignote|clique|clone|clore|cloture|cloue|coche|coche|cogite|cogne|coiffe|coince|coïncide|collabore|collecte|collectionne|colle|colore|colorie|combattre|combine|comble|commande|commence|commente|commerce|commettre|communique|comparaitre|compare|compati|compense|compile|complaire|complete|complexifie|complique|comporte|compose|comprendre|compromettre|compte|concede|concentre|concerne|concevoi|concilie|conclure|concouri|concurrence|condamne|conditionne|conduire|confectionne|confere|confesse|confie|configure|confire|confirme|confondre|conforme|confronte|congele|conjoindre|conjugue|conjure|connaitre|connecte|conqueri|consacre|conseille|consenti|conserve|considere|consiste|console|consomme|constate|constitue|construire|consulte|consume|contacte|contemple|conteni|contente|conte|continue|contraindre|contrarie|contredire|contrefaire|contre|contreveni|contribue|controle|convaincre|conveni|converti|convie|convoite|convoque|convoye|coopere|coordonne|copie|correle|correspondre|corrige|corrobore|corrompre|cote|cotise|cotoye|couche|coudre|couine|coule|coupe|courbature|couri|courre|coute|couve|couvri|crache|craindre|crame|craque|credite|cree|creuse|creve|crie|critique|croire|croise|croitre|croque|crosse|crotte|croupi|cueilli|cuire|cuisine|cultive|cumule|cure|daigne|dalle|dame|damne|danse|date|deballe|debarque|debarrasse|debattre|debite|deblatere|deblaye|debloque|deborde|debouche|debouilli|debrouille|debute|decale|decede|decele|decevoi|decharge|dechiquete|dechire|dechoi|decide|declare|declenche|decline|decolle|decommettre|deconne|decore|decoudre|decoupe|decourage|decouvri|decrie|decrire|decroche|decroitre|dedicace|dedie|dedire|deduire|defailli|defaire|defendre|defie|defile|defini|defonce|defraye|degage|degele|degenere|degluti|degourdi|degoute|deguerpi|deguste|dejeune|delaye|delegue|delie|delivre|demande|demantele|demarre|demenage|demene|dementi|demettre|demeure|demissionne|demoli|demontre|demordre|demuni|denie|denigre|denonce|denue|depanne|departi|depasse|depece|depeche|depeindre|dependre|depense|deperi|deplace|deplaire|deplie|deploye|depose|deprime|derange|derape|deroge|deroule|desapprendre|descendre|desespere|deshabille|designe|desire|desiste|desobei|desole|dessaisi|desservi|dessine|destine|detache|detaille|detale|detecte|deteindre|detendre|deteni|deteriore|determine|deteste|detruire|devance|developpe|deveni|deveti|devie|devine|devoile|devoi|devore|devoue|devoye|diagnostique|dialogue|dicte|differencie|differe|diffuse|digere|dilue|diminue|dine|dire|dirige|disconveni|discouri|discute|disjoindre|disparaitre|dispense|disperse|dispose|dispute|dissipe|dissoudre|distingue|distraire|distribue|diverge|diverti|divise|divorce|divulgue|doigte|dole|domine|donne|dope|dore|dorlote|dormi|dote|double|douche|doue|doute|drague|drape|dresse|dupe|duplique|durci|dure|ebahi|ebattre|eberlue|ebloui|echange|echappe|eche|echoi|echoue|eclabousse|eclairci|eclaire|eclate|eclore|ecoeure|econduire|ecoule|ecoute|ecrase|ecrie|ecrire|edite|eduque|efface|effectue|effleure|effondre|efforce|effraye|egale|egare|egaye|egoutte|egraine|egrene|ejacule|elabore|elague|elance|elargi|eleve|elimine|elire|eloigne|emane|emballe|embarque|embarrasse|embatre|embauche|embelli|embete|emboire|embrase|embrasse|embraye|emerge|emettre|emie|emmele|emmenage|emmene|emoudre|emouvoi|empare|empeche|empiete|empire|empli|employe|emporte|empreindre|empresse|emprunte|emule|encaisse|enchaine|enchante|encheri|enclore|encourage|encouri|endommage|endormi|enduire|endure|enerve|enferme|enfile|enflamme|enfle|enfonce|enfoui|enfreindre|enfui|engage|engendre|englouti|engueule|enivre|enjoindre|enlace|enleve|ennoye|ennuye|enonce|enorgueilli|enoue|enqueri|enquete|enraye|enregistre|enrhume|enrichi|enseigne|enseveli|ensorcele|ensuivre|entache|entame|entendre|ente|enterine|enterre|enthousiasme|entoure|entraine|entre-haï|entreprendre|entre|entreteni|entrevoi|entrouvri|enuclee|enumere|envahi|enveloppe|envie|envisage|envole|envoye|epaissi|epandre|epanoui|epargne|epate|epele|epie|epine|epluche|epouse|epoussete|eprendre|eprouve|epuise|equipe|equivaloi|erre|escalade|espere|essaye|essouffle|essuye|este|estime|etabli|etale|etaye|eteindre|etendre|eternue|etincele|etiquete|etire|etoffe|etonne|etouffe|etourdi|etre|etreci|etreindre|etrenne|etudie|evacue|evade|evalue|evanoui|eveille|evite|evolue|evoque|exagere|examine|exauce|excede|excelle|excite|exclame|exclure|excuse|execre|execute|exempte|exerce|exige|existe|expedie|expire|explique|exploite|explore|explose|expose|exprime|extasie|extraire|fabrique|fache|facilite|façonne|facture|fade|faibli|faille|failli|faire|falloi|familiarise|fane|farci|fascine|fatigue|faute|favorise|faxe|feindre|fele|felicite|fendre|feri|ferme|festoye|fete|feuillete|fiance|ficele|fiche|fie|fige|figure|file|filme|finalise|fini|fixe|flamboye|flane|flatte|flechi|fleuri|flotte|flute|foire|fonce|fonctionne|fonde|fondre|force|fore|forge|formate|forme|formule|foudroye|fouette|fouille|foui|fourni|fourvoye|foutre|fraichi|franchi|frappe|fraye|freine|fremi|frequente|frire|froisse|frole|frotte|fui|fume|furete|fuse|fusionne|gache|gage|gagne|galope|garanti|garde|gare|garni|gaspille|gate|gaze|geindre|gele|gemi|gene|genere|gere|gesi|gite|glace|glande|glisse|gonfle|goure|goute|grandi|grasseye|gratte|grave|gravi|gree|grele|greve|greve|grignote|grimpe|grogne|gronde|grossi|gueri|guette|gueule|guide|habilite|habille|habite|habitue|hable|hache|haï|hale|hale|halete|hallucine|hante|happe|harcele|hate|hausse|have|havi|heberge|hele|henni|herite|hesite|heurte|homogeneise|honni|honore|houe|hue|hui|hume|humilie|hurle|identifie|ignore|illumine|illustre|image|imagine|imite|immisce|impacte|imparti|impatiente|implante|implemente|implique|importe|importune|impose|impregne|impressionne|imprime|inaugure|incite|incline|inclure|incombe|indique|induire|influence|influe|informe|inhibe|initie|inonde|inquiete|inscrire|insere|insinue|insiste|inspire|installe|instruire|integre|intensifie|interagi|interdire|interesse|interfere|interpelle|interprete|interroge|interrompre|interveni|interverti|interviewe|intrigue|introduire|invente|inverse|investigue|investi|invite|iode|irrite|isole|issi|jailli|jalouse|jappe|jase|jauni|jete|jeune|joindre|jongle|joue|joui|juge|jure|justifie|jute|kiffe|kote|lace|lache|laine|laisse|lamente|lame|lance|langui|lape|largue|lasse|lave|laye|leche|legue|lese|leurre|leve|libere|licencie|lie|limite|lire|liste|livre|loge|longe|loti|loue|loupe|louvoye|love|luire|lute|lutte|luxe|mache|maigri|mainteni|maitrise|manage|mande|mange|manie|manifeste|manipule|manque|maquille|marche|marie|marque|marre|martele|masse|mate|mate|maudire|maugree|mecroire|medire|medite|mefie|melange|mele|menace|menage|mendie|mene|mentionne|menti|meprendre|merite|messeoi|mesure|metre|mettre|meule|meurtri|miaule|migre|mijote|mime|minci|mine|mire|mise|modele|modere|modifie|moisi|molli|monnaye|monte|montre|moque|mordre|morfondre|motive|mouche|moudre|mouille|moule|mouri|mouve|mouvoi|mue|multiplie|muni|mure|muri|murmure|muse|mute|nage|naitre|nargue|narre|navigue|necessite|neglige|negocie|neige|nettoye|nie|nivele|noirci|nomine|nomme|note|notifie|noue|nourri|noye|nue|nuire|obei|oblige|obscurci|obsede|observe|obtempere|obteni|occasionne|occire|occlure|occupe|ocre|octroye|oeuvre|offense|officie|offri|oindre|omettre|opere|oppose|opte|ordonne|organise|oriente|orne|oscille|ose|ote|oublie|ouï|ourdi|ouvre|ouvri|pagaye|page|paitre|pali|pallie|pane|panne|panse|paraitre|parametre|parcouri|pardonne|pare|parfaire|parie|parle|parraine|partage|participe|parti|parveni|passe|passionne|pate|patiente|patine|pati|pause|pave|paye|peaufine|peche|peche|pedale|peigne|peindre|peine|peinture|pele|pellete|penche|pendre|penetre|pense|perce|percevoi|perdre|perdure|perennise|peri|permettre|persevere|persiste|persuade|perturbe|pese|petri|photographie|piege|pife|pince|pipe|pique|place|plaide|plaindre|plaire|plaisante|plane|planifie|plante|pleure|pleuvoi|plie|plonge|ploye|poile|poindre|pointe|poli|pollue|pondre|porte|pose|positionne|possede|poste|postule|pote|pourri|poursuivre|pourvoi|pousse|pouvoi|pratique|precede|preche|precipite|precise|preconise|predire|preetabli|prefere|prendre|prenomme|preoccupe|prepare|prescrire|presente|preserve|pressenti|presse|pretendre|prete|prevaloi|preveni|prevoi|prie|prime|prise|prive|privilegie|procede|procure|prodigue|produire|profite|programme|progresse|projete|prolonge|promene|promettre|promouvoi|prone|prononce|propose|proscrire|protege|prouve|proveni|provoque|publie|pue|puise|pullule|puni|qualifie|quemande|queri|queri|questionne|quete|quitte|rabattre|raccourci|raccroche|rachete|raconte|raffole|rafraichi|rage|raidi|raille|raire|raisonne|rajeuni|rajoute|ralenti|rale|ralle|rallie|ramasse|ramene|rame|ramolli|range|rapatrie|rapetisse|rappele|rapporte|rapproche|rase|rassasie|rassemble|rasseoi|rassi|rassure|rate|rattache|rattrape|ravage|ravi|ravoi|raye|rayonne|reagi|realise|reapparaitre|reapprendre|rebondi|recele|recele|recense|receptionne|recevoi|rechauffe|recherche|recite|reclame|recolte|recommande|recommence|recompense|reconcilie|reconduire|reconforte|reconnaitre|reconqueri|reconstruire|recontacte|recopie|recoudre|recouri|recouvre|recouvri|recree|recree|recrire|recrute|rectifie|recueilli|recule|recupere|redecouvri|redemarre|redescendre|redeveni|redevoi|redige|redire|redonne|reduire|reecrire|reelire|ree|reessaye|refaire|reference|refere|referme|reflechi|reflete|refroidi|refugie|refuse|regale|regarde|regi|reglemente|regle|regne|regrette|regroupe|reinscrire|reitere|rejete|rejoindre|rejoui|relache|relance|relate|relaye|releve|relie|relire|reluire|remarque|rembourse|remedie|rememore|remercie|remettre|remonte|remplace|rempli|remporte|remue|remunere|renaitre|rencheri|rencontre|rendormi|rendre|renforce|renie|renomme|renonce|renouvele|renseigne|rente|rentre|renverse|renvoye|repaitre|repandre|reparaitre|repare|reparle|reparti|reparti|repasse|repeindre|rependre|repenti|repere|repertorie|repete|repleuvoi|replie|repondre|reporte|repose|repousse|reprendre|represente|reproche|reproduire|requeri|reserve|reside|resilie|resiste|resonne|resoudre|respecte|respire|resplendi|ressaisi|ressaye|ressemble|ressenti|resserre|resservi|ressorti|ressuscite|restaure|reste|restitue|restreindre|resulte|resume|retabli|retarde|reteni|retenti|retire|retombe|retourne|retranscrire|retransmettre|retreci|retrouve|reuni|reussi|revaloi|revasse|reveille|revele|revendique|revendre|reveni|reve|reveti|revise|revivre|revoi|revouloi|rigole|rime|rince|rire|risque|rode|rode|rompre|ronfle|ronge|ronronne|roque|rose|roti|rougi|roule|rouspete|rouvri|rue|rugi|ruissele|sacrifie|saigne|sailli|saisi|sale|sali|salope|salue|sanglote|saoule|sape|satisfaire|saure|saute|sauvegarde|sauve|savoi|savonne|savoure|scanne|scelle|scie|scinde|scrute|seche|secoue|secouri|seduire|sejourne|selectionne|selle|semble|seme|senti|seoi|separe|serre|serti|servi|sevi|sevre|siege|siffle|signale|signe|signifie|simplifie|sirote|situe|skie|soigne|sollicite|solutionne|sommeille|somme|songe|sonne|sorti|soucie|soude|soudoye|souffle|souffri|souhaite|soulage|soule|souleve|souligne|soumettre|soupçonne|soupe|soupire|sourdre|sourire|sous-entendre|sous-tendre|souscrire|soustraire|souteni|souveni|specifie|statue|stipule|stocke|stoppe|stresse|stupefaire|stupefie|subi|subodore|subsiste|substitue|subveni|succede|succombe|suce|sue|suffire|suffoque|suggere|suicide|suivre|supplee|supplie|supporte|suppose|supprime|suppute|surfaire|surfe|surgi|surprendre|sursaute|surseoi|surveille|surveni|survivre|suscite|suspendre|sustente|susurre|tache|tache|taille|taire|tale|tanne|tape|tapi|taquine|tarde|tare|tari|tasse|tate|tatoue|teindre|teinte|telecharge|telephone|temoigne|tendre|teni|tente|termine|terni|teste|tete|tete|tiedi|tinte|tire|titille|toile|toise|tolere|tombe|tome|tondre|tonne|toque|tordre|touche|tourne|tournoye|tousse|tracasse|trace|traduire|trahi|traine|traire|traite|trame|transcrire|transfere|transforme|transmettre|transparaitre|transporte|travaille|traverse|tremble|trempe|tressailli|triche|tricote|trie|tripote|trompe|trotte|trouble|troue|trouve|tue|tuile|tutoye|uni|urge|urine|use|utilise|vagi|vague|vaincre|valide|valoi|vanne|vante|vaque|varie|vase|veille|vele|vendre|venere|venge|veni|vente|verdi|verifie|verni|verrouille|verse|veti|vexe|vide|vieilli|vine|viole|vire|vise|visionne|visite|visse|vivre|vogue|voile|voi|vole|volete|vomi|vote|voue|vouloi|voute|vouvoye|voyage|zappe|zezaye
  22.  
  23. ; Coupe en tableau
  24. StringSplit, word_list_1_Array, word_list_1 , |  
  25. StringSplit, word_list_2_Array, word_list_2 , |
  26. StringSplit, word_list_3_Array, word_list_3 , |
  27.  
  28. ; Trouve la taille max de la liste
  29. word_list_1_max = % word_list_1_Array%a_index%
  30. word_list_2_max = % word_list_2_Array%a_index%
  31. word_list_3_max = % word_list_3_Array%a_index%
  32.  
  33. ;**********************
  34. ;Menu de l'icone
  35. ;**********************
  36. Menu, tray, NoStandard
  37. Menu, tray, add, Fermer, menu_fermer
  38.  
  39. ;**********************
  40. ;Fenetre générale
  41. ;**********************
  42.  
  43. Postion_x := ((A_ScreenWidth/2) - 100)
  44. Postion_y := ((A_ScreenHeight/2) - 50)
  45.  
  46. Gui, show, x%Postion_x% y%Postion_y% w460 h160, V1.0 - Par Tlams
  47. Gui, +toolwindow +alwaysontop ;toujours au premier plan , pas de barre de tache
  48.  
  49. Gui, Add, Text, w200 x10 y5, Générateur de mots de passes
  50. Gui, Add, GroupBox, x10 y20 h80 w130,Complexité
  51.  
  52. Gui, add, radio,x15 y35 vlow, Simple
  53. Gui, add, radio,x15 y55 vmed Checked, Classique
  54. Gui, add, radio,x15 y75 vhar , Elevé
  55.  
  56. Gui, Add, GroupBox, x150 y20 h80 w145,Filtres de suppression
  57. Gui, Add, Checkbox, x160 y35 vnum, Chiffres
  58. Gui, Add, Checkbox, x160 y55 vspe, Caractères spéciaux
  59. Gui, Add, Checkbox, x160 y75 vmaj, Majuscules
  60.  
  61. Gui, Add, Button, x10 y110 w150 ggen , Générer
  62. Gui, Add, Edit, x180 y112 w170 vres1, Résultat
  63. Gui, Add, text, x360 y114 w200 vori1,
  64.  
  65. Gui, Add, Edit, x180 y142 w170 vres2, Résultat
  66. Gui, Add, text, x360 y144 w200 vori2,
  67.  
  68. Gui, Add, GroupBox, x305 y20 h80 w145,Nombres de caractères
  69. Gui, Add, DropDownList, x315 y35 w100 Choose7 vnbcarract, 6|7|8|9|10|11|12|13|14|15|16
  70. Gui, Add, DropDownList, x315 y65 w100 Choose2 vnbcarract_var, Exact|+/- 1|+/- 2|+/- 3
  71.  
  72. Gui, Add, Text, w150 x10 y144   vresistancevalue,
  73. GuiControl, +ReadOnly,res1,
  74. GuiControl, +ReadOnly,res2,
  75. return
  76.  
  77. ;debut
  78. gen:
  79. alert = 0
  80. nbcarract_min = 1
  81. round_pw = 1
  82. loop 2
  83. {
  84.     compteur_test = 0
  85.     nombre_carac = -1
  86.     while (nombre_carac < nbcarract_min) or (nombre_carac > nbcarract_max)
  87.     {
  88.         ; Recup. les choix
  89.         GuiControlGet, num
  90.         GuiControlGet, spe
  91.         GuiControlGet, maj
  92.  
  93.         GuiControlGet, low
  94.         GuiControlGet, med
  95.         GuiControlGet, har
  96.  
  97.         GuiControlGet, nbcarract
  98.         GuiControlGet, nbcarract_var
  99.  
  100.         if nbcarract_var = Exact
  101.             variance = 0
  102.         else if nbcarract_var = +/- 1
  103.             variance = 1
  104.         else if nbcarract_var = +/- 2
  105.             variance = 2
  106.         else if nbcarract_var = +/- 3
  107.             variance = 3
  108.  
  109.         ;Nombre max/min de caract. en fct des choix
  110.         nbcarract_max := nbcarract + variance
  111.         nbcarract_min := nbcarract - variance
  112.        
  113.         ;Choix de 3 nombres aléatoire
  114.         random, rand_wd1,1,% word_list_1_max
  115.         random, rand_wd2,1,% word_list_2_max
  116.         random, rand_wd3,1,% word_list_3_max
  117.  
  118.         ;On retrouve les mots correspondant
  119.         word_1 := % word_list_1_Array%rand_wd1%
  120.         word_2 := % word_list_2_Array%rand_wd2%
  121.         word_3 := % word_list_3_Array%rand_wd3%
  122.  
  123.         space := " "
  124.         word_result =
  125.         compteur_m = 1
  126.         ; Traite lettre par lettre la chaine en fonction des choix.
  127.         while (compteur_m) <= 3
  128.         {
  129.             if (wordc_%compteur_m% := StrSplit(word_%compteur_m%, ""))
  130.             {
  131.                 Length := StrLen(word_%compteur_m%)
  132.                 compteur_l = 1
  133.                 while (compteur_l < Length + 1)
  134.                 {
  135.                     if (har = 1)
  136.                     {
  137.                         if (maj = 0)
  138.                         {
  139.                             letter = % wordc_%compteur_m%[compteur_l]
  140.                             random, changuper, 1,9999
  141.                             if mod(changuper,2) = 0
  142.                                 StringUpper, letter  , letter
  143.                         }
  144.                     }          
  145.                     else if (med = 1)
  146.                     {
  147.                         if (maj = 0)
  148.                         {
  149.                             letter = % wordc_%compteur_m%[compteur_l]
  150.                             if (compteur_l = 1)
  151.                                 StringUpper, letter , letter             
  152.                         }
  153.                        
  154.                     }          
  155.                     else if (low = 1)
  156.                     {
  157.                         if (maj = 0)
  158.                         {
  159.                             letter = % wordc_%compteur_m%[compteur_l]
  160.                             if (compteur_l = 1) and (compteur_m = 1)
  161.                                     StringUpper, letter , letter
  162.                         }
  163.                     }
  164.                     if (maj = 1)
  165.                         letter = % wordc_%compteur_m%[compteur_l]
  166.        
  167.                     word_result  = %word_result%%letter%           
  168.                 compteur_l++
  169.                 }  
  170.             }  
  171.             compteur_m++
  172.         }      
  173.  
  174.         ;Ici on traite sur toute la chaine
  175.         if (num = 0)
  176.         {
  177.             if (har = 1)
  178.             {
  179.                 ;On remplace toutes les lettres par des chiffres
  180.                 ;StringReplace, result, result, o , 0 , 1
  181.                 replace :=   {a:"4",b:"8",e:"3",g:"6",i:"1",k:"x",o:"0",p:"9",s:"5",t:"7",z:"2"}
  182.                 For what, with in replace
  183.                 {
  184.                     random, changnum, 1,9999
  185.                     if mod(changnum,2) = 0
  186.                         StringReplace, word_result, word_result, %what%, %with%, All
  187.                 }
  188.             }
  189.             else if (med = 1)
  190.             {
  191.                 ;Rajout d'un nombre aléatoire en fin
  192.                 random, nbale, 1000,99999
  193.                 word_result = %word_result%%nbale%
  194.             }
  195.             else
  196.             {
  197.                 ;Juste un chiffre
  198.                 random, nbale, 0,9
  199.                 word_result = %word_result%%nbale%
  200.             }
  201.         }  
  202.  
  203.         if (spe = 0)
  204.         {
  205.             addspe:= object( 1, "!", 2, "?", 3, "#", 4, "&" )
  206.             random, spechoix, 1,4
  207.             replace :=   {c:"(", f:"|=", h:"|-|", j:";", m:"|v|", n:"|\|", p:"|*", v:"\/", x:"><"}
  208.             if (har = 1)
  209.             {
  210.                 ;On remplace toutes les lettres par des chiffres
  211.                 For what, with in replace
  212.                     StringReplace,  word_result,  word_result, %what%, %with%, All
  213.             }
  214.             else if (med = 1)
  215.             {
  216.                 random, changspe, 1,9999
  217.                 For what, with in replace
  218.                     if mod(changspe,2) = 0
  219.                         StringReplace,  word_result,  word_result, %what%, %with%, All
  220.                 word_result = % word_result addspe[spechoix]
  221.             }
  222.             else   
  223.                 word_result = % word_result addspe[spechoix]
  224.         }
  225.         ;Affiche les résultats
  226.         if (round_pw = 1)
  227.         {
  228.             GuiControl, Text, res1,  % word_result
  229.             GuiControl, Text, ori1, % word_1 space  word_2 space word_3
  230.         }
  231.         else
  232.         {
  233.             GuiControl, Text, res2,  % word_result
  234.             GuiControl, Text, ori2, % word_1 space  word_2 space word_3
  235.         }
  236.         nombre_carac := StrLen(word_result)
  237.         compteur_test++
  238.         if (compteur_test > 8000) and (alert = 0)
  239.         {
  240.             msgbox La recherche est longue, vous devriez revoir vos paramètres.
  241.             alert = 1
  242.         }  
  243.     }
  244.     round_pw++
  245. }
  246. ; points max 35
  247. ; Caractere classique = 1
  248. resistance := nombre_carac
  249. ; Chiffres = 2
  250. if (num = 0)
  251.     resistance := resistance + 2
  252. ; Majuscules = 2
  253. if (maj = 0)
  254.     resistance := resistance + 2
  255. ; Caractere speciaux = 4
  256. if (spe = 0)
  257.     resistance := resistance + 4
  258. ; faible = 0
  259. if (low = 1)
  260.     resistance := resistance + 0
  261. ; normal = 4
  262. if (med = 1)
  263.     resistance := resistance + 4
  264. ; fort = 8
  265. if (har = 1)
  266.     resistance := resistance + 8
  267.  
  268. resistance := (( 100 / 35 ) * resistance)/10
  269. StringLeft, resistance , resistance , 4
  270. GuiControl, Text, resistancevalue, Indice de résistance: %resistance% /10
  271. return
  272.  
  273. GuiClose:
  274. ExitApp
  275. return
  276.  
  277. menu_fermer:
  278. exitapp
  279. return
  280.  
  281. StrSplit(ByRef InputVar, Delimiters="", OmitChars="") {
  282.     o := []
  283.     Loop, Parse, InputVar, % Delimiters, % OmitChars
  284.         o.Insert(A_LoopField)      
  285.     return o.MaxIndex() <= 1 ? "" : o
  286. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement