function programme() {

//On tire un nombre pair comprise entre 0 et length-2
n1=2*Math.floor(Math.random()*prefixes.length/2);
n2=2*Math.floor(Math.random()*suffixes.length/2);

prefixe=prefixes[n1];
suffixe=suffixes[n2];
sensPrefixe=prefixes[n1+1];
sensPrefixe=completerPrefixe(sensPrefixe);
sensSuffixe=suffixes[n2+1];



//document.forms[0].n1.value=n1;
//document.forms[0].n2.value=n2;
document.forms[0].neologisme.value=prefixe+suffixe;
document.forms[0].sens.value=sensSuffixe+' '+sensPrefixe;

}

function completerPrefixe(sensPrefixe) {
	if (sensPrefixe.substring(0,3)=='LE ')
		sensPrefixe='DU '+sensPrefixe.substring(3);
	else if (sensPrefixe.substring(0,4)=='LES ')
		sensPrefixe='DES '+sensPrefixe.substring(4);
	else if (sensPrefixe.substring(0,3)=='LA ' || sensPrefixe.substring(0,2)=='L\'')
		sensPrefixe='DE '+sensPrefixe;

	return sensPrefixe;

}

// Adjectifs ou noms avec déterminant pour compléments de nom
prefixes=new Array('CLEPTO','LE VOL','CHRONO','LE TEMPS','EPISTEMO','LA SCIENCE','LOGO','LE DISCOURS','PAN','DE TOUT','PATHO','LA MALADIE','CRYPTO','CACHE','EROTICO','L\'EROTISME','GNOSEO','LA CONNAISSANCE','ORCHIDO','LES TESTICULES','PARALLELO','LE PARALLELE','SEMIO','LE SENS','ERGO','LE TRAVAIL','GERONTO','LE VIEILLARD','COPRO','L\'EXCREMENT','MYCO','LE CHAMPIGNON','NECRO','LE MORT','PODO','LE PIED','PORNO','LE PORNO','SCATO','L\'EXCREMENT','DOXO','L\'OPINION','PLOUTO','LA RICHESSE','PHONO','LE SON','INFLATO','LE GONFLEMENT','PYRO','LE FEU','PSYCHO','L\'AME','LITHO','LA PIERRE','CHRYSO','L\'OR','PHILO','L\'AMOUR','TECHNO','LA TECHNIQUE','BIO','LA VIE','SPELEO','LA CAVERNE','TOPO','LE LIEU','ARCHEO','L\'ANCIEN','CEPHALO','LA TETE','CRYO','FROID','TERATO','LE MONSTRE','PAPYRO','LE PAPIER','PHYTO','LE VEGETAL','PHRENO','LE CERVEAU','MORPHO','LA FORME','SIDERO','LE CIEL','CHROMO','LA COULEUR','ALLO','L\'AUTRE','ANTHROPO','L\'HOMME','ADENO','LA GLANDE','AGRO','LE CHAMP','ARTHRO','L\'ARTICULATION','ASTRO','LE CIEL','AUTO','DE SOI MEME','BACTERIO','LA BACTERIE','BIBLIO','LE LIVRE','BRONCHO','LA BRONCHE','BUTYRO','LE BEURRE','CERCO','LA QUEUE','CHROMATO','LA COULEUR','EMBRYO','L\'EMBRYON','CINEMATO','LE CINEMA','DERMO','LA PEAU','HELIO','LE SOLEIL','HEMATO','LE SANG','HETERO','L\'AUTRE','HOMEO','LE SEMBLABLE','HYDRO','L\'EAU','METEO','LE CIEL','METRO','LA MESURE','NEURO','LES NERFS','PALEO','L\'ANCIEN','PHYSIO','LE CORPS','THERMO','LA CHALEUR','ZOO','L\'ANIMAL','TACHY','RAPIDE','ODO','LE CHEMIN','GEO','LA TERRE','NUCLEO','LE NOYAU','GRAPHO','L\'ECRITURE','STEREO','DANS L\'ESPACE (SOLIDE)','GENO','LA RACE','NOMO','LA LOI','GYRO','QUI TOURNE','ICONO','L\'IMAGE','ENDO','A L\'INTERIEUR','EXTRA','EN DEHORS','LATERO','A COTE','PROTO','PREMIER(E)','LOXO','OBLIQUE','BRADY','LENT(E)','MACRO','GRAND(E)','MICRO','PETIT(E)','TELE','A DISTANCE','CACO','MAUVAIS(E)','VIDEO','VIDEO','IDEO','LES IDEES','NEO','NOUVEAU (-VELLE)','SCHIZO','FENDU(E)','ISO','IDENTIQUE','RETRO','EN ARRIERE','TOMO','DECOUPE(E)','ULTRA','EXTREME','HEMI','A MOITIE','PERI','(AUTOUR DE)','MESO','LE MILIEU','GASTRO','LE VENTRE','BI','DOUBLE','DIPLO','DOUBLE','AERO','L\'AIR','CALLI','BEAU (BELLE)','EU','BIEN','ECO','LA MAISON (DOMESTIQUE)','CHIRO','LA MAIN','HIERO','SACRÉ','DEMO','LE PEUPLE','LIPO','LA GRAISSE','POLY','MULTIPLE','META','(INTROSPECTION)','XENO','L\'ETRANGER','RHINO','LE NEZ','PHOTO','LA LUMIERE','METRO','LA MESURE','ODONTO','LA DENT','OLIGO','TROP PETIT(E)','ONIRO','LE REVE','OPHTALMO','L\'OEIL','ORGASMO','LE PLAISIR','OMPHALO', 'LE NOMBRIL','ORBITO','LE CERCLE','OSTEO','L\'OS','OVO','L\'OEUF','OXYDO','L\'OXYGENE (ACIDE)','OLFACTO','L\'ODORAT','NARCO','LE SOMMEIL','NANO','NAIN(E)','THALASSO','LA MER','TETANO','LA TENSION','TRAUMATO', 'LA BLESSURE','ALGO','LA DOULEUR','PSEUDO','FACTICE','CYCLO','LA ROUE','SPERMO','LA SEMENCE','SARCO','LA CHAIR','RYTHMO','LE RHYTHME','GLOSSO','LA LANGUE','GLUCO','LE SUCRE','GYNECO','LA FEMME','LACRYMO','LES LARMES','LEUCO','BLANC(HE)','MAGNETO','L\'AIMANT','MASTO','LE SEIN','MEGALO','GRAND','MANO','LE FLUIDE','TRI','TRIPLE','MNEMO','LA MEMOIRE','MONO','UNIQUE','MYXO','LE RHUME','STATO','IMMOBILE','THEO','DE DIEU','RADIO','RADIO','PLURI','MULTIPLE (NOMBREUX)','PETRO','LA PIERRE','XYLO','LE BOIS','PHALLO','LE PHALLUS','PACHY','EPAIS','ORTHO','DROIT(E)','PROCTO','L\'ANUS','CHOREO','LA DANSE','STYLO','LE BATON','DENDRO','ARBORESCENT(E)','AGORA','LE LIEU PUBLIC','ANKILO','RESSERE(E)','ANDRO','LE MALE','DISCO','LE DISQUE','ELECTRO','ELECTRIQUE','HOLO','ENTIER(E)','ICHTO','LE POISSON','URTICO','L\'ORTIE','PHAGO','MANGÉ/QUI MANGE','PEDO','L\'ENFANT','PARA','(À COTÉ)');


