EEDEDTDTTTTDDDD@DPDD@EEEDDTTTTDDDDDEDDTDTTT                          P* <2 ªP* ((" P *<(<(0ʪ** **(ʌ *( (*( ʏ(0ʃ*( Z*"*( _ʏ*2*( Z*"*(_ʏ*2((ʏZ*"((_ʏ*2((ʏZ*"(*(_ʏ*2(*(ʏZ*"(*_ʏ*2( ʏZ("(_ʏ(ʃ(¨ʏZ(((_ʌ ((ʏZ** (* _ *<(<(?* Z* ((* **_*  TO FIGHT"Q1 ST0 95:1300QA A$:FF1QV A$"" 1291QdOSOSF:Q95:(0): 1,15:DEATHQ A(RM,6)1 O$" WINGED ELF"Q A(RM,6)2 O$" GIANT "Q A(RM,6)3 O$" MONATOR "R A(RM,6)4 O$" MUTE TROLL "R) A(RM,6)5 O$" GAURDIAN "RH A(RM,6)6 O$" DEMON "Rs DH2 " " N$", YOUR A COWARD!!!"R A(RM,6)7 O$" SORCEROR "R A(RM,6)8 O$" BLACK DRAGON "R DH1 @69,"YOU STARVED TO DEATH!!"R#A(RM,6)O:S5% DH؈ V 730,733,735,737,739,742,744,746,748,750,752,754,756,758,760,762,764/jډ" HOW MUCH DO YOU WANT?";U/ۅ WLU5 "YOU DON'T HAVE ENOUGH MONEY!": 95:700/WLWLU5:FOFOU:700/݅ S1WL " YOU CAN'T AFFORD IT!":95:7000ޅ SW0SW1:WLWLS1:7000I߅ WLB1 " YOU CAN'T BUY IT WITH "WL: 95:7000h BA0BA1:WLWLB1:7000 WLO1 " YOU DON'T HAVE ENOUGH.":95:7000 BO0BO1:WLWLO1:7000"HOW MANY ARROWS?";WS1 WS5WL " YOU CAN'T BUY THAT MANY.":95:7001,ARARWS:WLWLWS5:7001\ H1WL " YOU DON'T HAVE $"H1:95:7001{ SH0SH1:WLWLH1:7001 G1WL " YOU DON'T HAVE ENOUGH MONEY.":95:7001 GB10GB1:WLWLG1:7002 E1WL " YOU DON'T HAVE $"E1:95:7002& EM10 EM1:WLWLE1:7002Z D1WL " YOU CAN'T AFFORD THEM!":95:7002z DI10DI1:WLWLD1:7002 X1WL " YOU DON'T HAVE $"X1: 95:7002 SM10SM1:WLWLX1:7002 M1WL " YOU NEED $"M1:95:7003AM10AM1:WLWLM1:7003D P1WL " YOU DON'T HAVE IT!":95:7003f PC10 PC1:WLWLP1:7003 R1WL " WITH WHAT..GOOD LOOKS???": 95:7003 RI10 RI1:WLWLR1:7003 A1WL " YOU CAN'T BUY IT WITH $"WL:95:7004 AS10 AS1:WLWLA1:7004J L1WL " YOU D0N'T HAVE ENOUGH!":95:7004 Y1WL " YOU CAN'T GET IT WITH $"WL:95:7004 SP10 SP1:WLWLY1:7004 K1WL " YOU NEED MORE MONEY.":95:7004 K10 K1:WLWLK1:7005" THAT ISN'T FOR SALE!":5a RM2 " THERE IS NO ONE HERE TO BUY!":::BUY/SELL******************5 30000 "MONEY IS TIGHT THESE DAYS!": "THE ECONOMY IS GOOD RIGHT NOW!"5" YOU HAVE $"WL: "YOU ARE CARRYING..."6  FO0 "1) "FO" UNITS OF FOOD."6& SW1 "2) A SWORD."6G BA1 "3) A BATTLE AXE"6a BO1 "4) A BOW"6 AR1 "5)"AR" ARROWS"6 AR1 "5) AN ARROW6 SH1 "6) A SHIELD"6 GB1 "7) A GOLD BOX"6 EM1 "8) SOME EMERALDS"7 DI1 "9) SOME DIAMONDS"7? SM1 "10) A SILVER MIRROR"7b AM1 "11) A MAGIC AMULET"7 PC1 "12) A CHEST OF PLATNUM COINS"7 RI1 "13) THE RING OF GILGAMESH7 AS1 "14) THE AMBER STONE"8 SP1 "16) A BOOK OF SPELLS"8 K1 "17) A KEY"8r"PRESS NO.OF ITEM TO SELL. ENTER [0] TO CONTINUE JOURNEY.";EL: EL0 1998: EL 928,932,935,937,939,942,945,947,948,949,950,951,952,953,954,955,9568 FO0 " NOBODY WANTS TO BUY YOUR FOOD!":9009FOFOU:WLWLU5:9009":SWORD9f SW1 SW0:S1(20):WLWLS1:" YOU GOT $"S1" FOR IT.":9009w:BATTLE AXE9 BA1 BA0:B1(25):WLWLB1:" YOU GOT$"B1" FOR IT.":9009:BOW: BO1 BO0:O1(30):WLWLO1:" YOU GOT $"O1" FOR YOUR BOW.":900:_ AR0 900 : " HOW MANY ARROWS?";Z: ZAR "YOU DON'T HAVE "Z:900:ARARZ:WLWLU5:" YOU GOT$5.A PIECE.":900::SHIELD: SH1 SH0:H1(20):WLWLH1:" YOU GOT $"H1" FOR YOUR SHIELD.":900;9 GB1 EM1 "YOU SOLD THE GOLD BOX WITH THE EMERALDS IN IT!":EM10;| GB1 GB10:G150:WLWLG1:"YOU GOT$50.BUCKS FOR IT.":900; EM1 EM10:E1(50):WLWLE1:" YOU GOT $"E1" FOR THE EMERALDS.":900< DI1 DI10:D1(50):WLWLD1:"$"D1" FOR THE DIAMONDS!":9002 K1 K10:K1(10):WLWLK1:" YOU ONLY GOT $"K1:900>]" YOU DON'T HAVE THAT TO SELL!":900>o:EXTRA LINES> FO0 " SORRY,"N$" ,":" YOU DON'T HAVE A THING TO EAT!":>" YOU HAVE "FO" UNITS OF FOOD"?:" HOW MUCH DO YOU WANT TO EAT?";U?: UFO " YOU DON'T HAVE THAT MUCH,"N$".":1052?PFOFOU:STST5U? ST120 " AAHH!!!,THAT WAS GOOD!": " WHAT A PIG!"? ?L: RECONIZE OPPONENT/FIGHT**?MOA(RM,6)?N O 1110,1120,1130,1140,1150,1160,1170,1180?Q@:V"THERE IS AN ANGRY WINGED ELF , FLYING ABOVE YOU!":@` " A HUGH UNFRIENDLY- LOOKING GIANT IS SCOWLING DOWN AT YOU!":@j" A HIDEOUS LOOKING MONATOR IS HERE, CHEWING ON THE BONES OF.. ITS LAST VICTIM!!!":Abt" THE GATE KEEPER IS STILLDLY `d:HANDLING*****#e-iTT1?kSTST5:WW1Il115cn" STRENGTH :",ST|o" YOUR I.Q. :",Wp" YOU HAVE :$"WLqs ST0 DH1:1300u ST50 " YOUR GETTING WEAK. YOU BETTER ...EAT SOMETHING!"Dv W1 " SORRY,"N$" YOUR TOO STUPID TOO CONTINUE!":DH6:1300V SW2 SW1h BA2 BA1} BO2 ARAR1 SH2 SH1 EM2 EM1 AM2 AM1 AS2 AS1 SP2 SP1 K2 K1 BO2 BO1 RI2 RI1% A(RM,6)0 1100? A(RM,5)0 1400J 199nÇ" WHAT DO YOU MEAN,..."N$"?"xā 95LJ:" WHAT DO YOU WANT TO DO?"ȉ Q1$:˅ (Q1$,4)"LOOK" 1600: 165 ̅ (Q1$,2)"GO" 500:100 ΅ (Q1$,3)"GET" 600:199 Mυ (Q1$,3)"USE" 6000: SP2 500: 199 sх (Q1$,3)"EAT" 1050:199 Ӆ (Q1$,5)"FIGHT" 1200:ST0 1300: 100 ԅ (Q1$,5)"SCORE" 3000:199 օ (Q1$,3)"BUY" BY1: 700:100!*ׅ (Q1$,4)"SELL" EL1:: 900:199!W؅ (Q1$,4)"QUIT" ST90 DH5:1300!م (Q1$,4)"QUIT" ST90 DH2:1300!܇" WHAT!!??":199!:RIGHT$ RECOGNITION*********!: DIRECTION!KK(19)! SP2 RMKK: 1600:100"< (Q1$,5)"NORTH" A(RM,1)0 RMA(RM,1): 1600:100" RM14 (Q1$,5)"NORTH" JJ1: J2 " YOU WENT RIGHT OFF THE LEDGE! I THINK YOUR GOING TO DIE!!!" : 95:DH4: 1300" (Q1$,5)"SOUTH" A(RM,2)0 RMA(RM,2): 1600:100#= (Q1$,4)"WEST" A(RM,3)0 RMA(RM,3): 1600:199#x RM14 (Q1$,4)"WEST" JJ1: J2 DH4 :1300# (Q1$,4)"EAST" A(RM,4)0 RMA(RM,4): 1600:100# (Q1$,5)"NORTH" " YOU CAN'T GO THAT WAY!":WW10:199$= (Q1$,5)"SOUTH" " YOU JUST RAN INTO A WALL!":WW10:199$ (Q1$,4)"WEST" " THERE IS NO EXIT THAT WAY!":WW10:199$! (Q1$,4)"EAST" " YOU CAN'T WALK THRU SOLID STONE!":WW10:199$% " I DON'T KNOW WHAT YOU MEAN!!":199%&%X (Q1$,3)"BOX" 650%BY (Q1$,8)"EMERALDS" 652%eZ (Q1$,8)"DIAMONDS" 654%[ (Q1$,6)"MIRROR" 656%\ (Q1$,6)"AMULET" 658%] (Q1$,5)"COINS" 660%^ (Q1$,5)"CHEST" 660& _ (Q1$,4)"RING" 662&+` (Q1$,5)"STONE" 664&Mb (Q1$,6)"SPELLS" 672&lc (Q1$,3)"KEY" 676&vdXX1&e X1 "GET WHAT?!!":&f X2 " YOU CAN'T GET THAT!":X0:&l' A(RM,5)1 " YOU HAVE THE GOLD BOX.":GB1:A(RM,5)0:'N A(RM,5)2 GB1 "YOU PUT THE EMERALDS IN THE BOX":EM1:A(RM,5)0:' A(RM,5)2 GB1 " YOU CAN'T CARRY THEM ALL.YOU NEED SOMETHING TO PUT THEM IN!":' A(RM,5)3 " YOU'VE PICKED UP THE DIAMONDS.":DI1:A(RM,5)0:(, A(RM,5)4 " YOU HAVE THE MIRROR":SM1:A(RM,5)0:(o A(RM,5)5 RI2 " YOU HAVE THE AMULET!":AM1:A(RM,5)0:( RI2 " YOU DON'T SEE THAT HERE!":( A(RM,5)6 " YOU HAVE THE CHEST OF COINS.":PC1:A(RM,5)0:95)D PC1 A(22,6)3 " THE MONATOR IS FURRIOUS.. HE ATTACKS WITH NO MERCY!!": 1221:100) A(RM,5)7 " YOU HAVE THE MAGIC RING.":RI1:A(RM,5)0:) A(RM,5)8 EM2 " YOU HAVE THE AMBER STONE":AS1:A(RM,5)0:) RM23 EM2 " THE STONE WON'T BUDGE!":*/ PC1 :" YOU CAN'T SEE WHERE IT IS!":* RM23 A(RM,6)7 " THE SORCEROR LAUGHS AT YOUR... ...MEGER EFFORT!":* RM23 A(RM,6)0 " YOU HAVE THE SORCERORS SPELLS.":SP1:+! RM7 A(RM,6)4 " THE TROLL ISN'T GOING TO LET YOU HAVE THE KEY THAT EASY!":+v RM7 A(RM,6)0 " YOU'VE TAKEN THE KEY FROM THE DEAD TROLLS' NECK!":K1:+" YOU CAN'T GET THAT YET!":+: 30000 G1G15:E1E15+ RM2 "THERE IS NOTHING HERE TO BUY!":," YOU HAVE $"WL,:" YOU CAN BUY...",D"1)...FOOD........$ 5. PER UNIT",i SW0 "2) A SWORD.......$"S1,… BA0 "3) A BATTLE AXE..$"B1,Å BO0 "4) A BOW.........$"O1,ć"5)...ARROWS......$ 5. AN ARROW,Ņ SH0 "6) A SHIELD......$"H1-%ƅ GB10 "7) A GOLD BOX....$"G1-KDž EM10 "8)...EMERALDS....$"E1-qȅ DI10 "9)...DIAMONDS....$"D1-Ʌ SM10 "10)A MIRROR......$"X1-ʅ AM10 "11)AN AMULET.....$"M1-˅ PC10 "12)SOME COINS....$"P1. ̅ RI10 "13)A GOLD RING...$"R1./ͅ AS10 "14)AMBER STONE...$"A1.Uυ SP10 "16)A SPELL BOOK..$"Y1.zЅ K10 "17)A BRONZE KEY..$"K1.և"ENTER NO.OF ITEM TO BUY":"ENTER [0] TO CONTINUE JOURNEY";V: V17 " YOU PRESSED THE WRONG NUMBER!":702.ׅ V0 /J45 =45ӈ݈O4Z&45'%'l %la d%dlb  % lc d5M& 4V5VZ&504V5V 504V5VZ& 9454" 5&~44545454545454454454454+4' 5&~5-.~5^4544% 5&~5y45^^1294545454' 5&~6f7454' 5&~54s~5ֽ-~5(9GC;:@89((GC12)64),"!";(CH(GC));:@91((GC12)64),"=";:@92((GC12)64),"###";(&H7539(GC2));:GC:6<:6F:DAISY WHEEL DEFAULT CONFIG6P:7ZDW$"&~6f7454Z+D:COPYRIGHT (C) T&D SOFTWARE 1990 dragon adventure ISSUE #100W:BLACK DRAGON]:" ******BLACK DRAGON!******"::" WRITTEN BY TOM GRAY @1987"@322,"IS THIS YOUR FIRST JOURNEY... ...YES/NO?"; Z$ Z$"NO" 20 :::" LONG AGO,WHEN THE WORLD WAS NEW,AND PULSING WITH MAGIC... A SORCEROR OF THE BLACK ARTS, ON PURSUIT OF RULLING THE KING- DOMS OF THE WORLD, BROUGHT ABOUT A GREAT WAR!"C :" HE CONJURED UP A WICKED AND POWERFUL DEMON, THAT TOOK FORM AS A HORRIBLY... FEARFUL...... ...BLACK DRAGON!!!" 85:::" TOGETHER THEY FOUGHT FIERCE BATTLES AND WOULD HAVE CRUSHED THE WORLD, HAVE IT NOT BEEN FOR THE JOINT STRENGTH OF THE WHITE WIZARDS!" :" THEY BOUND THE BLACK PAIR AND SENT THEM DEEP INTO THE MOUNTAIN CAVES, HELD THERE TODAY BY THE MAGIC OF THE LAST REMAINING WHITE WIZARD."985::@32," NOW THE WIZARD IS DYING.... THE SORCEROR AND THE DRAGON MUST BE DESTROYED, FOR WITH THE DEATH OF THE WIZARD, THEY WILL BE RELEASED UPON THE WORLD!!!!!"C 85W:SET VARIABLESyS120:B125:O130:H120:R150ST100:W100:WL50:E150:DATA**********************A(23,6) B1 23 C1 6 A(B,C) C: B:DATA**********************- 0,2,0,4,0,0? 1,3,0,0,0,0Q! 2,0,0,6,1,0c" 0,0,1,5,0,0v# 0,0,4,21,2,0$ 0,8,3,22,0,1% 0,11,0,0,3,4& 6,12,0,9,0,0' 0,0,8,10,0,0( 0,0,9,0,4,0) 7,13,0,0,0,0* 8,0,13,10,0,0+ 11,15,14,12,0,0$, 0,13,0,0,0,08- 13,17,0,0,0,0L. 0,18,0,23,0,5a/ 15,8,19,18,0,0u0 16,0,17,0,5,01 20,0,0,17,0,62 24,0,0,0,0,83 0,0,5,0,7,24 0,0,0,0,6,35 0,0,16,0,8,7K:" GOOD LUCK....UH.?":" WHAT'S YOUR NAME...,ANYWAY?L N$<M::" GOOD LUCK, WARRIOR "N$#N:" I AM A FOREST ELF.......... I WILL STAY WITH YOU THRU-OUT YOUR JOURNEY! YOU MUST BUY THE THINGS YOU NEED AND SELL THE WHAT YOU DON'T. ALSO YOU MUST 'USE' YOUR WEAPONS BEFORE THEY HAVE ANY EFFECT IN A BATTLE."O" 'LOOK' OFTEN AND WATCH YOUR LOCATION.THE CITY IS BEFORE US. ITS NOW UP TO YOU!!!"P 85QRRM1S100U::" PRESS ANY KEY TO CONTINUE!";VA$: A$"" 86W_ DLY1 4603:5&~!454!544554!544554!544554' 5&~"4a5O4& 5&~"454' 5&~#4@5O4& 5&~#&45~#45O4& 5&~#k45~#45O4& 5&~#454595@5554@454' 5&~$45~$454' 5&~$=45~$i4' 5&~$i454' 5&~$45~$454' 5&~&4' 5&~%m4 5O4& 5&~%+45~%m45O4& 5&~%m454' 5&~&45O4& 5&~%45~&4!5O4& 5&~&45~&4544554!544554' 5&~&4A5O4& 5&~&45~&4 5O4& 5&~&454' 5&~'4@5O4& 5&~'e45~'4!5O4& 5&~'454595@5554@4' 5&~'45~'454' 5&~)4& 5&~(}45O4& 5&~(}454& 5&~(45O4& 5&~(454& 5&~)E4!5O4& 5&~)E454& 5&~)4 5O4& 5&~)454& 5&~)4 544554& 5&~*4544554& 5&~*Y4544554& 5&~*4!544554& 5&~*4@5O4& 5&~*45~+?4 5O4& 5&~+?454& 5&~+4A5O4& 5&~+45~+4!5O4& 5&~+4595@55554@4' 5&~,A454454454F4' 5&~,454454454S4' 5&~,454454454#4' 5&~-454454454'9454a5 45 =45ӈ݈-G4V5VZ&~-KPLAY454a5 45 =45ӈ݈-4V5VZ&~-AGAIN454' 5&~.Y' RZ&4t5tO454N' 5&~.45^~.V4Y' 5&~.L45}~.V45~-@4544554 54455D"~._945454454454454+4' 5&~.X~.8454454454454+4'0 545"~/m45454454454454+4' 5&~/ؽX~/۽84 5454454454454+4'0 545"~0\4& 5&~0}95@54@4 '0 545454455"~0^454" 5&~14 '0 5454 5454O455"~145~1$94 '0 54545O4' 5&~245"~2[4' 5&~2454540"~2945 =45ӈ݈454a5O4Z&45'%'l %la d%dlb  % lc d5M& 4V5VZ&504V5V 504V5VZ& 4" 5&~345454a5&~5̩454@5@4Z5O45945O4ޤa545&~c45~m4595@5554@#454#O4a55 454 O4aԪa55"~ 454 O4a55"~"~#454#O4a559d454454454q92454454454q9245454454454qd"~9(4V5VZ&~ 4V5VZ&~6 TTT RRR Y Y TTT H H III SSS K4V5VZ&~g T R R Y Y T H H I S |4V5VZ&~ T RR Y T HHH I S 4V5VZ&~ T R R Y T H H I S 4V5VZ&~ T R R Y T H H III SSS 4V5VZ&~ *4V5VZ&~H MAKE THE FALLING SHAPES FIT ]4V5VZ&~{ TOGETHER ON THE BOTTOM. FILL 4V5VZ&~ AN ENTIRE ROW FOR MORE ROOM 4V5VZ&~ AND EXTRA POINTS. 454a545 =45ӈ݈4V5VZ&~4(C) 1989 GREGORY SOFTWARE9' RZ&4t5tO454J' 5&~45}4K' 5&~45}9O4`& 5&~S4' 5&~3454O4@55~S454O4@55"~945,45454' 5&~5454," 5&~454a5 45 =45ӈ݈4' 5&~mL4V5VZ&~`joystick OR KEYBOARD45~4V5VZ&~JOYSTICK OR keyboard45455~9(454455"~ "~454a545 =45ӈ݈45N4V5VZ&~SSCORE454a545 =45ӈ݈4V5VZ&~HIGH454a545 =45ӈ݈4V5VZ&~SCORE454a545 =45ӈ݈O4Z&45'%'l %la d%dlb  % lc d5M& 4V5VZ&504V5V 504V5VZ& 454a545 =45ӈ݈O4Z&45'%'l %la d%dlb  % lc d5M& 4V5VZ&504V5V 504V5VZ& 945454 & 5&~454a5 45 =45ӈ݈4' 5&~4V5VZ&~SKILL LEVEL a B C~b4' 5&~9"4V5VZ&~6SKILL LEVEL A b C~bN4V5VZ&~bSKILL LEVEL A B c' RZ&4t5tO454& 5&~45ʽ}4" 5&~45~K454' 5&~7459' RZ&4t5tO454 ' 5&~454' 5&~45' RZ&4t5tO454 ' 5&~W454" 5&~W4594547" 5&~454% 5&~454' 5&~E454" 5&~E4595@5554@4' 5&~45~454' 5&~O4& 5&~4545O4& 5&~;454 5O4& 5&~454 54!5O4& 5&~454 54544554544554 544554!5445595@5554@454' 5&~45~454' 5&~45~ 4' 5&~ 454' 5&~ 3 45~ =454' 5&~!4' 5&~!4 5O4& 5&~ 45~!4"5O4& 5&~!454' 5&~!45O4& 5&~!o45~!4!5O4& 5&~!45~!4A5O4&  E N H A N C E D B A S I C VR. 1.0 B Y: Chris Ferreira ============================================================================= Enhanced basic was designed to make disk access and programing easier and also to patch some errors that Tandy made when designing this basic. ============================================================================= R E Q U I R E M E N T S ------------------------ (1) A COLOR COMPUTER 3 (2) DISK DRIVE (3) RGB MONITOR ============================================================================= PRINTER & DISK ACCESS ----------------------- CONFIGURES DISK DRIVE FOR 6 M/S DRIVE SPEED CONFIGURES PRINTER FOR 1200 BAUD ============================================================================= BASIC PATCHES -------------- *)Floating point routine has been patched *)Lower case patch- Allows commands to be entered in Lower case. Commands automaticaly are turned into uppercase. Anything in quotes(") are left alone. ============================================================================= NEW FUNCTIONS & NEW KEYS ------------------------ 1) THE BREAK KEY HAS BEEN RECONFIGURED AS A *PAUSE* KEY.. HITING SHIFT-BREAK- DOES THE SAME AS THE BREAK KEY!!! 2) The *DOWN ARROW KEY* can now be used as a "CAPS LOCK KEY" 3) Auto Key repeat 4) PCLEAR 0 TO 8 ============================================================================= KNOW WHAT DRIVE YOUR USING -------------------------- In MS-DOS the drive number is always displayed in command mode. In this part of the program you get the drive number you are currently using to the right of where you are typing.. The number to the right changes as you change to drive 0,1 or 2. The drive number however is disabled when you are typing in a basic program and is re-enabled when you start accessi the disk drive..... ============================================================================ WILDCARD DIRECTORIES -------------------- Ever wanted to get a directory of all the filenames starting with a certain letter or list directories of files of one type of extent. Well than this is for you.. This part of Enhanced Basic allows you to get wildcard directories. For Example: DIR "FIL*.*" - LISTS ALL FILES WITH THE 3 LETTERS 'FIL' DIR "*.*" - LISTS ALL FILES DIR "*.BAS" - LISTS ALL THE BASIC FILES ON DISK THERE ARE MANY OTHER COMBINATIONS ALSO!!! FORMAT FOR WILDCARD DIRECTORY IS AS FOLLOWS DIR "FILENAME/EXT" USE WILDCARD(*) ANYWHERE IN THE FILENAME! ============================================================================== Auto Load basic programs ------------------------ Do you hate having to type run "program name" everytime you want to load and run a program from disk, well with Enhanced basic all you have to do is type the name of the file you want to load and it loads and run's it. There are 2 drawbacks however, 1- the program to be loaded has to be basic and 2-the filename of the program can not be a primative, in other words you cant auto load a program that is spelled like one of disk extended basic commands like (dir,print, or poke).. EXAMPLES OF FILENAMES THAT WONT LOAD ARE: EX #1: POKER.BAS - will not run because enhanced basic thinks you are trying to use the poke command. ============================================================================== well thats it!!!!!! enjoy!!! basic thinks you are trying to use the poke command. ==========================================?0 ??????????? ??<?  0 0?? 0 ?<0 <??<< ?<<?000?? 0??00?00?000?000 ??PU?? P? AAUB00AAU30 ?QEU 0 PU?0U ?0T*TUU(*??*<*(  *UUUPU<?0 ?*?*( *TQUUE]'Z ņ` pZ&09 *@&1?&94|_5 +*\ 1'K'L&  H_ ""945WT$0 J&9ܒݶ""9Z&9@ І^\ 3 !1`dž?1 &AIC3D &5 Wc|_'r ݗݟ< '\ ƍ0 'P & 'Fݟ  '5 ݯ & $W+W9 O_ &9OZ&9@0 @ 0Z& &0@Ơ0 Ơ\DLCAI8Uܔ ' oā&3D &]1!v]oVOmYtZIB @'1+ @&0 ^' &A ' @&)\&2 _N ' ' ;*^8 #&W0&9     }"(m' '+.(3CZ&%&& ('@"' '&7#oB(@LAoC *'UM C *'cAPA + **7do '3D "&9 *'(#,'C&C,'33i  (V \+_L9mB'˦& A/nL ) \ 'z ) m    "(' 'A/ A-(3D &%&* ('D/' '&;#A( *'| R *'JArA, *'mo '3D "&9 *'K,'CMC,'3A3jC& L' &ā+JHCQą& < Z*J9,'075'@P1v1HHB=19 011*1+  ,4 0 Z&50  &9 @+ 0'11c3 1K @'1cAC4@0XX1331y1*1+3K  ,4 0 Z&50  &5EG 7 ,' ,'>13 AC''O0+ ,4 0 Z&50  &9&jC&C]*-B&)oBPGC ] &'%B\BjC& Ao ]Ȗ\LC 3D "&9 #'$9V OXI%+\ &9 U*Y)'%+ @&A& + 0' 1& + +9, +'`0 )'XXB@ AJHHB@00 0 0 ?AA0000?0 00 000ʣ?ʣ?0ʣ? 0 QUUE0 R QUUEAARPTAASSWAA *(* *(**P* *(* *(**QUUEAA******(**R******(**QUUEAA******(**R******(**UU@AA*****(*(*******(*(**AA*(**(**(***GUU*(**(**(***˻˻AA***(**( **UU***(**( **""AA **(* **(swUU **(* **(󾻾꺪AAwUUAAAA?*?T????????????????UU???????????????????????????????????????????????????????????????????0 300 00 ??0 0? ????0? " WHEN YOU MOVE, ANY PIECES OWNED BY THE COMPUTER WHICH ARE NEXT TO YOUR 'LANDING' SPOT ARE CHANGED TO YOUR COLOR.*?" ALSO, WHEN YOU MOVE TO AN EMPTY SQUARE NEXT TO YOUR PIECE, THE PIECE WILL CLONE ITSELF BEFORE JUMPING TO ITS NEW POSITION.";*@""64*A:+B" YOUR PIECES START OUT IN THE UPPER LEFT AND BOTTOM RIGHT CORNERS. THE OBJECT IS TO OWN MORE PIECES THAN THE COMPUTER WHEN THE BOARD IS FULL.":,/C" IF EITHER PLAYER RUNS OUT OF PIECES BEFORE THE BOARD IS FULL, THE CONTEST CANNOT CONTINUE, AND A WINNER WILL BE DECLARED.",>D""68,^FI17:J17:B(I,J)0:::,{HB(1,1)1:B(7,7)1:P(1)2,JB(1,7)2:B(7,1)2:P(2)2,P4:1,1:3:,R 1000,TX1:Y1: 3,UX7:Y7:3,VX1:Y7: 3,WX7:Y1:3-XX11:Y11-Y 90:100-Z10-2[H(0):V(1)-E\P(&HFF00)1-b] P0 "AT100L8O2AE":-^ H10 DX1:DY0 : H53 DX1:DY0 : V10 DX0:DY1 : V53 DX0:DY1 : 91-_X2X1DX:Y2Y1DY:X21 Y21 X27 Y27 91.aXX1:YY1:3:Y1Y2:X1X2: 90.(c 99.Ld B(X1,Y1)1 "T20O1C": 89.\fS1X1:S2Y1.eh90.j B(X1,Y1)0 "T20O1C": 104.lD1X1:D2Y1.nNF0.pD((D1S1)2(D2S2)2).r D2.9 "O1CCCC": 89.tT2:CT1: 2000/v P(1)0 P(2)0 800/*x P(1)P(2)49 800/3NM0/>ʀI17/ÌJ17/X4(I1)2070:Y4(J1)2030:P(X4,Y4):(X4,Y4,0)/΅ B(I,J)2 280/ЀZ2 2/ҀY2 2/ԅ Z0 Y0 260/F1YI:F2ZJ0؅ F11 F21 F17 F27 2600܅ B(F1,F2) 0 2600%NQ005 R11 10E R21 10[G1R1F1:G2R2F20 G11 G21 G17 G27 2400 B(G1,G2)1 NQNQ10:0D((F1I)2(F2J)2)0 (D)1 NQNQ11 NM100 NMNM1:S1(NM)I:S2(NM)J:S3(NM)F1:S4(NM)F2:S5(NM)NQ1(:1;(X4,Y4,P)::1L, NM0 891T-V11f. NM1 3501s0HVS5(V)12 I2 NM13 S5(I)HV HVS5(I):VI141^S1S1(V):S2S2(V)1`D1S3(V):D2S4(V)1fD((D1S1)2(D2S2)2)2hT1:CT2: 20002"r P(1)0 P(2)0 8002<| P(1)P(2)49 8002F 892S ::@962m*" SCORE"2,:" YOU " P(1)" COMPUTER " P(2)2.24 P(1)P(2) " YOU WIN!!!" : " COMPUTER WINS!!"3H:" PLAY AGAIN? Y/N"3JK$:K$"Y" 5530LK$"N" 842363<3II0 73[ 3:YI20203q(60,Y)(200,Y),3w3I0 73$ 2:XI20603.(X,20)(X,160),383B(60,20)(80,40),BL,G3K4PЅ (D)1 B(D1,D2)CT:XD1:YD2:3:P(CT)P(CT)1: 2100 : B(S1,S2)0:XS1:YS2:3:B(D1,D2)CT:XD1:YD2:3: 21004V34e4 I1 14t6 J1 148XD1J4:YD2I4< X1 X7 Y7 X7 B(X,Y)T B(X,Y)CT:3:"T200L4O3EAEAO5EAO4EF":P(CT)P(CT)1:P(T)P(T)14>5@5 5`4: 50S2)0:XS1:YS2:3:B(D1,D2)CT:XD1:YD2:3: 21004V34e4 I1 14t6 J1 148XD1J4:YD2I4< X1 X7 Y7 X7 B(X,Y)T B(X,Y)CT:3:"T200L4O3EAEAO5EAO4EF":P(CT)P(CT)1:P(T)P(T)14>I&K :COPYRIGHT (C) T&D SOFTWARE 1990 write out instructions ISSUE #100&Q&@64, " THIS UTILITY WILL ALLOW YOU TO SAVE ANY 32 COLUMN TEXT SCREEN TO A FILE THAT CAN BE LOADED WITH YOUR WORD PROCESSOR."&&" TO INSTALL WO.BIN:'(" 16K: CLEAR 200,15999'.2" LOADM'SO':EXEC'J<" 32K: CLEAR 200,32383'eF" LOADM'SO',16384'vP" EXEC"'Z:" press any key to continue"'[I$: I$"" 91 : (d@64," PRESS CLEAR TO DUMP THE CURRENT TEXT SCREEN TO DISK."(Hn" RUN CVT-TEXT.BAS TO CONVERT THE BINARY FILE TO A TEXTFILE."'eF" LOADM'SO',16384'vP" EXEC"'Z:" press any key to continue"'[I$: I$"" 91 : (d@64," PRESS CLEAR TO DUMP THE CURRENT TEXT SCREEN TO DISKE>k 0k9 o'~2dy '90O9M"TEXT",1024,1535,0?*> '5 00490 FCB ', 00500 FCB '0 00510 FCB 0 00520 FCB 0 00530 FCB 0 00540 FCB 0 00550 FCB 0 00560 RMB 200 00570 Z FCC /*/ 00580 END START '1 00410 FCB '0 00420 FC&':COPYRIGHT (C) T&D SOFTWARE 1990&9 359,57:0,1&u:2048:0:4:@229,"READING DISK DIRECTORY";:&HFF22,8&Ȁ X512 541:A$:X,("&H"A$):X:0512:F(0)&ҌA$(68):Y1:P11:PO4:T247&܀ X311:0,17,X,A$,B$:C$A$(B$,127)'4 N07:A$(Y)(C$,N321,8)"."(C$,N329,3)" "'[R(A$(Y)): R255A$(Y)"":300'A$(Y)A$(Y)((1547N32)48)" "' (1548N32)0 A$(Y)A$(Y)"B" : A$(Y)A$(Y)"A"( R0 (A$(Y),1)"B" ((A$(Y),10,3)"BAS" (A$(Y),10,3)"BIN") A$(Y)"":290(<A$(Y)(A$(Y),12):YY1(F" N,X(q,P2((Y1)10): P2(Y1)10 P2P21(6:6)"COLOR DISK DIRECTORY"(@A$(68F)" USED -"(F)" FREE":(32(A$))2)A$:10)"PAGE";P1;"OF";P2:(JH(P11)101)T XH H9) ^ A$(X)"" :370)/h9);A$(X))5r)C|&HFF22,8)I338 345:I,255::KPO328:529,&H80:A0(K):529,&H8B)E(P11)10PO3*K$:K$"^" PO4 P11 P1P11:PO13:A0(K):310 : K$"^" PO4 A0(K):POPO1:390*y K$(10) PO13 EY1 A0(K):POPO1:390 : K$(10) P1P2 PO13 P1P11:PO4:A0(K):310* K$(13) 450*410*(A$(E),9,1)".":T$(A$(E),12)*Z$ : : @233,"LOADING "(T$,8);+օ (A$(E),"BIN") 359,126:MT$:+: (A$(E),"BAS") 359,126:T$,R+Dꁥ410+ BD,B3,ED,C3,4,0,1F,1,C3,0,E,ED,8D,0,D,A6,84,8B,40,A7,80,AC,8D,0,3,26,F4,39,0,0(A$(E),9,1)".":T$(A$(E),12)*Z$ : : @233,"LOADING "(T$,8);+օ (A$(E),"BIN"&E:COPYRIGHT (C) T&D SOFTWARE 1990 cover program ISSUE #100&O 200& (14000)188 (14001)188 (14002)188 22& (186)14 M "CVR-MOD" : M "CVR-MOD"&IS$" COCO ISSUE #100"&DT$" OCTOBER 1990 "'3A(IS$):A(A2)256(A3):I016:G(AI): G64 GG64'D14500I,G:'A(DT$):A(A2)256(A3):I016:G(AI): G64 GG64'14700I,G:'S11024:S21200:S31100( 3584,S1256:3585,S1 255:3586,S2256:3587,S2 255:3588,S3256: 3589,S3 255( 4000(C-3600,14000256:3601,14000 255(i/3602,(7)16:3603,((17)1)2(0 3604,SP256:3605,SP 255(2 15000(7 4000(<3600,14192256:3601,14192 255)>3602,(7)16:3603,((17)1)2: (3)1 3603,0)"@3604,SP256:3605,SP 255).F 15000)FK (5)1 5000)PSCSC1: SC3 SC0:28 : S11024(8)32:S21024(12)32:S31024(10)32: 30*WP(5):P13590,5:3591,1:3592,1 :P2 3590,5:3591,1:3592,7 :P33590,7:3591,6:3592,4 :P4 3590,0:3591,7:3592,5 :3590,(8)1:3591,(8)1:3592,(8)1*jSP(20)50:+0::@40,"T & D SOFTWARE";:@71,"HOLLAND MICHIGAN";:@130,"REPRODUCTION OF ANY OF THE FOLLOWING IS PROHIBITED.":@194,"T & D SOFTWARE SHALL HAVE"+@226,"NO LIABILITY OR RESPONSIB- ILITY TO CUSTOMER WITH RE- SPECT TO ERROR, LOSS, OR DAMAGES CAUSED BY THESE PROGRAMS."+@421,"COCO CASSETTE NO. 100 OCTOBER 1990 + (2)1 0,1, TD02000:,o"NO LIABILITY OR RESPONSIB- ILITY TO CUSTOMER WITH RE- SPECT TO ERROR, LOSS, OR DAMAGES CAUSED BY THESE PROGRAMS."+@421,"COCO CASSETTE NO. 100 OCTOBER 1990 + (2)1 0,1, T    $'(*+-/01235679DIR BAS COVER BAS!CVR-MOD BIN"wZOT BASSTE BAS&-TEXTFORMBAS#TURTLE BAS,COAST BAS.MEBASIC3 BAS)hDOCLOAD BAS8EBASIC DOCaDRAGON BAS.WOINS BASLWO BINUCVT-TXT BAS%DTRYTHIS BINDONUT BASDONUT1 BIN DONUT2 BIN4*m6`&~{vqc]W0ZZ&Gm=' 1Cd64-'5" 5 @m ' '  '@' om' 14u'5 5 8m'('H' obm' 14#'5{ 5 x9lme'g'' oO &M*pp5-0&93_&pm&m&m&Fd450Z&9Z&9`졄ď3_&9]''''''' !0 "0 0 0 0 0 0 0! 94-"<.5OM94- .5OM95M9294##  0&  0&1?&59*:0&1?&59 &D:COPYRIGHT (C) T&D SOFTWARE 1990 text formatter ISSUE #100&J &_ 6000: L$(200)&h TF0&:" SUPER TEXT FORMATTER":'3" THIS COCO PRODUCTIVITY UTILITY WILL LET YOU TAKE TEXT OUTPUT FROM VARIOUS SOURCES (WORD PROCESSORS, ETC) AND FORMAT THEM TO YOUR SPECIFICATIONS."'(" ORIGINALLY, THIS PROGRAM WAS DESIGNED TO FORMAT TEXT OUTPUT FOR PERFECT PAGE PRINTING ON THE PRINTER."'* 9000(-::" NOTE: SUPER TEXT FORMATTER CAN RECOGNIZE A FEW SPECIAL 'COMMANDS' YOU MAY EMBED (TYPE INTO) YOUR TEXT WHEN YOU USE YOUR NORMAL WORD PROCESSOR. THESE SIMPLE CODES GIVE YOU EVEN MORE POWER."(/" ALL YOU NEED TO DO IS TYPE THEM IN ON THE BEGINNING OF THE LINE.")K0" THE THREE COMMANDS ARE:

")W2 9000)4::"

- PAGE BREAK. THE SIMPLEST OF ALL COMMANDS."*k6" - SETS TOPIC. TOPIC IS THE TEXT WHICH FOLLOWS ON THE LINE. THE TOPIC WILL BE PUT AT THE TOP OF EACH PAGE UNTIL YOU SET A DIFFERENT TOPIC. THIS IS SORT OF AN AUTOMATIC PAGE HEADER FEATURE.*8" - MUCH LIKE EXCEPT CENTERS THE TEXT PAGE VERTICALLY."*: 9000*d:@96+e" ENTER AN EMPTY INPUT TO QUIT"::" WIDTH";WD: WD10 :+If" SOURCE FILENAME: ";: F1$:F1$"" :+zh" DEST. FILENAME: ";: F2$:F2$"" :+nPG0:LP0:T$"":LM0+p"O",#1,F2$+r"I",#2,F1$+t (2) 510+v #2,X$+x (X$,3)"" 200, z (X$,3)"" 300,$| (X$,3)"

" 400,0~LPLP1,< 2000,V LP60 T0: 1000,a 500,TF1:T1: 1000:LM1:500,,TF1:T1: 1000:LM0:500,T0: 1000, 116, LP T0: 1000,, 100, LP0 1500-TMLM: LM1 LP58 TM0-+ LP2 1500-M PG;LP;" LINES ";(L$(1),4)-c #1,L$(1):#1,""-{ TM0 C0:1040- C(58LP)2:I1 C-#1,"":-LCC2- LP1 I2 LP:#1,L$(I):LCLC1:- LC60 #1,"":LCLC1: 1050.$#1,"---"PG"---".5܅ T T$(12)" "(X$,4,74).APGPG1.l (T$)3 L$(1)T$ : L$(1)(12).wLP1:.Ѕ TF TV2 : TV1/څ LPTV L$(LP)X$: : Q$L$(LP1): (Q$)(X$)1 WD L$(LP)X$: : L$(LP1)L$(LP1)" "X$:LPLP1:/U"O",#1,"TEST":I1 210:#1,((7),65)" "((6),68)" "((6),72)::/|#(@484,"PRESS ANY KEY TO CONTINUE";/# "" 9100/#TV L$(LP)X$: : Q$L$(LP1): (Q$)(X$)1 WD L$(LP)X$: : L$(LP1)L$(LP1)" "X$:LPLA&A:COPYRIGHT (C) T&D SOFTWARE 1990 convert text ISSUE #100&T CONVERT TEXT&l 2000: T$(16):PC1&r&M"TEXT"&#"O",#1,"TEXT.DAT"&(I0 15&2T$""&" THIS PROGRAM WILL INTEGRATE WITH PROGRAMS TO FOLLOW TO PRODUCE A SUPERIOR DESKTOP SET FOR THE COCO."?D@" FOR MORE DETAILED HELP, GO TO EDIT MODE AND PRESS [CLEAR] AND THEN PRESS ?."uCCX1:CY1:NL1:B$(NL)"":TL1:OS0:IN0:CR0D@484,"PRESS ANY KEY TO CONTINUE";E""69FH@96:" SUPER TEXT MENU":SJ" L. LOAD DATA FILE S. SAVE DATA FILE E. EDIT TEXT Q. QUIT PROGRAM"hPK$:K$""80|RP("LSEQ",K$)T P0 80U P 86,92,100,990V10000:F$""70W"I",#DN,F$:NL0X (DN) 90YNLNL1: #DN,B$(NL): 88Z NL0 NL1:B$(1)"",[#DN: 70C\10000:F$""70T] "O",#DN,F$q^ I1 NL: #DN,B$(I):`#DN:70cM10:M20dfKLTL14h KLNL KLNLj ITL KLl B$(I)nx 970z3:@SP,RD$;:K$ |K$"" 140 ~@SP,BL$;:K$3K$"" 140K4:H$"" H$" "^@SP,H$;:K$pK$"" 1224:H$"" H$" "@SP,H$;:P(FF$,K$) P0 200 P 150,155,160,165,800,190 CY1 TL1 122 CY1 F1:TLTL1 : F0:CYCY1=L(B$(TLCY1)): CXL CXL1R F 100 : 122h CYTLNL 122 CY15 F1:TLTL1 : F0:CYCY1 153 CX1 CXCX1:122 CY1 122CYCY1:CX(B$(TLCY1))1: 122 CX(B$(TLCY1)) CXCX1: 122> CY15 (CYTL1)NL 122UCYCY1:CX1:122 NLMX 122 : 6000: CY15 F1:TLTL1 : F0:CYCY1CX1:NLNL1… F 100 : 122K(K$)ʅ K32 K127 122TTLCY1̅ IN 250΅ CX(B$(T)) 212:Ѕ (B$(T))32 210 : 122TB$(T)B$(T)K$: 220j(B$(T),CX,1)K$܁3:@SP,K$;:CXCX1恥 122 (B$(T))32 122 CX(B$(T)) 210B$(T)(B$(T),CX1)K$(B$(T),CX)@(CY1)32,B$(T);CXCX1: 122I NL1 B$(1)"":CX1:TL1:CY1: : LNNL k LNNL B$(NL)"":NLNL1: ILN NL1:B$(I)B$(I1)::B$(NL)"":NLNL1: CR1: 970"K$:K$""802$P("D IMECLXAQ?",K$)&P0 CR0:970: 1224( P 810,820,830,840,850,860,870,880,890,70,900N* M10 M20 1000c,LNM1:CTM2M11. 700:CTCT1: CT 8140M10:M20:CR0: 1004 CX(B$(TLCY1)) 8026TTLCY1:B$(T)(B$(T),CX1)(B$(T),CX1)8@(CY1)32,B$(T)" ": 802,> IN1 IN0 : IN1;?CR0:120F@ 800UHM1CYTL1dJCR0:120sRM2CYTL1TCR0:120\ M10 M20 1000 : YTLCY1]NNM2M11^ INL Y 1_B$(INN)B$(I):` I1 NN aB$(YI1)B$(M1I1) b cNLNLNN 'e 100 =fLNTLCY1: 700 Qh LNNL 100 qj CY1 TLTL1 : CYCY1 |l 100 pCX(B$(TLCY1))1:CR0: 120 z 10000:F$"" CR0:100 |YTLCY1 ~"I",#DN,F$  (DN) #DN:CR0:100!  #DN,L$!GINL Y 1:B$(I1)B$(I)::B$(Y)L$:NLNL1:YY1!R 895!X!" WHILE IN EDITING, THE ARROWS MOVE THE CURSUR UP, DOWN, LEFT, AND RIGHT. ENTER MOVES THE CURSOR TO THE START OF THE NEXT LINE."_" LINE. THE CLEAR KEY ACTS LIKE A CONTROL KEY. YOU MUST PRESS ANOTHER KEY AFTER THE CLEAR KEY TO DO THE COMMAND:#" I:INSERT ON/OFF L:DELETE LINE X:CURSOR EOL A:APPEND FILE M:MARK START E:MARK END C:COPY BLOCK D:DELETE BLOCK Q:QUIT SPACE:DELETE"#*@480," ILXAMECD FOR MORE Q TO QUIT";#@K$:K$""906#cP("ILXAMECDQ",K$):P0906# P 920,925,930,935,940,945,950,955,911#CR0:100#:@128#" IN INSERT MODE, CHARACTERS TYPED PUSH THE TEXT OVER.$3" IN OVERWRITE MODE, CHARACTERS TYPED REPLACE EXISITNG ONES."$? 5000$K:@160$" THE L COMMAND DELETES THE LINE THE CURSOR IS POSITIONED ON."$5000$:@160$" THE X COMMAND MOVES THE CURSOR TO THE END OF THE CURRENT LINE."$ 5000%:@128%" THE A COMMAND LETS YOU MERGE A FILE INTO YOUR WORK AREA. THE NEW TEXT STARTS AT THE POSITION OF THE CURSOR WHEN THE COMMAND IS INVOKED."% 5000%:@128&[" THE M COMMAND SETS THE START MARKER AT THE CURRENT POSITION ON THE CURSOR. THE START MARKER IS USED FOR BLOCK COPY AND DELETE COMMANDS.&g 5000&s:@128'" THE E COMMAND SET THE END MARKER AT THE CURRENT CURSOR POSITION. THE END MARKER IS USED FOR BLOCK COPY AND DELETE COMMANDS."' 5000':@128'}" THE C COMMAND COPIES THE BLOCK YOU MARKED TO THE CURRENT POSITION OF THE CURSOR."' 5000':@160'" THE D COMMAND DELETES THE BLOCK YOU HAVE MARKED."'5000'ʅ IN MD$"INS " : MD$"OVER"('̅ CR M2$"CONTROL" : M2$"REGULAR"(O·@480," mode: "MD$" keys: "M2$;:(mޞ:@232,"OK TO QUIT? Y/N"(K$:K$"N" 70(K$"Y" 991(:(@480,(31,32);:@480," MARK START AND END FIRST";: TD0 1000::CR0:120)@484,"PRESS ANY KEY TO CONTINUE";)*""5001)5 900)Dp IN0 )RrYTLCY1)at YNL )wv INL Y1 1)xB$(I1)B$(I):)zB$(Y)"")|)KLTL14) KLNL1 KLNL1)\ ITL KL)^ B$(I))h)mCR0:970)q*':@228,"FILENAME: ";: F$:*)`1:505 900)Dp IN0 )RrYTLCY1)at YNL )wv INL Y1 1)xB$(I1)B$(I):)zB$(Y)"")|)KLTL14) KLNL1 KLNL1)\ ITL KL)^ B$(I))h)mCR0:970)q*'e&H:COPYRIGHT (C) T&D SOFTWARE 1990 enhance disk basic 3 ISSUE #100& F015:C:F,C::18,0,9,36,38,27,45,38,0,18,0,63,54,0,36,27& 80:2: 3,1&" E N H A N C E D B A S I C"'" B Y"'6" Chris Ferreira"'H3,1,U::3,1'z" SHIFT-BREAK = BREAK"'" BREAK= SHIFT-@"'" DOWN ARROW=TRUE CAPS LOCK KEY"'3,1,U::3,1(:3,1,U:" PRINTER BAUD RATE SET AT: 1200 BAUD"(m" DRIVE SPEED SET A 6 M/S"(3,1::" LOADING MACHINE CODE.. PLEASE WAIT!!":( 41598,19("38543,33:38563,33($(49474)48 DB1))%&H95C9,87:65314,20 : TRUE LOWERCASE IN 32 COLUMNS)5&150,40)y'&H95C9,87:65314,20: : TRUE LOWERCASE IN 32 COLUMN WIDTH MODE)( DB1 55318,20:55232,0 : 55075,20:54989,0)* DB1 55180,18:55181,18:55182,18 : 54937,18:54938,18:54939,18*, 44014,(2394)48 : 44015,62*.. 44016,32*{0 DB1 52942,126:52943,0:52944,243 : 52722,126:2723,0:52724,243*2 243,247: 244,9: 245,90*4 246,203 :247,48*6 248,247:249,171: 250,238*8 251,192: 252,48*: 253,57+ <:PATCH FLOATING POINT ROUTINE BUG'+1>&HB9D6,&H25+]@:MAKE DOWN ARROW A TRUE CAPS LOCK KEY'+lB 41584,18+{C41954,255+D:+F:MAKE AUTO REPEAT KEY'+H: START=65157 END=65263 EXEC =65162,I44009,65:44010,84 :CHANGE BREAK IN TO BREAK AT,uJ: TO INCREASE REPEAT DELAY POKE A HIGHER NUMBER INTO 65225 ... TO DECREASE DELAY POKE A LOWER NUMBER,L:TO CHANGE THE REPEAT RATE, POKE 65237 WITH A NEW VALUE.- N:IT IS SET FOR 5 INITIALLY. HIGHER VALUES GIVE A SLOWER REPEAT RATE.-'P ADDRESS65157 65263-2R CODE-FT ADDRESS, CODE-TV ADDRESS-X 215,188,0,0,0,48,141,0,17,188,1,13,39,11,16,190,1,13,16,175,140,234,191,1,13.Z 57,142,1,82,166,128,129,255,38,29,140,1,90,38,245,166,140,217,129,6,39,5,108,140,210.S\ 32,9,111,140,205,111,140,200,111,140,198,110,156,192,166,140,191,129,30,39.^ 5,108,140,184,32,241,166,140,180,129,3,39,5,108,140,173,32,229,111,140,168,142,1,82,166.` 132,138,63,167,128,140,1,90,38,245,32,210.b 65162.d65237,4/f:LOWERCASE PATCH'/Dh: START=65070 END=65156 EXEC =65070/Kj:/l: CONVERTS ALL LOWERCASE INPUT INTO UPPER CASE EXCEPT FOR ANYTHING ENCLOSED IN QUOTATION MARKS0n: OR WHEN PRECEEDED BY AN APOSTRPHE (LIKE THIS LINE) SUCH AS REMARKS LINES0p: THIS ALLOWS COMMANDS AND PROGRAM ENTRIES TO BE MADE IN LOWERCASE WITHOUT A SYNTAX ERROR0r I65070 651560tP: I,P:0v 650700x 182,1,163,167,141,0,74,190,1,1641 z 175,141,0,68,204,126,57,183,1,16313| 48,141,0,7,191,1,164,231,140,2261\~ 57,158,166,166,128,39,40,129,34,381 6,99,141,0,39,32,242,109,141,01 33,38,236,129,39,38,6,167,141,01 23,32,226,129,97,37,222,129,122,341 218,128,32,167,31,32,212,111,141,02 3,126,131,4,0,141,16926: WILDCARD DIRECTORIES(*) '2 79,142,80,66,191,193,241,166,159,0,166,129,34,39,3,22,124,92,23,120,229,182,9,76,187,9,84,129,84,16,39,124,77,189,199,157,189,185,88,204,17,2,151,2363u 215,234,198,3,215,237,142,6,0,159,238,189,214,242,31,19,166,132,39,69,67,16,39,0,154,16,142,9,76,166,164,129,42,16,39,0,15,161,192,38,48,16,140,9,83,39,5,493 33,126,80,132,48,8,31,19,16,142,9,84,166,164,129,42,16,39,0,35,161,192,39,4,48,24,32,13,16,140,9,86,38,2,32,19,49,33,126,804 163,48,136,32,140,7,0,38,173,92,193,11,35,158,57,48,24,53,64,189,165,73,52,64,52,4,52,16,198,8,189,185,162,189,205,27,198,3,189,185,162,189,205,2757 230,0,193,10,16,36,0,3,23,124,37,79,189,189,204,23,124,30,174,228,134,66,171,12,23,124,18,230,13,23,124,19,31,137,79,189,189,204,189,185,88,53,16,53,4,32,166,575=5RX20539 207625\: I5h: X,I5p X5 0,0:," D I R E C T O R Y O F D R I V E : 0"53,1,U::3,15 2053953,1,U::3,15A&HFAA0:BA&H6B:5166mDB1A22,200:A23,162:A32,200:A33,162:A36,142:A38,200:A39,138:A41,201:A42,190:A46,200:A47,1626A&HAF90:BA&H02:516:6 E1,9F,00,A6,26,02,0E,9F,D6,68,5C,26,4B,86,03,B7,09,59,F7,09,5E,FC,C9,50,DD,76,1F,50,C3,00,0F,FD,C9,50,8E,C27o A6,BD,C9,38,7E,CA,6C,DC,76,FD,C9,50,CE,02,DC,34,40,5F,A6,C0,27,1B,5C,85,80,27,F7,1F,51,30,89,00,1A,A1,81,277 06,6D,84,26,F8,20,09,A6,82,A7,5F,20,E1,35,10,39,7E,B2,77,83,27,AB,2B,AC,2D,AE,2F,AF,5E,AD,2A,B2,3E,B4,3C,007:7 BD,FA,A08FA B: H$:F,("&H"H$)::8#:8> B36:C4117:L66:5308T C4274:L68:5308dC3724:L70A1,81,277 06,6D,84,26,F8,20,09,A6,82,A7,5F,20,E1,35,10,39,7E,B2,77,83,27,AB,2B,AC,2D,AE,2F,AF,5E,AD,2A,B2,3E,B4,3C,007:7 BD,FA,A08F &':COPYRIGHT (C) T&D SOFTWARE 1990&| :65497,0:"(E)ASY OR (D)IFFICULT";DE$:DE$(DE$,1): DE$"E" DE$"D" 10&2:0,0: 1,17:2,63:3,32:4,16:5,5:6,0:1,400:2,400:3,400:4,60:5,60:6,60:7,60'1:(14,22),4,1,1,.25,.75:(20,18),6,1,1,.50,0:(26,22),4,1,1,.75,.25:"BM14,26NR12R2ND4NG4R8ND4NF4;BM14,12NF2G2NF2BG2NM+2,-1D2E2":(20,20),1,1:(18,18),1,2:(22,18),1,2:"C6BM14,22M+4,+2R4M+4,-2"(("C1BM12,30R16":(20,28),1,1:"C4BM14,26R10":5:"C5BM14,16ND3R5ND3R5D4L4NU3L4NU3LNU3HNU2HNU"(/2(10,10)(30,30),1::(10,10)(30,30),3(<(20,20),10,3:(20,20),3,3:X13:(20,20),10X,X2::(20,20,6):(10,10)(30,30),2(F)P2:"BM12,10D6L2F3E3L2U6L2RD10":(10,10)(16,20),4::(10,10)(16,20),5:"BM10,13E3D2R6D2L6D2H3R10":(10,10)(20,16),6::(10,10)(20,16),7)_Z1,17:2,63:3,32:4,16:5,5:6,0:(20,0),"FIND THE SHELL!!!")id410)nX1:Y1:2:(30,6),"# OF MOVES": 390)x0:(30,7),M1:2:(30,7),M: 400) (341)247 Y1 YY1:200* (342)247 Y9 YY1:200*1 (343)247 X1 XX1:200*W (344)247 X9 XX1:200*aA$*w A$(13) 210*120*ȁ120*:THE CHECK*܀ C14* XA(C) P11:EC:250**C14* YB(C) P21:FC:280*+- P11 P21 MM1:320 : DE$"D" 310+" P11 2:(30,10),"'X' HIT": 1,1:C1500::0:(30,10),"'X' HIT":2:MM1:120+, P21 2:(30,10),"'Y' HIT": 1,1:C1500::0:(30,10),"'Y' HIT":2:MM1:120,h6 2:(30,10),"YOU MISSED":(30,11),"YOU CRETON":C15:1,1::C1500::0:(30,10),"YOU MISSED":(30,11),"YOU CRETON":2:MM1:120-"@(X209,Y209)(X2011,Y2011),1:(30,10),"GOT ONE!":TT1:(250,T2070)(270,T2090),1:C1500::(X209,Y209)(X2011,Y2011),2:A(E)0:B(F)0:0:(30,10),"GOT ONE!":2->J T4 P10:P20:120-T"V20":X1511:"O1T255L255V-;BAGFEDC": 1,(63): 2,(63): 3,(63): 4,(63):5,(63):.^:3,32:3:(0,18),"THE TURTLES HAVE BEEN ELIMINATED!!!!!":(0,17),"CONGRATULATIONS ON YOUR SUCCESS!!!!!!".:h(0,0),"FINAL SCORE WAS":(16,0),M.r1,17:2,63:3,32:4,16:5,5:6,0:(140,85)(160,105),2:(120,65)(140,85),1:(160,65)(180,85),1:(120,105)(140,125),1:(160,105)(180,125),1/#| 390:(0,20),"PRESS A KEY TO PLAY AGAIN.":44539:0:M0:T0:P10:P20:90/G65496,0:0::"END PROGRAM.":/(X202,0)(X204,10),4:(192,Y202)(202,Y204),6:(X202,0)(X204,10),5:(192,Y202)(202,Y204),7:/:THE SET UP0X19:Y19:(X209,Y209)(X2011,Y2011),2:Y,X0X140"A(X)(9)0,YY10<̅ YX 4500Tօ Y4 Y0::4900r A(X)A(Y) 450 : 4400Y0:X140B(X)(9)0YY10YX 5100 Y4 Y0::5500 B(X)B(Y) 510 : 5000&Y209)(X2011,Y2012J&C:COPYRIGHT (C) T&D SOFTWARE 1990 coast to coast ISSUE #100&f:****************************&:* COAST TO COAST *&:* VERSION 1.5.1 *&:* SOUNDSOFT SOFTWARE *&:* SISSETON S.DAK *':* MARCH 1986 *'8 :****************************' X()::POKE65497,0 HI SPEED POKE FOR COCO3 CHANGE TO 65495,0 FOR COCO 1 OR 2' 4,1::1,1' (12,89)(49,89),:(49,71),:(51,71),:(51,67),:(53,67),:(53,71),(F (55,71)(52,71),:(56,71)(56,89),:(49,89),:(57,89)(59,89),:(59,69),((79,69),:(79,71),:(77,71),:(77,88),:(79,88),:(79,90),:(75,90),("BM75,90;H4L2G3D1")#(66,90)(59,89),:(62,90)(12,90),:(12,89),:(23,88)(23,87),:(20,87),:(20,85),:(29,85),)(29,87),:(27,87),:(27,89),:(59,69)(59,63),:(67,63),:(75,69),:(68,72)(74,72),)(68,72)(74,72),:(74,77),:(68,77),:(68,72),:(61,72)(64,72),:(64,79),:(76,83),*`(76,85)(63,82),:(62,82),:(61,76),:(19,92),5:(19,92),3:(32,92),3:(32,92),5:(70,93),5:(70,93),3*(149,93)(149,79),:(167,79),:(167,71),:(165,71),:(165,69),:(181,69),:(181,94),:(164,94),+F"BM164,94;H4L3G4L1":(152,94)(149,94),:(183,90)(229,90),:(228,93),:(181,93),:(171,78)(177,78),+(177,72),:(171,72),:(171,78),:(169,70)(178,70),:(178,88),:(169,88),:(169,70),,$(181,69)(181,65),:(183,65),:(183,70),:(181,70)(188,70),:(188,90),:(215,90)(215,87),:(211,87),,(211,84),:(221,84),:(221,87),:(218,87),:(218,90),:(222,96),3:(222,96),5:(206,96),3:(206,96),5- (158,96),3:(158,96),5:(149,84)(182,84),:(188,74),:(149,87)(181,87),:(187,83),:(19,35)(19,15),-f(31,15),:(31,35)(19,35),:(38,35)(38,15),:(48,15),:(48,35),:(38,35),-(54,35)(54,15),:(64,15),:(64,35),:(64,25)(54,25),:(71,35)(82,35),:(82,26),:(71,26),:(71,15),:(82,15),.b(87,15)(100,15),:(93,15)(93,35),:(120,15)(134,15),:(127,15)(127,35),:(141,35)(141,15),:(151,15),.(151,35),:(141,35),:(171,35)(185,35),:(171,35)(171,15),:(184,15),:(190,15)(190,35),:(199,35),:(199,15),:(190,15),/(205,35)(205,15),:(216,15),:(216,35),:(216,25)(205,25),:(224,35)(233,35),:(233,26),:(224,26),:(224,15),:(233,15),/(239,15)(248,15),:(243,15)(243,35),:(243,15)(243,35),/ J1500:J0X!(111,123)(111,139),:(121,139),:(121,122),:(111,122),:(121,130)(111,130),:(135,139)(135,131),:(142,122),0"(129,122)(135,131),:J1500::(51,160)(38,160),:(38,171),:(51,171),:(51,183),:(36,183),1>#(59,184)(59,160),:(72,160),:(72,184),:(72,171)(59,171),:(79,184)(79,160),:(86,160),:(86,181),1$(87,160)(93,160),:(93,184),:(119,184)(119,160),:(134,160)(134,184),:(134,173)(119,173),2%%(146,184)(158,184),:(152,183)(152,160),:(145,160),:(158,160),:(165,160)(165,184),:(178,184)(165,160),2&(179,160)(179,184),:(188,160)(202,160),:(195,160)(195,184),:(214,184)(228,184),:(227,161)(214,184),:(214,160)(227,160),3K'"T9O2L2GL4CDEFL2GCP16CL21L4FGABO3L2CO2CP16CFL4GFEDL2EL4FEDCL2O1BO2L4CDECL2EL1DL2GL4CDEFL2GCP16CL2AL4FGABO3L2CO2CP16CFL4GFEDL2EL4FEDCDEL2FO1BL1O2C"3U( 633w):****HIGH SCORE ROUTINE*****3*:@235,"GAME OVER"3+"V15T3L4CDCL1D#"3,J1500:J3-:NM$:"YOUR SCORE WAS $"MO3.T110: S(T)MO :554/"YOUR SCORE PLACES #";T420A$"***":"ENTER INITIALS:"4G1G13:@340,A$;4[2Z$:Z$""504o3"T255L15O3AA-"44(A$,G,1)Z$:G45@340,A$;46F10 T 1:I$(F)I$(F1):S(F)S(F1)::S(T)MO:I$(T)A$47@480,"PRESS TO SEE HI SCORES";58(13)56579:" *** BEST SCORES TO DATE ***"5::T110:7)"";:"## % % ###,###";T,I$(T);S(T):::8)"PRESS "5;(13)595:******INITIALIZATION******5?:CLS5@15006AMO0:WK0:DA0:MN0:MI0:A8:RT06]B CT$(30),PD$(6),PD(6),WT(6),RT(6),DT(30,30),MN$(12),DA$(7)6C J130: CT$(J):::READ IN CITY STRING$6DJ16:PD$(J),WT(J):::READ IN PROCUCT$,WEIGHT$,RATE$6EJ011:MN$(J):J:J06: DA$(J):J78FJ130:X130: DT(J,X):X:J:: READ IN MILAGES BETWEEN CITIES7GM1$"O3T200L10CC#DE-EFF#GGG#AA#BO4CC#DE-EFF#":M2$"V31T10O1L4CL200O4BA#AG#GF#FEE-DCO3BA#AG#GF#FEE-DCO2BA#AG#GF#FEE-DC#C"8'HM3$"T15V15L4O4ED#ED#EO3BO4DCL4O3AP4":M4$"T2P4V25L16O4CDGL8O5CL16O4AL4O5C":M5$"T2O3V31L10AV16AV8AV3AV1L20A"84I65494,08`JJ15:Y120:"V31T25L25O1ABAB":Y:J8K:***START MAIN PROGRAM****8L:4)"YOU NAME PLEASE":7);:NM$:M5$8M::6)"< TRACTOR SELECTION>"8N::3)"(1) NEW KENWORTH AREODINE"9O:3)"(2) 2 YR OLD PETERBUILT"9AP:3)"(3) 4 YR OLD FREIGHTLINER"9^Q:7)"WHICH ONE <1-3>";9RI$:I$""82 : TK(I$)9S TK1 TK3 M2$:779TTK1 TP3000 :TK2 TP2500 :TK3 TP2000:U TK1 MP6 : TK2 MP5:TK3 MP4.5:>V TK1 TR100000 :TK2 TR80000 : TK3 TR60000:]W:***PUT MUSIC HERE*******:X::"OK "NM$:"WE WILL START YOU OUT IN KANSAS CITY MO. THIS WILL BE YOUR HOMETERMINAL THROUGHOUT THIS SESSION GOOD LUCK!!";Y:3)"PRESS TO CONTINUE";ZA$:A$"C"90;/[M5$:M3$:M4$;O\:*******MAIN LOOP*********;h] M5$:MN12 41;^:"MONTH:";MN$(MN);" DAY OF WEEK:"DA$(DA):7)"CASH=";:"$##,###.##";MO:5)" MN";MN;" WK";WK;" DA";DA:NM$" YOU ARE IN ":CT$(A)<_"******LOADS AVAILABLE******"";CT$(B);:24)DT(A,B):D(Y)B:Y=Ab:7)"[ WHICH ONE ]?": DB1 DB1=ecI$:K(I$):K1 KDB 99=}dDADA1:M5$:ZD(K)=eMIDT(A,Z):DADA(MI500):114>f(9)1:W(6):NM$:"YOU HAVE A LOAD OF "PD$(W):"GOING TO: ";CT$(Z):"WEIGHING "(WT(W)1000)" POUNDS":M3$>/gRT((50(50))100)>jh"PAYING ";:"$#.##";RT;:" PER MILE": RT.9 M4$>|iMOMO(MIRT)>jJ11500:>k122:AZ>l92?mBB(TR):BB100 "YOU BLEW A TIRE!!":J(100)300:MOMOJ:"NEW TIRE COST $"J:TRTR40000:M2$:X11500:X1?n?oBB(200):BB10 "YOU HAD A BREAK DOWN!!":J(500)TK:"COST TO FIX $"J:MOMOJ:J1500:J:150,1:10,1:150,1:X11500:X1@pBB(200):BB10 "PERMITS TO BUY";:J(100):MOMOJ:"$"J:J1500::M2$:X11500:X1@tqBB(200):BB10 "YOU HAD A SPEEDING TICKET":M2$:J(50)50:"IT COST $"J:MOMOJ:J1500:J: : @r:***DAYS ON THE ROAD****@s DA6 DADA7:WKWK1:116:136: : AZt WK4 WK0:MNMN1:MOMOTP:125,10:10,15:"TRUCK PAYMENT OF $"TP" PAID!":M2$:J1500:J:"INSURANCE PAID $";850:M2$:MOMO850:J11000:JAluJ11000::Av:****YOU SAT ONE DAY****B7w: NM$:"YOU DIDN'T GET LOADED TODAY SO YOU HAD TO SIT. IT STILL COST $25 FOR EXPENSES THIS DAY. PERHAPS YOU WILL GET LOADED TOMORROW. YOU BETTER HOPE SO "BDxMOMO25BdyJ11500:J:125,3:114:Bz:*****REM TRIP REPORT******B{"******TRIP REPORT*****"B|M5$B}"INCOME :";:"$#,###.##";(MIRT)B~DF((MIMP))((50)80)CDFDF100C-:"FUEL COST ";:"$###.##";DF:MOMODFCKTRTR(MI2):TR0TR100C[109:111CvZA(MI500):ZAZA20CMOMOZAC"MEALS ETC";:"$###.##";ZA:ZA0CJ11500:CCM1$:M5$CD< SAN FRANCISCO CA.,LOS ANGELES CA.,PORTLAND OR.,DENVER CO.,SALT LAKE CITY UT.,PHOENIX AZ.,DALLAS TXD KANSAS CITY MO.,NEW ORLEANS LA.,LITTLE ROCK AK.,ST. LOUIS MO.,DES MOINES IA.,MINNEAPOLIS MN.,DETROIT MI.,INDIANAPOLIS IN.EH COLUMBUS OH.,LOUISVILLE KY.,NASHVILLE TN.,BIRMINGHAM AL.,MIAMI FL.,ATLANTA GA.,CHARLOTTE NC.,NORFOLK VA.,BALTIMORE MD.,PITTSBURGH PA.E PHILLIDELPHIA PA.,JACKSON MS.,CHICAGO IL.,BOSTON MA.,NEW YORK NY.E PAPER,45,CANNED GOODS,45,CLOTHING,15,MACHINE GOODS,45,APPLIANCES,15,MAIL,20F4 jan,feb,mar,apr,may,jun,jul,aug,sep,oct,nov,dec,sun,mon,tue,wed,thu,fri,satFH:SAN FRANCISCOF 0,387,637,1255,752,762,1752,1861,2278,1987,2118,1825,1979,2399,2289,2426,2346,2325,2365,3093,2483,2721,3001,2823,2609,2902,2151,2173,3128,2930F:LOS ANGELESG 387,0,962,1031,691,389,1399,1577,1858,1687,1836,1709,1857,2288,2063,2242,2182,2011,2052,2716,2191,2412,2685,2647,2430,2703,1818,2048,3017,2794G:PORTLANDH) 637,962,0,1261,763,1268,2043,1820,2536,2189,2057,1816,1724,2384,2237,2441,2313,2369,2586,3257,2664,2779,2968,2797,2549,2859,2446,2117,3144,2914H6:DENVERH 1255,1031,1261,0,534,813,784,606,1277,941,863,671,917,1283,1063,1241,1119,1184,1325,2107,1430,1580,1766,1643,1427,1739,1198,1021,1998,1794H:SALT LAKE CITYIp 752,691,763,534,0,646,1257,1105,1775,1438,1362,1070,1186,1671,1566,1682,1618,1703,1791,2566,1934,2083,2223,2067,1924,2154,1656,1417,2376,2189I~:PHOENIXJ 762,389,1268,813,645,0,1002,1235,1496,1325,1481,1432,1677,2008,1725,1903,1751,1674,1677,2348,1827,2034,2349,2312,2087,2374,1458,1742,2670,2445J DALLASJ 1752,1399,2043,784,1257,1002,0,505,517,316,655,703,949,1156,892,1049,828,659,635,1343,822,1058,1351,1357,1208,1443,407,921,1753,1559J: KANSAS CITY MOKH 1861,1577,1820,606,1105,1235,505,0,839,423,257,197,443,769,501,680,513,578,725,1441,822,974,1160,1070,870,1170,686,542,1435,1233KZ:NEW ORLEANSK 2278,1858,2536,1277,1775,1496,517,839,0,417,698,982,1346,1070,802,915,701,532,346,860,480,722,1039,1135,1138,1229,206,919,1507,1335K:LITTLE ROCKL} 1987,1687,2189,941,1438,1325,316,423,417,0,396,560,825,877,609,728,514,346,427,1161,552,778,1023,1042,898,1136,264,657,1507,1250L:ST LOUISM 2118,1836,2057,863,1362,1481,655,257,698,396,0,370,630,534,244,422,256,321,512,1226,565,731,903,828,609,904,497,289,1207,976M :DES MOINESM 1825,1709,1816,671,1070,1432,703,197,982,560,370,0,245,587,479,662,588,693,826,1591,955,1061,1146,1039,776,1094,825,344,1337,1118M:MINNEAPOLISNF 1979,1857,1724,917,1186,1677,949,443,1346,825,630,245,0,685,593,778,705,833,1068,1769,1121,1151,1232,1113,887,1195,1055,410,1390,1217NT:DETROITN 2399,2288,2384,1283,1671,2008,1156,769,1070,877,534,587,685,0,284,193,382,543,756,1385,732,630,727,514,296,609,957,275,799,649N:INDIANAPOLISOo 2289,2063,2237,1063,1566,1725,892,501,802,609,244,479,593,284,0,177,114,283,478,1186,527,551,705,569,364,659,672,185,929,731O:COLUMBUS OHP 2426,2242,2441,1241,1682,1903,1049,680,915,728,422,662,778,193,177,0,214,383,574,1171,585,435,563,425,186,477,800,358,801,556P:LOUISVILLEP 2346,2182,2313,1119,1618,1751,828,513,701,514,256,588,705,382,114,214,0,174,360,1088,415,456,647,639,393,706,586,297,962,766P:NASHVILLEQ, 2325,2011,2369,1184,1703,1674,659,578,532,346,321,693,833,543,283,383,174,0,194,910,246,421,672,702,567,787,414,466,1092,900Q=:BIRMINGHAMQ 2365,2052,2586,1325,1791,1677,635,725,346,427,512,826,1068,756,478,574,360,194,0,754,150,391,708,771,788,868,245,657,1226,978Q:MIAMI FLRb 3093,2716,3257,2107,2566,2348,1343,1441,860,1161,1226,1591,1769,1385,1186,1171,1088,910,754,0,663,740,971,1094,1180,1230,912,1397,1520,1334Rp:ATLANTAR 2483,2191,2664,1430,1934,1827,822,822,480,552,565,955,1121,732,527,585,415,246,150,663,0,240,557,654,683,748,399,708,1108,854S:CHARLOTTE S 2721,2412,2779,1580,2083,2034,1058,974,722,778,731,1061,1151,630,551,435,456,421,391,740,240,0,310,418,495,512,632,737,848,618S:NORFOLK VAT# 3001,2685,2968,1766,2223,2349,1351,1160,1039,1023,903,1146,1232,727,705,563,647,672,708,971,557,310,0,228,421,265,949,865,581,365T3:BALTIMORET 2823,2647,2797,1643,2067,2312,1357,1070,1135,1042,828,1039,1113,514,569,425,639,702,771,1094,654,418,228,0,245,96,1012,717,427,199T:PITTSBURGHUR 2609,2430,2549,1427,1924,2087,1208,870,1138,898,609,776,887,296,364,186,393,567,788,1180,683,495,421,245,0,308,943,476,574,379Uf:PHILLIDELPHIAUÆ 2902,2703,2859,1739,2154,2374,1443,1170,1229,1136,904,1094,1195,609,659,477,706,787,868,1230,748,512,265,96,308,0,1106,785,315,106V:JACKSON MSVņ 2151,1818,2446,1198,1656,1458,407,686,206,264,497,825,1055,957,672,800,586,414,245,912,399,632,949,1012,943,1106,0,745,1455,1224V:CHICAGOWdž 2173,2048,2117,1021,1417,1742,921,542,919,657,289,344,410,275,185,358,297,466,657,1397,708,737,865,717,476,785,745,0,1004,809W&:BOSTONWɆ 3128,3017,3144,1998,2376,2670,1753,1435,1507,1507,1207,1337,1390,799,929,801,962,1092,1226,1520,1108,848,581,427,574,315,1455,1004,0,208W:NYCXIˆ 2930,2794,2914,1794,2189,2445,1559,1233,1335,1250,976,1118,1217,649,731,556,766,900,978,1334,854,618,365,199,379,106,1224,809,208,0753,1435,1507,1507,1207,1337,1390,799,929,801,962,1092,1226,1520,1108,848,581,427,574,315,1455,1004,0,208W:NYCXIˆ 2930,2794,2914,1794,2189,2445,1559,1233,1335,1250,976,111# >edb`][ZXVSQPMJ!G%D)A->1;5895=2A](1# Kk  $ &* !.- *, ' 1!3#9$6 7-&+*1 ?3?/?Y?c??6?5x+!2<27222-2(?"? 8"8111**&###% ##1#2((-(&((()((((P??????? ??????1F < 6=?DEMO OBJ@SNDTBL BIN,J&9J&9BCjC8U Z&#0!%UA#CUA$CBӽB_'~HPRESS RESET TILL SCREEN IS BLUETHEN PRESS ANY KEY TO BEGINO@PC 65B0r##߶9B~A @@À?$""ŷ÷9Ƿɷ˷̷ηз9Ƿɷʷ̷Ϸз9P9;6޾C$&C$796'0&7J&9B;&60&B;9B;>60&&B;9>&9"6Z&017Z&9CB?BA'C0'1 '<@%/@0J&0 1 Z&BA1!B?0~C~C0~C9~CB;B=B?%@BADBC6BB;B=0 1 %%B?DtBADtB;0B;B=0B=B?0B?BA0@BABCBCE7J&9Z&9ȖȖȖȖȖȖ000F000B=&ADB;C "C %p"1?~D1!C{B;0D&ʽBB&ABBӆ& BB C&B' & B=0&l9?"1&"F~E?19%z ޾B{BBBB'B~J&Z&޿B{9B{ 'B}HH 9BBBBB'HH BJ&O BJ&~EB BCBBCZ&9BB'"/')愦 '" '"Z&0 ٦1!J&9BB9 003500 NICK WAS HERE 002000 THE DONUT PATROL 001500 FLOUR POWER 000300 THE RAP MACHINE 000000 000000 000000 000000 000000 000000 ********************************F A M O U SD O N U T B U S T E R SPRESS ANY KEY TO START GAMEANGRY ANGELO HAS STRUCK AGAINCQUG' CUG(CF+0!1B;B=CB;B=G\&GĽE~JH$B?BCBCB?1"B?Z&9B;B=!0 1 Z&B;B=9ĀO& U Z&0 %9·ƷػпƿJLCMɛ͓ل200绯ƳܷλֿNYZɃхќ130oҷܻڿEMZKG̓Ճ՜170[꯳ֻܷ¿W̓ќٜ190ܷ»ܿDZEX͐ѐՐ250귳³ܷƻܿHPZO͎͙Ճ200/o³ܷķػ»ʻҿĿܴXIKCGɔќ200g³ַڻ»̻ԻܿKLɜՊՒ180³ȳֳڷܻĿUəͅу110Yطܻƿ¿̻QIW085K%U&NŽN B;B= 01Z&B=B;1Z& C&BABBӎ&ANO1(NK O('C B;BB>EBBӎ>ĽEֆC&B;Z&NBB''BLB C&NUCxEC&EC&`9 EXTRA LIFE BA Z&01BAZ&9B&@A0 *&U !0&9B*0&& YIPPEE B;B?B?B?B?B?B?B?B?01B;Z&9OOOO013Z&9BB3^& 39& Ĥ9B~OOOO013Z&9MBbCQBӎP.CCB',&O PRACTICE GAME YES OR NOBAICQ00a4G.UCBbB<6?~E7Z&NBBBbL 'QBbHB`aۿBBBBBBBB^ Z&BBBBBaaB_abadab]Cab0&2& 0&BB'&LB%B1Z&EB&[1BB'&AAIBb' 'N''''F'~TBB'1?#"BB~Q1!3"C %OB;ĦAB0 3 Z&B%?ݽEB1BO<ħ1 3 Z&B1B~TԌӎאVR7O *Ć 1@%64@E741Z&~TBB'1"B?E~R1 "BO~R ħ1#3CZ&1.3N%~TBBBZ'']1?%'~S]'Z1!"BB60C 70"BB?E~RܽO013Z&~TBBB&0&&1?&B~Sa0& 1!'BB64@@ Z&741Z&~TӶBLB%B &B; T,T,T,B;&B;T,T,?E~TӾB;!0 1 Z&9B'I"C1!BTxB'I%C1?BTx~TӽOOA! Ć!! 9C ("½TB~T\C ("ܽTB~T6 ?E7 9B'&B zB'BBBB'EB&0B0 Z&B B'FFF F *^^^ ^ B&0~U B&+B'$B'O_ TBIBC'BA&IC 2%2&&鿁'1? &Á'1!BCBAL%Bm0J&B;B;_B'=BCBA60a>E70BCBABA0FBƿBBCBBCBS%2~VBC~U64B&A&;&501Z&74/ħħħ013Z&9B B;B1^&1B=B=B;9B'4BB'101Z&B0B~a;BO B'''r''~\l'.&'tr'߷'w'BBOBXXB&1B&B1BBBBBBB'_BB?LE~\lBB'~XWOoBB~W'q1?BXX\ 66?BE769BB' ঩'71!BXX _'B& BB'1?B BBBB>E~XB&B9&2߷&&&&q'ABBB'N'N'.BLB 'k% B1J&B&O~X2'21!B~YX~YX'~YX' 1?B~YXBB>ڽE~XBB>ĽEBB&'B~WZI&1BBBB~ZbZI&k1@ BO~WB~WB1&J1!9'.&ZJ1@BB''O>ڽE~WZL1~ZBBBB'99Baa"GB1`B %-B1FB?E֎ƿBB'2BJB`~[.O~[.JB"OBB'~P~\lBB *!T !1@Z&Baa!0 1 &?E־B0@B&'B1BB9U[@CU[QCU[ŀCU[ŐCU[řC9SCOREBONUS TIMERDOUGH THROWSFLOORLIVESB&B'B߷'CB&i1"BBBU[BBJB66?~Eֽ`76~W1?_ BS'O&B1 3 Z&BY&~\BLBB;B= a?nE־B;B=~\BUT"BBG'VO ]]013Z&B&2BBG?Eֽ`~]3& Ĥ9B~] Bb '~^B"ҶB&U1¦'1?' 1?&5߁&-1?&#B;^' 1$&~]B;"BB&f^'<'VB=B?"&~]B?!0 1 Z&B="0"1$~]B'^FBBCBB'B Bӆ&0''&&'B&#&BBaa66`ȽE76B'Bb &1BI"'`fEB;Z&~OPRACTICEBӎ#%Z&0 1,@%C&F66a4"%Z&7G\"L0! 70`bG|!1?`b&`b1#a4Z& ' C8Bӎ`&C`CChZ&`b1-`b`dޭ߁'`d '2'+ 'A%ہZ"'ϧ`d`>E֎?ѽE~_`b'0 `d`?E~_`bUC9CONGRATULATIONS DONUT BUSTERTYPE YOUR NAME AND PRESS ENTERB&:Bӎ@Eaa4%FCaf'ab%]C~`o`f~P|`B0``ōC`Bb '0` 1``ŕC`B0``şC9 `0`9a8L9"Z&B'䋎a4FC900~a 000000aaLaa&aaaf'߆Baa~W000adJ0% ab]Cab&9_990~aiAuP|`B0``ōC`Bb '0` 1``ŕC`B0``şC9 `0`9a8L9"Z&B'䋎a4FC900~a 000000aaLaa&aaaf'߆Baa~W000adJ0% ab] &A:COPYRIGHT (C) T&D SOFTWARE 1990 docs lister ISSUE #100&G&@96," THIS PROGRAM WILL LOAD/PRINT THE DOCUMENTAION FOR EASY BASIC 3."&:" PRESS ANY KEY WHEN READY"&I$: I$"" 4&0:60000'8000:ML96:KKML24: L$(KK)'XQ(&HC000): &HC000,0: (&HC000)0 CC3:WW80:NL23 : CC1:WW32:NL15'm &HC000,Q:PD2' Q68 DN1 : DN1'::" super list":(#" THIS PROGRAM WILL LET YOU VIEW AND/OR PRINT ANY ASCII TEXT FILE. (LIKE A DOCUMENT OR INSTRUCTION FILE.)(] " USE ? DURING VIEW MODE FOR MORE HELP ON COMMANDS."(!" AUTOMATICALLY SENSES DISK/TAPE AND COCO 2/COCO 3 MODES."("F$"EBASIC.DOC"((DF0:"I",#DN,F$(*LP1(, 1000( SP1AP 152*\SPSP1: L$(SPNL):100*wSPSPNL: SP1 SP1* 70*(SPNL)AP SPSPNL: 70* DF 100 : 44* 450:70*FF0: ISS AP*Dž (L$(I),S$) FFI:I10000+̋: FF0 480+&SPFF:SSFF1::+3 DF +E⁦ 1000:450+x:::" SEARCH STRING? ";: S$: S$"" 70+ 450:70+XI0 NL1+b#PD,L$(SPI):+ 70+I1 AP:#PD,L$(I):+ƅ DF 780+Ё 1000: 700+ 60, ::" UP ARROW... BACK ONE LINE":" DOWN ARROW. FORWARD 1 LINE":" SHIFT UP... PAGE BACKWARD":" SHIFT DOWN. PAGE FORWARD":" P.......... PRINT ENTIRE FILE":" CLEAR...... PRINT PAGE":" F.......... FIND TEXT- 4" N.......... FIND NEXT TEXT":" Q.......... QUIT"-H"" 840-%R70-;ޚ#DN: CC3 32-Z: @231,"DO ANOTHER? Y/N"-pK$:K$"Y" 30- K$"N" 993--AP0:PR$""- (DN) DF1:1099- #DN,X$-PR$PR$X$. (PR$)WW X$PR$: 3000:PR$"": 1040. CQWW.W (PR$,CQ,1)" " X$(PR$,CQ1): 3000:PR$(PR$,CQ1): 1022.CQCQ1: CQ0 X$(PR$,WW1):PR$(PR$,WW): 3000: 1022. 1024. APML 1010.K. APAP1:L$(AP)X$:.`1:20,CQ,1)" " X$(PR$,CQ1): 3000:PR$(PR$,CQ1): 1022.CQCQ1: CQ0 X$(PR$,WW1):PR$(PR$,WW): 3000: 1022. 1024. APML 1010.K. APAP1:L$(AP)X$:.`1:20