10 '************************************************** 11 '***--------------------------------------------*** 12 '*** This program senses the signals coming from*** 14 '*** the cassette I/O port. Put a music tape in *** 16 '*** the player/recorder, then run the program. *** 18 '*** Special thanks to David Gochenour for the *** 20 '*** use of his 512K CoCo, and RGB monitor for *** 22 '*** further testing of this program. *** 24 '*** By Wes Harper UID - 73347,1202 - *** 26 '***--------------------------------------------*** 28 '************************************************** 30 WIDTH32 32 RGB:POKE&HFFBD,0:POKE&HFFBC,63:POKE&HFFD9,0:'You can change to CMP. 34 CLS:PRINT@480,"" 36 PRINTTAB(1)"<><><><><><><><><><><><><><><> 38 PRINTTAB(1)"******* COCO LITE SHOW ******* 40 PRINTTAB(1)"<><><><><><><><><><><><><><><> 42 FORT=1TO11:PRINT 44 PLAY"T200;O4;C" 46 FORX=1TO40:NEXTX:NEXTT 48 A$="BY WES HARPER":Y=466 50 PRINT@Y,A$:FORTD=1TO5:NEXTTD 52 Y=Y-1:IFY<449THEN54ELSE50 54 FORW=1TO3000:NEXTW 56 ON BRK GOTO 146 58 PALETTE8,63:PALETTE0,0:CLS1 60 PMODE3,1:SCREEN1,0:PCLS:'If you change the color set, program won't work properly. 62 FORX=0TO9STEP1:FORY=0TO9STEP3 64 LINE(X,Y)-(254-(X-1),191-Y),PSET,B 66 LINE(X+30,Y+27)-(226-(X+3),164-Y),PSET,B 68 NEXTY,X:PAINT(128,3),2,1:PAINT(128,30),2,1 70 PAINT(128,10),3,2:PAINT(128,37),5,2 72 FORI=66TO200STEP40 74 CIRCLE(I,76),8,3,3 76 CIRCLE(I,116),8,3,3 78 NEXTI 80 MOTOR ON:AUDIO ON 82 POKE&HFF20,2 84 IFPEEK(&HFF20)=2THENPAINT(66,59),2,3ELSEPAINT(66,59),4,3 86 IFPEEK(&HFF24)=2THENPAINT(106,59),4,3ELSEPAINT(106,59),2,3 88 IFPEEK(&HFF20)=2THENPAINT(146,59),4,3ELSEPAINT(146,59),2,3 90 IFPEEK(&HFF24)=2THENPAINT(186,59),2,3ELSEPAINT(186,59),4,3 92 IFPEEK(&HFF20)=2THENPAINT(66,133),8,3ELSEPAINT(66,133),6,3 94 IFPEEK(&HFF24)=2THENPAINT(106,133),6,3ELSEPAINT(106,133),8,3 96 IFPEEK(&HFF20)=2THENPAINT(146,133),6,3ELSEPAINT(146,133),8,3 98 IFPEEK(&HFF24)=2THENPAINT(186,133),8,3ELSEPAINT(186,133),6,3 100 IFPEEK(&HFF20)=2THENPAINT(128,2),7,2ELSEPAINT(128,2),8,2 102 IFPEEK(&HFF24)=3THENPAINT(128,4),7,2ELSEPAINT(128,4),8,2 104 IFPEEK(&HFF20)=2THENPAINT(128,7),7,2ELSEPAINT(128,7),8,2 106 IFPEEK(&HFF24)=3THENPAINT(128,190),7,2ELSEPAINT(128,190),8,2 108 IFPEEK(&HFF20)=2THENPAINT(128,187),7,2ELSEPAINT(128,187),8,2 110 IFPEEK(&HFF24)=3THENPAINT(128,184),7,2ELSEPAINT(128,184),8,2 112 IFPEEK(&HFF20)=3THENPAINT(128,29),7,2ELSEPAINT(128,29),8,2 114 IFPEEK(&HFF24)=2THENPAINT(128,32),7,2ELSEPAINT(128,32),8,2 116 IFPEEK(&HFF20)=3THENPAINT(128,34),7,2ELSEPAINT(128,34),8,2 118 IFPEEK(&HFF24)=2THENPAINT(128,163),7,2ELSEPAINT(128,163),8,2 120 IFPEEK(&HFF20)=3THENPAINT(128,160),7,2ELSEPAINT(128,160),8,2 122 IFPEEK(&HFF24)=2THENPAINT(128,157),7,2ELSEPAINT(128,157),8,2 124 X1=PEEK(&HFF20)+PEEK(&HFF22)+PEEK(&HFF24) 126 X2=PEEK(&HFF20)+PEEK(&HFF22)+PEEK(&HFF24) 128 X3=PEEK(&HFF20)+PEEK(&HFF22)+PEEK(&HFF24) 130 X4=PEEK(&HFF20)+PEEK(&HFF22)+PEEK(&HFF24) 132 X5=PEEK(&HFF20)+PEEK(&HFF22)+PEEK(&HFF24) 134 X6=PEEK(&HFF20)+PEEK(&HFF22)+PEEK(&HFF24) 136 X7=PEEK(&HFF20)+PEEK(&HFF22)+PEEK(&HFF24) 138 X8=PEEK(&HFF20)+PEEK(&HFF22)+PEEK(&HFF24) 140 Y=X1 AND X2 AND X3 AND X4 AND X5 AND X6 AND X7 AND X8 142 IFY=237THENGOSUB148ELSEIFY=235THENGOSUB152 144 GOTO 84 146 AUDIO OFF:GOTO 156 148 CLS:SCREEN0,0:PRINT@261,"COME ON, TURN IT ON!!!" 150 FORWAIT=1TO2000:NEXTWAIT:SCREEN1,0:POKE&HFF20,2:RETURN 152 CLS:SCREEN0,0:PRINT@259,"HEY, TURN UP THE VOLUME!!!" 154 FORWAIT=1TO2000:NEXTWAIT:SCREEN1,0:POKE&HFF20,2:RETURN 156 SCREEN0,0:PRINT@259,"AW SHUCKS! IS THIS GOODBYE?" 158 MOTOROFF:FORWAIT=1TO2500:NEXTWAIT:CLS:END &4v޽s&5o&Tas5' Z Z94ŽB54v&ލ& _ߦ5 4v޽s54R&K$&V54v&& 2b5p_9ͼ 4V&K&V54Y&K&V5~ Xŀ's X WM']& _9]&_94v&B& m% ǝUε0o⦀C&lZ&5_2b5p94v&toޭ & L4 '.C'9'&!0Z&lb.o Z&950 % 2b52b5p_94v Z W Z&'7:'.'?'*' 覀0 T ۆ  T' W' 5* '0 'z & @;1?&946``546 46(j (\)l546 (\(j)Z&5F46(] =(\ ''-@'H|(\(\ %(\|(]5}(j'A%Z"9@9`}(j& z(\(\&z(]'(\5(\(\5' 9 COCO 2 GIF READER COPYRIGHT (C) 1989 CHRIS BABCOCK DRIVE: FREE: NFO OAD IEW RIVE UIT HELP SAVES: <1> RLE <2> PM4 *.GIF*.RLE NOT SUPPORTED GIF FILES NOT FOUND----- ERROR!! -----(' '  1 A%Z"@9 HELP SCREEN - THE MAIN SCREEN NFO - SHOWS INFO ON THE GIF RIVE - CHANGE THE DRIVE OAD - DECODES SELECTED GIF UIT - EXIT THIS PROGRAM HELP - THIS SCREEN <1,2> - SAVES VIEW AREA PICTURE@AS <1> COMPUSERVE RLE (B&W) @OR <2> PMODE 4 (COCOMAX 1/2) IEW - SEE CURRENT PICTURE TOGGLES SCREEN 1,0 AND 1,1 INVERTS GRAPHICS SCREEN PRESS ANY KEY TO RETURN TO MENU.ޭ'9JO_(\*H[P4(\(j0 '*G΀' (& #4ȧ ""5*&)0(\(j(k&]&(\O(j % L 000'(k(k)΀'!(_]&΀ =3ˎ)'!(_(_]&}(_& (\)(js(j m4(js(j (\(]|(](\ (\(]% (](\ (\j&2a(^|(^(^J % (\(](j (^Z=0ޭ'R}(_'*^' '' 'ÁI'ՁL'  ' D'V'?'H1'2'Q&(D (\-(ݷޭN'%Y&ކq 뭟 &̷n@N QUIT?(^'>z(^A (^(_',|(^/(^ %!(^ (^(^ (_"(^  J4 % (\(](js(j 5=0i (\*(js(jW(_(^SAVE DRIVE? (0-3) COLOR(D (\(j.#ޭ߁ '0%3"0&)qTb0.d%0L 0' (jpz.0 %0L }.&0'(jR0(jF&z1?&9 .GIFRLE FILE/:(D (\(j/-(^J =ÀG&0Z&/-&]&/-&z]&ߧ1?&&zA/-/6&Z& (\&z4&z5X&z4&z5 &z4LH50.5ŀ'\X5:&z,&(\&z0N@'0&ZNON- INTERLACE (\)t46"}+&"ƍ 5F$ 0Z&9a%z" 9ޭ'' 'I'B&s+Mdc&% @ COCO 2 GIF READER 1.6 COPYRIGHT (C) 1989 CHRIS BABCOCK@ ALL RIGHTS RESERVED @@ MARCH 16, 1989 @@ 72657,2126 GIF AND "GRAPHICS INTERCHANGE FORMAT" ARE TRADEMARKS (TM) OF COMPUSERVE INCORPORATED, AN H&R@@ BLOCK COMPANY PRESS ANY KEY TO CONTINUE... SAVE ERROR!΀< (\1+ (\.ޭ߁'$ ' 0%3"2{0ޭ &΀ . : FILENAME: SAVING... 2n2p2r2t (\2}(j-2n45'؁ '@'"'.'ہ/'ׁ:'ӌ2u"Χz(\y2n'(\Z(\ eZ(\2 (\24&g]&5`&2nBI N &]&OΆOņO&%O&&2nRL E &]&WoGjHe3_&'Y$2%&'N%4 H4z3&35 45\&'^%_ \&'^%__ _ˆGN&4}4^&4Y4Y4[%}4]'z4^5O4Y}4d&&z]&?4d&z4]004[P ý&zz4d]&!'}4d&4iO_}4j&44c4j5z4jt4cFV1?&44iO5DV1?&4k9         4=5#5C = 45C4_Yj&2aj&2a5 @ @? @4v55'h55%53A 400' O_3_&2b 2b5d= 5=05:XIXIXIXIXI}%}1!  55555554v55i555555455551?&54@}4S&L4}4T&4W4E' O%z4S2a .z4T4W4Q4U4C&1"4$5$ 4U4Q4C4C4G%`4S̸4U}4T'4WDVF4W4E&4W 4M4C4To&4Q4E4E}4O'4P'Z'&Z'>1!4E51'4E4I%|4P̽4W 1'4E4I%|4P̽4W 1#4E4I%|4P̽4W ΀& .RLE07Z&7&]&ǎo&%&z&u&zG&l&z8IM&8_8&8D8H4&z]&5 % M' 4&z]&5 % M' YJz8H&瀌&'8H9YJz8H&8H4& 0%"\54/-(^J =ÀR'0Z&/-&]&/-&z]&1?&/-/6&Z&(dN21>&&z4&z5(`(`@!&z4&z5(b(b#(b(e(f&%΀&z4b&z&z4b5:44bŀ'C5\X:4_O4&z;&z<&z=2aTTTT1?&&z]&>,'T;'!&&z&z_&z1?& ΀ ׎޽V߽&0׎΀V 4j4dO4Y04[4]4^4P4S4T̸4U̽4W&z4&z54M4C&z4&z54E4K&z4&z54M4G&z4&z54K4I̷4Q&z4O@'z4O'LH50&z1?&&zL4i5X:4m4o4q4s4i4u5X:4vζ4o'4m&,4u4i5X:4v4q4s4x4z44~b 4x4|4s% 4z4x4~64O44x/00064x 4y44~67&4s0004~4z4|4z4s4s4v%G4i '>\4i4vXI4v/}4^&}4]&   !!!""""###$$$%%%%&&&''''((()))****+++,,-----..///0000111222223344455556667778888999:::;;;;<<<====>>>???@@@@AAABBBCCCCDDDEEEEFFFGGGHHHHIIIJJKKKKKLLM  !""##$$%&&'(())**+,,--../00122334456678899::;<<==>>?@@ABBCCDDEFFGHHIIJJKLLMMNNOPPQRRSSTTUVVWWXXYZZ[[\]]^^__`aabccddeefgghhiijkklmmnnoopqqrssttuuvwwxxyyz{{|}}~~ +4v޷ؽs߷5oTaؽsٷ5' Z Z94ŽB54v޷؍&_߷٦5 4v޷ؽs߷54R$54v޷&2b߷5p_9ͼ 4V54Y5l Xŀ's X WM']& _9]&_94v޷-& m% ǝUε0o⦀C&lZ&5߷_2b5p94vro޷حٷ & L4 '&C'1'&0Z&lbo Z&950 % 2b52b5p_94v Z W Z&'7:'.'?'*' 覀0 T ۆ v T' W' 5* '0 'z & @;1?&946 f546 54644 50Pj&2a5F46P= ''@',|(%|5 z&z'55' 9@@ RS-DOS GIF Rezader @Copyright (C) 1989 Chris Babcock Drive Free: nfo oad iew rive uit Saves: <1> MGE <2> VEF <3> HRS*.GIF Not SupportedCan't find any GIF files.------- ERROR!!! --------jh4 u}}&05CMPRzGB Help Screen - The Main Screen Commands nfo - returns information on the @@ file under the highlight bar rive - allows the drive to be changed@@ press the number of drive to @@ change to, or to abort - loads the GIF filze under the @@ highlight bar using the best @@ configuration it can find ntr - toggles RGB/CMP monitor <1,2,3> - saves the picture in the view @@ area with the selected format;@@ MGE - ColorMax, VEF - OS-9, or@@ HRS - HiResCom. Press to end, for more Help Screen - The Main Screen Commands iew - allows the viewing of the GIF @@ picture that was loaded. The @@ following commands are active: @ - toggles monitor type @ - border color; black/white arrows - scroll zon picture (shift=fast) - return to main screen @