// Noms
suffixes=new Array('GAME','MARIAGE','SE','AFFECTION','EDRE','EDIFICE','DYNE','ENERGIE','CERQUE','QUEUE','DROME','ROUTE','PATHE','MALADE','SCAPHE','VEHICULE','TOPE','LIEU','TRON','MACHINE','N','PARTICULE','ME','TUMEUR','METRE','MESURE','DRAME','THEATRE','IDE','APPARENCE','COSME','UNIVERS','SOME','CORPS','SPHERE','SPHERE','STASE','ARRET','TAPHE','TOMBEAU','TROPE','TENDANCE','MANE','MANIAQUE','GRAMME','MESSAGE','GENE','GENERATEUR','ELASTIQUE','ELASTIQUE','CINESE','MOUVEMENT','CRATE','POUVOIR','DYNAMIQUE','DYNAMIQUE','CYTE','CELLULE','PHRENE','CERVEAU','CEPHALE','TETE','THERAPEUTE','MEDECIN','PHILOSOPHE','PHILOSOPHE','PITHEQUE','SINGE','DIDACTE','ENSEIGNANT','PTERE','AILES','SEXUEL','SEXE','MANCIE','PREDICTION','DYNAMIQUE','MOUVEMENT','SAURE','ANCETRE','STAT','MAINTIEN','ZOAIRE','ANIMAL','RRAGIE','ECOULEMENT','LITHE','PIERRE','CLASTE','CASSEUR','MACHIE','COMBAT','LOGUE','SPECIALISTE','LYSE','DECOMPOSITION','SE','AFFECTION','ALGIE','DOULEUR','PHYSICIEN','PHYSICIEN','CHRONE','TEMPS','CHRONIQUE','REPETITION','DACTYLE','DOIGT','DOXE','OPINION','GONE','ANGLE','DUC','CONDUIT','MNESIE','MEMOIRE','MORPHE','DE LA FORME','PATHE','MALADE','PATHIE','MALADIE','PHOBIE','CRAINTE','PHILIE','AMOUR','PHONE','SON','PHONIE','SON','POLE','VILLE','THERME','CHALEUR','GENESE','COMMENCEMENT','GRAPHIE','ECRITURE',
'TROPE','CHERCHEUR','PHOBE','QUI A HORREUR','NAUTE','NAVIGATEUR','PHOBE','A HORREUR','CENTRISME','ETRE CENTRE AUTOUR','GRAPHE','QUI ECRIT','TROPISME','ATTIRANCE','LATRE','QUI ADORE','PHORE','PORTEUR','PHAGE','MANGEUR','VORE','DEVOREUR','PHILE','AMOUREUX','LOGIE','ETUDE','PLANE','AVION','DENDRON','ARBRE','GLYPHE','GRAVURE','SOPHIE','SAGESSE','NESIE','ILE','NOIA','PENSEE','THANASIE','MORT','TECHNIQUE','TECHNIQUE','TOMIE','DECOUPE','PHYLAXIE','PROTECTION','TROPIE','ATTIRANCE','CHIMIE','CHIMIE','SCOPE','VISIONNEUSE','SCOPIE','EXAMEN','GRADE','MARCHE','CENOSE','COMMUNAUTÉ','COPE','CHOC','CYCLE','CERCLE','SYNTHESE','COMPOSITION','STATIQUE','ARRET','LABE','PRISE','LEPTIE','FAIBLESSE','LEXIE','LECTURE','LYTIQUE','DECOMPOSITION','MANIE','OBSESSION','MIMIE','IMITATION','TYPE','MODELE','ITE','INFLAMMATION','DERME','PEAU','PAROXYSME','MAXIMUM','PHOSE','A LA FACON','PHYSE','CROISSANCE','PLASTIE', 'FAÇONNEMENT','PLEGIE','PARALYSIE','PLEXIE','CHOC','POROSE','LE PASSAGE','PRAXIE','ACTION','PTYSIE','CRACHER','PTOSE','CHUTE','BOLE','JET','DELPHE','FRERE','DIAGNOSTIC','DIAGNOSTIC','URGIE','TRAVAIL','PHENE','APPARITION');