Part 1 of James Brezina’s LP record database. Seems to require a machine code routine that’s not available.
Related Content
- Records 2 (computer_media)
Gallery
Source Code
1 REM A record search program
2 CLEAR 64199: RANDOMIZE USR 64719
5 INPUT "Enter Song name ";a$'c$'d$'e$'f$
6 LET la=LEN a$: POKE 64200,la
7 LET n=64201: FOR i=1 TO la
8 POKE n,CODE a$(i)
9 LET n=n+1: NEXT i
10 LET lc=LEN c$: POKE 64300,lc
11 LET n=64301: FOR i=1 TO lc
12 POKE n,CODE c$(i)
13 LET n=n+1: NEXT i
14 LET ld=LEN d$: POKE 64400,ld
15 LET n=64401: FOR i=1 TO ld
16 POKE n,CODE d$(i)
17 LET n=n+1: NEXT i
18 LET le=LEN e$: POKE 64500,le
19 LET n=64501: FOR i=1 TO le
20 POKE n,CODE e$(i)
21 LET n=n+1: NEXT i
22 LET lf=LEN f$: POKE 64600,lf
23 LET n=64601: FOR i=1 TO lf
24 POKE n,CODE f$(i)
25 LET n=n+1: NEXT i
30 CLS
31 LET X=0
32 RESTORE
33 PRINT INK 2; FLASH 1;"SEARCHING FOR SONGS:-": FLASH 0: INK 0: PRINT a$'c$'d$'e$'f$
35 DIM x$(1,100): READ b$: IF b$="Data out" AND x=0 THEN GO TO 55
36 IF B$="Data out" AND x>0 THEN GO TO 75
37 READ c
38 LET x$(1)=b$
39 IF a$=x$(1)( TO LEN a$) THEN GO TO 45
40 IF c$=x$(1)( TO LEN c$) THEN GO TO 45
41 IF d$=x$(1)( TO LEN d$) THEN GO TO 45
42 IF e$=x$(1)( TO LEN e$) THEN GO TO 45
43 IF f$=x$(1)( TO LEN f$) THEN GO TO 45
44 IF b$<>a$ AND b$<>c$ AND b$<>d$ AND b$<>e$ AND b$<>f$ THEN GO TO 35
45 LPRINT CHR$ 34;b$;CHR$ 34''
47 GO SUB c*3+200
48 LPRINT
49 LET x=x+1
50 GO TO 35
52 STOP
55 CLS : PRINT CHR$ 34;a$;CHR$ 34'CHR$ 34;c$;CHR$ 34'CHR$ 34;d$;CHR$ 34'CHR$ 34;e$;CHR$ 34'CHR$ 34;f$;CHR$ 34'"were not found in this listing. Check that you have entered it correctly."
56 LPRINT CHR$ 34;a$;CHR$ 34'CHR$ 34;c$;CHR$ 34'CHR$ 34;d$;CHR$ 34'CHR$ 34;e$;CHR$ 34'CHR$ 34;f$;CHR$ 34'"were not found in this listing."'': PAUSE 150
57 CLS : PRINT " Press y and ENTER for another song or a correction."'" If you wish to stop searching, press n and ENTER."''
60 PRINT " A third option is to LOAD in another tape file through the MERGE process. This is done by keying z and ENTER. After the loading pattern disappears from the screen, there will be a delay of 1 minute and ten sec- onds while the computer checks out the loaded program and is ready to proceed."
62 INPUT "Enter ""y"", ""n"", or ""z"" ";q$
65 IF q$="y" THEN GO TO 5
66 IF q$="z" THEN GO TO 80
67 IF q$="n" THEN STOP
68 IF q$<>"y" OR q$<>"n" OR q$<>"z" THEN GO TO 62
70 STOP
75 CLS : GO TO 57
76 STOP
80 DELETE 200,
85 INPUT "Enter file No. desired ";w$
88 LET m$="RECORDS "+w$: LPRINT m$'
90 LOAD m$
92 LET la=PEEK 64200
93 LET a$=""
94 LET n=64201: FOR i=1 TO la
96 LET h$=CHR$ PEEK n: LET a$=a$+h$
97 LET n=n+1: NEXT i
100 LET lc=PEEK 64300
102 LET c$=""
104 LET n=64301: FOR i=1 TO lc
106 LET h$=CHR$ PEEK n: LET c$=c$+h$
108 LET n=n+1: NEXT i
110 LET ld=PEEK 64400
111 LET d$=""
112 LET n=64401: FOR i=1 TO ld
114 LET h$=CHR$ PEEK n: LET d$=d$+h$
116 LET n=n+1: NEXT i
120 LET le=PEEK 64500
121 LET e$=""
122 LET n=64501: FOR i=1 TO le
124 LET h$=CHR$ PEEK n: LET e$=e$+h$
126 LET n=n+1: NEXT i
130 LET lf=PEEK 64600
131 LET f$=""
132 LET n=64601: FOR i=1 TO lf
134 LET h$=CHR$ PEEK n: LET f$=f$+h$
136 LET n=n+1: NEXT i
150 GO TO 30
190 STOP
195 SAVE "RECORDS B": PRINT "Rewind & press ENTER to verify.": PAUSE 0: VERIFY "RECORDS B"
200 REM Album Titles
203 LPRINT "Those Magnificient Men in Their Flying Machines / Soundtrack."'"20th Century Fox. TCF-4174"
204 RETURN
206 LPRINT "By The Waters of The Minnetonka"'" The Marty Gold Orchestra and Chorus. Kapp. K-112"
207 RETURN
209 LPRINT "Music From Award Winning Films"'"Dean Franconi and his orchestra. AK-150"
210 RETURN
212 LPRINT "Cinerama's Russian Adventure / Soundtrack. Various Artists."'"Roullette Records. OS-802"
213 RETURN
215 LPRINT "Tommy Dorsey And His Orchestra / Featuring Frank Sinatra."'"Coronet. CSX-186"
216 RETURN
218 LPRINT "Krakatoa, East Of Java / Soundtrack."'" ABC & Cinerama. ABCS-OC-8"
219 RETURN
221 LPRINT "Andy Stewart Sings Harry Lauder / With Ralph Dalimore Orchestra."'"E.M.I. SCX-6366"
222 RETURN
224 LPRINT "Remember Shirley / Shirley Temple. / From movie soundtracks."'"SPX-6014"
225 RETURN
227 LPRINT "Country And Western Songs / Dora Hall."'"Premore Records"
228 RETURN
230 LPRINT "Latin Days / Johnny Kemm at the Lowrey Organ."'"Concert Records, CR-E069"
231 RETURN
233 LPRINT "Dennis Awe 'The Velvet Touch' His Orchestra And Show / Volume 2."'"Intercontinental Records. IC-202"
234 RETURN
236 LPRINT "Dennis Awe 'The Velvet Touch' His Orchestra And Show / Volume 1."'"Intercontinental Records. IC-201"
237 RETURN
239 LPRINT "The World Needs A Melody / The New Kingston Trio."'"The Longines Symphonette Society SYS-5607"
240 RETURN
242 LPRINT "Glenn Miller and His Orchestra / Soundtracks from 'Orchestra Wives' &"'"'Sun Valley Serenade' / 20th Century Fox"
243 RETURN
245 LPRINT "A Longines Symphonette Collectors Edition / Music of Richard Rodgers"'" LWS-237"
246 RETURN
248 LPRINT "Bing Crosby's All Time Hit Parade / Bing Crosby."'"Longines LWS-237"
249 RETURN
251 LPRINT "The Magic of Mantovani"'"Longines SYS-5600"
252 RETURN
254 LPRINT "Aloha Moods / From the Longines Symphonette Society."'"SYS-5123"
255 RETURN
257 LPRINT "America The Beautiful / Paul Whiteman & Orchestra."'"Longines LWS-244"
258 RETURN
260 LPRINT "Dimension 3 / Enoch Light & theLight Brigade."'"Command. RS-8675D"
261 RETURN
263 LPRINT "The Memoriable Songs and Melodies From the Golden Twenties"'"Longines. LWS-164"
264 RETURN
266 LPRINT "The Memoriable Songs and Melodies From the Golden Thirties"'"Longines. LWS-164"
267 RETURN
269 LPRINT "The Best Of Mancini And Bacharach"'"The Longines Symphonette Society. SYS-5323"
270 RETURN
272 LPRINT "I Could Go On Singing Forever / Judy Garland."'"The Longines Symphonette Society. SY-5222"
273 RETURN
275 LPRINT "Love Story and Other Romantic Themes"'"The Longines Symphonette Society. SYS-5396"
276 RETURN
278 LPRINT "Oh, Johnny! / Bonnie Baker and Wilbur Hatch Orchestra."'"Warner Brothers 1212"
279 RETURN
281 LPRINT "Speak Low---The Great Music of Kurt Weill"'"Maurice Levine Conducting The Warner Brothers Orchestra."'" WS-1313"
282 RETURN
284 LPRINT "Gone With The Wind / Muir Mathieson Conducting the Sinfonia of London."'"Warner Brothers. WS1322"
285 RETURN
287 LPRINT "The Music Man / Soundtrack. / Robert Preston - Shirley Jones"'" BS-1459"
288 RETURN
290 LPRINT "How To Get The Most Out Of Your Stereo / Various Artists."'"Warner Brothers BS-1459"
291 RETURN
293 LPRINT "Norlin Salutes 'The Music In America'"'" Norlin and CBS BS-12723"
294 RETURN
296 LPRINT "Brahms. / The New Vienna Symphony."'"The Concert Library of Recorded Masterpieces. LRM-506"
297 RETURN
299 LPRINT "Mozart. / The New Vienna Symphony."'"The Concert Library of Recorded Masterpieces, LRM-503"
300 RETURN
302 LPRINT "By Mascagni. / The Rome Symphony Orchestra under the direction of"'"Domenico Savino. Kapp KS-3370"
303 RETURN
305 LPRINT "Radios Famous Themes"'"The Longines Symphonette Society. LWS-525"
306 RETURN
308 LPRINT "Beethoven. / The New Vienna Symphony."'"The Concert Library of Recorded Masterpieces. LRM-504"
309 RETURN
311 LPRINT "Bach. / The New Vienna Symphony."'"The Concert Library of Recorded Masterpieces. LRM-501"
312 RETURN
314 LPRINT "Boridin <> Moussorgsky <> Rimsky-Korsakov. Philharmonia Orchestra."'"(The unique thing about this record is that Rimsky-Korsakov"'"completed the compositions of the other two.)"'"Angel Records. S-35768"
315 RETURN
317 LPRINT "Cleopatra / Soundtrack from the movie with Elizabeth Taylor."'" 20th Century Fox SXG/5008"
318 RETURN
320 LPRINT "Join Bing And Sing Along / Bing Crosby & His Friends."'"Warner Brothers. WS-1363"
321 RETURN
323 LPRINT "The Roaring Twenties / Enoch Light & The Charleston City All-Stars."'"Grand Award (Command) G.A. 33-602"
324 RETURN
326 LPRINT "State Fair / Soundtrack, Pat Boone, Bobby Darin, Ann-Margeret,"'"Tom Ewell, Alice Fay, & Anita Gordon Singing For Pamela Tiffin."'"Dot Records. DLP-29011"
327 RETURN
329 LPRINT "The Fantastic Sounds Of Eddie Baxter At the Lowrey Organ."'"Dot DLP-25551"
330 RETURN
332 LPRINT "Great Organ Themes From Movies and TV / Eddie Baxter at the Lowrey Organ."'"Dot. DLP-25436"
333 RETURN
335 LPRINT "Alvino Rey-His Greatest Hits / with the King Sisters."'" Dot DLP-25391"
336 RETURN
338 LPRINT "Organ Festival / Eddie Baxter at the Lowrey Organ."'" Dot. DLP-25277"
339 RETURN
341 LPRINT "Calcutta / Lawrence Welk Orch."'"Dot DLP-25359"
342 RETURN
344 LPRINT "The Voices and Strings of Lawrence Welk"'" Featuring: Joe Feeney<>Alice Lon<>Lennon Sisters<>Jim Roberts<>Maurice Pearson"'"& the Glee Club."'" Dot DLP-25200"
345 RETURN
347 LPRINT "The Mills Brothers Great Hits"'" Dot DLP-25157"
348 RETURN
350 LPRINT "Wagner / Paul Paray conducting the Detroit Symphony Orchestra."'"Mercury. SR-90232"
351 RETURN
353 LPRINT "Vive La Marche! / Paul Paray Conducting The Detroit Symphony Orchestra."'" Mercury. SR-90211"
354 RETURN
356 LPRINT "Wagner / Paul Paray conducting the Detroit Symphony Orchestra."'" Mercury. SR-90107"
357 RETURN
359 LPRINT "Minneapolis Symphony Orchestra Directed by Antal Dorati plays Offenbach's"'"'Gaite Parisian' and Johann Strauss's 'Graduation Ball'."'"Mercury. SR-90016"
360 RETURN
362 LPRINT "Music of Leroy Anderson, Vol. 1 / Frederick Fennel conducting the"'" Eastman-Rochester 'Pops' Orchestra."'"Mercury. SR-90009"
363 LPRINT '"The Irish Suite on this record contains 5 traditional Irish tunes orchestrated"'"by Anderson."
364 RETURN
365 LPRINT "Music of Leroy Anderson, Vol. 2 / Frederick Fennel conducting the"'"Eastman-Rochester 'Pops' Orchestra."'"Mercury. SR-90043"
366 RETURN
368 LPRINT "Ted Weems Golden Hits / Featuring Elmo Tanner and Tiny Hill."'"Mercury. SR-60708"
369 RETURN
371 LPRINT "HarmomiCHA / Jerry Murad's Harmonicats."'"Mercury. SR-60061"
373 RETURN
374 LPRINT "Tchaikovsky / Minneapolis Symphony Orchestra Antal Dorati Cond."'"Mercury. MG-50054"
375 RETURN
377 LPRINT "My Fair Lady / Instrumental selections from the musical. Richard Hayman and his orch."'"Mercury. MG-20192"
378 RETURN
380 LPRINT "Beethoven / Antal Dorati, London Symphony Orchestra."'"Mercury LPS-9000"
381 RETURN
383 LPRINT "Viva Cugat! / Xavier Cugat and orchestra."'"Mercury. PPS-6003"
384 RETURN
386 LPRINT "10 Trombones Like 2 Pianos / Pete Rugolo and orchestra."'"Mercury. PPS-6001"
387 RETURN
389 LPRINT "Peg O' My Heart / Jerry Murad's Harmonicats."'"Columbia. CS-8437"
390 RETURN
392 LPRINT "Windjammer / Soundtrack from the movie."'"Columbia. CS-8651"
393 RETURN
395 LPRINT "Ballads of the Cossack / The Romanoff Singers. Ivan Romanoff Conductor."'"Columbia. CS-8408"
396 RETURN
1999 STOP
2000 DATA "Those Magnificient Young Men In Their Flying Machines",1,"Arizona",1,"The Great Race",1
2001 DATA "The Dance Of The Intrepid Airmen",1,"A Most Serious Talk",1,"Meanwhile, Back At the Airfield",1
2002 DATA "The Darlings Of 1910",1,"The Flying Frenchman",1,"Ah So, Mein Herr",1,"The Railroad Song",1,"The Incredible Time Of 25 Hours and 11 Minutes",1
2003 DATA "Indian Love Call",2,"From The Land Of The Sky Blue Water",2,"Red Wing",2
2004 DATA "Morning Star",2,"Indian Summer",2,"By The Waters Of The Minnetonka",2
2005 DATA "Rose Marie",2,"Pale Moon",2,"Ramona",2,"Little Mohee",2,"Tall Trees",2,"Cherokee",2
2006 DATA "So In Love",3,"Summertime",3,"Oklahoma",3,"Gigi",3,"Warsaw Concerto",3
2007 DATA "C'est Magnifique",3,"Spellbound",3,"The Way You Look Tonight",3,"I've Got You Under My Skin",3,"Slaughter on Tenth Avenue",3,"Slaughter on 10th Avenue",3
2008 DATA "Russian Sailors Dance",4,"Saiga Sequence",4,"Underwater Scooters",4
2009 DATA "The Khorovod",4,"Whale Hunt",4,"Hymn To A Great City From The Bronze Horseman",4,"Hymn To A Great City",4
2010 DATA "Bear Sequence",4,"Little Humpbacked Horse",4,"Moldavian Ballet",4,"Russian Adventure Finale",4
2011 DATA "I'll Buy That Dream",5,"Mexican Hat Dance",5,"I've Got A Restless Spell",5
2012 DATA "Arab Dance",5,"Is There A Chance For Me",5,"I'll Never Smile Again",5
2013 DATA "Juba Dance",5,"Spanish Dance",5,"Without A Song",5,"Anitra's Dance",5
2014 DATA "Just Before Sunrise",6,"East Of Java",6,"A Nice Old Fashioned Girl",6,"Kee Kana Lu",6
2015 DATA "I Love A Lassie",7,"She Is My Daisy",7,"Roamin' In The Gloamin'",7,"Roamin' In The Gloaman'",7,"That's The Reason Noo I Wear A Kilt",7
2016 DATA "Over The Hill To Ardentinny",7,"The Wee Hoose 'Mang The Heather",7,"The Wee Hoose Mang The Heather",7,"The Waggle O' The Kilt",7,"The Laddies Who Fought And Won",7
2017 DATA "Stop Your Ticklin' Jock",7,"It's Nice To Get Up In The Morning",7,"We Parted On The Shore",7
2018 DATA "Fou The Noo",7,"Tobermory",7,"Calligan, Call Again",7,"The End Of The Road",7
2019 DATA "On The Good Ship Lollipop",8,"Polly Wolly Doodle",8,"Early Bird",8
2020 DATA "Animal Crackers In My Soup",8,"I Love To Walk In The Rain",8,"But, Definately",8,"Goodnight, My Love",8
2021 DATA "He Was A Dandy",8,"Hey, What Did The Blue Jay Say?",8,"If All The World Were Paper",8
2022 DATA "Swing Me An Old Fashioned Song",8,"Come And Get Your Happiness",8,"We Should Be Together",8
2023 DATA "Picture Me Without You",8,"Baby, Take A Bow",8,"When I'm With You",8
2024 DATA "Oh, My Goodness",8,"At The Codfish Ball",8,"This Is A Happy Little Ditty",8
2025 DATA "How Can I Thank You?",8,"When I Grow Up",8,"Tra La La La",8
2026 DATA "Be Optimistic",8,"The Right Someone To Love",8,"On Account-A, I Love You",8,"You've Gotta Eat Your Spinach, Baby",8,"La-De-O",8
2027 DATA "Engine, Engine, Number 9",9,"So long, Baby",9,"All He'll Say Was Uhmm, Uhmm",9
2028 DATA "King Of The Road",9,"We'll Sing In The Sunshine",9,"Promise Me Everything, Never Get Anything Blues",9
2029 DATA "Hello, Faithless",9,"How's My Baby Tonight?",9,"Hotel Happiness",9,"Party Line",9,"Cousin Of Mine",9,"This Old Earth",9
2030 DATA "Amparito Roca",10,"Skyliner",10,"Monday, Monday",10,"Dansero",10,"What A Difference A Day Makes",10,"Espana Cani",10
2031 DATA "Magdalena",10,"Those Were The Days",10,"Taboo",10,"I Say A Little Prayer",10,"Serenade Of The Bells",10,"Granada",10
2032 DATA "Elks Parade",11,"Georgy Girl",11,"Sunny",11,"Goin' Out Of My Head",11,"Can't Take My Eyes Off Of You",11,"Spanish Flea",11
2033 DATA "Harper Valley PTA",11,"Our Day Will Come",11,"Release Me",11,"Alley Cat",11,"Patricia",11
2034 DATA "Elks Parade",12,"Put Your Hand In The Hand",12,"Joy To The World",12,"He's Got The Whole World In His Hands",12,"Till There Was You",12,"For The Good Times",12
2035 DATA "Danke Schoen",12,"When The Saints Go Marching In",12,"Raindrops Keep Falling On My Head",12
2036 DATA "Hawaiian Wedding Song",12,"Liberace Medley",12,"Some Of These Days",12,"Beer Barrel Polka",12
2037 DATA "Love Story",11,"It's Impossible",11,"Tie A Yellow Ribbon",11,"Alone Again, Naturally",11,"Help Me Make It Through The Night",11
2038 DATA "Raindrops Keep Falling On My Head",11,"Snowbird",11,"Candy Man",11,"I'll Teach The World To Sing",11
2039 DATA "The World Needs A Melody",13,"Grandma's Feather Bed",13,"In Tall Buildings",13,"Riley's Medicine Show",13,"Blue Skies And Teardrops",13
2040 DATA "Jugtown",13,"Lovin' You Again",13,"Come The Morning",13,"Roll Your Own, Cowboys",13
2041 DATA "In The Mood",14,"Boom Shoot",14,"Serenade In Blue",14,"Bugle Call Rag",14
2042 DATA "Chattanooga Choo-Choo",14,"You Say The Sweetest Things, Baby",14,"It Happened In Sun Valley",14,"Measure For Measure",14,"Moonlight Sonata",14
2043 DATA "I've Got A Gal In Kalamazoo",14,"At Last",14,"Sun Valley Jump",14,"That's Sabotage",14
2044 DATA "American Patrol",14,"The Spirit Is Willing",14,"People Like You And Me",14,"I Know Why And So Do You",14,"Moonlight Serenade",14
2045 DATA "A Real Nice Clambake",15,"I Didn't Know What Time It Was",15,"Falling In Love With Love",15
2046 DATA "Shall We Dance?",15,"Getting To Know You",15,"You'll Never Walk Alone",15
2047 DATA "Bali Hai",15,"It Might As Well Be Spring",15,"I Could Write A Book",15,"Where Or When",15,"Poor Jud",15
2048 DATA "Accentuate The Positive",16,"Lonesome And Sorry",16,"I Love My Baby",16,"Mister Sandman",16,"When My Sugar Walks Down The Street",16,"The Song Is Ended",16
2049 DATA "Sentimental Gentleman From Ga.",16,"All Alone",16,"What'll I Do?",16,"Who's Sorry Now",16,"Coquette",16,"Riders In The Sky",16,"Ghost Riders In The Sky",16
2050 DATA "Let Me Call You Sweetheart",17,"Lover Come Back To Me",17,"I Wonder Who's Kissing Her Now",17
2051 DATA "Meet Me In St. Louis, Louis",17,"Indian Love Call",17,"Blowin' in The Wind",17,"My Way",17
2052 DATA "A Taste Of Honey",17,"A Man And A Woman",17,"Leaving On A Jet Plane",17
2053 DATA "Moon Of Waikiki",18,"My Little Grass Shack",18,"My Little Grass Shack In Kealakekua, Hawaii",18,"Drifting And Dreaming",18
2054 DATA "The Luau Song",18,"To You, Sweetheart, Aloha",18,"Harbor Lights",18,"For You A Lei",18,"Hawaiian Wedding Song",18
2055 DATA "Moonlight And Shadows",18,"Mauna Loa",18
2056 DATA "Anchors Aweigh",19,"madamoiselle From Armentieres",19,"Over There",19,"There's A Star Spangled Banner Waving Somewhere",19
2057 DATA "Keep The Home Fires Burning",19,"Goodbye Broadway, Hello France",19,"Columbia, The Gem Of The Ocean",19
2058 DATA "America, The Beautiful",19,"Hail To The Chief",19,"Where Do We Go From Here, Boys?",19,"K-K-K-Katy",19,"Battle Cry Of Freedom",19
2059 DATA "Maryland, My Maryland",19,"It's A Long Way To Tipperary",19,"When You Wore A Tulip",19,"U.S. Air Corp",19,"Army Air Corp",19
2060 DATA "All I Do Is Dream Of You",20,"Life Is Just A Bowl Of Cherries",20,"Carribe",20,"Was She Prettier Than I?",20,"My Old Flame",20,"Hey There",20
2061 DATA "Love And Marriage",20,"Adios",20,"Swamp-Fire",20,"Swamp Fire",20,"The Hawaiian Wedding Song",20,"For All We Know",20,"It's Only A Paper Moon",20
2062 DATA "In A Little Spanish Town",21,"Great Day",21,"My Man",21,"Broadway Melody",21,"Where Did You Get Those Eyes?",21,"What Can I Say After I Say I'm Sorry?",21
2063 DATA "Pagan Love Song",21,"Margie",21,"Toot, Toot, Tootsie",21,"Singing In The Rain",21,"Song Of Love",21,"Honey",21,"Singin' In The Rain",21
2064 DATA "Whispering",21,"The Sheik Of Araby",21,"I've Got The World On A String",21,"Girl Of My Dreams",21,"The Doll Dance",21,"The Moon Is Low",21
2065 DATA "Manhatten Serenade",21,"It Don't Mean A Thing If It Ain't Got That Swing",21,"Chloe",21,"Linger Awhile",21,"The Wedding Of The Painted Doll",21
2066 DATA "I Surrender Dear",22,"Drums In My Heart",22,"Don't Blame Me",22,"Between The Devil And The Deep Blue Sea",22,"A-Tisket, A-Tasket",22,"Ti-Pi-Ti-Pi-Tin",22
2067 DATA "Taking A Chance On Love",22,"Mood Indigo",22,"Spring Is Here",22,"Broadway Rhythm",22,"Ferry Boat Serenade",22,"My Little Grass Shack",22,"My Little Grass Shack In Kealakekua, Hawaii",22
2068 DATA "Stars Fell On Alabama",22,"Lilacs In The Rain",22,"Cosi, Cosa",22,"Through The Years",22,"I Feel A Song Coming On",22,"Masquerade",22,"Madamoiselle From Paris",22
2069 DATA "Serenade In The Night",22,"I'm Shooting High",22,"The Lamp Is Low",22,"I Married An Angel",22,"Fit As A Fiddle And Ready For Love",22,"I've Got A Feeling Your Fooling",22,"Fit As A Fiddle",22
2070 DATA "Tara's Theme",23,"Charade",23,"Days Of Wine And Roses",23,"Moon River",23,"Paris Holiday",23,"Walk On By",23
2071 DATA "Raindrops Keep Falling On My Head",23,"The Look Of Love",23,"Close To You",23,"Always Something There To Remind Me",23
2072 DATA "I Could Go On Singing",24,"You Made Me Love You",24,"Me And My Gal",24,"For Me And My Gal",24,"The Boy Next Door",24,"The Trolley Song",24
2073 DATA "Happiness Is A Thing Called Joe",24,"This Is It",24,"Among My Souvenirs",24,"Just Imagine",24,"Make Someone Happy",24
2074 DATA "Theme From Love Story",25,"Punch And Judy",25,"Dreamsville",25,"Mostly For Lovers",25,"The Great Imposter",25,"A Time For Us",25
2075 DATA "A Powdered Wig",25,"Happy Barefoot Boy",25,"Moment To Moment",25,"That's It And That's All",25
2076 DATA "Oh, Johnny!",26,"Aggravatin' Papa",26,"You'd Be Surprised",26,"Billy",26,"Stop. It's Wonderful",26,"Come Back",26
2077 DATA "Ma, He's Makin' Eyes At Me",26, "How Ja Like To Love Me",26,"The Bongo Song",26,"Especially For You",26,"Specially For You",26,"Charley, My Boy",26,"Texas Tornado",26
2078 DATA "Speak Low",27,"My Ship",27,"Sing Me Not A Ballad",27,"Foolish Heart",27,"Here I'll Stay",27,"Greenup Time",27,"Green Up Time",27
2079 DATA "Johnny's Song",27,"September Song",27,"Moritat",27,"Mack The Knife",27,"Moon-Faced, Starry Eyed",27,"Westwind",27,"Jenny",27
2080 DATA "Tara's Theme",28,"Melanie's Theme",28,"Ashley",28,"Ashley's Theme",28,"The Prayer",28,"Bonnie Blue Flag",28,"Scarlett O'Hara",28,"Scatlet's Agony",28,"War",28
2081 DATA "Belle Watling",28,"Bonnie's Death",28,"Rhett Butler",28,"Bonnie's Theme",28,"Ashley And Melanie",28,"The Oath" ,28,"Return To Tara",28
2082 DATA "Main Title",29,"Rock Island",29,"Iowa Stubborn",29,"Ya Got Trouble",29,"You Got Trouble",29,"Piano Lesson",29,"If You Don't Mind My Saying So",29,"Goodnight, My Someone",29,"Seventy-Six Trombones",29,"Sincere",29
2083 DATA "The Sadder But Wiser Girl",29,"Pick-A-Little, Talk-A-Little",29,"Marian, The Librarian",29,"Being In Love",29,"Gary, Indiana",29,"The Wells Fargo Wagon",29,"Lida Rose",29,"Will I Ever Tell You?",29,"Shipoopi",29,"Till There Was You",29
2084 DATA "The Continental",30,"Mickey Mouse Club",30,"Holiday For Strings",30,"Just One Of Those Things",30,"Across The Alley From The Alamo",30,"Singin' In The Rain",30,"Singing In The Rain",30
2085 DATA "The Caissons Go Rolling Along",30,"How Long Has This Been Going On?",30,"Over The Rainbow",30,"Alabamy Bound",30,"Carnavalito",30,"Two Heads Are Better Than One",30
2086 DATA "American Salute",31,"Adagio For Strings",31,"A Lincoln Salute",31,"Candide",31,"New England Tryptytch",31,"When Johnny Comes Marching Home",31
2087 DATA "Tragic Overture",32,"Academic Festival Overture",32,"The Liebeslieder Waltzes",32,"Variations On A Theme Of Haydn",32
2088 DATA "Symphony No.38",33,"Prague Symphony",33,"Eine Kliene Nachtmusik",33,"A Little Mason Cantata",33
2089 DATA "Cavalleria Rusticana",34
2090 DATA "Love In Bloom",35,"Thanks For The Memory",35,"Serenade By Toselli",35,"Journey Into Melody",35,"Seems Like Old Times",35,"The Perfect Song",35,"Lucky Day",35,"On The Trail",35,"Moonlight Sonata",35,"Contented",35
2091 DATA "Finiculi Finicula",35,"Funiculi Funicula",35,"William Tell Overture",35,"If I Could Tell You",35,"Bell Waltz",35,"Juanita",35,"How Can I Leave You",35,"Love Nest",35,"Manhattan Serenade",35,"Two Guitars",35,"Andante Cantabile",35
2092 DATA "Symphony No. 8 In F Major",36,"The Maelzel Canon",36,"Leonore Overture No. 1",36,"Becalmed At Sea",36,"A Prosperous Voyage",36,"Fidelio Overture",36
2093 DATA "Suite No. 3 In D Major",37,"Sinfonia Concerto From Cantata No. 174",37,"Three Chorales",37,"O Haupt Voll Blut Und Wunden",37,"Wachet Auf",37,"Ein' Feste Burg",37,"Concerto For Two Harpsichords In C Minor",37
2094 DATA "Prince Igor",38,"Night On Bald Mountain",38,"Night On Bare Mountain",38,"Russian Easter Overture",38
2095 DATA "Caesar And Cleopatra",39,"A Gift For Caesar",39,"The Fire Burns, The Fire Burns",39,"Taste Of Death",39,"Cleopatra Enters Rome",39,"Caesar's Assassination",39,"Epilogue (Act 1)",39
2096 DATA "Antony And Cleopatria",39,"Cleopatra's Barge",39,"Love And Hate",39,"My Love Is My Master",39,"Grant Me An Honorable Way To Die!",39,"Dying Is Less Than Love",39,"Antony - Wait",39
2097 DATA "Take Me Out To The Ball Game",40,"Meet Me In St. Louis, Louis",40,"Peggy O'neil",40,"K-K-K-Katy",40,"Mairzy Doats",40,"Old MacDonald Had A Farm",40
2098 DATA "Aura Lee",40,"Cuddle Up A Little Closer",40,"Daisy Bell",40,"A Bicycle Built For Two",40,"The Bowery",40,"After The Ball",40
2099 DATA "Long, Long Ago",40,"On The Banks Of The Wabash",40,"I Was Seeing Nellie Home",40,"Shoo Fly, Don't Bother Me",40,"Oh Them Golden Slippers",40,"Oh, Them Golden Slippers",40,"On The Road To Mandalay",40
2100 DATA "Give My Regards To Broadway",40,"Mary's A Grand Old Name",40,"You're A Grand Old Flag",40,"When You Wore A Tulip",40,"You Were Meant For Me",40
2101 DATA "Good Bye, My Lady Love",40,"Linger Awhile",40,"Heart Of My Heart",40,"Doodle Doo-Doo",40,"Doodle Dee-Doo",40,"All I Do Is Dream Of You",40
2102 DATA "Alice Blue Gown",40,"I Love You Truly",40,"When I Grow Too Old To Dream",40,"A Hot Time In The Old Town Tonight",40,"Toot, Toot, Tootsie",40,"Ta-Ra-Ra Boom Der-e",40,"Ta-Ra-Ra Boom Dee-ay",40
2103 DATA "Mary Lou",41,"Barney Google",41,"Ain't We Got Fun",41,"Ain't We Got Fun?",41,"That Old Gang Of Mine",41,"Somebody Loves Me",41,"Sometimes I'm Happy",41
2104 DATA "Rain",41,"Diga Diga Doo",41,"Diga-Diga-Doo",41,"Clap Hands! Here Comes Charlie",41,"Everybody Loves My Baby",41,"I Want To Be Happy",41,"Sunny Side Up",41
2105 DATA "California Here I Come",41,"I'm Looking Over A Four Leaf Clover",41,"The Best Things In Life Are Free",41,"If I Could Be With You One Hour",41,"If I Could Be With You",41
2106 DATA "I Wonder What's Become Of Sally",41,"Prisoner's Song",41,"Rose Of Washington Square",41,"Last Night On The Back Porch",41
2107 DATA "A Cup Of Coffee, A Sandwich, And You",41,"Sonny Boy",41,"S'Wonderful",41,"S'wonderful",41,"That's My Weakness Now",41
2108 DATA "Our State Fair",42,"It Might As Well Be Spring",42,"That's For Me",42,"More Than Just A Friend",42,"Isn't It Kinda Fun",42
2109 DATA "Willing And Eager",42,"Never Say No To A Man",42,"It's A Grand Night For Singing",42,"The Little Things In Texas",42
2110 DATA "Fluter's Ball",43,"Blue Velvet",43,"Old Devil Moon",43,"Quiet Villiage",43,"I Left My Heart In San Francisco",43,"Misirlou",43
2111 DATA "Little Bird",43,"More",43,"Down By The Riverside",43,"On A Little Street In Singapore",43,"Misty",43,"Get Me To The Church On Time",43
2112 DATA "Theme From A Summer Place",44,"A Summer Place",44,"Peter Gunn",44,"Gigi",44,"Mr. Lucky",44,"The Green Leaves Of Summer",44,"The Roaring 20's",44,"The Roaring Twenties",44
2113 DATA "Moon River",44,"Bonanza",44,"Fanny",44,"Route 66 Theme",44,"Tammy",44,"Exodus",44
2114 DATA "Steel Guitar Rag",45,"Mama Blues",45,"Rose Room",45,"Hindustan",45,"Bloop Bleep",45,"Tiger Rag",45
2115 DATA "Tea For Two",46,"Autumn Leaves",46,"Festival",46,"My Foolish Heart",46,"The Hawaiian Wedding Song",46,"No Other Love",46
2116 DATA "Fascination",46,"The Third Man Theme",46,"September Song",46,"Malaguena",46,"Tenderly",46,"Begin The Beguine",46
2117 DATA "Calcutta",47,"Sailor",47,"Perfidia",47,"April In Portugal",47,"Humoresque Boogie",47,"Corrine Corrina",47
2118 DATA "Your Eyes Have Told Me So",48,"I'm In The Mood For Love",48,"I Don't Know Why",48,"Stars Fell On Alabama",48,"Isn't It Romantic",48,"Speak To Me Of Love",48
2119 DATA "Embraceable You",48,"I Didn't Know What Time It Was",48,"Serenade from 'The Student Prince'",48,"The Night Is Young And You're So Beautiful",48,"The Song Is You",48,"Goodnight Sweetheart",48
2120 DATA "Paper Doll",49,"Glow Worm",49,"Basin Street Blues",49,"Nevertheless",49,"Till Then",49,"Cielito Lindo",49
2121 DATA "Lazy River",49,"Up A Lazy River",49,"You Always Hurt The One You Love",49,"Across The Alley From The Alamo",49,"I'll Be Around",49,"Rockin' Chair",49,"Be My Life's Companion",49,"Old Rockin' Chairs Got Me",49
2122 DATA "Overture To Rienzi",50,"Wotan's Farewell",50,"Magic Fire Music",50,"Overture To Der Fliegende Hollander",50,"Overture To The Flying Dutchman",50
2123 DATA "Excerpts From Die Meistersinger",50,"Introduction To Act III Die Meistersinger",50,"Dance Of The Apprentices",50,"Procession Of The Mastersingers",50
2124 DATA "Marche Hongroise",51,"Funeral March Of A Marionette",51,"Marche Heroique",51,"La Marseillaise",51
2125 DATA "Marche Joyeuse",51,"Marche Militaire Francaise",51,"Marche Troyenne",51,"Coronation March",51
2126 DATA "Dawn And Siegfried's Rhine Journey",52,"Siegfried Idyll",52,"Prelude To Parsifal",52,"Prelude To Act III Of Tristan Und Isolde",52,"Siegfried's Rhine Journey",52,"Dawn",52
2127 DATA "St. Louis Blues",45,"Cement Mixer",45,"Idaho",45,"On The Alamo",45,"Near You",45,"Guitar Boogie",45
2128 DATA "Gaite Parisienne",53 ,"Graduation Ball",53
2129 DATA "Sandpaper Ballet",54,"Forgotten Dreams",54,"Serenata",54,"Trumpeter's Lullaby",54,"Penny-Whistle Song",54,"Sleigh Ride",54,"Bugler's Holiday",54,"Irish Suite",54
2130 DATA "The Irish Washerwoman",54,"The Minstrel Boy",54,"The Rakes Of Mallow",54,"The Wearing Of The Green",54,"The Wearin' O' The Green",54,"The Last Rose Of Summer",54,"The Girl I Left Behind Me",54
2131 DATA "Belle Of The Ball",55,"Horse And Buggy",55,"The Waltzing Cat",55,"Blue Tango",55,"Summer Skies",55,"Song Of The Bells",55
2132 DATA "The Typewriter",55,"The Syncopated Clock",55,"The Girl In Satin",55,"China Doll",55,"Saraband",55,"Fiddle-Faddle",55,"Fiddle-faddle",55,"Syncopated Clock",55
2133 DATA "Heartaches",56,"Mickey",56,"Somebody Stole My Gal",56,"My Gal Sal",56,"You're The Cream In My Coffee",56,"Out Of The Night",56
2134 DATA "Oh Mo'nah",56,"Oh Mona",56,"That Old Gang Of Mine",56,"The Martins And The Coys",56,"Deep In The Heart Of Texas",56,"Egyptian-Ella",56,"One Man Band",56
2135 DATA "Peg O' My Heart",57,"perfidia",57,"Blues Cha Cha",57,"Cocktails For Two Cha Cha",57,"Honeymoon In Puerto Rico",57,"The Cha Cha King",57
2136 DATA "Petite Fleur",57,"Carolina In The Morning",57,"Frenesi",57,"Poinciana",57,"The House Of Bamboo",57,"Chattanooga Cha-Choo",57
2137 DATA "1812 Festival Overture",58,"Capriccio Italien",58
2138 DATA "You Did It",59,"Wouldn't It Be Loverly",59,"I Could Have Danced All Night",59,"Why Can't The English",59,"I've Grown Accustomed To Your Face",59,"Ascot Gavotte",59
2139 DATA "Get Me To The Church On Time",59,"On The Street Where You Live",59,"Show Me",59,"The Rain In Spain",59,"Without You",59,"With A Little Bit Of Luck",59,"With A Little Bit O' Luck",59
2140 DATA "Wellington's Victory",60,"Leonore Overture No. 3",60,"Prometheus Overture",60,"Leonore Overture",60
2141 DATA "Jungle Concerto",61,"Perfidia",61,"The Peanut Vendor",61,"Tropical Meringue",61,"Nightingale",61,"Isle Of Capri",61
2142 DATA "Siboney",61,"Jungle Drums",61,"Anna",61,"El Negro Zumbon",61,"Maria Elena",61,"Poinciana",61,"Say Si Si",61
2143 DATA "Marie",62,"Like Love",62,"Moonglow And Theme From Picnic",62,"Moonglow",62,"Picnic",62,"Angel Eyes",62,"Let There Be Love",62
2144 DATA "Intermission Riff",62,"Willow Weep For Me",62,"It's A Most Unusual Day",62,"Love Is Just Around The Corner",62,"Basin Street East",62,"Love Is Here To Stay",62
2145 DATA "Peg O' My Heart",63,"Twilight Time",63,"Mam'selle",63,"Saber Dance",63,"Dancing With Tears In My Eyes",63,"Galloping Comedians",63
2146 DATA "Malaguena",63,"Deep Purple",63,"Tenderly",63,"Perfidia",63,"Jeannine",63,"I Dream Of Lilac Time",63,"Minute Waltz",63
2147 DATA "Overture To Windjammer",64,"Windjammer",64,"Life On The Ocean Waves",64,"The Sea Is Green",64,"Madiera",64,"Music Of Porto Santo",64,"Everybody Loves Saturday Night",64,"Catalan Melody",64,"Song Of The Birds",64
2148 DATA "Night Watch",64,"Kari Waits For Me",64,"Marianne",64,"Sugar Cane",64,"Don't Hurry Worry Me",64,"The Happy Wanderer",64,"The Crew",64,"The Village Of New York",64,"New York",64
2149 DATA "Song Of Youth",65,"Moscow Nights",65,"I've Travelled Far",65,"Steppe",65,"Riders From The Don",65,"Along Peterskoy",65
2150 DATA "Brightly Shines The Moon",65,"Volga Boatman",65,"Anastasia",65,"Meadowland",65,"Two Guitars",65,"Forgotten Kisses",65
3000 DATA "Data out"
8999 STOP
9000 SAVE "RECORDS 1"
9015 PRINT "I you wish to start a new search, key y."'"If you wish to continue with the same records, key c."
9020 PAUSE 0
9030 IF INKEY$="y" OR INKEY$="Y" THEN RUN
9040 IF INKEY$="c" OR INKEY$="C" THEN GO TO 92
9050 IF INKEY$<>"y" OR INKEY$<>"Y" OR INKEY$<>"c" OR INKEY$<>"C" THEN GO TO 9020
9060 STOP