- palette rotation activate: @@up/down - faster/slower rotation shift up/down - same but larger change@ left/right - rotation direction @@ - end palette rotation Press to enzd, for moreޭ'' &9O_~ہ' O_ā'~O_j Help Screen - The Main Screen Commands oad - load a GIF file using the @@ parameters you specify: @Select either <3>20 x 200 in 16 @colors orz <6>40 x 200 with 4 colors @Next select to shrink/stretch (Y) @the width of the picture to the @screen size or clip it (N). @The vertical procedure can be one @of the below: @ lip - Leave length alone. @@@@ anything over first @@@@ 409 lines is loszt @ creen - Shrink/stretch to fit @@@@ 200 line screen @ indow - Shrink/stretch to fit @@@@ 409 line scroll areaP&@Z&'}΀ ؽ ?L9O0]&O % z L 000'΀ŷ]&}& n4 |%  j&2a| %  P= Z&ޭ'}'*^' '' 'ȁI'L' 'D'M'V'1'2!z'M3' R?'Q&!ٽ_ޭ߁N'(Y&޷؆q 뭟 &̷nHQuit?'9z<''!|*%۶"ǎ44o1?&50Pj&2a9 5 Save Drive? (0-3) colors"z"bڷޭ߁ '0%3"0-v0"d%0L 0'Az"0 %0L }"&0'&01?&9 .GI"F"J =ÀZ&"]]& "]&1?&""&Z&45Cx45#z/ 4LH,n0"qC5ŀ'\X,n:*,&#@'0;Non- Interlaced#&s}}}' P9 D46L̀>}'=P$[Z&5????ޭ'$z'} 'w^'7 'C['QB'!M'aP'a_&% s%h"h"w$o/cP}'4Z&5 4Z&5ޭ&1?& ' '_' ',['4^'> %zz%1 1* 1 %16  ,   +"!2-.79?046%$[Z&546$[%ÍZ&5&1?4 %5@@ RS-DOS GIF Reader 1.3 @Copyright (C) 1989 Chris Babcoc&zk @@ All Rights Reserved @@@ March 1, 1989 @@@ 72657,2126 GIF and "Graphics Interchange Format" are trademarks (tm) of& Compuserve Incorporated, an H&R Block Company Press "?" for help from main screen Press any key to continue...'z+I"J =ÀZ&"]]&"]&1?&""&EZ&45@&3+L 6+LYS+M+L+'J45,nLH0%ц3+LSAVE ERROR!΀(!320 only. use HRS or VEF for 640.(z"]޷ޭ߁'$ ' 0%3"(ʀ0ޭ &"΀d . : Filename:  Saving... ((((((o [(45' '@'"'.'ށ/'ځ:'֌("ѧz('Z Z(l(D4)z]&54XIXIXI0 %0L 0@)54)`% ?\@)5(VE F ]]&DO'})}'$[45Z&}l}}'R1?&}&,,(MG E ]]&O$[Z&}'O*z LZ&OZ&}1?'4 ( 5( &\%(  ߍ O_  V (HR S ]]&9$[*yZ&}{4}+'&+"+"+$%}+&'z+'5Ͽ+"}+-&+z]&+-&z+&00+$P ýz+-]&v'}+-&+2O_}+3&4+,+35z+3t+,FV1?&4+2O5DV1?&+4940+.+'0 %0|+. +.L0@OƠ}&HHHHZ&;5HHHHHHZ&;5 @ ,z@? @4v,,'h,,%,3A 400' O_3_&2b 2b,d= ,=0,:XIXIXI,XIXI}%}1!  ,5,,,,54v,,i,,,,,,4,,5,1?&54@}+&H4}+&+ +' O%-zz+2a *z++ 楾+++ &1" +++ + +%`+̷+}+'+ DV+ +&+ ++ +oO&+-++}+'+'Z'&Z'>1!+51'++%|+̼+  1'++%|+̼+  1#++%|+̼+  Scale for ho.zrizontal to screen? Y)es, N)oVertical lip creen indowScreen? <3>20 <6>40΀K;+I"J =À.Z&"]]&9"]&*1?&""&Z&.'3'6&Sw21>&45/z.n؎@}'M'3Y'N&#v"45.蓎'S'W'C&1/ӆ0_`O4v@&?L4&΀++++,:+H++ŀ'X,n\X:+(OojO" _4 ,%0z\%,5HH4HЪী1?&Zs]&a,'s;'!&_1?& ΀P@4Z&510?& ׎޽V߽T0׎V +3+-Ͽ+"0+$+&+'+++̷+̼+ 45++ 45++1z45++45++O++@'z+'LH,n01?&L+2,nX:+6+8+:+<+2+>,ZX:1+?ζ+8'+6&,+>+2,ZX:+?+:+<+A+C+H+G! +A+E+<% +C+A+G6+HO4+A/0006+A +B+2zH+G67&+<000+G+C+E+C+<+<+?%G+2 '>\+2+?XI+?/}+'&}+&&q 펿O$[ζ+*jZ&2}}'54v}'+*O+(,ώOo"Om' 0%.?"l40bm' 0%L50 &lj? +*$[ϡ&3z4&15&Z'%J&oZ&O+)+P?+O+*4$["Ġ ı+O" +O0$[+Q3Aj&+Q1!2az+P&}+I' 4+J+J5 3ޭ9@2&筟(@ &2'Pߧ' @Yנע@] &9~4##@ Z&55~פ ******************************** DISK AUDIO (C) 1988, BY DAVID MILLS ****************A**************** YOU'VE HEARD THE SCRATCHY NOISE OF CASSETTE DATA LOADING INTO YOUR COCO. BUT WHAT DOES DISK I/O SOUNDA LIKE? TURN UP THE VOLUME ON YOUR TELEVISION OR MONITOR AND YOU'LL NOW HEAR THE DATA AS IT MOVES TO AND FROM YOUR FLOP/BPY DISK. PRESS RESET TO DISABLE DISK AUDIO. @~L~noLvL~LLvLb` ~ =gLVM4r700,7I07D=9~'0o4:2b' FILE PERFORM TRACK TRACK SIZE STATUS COMMENT ----- ---- ------ ------------FPTH4ph4 2b8 ' j4:'2b O_54p0B0nDD4B42d5 K#P+U3Z;aCgLOADSAVEKILLCONFIGABOUTEXITLAKS@KCLCA6E4p0B0xDD4B442d5  RECORDPLAYNOTES OFFTEMPOFILTERMONITORR"P aN!>TFM%4p0B0ODD4B42d5?WG\OgEDITKILL TRACKCLEAR ALLEK]C4p2O_0doZ&' " X1d10 ./4a08/4X0d044 .laa %dž./4Y04 4$2bb bB4B462d044]+7b B4B46b2d04|4;*'/3084%*42b,'/304,42b25FREE:B-E-4. /35 &&0m+0 0 309MUTEPLAY4./3p5 '&0 =03094p2~^&]'U  < & 'I  0& '= $ & &1  &) '(  OLOCz2b54p4./25 =B 4B432d54p2~0&BB4 r2bBB4 2b *'O_2b5 S!3ANOTES OFF:40 TRACK DRIVE?:BACKGROUND COLOR:FOREGROUND COLOR:BORDER COLOR:COLOR/MONOCHROME:]gSq]{gq{B0 7B 40 B0 79 00 FFY630 63C40ٟB0 D!c4B46-2dշY&03803/03&M&5454p0(' ON큆 OF큆F4&p43k2d01B4B452d0GBB42bBB4 [2bn'&0s2rON'O'uON'O(O_5  METRONOME:100CLICK:ON MIDI CLOCK:ON 4DD4&p422d5 &=   Ƃ' Z& Z&*,94p2~&a'' Z& 0 4 2b '* 4 2bD FF4D4 4(2f B2b5O&_O.,OqnO_9/742b O_ 9x4.2b94.2b94p2~0)BB42b1Y&O_ 2b5^fARE YOU SURE?40 /q0,P0 0 0 ##!!n\f' M&0Z'# Z& Z0. 54p2{./..*0 ' % "0 40b.b.>50b.X.4 1t䦠0b.E.! 1aj&L' o- 0?^&1 & 02e5; ' j ;4p2~00DD% X&0BBB4:2bBB42b'X0&h&O_2b5 Wc's/7?G O MIDI FILTER[ ] NOTE ON/OFF[ ] KEY PRESSURE[ ] CONTROL CHANGE[ ] PROGRAM CHANGE[ ] CHANNEL PRESSURE[ ] PITCH WHEEL[ ] SYSTEM 'EVENT'(*,. 0 2  4 40BB42b.uO_5 ]emu}THIS PROGRAM IS UNDERGOINGFREQUENT IMPROVEMENTS. GETTHE LATEST VERSION FROM:LESTER HANDS1236A AVENUE ASEASIDE, OR 97138.L ``4p2~j )& 4442f44y2d442d42b 42b(2b54p2~j( 4442f442d442d4%2b 42b(2b54 42b54p2~j''442d'+ &2b54pj =h54p2zdnbn䦀j&442djb&d2f54p2xf'3O_bZ&444o2d5jb&f2h54p2zdZbn䦍5j&4412djb&d2f54p2|lZZ&nb4442d5lZjb&442dlZZ&2d54p2|nblZ442djb&߾lZZ&2d54p2vbd 'XbPdG&b4*2bMhD44'Q2dfhBB44+2df'^&  &%f2j54L!"%%94L9&%0;BB42bO ('N4442d ('7o+4O_9  PLAYING...4p%%P0 gjh)& &L&0&7P40 5@%m54$&$ }"5;4p2~0' *y j*O_2b5{@y'); " %& %}"+-" ('' !& '' " s" ! L&"%-&  &{(' ' am*W4''5%%'"' 3D%| B0SL'1",''O'_0%%};4Lo%5'94p ('442d ('O_54p2zb0BB42b#k #0ϯP03 'odm꾞n 18o))&'*\&l &o ܗ1( %ld ]'%"Z%34ly#pZ&5 m& & 'Z \oP0 '-/1(md'!0?BB42b$q0yBB42b$bY'N' O[2f5$$BUFFER FULL!$$$RECORDING..$00000$$KEEP THIS TAKE?4p '$o0 54p2~ 00'2"m'1('"&m$&줣  Ğ ' fM'0 &m'Z& 2b54p2} 4P 0< 䦟'0  " '"&52c5MIDI MONITOR 4p uhh4 X2bBB42b&B4B4 2d ۟BB42b&5 4p2~0 oFBB4 2bj"`jn& f@M'@4Ŀ焁&j 70U4l#j2bo j@BB42bk1g)` j2b5 4'Z 0C@54l20.+%5B4B42d-4x2b94p2|BDD4B42dbB4B4 2dj&/.BB4 2bb$ ¯d2d5'BB4L2b9#'B4B4 W2d4'mu&" jj94pBB4 2bBB4 m2b5M'B4B4 2dBB4 2bM'B4B42dBB4 #2b9BODD4B42d9'"nB4B42d942b942b94p2~BjDD4B4r2dj&ooBB42b2b54p2|0BB4G2bBB42b'hO_b03B#4B42d0B'$/&4B 5BDD4B4Y2db 0YBB4 2bbBB4_2bd2d5)Q)a)u)Y) ))k))aGOTO TIME=0:0 BEATS/MEASURE=4 4p'/h$B4B4G2d ߦ&B4B4-2dVBB4e2b54p0BB42b5**f**p***&**.**6**> **F **N **V **^ *HELP MENUB - BLOCK MENUC - CLEAR BLOCKD - DELETEG - GO TOI - INSERTM - MARK BLOCKP - PLAYR - RECORDENTER - BEGIN EDITBREAK - EXIT& &P')R' '^'I'D' (( (?M2C3A[(]_(j/)?)B3nG(4 &o 1 $54p2y]&' 0BoDD4B42dB4B42dB4B42d'ΟBB42boB4B4;2dB4B4)2d'%"&o"M&h&o&YR&DXDV /&#40bB4B42d95DO0QBD4B42do45& XIT&^o%&0B4B42dVo8\O00B4B4o2d,Zo4{&#oO0B4B4<2do T&P0BoDD4B4A2dB4B42dB4B42d'BB4@2bo 2g544L#O54p2~j'"pM&kT' "F'  %04X1('A& 0b j462b3XX3ĭ O_ 02b5.h/.p/.|/G./U./x./x./h..NF= C=NO= C= V=KP= C= P=CC= C= D=PC= C=CP= C=PW= C=SE=END OF BUFFER4p" 0=: 03O/g5TEMPOCLOCKMESSGREPETLINK UNDEFu4h v0BB42b5@Nl40OH=[5XDV3(4 O%54ޛ!54ރ\O54ib|!O54p2~j0䦀%"j_Z&j&j"#P&0_Z&j&2b54p2|0B2d546_\ $ Z4H114'50o5CC#DD#EFF#GG#AA#B40A%+G"'1_'\1# '#&\40 = @54M*#}0&&0DDDD)}0'O 5 @4phmj*'6 4'' j0'M'"  h54p2~oڮjBB4Q2b''.L''.B4B4x2d ǖ.L' . 2b54p'3 42bDhFBF4D4B4 2f   54p2~ 42b %RjBDFF4D4B4 k2f   j&& ̐@#2b54p2y1BoDD4B4 2d02g54p2~ B#4B42dj!m&0:2b54p2~j_B#4B42dj' :&A 2b54p2~'N*&* ,&8,*,%,,*oo)-42b' 2b54p2~*,/.-42b2b54p#&! &0BB4|2b*< '1%ڟB4b2b 14 T2b53434*34334;34E34R3 4\4 4h4 4s4 4BLOCK MENUC - COPYK - CUTP - PASTEQ - QUANTIZES - SCALEH - CHANNELR - CREATEE - EXTRACTT - TRANSPOSE4444BLOCK NOT MARKEDBUFFER IS EMPTYC4K57P5Q7S8H;R>E<[T=Y4p2~'3* '& ,"'0 쁣Z&  2b54p2|X&-b4O2b* >$," SM&0 Z& 42b  4 2bBDD4B4 4 2f bBB42b-d<2d54p2|-b0}BB4"2bBB42b0'GBB42bDD4 4Q2d '0 CSDD4 4&2db4L2b-d2d56j66rPUT BLOCK AT TIME=60:0 4*',&O_54ph'0 5*,94p2z 42bB 4B4 42fbd42bBbDD4B442fb' $@b '0$&4Z2b   2f5Z&94ph'j0 54p2z &߃0ӟBB4i2bBB42b!'0W20m'%DVd`4*42dB`4B42db*M&3'Kb* CSd$d# b%2b b%"턟B4B42d4' ,#. -fBB42b2f58y88QUANTIZE= 8240  4p& 3 '1%ՆB4I2b1n4 ;2b5  898989$99*994SCALE MENUVELOCITYTEMPOPITCH WHLCONTROLLERV:T:C:$P:4p0RBB42bBB4V2bi'10240{2D5BD4B4,4*4F2hO_5 9999999SCALE VALUESSTART=END= 99 9964 64 4pF&4442f54p2~*w& O0 ~0SBB42bBB4e2bx'00[ 2&BB4444{2h2b5:::CONTROLLER #:1 4p&444)2f54p_&4442f54p2~ok&l*00'U,"Pk$k&ば&&ئ&l142bmo'm'XIT j&څ . Ⱦ-bBB42b2b54p2~&n0BB4T2bBB42b '_0 B2%%4HZ*0B4B42d'," a . /-bBB42b2b5 <=>TRANSPOSE >+1 4p2x*' i&0BB42bBB4k2b~'b0BB4F2bb*O_d** b,$\&0dd .-hBB42b2h5>>>>>CREATE EVENTSSPACING= >1:0 4p 42bB@ $DD4B4 4b2f @  O_54p4_2b@ 4 4L2bB5DD4B4 42f 54phlj#l54pj0l1!h" 54p2~'B4B4C2d%b2b54pjh?M*CS?nl?M*CS??.??h?l?O_???54p?h' ??. ?54p2~??.y????????/ ????}?+ ???/ ????}?+ ???ަ&~2b5 4p2~0BB4"2bO_2b5AA NOT AVAILABLE: DEMOCM30TMPOdSTAT CMNTEVNT4p2z Z0B02d5( FREE SPACE: DIRECTORY OF CM3 FILES: NO FILESOޭ߶@94p4,P؆jZ& jZ& JJ$"55##94``큌&oo5. =/940 $0 ǸDZ5'> 940&&54DDDD 5o5 #094p2z&0_D`b0F%3A d0]&mc'm'ljcd1?&؍o 2f50 9'd &94 m' ,54p2znbonEd@'i^'e 'a ']&m'j0 &L$0 " %l%0jzO2f54pHHHH450 #94p2zO_d '00%9#b0'20OBbDD4B4"2dddbB 4B4 2db d2f54p2~km=jm=_kl=_2b54p2~l'j0l$lJb02b5M'94t13"@'_oF";GGM&9lFSi"%mA+0BCC&AO5D0D&@DA 3m"+@9FBD$FDA0&ءG&GCCA]'$""@M' 4 $0&Z&5M51IM'0&_ ^  0123456789:;,-./ _[] !"#$%&'()*+<=>? \4 & '@$@ a%` 0'@'54phO_m'\ 54dm&O_5'0 5494 0' ` Z&54p &``큌&0/1)Z&54p&``큌 &01Z&54p2z0 2f5rL& d4p2~oUo @Z&i2b54phj' &0  54 =549:%094phj''Z& 0 Z&o5"93 L40 ' 5 COCO MIDI 3 1.00 (C) 1988 BY LESTER HANDS YOU ARE FREE TO DISTRIBUTE COPIES FOR NONCOMMERCIAL USE. FOR MORE INFORMATION, WRITE TO: LESTER HANDS 1236A AVE A SEASIDE, OR 97138^ Okjkhk~jg0h0zk)1(Q&0$1<o:Ž~Ц' 9&4'4:5~ & &z&'~k4 o&}& }'5-4'5 &)',  4' i'hJ&5 )'& '  544T'<'ρ 'B'ԁ ' %&"` $?"@ _" "` &549| 4' '('' 'E 'K5 ǽ 562b~ '54 a' +5~5554 g' 54 i' +5~5e`` z\4ȗ=ݍV5|D`%%瀌&%% 瀌&`瀌&9 % `瀌& L &54 95~жp o&2b4' :|"''4 &5 5|4'5 5|4'5 5|4 'I5 & i &i'h' ' "& }'' O9& a%z" 9& A%Z" 9`  'E5~4&i'hi &}&ti'mh 'k'K'G'C''.4 ' :5|~||~5~'z~i &3i&'h5~ 4'5 a'+~45 _'+52b~54 c' +5 5:éî򮠸4:\| ' ''  ' 59 % ,ڦ,z&5 9gLaR\`q#\a\c\e\gObG 4$5Y4(5Y4"5YuF10uv2@uPYPH\c\c44AX52b2b]"]]]]45Y4?5Y4$5Y45Y45Y45Y4 5Y4?5Y 465Y 4 5Y 4&5Y 45Y]] DIR5'] Z\Y45Y[45_Y;VV845Y[DSKEDT * SBR TEMP V1.025WOV945Y[(C) 1988 By Jay Barna5WOV45Y[45_Y;F 00 01 02 03 04 05 06 07 08 09 0A 0B 0C 0D 0E 0F ASCII5WOV]]4]5Y[ 5WO^X']\0 5ZԎ^XWOV]]].~45Y[45_Y;^X'O4 5Z^XWOVF\cx4]\cz4]D5Eˎ]405 5 [U&!_4&H5^X'ZԎ] Zێ^X\X'!_'~o]]]S/!_' ]M]]&!_' ]~]&!_'~L],!_'~]M'&~&~&~&~&~&~&~&~ &~ &~ &~ 45Y2~]]~]]~]]~]]~]~]~]]],!_']]]!]/!_']]]],!_' ]]]]/!_']^X']W4]4 4AX52b2b\O^X'] Z]/!_'0^X'2~ZP] Z۽ZW\XZ׃\O^X'] Z]^X' Zۍ / $5Z2~ZP] Z۽ZW\XZ׽\^X'] Z]&!_' DIR5'] ZD~]1,!_4]6/!_'~]0]]M'&~&~&~?&~),&~:&~;F%345Y[45_Y;STORAGE BUFFER DISPLAY5WOV/45Y[45_Y; 1-3 --- DISPLAY STORAGE BUFFER#5WOV.45Y[45_Y;BREAK 5WOV45_Y;-- RETURN TO I/O DISPLAY5WOVE]&!_'~T]0]],!_4]/!_'345Y[45_Y;INPUT 1-2-3 OR BREAK5WOVF:]L]]]].~Z345Y[^X'4 5Z^XWOV~\cx4]]\cz4]]L4O545Y[45_Y; STORAGE BUFFER # 5WO]WW 5WOV45Y[45_Y;^X'74 5Z^XWOV~]F\cx4]\cz4]L4O5D~F%645Y[45_Y;TRANSFER BUFFER5WOV-45Y[45_Y;"1) TRANSFER I/O BUFFER TO STORAGE5WOV-45Y["2) TRANSFER STORAGE BUFFER TO I/O5WOVEˎ]^X' Zێ^XO&!_'~3]415 5 [U&!_'~ǎ]425 5 [U&!_'~^~S-45Y[45_Y;"1) TRANSFER I/O BUFFER TO STORAGE5WOV-45Y[45_Y;" BUFFER #? (1-3) 5WOVE]&!_'~3]0]],!_4]/!_'F:~]845Y[45_Y; 5WO]WW 5WOV\c]\c]]4AW2b]4]4O]]].~]F\cx4]\cz4]L4O5~-45Y[45_Y;" WHICH STORAGE BUFFER? (1-3) 5WOV-45Y[45_Y;"2) TRANSFER STORAGE BUFFER TO I/O5WOVE]&!_'~3]0]],!_4]/!_'F:~G45Y[45_Y; 5WO]WW 5WOV\c]\c]]4]4AW2b]4O]]].~]FH45Y[45_Y; 5WOV45Y[ 5WOV+45Y[ 5WOV~]FH~F%]545Y[45_Y;EDIT I/O BUFFER5WOV-45Y[45_Y; Arrow keys position the cursor.5WOV-45Y[0-9..A-F = Hex entries5WOV-45Y[ F2 = Toggles ASCII Mode5WOV-45Y[" CLEAR = Restore Original Data5WOV-45Y[45_Y; BREAK 5WOV45_Y;= EXIT 5WOV]&!_'545Y[45_Y;EDIT I/O BUFFER5WOV-45Y[45_Y;>5WOVENTER5WOV45_Y;< Saves the edited sector5WOV\c]\c]]4]4O]]].~ \gW\e\c\a]45Y[45_Y;BYTE: 5WOV45_Y; 0 / $005WOV],!_'S^d/!_'"']4AW2b\g)Y']4AW2b\g)Y^d/!_''\e)Y'\e)Y]/!_'^^^^^.~!^X'[D^X'] Z]45 5 [U&!_' ^^/]^X' Zێ^XO]]&!_'~'~"^/!_'^~!<]^&!_'~"],!_4] /!_'~%~"],!_']]&!_4\a\c/!_' \a\a5] &!_4\c@P\a,!_' \a\a] &!_4\c@P\a,!_' \a\a5]^&!_4\c@P\a/!_' \a\a'\g)Y'\g)Y\a\c44AX52b2b4AW2b4\a\c4\a\c44AX52b2b4AW2b@P4AW2b\g'\e)Y\a\c44AX52b2b4AW2bW4\a\c4\a\c44AX52b2b4AW2b@P4AW2b\e45Y[45_Y;^X'\a\c\O^X'^ Z 5^X'Z2~ZP^ ZZ^X'^ Z^X'2~ZP^ ZZ^XWOV 45Y[ 5^X'Z\a\c\^X'^ Z^X'2~ZP^ ZZ^XWOV~!<]&!_'(^[] &!_'(C] &!_4]&!_' E~#]&!_'~']&!_4] &!_'~#]&!_'~'x]0,!_4]F/!_'~!<]9/!_4]A,!_'~!<]:,!_' ]0] ]7]]&!_'=\a4\a4O4]W]]L4O5~!<\a4\a4O]]L4O5\c@P\a,!_' \a\a~#\a4]\c@P\a,!_' \a\aL4O5~#45Y[45_Y;^X'4 5Z^XWOV=45Y[45_Y;^X' 4 5Z^XWOV]&!_'L4O5~)/]FH~],!_'<]=45Y[45_Y; ASCII MODE5WOV9]=45Y[45_Y; 5WOV9\c]\c]]4]4O]]].~(L4O59>=445Y[45_Y;DIR/FILE ALLOCATION5WOV]&!_'~1-45Y[45_Y;!Use up & down arrows to position5WOV-45Y[ the red block over the file you5WOV-45Y[ wish to step thru : Granule by5WOV-45Y[granule -- Sector by sector.5WOV.45Y[45_Y;ENTER 5WOV45_Y; OR 5WOV45_Y;BREAK 5WOV45_Y;TO EXIT5WOV:45Y[45_Y;^X'4 5Z^XWOV]L~]M]]XI\i4\c]4O]]].~+s^'OL~]] ]W\c4O&!_'~+^'^']]].~+~+W^)^+^-]] DIR5'] ZD^'^'^)]^)]]$_^1^/+^1'])Y]^/]}^1']- ].~,\=45Y[45_Y; ^+W\c4O&!_' FILE KILLED5WOVF, 5WOVE]^&!_'~-U] &!_'~/-] &!_'~0~]&!_'~:~,]&!_4^+&!_'F:945Y[45_Y; START OF DIRECTORY5WOV]]]]].~-945Y[45_Y;^X'4 5Z^XWOV~,^+&!_'']]D^-^-^)^+~,8o^)]^)]]$_^1^/+^1'])Y]^/]}^1']- ].~.s^-^-^)@^)^+^+~,8^)]^)]]$_^1^/+^1'])Y]^/]}^1']- ].~.^-^-^)@^)^+^+~,8^'^-&!_'F::45Y[45_Y; END OF DIRECTORY5WOV]]]]].~/45_Y;:45Y[^X'4 5Z^XWOV~,^+&!_'$]]D^-^-W^)^+~,8^)]^)]]$_^1^/+^1'])Y]^/]}^1']- ].~03^-^-^)@^)^+^+~,8 ^+W\c4O&!_'F,~,]]+4]5Y[45_Y;^X'#4 5Z^XWOV]]].~05'^2 Z] ]^2^X' Z ^+W\c]4OZ^X'^2 Z]]].~1^X'2~ZP^2 ZZ.5Z2~ZP^2 ZZ^X'^2 Z-45Y[45_Y;"Rt.& Lt. Arrows = Up & Dn. Sector5WOV-45Y[#Up & Dn. Arrows = Up & Dn. Granule5WOV145Y[F2 = EDIT SECTOR 5WOV245Y[45_Y; For File: 5WOV45_Y;^2 WPV045Y[45_Y;BREAK 5WOV45_Y; = EXIT5WOV]&!_' ]~5b&^RXI]4 ^+W\c 4O^RXI]4/!_'^RXI]4^RXI]40^R^R^RXI]4^RXI]4XI\i4~3Q^+^RXI]4^T^'^+XI]4^V^V44AX52b2b]]/!_' ]]^V44AX52b2b4AW2b@P^V&!_' ^'] ^' ]^X']W4]4 4AX52b2b\O^X'] Z]/!_'0^X'2~ZP] Z۽ZW\XZ׃\O^X'] Z]^X' Zۍ / $5Z2~ZP] Z۽ZW\XZ׽\^X'] ZD:45Y[45_Y;Granule of file:5WO^+WWVE]&!_'~5] &!_'~7]^&!_'~8>] &!_'~9w]&!_'~)/]&!_']=~H~5bXI]4@P^V&!_4]&!_4] &!_'F:;45Y[45_Y; START OF FILE5WOV]]]]].~6;45Y[45_Y; 5WOV~5b7]&!_4] &!_'^'^+^+~3]]~5^'^V^T&!_4^RXI]4@P]&!_4^RXI]4 @P]&!_'F:<45Y[45_Y; END OF FILE5WOV]]]]].~7<45Y[45_Y; 5WOV~5b1] &!_4]&!_' ^+^+~3]]~5^'^V^T'!_' ^+^+~3^RXI]4@P]&!_4^RXI]4 @P]&!_'F:<45Y[45_Y; END OF FILE5WOV]]]]].~8<45Y[45_Y; 5WOV~5b<] ,!_'^RXI]4]~5^RXI]4 ]~5~5^'XI]4@P^V&!_4]&!_4] &!_'F:;45Y[45_Y; START OF FILE5WOV]]]]].~: ;45Y[45_Y; 5WOV~5b"XI]4@P^V&!_'~3^+^+~3]FH~F%545Y[45_Y;SAVE I/O BUFFER5WOV145Y[45_Y; READY TO SAVE I/O BUFFER5WOV145Y[ PRESS >ENTER< 5WOV645Y[45_Y;BREAK5WOV45_Y; TO EXIT5WOVE]&!_'~;] &!_'E~;]FH~F%745Y[45_Y;PRINT SECTOR5WOV445Y[45_Y; READY THE PRINTER5WOV445Y[ PRESS >ENTER< 5WOV645Y[45_Y;BREAK5WOV45_Y; TO EXIT5WOVE]&!_'~=] &!_'^X' Z^XWOV]]^X' Z^XWOV]]].~=#]~]]$_^1^/+^1^X''])Z ZWPV]^/]}^1']- ].~=m~<]F~]]+4]5Y[45_Y;^X'#4 5Z^XWOV]]].~=9]]4]5Y[45_Y;^X'4^X' Z5Z^XWOV45_Y;]]].~>!45Y[45_Y; 5WOV45_Y; EDITOR OPTIONS MENU 5WOV45_Y; 5WOV45_Y;45Y[45_Y; I/O BUFFER 5WOV45Y[45_Y;]&!_'45_Y;1) DISPLAY STORAGE5WOV45Y[BUFFERS5WOV45Y[45_Y;]&!_'45_Y;2) TRANSFER BUFFER5WOV45Y[45_Y;]&!_'45_Y;3) EDIT I/O BUFFER5WOV45Y[45_Y;]&!_'45_Y;4) DIR / FILE5WOV45Y[ ALLOCATION5WOV45Y[45_Y;]&!_'45_Y;5) SAVE I/O BUFFER5WOV45Y[45_Y;]&!_'45_Y;6) PRINT SECTOR5WOV9+45Y[45_Y;^X'$4 5Z^XWOV+45Y[45_Y;% KEY FUNCTION 5WOV+45Y[^X'$4 5Z^XWOV+45Y[45_Y;% UP & DN. ARROWS UP & DN. TRACK 5WOV+45Y[% RT. & LT. ARROWS UP & DN. SECTOR 5WOV+45Y[% SHIFT ARROW EXTREME FUNCTION 5WOV+45Y[45_Y; BREAK 5WOV45_Y; EXIT 5WOV45Y[45_Y;TRACK:5WOV45Y[SECTOR:5WOV#45Y[ GRANULE:5WOV45Y[]WWV45Y[]WWV,45Y[] WP^X'4 5Z^XWOV945Y[45_Y;]WWV45Y[]WWV,45Y[] WP^X'4 5Z^XWOV9]]]L~L4O545Y[45_Y;]WWV45Y[]WWV,45Y[] WP^X'4 5Z^XWOV9]]]L~9^X'[D^X'] Z]45 5 [U&!_'~Eˎ]^X' Zێ^XO]9>A9>=945Y2945Y29FL4O59 USER COMMENTS ARE REQUESTED! PLEASE SEND EMAIL TO THE CIS ID #'S SHOWN ON THE EXIT PAGE! COMMENTS AUTHOR: J.BARNA Co-Author R. Pierce uploaded to CIS 7-24-88 by R. Pierce V1.02 8-19-88 R.P. STORAGE BUFFER ONE A pre-version subroutine of The "DISKBUSTER" disk utility program. STORAGE BUFFER TWO DSKEDT.BIN V.1.02 8-19-88 Barna & Pierce STORAGE BUFFER THREE P6lj栍=J'0 0 10+.  +J&8&<90 4TTTT59 * 0979{|_4O59GPYP+ SHAREWARE5WOVVVVKThis subroutine is taken from the The pre-release subroutine here is5WOVLDISKBUSTER disk zap program. copyrighted (C) 1988 by: Jay Barna.5WOVM : Bob Pierce.5WOVVKWith the large amount of disk zap CIS: 76537,765WOVLprograms around, a reference is CIS: 76257,1435WOV#hard to come by. Only the CoCo III5WOVEand a RGB monitor yield a display SUGGESTIONS * COMMENTS5WOV worthy of the hours required in5WOV=developement of such a program. Robert Pierce5WOV< P.O. BOX 1745WOVEThe program here is presented as HOMESTEAD, PA. 151205WOV shareware, simply to see if any5WOVFone is interested in another disk UPLOADED TO CIS 7-24-885WOV program.5WOVVBYet, this program has not been RETURN TO BASIC ?5WOV%intended to be another disk program,5WOV;but, one of the tools you'll feel Y / *5WOVgood using for years to come!5WOV^X'[D^X'] Z]45 5 [U&!_'~Q]4Y5 5 [U&!_' Y~R*~؆m'G0%C #ma';"5 #1bcXIXIma'XI c%XI%b%cj 2c5m'@P92f'~O_9N$ '9"m'9"9O_4M& $"&a!%,&m&ma&o5a&oa 䧀Z&54"O' ,' '"5"9oo~'&ߖ&'&?؆ ԍ $;'&9oo'4#o5~ovOo~ 4& && &oo59&'o_loO9o_n' Jm=l ܈~\&9 5&%''&;''~^4z$P\ 5'FZ&9 _  ,"/9_ݍ 402yBA2g54M+ 6' @Pa-Oc0,oa%l ajd'M&mc'0lcmd&2eo9'd 4`24v_*\4섍,ca&ad=gb#adac=e&f$SSS = 4OSS'IS&!_'4S = 4?SXI4SXI4 ~8~OS&!_4S&!_'~OS=ú4T}'2~OS =  Pz^P\T}'5P S =û4T}'2~OS =  PzP\.5PsS=úPzT}'5 P SXI24S = 4SXI@4S = 4OSXI4S = 4SXIj4SSXI\4SSXI$4SSS&!_'~SSS.~SSS.~S'~SLhSSS&!_'~*>SSSSSXI@4SSXI4S'0S =û J Gran list - 5JSJĽJXSSSSSXI4S S4OSSĀY'SXI4S~S'!,5JSJĽJX S4SXI4SXI4~#S'JS S4SSS'~,S SSF/!_'JSS SJJXSSS.~S'~JSJSFree Grans = 5JSJĽJD Grans used by Files = 5JSJĽJD File Count = 5JSJĽJRSSS'!_'A/ *** File Structure Error *** Total Grans <> 5JSJĽJRSS9_O7%Attempting to Un-Arcive TC31 Format:5JJR&(Enter the DTrive # for the Output Files 5IzHZH`TT ZT~Ž L'~ ITT&!_'~TT'!_'+Invalid File# Header 5JTJĽJR~S TS&!_' .T~3 ITSS4TSST.~ SS4 #5JTJĽJDUnArcing File: 5JSJJR IT ITTT2 IT ITTTTT'!_')Invalid Header Id <> $1005JJR~ IT ITTTT ISSO'!_' IT S'(Compression Flag Invalid5JJR~=STS'~ATT T IT TITTT.~TT KW2&!_'~ t 42? 5JJX1TTN&!_' KW9TY'!_'~[SSS.~׎ KW9&/Arcived Output File Name/Drive (Ex. ARKTEST:1)5IzHZSIJSS4O&!_'~ZS/T}'PzP/5PsT}QY4S/T}E'PzP.5PsT}QY'~ST}'Pz/ARK5PsT}'SP ?TP/!_'~$ I& CCARCFILE5JTJJSSSSXI$4'= I&S =û JSXI4JSXI24JJSSS.~TTOLhT9Arcing File: 5JS =û J Gran Count = 5JSXI4JĽJX I&S =û JSXI4JSXI24JJTTTSXI4TTXI4TSXI4@PT&!_'7SXI4@T T 4AM2b4SXI4T" T" T .5JJX2ʽ#TTT.~JS9SSSSXI$4&!_'~SSS.~9S =û'S P  ITT&!_'~& KHZSIH`TS4 CCARCFILE"5 5Q'!_'(Unknown Arc File Format?5JJR~"STS& KHZS =û45 ISXI4H`SXI24H`SXI$4SSS.~TSto be Extracted from 5T}'PsSPzT}'82P /6 ;T&!_'9JS&Drive # for the Output files 5IzHZH`TT ZT$ST& L'PJS** Ark file Incomplete, 5JTT$Jč; Files Missing **5JJR~"& KHZSIH`H`2T$XI$4&!_'~"?TS&!_'~"TO&!_' SKyJS Un-Arcing: 5JSJ Grans=5JJĽJXTLh-!_'~"JS%Not Enough Space to Un-Arc the file 5JSJ5JJR'Change disks or Skip this file ? 5JJX1"6TTS&!_'~"TC&!_'1&New Output Drive # 5IzHZH`TT Z~!~"Skipping file 5JSJJRT(T*$N'~"T(T(T*.~"~"#T$T$T&.~ KW9=T(T*.5JJX$N'!_'~#'2vT,ST. T,4OIT,T,T..~#IT(T(T*.~# KW2&!_'~# t 42T,4OT6T,T,T8T T:S4T6SST8T8T:.~'~'>4S5O4S5O 4S('5OO\O7T<T>T@STBTDSü' S~,TT,SSSS4T,5OSP=PJJRT,T,SSS.~(JS45_O_ͤPJJX45_O_T,#SSSSS4T,5OS=̾JJRT,T,SSS.~)S&!_' S~+~+SS.!_'S=̾'̾P STF̾4STF4T,5OSelect Command? 5J̾JOJJX1T}'2~O̤ PzP\/P PzT}QY*"SS'7SM'&~*f&~*r&~*~&~*&~)A&~+~+~SS~*SS~*SS~*SS~*SS/!_' SSSS,!_' SSSTFS.!_'4TFTH#TJTJ4TH5OTF=̾JJXSS.!_'TSTH#TJTJ4TH5O45_O_S=̾JJX45_O_~)s44 4ADIUQ5/T}'PsP4PzT}QYSS' SS~*~)T}'2~OADIUQ5PsS45PET}'4P SS.!_'?SS̾T,}'Pz Command 5PsT}'TPP _O7JS~)SM'&.&>&BG&.&?E&?A~(6S =û JSXI2444ANY2b2bJT}'SXI24BPT}JSXI4JĽJXSXI4 ,!_'  I I_6TLSXI44AM2b4SXI4TNTN44ANY2b2bTL+TNSXI44AM2bTLTLSXI440AM2bTNTNTN44ANY2b2bTLTL+TNTLJč,5JJXTN ,!_'005JJX TN.d,!_'05JJXTNJĽJX9T<'~.O>SXI@4STPSXI4TRTPXI4S S4OSTPTPTR.~.s9to be Arcived5'82P TT14T'~.99991to be Un-Arcived5'82P 4T&!_'9999OTV94TV9/ (I)gnore, (A)bort or (R)etry ? 5JJX1TT@'!_4TA&!_'~?TR&!_4TI&!_4TA&!_'9~/MO&!_''Read'5JJX0'Write'5JJX Error on Drive 5JOJč Track 5JOJč Sector 5JOJč Code = 5JJXOTTTTXTT T'{T}'2~OCLost Data CRC Error Rcd No-Fnd Write Err Write Prot Not Ready 5PsT4 AM2b4 5PET}JJXT4AM2bTTTTX.~0JS9ITT&!_'~TIJS9JSEnter the Drive for the 5JTPJJX&IHZH`S9RTZYT\TZ4TZTZT\.~1PTT&!_' T^2~1T&!_'~1T@&!_4UO@&!_'~1TT^&!_4,!_'~1TT^&!_'  4TTT^T&!_'~9~T`T44ANY2b2bTb+&!_' Td TdT@'!_'Tb/!_' TbTbNTdTfTdThTfTd4AM2bTjT`&!_'$S4Tb4Tf54Tj=v50Lp~3T`'!S4Tb4Tf54Tj=v50Lp%~4TfNN/MTR&!_'~3_TA&!_'TfN9TfTf4 Th.~3J9T`~2_O7TlS&!_' Empty Disk5JJRT9Select the file(s) 5J82JJR45_O_O Use Arrow keys to move pointer and Press the Space Bar Select/De-Select Files5JJRPA=All files, ?=Wild card select, =Deselect All, =End, =Abort5JJR45_O_JST,SSSS$_Tp Tn+TpST8 T:S4T,5OST8XI$4'!_'(45_O_ST8XI4TlTl45_O_ST8XI264'A 5' P B 5' P ST8 =û JJX45_O_ 5JST8XI2444ANY2b2bJĎ JST8XI4JĽJXSSST84S@P'!_'T8T8T:.~5T,T,STnS}Tp'S- S.~5ST,S45_O_45O Drive = 5JSJč Free Grans = 5JSJĽJDSelected Grans = 5JTlJĽJDJXS4T,5O 5JJXS NYT,+MSS4T,5OƀO_>5JJX45_7O_1T?&!_'~:T &!_'~9̤/T}' PzP PzT}QYM'&~8&~8&~8&~9&~:&~9=&~9=&~:w &~8 &~8~8S'SS~7-~8S@PS,!_'SS~7-~7-S 4S@P.!_'S S~7-~8S -!_'S S~7-~8_O7TSSSSXI$4TTSSS.~9VT'9$No Files were Selected5JJR9SXI$4&!_':45_O_SXI$4SXI4T9lTl;45_O_SXI$4SXI4@PTlTlS4T,5OS =û JJX45_O_~8T8ST:T8XI$4T8T8T:.~:~4T8ST:T8XI$4T8T8T:.~:~445O&Enter Wild card search string5IzHZ IT8ST:T8 =û/T}' PzP PzT}QY'ET8XI$4&!_'T8XI$4T8XI$4T8T8T:.~;+45OJS~40FRHH`SISSSHH`T;I̤S4TSSS.~;STHSP=45PIISST.~<#HͤPIIHH`SISSTHS=̾45IISST.~ 4OT=uTu&!_'TfTfTh.~=ý?#KHSS$~>HO&!_'~>)Tq4Ts40FTu&!_4S/!_4S@,!_'9?51_O7Directory for Drive#5JSJĽJRJS9SS44S54 50Lp%~?%:Tw~@T<9SS44S54 50Lp%~?%XTw~@JS'Are you sure you want to Exit EZ-Ark ?5JJX1TTY'!_'~Sq to return to Menu5JJX~1TSaAc'!_''O4S454 50Lp$~? S9STyTyT{Ty4TyTyT{.~B+9~BG_O7Easy Arciver is a shareware program that allows you to Arcive disk files into a single disk file in a format that is compatible with COCO TOOLS, DELUXE TERMINALand COCO TOOLS Demo programs. It also will UN-Arcive files created by these5JJRPrograms and files created by Arcive utility TC31. Typically files created by TC31 will have a file extension of .ARC where as files created by the other Programs will have an extension of .ARK. The program will automatically decide5JJRDBwhich file format is being used. Arcive files created DELUXE TERM and CCTOOLS allow you to select which files to unarc where as TC31 formatted files must be completely unarced. If you like this program and use it we ask that you send5JJRa $10.00 donation to CER-COMP Ltd., 5566 Ricochet Avenue, Las Vegas, N.V. 89110. Thank you for your support and Enjoy...Bill Vergona Cer-Comp Ltd.5JJR9~H;nPoZ&\&o]~000Y'S*GJGk0kF=h0¿h 0ڿ  0 e9.&Ph45qnT\0L_n\.4c' JLZ&54oc~mw' <LZ&5"&&4cc5nE & n64o&f24O5* 'J & @0O'" 5g4;'0B0Z&2'm'!&EX&04 4; 5 ;'7'9&'?& ' =' ' j ;5P3276hk76e  JGH8J9qW~'ݟ"9O_444$b$' && ЁH&`laj -&le$B '>m'G0%C #ma';"5 #1bcXIXIma'XI c%XI%b%cj 2c5m'@P92f'~O_9\$ '9"m'9"9O4oaobM& $"&a,%,&m& ma& mb&o2c9a&oa mb&ۧZ&c 4"O' ,' '"5"9oo~'&ߖ&'&?؆ ԍ $;'&9oo'4#o5~ovOo~ 4& && &oo59&'o& ' _loO9o_n' JmJ3=l ܈~\&9 5&%''&;''~S4o$E\ 5';Z&9 _  ,"$9_ݍ 402yBA2g54M+ 6' @Pa-Oc0,oa%l ajd'M&mc'0lcmd&2eo9'd 44 ] W5 &aX [o_5?~'o@&  HI~99 ~ݟ"oq p& ' '& ooo~46 W#56~~ !E44I 4O45 o :o W&I9'@' &&_9H~F~L.'@&؟o\&o9~UR~O'9G ꭟO'~BIN1 DAT1 Z L Z&Z& L';'7.'/':', T'槠  T !'':'  W' 9_0% "0% " 4 =0 40r} s&%4ca&} s'50N~B4~F7y} s&_~T~~ЍL~~̍D~~<~~;4~~ȍ,~č~h$~~46~χ~Ϋ~9~] ~Ψ~̽v94} &b0b5~?~c~ƌ~_4`24v_*\4섍,ca&ad=gb#adac=e&f$?@ACC2GIF BINCC3GIF BINCM3DEM BIN DD86 BINDISKIO BIN DSKEDT BINkEZARC BINFAT-ED BIN#KDSK BIN7LITESH BASMJK BIN'PIRASS BIN+TC3 BIN3TC31 BIN5lg&+ '~2g544_M*\@`442c& M& 'P~md* `d`e$jdlamb+ Lhcib+&dodoeb$b ieiddbfcj&+dfa$@P2f9?4~Ӎ\#_45Z+= *p!_4+O )*O*Ԇ * 'TTTT\~~Z* ( '  ' ۍܗQ 4HHH49C~&~ͽ~4Pa6``a')5T'& 04~,45~xf~')b9b9_m'0\ O9b]'_ &Y0Z _Oo"9'4P$' Z'j&o5b4#'Lb'M'm'&J&0]' b]' 'Z&0'o50_ b ''Z&1?'o9no09M'Z&9<4O5&._4A' 5~䦈4潍4ca5'O &–&~ O 9''9 4&m?'j&m'ja ja&m'a59c%' m'Z& 'b' m'Z&50'+ ,'!'/Z:+$,$'_O9 ,&Z&O/9 / ׆O4'm&oam' laZ&m'1! b b5'Z&]' Z&94 6&_'M'5]'94DDDD5&]&9\09#' '9"~H`~J10,8,9,10,$5{RE,12,13,3,$41,$45,$54,0,****************************************,* Cer-Comp CoCo III EZ-Arciver V1.0 *,* (c) 1991 By Bill Vergona *,* Main Menu *,****************************************," Use Arrow Keys or (Letter) to Select Command and Press to Execute ",5,(A)rcive Files,(D)irectory,(I)nformation,(U)n-Arcive Files,(Q)uit"  ;IBq #`C1C3C5C7C9C5C5C5C5C5OC5C5P@;45@~4?5@~G4$5@~45@~45@~4"5@~4?5@~ 465@~ 4 5@~ 445@~ 45@~ 4$5@~4(5@~4"5@~_?)vC;.45_@&C'AC'C= @C=45 5 A&!_'~!_C=C' AACOC]C] &!_'~6:=~!_C]&!_' vC;~!LC]&!_'~!_C]&!_'~!_C] &!_'~!_C]&!_'~!_C] &!_'~!_C]&!_'~!_C]&!_'C] @ٽ.C]&!_'~!_C]&!_'~!_~6</45@F45_@& 0. EDIT the EDIT buffer 5>:=;45@FEXIT THE EDITOR SBR 5>:=ֽ$5C30I~1C]C39C]C3C;~.C]C3C;~./4 5@F45_@&!5. LOAD I/O buffer from DISK5>:=O4A>2b4OC_O4A>2b4OCaCa4Ca4Ca4Ca4Ca4Ca4C_4O5C;C345_@&/4 5@F!5. LOAD I/O buffer from DISK5>:=945@9O4A>2b4OC_O4A>2b4OCa/4 5@F45_@&!6. SAVE I/O buffer to DISK5>:=45_@&CcCCeCcXIB4Cc4OCcCcCe.~&'$CcCCeCc4CcXIB4CcCcCe.~&^Ca4Ca4Ca4Ca4Ca4Ca4C_4O5 @/4 5@F!6. SAVE I/O buffer to DISK5>:=945@9/45@F45_@&8. COPY TOP to EDIT buffer5>:=CgCCiCg4Cgd4OCgCgCi.~'45_@&/45@F8. COPY TOP to EDIT buffer5>:=C3C;~./45@F45_@& 9. EXCHANGE I/O & EDIT buffers5>:=CgCCiCg4OCkCg4OCmCg4CmCg4CkCgCgCi.~(_/45@F45_@&!9. EXCHANGE I/O & EDIT buffers 5>:=C3&!_' C3C3&!_'C3945@FFILE ALLOCATION TABLE5>:=/45@F!DISK FILE ALLOCATION SBR V. 1.015>:=/45@F!Copyrighted (C) 1987 by R.Pierce5>:=45@F'-0----1----2----3----4----5----6----7-5>:=$ ---------------------------------5>:=/45@F!Track:17 Sector:02 Bytes:00-675>:=/45@F1.5>:=45_@& DISPLAY TOP buffer5>:=45_@&/45@F2. I/O buffer5>:=/4 5@F3. EDIT buffer5>:=/4 5@F!5. LOAD I/O buffer from DISK5>:=/4 5@F!6. SAVE I/O buffer to DISK5>:=/45@F8. COPY TOP to EDIT buffer5>:=/45@F 9. EXCHANGE I/O & EDIT buffers5>:=/45@F!0. EDITOR EDIT the edit buffer5>:=/45@F45_@&" [ ENTER ] RETURN to calling PGM5>:=45_@&45@F68 granules in FAT5>:=145@F45_@&Free Granule i.e. decimal 2555>:=45_@&45@F45_@& Granule Full 5>:=45@Fpoints to next granule.5>:=45_@&45@F45_@& Last granule in file 5>:=45@Fsectors used in granule.5>:=45_@&145@F45_@&ERROR: ** OUT OF RANGE ** 5>:=45_@&945@FCo=Cq00 *5>:=C;CgC;CCi 5>:=ֽ/1hCoCoCo&!_'Co4CgC;44A? 2b2b4A>2b5@FCqCq05C'A:CqBC'Cs @C'2~@Cs AA@ *5A:C>:=CgCgCi.~. 5>:=9Cg4OD,!_'45_@&9Cg4O/!_4Cg4O,!_'45_@&9Cg4O&!_'45_@&945_@&9C3&!_'45_@&45_@&;45@F TOP buffer5>:=C3&!_'45_@&45_@&;45@F I/0 buffer5>:=C3&!_'45_@&45_@&;4 5@F EDIT buffer5>:=45_@&9005C'A:Cg4OBC'Cs @C'2~@Cs AA@C>:=45_@&9C7CcC9CCmC44A? 2b2b4A>2b4Cc44A? 2b2bCCC/!_'CCCcC45@Cc4C5@FCCgCg4O&!_'45_@&~3Cg4OD,!_'45_@&~3Cg4O/!_4Cg4O,!_'45_@&~345_@&005C'A:Cg4OBC'Cs @C'2~@Cs AA@C>:=45_@& 5>:=Ck/!_'CCk45_@&Cc4C5@F 5>:=Cc4C5@F~2aC'AC'C @C45 5 A&!_' CkCk~3qCC' AACOCC &!_4Cc*,!_' CcCc~1C&!_4Cc/!_' CcCc~1C^&!_4C/!_' CC~1C &!_4C,!_' CC~1C &!_'P;45@F45_@&RETURN to calling PGM5>:=45_@&9C0,!_4C9/!_'45@~3q*C0CCmCmCmM'&~6&~6C4O4 A>2bC/!_'C4C~1Cg4Cg4O4 A>2bC~1Cg4OCCg4C~2KCg4Cg4O4 A>2bC~2K~6C'AC'C= @C=45 5 A&!_'~6?C=4Y5 5 A&!_'@~~=Y~ ;_?+ SHAREWARE5>:====MThis subroutine is taken from the Note that the TOP buffer is not used5>:=MDISKBUSTER disk zap program. here, as it interfaces with the main5>:=1 program.5>:="With the large amount of disk zap5>:= programs around, a reference is5>:=Ihard to come by. Only the CoCo III Suggestions * Comments5>:="and a RGB monitor yield a display5>:=@worthy of the hours required in Robert Pierce5>:=?developement of such a program. P.O. BOX 1745>:=G HOMESTEAD, PA. 151205>:=!The program here is presented as5>:= shareware, simply to see if any5>:="one is interested in another disk5>:= program.5>:==EYet, this program has not been RETURN TO BASIC ?5>:=%intended to be another disk program,5>:=>but, one of the tools you'll feel Y / *5>:=good using for years to come!5>:=~6?~=YPoZ&\&~000S'MGJGk0kh0h 0  0f e9+&=h4`5qnT\0L_n\4c' JLZ&54oc}' <LZ&5"&&4cc5n & n4o&f4O5* 'J & @0O'" 5g4;'02'}'!&EX&04 4; 5( ;'7' u09&'?& ' =' ' j ;5P76hk76e  9qW~' 4& && &oo59&'o_loO9o_n' Jm=l ܈~\&9 5&%''&;''~^4z$P\ 5'FZ&9 _  ,"/9_ݍ 402yBA2g54M+ 6' @Pa-Oc0,oa%l ajd'M&mc'0lcmd&2eo9'd 4`24v_*\4섍,ca&ad=gb#adac=e&f$R C@ C E_p_pY_pMoWW^SxRR_oP큌%񞊿 U1 '5Ԕ@@юB{DkD&M턆0FD^]@@_o&(  Z&94c' cL$' 5 (~ΠT0Π  &'0Z&9D&Fm'AZ&9 1!&9I'X' H&^o׍ '_'%'~I' C&m'o %9Z&9'4m&&2b & &ZA&9'0~K'S'944'ma&0 U&Z&5q'9" ~- &!~|0΅qxw4g[B̎!\ϟ'6ߍ._)ZٞӍ4 _>\'m'.'\ \'5\&9ٞ޽Z&ܦO' $ X5 ݞO19~w~Se\&ߍڽ%ye:՟+$H_Ħ' m'̡'\ 344@1@ލ@oޞӍ#5@0@P:&0&Ս '=+9+ 9 9&9~ҍս%m'B+344@1@ݍ4 \'K &5`1?:ݍ0@PݍӍݞՍ6jڽAT+ڽD'g ' + ~ӓ$~\9@4DVTTTTO "a -T*5:09OQ %L 3{.-919 19졊009=3Z&9 =9ކ: 3'. 1"1: 1&}' % | %Q %L . }' AM}'Po9\'' 4o1 4m5' ~4P$HH_? =R750oom 2nP c'3 cla a eDG$mAmZ& m&bDGVjb&TTTT炌&m'a5R:\:\'IP& BS& ||띟 ;j m m ½gH_Ö =O9_O9g*|꽲m&3S؞0œ& }&w Y92bڦ&#%+~}&} ^9~0C&@&&&9VS~4?<#W@'\Z' ĦH$ 9ǧ9Q~ '~'~ཷ@R R9o' & d&4p}'+&sT&_'R ' &s }'׎ڦ' . 'A& ' ' ''ׁ % m' 52b9ao a\ o'T]& Ͼ t9W)=+m=9+9eM'   @E8~sI&s ӝ'=Rѝ'R'Sӝ&L9U}' #9p+%*5̆ ڎ_'\ Z \q '&  ~&'~kMONTUEWEDTHUFRUISATSUNAJANFEBMARAPRMAYJUNJULAUGSEPOCTNOVDEC@R9~~ིb@o%"pl,+g&5_0D%\ 9W4mW5V&5@4ħ5Z&9~Q~~'D&'&~ '+h0%~hL Y'P%Eh9}'1ƁoƥoVg+h''9%&405o~F+4\'/'*h'&+%5&T&h!̭4~545W3o\T;~e}'|9}'| ~ J% O9 H90_:J*9*_'~ q~'W& ~O+~'5I_9PPPP((##P 4D5 &xKxIH90Ƞ09`J&SX&s'؀ԽQ'~T0 릥?o⦅&c_' ?a'\&5m' ' & ]' 0&Z&9' &* UX o&4U&o5o@5 f'!W;mR'W׽o~~\~J'%"5 ]'W$S=ۼ%CYȓ!$4 '0Ӧݦ~4h059 v &L' E9 ~Jf{~ss&4րZX:5o&'ѽ|zY'",'d'Le'8B"G"C׀%9'&<=׀'н8"П  р"׀~#%("9P~F4ƥo"X9}Z'&*05)_0$&#ƞO0~ ~USED=FREE=&9j9b^ ' 'ARZ&9 $ZFO̍@bB 5 9O45 "#b&o1 o& &O~X~(1}NEW COMMANDS FUNCTIONS RUNM ROM [ ERNO COLD WPOKE ERNAM$ OLD AUTO ERLIN ON ERR ON BRK WPEEK PACK PRT ON HPEEK VEDIT HEX2$ TYPE [DATE SCAN$ BRLIN MOD DATE$ MJK.DOS THIS VERSION RELEASED TO SHAREWARE IF YOU THINK PROGRAM IS USEFULL SEND \ $5.00 MANUAL $10.00 FULL MJK1,3 $20.00 MJK512 $25.00 COCO CONNECTION 5003 'B' ST. PHILA. PA 19120 (215) 4\57-1809 q'Q' & O9 'j? 'dh+\q\ ýq&JI&E܈݈~n^'6 '@'(&@ ]&og%ύ#wO90% 0 $  +̽ݽ 2Ӎ$'' ό9' \9]'R oύ'a 'a '= '0'x'x %' $45 '1H -oL9 'm'45m&ٍ Ս ь'$^1?090m'1!9 02b сP&ѝb [ o ( WIov' oo&c~\''^ &L9~~~>~ƌ~~~ә~~5~V~8~ӱ~Ϊ~ǝ~_~د~~N~ż~~ ~~{~ՠ~~~~č~~ֈ~WAIT2:HELP:?"INPUT: DATE OR D_ATE(MM,DD,YY)":?_o@~=A The Pirate's Assassin (C) 1988, by David A. Mills The program just loaded must be decompressed and the disk directory updated before you may proceed. Insert a BLANK, formatted disk into Drive 0. Be certain this disk contains no files you wish to pre- serve. Press the CTRL key when you are ready. Are you certain the destination disk does NOT hold any file(s) you should retain, including The Pirate's Assassin file itself? ( Y/N ) The disk is now ready for your use. It is essential that you read the documentation file ( PIRASS.DOC ) before continuing. Remember that all program functions use only Drive 0. Press reset to cold start BASIC. DOS ERROR. Press reset to cold start BASIC. qٽ\6 o'&9?$2~FG! &I &V&t &Y'N' jن &~oCDEm&E1EG$|DD&|CD @9CD ECGCDDERG}RR~RRRRRZZZCDREZG.CDEG9#$%'PIRASS DOC"PIRASS ASM&8PIRASS ML ( &~ &~ The Pirate's Assassin Documentation (C) 1988, by David A. Mills SYSTEM REQUIREMENTS: To use The Pirate's Assassin, you will require a Tandy Color Computer 3, Disk BASIC 2.1, one disk drive, and a disk editor/assembler program. PROGRAM FUNCTION: The Pirate's Assassin is an innovative utility designed for Color Computer assembly language programmers. The Pirate's Assassin provides the CoCo pro- grammer with an excellent copy-protection scheme for his valuable creative pro- ducts. The anti-pirate security guarding your ML program will function and hold steadfast on all three versions of the Color Computer and all ROM and Disk BASIC variations. INSTRUCTIONS: 1. Boot up your disk assembler and load PIRASS.ASM into the text editor. You will observe commentary that explains the precise function of each line of code. Next, append your own assembly code, the program you wish to protect, to the PIRASS.ASM file already in memory. ( If you are using Tandy's EDTASM+, the Append command is LDA FILENAME ). If you simply load, rather than append your own code, you will delete from the buffer the PIRASS.ASM file already present. You must APPEND your own code to PIRASS.ASM. Be careful here that the line num- bers of the two files do not overlap each other. 2. Observe in Line 15 of the PIRASS.ASM text that an ORG statement defines the origination address of the code. You may change this ORG statement to ori- ginate the code at any convenient address. Your own code may also contain as many ORG statements as you desire. 3. Insert the execution address (or label) of your own assembly code at the appropriate position on Lines 88 and 94. 4. Assemble the program (the two merged files) to a blank, formatted disk using whatever filename you wish. 5. Return to BASIC. 6. We shall hereafter refer to this disk as the SOURCE disk, the disk con- taining your own assembled code preceded by the PIRASS.ASM code. At this point, don't try to load in your newly-created file, or you will be scolded that "YOU ARE IN ILLEGAL POSSESSION OF PIRATED COMPUTER SOFTWARE." 7. Now, remove your SOURCE disk and replace it with the disk containing "PIRASS.ML". LOADM "PIRASS.ML". After the program starts, remove the disk. 8. Insert a DESTINATION disk to be formatted. The DESTINATION disk is the disk which will soon showcase our finished, copy-protected product. As the pro- gram prompts, "Insert your DESTINATION disk and press the CTRL key." You will see a message, "Now formatting disk to 37 tracks and embedding hidden sector." More about this later. 9. After the DESTINATION disk has been formatted in this nonstandard fashion, you will be prompted to "Insert your SOURCE disk and press the CTRL key." Your entire SOURCE disk will be copied to your DESTINATION disk in only two swaps. After this superfast backup is completed, you will see a message saying, "Backup complete. Track #0 has been unformatted. Press reset to cold start BASIC." After resetting the machine, you may enjoy the fruits of your labor. You may load your program with LOADM "FILENAME". Your program will autoexecute and function as usual. Press the reset button. Your program will restart itself. Try, however, to duplicate your program to another disk using the standard BACKUP or COPY command available in BASIC. You will see that The Pirate's As- sassin has installed copy-protection to secure your program. Try using a spe- cial ML utility that bypasses errors during BACKUP. Still, your program refuses to execute on any other disk. HOW THE PIRATE'S ASSASSIN WORKS: Autostart and Restart: In Line 12 of PIRASS.ASM, the code, when assembled, stores a two-byte ad- dress at memory location $0183 - $0184. This two-byte value is the execution address of the PIRASS.ASM file itself. Immediately after loading a program (or when the reset button is pressed), BASIC vectors into low RAM and jumps to the address contained in locations $0183 and $0184. By replacing the default value of these locations with the execution address of PIRASS.ASM, we have thus pro- grammed our Color Computer to autostart our program after loading is completed. Do not change the address of the ORG statement in Line 11. If you do not wish your program to autostart after loading, simply delete Lines 11 and 12 from the text. Copy Protection: The Pirate's Assassin actually provides, not one, but three separate safe- guards against unauthorized copying of your programs. The first such safeguard involves accessing disk tracks not accessable via Radio Shack's Disk BASIC. Both Disk BASIC versions, 1.0 and 1.1, format, read and write 35 tracks to a disk. While this system software supports only 35 tracks, the hardware -- the Color Computer disk drive itself (whether Tandy or of third-party origin) -- is quite capable of 40-track operation. The Pirate's Assassin first formats the DESTINATION disk to 37 tracks, then writes the word "CoCo" on Track #36, Sector #1. (Because the tracks are numbered beginning with #0, Track #36 is actually the 37th track on the disk.) The PIRASS.ASM file, which you attached to the start of your own code, checks to see whether the word "CoCo" is indeed written on Track #36, Sector #1. If "CoCo" is not found, your program will refuse to execute and will print the warning message men- tioned above. Using Disk BASIC 1.0 or 1.1, you obviously would be unable to completely copy a 37-track disk. Thus, your program enjoys its first line of defense against unauthorized reproduction. But what about ADOS and other Disk ROMS that do indeed support the full 40 tracks? Could they make a copy of a program protected by The Pirate's Assassin? No. After your SOURCE disk has been copied to your DESTINATION disk, The Pirate's Assassin swings the drive head across the disk and deliberately crash- es (unformats) Track #0 of the DESTINATION disk. Any attempt to BACKUP this "flawed" disk -- using a 35- or 40-track DOS -- will fall victim to an I/O error. Could a special utility that bypasses I/O errors make a copy of your pro- tected program, assuming a 40-track DOS were in use? No. Before proceeding further, the PIRASS.ASM code attempts to read Track #0, Sector #1. If this read operation is successful, it means that this track and sector were properly for- matted. In other words, the disk in question is a pirated copy. So, if Track #0 of a pirated disk is formatted -- as it normally would be if the pirate were attempting to BACKUP or COPY your disk to his -- the program will not continue execution and will, instead, print the "Pirated Copy" message. WARNING: Obviously, if The Pirate's Assassin deliberately crashes Track #0, you will be in serious trouble if your assembled program is sitting on Track #0. If you follow instructions, and assemble your program to an EMPTY disk, you should never encounter this problem, because file storage space is generally allocated first to tracks surrounding the directory on Track #17. Only after the disk is nearly full, would Track #0 normally be allocated. Before copying the SOURCE disk to the DESTINATION disk, The Pirate's Assassin checks the GAT of the SOURCE disk to insure that Track #0 has not been allocated. If Track #0 is found to have been allocated, you will be alerted to the problem. Your program does not have to consist only of the code you appended to the PIRASS.ASM file. Your program may load in graphics or other data or executable code from any track-- except Track #0. Always reproduce copies of your program using the original SOURCE disk, never the copy-protected DESTINATION disk, which, as discussed above, causes problems for the DOS. While The Pirate's Assassin does provide a powerful, multi-layered defense against program theft, it would be naive to believe that your program is com- pletely protected. Indeed, the CoCo community is graced with many brilliant programmers and technicians, who can easily reproduce your program if they choose to do so. Rest assured, however, that most who attempt to pirate your software will be unmercifully gunned down by The Pirate's Assassin. PERSONAL APPEAL: If you have any problems, questions or comments about The Pirate's Assas- sin, please contact me: David Mills 2236 Washington Avenue Huntington, West Virginia 25704 (304) 429-1905 CIS #: 75266,243 Delphi Username: DAVIDMILLS The only reward I'm receiving from this project is receiving a message from you. Please write! I'm always looking for new friends and computer pen- pals. In spite of the nature of this program, I DO like to exchange CoCo soft- ware with others. 00001 *The Pirate's Assassin 00002 *(C) 1988, by David A. Mills 00003 *2236 Washington Avenue 00004 *Huntington, West Virginia 25704 00005 *(304) 429-1905 00006 *CIS #: 75266,243 00007 *Delphi Username: DAVIDMILLS 00008 * 00009 * 00010 * 00011 ORG $0183 <===== Do not change this address. BASIC will 00012 FDB PIR03 jump to "PIR03" after loading program. 00013 * 00014 * 00015 ORG $0E00 <===== You may change the starting address. 00016 * 00017 * 00018 BUFFER RMB 256 Reserve 256-byte buffer for disk I/O. 00019 * 00020 *The following text will be printed to the screen if this loader 00021 *detects a pirated copy of your program. The message may be changed 00022 *to suit your personal taste. 00023 * 00024 PIRTXT FCC / YOU ARE IN ILLEGAL POSSESSION/ 00025 FCC /OF PIRATED COMPUTER SOFTWARE. / 00026 FCB $0D 00027 * 00028 *This code prints the message stored at #PIRTXT 00029 *and stops program execution. 00030 * 00031 PIRASS CLR $FF40 Turn off drive motor. 00032 LDY #$04A0 00033 STY $88 Set current print position. 00034 LDU #PIRTXT Point to start of text. 00035 PIR01 LDA ,U+ Load with byte of text and increment pointer. 00036 JSR [$A002] Call CHROUT subroutine, which prints to screen. 00037 CMPA #$0D Was this the last byte of text? 00038 BNE PIR01 If not, keep looping and outputting text. 00039 PIR02 JMP PIR02 Loop until reset button is pressed. 00040 * 00041 *This is the entry point of the code. 00042 *BASIC will jump here after loading the program. 00043 * 00044 PIR03 CLR $71 Do a cold start if reset occurs during disk I/O. 00045 LDA $80FD 00046 CMPA #$32 Test for CoCo 3 ROM 00047 BNE PIR04 and branch if not present. 00048 CLR $00E7 Set HRWIDTH to 32 column 00049 JSR [$E002] and set up text screen mode. 00050 PIR04 LDA #$20 Load with ASCII code for blank space. 00051 LDX #$0400 Point to start of text screen. 00052 PIR05 STA ,X+ Store at and increment . 00053 CMPX #$0600 Test for end of text screen 00054 BNE PIR05 and loop if no match is found. 00055 * 00056 *Disk I/O to determine whether the disk is pirated. 00057 * 00058 LDX $C006 Point to DSKCON parameters. 00059 LDA #2 00060 STA ,X Program DSKCON to read a sector. 00061 CLR 1,X Drive 0 00062 CLR 2,X Track 0 00063 LDA #1 00064 STA 3,X Sector 1 00065 LDY #BUFFER 00066 STY 4,X Tell DSKCON the start address of I/O buffer. 00067 JSR [$C004] Jump to DSKCON subroutine. 00068 TST 6,X Test for I/O error 00069 BEQ PIRASS and stop program if NO error occurred. 00070 LDA #$24 00071 STA 2,X Change DSKCON parameter to Track 36. 00072 JSR [$C004] Jump to DSKCON subroutine. 00073 TST 6,X Test for I/O error 00074 BNE PIRASS and stop program if error DID occur. 00075 LDD BUFFER Load with data from Track 36, Sector 1. 00076 CMPD #$434F Does it say "CO"? 00077 BNE PIRASS If it doesn't, stop the program. 00078 LDD BUFFER+2 Load with further data. 00079 CMPD #$434F Does it say "CO" again? 00080 BNE PIRASS If it doesn't, stop the program. 00081 * 00082 *The next four lines of code force your program to restart itself when 00083 *the reset button is pressed. If you want a cold start to BASIC on reset, 00084 *delete lines 86 - 89. 00085 ********************* 00086 LDA #$55 00087 STA $71 00088 LDX #?????? <======= Insert here the execution address (or label) of your own program. 00089 STX $0183 Restart your program if reset occurs. 00090 ********************* 00091 * 00092 * 00093 * 00094 JMP ??????? <======= Insert here the execution address (or label) of your own program. 00095 * 00096 * 00097 * 00098 *Your own program should be appended below. 00099 * qٽ\6 o'&9?6$?~FG!  & &V&0 &G &%_ւǿղCOppo$p@m&~筟(뙦 &~ ::::::::::::::::::::::::::: :: :: :: The Pirate's Assassin :: :: :: ::::::::::::::::::::::::::: (C) 1988, By David A. Mills Insert blank DEST. disk & press CTRL key. STANDBY Now formatting disk to 37 tracks and embedding hidden sector. Examination of the GAT shows that Track #0 of the source diskhas been allocated. Please read your documentation regarding preparation of the source disk. It is essential for Track #0 to be unallocated for this copy- protection scheme to function. Touch reset button to exit. 012345679:Insert SOURCE disk & press CTRL. Insert DEST. disk & press CTRL. Track: 00 Sector: 01 *** READING *** *** WRITING *** Backup is complete. Track #0 has been unformatted. Press reset to cold start BASIC. DOS ERROR. OPERATION ABORTED. PRESS RESET TO COLD START BASIC. 筟9g"(߈ &߈꺦 &V&} &@opm&| p'(锦 &~e߈ & @sz &@=߈ۦ &V&߈( & 갦@z &@} '~4om&R}"& &| 591_$|&| |&|59  +| p =  p9  +| p =  p9׌ ݍV׌ݍV9񆆷׸׹׺ ׻~׼׽׾9b_OPQ~RgS~ղ@@8 &~~= THE COMPRESSOR -- VER 1.00 COPYRIGHT (C) 1987 BY: JOHN LAURO ------------------------------ IF YOU FZIND THIS PROGRAM USEFUL, THEN PLEASE SEND A CONTRIBUTION OF $10 OR MORE THAT WILL BE USED TO HELP FINISH THIS AND OTHER PRO- GRAMS TO: JOHN LAURO 315 E. MIDDLETON OWOSSO, MI 48867 ------------------------------ PRESZS ENTER ---- PRESS ENTER THE COMPRESSOR - VER 1.00 COPYRIGHT (C) 1987 BY JOHN LAURO OMPRESS FILE(S) INTO FILE ECOMPRESS FILE INTO FILE(S) UIT (RETURN TO BASIC) WHAT WOULD YOU LIKE TO DO? INPUT DRIVE? (0-3) OUTPUT DRIVE? (0-3) READING DIRECZTORY OUTPUT FILE: [ /ARC:0] I/O ERROR PROGRAM HAULTED TOO MANY FILES IN DIRECTORY EMPTY DISK FILE TOO LARGE. OUT OF MEMORY FILE STRUCTURE ERROR! SOMEHOW I HAVE BEEN RESET EITHER BY YOU, OR AN ERROR (I/O?) WHILE ZCALLING ROM. PRESS ANY KEY TO RESTARTFILE:DECOMPRESSING... ERROR IN FORMAT (POSSIBLY COMPRESSED WITH A NEW VERSION.)  THIS VERSION IS FOR THE COCO 3 ONLY! USE THE VERSION WRITTEN FOR THE COCO 1 & 2.46%"4 & 큌&5Z0' ' '50 5   큌&9' J&@J&_0L8&;9 ' J&~4@& J&~59*D%  %LL'O4" ',4&`Zm&7l 5J&5#'J+@9~- J&/A5RC7:09;0-4&5-' 1? ځ &5-'φ 9/'́.'ȁ:' %Z"525& 5-'2:&4' '00%3"5~2521?4'0 RZ5~2ȤRhč;4H3O5n4v4@o-a~mOemoP54vimP@5OP94O54P5^   @O40'504P5M'܎' 0Z& ɦ&0' d 0%3" 炧9`qPO"ķ&' ؽ~}& ڽ &`Ps@C'D'Q&q~2K J_~ :Km&fLNJ&lm&E')'` K'AR& Cq&O'0L&10 &l @~  / 6@ K'& ~ 6'O?L' &1$0& &  @J&'4 @J&5W'Z&  XX_n ^_[qwu 6o q  ' 0090'09g֞&V K&N0' &10014H''`=4HH5 ]&FFH Oʽ~9~>?'?# 2 &/2Z& q2O_L큌L&DH\BAIOXIL0턖A=&DDH&D"BB -AOXIL0DD$ $  ͖A='H' D=ABB >>ʎ 45Z&B%.OؽʖʖOO_HH&?0~ BJL!q J'L& ' IL J'<L&LD JD%L&BDB$xAJ DJA O_HDؽʖBʖCʆʖJ!ʽAIA&DDH&D%UJD$ $ʖE ʖDʖEʖAʖ=A'H' D=A~!=~!a_4A"qJ&O5\E& Ď~2 KJ5JZ&>O_HM'>& 2- 2&/2"Z&:0 W X~&mM&eBCM''$~"B' 0&H"2 >lJB0'J' c#qM& J0 &0MLL11?& &LM0L1 ؁'LM0L ~iiNeet thing to try: run the wheel and:then the tunnel! The combination is:awesome!::Call th0L ~iiNeet thing to try: run the wheel and:then the tunnel! The combination is:awesome!::Call th THE COMPRESSOR -- VER 1.01 COPYRIGHT (C) 1987 BY: JOHN LAURO -----MOD BY GLEN HEWLETT------ IF YOU FIND THIS PROGRAM USEFUL, THEN PLEASE SEND A CONTRIBUTION OF $10 OR MORE THAT WILL BE USED TO HELP FINISH THIS AND OTHER PRO- GRAMS TO: JOHN LAURO 315 E. MIDDLETON OWOSSO, MI 48867 -----FOR 512K----COCO3'S------ PRESS ENTER ---- PRESS ENTER THE COMPRESSOR - VER 1.01 COPYRIGHT (C) 1987 BY JOHN LAURO OMPRESS FILE(S) INTO FILE ECOMPRESS FILE INTO FILE(S) UIT (RETURN TO BASIC) WHAT WOULD YOU LIKE TO DO? INPUT DRIVE? (0-3) OUTPUT DRIVE? (0-3) READING DIRECTORY OUTPUT FILE: [ /ARC:0] I/O ERROR PROGRAM HAULTED TOO MANY FILES IN DIRECTORY EMPTY DISK FILE TOO LARGE. OUT OF MEMORY FILE STRUCTURE ERROR! SOMEHOW I HAVE BEEN RESET EITHER BY YOU, OR AN ERROR (I/O?) WHILE CALLING ROM. PRESS ANY KEY TO RESTARTFILE:DECOMPRESSING... ERROR IN FORMAT (POSSIBLY COMPRESSED WITH A NEW VERSION.) THIS VERSION IS FOR THE COCO 3 ONLY! USE THE VERSION WRITTEN FOR THE COCO 1 & 2.46%"4 & 큌&50' ' '50 5   큌&9' 0ц0J&1 J&_01 L/&090 1' J&~41 & J&~59*D%  %LL'T4" '14& |0`m&7l 5J&5#'J+@9~- J&/A5RC7:09;0-4&5-' 1? ځ &5-'φ 9/'́.'ȁ:' %Z"525& 5-'2:&4' '00%3"5~2521?4'0 R5~2ȤRhč;4H3O5n4v4@o-i~uOmuoP54vquP@5OP94O54P5^   @5SO40'504P5M'܎' 0Z& ɦ&0' d 0%3" 炧9`PO"ķ&' ؽ~}& ڽ &`Ps@C'D'ӁQ&q~2K R_~ WKm&fLNJ&lm&E')'` K'AR& C&O'0L&10 &l @~Ɏ  / 6@ K'& ~ S'O?L' &1$0& &  @J&'4 @J&5_'Z&  `Xgn ^_[y} Sw   ' 0090'09g֞&V K&N0' &10014H&0'"H'!`=4H %|0OH50 ]&ܞFFH Oҽ~ɽ9>?'?# 2 &/2Z& 2z00'$0 J' O_L큌L&DH\B$hAI$hOXIL0턖A=&DDH&D"BB -AOXIL0DD$ $  ͖A='H' D=ABB >>Ҏ 45Z&B%.OؽҖҖOO_H$hH&?0~ _JL J'L& ' IL J'<L&LD JD%L&BDB$xAJ DJA O_HDؽҖBҖC҆ҖJҽ$hAI$hA&DDH&D%UJD$ $ҖE ҖDҖEҖAҖ=A'H' D=A~"2=~!_4AJ&O5\E& Ď~2 KR5RZ&>O_H0 M'‘>& 2- 2&/2Z&:0  W  X &j M&b B C M''?~"B00' 0'z0 0&00%H" >Q JB0'ڽ J' M& J0 & 0MLL1 1?& & L M0L1 ؁'LM0L FILE TO LARGE TO COMPRESS SKIPPING FILE. $*?04H''`=4HH50 ]&FFH ~qq _~_ "".KDSK UTILITY V2.6 1 JAN 88 5  P߆ J  KWKW' J  ގr rUq QQ Q +K'%4iVkٽiK&kنK+} &i0`PgBQxBY&)hQxb\BQxQxQxQx&QxFQxfQxQxQxQ}4&~OV3;H\Ǭ_lsC`+D5|'t6+T]I4/V(xS/v1t\+ˢC\`g{@C0/Y^ޏ|ہ+^SF& $ "++, l+i2L 2΄2ԓOLFT^UNb(&^ v]F9ڶ`_g[jd@ilQosovzuRx ރ% cbD:c۳$/!_r<Zju7/_p,UHU[Yc)$ ^7{nތ؎:@5ԖMܪ=z/R[W\utqX=#Q{͟BO}:b`4b95m!p2Iuw9Gx ှP{IYv5pU[Waq3}oN 7e@}Y^5v?򘶞 k*7qII:1$B5|¢6-8(m,| spk촵 |+8q= 屭L1ݠGZyBZ*/a ǔa6>_  :#G}umpRbeeggx hz<#7J|%XxOI_0BʌW`gdzD^{5G%% ITяRBηt>{C~41MV:>d"y5ֽ4BLݫB\ s;C=?=ߦCf6Ŧ5%5= ʤ Sj j  Y'߉]#.爟>Bz*J;y>=NVx,f?_KAh,kmsTۗ UpޤaY^yڑ|[+bU/R<-O.imel%ztGGqq?#_pnjsdцZ7|lHʿ*9Y2{C^P8@R twP}rLZߎ!C,8X6АlCC8N@Zjrb23"[ IEx& Z};eXNn.X.U(@ 2- k!;*I֑{G]NMOYe߫'OEzybsNI;~ `){jd|Xƶbs!Ff}d5jSI}+TpEYIBO]`ئHpf} G"F"&n{V[ȅO>gK.b(~9+Bt-1yW!Dg\cJDiӦI.̈DtF"B$E(WTDKڼ2[ILePfkjGu-;& V x#ruS \EP]7WtAW3da{d\ 1z.aİwbn$-M"YiF2FBDQAg٠zQQnrf]X3 NCl{bVuFIzd"B&:N(U$qoXuZ;5')@" (8!xB#lvrjT&y(0?;M HPhDYTIO Ys";+c~q"r% a7Tz0UW~)KOUJEȫӇfr鄘f=XY! )L^#FP!QfUYΩODoJXHHMVQ2WcBe7!﷬{3޼Ȋ(7^F_hͣUf[Pbh|!h0e 2qFX^VC0Ұғ>Wr 9YM!I\|eK-0qOvX^Ԝ(?Ȝ$x3΀S#n鿠&|kq?I<=P/>RF7j?J2Bp] tDcL5`%j&z ]35ePϕO *_Ȭ$U+췭Iq_Qka9Ў_bDӦ-=,'r)mηU$WGjD[ B@c6>ᙷ;[θ+EZűu4,ȤdJ2՛N(@+f+swR$oŨ(AǗisw7Ex󡝑^¡<"|9LqgقHHƞCX8t4댇,Ϲ v:o H8IiwbbuBcO+4OUchS__dUieS  Z @{AN{@Bw@r8F3 Ƅ4 5ZȵnF pp: ֗0 S*2d{I,lS\U?|< QTܔȓێ9 F .ixь+gICEV7g|ޕz$Ċ#M7V$ɼ~s %Bū/( ɉ{ĹH<;%$c[ 9]$EH}BQ|K`Ǝ}wH![{G+oVQ?'Mj`J{`*7]$:srhȕHVEf#eWԧ@`ҿ`]BZob#Jk%hmӾfHo6%0qW Ie&rrȖR8=d3!֢o I,6}0N\0&55X`5[ĭ ftT/|% `*SiPmLna ѠTl>fPn0}kKTC^,} *Z3#:#&3>Z4ϒ z͠`٭0+2YY?ڦ7V`jP?@>qb3ph}%K<η#n\μ2c払u'PI2@aHGTsw&hwlڥ`yy]af^׆t JjrA.C<)6eZߐ=__Ü46GtPckdu_9 m\=nEPdeHOak?& Yt\=7>Zx1)w{5MΘӣ(q/(Kl/F] BSP+p\*MR>37\ma@n^ЅrJ ͕/PQ0IAَ!>;[] Gl_JvP`5[zgS51_Bxn@YOC)PgGxqؼ}%ɂ}wҍuMq֑ rSʸϥDzRcy߂[Rfs|/ڣI͉GhYxѢq]`_o*K I֮"ėlHKLq0 dm$R@vxcXdY9'N\ #~P;]Ս+*fyўmB@B<rKf\qsD>]n@>(WK)l56a~orsR=x*Gy?&a Ct'_͇uʝD` 8oè7jʷqgY⅒"HU&CVV uREEOuMmfԀLHXA;ޕ4&o mL{TG?{0ѝ6Ii_EphRƆen C"C cgQOĸߛROT%zVeR #>3 J'(ucu8\ y:lT]2zc#[RO*)+o ? 3kfTUB#ß6+|^Ny }ޠ|nj5g>8 v4oG=m'!VK=vaS o?#XWAjQ%>bw5 nҗ$kƴ@CRt}-ȅ|6Kţz$M{K?m9~TF6:RA1w?nn6F 9K94s=m<]˩ w5 .g4k촵&J*K EyaOK1@ 7Bl _Pԣ\T,ҬPvcs [TAٲ 6D݄}k%lRzg:=1}yVKXQ(b1:{7 D`읯"%@ @P#AHdw+F i8Dn|!ɁB ΛRT2W:uV4C[S~3\'M "҈Qg Ee}Fw5ٶ800.Frkc+y.,4=->.9rNu1]t{U nRAko22gD1xڌMȶ[K6S1>,]X.s`wCik[tEVLWBE92.= 5"01]jVI6>L;K7\١NDsZNbg ZC׮ma%.K]k>n ne:|TAl+:~*%<2 -}J[ ג+xurCGe2j6㔏s<NJ]e#ok#FR01'PzܖVj.7%K}NdԌY%κ˃ƅ›K L[>j] 6#Y {Z6x> H8>Nb# ++ӌ& bٰ16rowjZr,Ё%AlƻYNlj$鶭g9%Z_\Ok9?{rkm@Ų hsZ1Ec"AōEoGt1Sn\R˞gum-tU~.޻\wkZK"WB~f0egx;& Zl @5L<3H'(` ?l:ŚS27P |%d$wZywy;B V(`0wc|Gpaq?|Mz ze[ MPOoq>H؜X;[^eи2A{>G,J=Ȧ! ]yh)>Y?9t=| I #'ȡMiޒꇔYw$n^/%D%g-u BYr y-Ujylgv AULpm\NW1 ,\_ kc,T\59zM> =?8h#' o'(h2bTs1N*^o g-GL҇ga n?:xM_:k6"Sϭl犌}G'<OП1 Jqͧvԭ,ݶ$η&o/1 vʞv|'ʓjw G)Gͺަ㽄ةB6To#W1g`@ ML8g H5`dSLae+^K]6Ԏ rڊ1'Kٝ7IO y}V<>mBbA}Q4P5-'~4y4P iQxJhQxT_ & jgO Qgʀ4yQxT_ & Ojg Qgʀ4 cQx}4'! +@Q 'F' A&4 |4gPK'5PP~/iVP세5* 60 !i%9OWNER FREE m dqu DONATION REQUESTED #00000PLEASE DO NOT REMOVE OR ALTER TITLE PAGE OR ATTEMPT TO MODIFY PROGRAM KDSK UTILITY V2.6 COPYRIGHT 1988 WRITTEN BY KENNETH L WUELZER 113 ARROWHEAD MONTGOMERY ALABAMA 36117 VXK ;,bF}nc4ȫ8c:6'(]H>P~z-&r )Gq!lحw{Y"\Ls84fcCt!( SIB-:HBY%>.`=)cR5RKeXpbIFIØcxlq%BUi+K_JQTP*a&dsh=L?ʞԈA[bqsaN/P5XIZ]V}LL+|=*e*5Ecx}y5>fc3h[wӵKSUb*>)<[q J W*#ZJķd-|ڿ -݉닄}L}vWªZ~B&W˂%4dw_)k#gg$HRd߹XbE /P.BבZ bS.W"&[yNv 4]N!iZ|qQ?rA$^m$'eI,18?e$1J=Qy YVK=ӿO?*1&>4& Hڂ[$wmۙЭRYP@9Vz5H9M{`wJ;@}ȧM6"wc€1NUp=@r.[8nE{R{WfJ6a@@PFle@TEe #*Ky0$vMMPf.dJk̩G?吿¾8OKF ɬL>#n!M_9h35|@C-46<u ?K{$u?ŕ1*jlR}3$gpގu1ȣⳭoi3NnThCWOaYv*]B¹ _P/PZиRETYo*MgCK'p2S;Kfֻ筇P^fgl0M G~x )Ygj% )ok~ir/=2zj] eHQC#2;|(DtyE+y:.RbW^&EoAWғc8rם}^:%ײ]z85oarp>U>0MsKvr 4u.JP_ղOm`CWsYٸ)lcne9h ̻?/qm;/{^̻̽;'5tl?!h )BQS0 237e>aeBZ:1Ymނſ4CBe8ˁfF wg!{:NsLw`|kÜ[O'DB UCKSm8z{-f;Eqhj.mvc|\vY:B-)|8I˜؝/42! M7;¡@-CnW]O.kȅK v)!N{Dk'LMМxQPoK%J2͂@̹&wa[F}8JdGʶI,P~6ޡQB/U]XqM 14vupgXq/+ފRS8{Sk}Lm^oJ:vh.RwgL F' d,sP/"0ҁi^Ey.gщh|$oTk^KS~NJiL}$fNSi}:27qltp; b3ԛ́6, %gѴ]b3cp<89\MСH/QD' 4șP̈~9pi9/;US-{ь:g56u78|3[уzf0hI`F';!袵 $C*S/Ad&0dB_vmV.?7bءDuōBek|Do88bz2?ӠxY+&d%3"(0S;07}@Y3A __̇-{Eaբ61p+Æimhm>f'R6r鱯OAMkK ].^W( ~4ǹ*0uzZ0=PdP[,տRwoG)([.,Pgݭ&Np27ؼ:|Rةbjkݶ4&*Ϸ(8M8+ WiD$3NA~Ѕv,O\C\!e7!0Hp>Ad_J-xh)(duP&X_0 !Ntqj}nv֯I.(; sc|ǀ(m\4ܶXyh \=>:-$x[s{fV>ygnyZ,/& Id^/bGX G>u[44Nua;$;*I㝕%&ؐuu.[ ]b̭3XʱS;|W38Go5cDB`bZ+V'W!m#nyrU)M9{)JMB&^t:Y$Z#{}"m-|B+7*~tJ5}>&0G3vs.iYٺ S {ZBp֥Jp:uLzdZIʏQ@ZU(7^ؚӢ .Ͳ jڂJ''~ݍm۵=Z]"ȫ[-bPCgџ{Msc}e0ZN0xqL,s޽`o_oR*_m` 4[lFni[( M>Zla3E "aIΜʃJHQd} $eVU'|:.w#Ixyds,$l~fI2^xjXO0}ho`Q`B{P z6b! k(4Tn47N3KVRrJz0TMԷ 3T5uX b{0KGU$E6v"*i2"8\ա W[0(^I:ڬ;WP,f] O&YKxݭ^6j҆ >WENaD,B\d'x'.ᕺ>C,:e0l9j~7!ڊ0M{ur9,O A(CU1NkD$.cUA-Z<)嶋o*R1.08h;F56aHWOhvbm;b@^k@4gwtSPQ~m0uY}I]z548 63'@ v<#%JV6yXίR|'~Ly֨J,1œGW' B6g\Ee$L4{etP+hIv;;=y>Mm{ :Hȋpy(۰@`Lȏn[/"S=2j(RS]u>L1AFez OS̈(tSu+x*5su}.w+|IXfO'.&B<%ͅ+5$ u7T) E݋3q$; 8kkײMPΒ>9l]`7k)9}h_tte@\I8pRFQՎ}8!g\ZSwK0[eex^)H IJ`aPj,̪o[i>iYUR>124Zn8/^UFz&l Z2E_==im>M{5hPZdA)݌ e/0DIGf兲&;9Xr8g~?h0KtÝ&E} 9c[oY}핰wX/˪%|^4H \LvgVze87=N[;,ʆ4lA lID'DZ$ ."(EZ&wH yn'Jt}o-Q"6>s? };Equ"tH >(E' 1Jˆ<ݔVgTSD&c_kdm=!587GuE*?T~+xjV˗e{ GuW 0_GJI_mu⢊A``/HZdSLqN1鲸y)=&g/V " љ-蒒+kR $ŸtTzm:K虳<ȍ؎U3tPo1.3ZiFGCz;cYQK孓\Ωyh5\ƓkqCeo|ʈ̾=[+ hܦX2}tߗϴ4 դ"qӰ ˋ!42V=wCJp0[i:@RZ %E#\[3h)+=%vs n#x:;ОP;P:ɣeDRADw|kdznI\I e^Jʗw-[n0`{^Yί"Z?tS]Den"x+ꁛ̣v j{c 2c|K*v4'i5(oӷF 5az3Y6Zb a]а 4rtxQ~Im1+8QU?*}Ag_]җj-U611.dbiN/nx@xtv&Xǖ YBAAXq.WFT l)~P*s #˒lE/3NA%YHՓ:.*F"ہ'ڇKI[؝X z{7S/%~Pc]lJLv_kn0AԀdAlz+xjzD\̛JU@6TzwЧSmoEoqފPCFe]bu l;ki=9B>ƄsnS{ vP|.)\ "h=+"BsNip4HFjDYZHPZrd}6I?}N4i m m <5QέR2˼;&T.XK"\f=`Wjd5~Moq큕NtE}C뉋CbkZcO3Vv:b7J4HpH%T1Pn'W,*"DǧR頩±'z-1;W;`=ߗ<;:g%gïgςTK)oAVLolGShv*I9$N >zYULrChK74OA%c";@5no~Tӆexߑ\(I膌C+w_N2HȾT[p H ULό? wӧ"8v \=fÇņڮ h%qx]T%TVO*Ji/ xn8WKE3;1+gz߆$Rr?þabGF E0ch1Pj:qP7) $HZƞw:*?i*ǣ_.$]pQ;-HgSdqFXԙS 1`O45Ѯ >FA_ddXYQ.MUqfXO6ToqƧGlh,g⬫yE -ӑu+sq|scZ mD'@ZsI[0R?:#"5_&8 :8@ ?5:n-G+=46%5b&o'p P%%?dOU* 7B'e|@ ZB,HD;7? !+3x@dvveY]IN NcVe*O`ՃްFAGnjݷaLtދ z~Ґz[˙Pߝ dvũCY,xʤLv;Ɲ3K*Q՛oʊ_*)|{|gubrbsc p qzxpvgx|tj |DŸbHss{bm=f.mMm|l+oPhn@WiV@SU/VA[_RN^]]bHXKj)OBTASbBpI_MYUZ2MXHF;?2o$)#63R8;i<(=N*'2% #y.'4%19p!t-*?+8.oU< o?gz Y8   #  T/(Yo^axz6eooXDŽ8Ibֹ̞UԞ̽PϜ)m٬]۳C v\?} CI3[v9j#íKk߄9}˜S*rQ+%P[ڂa|yz)tqpfr6xq[zyhuZik:M;OuYauflLtx``2e}wobBAYRQ5\qZ&A_`X_ZA5LIIO{XNJT RazC,W^DeK5MI``ZYk0}3/y>? 20/;B,M."F VnT*8 Qm k!^Il@&"+)*5>&]CDXVapجv!:U`qs nLvݎFbէ=`]v֪5yǁB6_¨,uəWC놼٦5`Ψ޼ި$q꿉}4v́!'=B#lĝ.:Z.Uˋ3e̋B'7&HХRӪ`qsdc,vtRv-ho^_xmi{pDEFatcjnqw$muo{HD{ox'WZwv9jpEF_~ZX~NZ LKxz&KjW4jLD]JFFul"BnZ@X[G^BA%?9L%(5 59)7(0T4 . 7+r0/1+7>\#V:=)9 rR62=~ gIG8  .. , &+}8/(_NHqǒS2\OH( Jpł5bێL ZɍͶfFҏӮ4o٦LU΁p}/gnح|˭V(\vv`' ˢk}Ն373VC,#R]ˏ=7!1u)[ڞ{wUsc/~ah0x^O}dwn[Dp8jbduBgLQ`Nv``b#o]VPPETB^(TZ}QQKM.yOOjFeCEgOQeK1WބK`BAEsWJ0'T",O.  X : Kx.U.Ru:$"&. FfL32=N%b Da![ X#Ol [# 8):99q0? QR V\./G,- GNMgA)7.N]Mr)*NJ p!&W PF7 2\C/0,9-;Z.5DE>d$T@~A+(%xM9NEO`,=JKtw|S}vz{rs|}~ur0s!pQ{Jdxemfg`abcA/Lt+)JCmtt䧂Y%f찊`Euܓs 7oڽ${߃׳>ćӲ4LȻ]V\ɡPޓ{Ùf(u[v6 +# " ++++++++#" + +++#"++++++++++#"+ +6!+6!#"++++#" ++++++#"++++#"++++++++++# "++++++#"++++# " + +#" +++++++#"+++++++#" +6+8>$:3#" ++++#" + +++#" +6+++++#" +6++++#"++++++++++#"+ ++++#"  +++++++#"+ + + +++++ ++B F5HB E4G9\:WpjxՉAۉ֊ډG}"w{ՋGی݋ڌA}"G7<9PnQx@nQxbnϽQxnQxĎo Qxo"Qx oBQxojQxoQxQ9P _OZ&gBQx@nQxQY&n!QxQ 1'2&cAcĆK~4M 4y4B4PnAQxQ G'T&cD~78O8] FhYdh\fPHdHQx/Q 'A '.^&|//#/OH//zHdYdTdV~j/'J/ ن /EPoQx@oQx` #1YoнQx <1YoQx 1Y U UKD&BSK&D &HBI&JN'&3 %͖ %PnaQxQO9M $ מ\۞מk UK9k& %4@Pbn|Qx5@Q0"U UKD&BSK&D &HBI&JN'3 %͖ %P9M $ מ\۞מ U'K&A' Og OVB4y'p jQg4'p jQgD'K2^M']]g|a_]_aa]a ^g|a_^aa]bac4M'ggE/H//zHdYdTdV F8O8]dhYfh\ 3Ji'ā 'ā ' mǧ3B i&i 3+++++ +++  + + +++ + +   +++ + + ++ + +kfk