'(ÐüËFL¤ÄBYTÅØÙÚSD¨S¨ÖFLL¤N±N²LÎÁÓÂG¨NUÍD¤Ò€@@ € @€ãïíðõôå¡’êõ츶’ð綹’øó› c +A1@‚CAR@c@@K:B-B((        ÓÏÕÎÄ ÄÅÖÅÌÏÐÍÅÎÔ ÓÙÓÔÅÍ        7-@@-(SOUND PROGRAM MAKER7 A@(Z( (Z(LThis program takes any arrangement of envelopes made with the Sound Editor2UU(Mand writes an ENTER-able BASIC program to play them. All you need to provide<XX(Pis the starting line number of the program and a saved sound envelope file.F'-@@ '( ÐÒÅÓÓ ÁÎÙ ËÅÙP/AdAU")@€/(>:A%,d'( ('(Enter name for load file.n##(x##(|Dn:filename. Extender is|‚##(|automatically appended. |Œ##(–:AR'-@@+:4@ $$7@<@,0D@ªP@‚(" A6‚-@@C7‚<‚,4.F'P @´ ‚¾67B:,%@,..SNDÈ@@ A5@@@@Ò* B*F:A•,ApA0Üm('( does not seem to exist...9AR@K-@ c( PRESS ANY KEYm @€æ(Okay, loading .ð8@+@@8)@ƒúK„-@+…-@8)@†C6‡8„<…,-†G …K „K„-@+…-@@58)@†C6ˆ8„<…,-†G …K „tAR@"(>:A%,%(((t(GThe next menu is a listing of different voice arrangements. Choose one,QQ(Ienter the name of the program to write, and then select the starting line"//('number; the computer will start writing,N<(4the program, which should only take a few minutes.N-@@ 64( ÐÒÅÓÓ ÁÎÙ ËÅÙ'AdAU4)@€@(>:A%,T*-@@*(ARRANGEMENT MENU^--@@-(-- Voice Numbers --h7-@@7(A - 0,1,2,3 B - 0,1,2r5-@@5(C - 0,1,3 D - 0,1|5-@@5(E - 0,2,3 F - 0,2†7-@@ 7(G - 0,3 H - 1,2,35-@@5(I - 1,2 J - 1,3š3-@@3(K - 2,3 L - 0¤3-@@3(M - 1 N - 2®-@@(O - 3¸/-@ @/(Your choice (A-P) : ?Â\)@€&€ @e)€!@y8-@ @R(YOUR CHOICE ¨Á­Ð© : \ A@Ì6‰-€&@dà8(>:A%,(8( Enter name for the program file.êAAR'-@@.(œ2ŠAŠ4A€ô$$Š7@<@,0DA€N(>:A%,(6(Enter the starting line numberN(and interval for Š( Enter START,INTERVAL/ A@-@%‹Œ/ B& (OK... (--COMPACTING--0,6-@5,Ž-@5@6@:>6-#-@@4‘8‰<,"> AD6-%ˆ8&@<Ž,N   6’-‹X' A b 6-Ž Žl(­­­ ×ÒÉÔÉÎÇ ­­­v+@+@@Š€` 6“.=:‹,%6“7B:“,%@,. LN=D6“7B:“,%@,.=:$@,Q(@“X6“.`6‹-‹%ŒŠW 6“.=:‹,;6“7B:“,%@,. POKE 53775,3:POKE 53768,0H(@“O6“.W6‹-‹%Œ”& 6“.=:‹,&6“7B:“,%@,. DIM ž0Ž-@@0‘8‰<Ž,@A¨S6“7B:“,%@,.E86“7B:“,%@,.=:Ž&@,S6“7B:“,%@,.$(LN),²' Ž“7B:“,:@4,Ú>-@6”-ˆ8Ž<,(” @>6“7B:“,%@,.0ä;6“7B:“,%@,.=:”, ;6“7B:“,%@,.>:@4,î(@“6“.6‹-‹%Œø Ž` 6“.=:‹,-6“7B:“,%@,. POKE 53768,D6“7B:“,%@,.=:ƒ,Q(@“Y6‹-‹%Œ`6“.  6“.=:‹,8Ž-@8‘8‰<Ž%@,@A  }6“7B:“,%@,. POKE E6“7B:“,%@,.=:B7`%@$Ž,[6“7B:“,%@,.,}6“7B:“,%@,.=:‡8Ž<,,*6“7B:“,%@,.:4' Ž“7B:“,(@“6‹-‹%Œ6“.H 6“.=:‹,R~/6“7B:“,%@,. POKE 559,0:FOR A=1 TO F6“7B:“,%@,.=:,b6“7B:“,%@,. STEP 2o(@“v6“.~6‹-‹%Œ\8Ž-@8‘8‰<Ž%@,@A f 6“.=:‹,pw6“7B:“,%@,. POKE E6“7B:“,%@,.=:B7a%@$Ž,`6“7B:“,%@,.,VAL(Ew6“7B:“,%@,.=:Ž,zH&6“7B:“,%@,.$(A*2-1,A*2))+H6“7B:“,%@,.=:‡8Ž<@,,„(@“6‹-‹%ŒŽ Ž˜P 6“.=:‹,46“7B:“,%@,. NEXT A:POKE 559,34A(@“H6“.P6‹-‹%Œ¢s 6“.=:‹,f6“7B:“,%@,.E POKE 53761,0:POKE 53763,0:POKE 53765,0:POKE 53767,0:POKE 53768,0:ENDs(@“¬" 6“.(@“"@¶7(>:A%,(%( ---> FINISHED7AR@À.( (.( Press Ò to run the program againÊ( or Ñ to quit.Þ5#@@K:5AdAUè,)@€,€@:R,*€@:Q,Aò€"@:R,%üAR__;@ ,‘9@<@,Š;@ ,ˆ9@<@5,“;A ,‡9@<@,L #A`!„-@@5…-@@9"‚D6‘8„<…,-‚H …L „$mm1,1,1,1,1,1,1,0,1,1,0,1,1,1,0,0,1,0,1,1,1,0,1,0,1,0,0,1,0,1,1,1,0,1,1,0,0,1,0,1,0,0,1,1,1,0,0,0,0,1,0,0›.0,0,1,0,0,0,0,1›8$€D2:SNDWRITE.BAS!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!