56,0,54,1,0,6,4, 30, "(A)rcive Files", "(C)opy Files *", "(E)dit Files *", "(K)ill Files *", "(M)ove Files *", "c(O)mpare Files *", "(P)urge Files *", "(R)ename Files *", "(S)alvage Files *", "(U)n-Arcive Files", "(B)ackup Disk *", "(D)irectory", "(G)ran Analysis *", "(F)ull Disk Edit *", "(I)nitialize Disk", "Re-(J)uvenate Disk *", "(V)erify Disk", "(-) Erase Disk *", "(W)rite/Sorted Dir. *", "(Z) Disk Speed Check", "(?) Options Menu *", "(1) Communications Mode *", "(N)ew Disk Backup *", "(L)ocate Information *", "(2) Verify Files", "(T)est Arcive", "e(X)tended Memory Edit *", "(3) Full Disk Compare *", "(4) Print/Display Files *", "(Q)uit", "****************************************", "* Cer-Comp CoCo Arciver/Tools Demo *", "* (c) 1991 By Bill Vergona *", "* Demonstration Version 1.1 Main Menu *", "****************************************", " Use Arrow Keys or (Letter) to Select Command and Press to Execute ","* Options Menu *",8, "Select Colors", "Drive Step Rate", "Directory Sort Options", "Printer Baud Rate", "Communications Baud Rate", "Printer Test", "Write Setup File", "Exit to Main Menu", " Use Arrow keys to move pointer and Press the Space Bar Select/De-Select Files", "A=All files, ?=Wild card select, =Deselect All, =End, =Abort", "Use Right/Left Arrows to Adv/Backup 256 Bytes and Up/Down to Adv/Backup 8K Block", "(E)dit Mode, to Exit/Update, to Abort, (T)ransfer to Mem Block # ", "Use Right/Left Arrows to Adv/Backup Sector and Up/Down to Adv/Backup Gran", "(E)dit mode, to Exit/Update, to Abort, (T)rack/Sector on Full Edit", "(Y)es EOF, (I)gnore gran, (N)ext, Up/Down Gran, Left/Right (prev/next sector) ", " ( Flashing location is the where the last byte of the file should be? ) ", " Adjust Background Color with the Left/Right Arrow keys ", " Adjust Foreground Color with the Left/Right Arrow keys ", " Adjust Highlight Color with the Left/Right Arrow keys ", " Use the Up/Down Arrow keys to Select Foreground, Background, Highlight Adjust ", " Press the key to Enter a specific Color Values ", " Press the key when you have the correct Colors", " Press the key to Abort any Color Changes ", " Press to Abort, to Accept the Current Step Rate or", "Enter a new Step Rate 1=3ms, 2=6ms, 3=10ms, 4=15ms, 5=Test Drive ", "Enter Sort Option # 1, 2 or 3 or to keep Selection? ", " Press to Abort, to Accept the Current Baud Rate or", " Press to Accept the Current Baud Rate or", "Enter New Baud Rate 1=300, 2=600, 3=1200, 4=2400, 5=4800, 6=9600 ?", "Enter Sort Option # 1, 2 or 3 or to keep Selection? ", " Press to Abort, to LZ&5"&&4cc5n6 & n'4o&f#4O5* 'J & @0O'" 5g4;'02'm'!&EX&04 4; 5 ;'7'9&'?& ^y' =' ' j ;5P3276hk76e  JGJ9qW~'ݟ"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`t& && &oo59&'o& ' _loO9o_n' Jm=l ܈~\&9 5&%''&;''~S4o$E\ 5';Z&9 _  ,"$9_ݍ 402yBA2g54M+ 6' @Pa-Oc0,oa%l ajd'M&mc'0lcmd&2eo9'd 44 Y W5 &aX [o_5;~'o@&  HE~99~ݟ"oq p& '& ooo~46 W#56~~ !E44I 4Obo45 o :o W&I9'@' &&_9H~F~'@&؟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~ƌ~dj_4`24v_*\4섍,ca&ad=gb#adac=e&f$ to return to Menu5aL`~iflElElGlE4lElElG.~\b9~\~~^˧_PoZ&\&oN~000Y'SGJGk0kh0¿h 0ڿ  0 e9.&Ph45qnT\0L_n\.4c' JLZ&54octomh' <&!_' k2k245f 4k25_e P=PaM`45_eif&!_' k2k245f 4k25_e P=PaM`45_eif'!_'~%` P=PaM`` P=PaM`` P=PaM``P=PaM`if~# 45f Foreground = 5aLlaT Background = 5aLlaT% Highlight = 5aLlaT`Խ`zk`^&!_'ifif~#k` &!_'ifif~#k`&!_' l!k` &!_' llif&!_' ll?lif&!_' ll?lif&!_' ll?lk` &!_'45f &FEnter Foreground/Background/Highlight Color values 0-63 (Ex. 0,56,54)5` ^^l^l^l45f ` kk` &!_'liLliNliP94l5fC4l5fC 4l5fCfh '45f Foreground = 5aLlaT Background = 5aLlaT Highlight = 5aLlaT`~%_eDrive Step Rate Select/Test5aL`lI'2~g3 ms 6 ms 10 ms15 ms5giR4Adl2b45gVlI'l g1`#The Current Step Rate selected is 5aLl aM``P=PaM`P=PaM`&`^^k`k`,!_4k`/!_'~)}k`iR~(Rk`&!_'+~(R<]644v'!_'~* O'iRiRiRP,ۃDO'!_)'iR#iRiRP&0]69_eDirectory Sort Options5aL`The current Sort Option is #5aLiTaT`iT&!_') Extension then File name5aL`ZiT&!_'" No Directory Sort5aL`& File Name then Extension5aL``P=PaM`k@ &!_'97k@1-!_4k@3.!_'k@1iT~* ~*_e%Save CCTOOLS Preference file to Disk5aL``MThis function is not operational in the Demonstration Version o+f Coco Tools.5aL`~\#`:Insert a Formatted disk and Enter the Drive to Step Test 5aL`~+0]6 DTOOLS.SET5'ig1Okk Zic&!_'_eAThe File DTOOLS.SET is Required to Run the CCTools Demo Program!5aL`& Press Enter to Return to BASIC 5` ^^k`~UI& b^^iL^iN^iP^iR^iT^iZ^i\& b^^iVkkiVkz& b^k=45_kkkiV/!_' kiVkkkkz.~-xkkz-& b^k(=45(_kkkz.~-& b^P_s2_^i`ki`kz& b^k=45_kkkz.~.@kkz& b^kP=45P_kkkz.~.~ ai$_^if_k"ifk$_^k`__k"4k`k"k"k$.~.<]6 O'_Oib5Oid!rOibOid!44v'!_'̽ _~/kkzk4&!_'k4̽ k4bkkkz.~/x O'̽ _D\/$ۃDO'!_'̽ _D\~)_ePrinter Baud Rate5aL`` The current Baud rate is 5aLlI'2~g$ 300 600 1200 2400 4800 9600 192005giZ4Adl2b45gVlIaL``P=PaM`P=PaM`&`^^k`k`/!_4k`,!_'Gk`M'&1R&1Y&1`&1g&1n&1u&1|k`iZ~0999W9)999945f Prn/Comm Rate = 5aLlI'2~g$ 300 600 1200 2400 4800 96001 192005giZ4Adl2b45gVlIaLa/5aLlI'2~g 300 60012002400480096005gi\4Adl2b45gVlIaLa`Sort Option = 5aLlI'2~g"File Id/ExtExt/File IdNo Dir Sort5giT4 Adl2b4 5gVlIaL ";:400::A$(3);" => ";:400:3902UC$:C$""400:C$(13):C$(95):330:C$;:4002A25 324 23:A$(A)A$(3):"* MAIL *":((A$(A1)),"="):A$(A1):A$(A)A$(A)" (REC)":W1::3&X0:S0440 ::" -===============-"," - W V T E ? -"," -===============-"3qXX1:580:C$"W"450:C$"V"690:C$"E"330:C$"T"560:42041X4770 ::,," -";(21,"=");"-"," = (W)-WRITE A MESSAGE ="," = (V)-VIEW A MESSAGE ="," = (T)-SCAN TITLES ="," = (E)-EXIT BASE ="," -";(21,"=");"-":4304‡,,,,"SUBJECT: ";:A$(1):(A$(1))27,,"* 27 LETTERS MAX *":450:A$(1)""450:"TO: ";:730:A$(2)C$5̇,,"SUBJECT: ";A$(1):"TO: ";A$(2):"FROM: ";A$(3):,,"LOOK OK?":580:C$"N"450 :A$(1)"14:"A$(1)5Rև,,(31,"%")," 20 LINES MAX. BLANK TO END.",(31,"%"),,,:A45`AA 236A3;">";:A$(A):A$(A)""510 : (A$(A))41A:510 :,," LINE SHORTENED TO READ:",,,:X(A$(A))2 1:X41 (A$(A),X,1)" "500 :A$(A)(A$(A),1,(A$(A))1):X6<A3;">";A$(A):AA1:A24 4806X0:S0530 :,,(31,"%")," (C) (E) (L) (A) (S) (?)",(31,"%"),7XX1:580:C$"E"540:C$"A"420:C$"S"590:C$"C" A24 :480:C$"L":B4A1:B3;":";A$(B):B:5107eX10770 :,," (C)-CONTINUE (E)-EDIT"," (L)-LIST (A)-ABORT"," (S)-SAVE ":5207A4,," * NO TEXT FOUND *",,,:510:X13:,," EDIT WHAT LINE? 1-";A4;" ";:730:C(C$)3:C4 CA1 :7708&X13:,,C3;">";A$(C):,," CHANGE TO:":,,C3;">";:C$:(C$)40 :"* 40 CHARACTERS MAX. *"::X:770 :A$(C)C$:A$(C)""A$(C)" ":510 :51080,,,," :: CASTLE MESSAGE BASE ::":(31,"%"):X114:A24323 23:A$(A)"":((A$(A),1,3))X A$(A):A9:X:(31,"%"):9.DC$:C$""580:7409NNA23 BA123:A$(B)"":9XB0:A24323 23:BB1:A$(A)"" A$(1)(B)(A$(1),3) ::630:4209bB9620 :680:4209lA$(1)(A$(1),2):680:420:v,," * SCROLLING *":A24323 23:C((A$(A),1,2))1:DA$(A)(C)(A$(A),3):C10660:ZA$(A)(A$(A),2):jC0 680:wA:420:AA1:B123:A$(AB)A$(B)::AA1:;,," * ENTER STARTING NUMBER *":730:B((C$)):B14 B1 ,," * NUMBER OUT OF RANGE *":420;A24323 23:A$(A)"" B1 B14" * END OF MESSAGES *",,,:420:((A$(A),1,3))B ,,"SUBJECT:";(A$(A),4):"TO: ";A$(A1):"FROM: ";A$(A2): :A;ƀCA3A22:A$(C)"" 720:C$:C$""A$(C):C-:" * PLEASE HANG UP NOW *":S0::X12900::"+++":X11800::"ATH":X1900::320>S1:15000:A$(346):B$(100):250,," * SYSTEM VIOLATION *"," * NOW DISCONNECTING *":785= ,," THANKS FOR CALLING! WE'LL"," SEE YA'LL HERE... ">-:" * PLEASE HANG UP NOW *":S0::X1290}h-k~jg0Hh0k)1(Q&01<9&} & ~&z} &'0t~k4 o&ǁ' &}' }'}}~ 544T','8 'g %%"` ?"@ _" "` &549 `` }%% 瀌&`瀌&9 % `瀌& L &54 95~}ɶ}p o&n2b4' `~' S"V%*X4O"V$`h`$2a}'}'&O9}& a%z" 9& A%Z" 9`5~}u4!J&5}2r";:1087,32:@64,(32,163);(175);:(xI08:@127(I32),EB$;::@133,(175);(174);(18,172);(173);(175);)0@165,LC$;" 1) ? IS 5% OF 20 ";RC$;:@197,LC$;" 2) 5 IS ?% OF 20 ";RC$;:@229,LC$;" 3) 5 IS 5% OF ? ";RC$;:@261,LC$;" 4) COMBINAT& : RAM-BASE&8:(C) WALT NOON III (1991)&O:SECRET COMMANDS:&q(:SHIFT UP-ARROW/ANSWERS CHAT&2:CLEAR KEY/SYSOP MENU&<:&F:FOR A COMPLETE DISK loaded&P:WITH MANY UNUSUAL BBS&Z:PROGRAMS, SEND A MODEST'd:DONATION TO:'n:')x: WALT NOON, 3283 BELVEDERE'D: RIVERSIDE, CA 92507'S: THANKS!'Z:'d790(A$:A$""160 ::X190:(255),1::,,,," - ENTRY GATE - (S) TO START -",,," +"," +"," >'<"," >'<"," :::"," :::"("***********"," ***********":X16:" *-**-**-*"," *-**-**-*"::(31,"'"):X15000:C$:C$"S" C$"s"180 :X:770(X12:A$"":,," ENTER YOUR PASSKEY"," (N)-FOR NEW USER => ";:A140:B12000:C$)YC$""B:770 :C$(13)200 : C$(8)(8);" ";(8);:A$(A$,(A$)1):A :A$A$C$:"*";:A:770*ȅA$"N" A$"n" 210:A$(95)250::,," * DWARVES CHECKING RECORDS *":A2100 2:A$B$(A) A$(3)B$(A1):,," LOGGING ON ==> ";A$(3):330::" * NO RECORD FOUND *":X:770*҇,,,,," -=- NEW USER INFORMATION -=-","WELCOME TO THE CLOCK-TOWER.","24 HR. R.A.M. MESSAGE SYSTEM.","DEDICATED TO FREEDOM AND","IMAGINATION WHEREVER THEY DWELL."+a܀X13:,,"PLEASE ENTER YOUR NAME.","==> ";:730:Y$C$:"PASSWORD ==> ";:X$:,,"LOOK OK? (Y/N)":580:C$"Y":770 :,," * VERIFICATION IN PROGRESS *",,,+(Y$X$)27 " * NAME OR PASSKEY TOO LONG *"::770 :A1100:B$(A)Y$ B$(A)X$ " * UNABLE TO FILE THAT KEY *":X :A,:A198:B$(A)B$(A2)::B$(99)Y$:B$(100)X$:A$(3)Y$:" * VERIFIED *":330,:" ** SYSTEM MENU **",,," (L) LOAD BASE (S) SAVE BASE":580,,," *************",," (1) CASSETTE",," (2) DISK",," *************",,,," ";:N:N2 N1260 :N2 300-wC$"L"" LOADING PASSKEYS":"I",#1,"RAMFILE":I1100:#1,B$(I)::" LOADING MESSAGES":I24346:#1,A$(I):.C$"S",," READY TAPE ":580:" SAVING PASSKEYS":"O",#1,"RAMFILE":I1100:#1,B$(I)::" SAVING MESSAGES":I24346:#1,A$(I):.&"320.,C$"S"" SAVING PASSKEYS":"O",#1,"RAMFILE":I1100:#1,B$(I)::" SAVING MESSAGES":I24346:#1,A$(I):/$6C$"L"" LOADING PASSKEYS":"I",#1,"RAMFILE":I1100:#1,B$(I)::" LOA&': ******************************&M : * NIBLOADER *&s: * BY *&: * RICK COOPER *&(: * (C) 1990 *&2: * *' <: * DISTRIBUTED BY *'1F: * RICK'S COMPUTER ENTERPRISE *'WP: * P.O. BOX 276 *'}Z: * LIBERTY, KY. 42539 *'d:******************************'n8'x32'0'M"NIBLOADR' (&HCFC3)&H8D &HE76,&HCE: &HE77,&HE7(F1$"OUR HOME"(L2&HE92(1 X0 (F1$)1(L L2,((F1$,X1,1))(XL2L21(`ҋ X(gܞ0( @35,"COCO FRIENDS DISK MAGAZINE";( @107,"PRESENTS";( @168,(255);" ";F1$;" ";(255);( @238,"BY";( @297,"HERB SCHULER";) &HE6E4,&HE6)" &HF00)!,2)(64):@ "" 320)CJ:0)VTF1$"OUR HOME")v^ @139,(255);F1$;(255);)h @207,"BY";)r @265,"HERB SCHULER";)| @168,(255);" ";F1$;" ";(255);( @238,"BY";( @297,"HERB SCHULER";)& (0): X1511:(169);:&z@96," -=- RAMBASE BBS SYSTEM -=-"::" BY"::" WALT NOON"&::" (1) INSTUCTIONS (2) START BBS"&( X384 415&2@X,(169);&<@X,(150);&FA$&P A$"1" 120' Z A$"2" 280'd X'n 40'$x(0)'A$"WELCOME TO RAMBASE. A COMPLETE ":230:A$"READY TO RUN MINI BBS FOR ALL ":230:A$"COLOR COMPUTERS.":230:::A$"TO USE RAMBASE YOU NEED ONLY A ":230:A$"SMART MODEM AND A COCO.":230::(A$"RAMBASE IS ALL ram AND WILL":230:A$" EVENRUN WITHOUT A DISK DRIVE.":230:A$" JUST READ THE HANDY REM ":230:A$"STATEMENTS BYLISTING rambase ":230:A$"AND YOU WILL BE UP AND RUNNING":230:A$" IN SECONDS!":230:)C:A$"IF YOU ARE USING A COCO3,":230:A$"ADD THEFOLLOWING LINE TO ":230:A$"rambase:":230::)A$"1 ON ERR GOTO 770: POKE &HFF22,PEEK(&HFF22) OR 482":230::)A$"ALSO, YOU WILL NEED 3 FILES:":230::A$"(1) BOOT":230::A$"(2) DRIVER":230::A$"(3) RAMBASE":230:*:A$"THE FIRST TIME YOU RUN rambase ":230:A$"SELECT THE (S)AVE BASE OPTION. ":230:A$"THIS WILL SET UP THE MESSAGE ":230:A$"BASES.":230:+r:A$"FINALLY, SINCE THE PROGRAM IS ALL IN ram,REMEMBER YOU MUST USE":230:A$"THE SECRET COMMAND TO ENTER THE":230:A$" SYSTEM MENU AND SAVE YOUR":230:A$" MESSAGES WHENEVER YOU PLAN TO ":230,A$"EXIT THE PROGRAM.":230:::A$"rambase MAY ALSO BE ADDED TO ":230:A$"AN EXISTING BBS SYSTEM OR USED ":230:A$"WITHOTHER (BETTER) DRIVERS.":230,BA$" WRITE TOME FOR FURTHER DETAILS.":230,d҇::" <<<<<< ANY KEY >>>>>>",~A$:A$""220 : , X1 (A$), (A$,X,1);, (255),1,,,(0)-"@68," -=- TURN MODEM ON -=- ";:@265,"<< ANY KEY >>";-,255,1-=6@68,(23,(128));:@265,(13,(128));-R@A$:A$""290-zJ@98," -=- PROGRAMMING MODEM -=- ";-T512,&H7D00:M"DRIVER":&H7D32-^@330,"ATE0V0S0=1";-h"RAMBASE")-"@68," -=- TURN MODEM ON -=- ";:@265,"<< ANY KEY *& 10000&&6: ****************************&Y(:* DISK LABEL SHEET PRINTER *&|2:* By CJSoftware - 1992 *&<:****************************&F:DMP-110 PRINTER CODES:&P: BOLD ON=27,31 (LINE 610)&Z: BOLD OFF=27,32 (LINE 620)'d:CONDENSED=27,20 (LINE 230)'<n:NORMAL=27,19 (LINE 475)'^s:FORM FEED 12 (LINE 450,475)'}x149,0:150,41::1200 BAUD' C$(8),F$(72)'"* DISK DIRECTORY SHEET PRINTER *"::"-ALIGN TOP OF PAGE"'"-SET PRINTER TO 1200 BAUD":'("ENTER DRIVE TO READ: [0]";($ DRV(O"ENTER TODAY'S DATE [YY/MM/DD]": DT$(LN0::"* DISK DIRECTORY SHEET PRINTER *":(҇"INSERT DISK IN DRIVE";DRV(܇" AND PRESS [ENTER]";:X$(#2,(27);(20);(("READING...")' I3 11: DRV,17,I,A$,B$:C$(I3)A$(B$,127):)K"ENTER NAME OF DISK: ";: DN$)U540)_"500)i,490)6#2,"!";46(DN$)2);DN$;92);"!")@#2,"!";42);DT$;92);"!")J490:LN5)TA$(0):B$(0):T$"BASIC PROGRAMS (BINARY)":510*3^A$(0):B$(255):T$"BASIC PROGRAMS (ASCII)":510*whA$(2):B$(0):T$"MACHINE-LANGUAGE PROGRAMS (BINARY)":510*rA$(2):B$(255):T$"MACHINE-LANGUAGE PROGRAMS (ASCII)":510*|A$(1):B$(0):T$"DATA FILES (BINARY)":510+'A$(1):B$(255):T$"DATA FILES (ASCII)":510+jA$(3):B$(0):T$"TEXT EDITOR SOURCE FILES (BINARY)":510+A$(3):B$(255):T$"TEXT EDITOR SOURCE FILES (ASCII)":510+ LN30 LC1:440+490: LN30 430+500,LCLC1: LC1 LC0:#2,(12);,<̇"PRINT ANOTHER DISK LABEL [Y]/N";: X$,Wօ X$"" X$"Y" 200,vۇ#2,(12);(27);(19);,|,#2,"!";92);"!":LNLN1:, I1 92:#2,"-";::#2:-XX0: I1 LF: (F$(I),12,1)A$ (F$(I),13,1)B$ XXXX1-%: XX0 610:630:490-+-;F1:D1:S0-V&F$(F)(C$(S),D,D12)-{0 (F$(F),1,1)(0) F$(F)""-: (F$(F),1,1)(255) LFF:-DFF1:DD32: D255 SS1:D1-N F72 LF72:-X550.b#2,"!";3);(27);(31);T$;.7l#2,(27);(32);:#2,96);"!":LNLN1:.Xv#2,"!";5);:C1: I1 LF.m F$(I)"" 660. (F$(I),12,1)A$ (F$(I),13,1)B$ #2,(F$(I),8)"."(F$(I),9,3);C185);:CC1: C5 #2,92);"!":#2,"!";5);:C1:LNLN1/#: C5 #2,92);"!":LNLN1/)":LNLN1:.Xv#2,"!";5);:C1: I1 LF.m F$(I)"" 660. (F$(I),12,1)A$ (F$(I),13,1)B$ #2,(F$(I),8)"."(F$(I),9,3);C185);:CC1: C5 #2,92);"!":#2,"!";5);:C1:LNLN1p E$"@D "@H `g8@`@H $80@H  8&`d0  $#0 @ $!@H $`$p@`@H D" @H  E0(" @  $ `08@`@0 $(0`H $"d @ #<# !H"@@$HPp D@xD`E CpD0 `80 8 x& `#F @! *PD "@E"@ (@@d#! PD"E"(8p @"dP @ # @ :H(@A!! @Y"@hB&B@(P@@T JԔȩ HI)D`0")!A E J" !B BE "PJQ@ (! ` @@! @( !&D4Є&8 ` @@%R*JIA$@dZD*AH Hi"PPĀH)@*@P (A * 0PBE M!@@( XPP HJR@""TA@D "@!BBY !T D(,#"@0@-""@w3|8 @( @> R<(̴x `H RHBE(Z@V{(pd($(\/A_%  <-j<2@# Yϱ!@V l T$` &T/@$`@`010DJ"0 1`E@P$"aP(0z( ,:pE 낼`@P"@0x@ B(( W>?[GGX P(|}??? Bz;^ +!`^  qT{8 !*…$(eKLR"(PYY`}&Ke:PaF>owqwpx$Qpad %tukxY`($>Y]s<  |}&`o *l$?  DA 찱 V滟D;~wo_~oog?} [c_/|-S7]c7.n)_q]75T1JAaqE+A7_>߭]kz_|=?wo~?& ۠'zTp s<ށ:=xvnp^ϟ{Ql{ 87?˳?c?9ho ţߣ}h`;?p~x??????߀?`?|~~`~ߎߎߌ~~~7}???߾?ߏfό   {~  ፷Ͽ~~ @s}~z?~<89Ͽ;9;88 =9999﹇ٿ^߻??x?????????x 986+"?O0oY ^^߻??x?????????x" ^09 * ## *0 9 # 02 0 # * 09 02# # * # * # # * 09 02 09 02 09 9 02 09 :9 02 09 09 02 09 09 02 9 09 02 0  ##90 #0 #   #  #  #  09 009 0209 :   #9 0 #0 #   #   #   # 9 0209 09 0209 :  #90 # 0  #) 09 0 ) 09 # ) 09 ) 09 ) ) )  )  !  ! ) P! P0P! 9 ! )  09 0= 0509 0 9     ' ! ~p! ) 9 pP /      0Ґ9    А   Р 0А9 0А9    ) )   0)  )  p Р'  '       p y  r prr p p' ' 'pp prp py r '' 09 p ' 0@9 prp pp p'   pppy 9 pxpppp0p0p𠐠p0p00pp0p0p9x  09 s     0  00   0:  0900 @00      @@09 @@0@@0@@0  @@0 @@0 @@00@:  : 0   0    0:  0@  I  009 09  0: 09 09     @I  @@@I   09  09         @G@@ @@Đ@7@0@40@ 0@0Cs80 @ 00@Cs@00<   p0@04@0@J 04  4@ J J  J J J @ p0  07@G     0< 4       @0 J     00Ȑ p@Ks        @  p@ 4     `p0   s@      00J  A p@    а 0<< 0+^[    а/     X K @ְ    `j 0ě   ^    `p 0    а    jFB&HA373: B,&H7E: B1,&HF0: B2,&H9D: B3,&H12'EP:'hZ:*** FOR INVISIBLE CURSOR ***'od:'n&HF812,&H21:&HF91C,&H21'x80:0,9:1:3,2'#A:#A'#A,"THE FOLLOWING ADDRESSES CAN BE USED TO";(#A,"CALCULATE THE HEXADECIMAL NUMBER THAT":#A:#A(K#A,"CAN BE POKED INTO THE MEMORY LOCATIONS ";(#A,"TO CLEAR (HCLS) A SCREEN TO THE DESIRED":#A:#A(#A,"NUMBER OF LINES, WHEN USING THE HI-RES ";(#A,"GRAPHICS SCREEN":#A:#A:#A:#A) ȇ#A,"STARTING LOCATIONS ARE ";)9҇#A,"&HE6E2,&H(XX) &HE6E3,&H(XX)":#A:#A)`܇#A,"ENDING LOCATIONS ARE ";)#A,"$HE6E7,&H(XX) &HE6E8,&H(XX)") A2 #A:#A:280)#A:#A:20)"PRINT TO SCREEN OR PRINTER";:Q$) Q$"S" A0:280*  Q$"P" A2:140*240*X320*#"*3,Y1204 2*d6#A,10)"LINE"Y;20)"&H"(&H2000(XY2));*@#A,40)"LINE"Y1;50)"&H"(&H2000(X(Y1)2))*JZZ1*TZ20 :,20)"PRESS ANY KEY TO CONTINUE";:Z0: 44539:*^*h360Q$"P" 2,THE,BED,ROOM,2,DISCOVER,THAT,SOMBODEES,BEEN,SLEEPEEN,N,MY,BED,BELLOWED,POHPUH,?,SOMBODEES,BEEN,SLEEPEEN,N,MY,BED,GRUMBAULED,MOHMUH,?,AND,SHE,IS,STILL,A SLEEP,N,MIGN,CROOD,BABEE,AAAToƆ HEARENE,BABEE,GOLDILOCKS,AWOKE,2,FIND,3,ANGRY,BARES,STARING,AT,HER,?,NEVER,HAS,ANY 1,LEFT,A,HOUSE,SO,FAST,AND,THAT,WAS,1,LITTLE,GURL,WHO,NEVER,WAS,NAUGHTY,AGAIN,?,WELLL,ALMOST,AAATІ THE,END,?,THATS,IT,KIDS,GOOD NIGHT,SLEEP,WELL,AAAD,BABEE,AAAToƆ HEARENE,BABEE,GOLDILOCKS,AWOKE,2,FIND,3,ANGRY,BARES,STARING,AT,HER,P\'0 ٽB@@;Z$  TӾVս5R׾Tӽ5NӾPս55a5}L'59/&95 ;%K9ypqrs~pqrs}~p$\ 405"y$\ ݝ9"SCREEN /NIB" !5%9o 1?@% o1?0 0@%9' &䆀1! ܎1?@$09o1?0 ~5@ˌ%9'5Öͧ٦'5Ö̪ &ֆ1! 'XXXX  TTTT 9@@%9 3,8:(194,98),8,8AW<1780:(21,129),0,8:(181,1),0,8:"BM60,80C13"BC$:(61,82),12,13AF(1,18),"Papa stormed into the parlor to find..."AP(1,19),"'Somebody's been sitting in my chair.'"AZ(1,20),"Mama said 'Somebody's been sitting in"B+d(1,21),"my chair.' Sniffling, Baby Bear wailed"B^n(1,22),"'And they broke mine all to pieces.'"BrxTM10000:1790B:PAGE 10B1:1690B"BM200,72S2"B2$:(202,71),10,8:(193,58),13,8:"S4":(21,1),0,8:1750:(21,1),5,8:(113,1),5,8:8C,(1,18),"On to the bedroom, to discover that..."C_(1,19),"'Somebody's been sleeping in my bed'"C(1,20),"bellowed Papa. 'Somebody's been sleep-"C(1,21),"ing in my bed' grumbled Mama. 'And she"C(1,22),"is still asleep in mine' crowed Baby."DTM10000:1790D:PAGE 11D-4:1690D"BM29,129U80E8H8U16E8R16F8D16G8F8D16R8E16R8E8R8U8H4U4E4R104F4D4G4D8R8F8R8F16R8U16E8H8U16E8R16F8D16G8F8D80BL16H56L16G4L80H4L16G56":(21,1),5,8Ec(160,76),4,,1,.5,.0:"BM120,76U4E4H4U16E24R12F4E4R12F24D16G4F4D4BL16U26L4H4G4L8H4G4L8H4G4L4D26":(121,76),15,8:(148,58),8,,.4:(148,58),3,2,.8:(148,58),2,2E(172,58),8,,.4:(172,58),3,2,.8:(172,58),2,2:8:(155,67)(158,69),:(165,67)(162,69),E(137,76),14,8:(30,129),10,8:(46,129),3,8F((1,18),"Hearing Baby, Goldilocks awoke to find"F]"(1,19),"three angry bears staring at her. Ne-"F,(1,20),"ver has anyone left a house so fast,"F6(1,21),"and that was one little girl who never"F@(1,22),"was naughty again...well, ALMOST!"G JTM10000:1790GT:ENDINGG$^2:1690Gth"BM85,10S5"T$:"BM145,10S5"H$:"BM205,10"E$:X8620660:(X,11),3,8:XGr"BM85,70S5"E$:"BM145,70S5"N$:"BM205,70S5"D$:X8620660:(X,71),0,8:XG|(1,20),"That's it kids! Goodnight, sleep well."HTM5000:1790H65496,0:H8(21,1)(298,129),,BFH\4:(0,144)(319,183),,BF:8:H"BM50,1"WN$:(60,1),11,8:(112,1),11,8:(60,12),5,8:(112,12),5,8H(21,56)(250,56),:(298,88),:(21,75)(276,73),:(21,104)(298,102),:(21,1),2,8Iw13:(216,70),48,,.167:(216,110),24,,.1,0,.5:(192,110)(176,94),:(168,70),:(240,110)(256,94),:(264,70),I(216,110),3,13:(184,69),3,13:J4(21,120)(48,120),:(88,104),:(88,16),:(48,1),:(48,120),:(112,1)(112,120),:(140,120),:(89,96)(111,96),:(292,120)(299,120),J"BM142,129"BD$:(143,129),10,8:(149,129),8,8:(149,124),3,8:(257,116),10,8:(257,104),4,8:(257,88),4,8:(257,84),15,8:(287,128),10,8:8K(49,2),12,8:(21,129),0,8:(298,129),0,8:(110,2),15,8:(80,60),3:(80,60),1,8:K"BM180,1"WN$:(21,96)(48,72),:(48,1),:(48,72)(298,72),:(21,1),15,8:(49,1),15,8:(190,1),11,8:(242,1),11,8:(190,12),5,8:(242,12),5,8:KSS144539: :1800L 65496,0:X&HFF00:Y&HFF7E:X1,52:X3,63:X35,60L"TX$:TX$"AAA"1870L3T1(TX$)LI&(Y)12801830Lc0Y,((TX$,T,1)):TLy:(Y)12801850LDY,13:1810LNTI1TM:TI:65497,0:M X GOLDILOCKS,AND,THE,3,BARES,RETOLD,AND,ILLUSTRATED,BY,JOHN,D,CLEM ONS,COP E RITE,9 TEEN 9 T 1,AAAMgb ONCE,UPON,ATIME,THERE,WERE,3,BARES,NAMED,POPPUH,BARE,MOHMUH,BARE,AND,BABEE,BARE,AAAN!l EACH,MORN EN,MOHMUH,BARE,MADE,PORRIDGE,HOWEVER,1,MORN EN,THE,PORRIDGE,WAS,JUST,2,HOT,SO,THE,3,BARES,DECI DED,2,TAKE,A,WALK,THROUGH,THE,WOODS,2,GIVE,THEIR,BRACKFAST,TIME,2,COOL,AAANv WHILE,THE,BARES,WERE,OUT,A,YOUNG,GURL,NAMED,GOLDILOCKS,HAPPENNED,ALONG,?,SURRPRIZED,AT,FINDING,A,CABIN,N,THE,4EST,SHE,KNOCKED,ON,THE,DOOR,AND,THEN,WENT,RITE,ON,N,?,NAUGHTY,GURL,AAAO FEEL EN,VERY,HUNGRY,GOLDILOCKS,SAT,AT,THE,TABLE,AND,BEGAN,2,EAT,BUT,POHPUHS,PORRIDGE,WAS,2,HOT,AND,MOHMUHS,WAS,2,COLD,BUT,BABEE,BARES,PORRIDGE,WAS,JUST,RITE,SO,SHE,8,IT,ALL,UP,AAAPN GOLDILOCKS,NEXT,WANDERED,HER,WAY,N2,THE,PARLOR,WHERE,SHE,TRIED,2,SIT,ON,POHPUHS,CHAIR,BUT,IT,WAS,2,HARD,AND,MOHMUHS,WAS,2,SOFT,BUT,BABEE,BARES,CHAIR,WAS,JUST,RITE,SO,SHE,SAT,AAAP AND,SAT,UNTIL,?,CRRAACK,AAA,GOLDILOCKS,WAS,JUST,2,HEV E,4,THE,LITTLE,SMALL,CHAIR,BUILT,4,A,WEE,BABEE,BARE,AAAQ COMENE,NEXT,2,THE,BED,ROOM,GOLDILOCKS,SUDDENLY,FELT,VERY,TIRED,SO,N2,POHPUH,BARES,BED,SHE,CLIMED,BUT,IT,WAS,2,LUMPY,AND,MOHMUHS,WAS,2,FRUMPY,BUT,BABEE,BARES,WAS,JUST,RITE,?,SNORE,AAAR9 ON,RETURNING,THE,3,BARES,FIND,?,SOMBODEES,BEEN,EATING,MY,PORRIDGE,GROULED,POHPUH,SOMBODEES,BEEN,EATING,MY,PORRIDGE,SAID,MOHMUH,SOMBODEE,8,ALL,MY,PORRIDGE,CRIDE,POOR,BABEE,BARE,AAAR POHPUH,STORMED,N2,THE,PARLOR,2,FIND,SOMBODEES,BEEN,SITEEN,N,MY,CHAIR,?,MOHMUH,SAID,SOMBODEES,BEEN,SITEEN,N,MY,CHAIR,SNIFFLEENG,BABEE,BARE,WAILED,AND,THEY,BROKE,MIGN,ALL,2,PEACES,AAAS ON,,80"S$:X5925950:(X,81),7,8:X/M8:(8,19),"RETOLD AND ILLUSTRATED BY"/l(13,20),"JOHN D. CLEMONS"/(11,21),"COPYRIGHT (C) 1991"/TM5000:1790/:PAGE 1/1:16900BR$"BR88U16H8L40G8D16BL32U24E8R16E16H16U24E8H8BR4E8L8D8BL4U16R8F4R48E4R8D16BL4U8L8F8BR4G8F8D24G16F16R16F8D24BL44BU64U12H12U4E8F4D8G4L4BH4L8U4H8G4D8F4R4BE4G12D12F8R16E8BG4L8H4R4U4F4R4U4H8L8G8D4R4E4D4R4G4L80"BM21,129"BR$:"BM144,129S3"BR$:"BM238,129S2"BR$:(72,40),3,8:(72,40),8,8:(90,40),3,8:(90,40),8,819(182,62),3,8:(182,62),8,8:(196,62),3,8:(196,62),8,81(263,84,8):(264,85,8):(263,85,8):(273,84,8):(272,85,8):(273,85,8)1&(21,1),11,8:(22,129),8,8:(145,129),10,8:(239,129),10,8:(84,60),13,8:(190,77),13,8:(269,94),13,82<0"BM4,153S4C0D22F8R10E8U18F2R4E4U10G8L2H8L10G8BD2BR6D18F4R6E4U18H4L6G4"2M:(5,153),0,02qD8:(5,20),"NCE UPON A TIME..."2N(6,21),"There were three bears named Papa"2X(6,22),"Bear, Mama Bear, and Baby Bear."2bTM4000:17902l:PAGE 22v12:169031710:(216,78),44,,.2,.6,.9:(216,76),1,13:SM$"H5U5E5U5H5U5E5U5H5U5":"BM200,60C4"SM$:"BM216,52"SM$:"BM232,60"SM$:83(1,18),"Each morning, Mama Bear made porridge."3(1,19),"However, one morning the porridge was"4(1,20),"just too hot. So the three bears deci-"4P(1,21),"ded to take a walk through the woods"4(1,22),"to give their breakfast time to cool."4TM9000:17904:PAGE 344:16905d"BM92,129U8L8E8H4U20E4R16F4R8H4R8U4D4R32U4D4R8G4R8E4R16F4D20G4F8L8D8BL16U8R16L24E8H8D24BL48U24G8F8L8D8U8L16":(140,72),24,,.5,0,.5:(135,57)(138,59),:(145,57)(142,59),6-"BM116,78G2L12H2U14E4H4U16E24R12F4E4R12F24D16G4F4D14G2L12H2U38L4H4G4L8H4G4L8H4G4L4D38":(140,64),16,,.5,0,.5:(124,64)(156,64),:(128,48),8,,.4:(128,48),3,2,.8:(152,48),8,,.4:(152,48),3,2,.86(128,48),2,2:(152,48),2,2:(117,129),6,8:(93,129),14,8:(173,129),14,8:(140,78),14,8:(125,82),14,8:(155,82),14,8:(103,79),15,87bTR$"E16L8E16L8E16F16L8F16L8F16":(21,96)(88,96),:(192,96)(298,96),:"BM196,95S3"TR$:"BM246,95S3"TR$:"BM21,95S4"TR$:(22,95),5,8:(197,95),5,8:(247,95),5,87(21,1),11,8:(21,129),0,8:(298,129),0,8:(109,129),0,8:(110,114),0,8:(165,129),0,8:(165,114),0,8:88 (1,18),"While the bears were out, a young girl"88(1,19),"named Goldilocks happened along. Sur-"8l (1,20),"prised at finding a cabin in the for-"8*(1,21),"est, she knocked on the door and then"84(1,22),"went right on in. Naughty girl..."8>TM9000:17908H:PAGE 48R12:16909?\1710:10:"BM208,77"SP$:(210,76),1,10:(266,40),1,10:89tf(1,18),"Feeling very hungry, Goldilocks sat at"9p(1,19),"the table and began to eat. But Papa's"9z(1,20),"porridge was too hot! And Mama's was":(1,21),"too cold! But Baby Bear's porridge was":D(1,22),"just right! So, she ate it all up...":WTM9500:1790:d:PAGE 5:r0:1690:}1780;13:"BM66,104H3U74E3R2F3D9E16G3U9E3R2F3D45R29F3D2G3D16G3L2H3U9G12D16G3L2H3U16L22D16G3L2BU28BR6U12BU8U12E16G2D12E2G16BD8E16G2D12G14":(67,103),12,13:8;M(1,18),"Goldilocks next wandered her way into";(1,19),"the parlor, where she tried to sit on";(1,20),"Papa's chair, but it was too hard! And";(1,21),"Mama's was too soft! But Baby Bear's"<(1,22),"chair was just right! So, she sat..."(1,18),"Coming next to the bedroom, Goldilocks">C(1,19),"suddenly felt very tired. So into Papa">x(1,20),"Bear's bed she climbed. But it was too">(1,21),"lumpy, and Mama's was too frumpy. But">(1,22),"Baby Bear's was just right...SNORE!!!">TM10400:1790?:PAGE 8?1:1690?8:"BM192,55"B2$:(193,55),10,8:(177,30),13,8:(194,24),8,8:(21,1),12,8:1710:10:"BM208,77"SP$:(210,76),1,10:(266,40),1,10:8?(1,18),"On returning, the three bears find..."@(1,19),"'Somebody's been eating my porridge'"@6(1,20),"growled Papa. 'Somebody's been eating"@j(1,21),"my porridge' said Mama. 'Somebody ate"@ (1,22),"all my porridge' cried poor Baby Bear."@TM9000:1790@:PAGE 9@(1:1690A2"BM192,129"B2$:(193,129),10,8:(177,104),1&:LISTING 7&M :FACE BY CHARLES L GIBSON HI-RES TEXT GRAPHICS 3-15-88&[40:0,63&y: 80:X(10):Y(10)&(12,15:"WHAT IS "X"+"Y;&2 R&< R(XY) 140:160&F: 30'P:A4425574425772:A,7::B44263744335780:B,5::C4434374434572:C,5:':ZD44265744345580:D,5:'FdX119'TnE:E,3:'x442721,442723,442731,442733,442801,442803,442811,442813,443123,443125,443127,443129,443131,442875,442955,443035,442899,442979,443059'(>442721,32:442723,32:442801,32:442803,32:442721,64:442723,64:443041,6:443053,6(6,15:2,0,B:" CORRECT ":"T3;CDEFG":P11000::2,0:(442721,32:442723,32:442731,32:442733,32:443201,6:443213,6:442722,92:442730,47)!6,15:2,0,B:" WRONG ":"T3;GFEDC": P11000::2,0:)?R0:I442369 444289 2)QA(I):RR1)mAA 127:A95 AA64)}҇#2,(A);)܅ R39 #2:R0)2:442731,32:442733,32:443201,6:443213,6:442722,92:442730,47)!6,15:2,0,B:" WRONG .&$ :<<<<<<<<<<<<<<>>>>>>>>>>>>>>&G:< GOLDILOCKS AND >&j:< THE THREE BEARS! >&(:< RETOLD AND ILLUSTRATED >&2:< BY JOHN D. CLEMONS >&<:< COPYRIGHT (C) 1991 >&F:<<<<<<<<<<<<<<>>>>>>>>>>>>>>&P500'Z1680:65497,0:40:5'<d0,4:14,10:"RGB OR CMP? "'Mn26,10:" ";'xxCH$:CH$""120 :CH$;:CH$""120'CH$"R"140 :CH$"C"150 :110':1,53:5,16:9,63:10,34:11,31:12,56:13,0:14,60:15,54:160(':0,33:5,18:9,63:10,4:11,43:12,32:13,0:14,54:15,52(M7,14:"S/S PAK INSTALLED (Y/N)?"(^31,14:" ";(}CH$:CH$""180 :CH$;(CH$"Y"SS0:CH$"N"SS1:170)WN$"D36R96U36BL8D28L36U28BL8D28L36U28BD9E6F6E6F6E6F6BR8E6F6E6F6E6F6":SP$"E40R16F8L16E8G40L16":B2$"E10H2L10H2R4U2L8H8U4E2F4D4H2G2H2U4E2R14F8D10U10H8E2F2G2H2E5F5G5H5E6R12G2E5R4F4D4G4BH2E2U2H2L2G2F4BF2E2F4D16G2F2D6L32"*BD$"H2U68E2H2U4E2R4F2D4G2F2D68G2E2R108U52E2R10F4G8L8D4R26F2D12G2L26D12R28U58E2H2U4E2R4F2D4G2F2D68G2L4H2U46H8G4H4L10G2H2L18D52U52L48G14L26"*nBC$"R8U12F4E4D12R24G8F4G4F8G8L8D8H8BU16L4R4H24L3G2D3F29BD8G8U8L4G12U8L4E12L8U8L8E12"+T$"R24D8L8D32L8U32L8U8":H$"R8D16R8U16R8D40L8U16L8D16L8U40":R$"R16F8D8G4F4D16L8U12H4L4D16L8U40BF8R4F4G4L4U8":E$"R24D8L16D8R8D8L8D8R16D8L24U40"+B$"R16F8D8G4F4D8G8L16U40BF8R4F4G4L4U8BD16R4F4G4L4U8":A$"BR8R8F8D32L8U16L8D16L8U32E8BD12E4F4D4L8U4":S$"R24D8L16D8R16D24L24U8R16U8L16U24"+N$"R8F8U8R8D40L8H8D8L8U40":D$"R16F8D24G8L16U40BF8R4F4D16G4L4U24"+2:&HFF9A,63:4,:DESIGN SCREEN, 8:(20,0)(299,130),,B,A""BM6,136C2G6R319H6G3L301H3",b,"BM6,191C2H6R319G6H3L301G3",6(6,138),2,2:(6,189),2,2,@3:"BM8,0G8D12F14D62G14D12F8E8U4H4G2F3D2G5H5U10E14U64H14U10E5F5D2G3F2E4U4H8-"J"BM311,0F8D12G14D62F14D12G8H8U4E4F2G3D2F5E5U10H14U64E14U10H5G5D2F3G2H4U4E8"-:T"BM6,46D38H4U30E4"-T^"BM313,46D38E4U30H4"-nh(3,40),3:(316,40),3-r(3,90),3:(316,90),3-|(8,2),3,3:(3,40),3,3:(3,90),3,3:(5,48),3,3-(311,2),3,3:(316,40),3,3:(316,90),3,3:(314,48),3,3.:TITLE PAGE.15:1690.P(11,1),"G O L D I L O C K S":(14,2),"A N D T H E"."BM47,30"T$:"BM97,30"H$:"BM147,30"R$:"BM197,30"E$:"BM247,30"E$:X4824850:(X,31),5,8:X/""BM47,80"B$:"BM97,80"E$:"BM147,80"A$:"BM197,80"R$:"BM247 T&E ::TWOLABEL-TWO ACROSS LABEL PRINTER BY CHARLES GIBSON 3-18-92&e:150,18:40:6,0:8,63:3&" TWO LABEL PRINTER":" by Charles L. Gibson"&(" BAUD RATE 2400":" SET PRINTER ON LINE":" PRESS ENTER": 44539'!2:" NVELOPE LABEL HIPPING LABEL"'7RINT DIT ANCEL UIT"(F$: F$""180) F$"P"200 : F$"E" 300 : F$"Q" 720 : F$"C" 50 :160)IC0::"HOW MANY DOUBLE LABELS? (9 PER RAGE)";B)]҇" PRINTING")h܁ 340)#2,A$;40);". ";A$)#2,B$;40);". ";B$)#2,C$;40);". ";C$)#2,D$;40)". ";D$)#2,E$;40);". ";E$)340*"CC1: CB 220*B, 160:"6-CONTINUE"::"WHAT LINE TO EDIT? (1 TO 6)";:A*W6 A1 A6 300*y@ A 100,110,120,130,140,150*J300*T Z1 75:#2,Z);".";: Z:#2*^*h:" SHIPPING LABEL":*r"FROM":+|390:400:410:420:430: 440+"COMPANY-";: J$:+@"PERSON,APARTMENT-";: K$:+Y"ADDRESS-";: L$:+y"CITY,STATE,ZIP-";: M$:+"COUNTRY-";: N$:+:"TO-":: 100: 110: 120: 130: 140+ 460:470,B̞:"1-FROM-";J$:"2-";K$:"3-";L$:"4-";M$:"5-";N$::"6-TO-";A$:"7-";B$:"8-";C$:"9-";D$:"10-";E$:,lև:"

RINT DIT ANCEL UIT",F$: F$"" 480, F$"P" 500 : F$"E" 650 : F$"Q" 720 : F$"C" 50 : 460-C0::" HOW MANY DOUBLE SHIPPING LABELS?":" ( 5 PER PAGE )";B-." PRINTING"-9 340-R#2,J$;40);". ";J$-k#2,K$;40);". ";K$-,L$;40);". ";L$-0#2,M$;40);". ";M$-:#2,N$;40);". ";N$-D#2,2);"TO-";A$;40);". ";"TO-";A$.N#2," ";B$;40);". ";B$.-X#2," ";C$;40);". ";C$.Sb#2," ";D$;40);". ";D$.yl#2," ";E$;40);". ";E$.v340.CC1:CB 520. 460."11- CONTINUE":."WHAT LINE TO EDIT ? (1 TO 11)";A. A1 A11 650/- A 390,400,410,420,430,100,110,120,130,140,710/7650/GƁ460:470/S:32:l#2," ";E$;40);". ";E$.v340.CC1:CB 520. 460."11- CONTINUE":."WHAT LINE TO EDIT ? (1 TO 11)";A. A1 A11 650/- AU& :***** SLINKY *****&2:SLINKY ELLIPSES&I:BY NORMAN BARSON&](:7 RIDGE COURT&|2:EAST BRUNSWICK, NJ 08816&<:C 1992 ALL RIGHTS RESERVED&F X(30),Y(30),R(30),H(30)&P'(Z0,63:1,9:2,60:3,16:4,4:5,40:6,48:7,24:8,31:9,32:10,47:11,52:12,57:13,58:14,46:15,0'6d 900'@n500'HxC0'WZZ()'rCL(14): CL0 140' CL,0:2'C0'X10:Y10:R10:H10'X124(272):Y124(142)'R19(71):H1(1(39))10(% (X1R1)15 (X1R1)305 (Y1R1H1)15 (Y1R1H1)176 160(EX224(272):Y224(142)(fR29(71):H2(1(39))10(҅ (X2R2)15 (X2R2)305 (Y2R2H2)15 (Y2R2H2)176 190(XOX1:YOY1:ROR1:HOH1(恦240:330(DX(X2X1)31:DY(Y2Y1)31)DR(R2R1)31:DH(H2H1)31)-(X1,Y1),R1,CL,H1)9I130)WX(I)X1IDX:Y(I)Y1IDY)u"R(I)R1IDR:H(I)H1IDH),(X(I),Y(I)),R(I),CL,H(I))6)@CC1:)JX1X2:Y1Y2:R1R2:H1H2)TX224(272):Y224(142)*^R29(71):H2(1(39))10*hCL(14): CL0 360*^r(X2R2)15 (X2R2)305 (Y2R2H2)15 (Y2R2H2)176 340*h|240*} C4 395 :330*CL(14): CL0 395*X1X2:Y1Y2:R1R2:H1H2*X2XO:Y2YO:R2RO:H2HO*240*T11500::120* 7,0:2+X120:Y120:R15:H11:CL8+8X2160:Y275:R280:H2.2+B240+QCL0:240+f&(X2,Y2),R2,8,H2+010,0:(12,9),"SLINKY ELLIPSES"+:7,0:(19,12),"by"+DX1300:Y1172:R15:H11:CL14+NX2160:Y2133:R280:H2.2+X240+bCL0:240,l(X2,Y2),R2,14,H2,2v1,0:(13,16),"Norman Barson",BT11500:,L130,T:(X2,Y2),R2,8,H2+010,0:(12,9),"SLINKY ELLIPSES"+:7,0:(19,12),"by"+DX1300:Y1172:R15:H11:CL14+NX2160:Y2133:R280:H2.2+X240+bCL0:240,ll& :***** TINYDIR *****&4:BY NORMAN BARSON&H:7 RIDGE COURT&g(:EAST BRUNSWICK, NJ 08816&2:BASED ON ONE-LINER BY MICHAEL R. PATRICK RAINBOW APR. '85, P.212&<32:&F((65314) 1)1 "TURN ON PRINTER'P150,1 :SETS BAUD RATE AT 9600'RZ#2,(27)(108)(5) :SETS LEFT MARGIN AT 5'd#2,(27)(83)(0) :SETS SUPERSCRIPT'n#2,(27)(15); :SETS CONDENSED PRINT'x#2,(27) "A" (6); :SETS LINE SPACING TO 6/72 INCH(@129,"INSERT DISK YOU WANT PRINTED.(Q"DISK NAME";NA$:"DRIVE NO.:";DR:#2,NA$:111,254:(DR)(k#2," FREE:";(DR):SETS SUPERSCRIPT'n#2,(27)(15); :SETS CONDENSED PRINT'x#2,(27) "A" (6); :SETS LINE SPACING TO 6/72 INCH(@129,"INSERT DI '()*-.67:;<=>?@ABCBOOT BAS CCTOOLS BIN9COCODE BAS2COLORS BAS%DOLLY BAS"DOLLY BIN#MDRIVER BIN DTOOLS SETDUNNY BAS0DUNNY NIB,EXAMPLE BIN?FACE BASHCLSINFOBASLABEL BAS-MENU BAS3NEBULA BAS4NIBLOADRBIN`OLDMILL BAS+OLDMILL NIB&sOUR HOMEBAS OUR HOMENIB5PALINTCPBAS1PROTECT BAS8RAMBASE BAS WSLINKY BAS XSPRITE+ BAS,THRBEARSBASTINYDIR BAS!oTITLESCRBAS$TRANSLATPAT/TWOLABELBASW&c :LOADER FOR MUSIC3+ FROM G. QUELLHORST PROG. RAINBOW 4/91P10 RENDITION OF "DOLLY"BY C.GIBSON&:"TURN THE VOLUME UP SOME ":" LISTEN TO DOLLY":M"DOLLY.BIN"&65497,0:&(65496,0&2:" THANKS FOR LISTENING"CM !#$%'()*+-./01233455677788888888888776665543321100/..-,,++**))(('''&&&&&&&&&&&&&&&&&'''''((((())))))))))))))(((('''&&%%$$##""!!   7J^r +Lo?qV(v!J/ 0 P C s_X`w&+ "$&)@+.M1L?#P0jßƟɟ0991PϦѦӦ՟9LëLƩLɩL̷ 1& ' Ǧ 9u&O9 RN**RN**RN*RN*RL(RL((RJ(RJ(RJ&RJ&N&TH&TH$N$ RJH@ J@:@, ( " ( , :@,@,@:@@@@2@2 :2( 2, :2 @: D D:2 D D2 :2" 2, :2 @:2 H@ J@ H@ J@ H> J> N>N>J> @ @<2 @ @ <0 > @ B D D<6 D$ D6 <6, 60 <6 D< F F<6 F F. <6$ 6. <6. D< RD<2 ND< RD< ND< R@0$ N0$ H0$ @0$ " D@2 D@2 H>2 @<0 : <$ > @ @:2 @" @2 :2( 2, :2 @: D D:2 D D, :2" 2, :2, @:2 N<.( J<.( N:. J:. N<.( J<.( N:. J:. D$ D$ D<6 D@:" HD< HB: H8 H<  J@: J@: D:2 @60" @60 :0( @60J@:J@:J@:J@: D:2 @60" @60 :0( @60RNRNRNRLRLR>*>*NJ>*>*TH>*>* @RNRNRNRLRLR>*>*NJ>*>*TH>*>* @RNBRNBRNBRL@RL@RJ> NJ>>TH< RH<J@:J@: J@:J@:2J@:J@: J@: bXR NNJ>*>*TH>*>* @RNRNRNRLRLR>*>*NJ>*>*TH>*>* @RNBRNBRNBRL@RL@RJ> NJ>>& 390&5: TITLESCR DEMO OF TITLE SCREEN&X:BY CHARLES L. GIBSON 3-20-92&j(: 0,63: 40&2 1,2:"THIS IS A DEMONSTRATION OF USING LPOKE IN THE UNEVEN LOCATIONS ON THE FORTY WIDE SCREEN TO ADD COLOR TO TITLES."'< T1 700: T:',F 5,8:"SAMPLE TITLE OF YOUR PROGRAM"'LP10,12:"WRITTEN BY AUTHOR"'dZ15,15:"(C) DATE "'d9,18:"A test of Your Skill"'n1,2:"ADD AN UNDERLINE": T1300: T'x A443019 443073 2'B64:THIS IS AN UNDERLINE( A,B: T160:A( T1 300: T(F1,2:"HIGHLITE THE AUTHOR": T 1 400: T(b A443267 443303 2(B6:SPECIFY COLOR OF BOX(A,B: T110: T: A(Ȁ A443427 443463 2(A,B: T120:T: A( 443347,B: 443383,B)'1,2:"CALL ATTENTION TO THE OBJECT OF THE PROGRAM"); T1 400: T)W A443827 443865 2)qB7::HIGHLITE ORANGE)A,B: T1 20: T:A)D443992:C60)"A444040:B444042),A,C:BB2)6BD 330 : AA2)@ B,32: 300* JDD2:A444040:B444042: C: C0 350 : *RT80,114,101,115,115,32,66,114,101,97,107,62,0*n^ A444073 444097 2*hB248::BLINKING UNDERLINE*rA,B: T1 20:T:A*| 380*1::B2)6BD 330 : AA2)@ B,32: 300* JDD2:A444&:LISTING 6& :COLORS&LA1:40:: 6,5:"PRESS UP OR DOWN ARROW"&c442479,A:6,3: A&z(B$: B$"" 40&2 B$(94) AA1 : B$(10) AA1 : 40&< A0 A0 : A255 A255&F 30P30&i fF M M ttttttMGJԽMGBGJt$tMMGBGJt$tt$tt$tt$tt$tt$tt$tt$tt$tt$tt$tt$tt$tԽGABAGMGABAGMGABAGMGABAGMGABABGMKGABABGMGABGMGABGMGABGMGABAGMGABAGMGBAGMGBAGt{t$}GGBAGt{t$}GGBAMGGBABAt{t$$GGABABAt{t$$GGABABAGGABABABAt{t$$$GGABABABG{t$$${tGABABABt{t$$$'GABABAB{t$$$t$$t$$BGABABA$t$$BGABABA$t$BGABA$GABA$$t$N$tt$@$t$N$$$t$BGNt$$tt$BGN BABAGBA$tBABAGBA$tGBABAGBA$tBABAGBGBA$t4t~GBABABA$t4$t~t$$$GCGCBGGBABABA$t4t4$t$$$BGCGCBGBG BABABA$t4t4$t$tBABABABABGCGCBAGBGBABABABABGCGCBAGBGBABABABABGCGCBAGBGt$$$$$t4t4$t$t~GBABABABACABGCGBAGBAGBABABABACBABGCGBAGBAGBABABABACBABGCGBAGBAGBABABABACBABGCGBAGBAGt$$$$4$$t4t$t$t$$$$$4$$t4t$t$t$$$$$4$$t4t$t$tBABABABABCBABGCGBAGBGt$$$$$4$t4$tt$t$$$$$4$$t4$tt$tt$$$$$4$$t4$tt$tt$$$$$4$$t4$tt$tt~t$$$$$4$$t4$tt$tt~ t$$$$4$$t4$tt$tt$$$$$4$$t4$ttt$$$$4$$t4$ttt$$$$4$$t4ttt$$$$4$t4$t$tt~BABABCBABGCBGBGAGGABABABCBABGCBGBGBGABABABCBABGCBGBGBGBABABCBABGCBGBGBGBABACBABGCGCBGBGBGt$$$4$$t4t4t$t$t~t$$$4$$t4t4tt$t$$4$$t4t4ttt$t$$4$$t4t4tt$t$$4$t4tt$t$$4$$t4tt$t~t$$4$$t4tt$t~GBABCBABGCGBAGB$$4$$t4t$t$$$4$$t4t$t$$$$$4$t4t$t$t$$$$$4$t4t$t$$$$$t4t$t$$$$$t4t$$$$$t4t$$$$$t4t$$$$$t4t$$$$$t4t$$$$$t4t$$$$$t4t$$$$$t4t$$$$$t4tt$$$$$t4t$t$$$$t4t$t$t$$$$$t4t$t$t$$$$$t4t$t$t$t$$$$$t4t4$t$t$t$$$$t4t4$t$t$t$$$$t4t4t$t$$$+$$t4t4ttt$$$+KBGCGCGNGKGABABABK$t4t4tGKt$$$$t4t4ttGBKABABK$t4t4tt伴t$+$$GCGNGN GL+KBABLGCGNGN GLKBK+$+$t4tttĴBBBLKGGCGCNGN tL+B$+K{t;4t4t{GK$Ĵ$+K{CCGCNGNGLBL$K;4K{t;4tKt$+$Ĵ$ĴBKB$+K$+KB$+$K+$BNKLBNL+KBNLBKNL|+K{K+$KL|K䴼|{N |{KNLǼKL|{ĴL|{ | N KǼ Ǽ|K|KϿ| ϼ|N ϼǼ KϿ||K|NL|NL0 !m  "@6<  $@`x  Il`(/ *@0IPH0@ ^B ` `S(`MfF 0  `7<P i`  ٛ`*P fo&<T(L` @6 ?@e0T@Al H@ 3Q0`` )` Z+@I!L<P& I*p0L AU3Pp@HEP@g (H @ $ `H @@@@D @ @@ PB@0 1@@bbPHŒhBR@ Ċ0P *   @ @B f" V@*JP3A  @ @@ 6a @@@ 6a`Q @fa00" f)D 0J @0 @@!f@@ @a3H a$P"g  H@ gN`  (@@HgC0)  7ca@ 70@( 7L@ 0@A@!f ( 2# 3P@P " K!` aC  `P  00l€T@@0Gl H(!#lP@cD0$P@ @0 E` @03 @` 0@"@` 0€P+(  7% 0 D" `H &0`"P0 0q` "  `01`HP0`0aaP0`ai0@1ˁ@"a `c@` C6$`@@   `@b0( @ a q` @ @H0`H@d D (D@@  `1F 0D(!  2@ @AЁ D @$H0(CAB @ ` #"0h A 6A0Z%XC0#0Y$^^ D PQ!^&$0(PK B^L01@IiA@< ^@05~@`<)A@$@$(<R Y <@R H ٝ<C<    ͔<CB0(%A@ <0R,&A 0h<(PJ &YlP0t74( d!l&f`0 "$( Dl& &0<dc62 l%H `̀0K1AA z H  7@(2%@@ \vP . aud5K ! B `D9``1<а$ 2@*\0))X3Uaa: ) 4Q2}B3 *lf`I @B!m 00c L9e1c.($@!5Slf#3:6jyX".؀3 L1@9a4  `xH ɿŀd?N|fL@83,# G Chk % (y[,Og&:uS 4dVh%3vZm iBL` 1 QïB@i네3>,iyEh:F@zdx^M '`a" TveI `7 AF" *ݧ  drl0Q83sS$ 03Vy{6!0c T{?2@$ @ 79`N;̽ O " ܺ5}0$Pj:RI<6B3vnX$Q( 4!F:p{(^YF$@S\1E f)@,]b 6XcP) ^;XSB( @ 0 $\\vS90C`(0` - ?¢(6qUO>4`PfQX@H]ԥ0 85%`P@h` P%`XHhIOm @h ]W)`"| Bl#CP`h 0]^3 yH }@P35DAP B# DJ1C>f*@ U͆c 8  J@21 67z0[xPASg_?Eӭ3nw7wctu z@ 4t1НA v9c=x;GGͼz{c69?d7n/˽lb~?qǶö56=mZnf f]=mvƷ:l4=l15Ŷ&,d^GfE=2k 6 [`țnك"jcvi4כ^f4Mvdf2LMK6] ETφ2M (cdMV4 U,bnu)n"k2M@ȴeAAk adD &8Ʒl5fsaP a3h oԀfj@fԀ͆j͆f/faL`0@?L 5@ pP p ^_cF>a͏f ߟ8o`33p p}`=`=l=== }}}O3~~~lx7Î? 8=q`|x8y`ـoa7????oow??goO~_?????~}?wM?7&4"''5$$3" V0v_gfF?~}?&': ******************************&M : * NIBLOADER *&s: * BY *&: * RICK COOPER *&(: * (C) 1990 *&2: * *' <: * DISTRIBUTED BY *'1F: * RICK'S COMPUTER ENTERPRISE *'WP: * P.O. BOX 276 *'}Z: * LIBERTY, KY. 42539 *'d:******************************'n8'x32'0'M"NIBLOADR' (&HCFC3)&H8D &HE76,&HCE: &HE77,&HE7(F1$"OLDMILL "(L2&HE92(1 X0 (F1$)1(L L2,((F1$,X1,1))(XL2L21(`ҋ X(gܞ0( @35,"COCO FRIENDS DISK MAGAZINE";( @107,"PRESENTS";( @168,(255);" ";F1$;" ";(255);( @238,"BY";( @296,"JOHN D CLEMONS";) &HE6E4,&HE6)" &HF00)#,2)*64)<@ "" 320)EJ:0)WTF1$"OLDMILL")w^ @139,(255);F1$;(255);)h @207,"BY";)r @264,"JOHN D CLEMONS";)|168,(255);" ";F1$;" ";(255);( @238,"BY";( @296,"JOHN D CLEMONS";&$:*=*=*=*=*=*=*=*=*=*=*=*=*=*'&G: SPRITE+ '&j:written by: Bradley Swanson'&: Copyright (C) 1992 '&:*=*=*=*=*=*=*=*=*=*=*=*=*=*'&2:40& 108& 161'111: 59078,33: 65497,0: PX(52,39),P(15):15,63:14,0:15,14:14:(0,0)(262,197),,B:1,25:2,25:(210,10)(210,14),:(208,12)(212,12),:(208,10)(212,14),1' (208,10)(212,14),,BF:(208,10)(212,14),2:10:16' (264,0)(319,127),,BF' PS0 15( PS:(304,PS8)(319,PS87),,BF:15,14(7 PS10 (37,PS),(PS48)(W PS9 (37,PS),(PS55)(Q(&HFFB0PS)64:(33,PS),Q:PS:(X1:Y1:XX5:YY5:HX1:HY1:A266:B147:(X,Y)(XX,YY),1,:(33,16)," FOR":(34,17),"INFO"(C1 52(D1 39)#PX(C,D)14:(AC1,BD1,PX(C,D)))- D,C)8151,2)LA$:A$""22)_A$(94) 37)rA$(10) 38)A$(9) 39)A$(8) 40) (A$)47 (A$)58 41) (A$)64 (A$)71 41)A$"P" 42)A$"?" 87*A$"!" 98* A$"=" 58*'!A$"%" 106*7"A$"-" 73*H#A$"#" 120*Q$22*% Y51 22 : 109:YY5:YYYY5:HYHY1:110:22*& YY5196 22 : 109:YY5:YYYY5:HYHY1:110:22+' XX5261 22 : 109:XX5:XXXX5:HXHX1:110:22+?( X51 22 : 109:XX5:XXXX5:HXHX1:110:22+)V("&H"A$):PX(HX,HY)V: V:(X,Y)(XX,YY),,BF:(X,Y)(XX,YY),2:(AHX1,BHY1,PX(HX,HY)):22+*150,1++A$:A$""43+, (A$)47 (A$)58 47,- (A$)64 (A$)71 47,.43,?/V("&H"A$):135,1:FF&HFFB0V:C(FF)64,S0A$:A$""48,f1A$(10) 55,y2A$(13) 57,3A$(94) 53,448,5CC1: C63 C0,6 FF,C64:48,7CC1: C0 C63,8 FF,C64:48,9176,1:10:22-p:C1:100,2:40:112::"ENTER NAME OR DISCRIPTION OF THIS PIC. OR PRESS TO RETURN TO EDITOR. >";N$-; N$"" 111:22-<:"READY PRINTER AND PRESS ANY KEY TO START":44539::"WORKING...":200,2: 65496,0:#2,N$-=P$"".>E1 52.?VPX(E,C).)@ P(V)1 V32:66.FA V10 VV48 : VV55.ZBP$P$(V): E.}C#2,P$:CC1: C40 68 : 61.DPS0 15.E P(PS)1 PS.FP$"PALETTE"(PS)" IS"(((&HFFB0PS)64)).G#2,P$: PS/H111: 65497,0:22/IC1:99,2:: 65496,0/0J40::112::80/K"PRESS TO RETURN TO EDITOR OR ANYTHING ELSE TO SEE PRINTOUT ON SCREEN."/LA$:A$""76/M A$(13) 111:22/N/OP$""/PE1 52/QVPX(E,C)/R P(V)1 V32:840S V10 VV48 : VV550+TP$P$(V): E0KU P$:CC1: C40 86 : 790V:"PRESS ANY KEY TO RETURN TO THE EDITOR.";: 65497,0:44539:111:220W100,1:401X"<#>......SAVE/LOAD MENU"::"......USED TO MOVE CURSOR AROUND BIG PICTURE"1Y:"<0-9,A-F>......SET PIXEL AT CURRENT CURSOR POSITION THE COLOR OF THE KEY YOU PRESSED":2Z"P,n,UP/DOWN,....CHANGE COLOR OF A PALETTE. n IS THE PALETTE YOU WANT TO CHANGE, UP/DOWN TO SELECT COLOR, "3@[" TO ACCEPT COLOR"::"<=>......PRINT PICTURE ON PRINTER"::"<->......PRINT PICTURE ON SCREEN":::" -PRESS ANY KEY TO SEE NEXT SCREEN-";:44539:3\"....PAUSE PROGRAM, PRESS ANY KEY TO CONTINUE"4S]:"......CLEARS BOTH LARGE AND SMALL PICTURES.RESPOND 'YES' IF YOU WANT TO ERASE, ANYTHING ELSE TO NOT ERASE. THERE IS NO WAY TO RECOVER PICTURES."4^:"<%>......QUIT/RETURN TO BASIC. RESPOND 'YES' TO QUIT."5B_:"HINT---PALETTES 14 & 15 ARE USED BY THE PROGRAM FOR PRINTNG INFO IN THE EDITOR.PALETTE 0 & 8 ARE USED FOR PRINTING INFO ON TEXT SCREEN."5`:"HINT---USE THE SPACE BAR WHEN YOU NEED TO 'PRESS ANY KEY TO CONTINUE'. IF YOU DON'T, YOU MIGHT EXECUTE A COMMAND RIGHT AFTER YOU RETURN"6,a:" -PRESS ANY KEY TO RETURN TO EDITOR-":44539:111:226b189,4:40:"ARE YOU SURE YOU WANT TO ERASE (BOTH THELARGE AND SMALL PICTURES ARE CLEARED)? >";AN$6c AN$"YES" 111: 226d:1116eC1 526fD1 397gPX(C,D)14:(AC1,BD1,PX(C,D))7 h D,C7Ui15,14:(1,1)(261,196),,BF:(0,0)(262,197),,B:110:132,2:227j189,4:40:"ARE YOU SURE YOU WANT TO QUIT? >";AN$7kAN$"YES" 65496,0:: : 111:227l111:227m(X,Y)(XX,YY),2,:8n(X,Y)(XX,YY),2:(X,Y)(XX,YY),1,:8Do 2: &HFF98,128: &HFF99,62: &HE7BA,201:8]pQ0 15:P(Q)0: Q8q:"PRESS THE NUMBER OF THE PALETTE YOU WANTIGNORED ON PRINTOUT AND PRESS WHEN DONE."8rA$:A$""1148sA$(13) 9tP(A$):P47 P58 1199uP64 P71 1199(v1139NwQ("&H"A$):P(Q)1:210,2:113:x 65496,0:40::"1.LOAD FROM DISK":"2.SAVE TO DISK":"3.UPLOAD FROM TAPE TO DISK SYSTEM":"4.DIRECTORY":"5.LOAD FROM TAPE":"6.SAVE TO TAPE":"7.RETURN TO EDITOR":"PRESS THE NUMBER OF YOUR CHOICE":0yA$:A$""121:NzV(A$): V0 V7 120:u{ V 124,139,160,148,149,150,159:|162:163:P3584:"WORKING...":}M N$:~C1 52:D1 39:PX(C,D)(P):PP1: D,C:PS0 15; &HFFB0PS,(P):PP1; PS;%111:10;3C1 52;AD1 39; PX(C,D):(C54,D54)(C51,D51),,BF:(AC1,BD1,PX(C,D)); D,C;X1:Y1:XX5:YY5:HX1:HY1: 65497,0:110:163,2:22;162:P3584:"WORKING...";C1 52< D1 39< P,PX(C,D):PP1<) D,C<8PS0 15163:M N$,2048:P3584:126>z111,0:40:"ERROR NUMBER";;"HAS OCCURED IN LINE";:"PRESS ANY KEY TO CONTINUE":44539:111:22>:"ENTER DRIVE NUMBER (0-3)";D: D0 D3 162 : D::>:"ENTER FILENAME";N$::5497,0:111:22>163:M N$, 20 WIDTH 40:CLS5:CLEAR500:PRINT" CoCo Max III Picture File Converter and B+W to Color Translator":PRINT" (C) 1987 by Colorware":PRINT" Written by Dave Stampe" 25 POKE&HFFB0,&H3F:POKE&HFFBF,0 70 A=USR0(9):STOP 80 CLEAR1000,&H7800:ZZ=65456:DIM PS(15),PA(15),DN$(22):FOR A=0 TO 15:PA(A)=PEEK(ZZ):PA(A)=PA(A)-64:PS(A)=PA(A):ZZ=ZZ+1:NEXT 100 'DATA 63,51,40,38,45,33,43,32,16,20,8,6,13,14,11,0 130 DEFUSR0=&H7800:ON BRK GOTO 70 150 A=USR0(9):HSCREEN0:WIDTH40:ONBRK GOTO 70 180 IF X AND &HC0 THEN INPUT" This is a double 200 GOSUB 1400:HSCREEN0 205 GOSUB 1000:PALETTE0,0:CLS0:ATTR2,4:INPUT" Enter:0) to save as black and white or:1) to convert artifacted colors into true color";AC 220 GOSUB 1500:GOSUB 1300:OPEN"O",#1,M$+"/CM3":ON ERR GOTO 60:ON BRK GOTO 70:HSCREEN2:A=USR0(OP):CLOSE:A=USR0(9):HSCREEN0:GOTO 160 1010 PRINT:PRINT" Enter:0) to convert a B&W picture already in memory or:1) to load a PMODE4 file 1030 PRINT:PRINT" Insert the disk containing the PMODE4 files that you wish to convert, then select the type: 1055 GOSUB2000 1060 IF TF THEN EX$="BIN" ELSE EX$=VV$ 1080 WIDTH 32:PALETTE8,63:PALETTE9,0:PMODE4,1:SCREEN1,1:LOADM N$:FOR A=0 TO 2000:NEXT 1090 WIDTH 40 1095 RETURN 1210 PP$=MID$(X$,9,3):N$=LEFT$(X$,8):DN$(DC)=X$:PRINT" "RIGHT$(" "+STR$(DC),2)" "N$;PP$ 1220 DC=DC+1:IF DC>22 THEN 1240 1240 IF DC=1 THEN PRINT" No files of that type on this disk":GOTO 160 1250 PRINT"Enter the number of the file to load";:INPUT DN 1255 ' 1270 N$=LEFT$(DN$(DN),8)+"/"+RIGHT$(DN$(DN),3) 1280 RETURN 2000 PRINT:INPUT" Enter the EXTENSION";VV$ 2010 RETURN 1240 IF DC=1 THEN PRINT" No files of that type on this disk":GOTO 160 1250 PRINT"Enter the number of the &': ******************************&M : * NIBLOADER *&s: * BY *&: * RICK COOPER *&(: * (C) 1990 *&2: * *' <: * DISTRIBUTED BY *'1F: * RICK'S COMPUTER ENTERPRISE *'WP: * P.O. BOX 276 *'}Z: * LIBERTY, KY. 42539 *'d:******************************'n8'x32'0'M"NIBLOADR' (&HCFC3)&H8D &HE76,&HCE: &HE77,&HE7(F1$"DUNNY "(L2&HE92(1 X0 (F1$)1(L L2,((F1$,X1,1))(XL2L21(`ҋ X(gܞ0( @35,"COCO FRIENDS DISK MAGAZINE";( @107,"PRESENTS";( @168,(255);" ";F1$;" ";(255);( @237,"BY";( @296,"COLIN NORTH ";)  &HE6E4,&HE6)" &HF00) ,2)'64)0@ A$)>JRL&H3F00)UT X1 (A$) 2)r^ RL,("&H"(A$,X,2)))~hRLRL1)r X)| &H3F3B,16: POKE IN TIME DELAY) &H3F00):0)F1$"DUNNY ") @140,(255);F1$;(255);* @207,"BY";*  @266,"COLIN NORTH ";*0‡ @480," ";*6*<֊* "13B6FFBEB73F3213B6FFBDB7FFBE8D237D3F4C261C13B6FFBCB7FFBD8D157D3F4C260E13B63F32B7FFBC8D077D3F4C27CF39008E00007F3F4C8C0020270D3001AD9FA00027F38601B73F4C3900"(255);F1$;(255);* @207&%:'''''''''''''''''''''''''''''&I: PAL INTERCEPT '&m: BY '&: RICK COOPER '&: (C) 1992 '&: FOR '&: COCO FRIEND'S DISK MAGAZINE''!:'''''''''''''''''''''''''''''') 32'00'K @40,"PAL INTERCEPT";'o( @164,"SETTING PAL INTERCEPT";'x2 A$'YY2: X,0C@480,"YOU FAILED TO BREAK THE CODE";,@HG(0)G(0)1,J\900,zfB$:B$""870: B$"Y" B$(13) 60,k B$"N" :" END OF PROGRAM";:,p870,Y06:@32Y58,Y;G(Y);,Y,,:@9,"INSTRUCTIONS"-" THE COMPUTER PICKS 5 COLORS."-@" OBJECT: GUESS THE 5 COLORS."-_" YOU ONLY GET 6 TRIES."-" USE NUMBERS OR LETTERS."-:" THE COMPUTER GIVES YOU CLUES:"-$" x = A RIGHT COLOR IN THE RIGHT SPOT.".." o = A RIGHT COLOR IN THE WRONG SPOT.".Y8" - = A COLOR THAT ISN'T IN THE CODE AT ALL.".{=" USE LEFT ARROW TO ERASE.".B:" PRESS ENTER TO BEGIN";: Z.А-$" x = A RIGHT COLOR IN THE RIGHT SPOT.".." o = A RIGHT COLOR IN&2:Copyright (c), March, 1992,John R. Tindall&A 1000&G&k 10,2:12,56:9,16:8,0:15,27&s(80&265497,0&<2&F5&P6::Boarder&Z(0,0)(319,2),,BF:(317,0)(319,191),,BF:(0,0)(2,191),,BF:(0,189)(319,191),,BF' d2:blue box''n(16,8)(130,180),,BF'.x4'I(20,10)(126,178),,B'w(20,12)(126,12),:(20,176)(126,176),'~1'8'(131,16)(138,186),,BF'(24,181)(131,186),,BF':green box'9'(177,88)(308,160),,BF'4((181,90)(304,158),,B(F(181,92)(304,92),:(181,156)(304,156),(M8(j(309,96)(316,168),,BF((193,161)(308,168),,BF(:red box("6(,(155,26)(270,98),,BF(64(@(159,28)(266,96),,B) J(159,30)(266,30),:(159,94)(266,94),)T8),^(271,42)(286,87),,BF)4h10)Qr(271,88)(278,106),,BF)n|(177,99)(270,106),,BF)u8)(166,99)(176,114),,BF)12)(181,99)(181,106),)(271,90)(278,90),:(271,92)(278,92),*Y1:(22,4),"Utilities":15:(20,6),"Number":(21,7),"to Run the":(21,8),"Program of":(21,9),"Your Choice"*8:(26,13),"Menu v1.0":1:(23,15),"John R.Tindall":(23,16),"52 Edgemere Ave":(23,17),"Plainsboro,NJ"*N8: N$(N)*1*Z1+X1 N: N$(X):ZZ1:(3,Z),N$(X):X+! "1 Ramdisk"+6 "2 Printspool"+J "3 DOS start"+Y "4 TC31"+j "5 Backup"+& "6 Diskmaster"+0 "7 Dir Free"+: "8 63 Colors"+D65496,0+ I:(24,18),I:X1500:X+* I 811,812,813,814,815,816,817,818,+ 900:M"RAMDISK":,/, 900:M"PRINTER":,H- 900:"DOSSTART",R,\. 900:M"TC31",t/ 900:M"BACKUP":,0 900:"BOOT",R,1 900:"DIR-FREE",R,2 900:"COLORS",R, 0::32:,65496,0I 811,812,813,814,815,816,817,818,&):8-11-89 NEBULA BY PAUL H. JOHNSON&8 999&P65497,0:&HF015,33&40::"GENERATES PRETTY NIGHTTIME SKIES........3 GROWTH POINTS ARE ABOUT RIGHT":&"NUMBER OF GROWTH POINTS";Z:Z1Z1& :80:7,52:0,0:1,59'2:8:S()'9dI1Z:X(I)(320)1:Y(I)(192)1:C(I)(8)1:I'DiI1Z'Zn(X(I),Y(I),C(I))'xX(I)X(I)2(3):Y(I)Y(I)2(3)'X(I)0X(I)319:X(I)319X(I)0'Y(I)0Y(I)191:Y(I)191Y(I)0'(16)1((318),(190),(3)3)((I40Z1)1C(I)(9)1(7((320)1,(192)1,8)(>ȋI(Y:N=N+1:HPRINT(0,23),N(c܁105(w65496,0:100,1(I1Z:X(I);Y(I);C(I)::X(I)319X(I)0'Y(I)0Y(I)191:Y(I)191Y(I)0'(16)1((318),(190),(3)3)( Xpp p'      РRPpPR R p'Wr   R  %p%r *zW Pp ur  p'  urPWPpРp %   P}    PpЭ R  'W  p %- PpR  -  p׭ R z %  pRp  -Pp}   } p p R rp p P    P R WRP p W ' %'   PpR % % Э upWR' ' rp ' pЭPpR   r} R p PW u p%  p u zР r rW   Wנ- W pr  W%   p  pp r  W  pp  pR Puz p%p pp }   p }   '   Рp%pp Ч  p R up P PpR}  u pr p% P pup % W p P pPp P//  W  pu  P}Pprz'Ш p pp}PWPZW  R  p P pu R  '  pPR x p' z WPr pz zrW rzr   'W }  PR p rW R  rpР   pppu  P} p   Ppp R r  pp% p R W0 @% u- r  p rW0r@K@K@K@ r -   %7 @pPp @P   Pp z $   P u  r@ R  p p@ 7PРP } W 0@p Рprp Z - p@r zp p} zWp p'%u up p*p@u  PpR W / p@p @/ p pu' ' pu ' pK@K@K@rprpR  'Pup pp'prrppup p pP'PWp P prPp rp WW% p p pPp p p u pu R p p' pR R p pupp pp p|  p p rpu p pPpp ' p pup ' p p pprp'pW p p pr ' Pz pu p  %'%p% Ru %pp% p pxp ppprp '% P rPprp ` pR `P' p Pp' p WP`pWPp`pP` p`rP ` 'pP ` p|rFBPr \ up rp Rpp% rp @%`'P  `uPp p @ p'Prp@ u puWP@ p pP %Pp p %R p R  R p %W ppr   P W  & Pp k% W  % R'Э' d rW   @ u$ru)! aiRH  %P p Q nu d r H d``B @ p `I (@p IBljl`p j`* \ 0(H x@}4HG  xY P;:=Їנ  hYxH6 @. < =$@X a(x H\ܰ 1@P% 00@ :4 b[X4py: Tx=$ [p4.DE\< Op.rVlp.EP$ YF@0ʈ@D =ƒ(Dvro7A<3P  @ 0c Ap@L@ }V" Vip(0p0̈tmY@s`@b@@ B35}jp. A"℠@&.Ư=2.(" f@`u2&]B/!1@x^ G Ā58<(cO:x ;<;`:n  %,&<0  P 6@P7 XB_čɘo@@p \0i we 3X bW.=8 @H"`=v6x~@``2.dX A0Uq O`.w3P02`_ˌri~u(+`9 U.@  \<n 0 `,,F-=@b@~@-y 5+3nP < :d@~c0u`_%b$ n&0$|% & "|9"ف0;!xB@ 8y BH 8y Uؼ!@@]]3  ;)$t\s `!$:@0rPx8`3#;@7 `0{tV>v)! )0 =,]I~80ey*W0`'{@,o. @?2x fh !@@7`0@o0`0i<0 == 0k`^bPHH`":6p f770@@ @5 P @y`db@D@$`6d  x0H`@ @$ HՑ0|`` `@$n@ @$ u@ڀ`]`V`@@$`  P_@@$0@=w@3ۀ@$@`@$`WaP  D C@>`AB€d` PƐ34 <@` `7000 g@A00A8 d̀B1`0`;  zy0 @@b`g )@ Ÿ /.g`a@= @`߀ ` LL`g< A@(7c/> ^/0P8ogc ߡpKO ECʀg<MB/xR<7o?f$p  3 @̠U@뿃Z7g @@ @@ {3f~ژq{ @>;x>\x8~9gn?9x??~W=z~\\w7g>?݁?s;}>w?/n߯?O0߿?뷇?gC|9 gs/9+?0Lo4gϙڽ>ZkkݧO`?͇pǰǰ000?000߰o000?00>wg00;;p;ooLJw6>6`  ~ ~```   ?`pp0 pp0?6;"8"(  K0kS2}XpK0kSgXp||<||||`l?6;"8"(  &w4aP0340634870?59014 ?0 & &5AEMQY]aemquuyy}}}}}yyuqmieaYUMIA=51)% 257 !%-19=&:walt noon protector'8(0):A$(128):@129,"coco";A$;"basic";A$;"program";A$;"protector";:@206,"by";:@266,"walt";A$;"noon";:@395,"any";A$;"key";:B$:@395,(7,(128));:B$""3((0):@64,"this";A$;"program";A$;"will";A$;"make";A$;"your";:@96,"basic";A$;"programs";A$;"unlistable";:1,1:C1900::@160,"to";A$;"use";:20,1:I1900::@224,"save";A$;"your";A$;"program";A$;("in";A$;"ascii";:40,1:I1900::@288,"start";A$;"your";A$;"program";A$;"with";A$;"line";A$;"ten";:60,1:I1900::@416,"have";A$;"you";A$;"done";A$;"these";A$;"two";A$;"things?";(B$:B$""6 :B$"Y" B$"y"7 ::)@480,"enter";A$;"program";A$;"name";:D$):"WHEN DRIVE STOPS, TYPE:"::"DEL 3-8":"SAVE";(34);D$;(34)::"AND A PROTECTED COPY WILL BE":"SAVED.": D$   K\i$q#<]69:E<Pf[S; _H452KiJv&!_'~̘viJ?iL8iNiPiRiTiViXiZi\i^i`#ibDidif5,I90]6ٽ\Sk~} i |Ia9 i |Oa9 i |Oa9 iw Jv H |Ra9kkk ZFFOk4 k94 kkk Tk"k$k" = 4Ok&k'Ik&&!_'4k" = 4?kXI4kXI4 ~ ~!k&&!_4k&&!_'~!k=ڀ4lI'2~gk" =  ggmlI'5g1k =O4lI'2~gk" =  ggm.5gk=ڀglI'5 g1kXI4k" = 4kXI4k" = 4OkXI4k" = 4kXI%4kkXI4k"kXI4kkk&&!_'~!k"k"k$.~ !kkk .~ k!,!_kk4iT&!_'~$k(kk*k(k,iT&!_'4k( =O4k, =O 5 h/!_'~#I~$k(=ڀ4k,=ڀ 5h/!_'~#Ik(=ڀ4k,=ڀ 5h&!_4lI'2~gk( =O ggmlIh 2~gk, =O ggmlIh/!_'~#I~$k( =O4lI'540 gk, =Ob'5 g1lI'5 g1k(=ڀ4lI'540gk,=ڀb'5g1lI'5g1k(XI4k,XI5k(XI4k,XI#5k(XI4k,XI5k(XI%4k,XI%5k(XI4k,XI5k(XI4k,XI5k(k(k*.~"<у'~"'k'~'kbk.k0k&!_'~&ZTk2k4k6kk8kk;k:'~%k24k45f k6XI4k 5aLidaT``kk94(M)anual, (A)utomatic or (S)emi-Automatic Salvage? 5aL`k@k>k>M&!_4k>A&!_4k>S&!_'~'`~'`JThis feature is not available in the Demonstration Version' of Coco Tools.5aL`9kB' k0~(P)i4O'~(PNo file name specified5aL`9k6kk8k6XI4'~(v~)8kB'k6XI4k0k0~)5k6XI4kD.!_'~)5`8**** Warning, Disk Space Space is low, Continue ? 5aL`k@N&!_' a9k@Y'!_'~(+k6k6k8.~(_kB'kHkFkLkJ`Total Compressed Grans = 5aLkNaT, Grans Saved = 5aLkN@Pk0aT , Bytes = 5aL`` a9&)/Arcived Output File Name/Drive (Ex. ARKTEST:1)5` ^i_`i4O&!_'~+i/lI'gh /5glIhj4i/lI'gh .5glIhj'~*ĎilI'g/ARK5glI'ig1Ok@Urk@O'!_'~*, `& CCARCFILE5a;kPaPa8k6kk8k6XI4'= `&k6 =O a;k6XI4aPk6XI4aPa8k6k6k8.~+kRkNObkD9kB'kFkJ~,AArcing File: 5aLk6 =O aM Gran Count =+ 5aLk6XI4aT` `&k6 =O a;k6XI4aPk6XI4aPa8kRkRkTk6XI4kVkTXI4kXk6XI4@PkT&!_'7k6XI4kZkZ4Adl2b4k6XI4k\ k\ kZkB'~,.5aL`VkB'43~-{k^k^kRk^kRkR4 4Ad2b2bkNkN+kRkJk^kJkJ44Ad2b2bkFkF+kJkLk^kLkL44Ad2b2bkHkH+kLkTkTkV.~,VkB' `ԍCompressed = 5aL``9k6kk8k6XI4&!-_'~-k6k6k8.~-9k6 =O'i g1 `[k`k`&!_'~7U& b^i_^kPi4 CCARCFILE"5 5h'!_'G0This is not a CCTOOLS Compatible Arcive Format=5aLiaM`~2Fk6kPk8& b^k6 =O45 _k6XI4^k6XI4^k6XI4k6k6k8.~.kPkto be Extracted from 5lI'giglI'2g1kP&!_'9`&(Enter the Drive # for the Output files 5` ^^kbkb Zkdk/kf b'P`** Arc file Incomplete, 5aLkPkdaT; Files Missing **5aL`~2F& b^i_^ѽ^kdXI4&!_'~1k@Urk@S&!_'~1k@O&!_'~22 Un-Arcing: 5aLiaM Grans=5aLѽaT`kbb-!_'~22`%Not Enough Space to Un-Arc the file 5aLiaM5aL`+(C)hange disks or (S)kip this file ? 5aL`k@S&!_'~1k@C&!_'7&Enter New Output Drive # 5` ^^kbkb1 Z~0~1ASkipping over file 5aLiaM`khkj3 '~25khkhkj.~2~252Qkdkdkf.~/ێ a9khkj.5aL`3 '!_'~2ν6vk4k2kl k44O`ok4k4kl.~2khkhkj.~2` a&!_'~3 t 4<]64O50]6`94kRk^kRkR4 4Ad2b2bkN+kRkDkNkDkn k^`o k^`òk"̀k^k$ k"4O`ok"4Oknknk"k"k$.~3 kn`o 3kn`o9 kn `[k` `[k@k`k@k^̀k"̀k^k$ `[k`k"4k`knk`knk"k"k$.~4 `[k` `[k@k`4Adl2bk@k`k`kn'!_'' `** CRC Error **5aL`9̀k4vk2vk\kpk^k4krk24Oktk44ktk2k2k4k4k24Okt'!_'~5k^k^k^/!_'~5yk2kp/!_'~5k24Okt&!_'k2k2~5~5k^k^k2k2kr4k^k2kp/!_'~5~4k44k4k4̀@Pk54k^9k^k^k^k^/!_' k4k4~5yk2kp/!_'~5k24Okt'!_'~6Wk24O@Pkt'!_'~6Wk4k4~5yk24Oktk44ktk2k2k4k4~5̀k4vk2k44Ok^k4k4k^&!_'9k^/!_'~7 kvk^kxk24k44Ok4k4k2k2kvkvkx.~6~6k44Oktk4k4kvk^kxk24ktk2k2kvkvkx.~7.~6_e%Attempting to Un-Arcive TC31 Format:5aL`&(Enter the Drive # for the Output Files 5` ^^7kbkb ZkP~8 b'~2F `[k`k`&!_'~2Fk`kP'!_'+Invalid File# Header 5aLk`aT`~2Fk kzk&!_' .k`~8z `[k`ik4k`kkkz.~8Rik4 #5aLkPaT`ԍUnArcing File: 5aLiaM` `[k` `[k@k`k@ `[k` `[k@k`k@k@k@'!_')Invalid Header Id <> $1005aL`~2F `[k` `[k@k`k@k^ `[iXiX'!_' `[k|iX/!_94iX,!_'(Compression Flag Invalid5aL`~2FiXk~iX'~:k~k^k `[k` k``ok~k~k.~:kPkP a&!_'~7 t 4<]64O50]6~7Վ `[k`k`k|'!_'~; `[kk&!_'k|k`k~k~~;k-!_' k~k~~;zk&!_'~;I `[kkkk~k~~;z `[k` `[k@k`k@kk~k~ `[k`kkkz k``okkkz.~;~;Ύ ,;k``ok~k~k~k^&!_'~:L~:9}4iL5fC4iP5fC 4iN5fCfh\ekkkkkk>k4k2k"k$k24k45f k"(=(aM`k4k4k"k"k$.~45_ePaM`45_eP Commands which have an (*) following them are not fully functional in the Demo5aL`k4k2k"iVk$k24k45f k"=aM`k2k2k2F/!_'k2k4k4k"k"k$.~нRkiX&!_' iX~~iXiV.!_'iX='gx1iXk4iXk4k45f Select Command? 5aLaMOa`zlI'2~g_ ggm/h glIhjk6k6'7k6M'&~D&~P&~\&~h&~&~~iXiX~tiXiX~tiXiX~tiXiX~tiXiV/!_' iXiViXiX,!_' iXiViXkiV.!_'Tk44Ad2b2bk+4Adl2bkk4k5f k=aM`iXiV.!_'tiX44Ad2b2bk+4Adl2bkk4k5f 45_esiX=aM`45_e~Q44AB?CD1EGNKFLMI2OJTPVXR-3SW4UZQ5/lI'gh glIhjk6k6' k6iX~~lI'2~gAB?CD1EGNKFLMI2OJTPVXR-3SW4UZQ5giX45gVlI'g1iXiV.!_'?iXk6lI'g Command 5glI'Pg1_e`~k6M'&D&O&Q&/&R&RH&3&'8 &O &* &B &Q &/&LO&S&H&Q&&-&E &VP&3x&R%&R8&NA&S&R{&nz&Q&T&UI\#~}k6 =O aM`k6XI444Ad2b2baTlI'k6XI4BglIaL 5aLk6XI4aT`Խ`kFk6XI44Adl2b4k6XI4kJkJ44Ad2b2bkF+kJk6XI44Adl2bkFkFk6XI440Adl2bkJkJkJ44Ad2b2bkFkF+kJkFaT,5aL`kJ ,!_'005aL` kJd,!_'05aL`kJaT`9k'~'Tk6XI4k<kk6XI4kkXI4k< k<4Ok<ikkk.~K97Wto be De-Arcived5'2g1 kP&!_'94-999 49k01<]6kkk'k kkkkkkkk(k*k(XIih4Okk4O5O'k@I&!_'~~Zk(k(k*.~>kkk6&!_' k12kkk.~,k0]69 (I)gnore, (A)bort or (R)etry ? 5aL`k'!_4k@A&!_'~?k@R&!_4k@I&!_4dk@A&!_'9~O&!_''Read'5aL`'Write'5aL` Error on Drive 5aLOaT Track 5aLOaT Sector 5aLOaT Code = 5aL`Ok@k`kkk`kAk@'{lI'2~gCLost Data CRC Error Rcd No-Fnd Write Err Write Prot Not Ready 5gk4 Adl2b4 5gVlIaL`k`4Adl2bk`kkk.~:`9`[k@k@&!_' N~(k@&!_'~k@`o`9`Enter the Drive for the 5aL_PaM`&`^^k9RkYkk4kkk.~gk`k`&!_' k~k`k&!_4,!_'~zk`k&!_' 4k`k`kk`&!_' N~zk`&!_'~9~kkX44Ad2b2bk+&!_' k kk'!_'k/!_' kk kk(kk*k(XIi4k4Adl2bkk&!_'-k4k4k(XIi454k=v50b~ek'*k4k4k(XIi454kZ=v50b%~k( k@R&!_'~k@A&!_'k( 9k(k(k*.~9k~\to be Arc Tested5'2g1kBkHkLkNkR~D_ekk&!_' Empty Disk5aL`kP9Select the file(s) 5aL2aM`45_eP=PaM`P=PaM`45_e`k4k6kk8k6$_kk+kk2kvkxk24k45f k6kvXI4'!_'(45_ek6kvXI4kk45_ek!U6kvXI4'A 5'g1B 5'g1k6kv =O aM`45_e 5aLk6kvXI444Ad2b2baTaMk6kvXI4aT`k2k2k6kv4k@P'!_'kvkvkx.~ k4k4k6kk6}k'k8- k8.~ k2k4k645_e45f  Drive = 5aLkaT Free Grans = 5aLk.aT`ԍSelected Grans = 5aLkaT`k24k45f  5aL`k644Ad2b2bk4+4Adl2bk2k24k45f ƀe#P>5aL`45_ezk`?&!_'~&Ik` &!_'~%_/lI' gh glIhjM'&~$ &~$'&~$R&~$&~&&~$&~$&~% &~#l &~#l~#lk6'k6k6~"~#lk@Pk6,!_'k6k6~"~"k64k@P.!_'k6k6~"~#lk6-!_'k6k6~"~#l_ekPk6kk8k6XI4kPkPk6k6k8.~$kP'9$No Files were Selected5aL`9k6XI4&!_':45_ek6%KXI4k6XI4kk;45_ek6XI4k6XI4@Pkkk24k45f k6 =O aM`45_e~$'kvkkxkvXI4kvkvkx.~%~ kvkkxkvXI4kvkvkx.~&&~ 45f &Enter Wild card search string5` ^_kvkkxkv =O/lI' gh glIhj'EkvXI4&!_'kvXI4kvXI4kvkvkx.~&45f `~ 7_eGra'Fn Analysis for Drive#5aLkaT``k:]kifidk if4O'!_',kkkXI 4ififaT 5aL`ififk.~'k&!_'~(are 5aLkaT Gran(s) not used by files.5aL`"Do You want me to fix the error? 5aL`k@Y'!_'~)KThis function is not available in the Demonstration Version of Coco Tools.5aL`k0&!_'~) ifk0kifXI4k> 5aLiaM`k6 =O4iڟ'5 g1~-kN&!_'~-(Kill/Erase File 5aLiaM (Y-N) 5aL`k@Y'!_'~-4OK&-7!_'~-'( Demo Version ) Not Erasing the file 5aLk6 =O aM`4OK&!_';iaM' - has Not been deleted (Demo Version)5aL`k6k6k8.~*9.KThis command completely Erases Files an they cannot be Recovered at all!!!5aL`vkvkk$_kk+kk4kkk}k'k- k.~.g to Be Erased5'2g1~*<`ƀeA * * * Warning * * * Warning * * * Warning * * *5aL`45_e9.KThis command will/2 Copy the selected files and Kill the Original Disk Files5aL` to be Moved5'2g1~/ to be Copied5'2g17W kP&!_'~-k&'Destination Drive for the Copied files5` ^^kk6kk8k6XI4&!_'~3Wk6 =O'i g1k ZUrk@O&!_'~12k@S&!_'~3Wkb4k6XI4@P-!_'~12Not enough space to copy 5aLiaM!, (C)hange disks or (S)kip file 5aL`k@S&!_'~3Wk@C'!_'~1-0~/kkk6XI4kzkXI4kXI4kkkz.~1P4OC&!_'g!(Demo Version) Not Copying file 5aLiaM from drive 5aLkaT to drive 5aLkaT`4OM&!_'f (Demo Version) Not Moving file 5aLiaM from drive 5aLkaT to drive 5aLkaT`kTk6XI4kVkTXI4kX.5aL`V &!_'~2iaM file copy Aborted5aL`~3$k4k5k4k5kTkTkV.~2`43(OM&!_'k Zk6 =O'i g1k6XI4k6k6k8.~09 Rename Files5aL`to be Renamed5'2g1~*< to be Edited5'2g17W kP&!_'9kkk6kk8k6XI4'!_'~5ܽkTkkTXI4kXk6XI4@PkT&!_'k6XI4kZ kZV6z_/lI' gh glIhjM'&~4&~58&~5]&~5&~4}&~5&~5&~4} &~5~4}kƒ/!_'kƒk~4z*kT/!_'kT5#kTk~41~4}kZ@Pk,!_' kk~4zk6XI4@PkT'!_'kTkT~4+~4}kT/!_'kTkT~4+~4}kkk`'~9]~9]k&!_' Directory5'g1Jk/!_'lI'kXilI'g1lI'kXilI'g1 Gran 5aLaM`ԍ Drive = 5aLk9aT`ԍTrack #5aLkaT`ԍ Sector #5aLkk½aT`k>'~945_ek'~9P=PaM`P=PaM`~9P=PaM`ƀeP=PaM`45_ek~k'̀4k½dlkR%~:kk~v4k½dlkRkk4kkZ&!_'k6XI4%%45f 45_ekklI'khގlIaL 5aL`kkk.~:45_ek4k2k%kk$_kk+kk24k45f lI;'2~g005gkhgGlIaL: 5aL`kkkkk%/!_' 5aL`'lI'kRk4OhގlIaL 5aL`kkk.~;R 5aL`kkkkk%/!_' k`9kRk4Ok`k` ,!_4k`/!_'.k`k``okkk.~;k4k4kkk}k'k- k.~;9kk~k4kk~kk29k45_ekRk4Ok@k24k45f  5aLlI'k@hގlIaL`k4k45f kRkkkkRkk4O=k@k@ ,!_4k@/!_'.k@k@`okkk.~=k` &!_'"45f `k'9A9k`&!_'vkk45f '(Shift @ to change modes) EDIT MODE = 5aL`k'Hex5aL`Ascii5aL`k~44Ad2b2bk4+9k+4Adl2bk2kRk~4Ok`k24k45f ƀe>5aLlI'k`hގlIaL`k4k45f kRk~kk~kRkkkR%/!_' k`6k4Ok`k` ,!_4k`/!_'.k? `k``o45_ekkk.~>k24k45f k'9k~kzk`&!_4k` &!_'~<_/lI' gh glIhjM'&~?&~?&~@&~@0~@Tk~'k~k~~<~?Rk~%,!_'k~k~~<~<%@Pk~,!_'k~k~~<~?Rk~/!_'k~k~~<~?Rk&!_'+k`/!_4k`,!_'~A~?Rk`//!_4k`:,!_4k`@/!_4k`G,!_'~@~49kN@k`6 `o k.kzk$_ll+lkk2klk2$_ll+lk24O`ok2lk2}l'l- l.~O=`klk}l'kz- kz.~O99 Backup Disk5aL`4ON&!_', with destination Formatting5aL``.G This command will completely erase any files on the Destination Disk!5aL``&Enter the Source Drive #5` ^^k&Enter the Destination Drive #5` ^^kBackup from Drive 5aLkaT to DriveP 5aLkaT (Y-N) 5aL`k@Y'!_'9`KThis function is not available in the Demonstration Version of Coco Tools.5aL`Disk Backup Complete!5aL`95 7$Insert any Formatted Disk in Drive 5aLkaT and Press Any Key!5aL`_e45f 45_e Hold Down Any Key to Exit 5aL`45_e45f Drive 5aLkaT Speed Check5aL`45f "k6kzk$_ll+lkaT 5aL`klk}l'kz- kz.~!45f kkzk'45_e45_e !.:.:.:.:.5aL`kkkz.~!h!5aL`k4454 50b%~"Q45f !ƀe DRIVE NOT READY 5aL`45_e`g&!_'~!~#45f ` ; P HHO'~"} HH&~"0&~!" HH'1?& HH&0 1?&Z' ~ 4d4Ad2b2b"4Adl2bk2+2/!_' k2k2k2,!_4k2O/!_'k24 5f `k24 5f *5aL`g&!_'~!k4454 50b_e@9iLliNliPlif_eif&!_'#ifif&!_' k2k245f 4k25_eP=PaM`45_eif