0*FX200 3 1MODE7 5VDU23;8202;0;0;0; 9VDU28,0,24,39,20 10DIMMUS$(4),E(3),N(3),W(70),W$(238) 14I=0 15RESTORE2500 16REPEAT:I=I+1:READW$(I):UNTILI=238 17N=1 30ENVELOPE1,1,0,0,0,0,0,0,95,-4,-3,-2 ,75,0 40ENVELOPE2,7,1,-1,1,1,1,1,70,20,-5,- 6,90,30 50ENVELOPE3,6,1,-1,1,1,2,1,70,25,-1,- 1,95,40 60ENVELOPE4,4,1,-1,1,1,2,1,100,-1,-2, -1,90,20 70ENVELOPE5,1,0,0,0,0,0,0,126,-5,-3,- 2,92,0 80ENVELOPE6,4,1,-1,1,1,2,1,90,-1,-3,- 5,98,20 90ENVELOPE7,5,1,-1,1,1,2,1,90,-1,-2,- 1,90,40 100P$="012345678797:;<=>?@AB78797C;DEF GHIJKLM78797C;DEF" 110FORJ=1TOLEN(P$) 120D%=ASC(MID$(P$,J,1))-&30 130REL%=D%*60+410 140RESTORE REL%:PROCP(D%) 145NEXT 150GOTO150 200DEFPROCP(D%) 210FORX=0TO3:READE(X):NEXT 220FORX=0TO3:READMUS$(X):NEXT 225READWD$ 230FORL=1TOLENMUS$(1) 235IFMID$(WD$,L,1)="." PRINTW$(N);:N=N +1 236IFMID$(WD$,L,1)="/" PRINT 270FORV=1TO3 280P=4*ASC(MID$(MUS$(V),L,1)) 290B%=V OR &200 300B%=B%OR-&1000*(P=128) 310P=P+4 320SOUNDB%,E(V),P,1 330NEXT 340IFMUS$(0)=""SOUND-&1000*(MID$(MUS$( 1),L,1)=" "),E(0),3,1 ELSE P=ASC(MID$(MU S$(0),L,1))-&30:SOUND-&1000*(P=-16),E(0) ,P,1 350FORF=1TO240:NEXT 360NEXT 370ENDPROC 410DATA0,2,2,2 420DATA"" 430DATA"?FK K F?F F DKHD?FK K F?F F D" 440DATA" W W V T W W V " 450DATA" O O M P O O M " 455DATA"" 470DATA0,2,6,2 480DATA"" 490DATA"KHD" 500DATA"[[½" 510DATA"P " 515DATA"..." 530DATA0,2,6,2 540DATA"" 550DATA"K F K F K F K FKFJMRDHKHK F K F " 560DATA"^ ^ ^ [½^ ^^ ^ ^^^^ ^W " 570DATA"O O O O R P PO W O W " 575DATA". . ./... .. /. .... .. " 590DATA0,2,6,2 600DATA"" 610DATA"K F K F K F K F K F K FKFJMRDH KH" 620DATA" [[ ^ ^ ^ [½^^ ^ [½^ ^^ ^ ^W" 630DATA"O OOPOMOO O M O R P " 635DATA" /.. . . ./.... . /... .. . .." 650DATA0,2,6,2 660DATA"" 670DATA"K F K F K F F J K C K C J C G C " 680DATA" W W W ^^^£ £££ ££`` £ b " 690DATA"O O O M H H G J " 695DATA" //.. . .../.... . / . " 710DATA0,2,7,2 720DATA"" 730DATA"H F H CA A D A D A D A D D " 740DATA"c b c ee c " 750DATA"K O H K H K H F H F " 755DATA". . . .." 770DATA0,2,2,2 780DATA"" 790DATA"D D " 800DATA"M M " 810DATA"H F H F " 815DATA" /" 830DATA5,7,6,3 840DATA"6 4 6 6 4 6 " 850DATA"D D F F " 860DATA" WW Y V TR O " 870DATA"H J " 875DATA"/ .. . ./.. ." 890DATA5,1,7,3 900DATA"6 5 6 4 6 " 910DATA"[WRWYVRVWTOTRMJF" 920DATA"R OROT " 930DATA"K J H F " 935DATA". ...." 950DATA5,1,6,3 960DATA"6 5 6 4 6 " 970DATA"OJFJOJFCKHDHMJFJ" 980DATA"RO R ORO V T " 990DATA"C C C D F D " 995DATA".. . /... . ./" 1010DATA5,1,7,3 1020DATA"6 5 6 6 5 6 6 4 6 5 6 " 1030DATA"WRORVRMRTOKMOTW[Y[WTRORT PPP PP" 1040DATA"RO R O T OMOMK " 1050DATA"K J H H H H D " 1055DATA".. . . ." 1070DATA5,4,1,2 1080DATA"6 5 6 6 5 6 6 4 6 " 1090DATA"D D ADF F F F " 1100DATA" P P P P [ YWWR " 1110DATA"POOOOMMKM P P " 1115DATA" /. ...." 1130DATA5,2,2,2 1140DATA"6 5 4 5 4" 1150DATA"?FK K F?F F DKHD?FK K F?F F D" 1160DATA" W W V T W W V " 1170DATA" O O M P O O M " 1175DATA"" 1190DATA0,2,6,2 1200DATA" " 1210DATA"KHD" 1220DATA" ^" 1230DATA"P " 1235DATA"//." 1250DATA5,2,6,2 1260DATA" 5 4 5 6 " 1270DATA"K F K F K F K FKFJMRDHKHK F K F " 1280DATA" ^ ^ [½^ ^^^ ^ ^ ^^^^ ^W " 1290DATA"O O O O R P PO W O W " 1295DATA" . . ... ... . . .... .. " 1310DATA5,2,6,2 1320DATA" 5 4 5 4 " 1330DATA"K F K F K F K F K F K FKFJMRDH KH" 1340DATA" W [ [ WWY YYY Y^" 1350DATA"O OOPOMOO O M O R P " 1355DATA" /. . . /... ... .." 1370DATA5,2,6,2 1380DATA" 5 4 5 6 " 1390DATA"K F K F K F F J K C K C J C G C " 1400DATA"^ ^££ £ b£` `£ b " 1410DATA"O O O M H H G J " 1415DATA". //... . ... .. / . " 1430DATA5,2,7,2 1440DATA" 5 4 5 6 " 1450DATA"H F H CA A D A D A D A D D " 1460DATA"c bbce e c " 1470DATA"K O H K H K H F H F " 1475DATA". .... ." 1490DATA5,2,2,2 1500DATA" 4 6 " 1510DATA"D D " 1520DATA" " 1530DATA"H F H F " 1535DATA" //" 1550DATA5,1,7,3 1560DATA"6 5 6 6 5 6 6 4 6 5 6 " 1570DATA"WRORVRMRTOKMOTW[Y[WTRORT PPP PP" 1580DATA"W WV W T OMOMK " 1590DATA"K J H H H H D " 1595DATA". .. . ." 1610DATA5,2,2,2 1620DATA" 5 4" 1630DATA"?FK K F?F F D" 1640DATA" W W V " 1650DATA" O O M " 1655DATA" //" 1670DATA5,2,7,2 1680DATA" 5 4 5 6 " 1690DATA"KHD?FK K F?F F DKHD?FK K F?F F DKHD" 1700DATA"^ ^ c c " 1710DATA"P O O M P O O M P " 1715DATA". . /. ." 1730DATA5,4,4,4 1740DATA"6 " 1750DATA"K " 1760DATA"R " 1770DATA"W " 1775DATA"/" 1790DATA5,7,3,4 1800DATA" 6 5 6 6 4 " 1810DATA" D D F F " 1820DATA"RTWYW[^ ½ [ " 1830DATA" H J " 1835DATA"/////" 1850DATA5,1,3,4 1860DATA"6 4 6 5 6 " 1870DATA"[WRWYVRVWTOTRMJF" 1880DATA"YWYWY WW " 1890DATA"K J H F " 1895DATA"" 1910DATA5,7,3,4 1920DATA"6 4 5 6 4 " 1930DATA"D D F F " 1940DATA" ££ ^[^ £^ [Y" 1950DATA"H J " 1955DATA"" 1970DATA5,1,3,4 1980DATA"6 4 5 6 45656" 1990DATA"OJFJOJFCKHDHMJFJ" 2000DATA"Y [½[ YWY [ " 2010DATA"C C C D F D " 2015DATA"" 2030DATA5,7,3,4 2040DATA"6 4 5 6 4 " 2050DATA"D D D F F F " 2060DATA"[ W [Y [ Y " 2070DATA"H J " 2075DATA"" 2090DATA5,1,3,4 2100DATA"6 4 5 6 4 4 " 2110DATA"WRORVRMRTOKMOTW[" 2120DATA" RWY Y WVT W " 2130DATA"K J H H " 2135DATA"" 2150DATA5,7,3,4 2160DATA"6 4 5 6 4 5 6 4 6 6 456 56" 2170DATA"D D D DCDEF F F F " 2180DATA"TW½WTW½WTW^½^½^½^j " 2190DATA"H H H H J K J J " 2195DATA"" 2200|:Sorry about the delay... 2210|:I've had a lot of work...SOB!! 2220|:Xmas No 1 soon eh?!? 2230|:Bye for now... 2500 DATA" It ",was ,the ,theme ,she ,h ad," on ",a ,scheme ,he ,"had," 2510DATA" Told ",in ,a ,for,eign ,la,nd . 2520DATA" To ",take ,life ,on ,Earth ," To ",the ,sec,ond ,"birth,"," And ",the ,man ,was ,in ,com,ma,nd. 2530DATA" It ",was a ,flight ,on ,the , wings," Of ",a ,young ,girl's ,"dreams," ," That ",flow ,too ,far ,a,way. 2540DATA" Don't ",push ,too ,"far,"," Y our ",dreams ,are," Chi",na ,In ,Your ,H and. 2550DATA" Don't ",wish ,too ,"hard,"," Be",cause ,they ,can ,come ,"true,"," An d ",you ,can ,help ,them. 2560DATA" You ",don't ,know ,what ," Yo u ",might ,have ,set ,up,on ,your,self., " Chi",na ,In ,Your ,Hand. 2570DATA" Come ",from ,greed ,ne,ver ,b orn ,of ,the ,"seed,"," Took ",a life ,f rom ,a ,bar,ren ,ha,nd. 2580DATA" Oh, ",eyes ,"wide,"," Like ", ,a ,child ,in ,the ,form ,of ,man. 2590DATA" A ",pro,phe,cy ,for ,a ,fan,t a,"sy,"," The ",curse ,of ,a ,viv,id ,mi nd. 2600DATA" Don't ",push ,too ,"far,"," Y our ",dreams ,are," Chi",na ,In ,Your ,H and. 2610DATA" Don't ",wish ,too ,"hard,"," Be",cause ,they ,can ,come ,"true,"," An d ",you ,can ,help ,them. 2620DATA" You ",don't ,know ,what ," Yo u ",might ,have ,set ,up,on ,your,self., " Chi",na ,In ,Your ,Hand. 2630DATA" In your ","hand,"," Your ",ha nd. 2640DATA" Don't ",push ,too ,"far,"," Y our ",dreams ,are," Chi",na ,In ,Your ,H and. 2650DATA" Don't ",wish ,too ,"hard,"," Be",cause ,they ,can ,come ,"true,"," An d ",you ,can ,help ,them. 2660DATA" You ",don't ,know ,what ," Yo u ",might ,have ,set ,up,on ,your,self., " Chi",na ,In ,Your ,Hand. 2670DATA" In your ","hand,"," Your ",ha nd.