// PARAMETRAGE DU SCRIPT // CreerListe("Nom de la Liste", Nombre de lignes affichées dans la liste déroulante, Taille du tableau) var Liste=new CreerListe("Danses", 20, 250); //Hauteur=Nbre de Lignes affichées, Largeur // Variables du message défilant var msg="MESSAGE"; var index=0; var delay=200; // -------- Message défilant dans la barre de status --------- function defil() { // Fonction récursive pour le décalage du texte du message var nb_char=msg.length; index++; if (index>nb_char) index=0; window.status=msg.substring(index)+msg; setTimeout("defil()",delay); } function defiler(txt,tps) { //Cette fonction est appelée pour déclencher le défilement. msg=txt + " - " + txt + " - " ; delay=tps; defil(); } function effaceStatus() { //Cette fontion est appelée lorsqu'on quitte la page. msg=""; window.status=msg; clearTimeout(defil()); } // @@@ Debut @@@ Liste.Add("1 2 3 Summertime"); Liste.Add("8 & 1"); Liste.Add("----- A -----"); Liste.Add("A Walk On The Wild Side"); Liste.Add("Action"); Liste.Add("Adaptable"); Liste.Add("Addicted To Love"); Liste.Add("Addiction"); Liste.Add("Alabama Slammin"); Liste.Add("Alice"); Liste.Add("All Day Long"); Liste.Add("All Shook Up"); Liste.Add("All Summer Long"); Liste.Add("All You Need Is Love"); Liste.Add("Alley Cat"); Liste.Add("Amame"); Liste.Add("Antes De Que Te Vayas"); Liste.Add("Around And Around"); Liste.Add("Askin Questions"); Liste.Add("Atlantis"); Liste.Add("Atomic Polka"); Liste.Add("----- B -----"); Liste.Add("Baby Rocks"); Liste.Add("Baby Rumba"); Liste.Add("Back To Louisiana"); Liste.Add("Baja Cha Cha"); Liste.Add("Ballymore Boys"); Liste.Add("Banca Cha Cha"); Liste.Add("Bar Room Romeo"); Liste.Add("Bare - Partenaire"); Liste.Add("Basha"); Liste.Add("B B Polka"); Liste.Add("Beautiful Day"); Liste.Add("Beer For My Horses"); Liste.Add("Beer Goggles"); Liste.Add("Before The Devil"); Liste.Add("Beginner Boots"); Liste.Add("Better Life"); Liste.Add("Bible And The Belt"); Liste.Add("Bill s Basic"); Liste.Add("Bill s Boogie"); Liste.Add("Billy s Dance"); Liste.Add("Bit Of Irish"); Liste.Add("Bittersweet Memory"); Liste.Add("Bite The Dust"); Liste.Add("Black Horse"); Liste.Add("Blue Night Cha"); Liste.Add("Body And Soul"); Liste.Add("Bomshel Stomp"); Liste.Add("Bop The B"); Liste.Add("Bosa Nova"); Liste.Add("Brazil"); Liste.Add("Bread On The Table"); Liste.Add("Broken Heart"); Liste.Add("Brokenheartsville"); Liste.Add("Bubba Bump"); Liste.Add("Bud wiser"); Liste.Add("Building Bridges"); Liste.Add("Burning Love"); Liste.Add("Butter Beans"); Liste.Add("Buy Me A Drink"); Liste.Add("----- C -----"); Liste.Add("C C S"); Liste.Add("Cabo San Lucas"); Liste.Add("Cadillac Cowboy"); Liste.Add("Cajun Beat"); Liste.Add("Cajun Power Stomp"); Liste.Add("Cajun Slap"); Liste.Add("California Blue"); Liste.Add("Calypso Mexico"); Liste.Add("Cannibal Stomp"); Liste.Add("Can t Stop My Heart"); Liste.Add("Caught In The Act"); Liste.Add("Celt s Fire"); Liste.Add("Celtic Connexion"); Liste.Add("Celtic CT"); Liste.Add("Celtic Kittens"); Liste.Add("Celtic Slide"); Liste.Add("Celtic Tribute"); Liste.Add("Celtica"); Liste.Add("C est La Vie"); Liste.Add("Cha Cha Mala Mujer"); Liste.Add("Cha Cha One"); Liste.Add("Cha Cha Ruleta"); Liste.Add("Charleston Strut"); Liste.Add("Cherry Poppin"); Liste.Add("Cheyenne"); Liste.Add("Chica Boum Boum"); Liste.Add("Chill Factor"); Liste.Add("Chirpy Charleston"); Liste.Add("City Of New Orleans"); Liste.Add("Clickety Clack"); Liste.Add("Coastin"); Liste.Add("Come Dance With Me"); Liste.Add("Come On And Dance"); Liste.Add("Conrado Cha Cha"); Liste.Add("Cooley s Reel"); Liste.Add("Costa Costa"); Liste.Add("Cotton Eyed Joe - Mixer"); Liste.Add("Cotton Eyed Joe - Partenaire"); Liste.Add("Cotton Pickin Morning"); Liste.Add("Country 2 Step"); Liste.Add("Country As Can Be"); Liste.Add("Country Driv n"); Liste.Add("Country Line Dancer s Cha Cha"); Liste.Add("Country Roads"); Liste.Add("Country Rockin"); Liste.Add("Country Walkin"); Liste.Add("Cowboy Boogie"); Liste.Add("Cowboy Charleston"); Liste.Add("Cowboy HoneyMoon"); Liste.Add("Cowboy Rhythm"); Liste.Add("Cowboy Strut"); Liste.Add("Cowboy Up"); Liste.Add("Cowgirls"); Liste.Add("Cowgirls Twist"); Liste.Add("Crazy Foot Mambo"); Liste.Add("Cripple Creek"); Liste.Add("Cuban Walk"); Liste.Add("Cucaracha"); Liste.Add("Cut A Rug"); Liste.Add("Cute Cute Cute"); Liste.Add("----- D -----"); Liste.Add("Dancing Violins"); Liste.Add("Dance Or Rock N Roll"); Liste.Add("Darlene"); Liste.Add("Daughters Of Erin"); Liste.Add("Days Go By"); Liste.Add("Deck 51"); Liste.Add("Deltoya Crazy Cowboy"); Liste.Add("Devil In Disguise"); Liste.Add("DHSS"); Liste.Add("Dizzy"); Liste.Add("Do The Line Dance"); Liste.Add("Doctor Doctor"); Liste.Add("Don t Forget"); Liste.Add("Doors Of Life"); Liste.Add("Dream - Partenaire"); Liste.Add("Drowsy Maggie"); Liste.Add("Dublin Castle Jig"); Liste.Add("Duchesse"); Liste.Add("Duck Soup"); Liste.Add("----- E -----"); Liste.Add("East Bound And Down"); Liste.Add("Easy Chacha"); Liste.Add("Easy Come Easy Go"); Liste.Add("Eatin Right Drinkin Bad"); Liste.Add("E L T"); Liste.Add("El Paso - Partenaire"); Liste.Add("Electric Slide"); Liste.Add("Enchantment"); Liste.Add("Everybody s Someone"); Liste.Add("Everything I Do"); Liste.Add("Evil Girl"); Liste.Add("Exited"); Liste.Add("Eye Candy"); Liste.Add("----- F -----"); Liste.Add("Fais Do Do"); Liste.Add("Faithful Kiss"); Liste.Add("Feel Like A Fool"); Liste.Add("First Love"); Liste.Add("First Waltz"); Liste.Add("Fisher s Hornpipe"); Liste.Add("Forever Green"); Liste.Add("Frenchy"); Liste.Add("Fujiyama Mama"); Liste.Add("----- G -----"); Liste.Add("Galway Girls"); Liste.Add("Get Down"); Liste.Add("Get Down The Fiddle"); Liste.Add("Get Your Feet Down"); Liste.Add("Ghost Train"); Liste.Add("Giddy On Up"); Liste.Add("God Blessed Texas"); Liste.Add("Go Mama Go"); Liste.Add("Good Time"); Liste.Add("Good To Be Us"); Liste.Add("Gps Bubba"); Liste.Add("Grundy Gallop"); Liste.Add("Guajira"); Liste.Add("Guitar Man"); Liste.Add("Gypsy"); Liste.Add("----- H -----"); Liste.Add("Hallelujah"); Liste.Add("Halloween"); Liste.Add("Hard Workin Man"); Liste.Add("Hardly Workin"); Liste.Add("Hearts And Flowers"); Liste.Add("Heave Away"); Liste.Add("Heavenly Too"); Liste.Add("Hey Big Spender"); Liste.Add("Hickory Lake"); Liste.Add("Hit The Road Jack"); Liste.Add("Hold Your Horses"); Liste.Add("Home To Louisiana"); Liste.Add("Honky Tonk Stomp"); Liste.Add("Honky Tonk U"); Liste.Add("Honky Tonk Woman"); Liste.Add("Hooked On Country"); Liste.Add("Hot Tamales"); Liste.Add("How Long"); Liste.Add("----- I -----"); Liste.Add("I Can t Forget Her - Partenaire"); Liste.Add("I Love This Bar"); Liste.Add("I m Gonna Love You Tonight - Partenaire"); Liste.Add("I m No Good"); Liste.Add("I Never Work On A Sunday"); Liste.Add("I Play Chicken With The Train"); Liste.Add("I Run To You"); Liste.Add("I Wanna Be a Hillbilly"); Liste.Add("I4C Fun Push"); Liste.Add("If It Will It Will"); Liste.Add("In A Love Song"); Liste.Add("In The Country"); Liste.Add("Irish Spirit"); Liste.Add("Irish Step"); Liste.Add("Irish Stew"); Liste.Add("Island Time - Partenaire"); Liste.Add("Islands In The Stream"); Liste.Add("It s A Love Thing"); Liste.Add("It s Raining Men"); Liste.Add("It s The Season - Partenaire"); Liste.Add("It Happens"); Liste.Add("I Want It All"); Liste.Add("----- J -----"); Liste.Add("Jailhouse Creole"); Liste.Add("Jamaica Mistaka"); Liste.Add("Jambalaya"); Liste.Add("Jambalaya - Partenaire"); Liste.Add("Jamboree - Partenaire"); Liste.Add("Jig It Up"); Liste.Add("Joe s Place"); Liste.Add("Johnny - Partenaire"); Liste.Add("Johnny Come Home"); Liste.Add("Johnny Got A Boom Boom"); Liste.Add("Jungle Freak"); Liste.Add("Just A Good - Partenaire"); Liste.Add("Just A Memory"); Liste.Add("Just A Minute"); Liste.Add("Just For Grins"); Liste.Add("----- K -----"); Liste.Add("Kill The Spiders"); Liste.Add("----- L -----"); Liste.Add("La ChaCha"); Liste.Add("La Chapelloise"); Liste.Add("La Chico"); Liste.Add("Leave The Boat"); Liste.Add("Leaving Of Liverpool"); Liste.Add("Let s Move Maria"); Liste.Add("Lifes Great"); Liste.Add("Lindi Shuffle"); Liste.Add("Live Laugh Love"); Liste.Add("Lollipop"); Liste.Add("Lonely Cha"); Liste.Add("Look For A Star"); Liste.Add("Looking Good"); Liste.Add("Lord Of The Dance"); Liste.Add("Love Bug"); Liste.Add("Love To Cha Cha"); Liste.Add("Love Trick"); Liste.Add("Loved By You"); Liste.Add("Lover Please Come Back"); Liste.Add("Loving My Baby"); Liste.Add("L T S"); Liste.Add("----- M -----"); Liste.Add("Make It Up"); Liste.Add("Make This Day"); Liste.Add("Makin Tracks"); Liste.Add("Mambo Shuffle"); Liste.Add("Mariana Mambo"); Liste.Add("Marino Waltz"); Liste.Add("Mary Mary"); Liste.Add("Marylou"); Liste.Add("Mexican Vacation"); Liste.Add("Mexican Wind"); Liste.Add("Mirande Of Course"); Liste.Add("Mister Ooh La La"); Liste.Add("Moi j aime la country"); Liste.Add("Monkey Around"); Liste.Add("Mono"); Liste.Add("Mony Mony"); Liste.Add("Mr Policeman"); Liste.Add("My Deal"); Liste.Add("My Greek Number One"); Liste.Add("----- N -----"); Liste.Add("Never A Thought"); Liste.Add("Never And Forever"); Liste.Add("Not Fair"); Liste.Add("Nothin Bout Love Makes Sense"); Liste.Add("----- O -----"); Liste.Add("Oh Suzanna"); Liste.Add("Ok Corral"); Liste.Add("Old Friend"); Liste.Add("Oncle Sam"); Liste.Add("On A Good Night"); Liste.Add("On My Radio"); Liste.Add("One O One"); Liste.Add("One Step Forward"); Liste.Add("Overnight Success - Partenaire"); Liste.Add("----- P -----"); Liste.Add("Picnic Polka"); Liste.Add("Pizziricco"); Liste.Add("Please Please - Partenaire"); Liste.Add("Por Ti Sere"); Liste.Add("Pot Of Gold"); Liste.Add("PPD s Boy"); Liste.Add("Put You In A Song"); Liste.Add("----- Q -----"); Liste.Add("Quarter After One"); Liste.Add("Queen Of Memphis"); Liste.Add("Quickly"); Liste.Add("----- R -----"); Liste.Add("Razor Sharp"); Liste.Add("Red Hot Salsa - Partenaire"); Liste.Add("Red Hot Salsa"); Liste.Add("Red Hot Rock n Roller"); Liste.Add("Redneck Woman"); Liste.Add("Rhyme Or Reason"); Liste.Add("Rhythm Valley"); Liste.Add("Ribbon Of Highway"); Liste.Add("Ridin"); Liste.Add("Right Or Wrong"); Liste.Add("Ring Of Fire"); Liste.Add("Ringing Bells"); Liste.Add("Rio"); Liste.Add("Ritas Waltz"); Liste.Add("Rock Around The Clock"); Liste.Add("Rock n Fifty"); Liste.Add("Rodeo Blues"); Liste.Add("Rodeo Princess - Partenaire"); Liste.Add("Rolling In The Deep"); Liste.Add("Romeo"); Liste.Add("Rubitin"); Liste.Add("Runaround Sue"); Liste.Add("----- S -----"); Liste.Add("Sailor Dance"); Liste.Add("Sally Ann"); Liste.Add("Santa Fe Cha Cha"); Liste.Add("Save A Horse"); Liste.Add("SBS"); Liste.Add("Scrapit"); Liste.Add("Second Chance Waltz"); Liste.Add("Seminole Wind"); Liste.Add("Serenity"); Liste.Add("Shake It Up"); Liste.Add("Shakin Mix"); Liste.Add("Shamrock Shake - Partenaire"); Liste.Add("Shore Thing"); Liste.Add("Shuffle Boogie Soul"); Liste.Add("Simply Cha Cha"); Liste.Add("Sing Along"); Liste.Add("Sister Kate"); Liste.Add("Sisters Boogie"); Liste.Add("Sixteen Steps - Partenaire"); Liste.Add("Skater Shuffle"); Liste.Add("Sleazy Slide"); Liste.Add("Soft & Slow"); Liste.Add("Some Beach"); Liste.Add("Somebody like you"); Liste.Add("Something In The Water"); Liste.Add("Something So Right"); Liste.Add("Somewhere Else"); Liste.Add("South Of Santa Fe"); Liste.Add("Speak With Your Heart"); Liste.Add("Special-D"); Liste.Add("Splish Splash"); Liste.Add("Start The Car"); Liste.Add("Start To Sway"); Liste.Add("Stealing The Best"); Liste.Add("Steppin"); Liste.Add("Sugar And Pai"); Liste.Add("Sunday Driver"); Liste.Add("Sundown Waltz"); Liste.Add("Sweet Caballero - Partenaire"); Liste.Add("Sweet Little Dangerous"); Liste.Add("Sweet Memories"); Liste.Add("Sweet Sweet Smile"); Liste.Add("Sweet Sweet Smile - Partenaire"); Liste.Add("Swinging Thing"); Liste.Add("SXE"); Liste.Add("----- T -----"); Liste.Add("Take A Breather"); Liste.Add("Tall T"); Liste.Add("Tanzila"); Liste.Add("Tears For You"); Liste.Add("Tennessee Waltz Surprise"); Liste.Add("Texas Waltz - Partenaire"); Liste.Add("That s Love"); Liste.Add("The Blues Is Alright"); Liste.Add("The Break"); Liste.Add("The Curtsy Cross"); Liste.Add("The Drinkin Bone"); Liste.Add("The Flute"); Liste.Add("The King And I"); Liste.Add("The Last Samba"); Liste.Add("The Old House"); Liste.Add("The Outback"); Liste.Add("The Piper"); Liste.Add("The Real Man"); Liste.Add("The Spirit"); Liste.Add("The Trail"); Liste.Add("The WCC"); Liste.Add("The World"); Liste.Add("They Walk The Line"); Liste.Add("Tic Tac"); Liste.Add("Tight Blue Jeans"); Liste.Add("Toes"); Liste.Add("To Love Him"); Liste.Add("Too Blue"); Liste.Add("Torn Apart"); Liste.Add("Trailerhood"); Liste.Add("Travellin Music"); Liste.Add("Truckin Dog"); Liste.Add("Turbo Twang"); Liste.Add("Tush"); Liste.Add("Tush Push"); Liste.Add("Twistem"); Liste.Add("Two Hell And Back"); Liste.Add("----- U -----"); Liste.Add("Unchain My Heart"); Liste.Add("Until The End"); Liste.Add("Urban Grace"); Liste.Add("----- V -----"); Liste.Add("Vacaciones"); Liste.Add("Vilofriends"); Liste.Add("Viva La Vida"); Liste.Add("----- W -----"); Liste.Add("Waggle Dance"); Liste.Add("Walk Back Tome - Partenaire"); Liste.Add("Walk Of Life"); Liste.Add("Walking"); Liste.Add("Waltz Accross Texas"); Liste.Add("Warriors"); Liste.Add("Waterloo"); Liste.Add("Wave On Wave"); Liste.Add("We Are The Same"); Liste.Add("Western Barn Dance"); Liste.Add("Western Cha Cha - Partenaire"); Liste.Add("What About Now - Partenaire"); Liste.Add("Where I Belong"); Liste.Add("Where We ve Been"); Liste.Add("Whiskey In The Jar"); Liste.Add("Whole Again"); Liste.Add("Why Don t We Just Dance"); Liste.Add("Wishfull Thinking"); Liste.Add("Wonderland Waltz"); Liste.Add("Wrapped Around"); Liste.Add("----- X -----"); Liste.Add("----- Y -----"); Liste.Add("Your Backyard"); Liste.Add("Your Tattoo"); Liste.Add("----- Z -----"); Liste.Add("Zatchu"); Liste.Add("Zjozzy s Funk"); // @@@ Fin @@@ function CreerListe(nom, hauteur, largeur) { this.nom=nom; this.hauteur=hauteur; this.largeur=largeur+30; this.search=""; this.nb=0; this.Add=AjouterItem; this.Afficher=AfficherListe; this.MAJ=MAJListe; } function AjouterItem(item) { this[this.nb]=item; this.nb++; } function AfficherListe() { if (document.layers) { var Z=""; } for (var i=0; i"+this[i]+"" } Z+="" document.write(Z); } function MAJListe(txt,f) { if (txt!=this.search) { this.search=txt f.elements[this.nom].options.length=0; for (var i=0; i