' +JJJJ ?\>m0M='+l> /+l   d']6@5L&]655]6LF%5 & "L}"BB5L&]6 X  `6 77777777777JJJJx 77L? L7877777777 776i 7 7867 7`77 777777`x =(`(8`5775I7`B` 76`77`>J><;VU<)?<`8'x0|<&HhHh 8 8 8 8V&` aI꽌ɪVɭ&Y:&<&Y:&;: 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8 9: :' 9: :& :x)*++`FG8`0($ p,&"ųųೳŪŪųųij  !"#$%&'()*+,-./0123456789:;<=>?8  1 '" *"( (9"1 ( ,.(0# 2  /#0/#0 *?'#07#000'#07#0:"4<*55**5*%5)1)1)1)'#0/#0*5*75**5*:5/#0/#0'#07#0:::*::'#07#0"):$(%"%:$(%"%$$2%4%$$2%4%$(2()!)E(!8b $!H(+ "@H !D)"E` @ $ C ` DQ &J80^݌Hh < <݌ < < h < < < <`HJ>݌h Hh݌`葠葠ȔЖȔЖȠHIHHHHhHH݌hHhHh݌H6 (G FG HZXj 80x D9$xxH` >( Z>h Z>L=.xxH >hh@(LH>9L>HH/Hh/ H?-З( 8(& 8$8 H` *8HNx`* >x$50x*$50xL9JJJJ`HHjf5 >h $50x`HA>VD;;P >(ED Z> ?$0x8x D9- 8DD# H8`?E Vˆʎ55L $ 5 55555 &a*5`*5` "L&5_*b*JL%u**Lz%`** $  Q(lXJ̥KlV $  Q(lV eօ3L e3L &%R*L &%Q*L d' "L4% N'e*)n*5 5 &`@-e*f*f* 5 "L# "5f*`L %.* *t*Q*L$ %L&*L` "O**P**u** d' "L% N'e*)n*o*o*n* &8ɍ` ^&f\*555L& ^&NR* & "R*ΩL&)\*Z* ʽ LH*v 3h`0h8` " ['L & N'С55 &5`*A*@` +5L^6L65`  \* ?*0 '\* '  Q( ^&\*lZl^?*c*q)H c*h`f*5h*5j*555@O*AP*`u*@`@5&`Q*R*`E 'Ls' ' ' @DAE@u*`8` %@ @A@`@`**@*A`M5 ) "L&`8@AW*c*@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@c*h8&ȑ@Hȑ@Ah@L'Hȑ@ȑ@* htphso`hMhL`9V*8U*897T*6S*67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx- (   Ϡ734@~3!+,W,o,*--,,9,-.-~3~3,,,,~3~3,,,,~3_*3 j.5 *H*H`Lc3 (+L3 +55555 1^3_* )3J Q*L_3Ls3443 D23455545554 70 / 7 :/354545455454555535L^/5-5I5555 55` / 4/ 2-5! / 08555454 70L3 (+50+5B5C3 2 70L35 *H*H`Lg3L{3505 *H*H` 3 ,5L3 3 1 ,H 1hBL, 0 BH [1 1h`Lo3 35 ,L3 3 1B , 1L,H 0hB@ 55 [1L133 (+34) 34 70L3 3L3 (+ 055L- (+34L{33454445 70 ^/* / 3B0 HȱBh -355 -8 /L38 25` +5 /3 /. /. 3 E7D B. /. /. 0]34S0J4 4) 3 4D4E B. 4  /. 02L3 Ν3 3`HD٤33DEEhiHLG.h ` /5B5-` /5B-` + X05I33383 33DH /4 E03744Ȍ7 X040 7 J7L35B5C`,5p` / R0-55`50` K/ R0-55`575755` 4/ K/ /( 55L/BȱBL/58` D2BH5BH :/ 75Bȭ5Bhh55 R0B5m55ȱB5m55` /LR0557755`*7*75LR0 E0(33 48`433 R0` E033LR0*7*7`777 555I7575757577** 7757`7 L35555f /55555555 ^/`855 i /B58` 41L 15ȱB5 /5555 /5`3 D23ȑB55B5 / 7 55`5555555555 5555`555`55BC55`5555`L3 /5B5C355 0Q340"B4 3` 02۰Ϭ33B438`3i#`3ЗLw35!50>5555`53 /3m3 3 3733i35 3583 /35ЉLw35`H /5h 25L/~43 533`55555555J5m55m5jn5n5n5ۭ55m5555m55m55`"L? 585H ~.(3` # d ֠z# u*`TIZE A VOICE (OR OTHER SOUND) FROM A CASSETTE TAPE PLAYER. USER MAY THEN PLAYBACK AND EDIT THE INFORMATION, SAVE IT TO DISK, OR LOAD A PREVIOUSLY SAVED FILE. "r"LOADING ROUTINES, PLEASE WAIT ..."tD$"BLOADVOICE.OBJ"v14:868:25 w MAINNE FROM DISK"::25:120 M8 c INIT VARS/STR$ J dD$(13)(4)o fRECD28672:PLAY28800:FLTR28912| h35:50 m INTRODUCTION nA$"VOICE EDITOR":20:12:"BY JOFF P MORGAN":10:"SYNERGISTIC SOFTWARE"p" THIS UTILITY WILL DIGITO SAVE DATA p F30:VMVEB1ė:" OVERWRITE VOICE DATA IN MEMORY (Y/N)? ";:FF1:9:KEY89KEY121ġ:120v H J IS DATA IN MEMORY?  K30:VEB1ė:" NO VOICE DATA IS STORED IN MEMORY... YOU MUST EITHER RECORD ONE FROM TAPE OR LOAD O6"DOS ERROR: ";P 8ER" AT LINE "LN" CORRECT CONDITION AND PRESS RETURN ":9o :216,0:16368,0:ER0:120 ; GET FILENAME <" (RETURN FOR CATALOG OR ESC FOR MENU) "C$" WHICH FILE: ";:9:F$A$:F$""ė:D$"CATALOG":60 B E PROMPT |&tlj|E&|ljt Lʅ~` ~~ .) 󨹠c~`!~T~m~LL      L  L|~ ~i'~1~~` .) L' LN` X bbI`'`|&t|&ljt|-~~T~#~~m#~~~m-~~L- . ~`~/~` .)ȹe~ .)~T~$~~~%~~ ~ ~~~~~m$~~T~~L-~~ K~`~)~~i~  ~c~!e ceci ~Qd3T ~$~I~(~~~~e (~ ~}~ ~ ~~H -h0L``~: .) 󨹡c~ .)8#~ ~-~~ - .) .)8#~ .)-~I-~~ɨɀ   ~H C 0hi L* HH`~ɀ댈? LO~0C .) 󨹡c ~ .)8~ ~(~~ . -~Lw(~B#LlL   ,a ,b @`,W,T,R,P !"bbiw' $% $ !" X K bb'~ B:67,A:M2 24,216,160,0,76,44,254,32,12,253,133,60,32,12,253,133,61,96h6STFR1:12000:FR,0:>L$:"DO YOU WANT TO QUIT (Y/N) ":10000:K("Y")ĉ:::D$"RUNHELLO":>120Y NS1SS:"SAVE SHAPES TO ASSEMBLER SOURCE FILE ":"WHAT FILE NA:SASA(SA)(SA1)256:11030n +XB(SA4):YS(SA5):HV(SA7):(HV0)11050:XS(XB72)5:XS26XS26t"+*+XS(XB72)5:XS26XS26,+ .A(FR256):BFRA256:60,B:61,A:A(T0256):BT0A256:62,B:63,A:A(ST256):BSTA256:66,4000:WIPEb120G(#816,X:817,Y:818,SH:819,(SS256):820,0:DRM2#~'K(16384):K12810000:16368,0:KK128:*SESS:SN0+((SE)(SE1))11020+SESE(SE)(SE1)256:SNSN1:11010 +SESE2:SASS:I0+II1:ISH11040. 180 DEG":" 3. 270 DEG":" 4. H-FLIP 5. V-FLIP";tz10000:KK48:K6100,6200,6300,6400,6500:190|RO1208RO3BRO6L120RORORO120RO3 120dRO6n120 XFRBU:T0BU255:1,L3:SA2,0:SA3,0[SA4,XB:SA5,YS:SA6,L1:SA7,HV:FRSA8:T0SAL21:14000:WIPEmT01,0:T0,0x11000X(IHV)105:YI27:816,X:817,Y:818,SH:819,(SS256):820,0:826,I:DR68,58:DRDR68,49:ApL$;"ROTATE: 1. 90 DEG 2$;"WIDTH OF SHAPE # ";SH;:" ";A$:XS(A$):XS1XS264000}L$;"HEIGHT OF SHAPE #";SH;:" ";A$:YS(A$):YS1YS264010HV0:XB(XS5)2:XB(XB7)((XB7)7XB):XS(XB72)5:XS26XS26L1XBYS:L2L178:L3(L2256):SA,L2256L3:SA13000 "LOAD : ";A$:A$""ıK D$;"BLOAD ";A$;",A";SS:SH1:XF1:3500qH SN03410:"SAVE : ";A$:A$""ıJ SS(SESS)1,0:SS(SESS)2,0:D$;"BSAVE ";A$;",A";SS;",L";SESS2:R "NO SHAPES IN MEMORY.":10000:3000 11000:;11000:L900,4:D$;"OPEN";A$;",L2":29300,0:D$;"READ";A$;",R1"::L(60)(61)2560 :D$;"CLOSE":SEL2BU3130:198:L$;"NOT ENOUGH MEMORY."::"PRESS ANY KEY":10000: D$;"BLOAD ";A$;",A";SE2:3500 :0:0:1002:::D$;"CATALOG":10000:" ":/O SUB-MENU L-LOAD A-APPEND X-CHANGE PARAMS S-SAVE T-TEXT SAVE C-CATALOG O-OTHER COMMANDS WHICH ?";:XF0 10000::K653100:K673200:K763300:K833400:K8420000:K8821000:K("O")23000: "APPEND : ";A$:A$""ıL& 23OTATE":"ESCAPE INV. HI-BIT CTRL-C CLEAR EDITOR"^$:" V VIEW MENU M MOVE (ANIMATE)"q)" Q QUIT".34,20:33,30:RE3:L$;:16303,0:L$;"PRESS ANY KEY":10000:16304,0:w 0:0:1002:33,40:34,20:16301,0::" DISK I:"CTRL-D DISK I/O MENU"d:" P COPY SHAPELET TO EDITOR":"RETURN COPY EDITOR TO SHAPELET":"MOVE - W SCROLL - CTRL-W":" A S CTRL-A CTRL-S":" Z CTRL-Z"1:" SPACE PLOT/INC COL R R(S21)256:FRSA:T0SE1:STSAL2:12000:MOCS2(SA)S2S2L2iFRS2:T0S2L21:STSA:12000:MOy11000:1000:0:1002:1220:" --> MOVE UP ONE SHAPE":" <-- MOVE DOWN ONE SHAPE"" D DELETE SHAPE":" C COPY SHAPE"L2(SA)(SA1)256:FRSAL2:T0SE1:STSA:12000:MOS4SHSH(SHSN):SH0SH1c611000:100L$;"COPY THIS SHAPE ? (Y/N)":10000:K("Y")190L$;"COPY TO SHAPE # (1-";SN1;:") ";A$:K(A$):K1KSN1910-S2SA:SHK:11000:L2(S2)4,0:(XF0)100:190+XSHSH1:SHSN610;]11000:100^bL$;"ADD ANOTHER SHAPE (Y/N) "l10000:K("Y")605:SHSH1:190SHSH1:(SH)710:11000:100SH1:190 198::L$;" DELETE THIS SHAPE ? (Y/N) "::10000:K("Y")1906* IK:5000 L$:1906 ,L$;"PULL FROM (1-7) :";b 610000:K13260:KK49:(K0K6)320q 8198:310 @K1:FRSA8XBYSK:T0FRXBYS1:STARTBU:12000:MO JI1ST(K):HVČSL TI:L$:120 1000:2000:1903000:1070:1630)6000:K37000:K("M")5( L$:E41 150N L$;"RETURN TO (1-7) :";z 10000:K13260:KK49:(K0K6)220 198:210 K1:I1ST(K):HVČSR I:FRBU:T0BUXBYS1:STARTSA8XBYSK:12000:MO I1ST(K):HVČSL I BU255:14000:WIPE$ iSHSNİ4000Q nRE:19:1:"SHAPE #";SH:I06:5000:Iu xL$:768,XS:769,XB:770,YS:E2 K(16384):K13200:K("Q")16000:K("P")300:K("V")400:K4500:K21600:K8700 K("D")800:K("C")900:K("R"(BU28160:SR28672:SL28675:E128678:E228681:E328684:E428687 2RO30208:RE32256:MO784:WIPE784:RD791:DR31232:D$"":L$" " <ST(6):ST(0)2:ST(1)4:ST(2)6:ST(3)8:ST(4)3:ST(5)5:ST(6)7 PRE:1000:2000:3000:1070:16304,0 dFRBU:T0" XXXVH:H(X0X76)XVXVG YYYVV:V(Y136Y166)YVYVX I1J:I:7~ L$:19:"SHAPE #";SH:34,20:190 "BLOADANIMATE.OBJ" B$(16):I118:A:783I,A::I015:B$(I): 22000 SS16384:SH1:SS,0:SS1,0:11000@ 24576:28160:26QX0:Y136:XV1:YV1:H(HV0):V(HV0):J1:34,17:L$816,X:817,Y:818,SH:819,(SS256):820,0:DR K(16384):K12815:KK128:16368,0:K(" ")21:K("H")HH K("V")VV KK48:(K0K9)15:JK10          !!"oopppppqqqqqqrrrrrs@p0` P@pvvvvvwwwwwwxxxxxyyyyy 0|||}}}}@P`p}}}}}}}|J&|xljJ|cx&|Jlj|&|ljJx??   ' NPddddd2 d@'B@p0` Pssssttttttuuuu0` ``````aŠҠ@p0` P@p0` jjjjjkkkkkklllllmmmmmnnnnnnoP@p0` PoobmbI```,0b ~𩠍``% $8 $  0 ` ၩ% $$ & LE0L  )`H hH h ``Qd 狹ō苹䋹ԍ勬fLыfQd ㍍狹苹䋹(LыifQd?FMT =ʈ`f `i / =ʈ`!P~(0 #~ @#~ Hp@~ʊ~ `~@~ɩ9 [` ~i~'~i ~8 ~~8, ~(`(`),i-giWgihif 1ii ` . ,`c !e cm ci ce`HAm %ȭ%ȭ%Ȍ K8.8.8. 8.ɀ閭阐8逍閍阍h` H!p0@(~~ʊ~נ H)  H L~%~i 1~1~~'~ ~  ~i'~`r H,   ~~~ K  ) ~'~1~L, .- `LN   . Qd݆ކL  KLo~ ~~~H KhLl @I ~ ~ R,0#,L @6,a* ~i'~1~~`~`'~81~1~ ~L X'~1~ .i`L ~ @%8$ ~,- @ LZ @0=L J~&$0 ~~$p~~L~fQd ~ k݆zކ/bmbI`ʈ`~f~`~з~~ ~О~8nL~*`~~i~  Lʅ~` ~~ .)c~`~G~f~i~&i / =,nkʈLʅ~` .)0 +~ɴ$ .)I  L- . ~``~a~` .)ȹe~ cc .)N N .)~~$~~,0u~c&Qd!$~I$~~쌮c~~~~m$~~~~L-~~ K . , ~$~I~(~~~~e (~ ~}~ ~ ~~H -h0L̂``~6 .)c~ .)8#~ ~-~~ - .) .)8#~ .)-~I-~~ɨ-~~~#~~m#~~~m-~~8$#m1 `O i@ &N&O&N&ONON`f  `K~0? .)c ~ .)8~ ~(~~ . -~~(~@ ~c~!e ceci ~Qd1 .) .)II 0 ce` cm ci` .)`MWa!MWa˘ɰ,0, $( L ` Ռ팬  Ռ  ׌`$% $ KLL!#  `~ɀ Ei     K H h8H ڀ  @ @ @I @ hi#б \H[H`  L .)      ,(ST256)1 *62,EN(EN256)256:63,(EN256)X ,66,DS(DS256)256:67,(DS256) .768,216:769,160:770,0:771,76:772,44:773,254 0768: 1 ERROR HANDLER 2::8:ER(222):LN(218)(219)256 4I0I15ĺ"A/S ERROR: ";:56 "PRESS ANY KEY TO CONTINUE ESC FOR MAIN MENU ";:FF1:9Y  END OF VOICE p VE(2)(3)256: " CLEAR BOTH BUFFERS #:::0,0:1,0:2,0:3,0:B18192:B216384:VO0:VE0:VM0: ' MEMORY MOVE (60,ST(ST256)256:61{8192:100( READ KEYBOARD 2 A$"": B$W KEY(B$):KEY27ġ:120 FF14:KEY1314:B$;:A$A$B$:10FF0: PRINT TITLE AT TOP ::1:(20(A$)2):A$:34,2:3:1: PRINT PROMPT AT BOTTOM B 22:7:   P@DD @@P TT @@T @@@@@@@@@@@@PPDDx88t`@DDP@@@@@@@@@PDDDDDTPPTTP P TP PT@@P@@@@@@@@@TPPTTPPP P PTP @TP P TT@@@@@@@@@P@D @@@@@@@T @T         PDDT  DDDD  PPTTPDPTTDPPPT @@@@@@@@@@@PD DDDD P @@T TPTPPTTT TT T TPD P T P@@@@@@@@@P@ TP@ TPT @@PPPPP T@@@@@@@@@@@@T T T T @@@@P@@@PPDD@@@@@T T @@@@@@@T T @@@@PP@P@@@@@@@@PP@T P@PT T ',@@@@@@@@@T T @P DDDP@@@T@@@   DDDDDP@@@@@@@@@DDPP 67`H)HH$ %e P ei&&&ii i hhhL`A$B$Ā(LC0% I`0 I0ܩ(ߠQ)'%01&*%0Q)&E%0*Q&&QeS)j00     :"ERROR ";(222)" PRESS ANY KEY TO RESTART":16384,128:16368,0:216,0:1000X30 9Be>BCe?C8BBBCB<>=?>?>` !!!""""###$$$$%%%&&&&'''0` P@p0` P@p0` P                 $0"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;?2~E~X~k~~~~~~~~~)<O#*18?FMT[bipw~b((((((((((((((((((((((((((((((((PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPP $(,048< $(,048"&*.26:>#'+/37;?#'+/     hh h  Ӡ͠ҠϠHH Ơ РԠD ŠF РȠHǠFР̠̠!Р̠٠̠#РĠؠԠȠƢӠ٠٠ϠŠHh HHH H *HH HH $hhHHH H ,HHHH ,< HH lhh  jhhHH nn<BРΠӺРŠӠԠ&РҠԠHH f ӠيHH f ؽֽ دԠHH fHH fؽث#ֺƠؽҠؽΠֽ!ֺ˽٨ƠԠˠĠϠӺ ӠH hh HH ƲBŠ٨Π٠$ӠΠӠՠϠΠ!ĠϠŠƠ٠Ӡ'ĠǠŠΠƠͮҠźӠ͠Ԡ ԠŠ&ӠԧӠɠŮҠźӠ͠Ԡ&ҠɽϠԠӠ˽ԨԠHH fHH f ˺ԠɊĠϠӠHHHH  Ӡ٠hhغԠԠĠϠӮH HH H HHHH HHHHHH ($f²ƲeB'ŠԠΠŠԮ&ӠԠӠҠŠ(ϠŠĠ͠ŠТBŠҤΩǠή'ӠԠӠΠɠ&ΩΠĠϠԧӠԮҠźӠ͠Ԡ ҠٽϠҠؽ%ԠҤث٪͠ӠŠƠ&ĠӠƠŠҠ#ҬŠԠ̠Ԡ"ӠĮԠӠĠ#ҠӠΠŠƠנϠŠĠӮŠŠŠǮ آK X }}lє$hhHHHH *HHH'HHHHH $HHHHHH *HH >$HHHH $HHHH >HHHH *Q B(HHHH $*HHHH (H H *$HHHH HHHH H(HHH &H(HHH &H(HHH &H(HHH &HHH(HHH &H(HHH &HH HHH(HH'H HHH'H HHHHHH &b H H &HHHH &b H H &(HH *$HHHH β AHHH2H HHHH HHHH HHHH $hhHHHH HH : nHHHH &h h!!H HHH &h$h%!H HHH $h&h'%H$H'H&HHHHH &%H$H'H&HHH %H$H'H&HHHHH $ضHHHHHH >$hhHHHhHHH'H 8>HhHHH'HHH HHH'HHH Hh#H"hHHHdH *hhH H }H H HH!H HHH &HH HH HHHH &!H H HHhHhHhHH HHH'HHH H H H H HH!H HHH &HH HHHH (HH &HHHH *&h"h#HH KHHH'HHH HHHH $hH (HHHH ($HFH $hhHHHH *HH dH H *(hhHHHH HHHHHH >HHHHHH 2HH $HH  HhHhHhHhH(HH (HHHH ($HFH $hhHHHH *HH dH H *(hhHHHH HHHHHH >HHHHHH *HH $HH HH ^HH $hhHHHH (HHHHH H'HHH &hhHHHH $HHHHHH $wHHHH $HHHH LHHHHHH ,HHHHHH   ;HHHH $hhHHHH :6121/ x:"REPEAT (Y/N)? ";:A$:A$"N"100P I110:3,A:4,B:5,C:6121g J1100:J,I:120{ "RUN HELLO":,EITHER (A/D/N)?":A$:I(A$"A")(A$"D"):I1A11ĺ"CANNOT DECAY FROM A TONE START LESS THAN11.":41 *J110:765,AJI:766,B:767,C:5888:J:40 220 d:"WHITE NOISE ROUTINE":10:"INPUT DURATION AND 2 PARAMETERS. ":A,B,C n3,A:4,B:5,CHITE NOISE OR TONES (W/T)? ";:A$:A$"W"100 :"TONE ROUTINE":10:"INPUT PITCH, TIME, AND TIMBER. (0,0,0 TOQUIT";:A,B,C:A0B0C05000 765,A:766,B:767,C:5888 (:"REPEAT WITH STEPPING (Y/N)? ":A$:A$"N"20f )"ATTACK OR DECAY OR N}::"THIS IS A SIMPLE SOUND EFFECT EDITOR FORUSE IN PRODUCING STRAIGHT TONES AND WHITE NOISE SOUND EFFECTS. THE LATTER CAN BE USED TO PRODUCE SOUNDS AS DIVERSEAS HISSINGS, EXPLOSIONS, LASERS, CLICKS,ETC." (4)"BLOAD SOUND.OBJ"- 10:"W  HHHH HHHLH HHHH HHHH HHH`H ȖHXH HH HH ŠɠҠ  ̠ Ӡ HHHH HHHH HHHH HHH H HHHH H HHH H HHH H HHH H HHH H HHH HHHH HHHH HHHH HHHH HHHH آ X  "$&}}lє        ****       """"**""  $$                > """""""""ɍĠŮÍĠȭōĠӍĠύĠ͍Ġ̍ĠӍĠӍĠ΍Ġԍ̭ððððǍ @0                  H S h L $ &!'i'` X" B$%H $  hi#L")   C ?`*******i + 20 *M $&'i'$!%#"H $(*)) +hi##H !&*'i'+i+ɠ  L"(  4 >8 96 7 L& '&''),W,R,P` H ʭ Ɉh , 0ɛ ` hL H h` ٿ N H h `L L Wx}` H $&I&'i'h ` $(&)) '`   ,HALF,WHOLEETER,HALF,WHOLE "EXEC SETUP":)&'$%"# !+W+ !*"+ >>*`"ȱ* !Ȍ> ?" ! ?LLv#0%&`LTLZ$0%&`LnLt" $ JF$8$#ȹe$$8!&%#ЛL%&`Lø{{ttmnghab\\WWRRMNIIEEAA=>::673401..+,) ERY ! :D$"EXEC SETUP":U:I16:(8);:::" HBBS : 206-584-6900 "::T12000::v(4)"MAXFILES3"I768794:J:I,J:I:768:LC(767)  44,131,192,44,131,192,169,0,141,0,208,173,0,208,201,0,208,5,169,1,141,255,2,44,129,192,96 1)..ENTER SONG 2)..PLAY SONG 3)..EDIT SONG 4)..LOAD 5)..SAVE 6)..CATALOG 7)..QUIT >";|A$:A(A$):A1A71005A26,100,200,425,425,424,300  8,10,12,13,15,17,19,C,D,E,F,G,A,B,@," ",#,17,19,8,10,12,13,15,USER,SIXTEENTH,EIGHTH,QUARTER:NUS1(300I):J0:(NU)255440=JJ1:(NUJ)255430ISL(I)JPIwD$"BSAVE"FI$",A"S1",L"3005:1000 :"UNIMPLEMENTED YET PRESS ANY KEY":A$:1000D(A5)2(A16)3(A32)4(A64)5(A128):A$DU$(D):^::"SONG EDITOR >";A$:A$"Y"1000:@104,8:2048,0::D$"RUN HELLO":S::D$"CATALOG"::400:"PRESS A KEY TO CONTINUE":A$:1000400::"ENTER FILENAME (RETURN FOR NONE) >";FI$:FI$""1000A4ĺD$"BLOAD"FI$",A"S1A4450!I04N1:900:12:A$;:D0ĺ" ";A;):236/o"EDIT WHICH? (RETURN=NONE R=RE-DISPLAY) >";A$:A$""1000A$"R"ė:235(A$)0251IN(A$)22:ED1:44:ED0:250"A$:1000, QUIT6:"DO YOU REALLY WISH TO QUIT (Y/N)? N0:5:"NOTE";:12:"DURATION":LA(S1(300SO)IN):ININ1:A255250NOA:OC((NO8)12):NTNO12OC:J1:I18:(NTM(I))1ĭJ1NTM(I)JII:SHNTM(J):LT$L$(J):SH$S$(SH2):(IN2)1;")";:5:LT$;SH$;OC1;:A(S1(300SO)IN):INI PLAY SONG? n:"WHICH SONG DO YOU WISH TO PLAY (1-5) >";\ rA$:A(A$):A1A5114 xA$:AA1:SOA:ST1,SO:ST:1000 EDIT SONG :"WHICH SONG DO YOU WISH TO EDIT (1-5) >"; A$:A(A$):A1A5232 A$::AA1:SOA!:I"A$"W"A$"H"A$"Q"A$"E"A$"S"55:A$"U"Ą"USER ";A$:A(A$):A1A25555:57 8A0128(A$"W")64(A$"H")32(A$"Q")16(A$"E")5(A$"S"):900:A$ 9S1(300SO)IN,A:ININ1:EDı :45 <S1(300SO)IN,255:SL(SO)IN:1000 d' .5:A$:A$"Q"60:A$"A"A$"G"46D /A(A$)64:NOM1(A):A$;h 0A$:A$" "A$"@"A$"#"48| 1A$"#"NONO1 2A$"@"NONO1 3A$; 4A$:A$"1"A$"9"52 5A(A$)1:NONO12A:A$;:S1(300SO)IN,NO:ININ1Z 712:A$:A$"U) AT THE 'NOTE >' PROMPT.FOR A REST ENTER R SPACE 1. TO QUIT ENTER Q AS THE NOTE": "ENTER THE DURATION AS W FOR WHOLE H FOR HALF Q FOR QUARTER E FOR EIGHTH S FOR SIXTEENTH U FOR USER": (34,16 ," NOTE DURATION": -(IN2)1;")"; >"; A$:A(A$):A1A527 A$:AA1:SOA::"DO YOU WISH TO ENTER A NEW SONG OR ADD TO AN EXISTING ONE? (N/A) >";:A$:A$:A$"A"INSL(SO)W :"ENTER THE NOTE (A-G) THEN A # FOR SHARP,@ FOR FLAT, OR SPACE FOR NATURAL THEN THE OCTAVE (1-9 ) :D$(4):NO0:S15419:ST5120:ED0HD$"BLOAD SONG EDITOR.OBJ"mI04:S1(300I),255:SL(I)1:I17:M(I)::I17:L$(I)::I13:S$(I)::I17:M1(I)::I05:DU$(I):1000 IN0::"WHICH SONG DO YOU WISH TO ENTER (1-5)        `BA'A $(&)) 'H&)&hH)&&'i'h*i(iAAг`A& 'A&'')`" !H)&JJ&&h' &' &' f&') '#i@0`0 ȅ0` @<뾪(}UA`@ ,W,R,P @AAABBBB-A,A JJJJ)AIA AA @L|@ @AL|@ @A @AA  * * A "! tAAAHNAQ&%0Q&& Ah80H" tAL@AAFAAA``AЎL2@  z#???? ĠҠ ȭŠӠҠ ̠Ӡ!ŮǮԠ" ޯޠ Ӡ ̠͠ ӠΠ Ԡ Ϡ  Ůʠ ΠҠ$ӮʠӮʠ Š٠ Р Ůà" ŠҠŮʠǠҠ ǠҮʠĠҠĮʠΠҠϠӠӮʠӮʠĠҠĮʠ Π@@@~~~~T ||||pppp@@@@~~~~xxxx`?`?`?`?xxxx````????||||pppp@@@@~~~~T U}}Uxxxx````????||||pppp@@@@~~~~T (xx( `` U__UT||TP p p P @*@/@/@**>>*xxxx````????||||pppp@T pp@@xx``<<xxxx````????||||pppp@@@@~~~~T TttTP PPP @*@>@>@**zz*(hh(   no8Ҡon`.yw(o*o (`mn)Jnj Yn)YnLZw ywJyw`L vLzvLvoxwxw Kw Kwyw 2w 2wmmмo)n`on)xw Kw Kwyw 2w 2wo) xwnmЫ`mn)t Fsn) tnm`n)t sn) tnm`bqsqqӗq7r{r_srqr 0@`U**U       qH qh)nnn) tnmLrLyp(n*n (.t`n)t s s qtJJJJJ qn) tnmЧLypmn)Jnj Yn)YnLs tJt`nn9ttI=nn`mnInLypmnn8Lypm8ʽnnʹnnLypn)t Fs FstJmn .ttLs3Lmyttn9tn9tFjjF`24 0 1x3LLqLqLqt t` q,tt0i)t q pLp ttt9ttI=LsL2t Qp kp yp Aq =pH Aqh0 =pst` 4pLputHttH` 0 0``n`t` pln` q2n) *** 2224 0 1xn         "a::::" HBBS ";::U11000::I16:(8);:::" HBBS : 206-584-6900 "::T12000::v(4)"MAXFILES3"I768794:J:I,J:I:768:LC(767)  44,131,192,44,131,192,169,0,141,0,208,173,0,208,201,0,208,5,169,1,141,255,2,44,129,192,96 LL L ֐ АY V  А ֐< # J ֐ #οξ J % $&  νH Kh А`8 `` DYqqqMUVW-r`7%MY q\ a@_,a@E(̠͠)G:6\'`$q`78r$@M6_6F@bqq`˩32eHȱehȱȱ8ȱ6ȱ5ȱ100i0m5ee0@9671,40<m981m8m87`m98Qm87`ƸLL < =` j< ` j<@?=ABe@BCeAC>B<>=?BCB>?>LH`H <= >? BCh`JȱJ`)FUVW\Y&xa@dededeMԲWq.?6@r`$`<()r$,  !!!""""###$$$$%%%&&&&'''-rq-rq-rq-rq37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;?>((((((((((((((((((((((((((((((((PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPP $(,048< $(,048"&*.26:>#'+/37;?#'+/":*:<"">""$$$$>>"2"<""">""" ""  ">"6**"""""&*2""""""""""""*,"" "" ">"""""""""""""**""""""> >>> >00000>">>< (&20 *, **>> "2*&" " >>  ">> "8""> """"""< >> "H ShL(,(vww.)/a /h(P*(J,-@(,(w`a +D*!w(O3l& && && &&es',r ><ss &As(*+e+(-ͨ)/.D,($&%%,'de //D,r -&*'i'+i+ɠ L" ~>8~96~7L& '&''),W,R,P`H ʭɈh ~,0ɛ `hL~Hh`ٿ~NH ~h`LLWx}` ~ H ~$&I&'i'h` $(&)) '`࿀࿀࿀࿀xxxx````????||||pppp@@@@~~~~pppp@@@@~~~~T Հ߀߀ՀԂԂЊЊxxxx````????||||pppp@@@@~~~~T xxxx````????||||pppp@@@@~~~~T ԂԂЊЏЏЊ臀臀ՀՀxxxx````????||||((((((((((((((((((((((((((((((((PPPPPPPPPPPPPPPPPPPPPPPPPPPPPPPP $(,048< $(,048"&*.26:>#'+/37;?#'+/,,eHȱehȱȱ0i0mee@,0=m1mm-mQm,`*U*UժU*ժU**U*UU*U*||֩֩֩֩֩րժժժժPPPPPPPPPP $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;? $(,048< $(,048"&*.26:>#'+/37;?#'+/37;?*UU**U*U*U*UU*U*U*U*%E` ` ل `)@` ل%$)f8*L5 لE %``hh`((((((((((((((((((((((((((((((((PPPPPPPPPPPPPPPPPPPPPP LN ń ل  E%ELB%L BH%YH`hh`AB!D" ń ل  ل (Li 섥LN jȥjȹֆ`j8&`)*8f V`hh`)` ل ` ل ` E      ՠ֠נؠ٠ڠŠ ȭӺڮjlnpr`bdfd    '4AN[hu- Ϋ`  $%L$,a @6`,a0ί ͪ dΪ d l` tL tLZ$~%%L"H hJJ##`ŠҠҍŠҠŠȭŠԮ àĠŠƠǠȠɠʍˠ̠͠ΠϠРѠҠӠԍ` ν(` Hhν뮻`` % $ ,0 Ғ $% $ʩ ɍɈɠ  `$% 0 ,0 #0άH h` MJ:20020:A$;:J::L,Is/NS1S1(S1)256(S11):H:D$"CLOSE":D$"NOMONIOC":L$:"PRESS ANY KEY":10000:L$:4NK(K):P(K16):QK16P:A$B$(P)B$(Q):>N 0,1,2,3,4,5,6,7,8,9,A,B,C,D,E,FR"CHANGE DISK DRIVE PARAMETERS. ":"WHAT SLOT NUMBEME FOR SOURCE? ";A$:A$""190:L$;:"WHAT LABEL NAME FOR SHAPES? ";B$:S9SN1:B$""118*F222L,*EGFAGK*2L,*GXMNT."A$:D$"WRITET."A$%NH0S9:M(S14):N(S15):G(S16)*NI06::B$;H1"SHAPE"I1;:L0N1:" HEX ";:J0M1:KS18IGL @FBBBC<`=>? ,BBCB` F ` ` **  0 H&%0)8n h0H  0hԭ `, 0 -  I ``<뾪(}UA'`A,W,R,P XA,W,R,PL!&) @)` B ƅBEB` $(&)) &''&**'i'i(i н C $ , 0   L  L , 0L