@L}5 _$% l0$)$$Hȱ$ UhL" `e$$%`$%`  R@W!( L(1   Y I`  d  Ld M * @  $ % CC$$)%1 Udߥ$9%: !0 S$% DD˙`  }J)Lr d M * @  $ % CC$$)%1 Udߥ$9%: !0 S$%} DD˙`  }J)Lr J  ((  p L ()   J}L= ( L 0q A    IB JC;? D W } LL  ` W )LA!  ߰")-݆ p" } $G@LL 08`Q")<2Q0 -G$Ș݆ UL# ; p8(()(0ʥ)NQ` }$GȘ݆LU )L ݆ L GȘ ݆LL )W>Z   HH)H  }p h  hyhy D L> L JJ    ! LA*` BF }7'8  M HN H` 8 Z  \LdJJ!"! GFE@F (!L }EE !E^ ^ E E7EȩEdE/EȩE  D } .L }  ;F d  ;?F7F? ( .   Z D LL d } . D  L    p  E` , d)  D L) 0BM݊L݉} ML  N݆ L NLML [ TEqEHȱEqEh 0Gȹ G} HLL GɛL  LFREE SECTORS G) *Gȩ GȽG GȌ*jj >G} C8jJ3j2CD( C202C ԠBX` N 1? l LlD:RAMDISK}.COMLu L1 L ;LHL  T`  `8  ɐ     `TU  } L ? .  t`GBJ ~DEHI B V0dV!}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEh"}DEL8HI4 0 HI,0 0  9 .G VLO#},0 L4*IJ`llD1:AUTORUN.SYSNEED MEM.SAV TO LOAD THIS FILE.D8:MEM.SAV J y08 B|DEHI$} V0 0`B;DEL`?<0LV`@ʆ v s? F0Ξ05: [ BDEHI%} VY8 B V  @  /DE `E:D8:DUP.SYSERROR-SAVING USER MEMORY ON DISKTYPE Y TO &}STILL RUN DOS B;DE J  (` 9 V⪍ ઍ  -'}LLu ÝDEHILV 9 .l 9 .l  `` s$B BH(}I|DE V BLV nB,DE JLV B V BLVDEIʩ BꭝLu },-K*KLINETEMPMENUBLNAMERAMXBORDHALPAGTINSTCOLOURSET_USETUP_STRPRT_OFSETUP_ENRAMLOAQUINEW_PAGDD\*}INDIEDITOEDTNRONCOMENSDUMDISKDIFLOAFSAVCHANGERRASRECOVEHELRAMSAVRAOFF_LININPAGENMBPRINTER_OFSDUMP_STRS\+}DUMP_ENSWITCPGTOP_BTNXT_PGXBORDEFIXNAMNBNTEM2FIXFLA&&5&&[`h@\,}@ B A }` C@DMEF@'\FZ]H\-};KK@@N ^YU O!v" m#p$op%@&5Z\.}'@(_)@*!z+_,a^-u_.@ /@012{34{}56\/}7n89KK- K I D S W O R D . B A S - * * * *Ϡà* * * * BB- Printer Contro\0}l Codes are in Lines 1350 AND 1450.pp- To change the Left Margin on the Printer change the number \1} of blanks in 'BL$' in line 900pp- To change the number of lines per page (if your Printer puts other than 6\2}6 lines on a page)(oochange the 'FOR-LOOP' in Line 10850 (the two screens-full of text use up 2x22=44 pri\3}nted2nnlines, and then Line 10850 puts in 22 more lines, 21 of which are blank, and one of which<""conta\4}ins the page number).Fpp- Adjust your (Fan-Fold) page so that printing begins 2 in's down from top of pag\5}e (shouldP##work for single sheets, too).Z\LL- ͭ󠠹 \6}堛^LL- 栠蠠ή_d""****************************""*\7} *""* ELECTRONIC TYPEWRITER *""* or SCREEN PRINTER - by *,""* John Fischer - Apr 8\8}7 *E""* (updated Oct 87, Apr 88) *J""* ⠸) *^""* 31 Hillview Road *""* Ottawa Ont\9}ario, Canada *""* K 2 H 5 G 6 *""* *&""****************************X\:}""****************************""* *""* See Lines Numbered *""* 1350 and \;} 1450 for *""* Printer Control Codes. *""* *""****************************\<}S +A)@1A0@S- speed up the cursor movement.>@@>- move left margin \=} over 1 column.>A>- set keyboard into lowercase mode. ` Kh@E:K- SE\>}T UP SCREEN IN FORCED-READ MODE. RR;@8,;@,;@8,;@,;@,;@,;@\?},R66-F:@,6-*6-66-B\Q0@@@70@@@Q0@@\@}@f-` ( (*( KIDSWORD.BAS -(pP$( by John Fischer '(J( NCAUG Ottawa, C\A}anada M(P(<06.&rint,ave,oad,ir'y,enu,uit<6. 8,(# ٯΩ86\B}-@)"A-`" A=@=(# \C}堠 ) `\= = = = = = = =L?O?- * * * * * * * * * * * * * * * * * * * * * * * * * *~]-\D} ***********'i 'i@P:FT i>:@',>:@#,TSELECT 'ELITE' PRINT SIZE (12 Char\E}acters per Inch)xI i>:@',>:@,I- SELECT ELONGATED PRINT (Double Width)\- READY TO PRI\F}NT@r]- *****************7` 4 &Χ䠠7 1. &έ\G}ŧ1 1. & 1 .. &㧠.. %\H}婠 ) "@'i \ P \:l]- **************Q\I}4G]G- * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *fP A'P/"@#-@@"+\J} i/ P( #-@@ i#  44 i>:@',>:@,>:@',>:@, C`@\K}@C- set left margin back to normal DA@dD- set keyboard back to UPPERCASE mode \L}@  T II- * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *   COC- * \M}* * * * * * * * * * * * * * * * * * * * * * * * * * *N 88GET DISK DIRECTORY (JUST THE SAVED PAGES)  `\N}@f -&g@# 1. &ˠ٠1  .. &堧쭱ŠH  A\O}5 A7Pz  7` 4 &򠠠7  6. &堠1 \P}6g) A2PBt- g@D:*.** A@P-  g >7@<@,4TYP4 7\Q}@<@,> A8<3"7@<@,4SECTORS% ) 3 A@Pn A8g ( @\R}g6QhL]A'L- (lower case) * * * * * * * * * * * *RUN)] )6-F:@^P}E DFLASDISKABh@@%Pd<;@,<6.% T}DISK #255 i +@1AR@CAYUA@'gA U}@CyA@eA@cAAC6-n]%6-F:A`,%AV$F:Aa,9%@V}@pM-@@&Q"Y%] s116,6,6,7,6,6,6,6,6,6,6,2,2,2,2,2,2,2,2,112,2xE%@'@e.%@(W}F:A`,E%@)F:Aa,a(( +(C( THE PAGE 6 LIBRARY](*****************X}***a((********************[0((The PAGE 6 Library consists of programs[(& collected from Users and User GrouY}ps[/(' in the U.S.A, Australia and Gt.Britain[(& and to the best of our knowledge allZ/(' programs are in thZ}e public domainA-@ @Z(ӠԠҠRAY@4!AU5-@@PRF:B2y,"[}@A 6-@& A,%D:MENU D:INTRO.SYS DISK #255 AV$\}P6-?:C:hL,,-C:,6-P@P@"N?AR&AV$P6-?:C:hL,,NTRO.SYSys D]}ISK #91 S?AR&AV$P6-?:CV$P6-?:C:hL,,NTRO.SYSys DH@AWeMIDCOBAKCOTITCODUPPEADKEFILESTARFLALINEWIDTERP@@P@BB@$`} THE MENU THAT BELLCOM USED! ________________________________ The CREATER!... for the CASTELL MENU }@ @!@A@ W6$a}-@6-@P'6-@B36-@@;@,M;@,W A ##@@K:( A$b}A2!!(@ this 'n' that4!!(@ <6-@@6(@1) CREATE$c}R =%%(@ 2) CREATER DOCS >%%(@ 3) FRACTAL FUN ?%%(@ 4) JOYSTICK TESTER @%$d}%(@ 5) MY GARDEN A%%(@ 6) XF551 ENHANCER B%%(@ 7) KIDSWORD C%%(@ $e}8) KIDSWORD DOCS D%%(@ 9) EXTRAS K<)@6-&@H< )!@ @uPOO$f}@@@@@@@@@Q!6. D:CREATER.OBJ! @R!6. D:CREATER.DO$g}C! AS!6. D:FRACTAL.HLP! AT!6. D:JOYTEST.BAS! @U"6.D:MYGARDEN.BAS" @V6. D:XF$h}551.DOC AW"6.D:KIDSWORD.OBJ" @X"6.D:KIDSWORD.DOC" AY 6. D:EXTRAS.BAS @[$i}Πà͛\5 +A1A 5%]""ΠŠŠȠÛ^D@+@$j}@5+D6-?:AUv,_ ΠŠŠϠÛ`h +A1A $k}<@Y@@e6-?:C:,,h%l -@@6?P<2A@@ b2$l}l A٠Ԡ6-6-&V@@6@$m}@V@@K:0" A:) A6-%@)-@D)@$p} FRACTAL FUNSorry but this will not run from the menu. You need to run it from DOS but there is no room on this`o} disk for DUP.SYS. Boot up with your own DOS, select option L and the filename SUPERHOP.OBJ DOS but there is no room on this`\N7!&@*"@2*(@ -'7 A0X(@>:,b"AU' A0l v"F:@$q},!@!" A`!@T A` Ap(ԠΠϠ)@(>:A%,$r}$ F:A,A6AP:F:A,"A6#@.@:6-@a(0(%END OF MANUAL - PRESS $s} TO RE-RUND(ANY KEY TO EXITVAdAUa@F:B2y,"@%5F:Ad,AU*Ad$t}AU5%D:MENU A *'(ERROR F:A, CHECK DISK*@*@$&-@@$u}"(@&  6-$3 +@@) A 3 AE *'('( (S)creen or (P)ri$}M) !"`3!3 L :::: :Lr:::IEL[::i:iIIL[:`:i::i,|}::L:`L{:w:w: C`L:L: D8:MEM.SAV: 8| 9 '9`L:L: D:DUP.SYS:̩ 8,}} x:ɀL: '9`88 |9Y:X: '9L); D8:DUP.SYS; 8::88 9 '98? :`;WL`; 9,~}Ln; ` :Y;Y;L;L;)} Setting Up ATARI 130XE Ram Disk; 9L; ; -9  ,} L;D8:; :9 :Y;L!!"@)"AApH!!"@)"AA`R A \<6-@7/@$}@E:9 AE<$f ( (Width 1) 40 columnsp( 2) 80 columnsz<)@6-&@H$}< @)!@A>"@6-@@;@@P:>$26-@/@@&}ul, however, because they allow no second chances. (i.e., pressing "D" will immediately delete any highlighte }d file!) The commands are: [Control][D] = Delete [L] = Lock [U] = Unlock [Q] = Quit to BASIC As long } as they have the extension ".DOC", the menu will display text files when selected. DOCumentation files will fill one } screen at a time and then wait for a key to be pressed before continuing to scroll. Pressing the [Esc] key will cause } an immediate return to the menu. HOW TO USE THE MENU CREATER --------------------------- First, prepare a dis }k to receive your new menu by formatting it and writing Atari DOS onto it. Now boot CREATER.OBJ and you'll see a sam }ple 4-line menu heading displayed at the top of the screen. Beneath the display is the prompt: "Press Return when you }'re finished making changes?". You may replace the 4-line menu heading with any words or design of your choice. Using }your Atari's editing keys, simply type over the current heading using any of the keyboard characters generated by you }r computer, including upper and lower-case, inverse, and graphics characters. Let your creativity flow. Note: It's w }ise to include some menu instructions similar to what is shown in the sample heading. Otherwise, when someone boots y }our menu they will not know how to access it. Don't press Return until you are satisfied with your menu heading. Als }o, make sure you have your formatted disk containing Atari DOS in your drive ready to receive the new menu. When you } press Return the screen will clear and you will be asked: "SAVE THIS VERSION OF 'CREATE'?" If you answer Y, then the }program will save a NEW version of the CREATER.OBJ program complete with your changes (replacing the sample heading) }onto the disk, giving it the filename "CREATER". If you answer N, or press Return, then you will immediately see the } prompt: "Filename:". Type in a filename for your newly designed menu, which can be anything. REMEMBER, if you wish th }e menu to autoboot you must be sure to name it "AUTORUN.SYS"!! (Problem: When you press Return, if you should let yo }ur finger linger on the key too long, you may pass by the option to save a new version of CREATER. Never fear, after } you have saved a copy of the new menu you will be returned to the menu display screen. You can then 'carefully' pre }ss Return and try again.) After saving your new menu, the program will return you to the menu display screen. You can } now make changes to the current menu heading displayed or you can press [Reset] to return to DOS. If you do make ch }anges and save another design, remember to give it a different filename than the last. Also remember that if you dec }ide to save the current version of CREATER, and you haven't changed disks, it will save it with the same filename "CR }EATER" and thereby over-write the version contained on your disk. Be careful. Once you have created the menu design } of your choice, simply copy it onto your disks. HINT: You might wish to place the menu twice on a disk containing B }ASIC program files. First named AUTORUN.SYS and secondly named DUP.SYS. This way THE MENU is quickly available when th }e disk is booted and also when "DOS" is typed while in BASIC. This saves having to reboot the disk when you wish to }simply load in another Basic program. Try it. Enjoy. BASIC. This saves having to reboot the disk when you wish to :0905  15 2 2151^116115ύ011$r2ԭ5 3)5)5ԭ0}x G@@L00)+& 2 L0=ɛ -L!1LV1L1 /3 3ȹ441L-4 v3 25 2H 0}2h͔5L3L3 2 k3U hh`DOC`QL3P1Lk0S1H /3h0B k3@ VL0LU!#$53 11810}1181111Ε5 1Lk0552 1Ȍ1i111i11115Lk0pppB4f5&&&&&&&&^6f^0}6&&&&&&&A1@BJ D2ELVK@BHILV^Щ6 2BD2EJ VBD5EHI0 V0%50}5 2iХiL[2 25 25`D:*.*` i@`8 ``@i `8@`0 BLV525<0}45`HH i ԍΗ552 ԍhh@ Lح1Э1Ѣ 24.4 240}𩛝4`D4E` 2BJ k3LVRH` 2BD4EhK)I JLV333 " A HA A A A 8}A`A AA A A@A`A AAA R\*** LOWER-RIGHT ***f&-8}@@&(@p&-@@ &(@z AP::0@@@%@$+@8}&T:,,(A @ R:,"@A  A P A &-@@&(@ 9} &-@@ &(@  A*** UPPER-RIGHT ***&-@@&(@&-@9}@&(@ AP::0@@@%@$+@&T:,,(A` R:9},"@A  Ap$ A .&-@@&(@ 8&-@@&(@ 9}B AL*** RIGHT ***V&-@@&(@`&-@@&(@j APt:9}:0@@@%@$+@&T:,,~(A R:,"@A@ A A 9}&-@@&(@ &-@@&(@  A*** LOWER-LEFT ***&-@9}@&(@&-@@ &(@ AP::0@@@%@$+@9}&T:,,(A R:,"@ A`  A A &-@@&(@ 9}(&-@@ &(@ 2 A<*** UPPER-LEFT ***F&-@@&(@P&-@9 }@&(@Z APd::0@@@%@$+@&T:,,n(A x R:9 },"@A A0 A &-@@&(@ &-@@&(@ 9 } A*** LEFT ***&-@@&(@&-@@&(@ AP::0@9 }@@%@$+@&T:,,(A@ R:,"@A AP A 9 }&-@@&(@ &-@@&(@ " A,*** DOWN ***6&-@ @9}&(@@&-@ @ &(@J APT::0@@@%@$+@&T:9},,^(A`h R:,"@A r Ap| A &-@ @&(@ &-@ 9}@ &(@  A*** UP ***&-@ @&(@&-@ @&(@9} AP::0@@@%@$+@&T:,,(A R:,"@A@9} A A &-@ @&(@ &-@ @&(@  A**9}* NEUTRAL ***&&-@ @&(@0&-@ @&(@:::0@@@%@9}$+@&T:,,D F:B2y,"@AN R:,"@APX&-@ @&(@ 9}b&-@ @&(@ l0@@@v A *** BEEP & START TIMER ***9}-(6-%@68,--!A#@%2@(@@9-@= _29}q@@ $ *** GET STICK RESPONSE *** F:B2y,"@A9} R:,"@A $6-R:,$READ & DEBOUNCE-@R:,A   (9}(68,-F:@,$AV%F:@ ,M +2@@@@?-@@C M A  =%29}@0@@9-@@= * 6-68,-4 R:,@A!>%%29}H-@@  $R\*** PADDLE TESTER ***fpS +@AR@90@@9}@S0@@@zUAV'AWU((ŠҠ9}9AV@'AW@9( Yellow line =(AW@(( Green line =AAV@'AW9}@A(Press for menu ,@A6-@v&P:Q:,'@,K@W/@a9}m,@/@v@ ,@&A6-@v&P:Q:@,'@,K@W/@&9 }am,@&/@v@&nAV@'AW@'A(A(&Q:, SAW@'n(9!}A(&Q:@, 002A(&Q:,@@002@A(&Q:@,@@59"}(S:,+0@@@5 A"5(S:@,+0@@@5 A"0@@@9#}fF:B2y,"@:2\2@f A A" 9$} *** DISPLAY RESULTS *** $ +@%@. /(/($The evaluation is over. Here are the8 %%( results for 9%} iterations:B -@L 6-8,V 8,"A$ ` 6-%@j ;-"@)"@)"@ )"@9&};6-%@t 6-%8,~   5(5(Overall accuracy = P:+&,'$A,% ))(Total error = P:'$A9'},% 66(Horiz. & vert. error = P:+&,'$A,% ,,(Diagonal error = P:'$A,% LL(Average respo9(}nse time = P:+','@`$A,'A seconds A%P + B-B((9)}̠Ӡ )&(CycleGridResponseTime)( C-@?(8,8,P:8,'@`$A,'A9*}C   A%P A .(.(#Press joystick to continue. T:,A%` $ D:JOYTEST.BAS9+}C   A%P A .(.(#Press joystick to continue. T:,A%` $ D:JOYTEST.BAS8|}33RVEGTEMPDISROWDISPLTPLTF4HTSEQROWSROWZROWGARBLGARDENJLONWIDFACILGARRHTSELTOKOLOTM=-}TJKJJLG@@@@@@@ =.}=/} !"#GARDEN LAYOUT PROGRAMBY CHARLES BARTISH (c) 1985, ANTIC P=0}UBLISHINGss;@ ,;A,;A,9@0,9@0,9@0,9@0,9@,9@,9@p,=1}T&;@ ,;@,;@!,B6.HIT TO CONTINUET@@' +@'0@@@=2}%-@@% @$)-@@) @.<-@A  1 @>:A%,=3}< @8## @ THIS PROGRAM WILLB!! @ ASSIST YOU INL%% @ YOUR SPRINGV$$ @=4} GARDEN, BUT YOU'LL`## @ HAVE TO ITj @ YOURSELF!tK A3KINITIALIZE VEGETA=5}BLE CHOICES AND USE DELAY AS DISPLAY TIMER~D6-@06-@'6-@DDEFAULT DIMENSIONS IN FEET A#=6}MENU A2DRAW PLOT6-@ +@@/) ! ԠŠŠƠҠ,(/(=7}.. &IF YOU'RE NOT SURE OF THE PROPER SIZE,-- %ENTER 30 FOR LENGTH AND 15 FOR WIDTH.7. &WE'LL TELL YOU HOW MUCH ROOM=8} YOU NEED.1 4 7 , A@( THE LENGTH IN FEET IS?, 6-A:,+ A`' THE WIDTH IN FEET IS?+$ 6=9}-A:,!6-6-$6-6-$'AP  B A2PRINT VEGETABLE CHOICES(1 +AR=:}@1@@2-* " Š͠ŠӮ- <16-#-@@16-%@FS=;}S 7$@ &@<$@ &@,7$@ &@<$@ &@,P Z4  0 "LET'S PICK THE VEGETABLES=<} WE WANT.4 d F:B2y,@An +  xQ* "EACH VEGETABLE WILL FLASH ONTO THEQ "SCREEN. IF YO==}U WANT TO PLANT THATQ* "VEGETABLE, RESPOND WITH Y FOR YES.Q "IF AN ITEM IS NOT WANTED, JUST HIT .  =>}  F:B2y,@A@, +,  ϠՠԮ6-@-@@0:-=?}@@6 7$@ &@<$@ ,:0YA0CC67$@ &@<$@ ,.7$@ &@=@}<$@ ,868,-8,68,-8,,68,-P:8,$,868,-8,6-%@  6-&@ +=A}E'  ՠŠĮ* - A-@AE "-@,$$ 7$@ &@<$@ =B},6 @L  * IF THE SELECTION IS CORRECT,L HIT . OTHERWISE, TYPE 1JAdAUT8 41 =C} WAIT...$#A@. A38 A ^ A0DISK STORAGEh +A@r'$  =D}Š' |//  VEGETABLE ROWSPLANTS//     6-=E}-@,,68,-+8,$8,,'+@$+&@,,868,-P:8,%?P,)8, @868,-@11 7=F}$@ &@<$@ ,8,P:8,,6-%8,   Total Rows      F:B2y,@=G}Ap@ 4 % CHANGE ROWS/PLANT NUMBERS: @6-@-- % LOOK AT PLANT LIST AGAIN: -- =H}% CONTINUE -- JUST PRESS: Π#41 A4p# A042A@&!@A@011PLA=I}NT THE GARDEN. SEARCH FOR TALLEST PLANT:u@!6--6-96-C+UAR@=J}u  ΠDI,-+@@&B:,%@,'@@F 7@++ # AFTER PLOT TO GET THIS PAGE.?  FOR PRINTOUT.C""  TO RERUN PROGRAM.HLF:B2y=S},"@(.(PLEASE WAIT...8#A@B A3L APM F:B2y,"@A!0N F:B2y,"@AP=T}O A! R9 +@A A)@9COLOR 2 GREEN\6-ABf 6-$'p'!@6-?=U}$' A!Pz%A%COLOR 3 BLACK,AP@yA/AP@y&-/AP&@y&A-AP=V}&@yAe@++@@S:6-6-@%A@%=W}COLOR 1 WHITE-@!@6-@-@8,6-%@"@ A7@=X}**,AP&%+8,'@,$'@v 44/AP&%+8,'@,$'@&%@   6-%@$  =Y}. 2@w2F:B2y,@A#P8 @@ APB --END OF MAIN PROGRAM. SUBROUTINES FOLL=Z}OWL MENUV ' +'0@@ @` A#j %  " % t %%  MAKE NEW GAR=[}DEN 1~ %%  RECALL PREVIOUS GARDEN 2 .  .  TYPE NUMBER OF CHOICE, RETURN 6-A:, !@=\}A# B A$A%p A( 1 1 &GIVE THE GARDEN A NAME, e.g., ±. -- %I'LL ADD =]}THE SUFFIX TO THE NAME.  6.D: 67@,. 67B:,%@,..GAR Ap A( - =^}- "WHICH GARDEN DO YOU WANT TO RECALL < 7B:,&@,4.GAR<6.7@0@@@; } >  6.D:*.GAR @=d}@ A(" @,  6 A(P@ @ B J $T ))OPEN DISK FILE TO =e}PRINT STORED DATA^ @@h  @r  @|  @ '6.7@<A,'=f} @ '6.7A<A,' @ '6.7A<A,' @ -@  6-8, @=g}  6-8, @  6-8, @  6-8, @  6-8, @   @=q}b********* b* PAGE 6* b* DISK * b* #255 * b********* b%DOS SYSb EXTRAS BASb SINTRO SYSb(_CREATER DOCb^MENU bvAUTORUN SYSb wRAMDISK COMbCREATER OBJb(SUPERHOPOBJbEJOYTEST BASbg,MYGARDENBASbXF551 DOCbVISIONS BASbXF551 OBJbATARI BASbROLLDICEBASbKIDSWORDDOCbKIDSWORDOBJb)KIDSWORDARBbnFRACTAL HLP 2 DISK SAVE COMPLETE.-@A2  $ DISK STORAGE SUBROUTINE ' +'0@@ @=r} %"  ˠ% & J) !DO YOU WISH TO STORE THIS GARDEN?J IF YOU DO, HIT AND .0 - - CU=s}RRENT GARDEN NAME IS 7@,: 0YA1D I ( DO YOU WANT A DIFFERENT NAME?I IF YOU DO, HIT AND =t}.N #0Y A)# A1X ++ #TYPE IN NEW NAME. I'LL ADD THE .GARb =67@,./67B:,%@,..=u}GAR3 = A)l $v LENGTH AND WIDTH PLOT  +AR@ !"@!A 3"@=v}!AA3A A A-@@ +-@6@/ A-@@ I-@@=w}$ >:A$,8-@@%< I >:@&, [-@@0+-@%@8 >:@,< N-@5=x}@[ >:@, [-@@+-@5@&8 >:A$,< N-@5@[ >:@, ]-@=y}@0+-@5&@8 >:@,L-@5&@P ] >:@, C"@!-@@C WHAT SIZE=z} GARDEN DO YOU WANT? &"@6. MY &6. US '"@6. YOUR '6. YOU 1-@@ 1 ={}x PLOT GIVES 6-@@6  PLENTY OF FRESH VEGETABLES, 6-@@6  AND IS NOT A FULLTIME C=|}HORE '-@@'  TO MAINTAIN. -@@  F:B2y,@A3`* $4 ) 6. 67@ =}},.)67@,.> -@@0H 3"68,-!68,-*68,-368,-R -@@ \ ) 6=~}-B:, @ )67%@,.f  p &&67$@ &@<$@ ,.z   $ )6-%@-@=})+    Y  1 #TO CHANGE NUMBER OF ROWS, TYPE R.Y #TO CHANGE NUMBER OF PLANTS, TYPE=} P. ! OTHERWISE, HIT .!  ,, $************************************ 5   5 VEGETABLE ROWS=}PLANTS ,,     .. 7$@ &@<$@ ,8,8,   4R A6=}  4P A6P  $' ' ENTER THE NEW NUMBER OF ROWS$68,-A:,.**68,-+8,$@$+&=}@,,'8,8$B) ) ENTER THE NEW NUMBER OF PLANTSLV68,-A:,`,,68,-+8,$8,,'+@$+&@,=},j$t-@~ 8, 6-8,6- $?6-+'AB,$@8?6-P:+8,'@,$+&@,'=},-@7AR@!AV7AW@@&%$"@ 8,$ A700 7=}@$&@%<@$&@%, $ERROR SUBROUTINES[ +(;(&THE LENGTH IS GREATER THAN YO=}UR LIMIT.K( PICKED[( ACTUAL,  ,  HERE ARE YOUR OPTIONS- - "OPTION =} KEY -* " - )) !ACCEPT NEW LENGTH--CONTINUE 1)) !REDUCE SPACING OF ALL BY 1=}0% 2()) !CHANGE NUMBER OF ROWS/PLANTS 32)) !CHANGE DATA OF CERTAIN VEG 4< A8  F**A:,A9 =}A90A@A9@P B6- APZ@ B-@268,-P:?$8,,6 @ APd, =}B+)A@AB,nH % YOU HAVE EXCEEDED 70 ROWS.H EITHER REDIMENSION 'ROWGAR' INx9- %LINE 10=}20, OR REDUCE THE SIZE OF YOUR9 GARDEN!,, $THE GRAPHIC RESOLUTION WILL BE POOR!$]]DATA Ŭנ=}ŬԠŬĠҠƠӬԠśASPARAGUS,42,18,10,3""BEANS--SNAP BUSH,18,4,172,18 =}BEANS--SNAP POLE,36,6,58,1BEANS--LIMA,24,3,228,8BEETS,20,2,85,12BROCCOLI,24,18,6,9!!BRUSSELS SPROUTS,2=}4,18,6,10CABBAGE,24,18,10,19CANTELOUPE,60,24,8,20CARROTS,12,2,85,26CAULIFLOWER,24,18,6,11CELERY=},24,6,29,13 CB1-BRUS/BRO/CAU,24,18,6,9" CB2-CARRT/RADSH,12,2,85,26,CORN,12,12,45,26CUCUMBERS,36,18,10,5@=}EGGPLANT,24,18,10,6JLETTUCE--HEAD,18,12,15,16TLETTUCE--LEAF,18,3,57,25^ONIONS,12,4,129,24hPEAS,24,3,22=}8,7rPEPPERS,24,18,10,17|POTATOES,30,12,45,14PUMPKINS,60,24,8,22RADISHES,12,1,85,28SPINACH,18,3,57=},27SQUASH,48,18,10,21TOMATOES,36,36,15,4TURNIPS,18,2,85,15WATERMELON,72,36,5,23;6-6-=}'6-;3GARDEN SUMMARY!37@s3>00x|73>00x`c6<9c` 33c366fffg~33>00xgfffff<Y}11111{!!\]_\ED!EOHI B V`}   Y} TURBO-BASIC XL 1.5 (c) 1985 Frank Ostrowski!  ӥL]""$$ (pY}%J[WܠjeC /D%Zub2gTSt$8®݊Ò2% 5RY}Ţtd.’$3@X7t5w5$?## $#L+D:*.*S:C:P:$#.#) `:#(6ENeU\l؏&/ؕ؄sأ$Y}LENeU\lأ$8آǔƐƉƐƇ4cY%٦rULۉCۄړp^gyض%iwܸJڅ*ܣ$ڭڞجئأأY}$ ,(""(222000000..222222222222222222222222222222**22*22(222(2222222222 ,(""(Y}0000000--**2*(22(2222222 V`hh@,lHH$HHHHHHӍl"Y}H$HHl $`GHFH\` ` 4ӭ l 4Lq ӠԪӅԆL} Ӡ L( Y}) ` b% +L:#HH 0 HHLj%ӥHlL{ee 8eeeY}eӦee褢%ƚƜ`88夅奅8Y}夕奕Ӡȱȱȱ㦢`L+`8` .E)))8@8e0 Y}*څۅ܅݅ޅ߄ԠF0y"ޥy"ݥy"ܥy"ۥy"ڥy"و0ǠF0y"ݥy"ܥy"ۥy"ڥy"٥y"؈Y}0ǠF0y"ܥy"ۥy"ڥy"٥y"إy"׈0ǠF0y"ۥy"ڥy"٥y"إy"ץy"ֈ0Y}ǠF0y"ڥy"٥y"إy"ץy"֥y"Ո0L-`8`E)))8i@0 *ڄԠY}"("!""" "L**""""""&О"("!""Y}" "L**""""""&О"("!""" "L**Y}""""""&О"("!""" "L**""""Y}""&О"("!""" "L**""""""&ОdY}"("!""" "L**""""""&ОL-6"e"Y}"e""e""e""e""i""}"""}"""}"""}"""}"""}""ǭ"m"""m"Y}""m"""m"""m"""m"""}"""}"""}"""}"""}"""}""ǥՅօׅ؅مԅՅօY}ׅ؅`` ` ` `80 `ԥՅ +.JJJJ)iFiFi1FicFi'ȐȦoFiUY}ȐFiiFi#iFiGi Fii@F iiFiiciՊFigi'iՊօשBL-`IY}))83Ԥԥդե֤֥פץؤإ٤L,K6"ХL--L--L-Y}-E0:e٥eإeץe֥eՐ؅٥ׅإօץՅ֩L-8٥إץ֥հ'I8Y}م٘؅ؘׅטօ֘ՅL-ؤm\G0Q@Ն֩م؅2եمֆשم"ե؅֥م׆ةեׅ֥Y}؅ץم؆لԘ)q +` . |. &7i |. ,%!L?.`刱䈱㈱∱Y}ሱ`ԅՅօׅ؅م`ԍՍ֍׍؍ٍ`ԍՍ֍׍؍ٍ`L.L. ԽսֽY}׽ؽ` L%/`ӽޕ &ԅ)@إ)JJJe)e - MY} 1. &Je0F 2 . /L(8`@ԠՈքׄ؄` . |. , . . |. , #/L(8`0 I@ԥ)Y} 2f / . & r 1. #/ &?P , .Iiԩ +)ԅ ,ӽޕL(`8`$Y})Ԧ61718191:1;1 (ť)8@0$Յ)e)e -F . / , . &1 1.Y} #/ &F I`U9>`D'RFuCU?b9dYdg@W2@?tS)%)@0)%ԅԢ / . &G Y} 1.Ӱ6 #/ &.ӽߕ ,ԅԥ B1 (`8``0?i? . . / , #/ &ԍՍY}֍׍؍ٍ . . ( / , O2 / ,0 .JeF 2`L+) .e٥eإeץe֥eY}Պi؊؅٥ׅإօץՅֆե1ԥ'JffffJffffJffffJffffم`ԩ&&&&*&&&&*&&&&*&Y}&&&*`Pi`)JJJeԅԘ)Peԅ`եԆ8@EB)JJJeԅԥ)PeԅԘ)3eԅԽ3eՅ՘)JJJ}3Y}}3`)JJJeԅԥ)PeԅԹ3eԅԹ3eՅդЧ` 0@P`'Nu pX@(#d,X L(  兢Y}0襙 bɥ⥋㩀 50ɥ0DȱȱȄ   ik#ZMkVgğe拰ㅋY}⅊0 eee拰 L f5дƨħ 4LY4 f5К,樥ŧH 4h h5L4樤ܱ.* O %30Y}  5Ԅ +(fԤԈ`ř嚰Ԥ`ڥۥड़0-԰eڅڐۈ0eeL+58` Y}O#`,#5  6`]5 6DE 68DHEIHI V0$ 6Sл BY} V,# 6` $#LllBHI V0HH V0Ԩh``{a$%Ȏ$$xө$Ѝ$ `Y} `@X a Ӆʢ ʎD  _ɠ %` ɩHH `өL: g% DY}:??????*.ARBөjJHH`ՠԢӱԙ!ӹ!`֝DEIHB V0Y|ڝDa۝EY}օܥׅݥܝHݝI V0+Ӡڑڑ0`l `  䅠 _ɠԐY}e拢 &L &Lħ © ¥4 䥝ň剰' k ɀ8@4= LY ĩ`OJ ]J?LY} KԪȱLRHHצ R, hhLRHHHHHH /0ȑȑޠhhhhhY}h`HHHHHHHHHH $H bɐhȥLHhhhhLň剰)Y}i桰` )``L(兢ħ #$ x Hҩ h$襚ҥ ԝ`Y} UV #T` ` `,H ¥ȍ` JKhLŢ  #)I L ¤Ȣ`L¦ ¦ LĩY} ½J*K+ $LąLĩ …L~ …`H Ġh é`,H hH Ġ  ĭ 8}}Y} L n [h`LkL © 8倝偝 Ġ  ĥ󥃅  Lĩ LHY} éLH#h ĩ`H hKJ L+ , H hHHħ s hKhJ  Lĩ# qL Y} ŘL ũ& QŽLM " ĽNL  ĥԝL՝M  ĥԝN%LV  ¤ħ` Ťħ` ƪ Ċ Y}Ťħ` ¢`届 x݅ L ĽCӠɀ L]Ɉ L] Ln LŠIY}HEDBL$HH hh +L `ħ LĢl ¦`OBRUT ԅՅ֦Y}󅗄`L+ ¢p 0 Hp hɈL` ,#,$,!Lé ,H ĥDEԝH՝Ih LY}©L $`L© , k ĩԅ  + ĥ 夨ħ`2ƪƪ ! A!Ƚa!Ƚ!Ƚ!Ƚ!Ƚ!Y}``氤hhL1@$ƪư 0 0 n$P`L+FҐ֥װ綾إٰو LǠFfY}ؐ ee&ee* &eeeԪeըee$.ƪ@!Ƚ`!Ƚ!Ƚ!Ƚ!Ƚ!`檦Y}!!!!`!@!^!` Ȅ 8 n奱 ٥Lǥ֤צưĘ=ŗ78֪א& Y} eԥe$`L: L ԅՅօׄ 1פ& ٤ţĢԅeՅe8包卅 ]&Y} 8Ԩժ%אְ`ֆL夨ħ` FҰg8&0ei֥i0Tׅiإi0BJe؅eم0&fZ}fff&0 &0 eeL+օפإ颎 %8包ԥ卅 L ɥ Z}ȱъŠe拰8``,ªȱȱI ѝ3ȥLɥHHO]Z}  ȥe暰Х ȥL+ʅȱhh`Lħ OԪȱԨ``L :0Z} `L(奷 bɥ󥋅ȱȱȱȄ#鈄0B8eeŶZ}ɛ,@LBˤ,ɛ`L?± ˤ樱f Oƨ x݅ + ~ [ˠ O樥0# +  L˥`Z}LL :ɛ,$PH h $P润䧰 ʐLʦ䧐 +` ʐL3LBˢZ}ԝD՝E֝HםI L 兢L]& 兢L% ,L6 ,L6 &L6 (L6妪@!I@!` ؐb`P KW ؐRB ؐZ}=;G ؐ4@ ;+ƪƪ@!=A! (ƪƪ@!A! ƪ@! ,@@檦@!`!!!!!!`ƪ@! ǩjҤZ} /L.٤ƪƪ@!@!, 舽`!`!!ـ!!٠!!!!!`@!jI*` . ֪ (Z }ϰ`(8` ֤ׅԄ +҅L: Lyƪ8吪周Ly sũ + ŐL Ly sŠԄ h L}Z } L}٩    e쪽pLyL( + ڥHJJJJ h) 0:i`  ک; n +ȱ)ȥ%Z }ݓ Lh ԍՅԄׅ֩өL:ƪ?Ԣ )ɠ )  -L &Lڦ@!)@!` n)8@Z } -L:` / n)8@I= n)8@/ѩ֔$ሄ ,L: + n 0L8 nZ } 0L8 n H1L8 n /L8 n /L8 n D/L8 n 1L8LLإL( &)ԥ)8@JjH@Z}MC)JJJe)e .F / .P . &F . #/ &L.L(HHHHHH /hhhhhh &Z} Y/hԅL:,` L _ܘ%ᨥ%Ly _ܘᨥLy _ܘEᨥELyٚ<|'g 0L`Z}!!!!i ` &LإL٥LyɥLzvmZ ƨ!0 4 䦵 ¥ԝD՝E֝HeםZ}I Lܤį eį L` x݅ƨLLLܤ ©`#ۢ Lĩ_,ߤZ} ڄ . eڅԥeۅհ"8څ֥ۅא8ܥݰL۠Q%0ԅإՅ٥ަ0%Q% Z}L-ե0LޥڤLyمօנ6&֐ eו`L( Hħ hբՅ `ޥԢ `ޥՅ֠Z}&&֐eܥeېڈ 7 \ 7 j N \ N j$0!ee80å/8ܥ۰uڕ0Z}eUiV`TUV`8UV`eTi`8TȢ` $L„')Q ȱ8 eZ}新`8`L齀).Q Ӱȱ8e新 O :L䅫# *$ŬZ} Ʃ HL"䥫ș L` Ml/#樱0ZS'`ȱȱȱȱȱȱȄ`ȱօȘuԩׅu՘e֨҄`Z}I 屝Ҡȱȱȱȱȱ` n$҅J?eԨe` L 兙 兛 n %3 Ԥ` ҩ,Z} , , L檤 ٙ!ؙ!י!֙!ՙ`!ԙ@!ә !ҙ!` 䤪ƪ!ٹ!ع!׹!ֹ`!չ@!Թ !ӹ!`ƪ!!Z}!㹁!a!A!Lp ґȥӑȥԑȥՑȥ֑ȥבȥؑȥّ` ***j)e)e`ʭȅiȅZ}iȅȩȩ Lfإ  4  \ +] ¥򄟄Z}   넨ɛ$0L祔 Z f0#ڠ쩀 ߩ6ei$0 녖چ + !5Z}ɛȑ @膔7 ɛ 襔!ɛL! _ɩ8$IȢ %e拢 Z} &!$P* &8孨客 "&$ 1L~ L~ &L _ɰe拢 &L~ +0 %30Ԅ Z}L 9:枢0 O L :H9Hhh tLHH`hZ }hLCL馩`ʆLC枢0ְşLC`A枢Ɣ!L!LZ!}!T 򈩛LQLD ijq ߰,iŰD VD8` 覲`8` 넬 S( +饰Z"}0 S0:$$ p8`$p (ȩ@҅ҥ򄬤 ߰ A L8򨢄 %Ӥ򈦬ʽ ʽ % Z#}+HH 屝EҨhh$P0Ƭ 襯I `_A[`8`80 &ՈԅZ$}` 넬$ +  + h갳 h) + , 褔ԙ!` "8` 襔 ɛ "ȱ"Z%}嫤!`! `) ɛ%)a{)_0:A[_դ`RE͕DATINPUԑCOLOҝLISԖENTEҚLEԛIƜFOZ&}NEXԑGOTϑGO TϑGOSU½TRAАBYŐCONԞCO͟CLOSŐCLҐDEǞDI͐ENĐNEנOPEΖLOAĖSAVŢSTATUӣNOTPOINԡXIϤOΒPOKťPRINԐRAęREAZ'}ĨRESTORŐRETURΩRUΐSTOАPOХGEԫPUԑGRAPHICӒPLOԒPOSITIOΐDOӒDRAWTϓSETCOLOҬLOCATŔSOUNĦLPRINԐCSAVŐCLOAĚERROR- Z(}DPOKœMOVœ-MOVŪ*ƐREPEAԑUNTȊWHILŐWENĐELSŐENDIBPUBGEԒFILLTϐDϐLOOШEXIDIҖLOC˖UNLOC˖RENAMŖDELETőPAUSŖTIZ)}ME$PROøEXEÐENDPROÑFCOLOҪ*̕-RENU͒DEDUMЪTRACTEXԖBLOAĖBRUθGO*’PAINԟCLӔDSOUNCIRCLū%PUԘ%GEԚGZ*}OTGOSUTSTETHEΣ<<>ުNOOANĨ<<>STRCHRUSASVALEADATCOPEESIRNFREXLOCLOSQSGABINZ+}PADDLSTICPTRISTRIDPEE˦INSTINKEYEXOHEXDEDIFRATIMETIMMOEXERNRANTRUN%%%%GOUINSTERER+,%5Z,}&6(+8,<Xk`fghilm^deDѳHc?,Ќ,е,Y_Ҳ+7,/0Z-}1 2!3"4Ɛ"-"."-؂ٿ֐ːZ.}ĐאŐbj+9,+;,ʐͭZ/}ͭ@ABC\=>[<+:е<,&%rvnnxc<\Z0}-78s_XV+@D&0d*"'2GJh NZ1}Rl~&2 +饰(+VWZ ]a8`L`  ¤ħ.H h L5 䄡 Z2} 䅭 bɠ04Ů .ŭ%) e拰 ĩ L+Ư0 LeZ3}`毤Hɛ) h`  L ȱ R @ʆ ȱȄ Iğ` :62T F :Z4}7 8 Lbԩ- L 8 8,I ɨ 8L.UH `ƨh $ %3   + \L L 8󅯩" Z5} 8" ©" Ư" L8q :Z#]abj(=) W같  L樤ħ`hh`H YhZ Z6}L<>EO ƹƹ0`H f5h`I&` =? FQA` L񄳱ȱI 䦐Z7}Ħ ąŅ T k /䧰 k ,Ǡ ĩJH ThĥȑĥȑĦʊȑ`HHąŅZ8}H h hhhh ȱIELZ L`ȱI Hȱȱȱȱȱ Z9}, h @ $L+L.*ȱȱȱȱȱjEE `EjI `e`ħ ¥Z:}0 ` Lk 䦪`! 䧰L A@L `I&`L ©؅ L.Z;}0`STOPPED륺 bɠhhL :ʅ` k %3Hƹ h5h`hbjH h #Z<}ԤLQ #LLei  `LԑȥՑȥ֑ȥבȥؑȥّ``䈥剰Z=}#)iiLɠL4űI&`048ץğ=ȱȄ Z>}`L  L0e拠0ȱȄL  䦪`!' >?L (<ж`!  $Л +`,LőŐ78Ƒ8 Ƒ`8` - PѠZ@}`,,L L PQ 8,L ȱI ѝߠȱ`ԩZA},L E  $EL+L],,,؍ 0âLɀL ©7 F󦹩 RbL g ZB}0g `Ո V fL{Ն + +􅕄L AT LINE?BLOAMEVALU>#VAR$LE?DAT>3276INPUDISTACOVERFLO?LIN?ZC}FOTOO LON?DE?GOSUGARBAG?CHMEͣ?LOA?NES?WHIL?REPEA?D?EXIXPRO?EXE?PRO?IS OPE?DEWR ONLCMNOT OPEΣRD ONLEOTZD}RUNTIMEOUNA!FRAMCURSO!OVERRUCHKSUDONMODNOT IMPRA͠D?>#FILEDSK FULFATAL I/FILENAMPOINLOCKEDCM>DIZE}?FILPOIN?APPNBAD SECTORӥHՄ +h & .hԩ + ,҅L: ƪn (@Մ$ 0` 0ZF}` 0LoH - . /h &@Յ՘JJJJ X) 0:i`AVC@ sŠ 5  <)  <ZG} L L + e +e`e`&&&&&&eee` &ZH}&eee&*`` 兙 䦪!0 4 ۄܱ **m ݤܱEۅڦڱ= ZI} ܥeƥiեLN@ ` **)]` 00`` ( ((((((((8ZJ}`W)ߥ & &e &߽řِ׼JJJJ&eXޥeYߥ䥛 9 FfЎᰈ ZK} `  M 8*` 兙 󥐅i祣L{ &LZL}  0 & L ȑ & L; # )ȱ L ZM})ȱ) )ȱ 8ƣŐő0eސ`ƙ8ް`)ȱJJJ`ZN}``=`]``` E߭H Ġ} hL±&Lv`[  ȱ R] ZO} L L  䅠 bɰhhğȱȄ L l"0e拱LjLx`[  ȱ R] Xh,)6-F:@,0("A%`P\(SHIFT-CLEARb#"@P\#CONTROL-P#"@P\#CONTRO^Q}L-M#"@P\#CONTROL-D#"@P\#CONTROL-L#"@P\#CONTROL-S #"@^R}P\#CONTROL-C#"@P\#CONTROL-E #"@P\#CONTROL-R*#"@P\#CONTROL-H\^S}#"@P\#CONTROL-N"@\CONTROL-Q- ---K-!@8*@0*AU* ^T}@"3 7\KLEFT-ARROW OR RETM-!@8*@0*AU*"@"5 9\MLEFT-ARROW OR RET$("@^U}*"@(\(UP-ARROWV*"@"*"@)\*DOWN-ARROW&"@"*"AU\&RETURN$"*"@0^V}\$LEFT-ARROW * \PAOA- * * * * * * * * * * * * * * * * * * * * * * * * * * *- ^W}33FOR I=0 TO 22:POSITION 39,I:PRINT "";:NEXT I22FOR I=0 TO 23:POSITION 0,I:PRINT "";:NEXT I;-@#; &^X}hange,rase,ecover,xt_pge,elp-@ JQ|AOA- * * * * * * * * * * * * * * * * * *^Y} * * * * * * * * *9A@d9- set keyboard back to UPPERCASE P PD AX AX 7` ^Z}4 &򠠠7 6. &堠1 6g) P AX/ ^[}g@D:*.*%g/ Aq%%g@ D:TEMP.TYP-@@" -6.^\}@ g   gp##- ***************************8` P  Abj.. &^]}렠1. &堭Ч1 .. &堠 2^^}  <  F d4  AcPxP6.&&67@^_}<@,. D:TEMP.TYP,$67@,.7@,$6-B:,,##67%@<%@,..TYP^K` P^`} & AsPX##*****************************g `-@-- % ̭^a}ĩ9l"Ab9 % 젭9l"Ai9 % 젠0- % ^b} Š0  5- $ 堠1)5P -@  R^c}##*****************************QAOA- * * * * * * * * * * * * * * * * * * * * * * * * * * *L~!!^d}***************************P P 4P  Av&A@d4- UPPERCASEF++ #Ϯˮ^e}x++ #++ #++ #^f}묠++ #Ġ嬠쮠  :  6.6. 4P^g} AP>P>remove leading blanks, and truncate at dec pt if any@67@<@,.D:r67@,.6-^h}B:,-#67%@<%@,..TYP- A : !g@`!Pl -@@"  -^i}6. g! 4! f!g P  AP!!##*****************************!g `P."-@^j}`"1. &䠭1 "1. &砠1 "1. &^k}렠1 "1. &堠1 "2$ The name you entered was : -2 [] ^l}") `P (#-@ Z####*****************************#Q#"$T$?O?- * * * * * *^m} * * * * * * * * * * * * * * * * * * * *$$-P P)(-)$P$Q%%?O?* * *^n} * * * * * * * * * * * * * * * * * * * * * * * *%%) A`g)g@%-@@"% -^o}6.%@% g &  &g4&H&""- **************************\&`p&."@. ^p}ͭ&."@. Ġ&'' &'' 䮠^q}&   B@&&g `((& ('+"@( ĠɠӠˠ^r}+($'+"@( ͭˠ+(8' M@` BL'Q`'t'=O=* * * * * * * * * * * * * * * ^s}* * * * * * * * * * *''` BP'g@'-@@"' -6.' g(^t} ( ((g P <(Qh))=O=- * * * * * * * * * * * * * * * * * * * * * * * * *)P)0*6-%^u}@b*-@@"* i"@P* i **+Q\+++AOA- * * * * * * * * * *^v} * * * * * * * * * * * * * * * * *+P$, P V,]- **********,, P P,--@@"P-^w} -6.- h- i-  P6-%@.!@-PJ.\- DONE|..]- *^x}********./4P4get printer ON and set up print size, etc.D/\v//]- ***********/i 0P>0Qp^y}00=O=- * * * * * * * * * * * * * * * * * * * * * * * * *0;-; &笠^z}1;-@#; &έŧ81-@ j1Q11C]C- * * * * * * * * * * ^{}* * * * * * * * * * * * * * * * * *222 - TO SET UP SCREEN COLOURSd22!AAP!-@2"" ^|}2&& 堨ٯΩ ?,3)^3_U@x*@*A*A!*A*^}}A*A8*AI_ B13  >:,6-@3o-"@)"A!)"A)"AI9-S0@^~}@ @o- BRIGHTEN THE BACKGROUND3&0@@ &- CHARACTERS&4X4;0@@@;^}SET UP TEMP'Y BORDER COLOUR4-@M@P4** "4** "^}󠠠 5** "砧짩R5-* "Ԡ- 55((  ^}󠽠򠠠5B(  󠽠:-@@#B 6L69 6-6-@!6-@ ^}-"9-@~6)6@"@E-%@)!@5-@@UP-ARROW6B"@a-&@)^} 5-BDOWN-ARROW7C"@B-%@)!@5-@CRIGHT-ARROWF7B"@C-&^}@) 5-BLEFT-ARROWx7,"AU BC,'Return' Pressed70@ B9P78^}-@M@%@8** "BORDER r8** "󠠠 8** "^}砧짩 8E+ #Ԡ =-@@#E 9:96-@ 6-@l^}9)9@"@E-%@)!@5-@@UP-ARROW9B"@a-&@) 5-B^}DOWN-ARROW:C"@B-%@)!@5-@CRIGHT-ARROW4:B"@C-&@) 5-^}BLEFT-ARROWf:,"AU BQ,'Return' Pressed:0@ BG:: M@% BQ`:^}TEST FOR RAMDISK:MD8:A.AA#6.D8:A.A/6-@9 BQPM- RAMDISK IS O.K.;96.D1:A.A6-@9^}- WE DO NOT HAVE RAMDISK.;1  `1ADD OPENING INFO SCREEN FIRST`;" B`;3(3('This is a Mi^}ni - Word - Processor for;n0('those who don't want to bother learningk(6all of the commands of a full-fledged Word P^}rocessor.n(;--(%It prints exactly what you see on the(<--(%Screen, in double-width letters, forZ++(" N>) `6-P>6-@`>'( ('( Now Go Ahead and Type ^}>A( (4(% Use Ctrl-H for Help with commands>MAA`?,P \,GO AHEAD AND WORD-PROCESSH?z? - ADD^}ITIONAL MENU COMMANDS? - ************************?hB?O?- * * * * * * * * * * * * * * * * * * * * * * * * * *B^}E BA@dE- set keyboard back to UPPERCASE0CCPDHPH I,, $ Ϯˮ^}pI0+ #宠0 zI0+ #Ԡ婠0 I4 ^}BI 6.P6.8JJ67@<@,.D:K67@,.6-B:,dK##67%@<%@,..TYP^}K,L BLL BM N""****************************N!g `lAp! BN+! ^}+ BN,, #̭ĩLO-@  OP##***************^}**************xPR*` ( ( (*MAPlRRPUQTVV?O?* * * * * * * * * * * * * * ^}* * * * * * * * * * * * *WP$^^QDaaCOC* * * * * * * * * * * * * * * * * * * * * * * * * * * * * b"^} BgpbPgLh0`0 % (Press Ctrl + 1st letter of Command)Vh##  h.. &rin^}t = send what you have typed on i++ # the screen to the Printerxi.. &ave = save what you have typed on ^}i,, $ the screen to a Disk File @j.. &oad = load onto your screen a Diskj,, $ File you previously^} saved k-- %ir'y = look at the Disk Directory lk,, $ without losing the screen k,, $enu = get the com^}mand menu back 4l.. & on the top and bottom of thel((  screen if you lost it l,, $uit = what i^}s says (the printer `m,, $ will space to a new page) jm##  tm,, $hange = change t^}he name of a Disk ~m,, $ File without losing screenm,, $rase = erase a Disk File without (n.. & l^}osing what is on the screenn,, $ecover = recover the last page you n  worked on To'' xt_pge = ( see n^}ext screen )o-- $ Ƞˠp&p=) ` ((:(%xt_pge = command to make the Printer=(^}0p0-(%print the page number and space ahead0(:p(to the next Page(Dp-*(" - in case you had-(Np1.^}(&turned off the computer after printing1(Sp1.(&the top half of the page, and now have1(Xp/,($turned it back on and ha^}ve printed /(]p0-(%your first new screen-full below what0(bp3-(%you printed before you turned it off.0(3(lp((  ^} Ƞˠvpp)" BHqPqtQht0u?O?* * * * * * * * * * * * * ^}* * * * * * * * * * * * * *buuP PA@du++(# uI(-("^}Ԡ46.8?4I Bu 6.P6.uF67@<@,.D:,67@,.F67B:^},%@,..TYP,*v-(&(-6./v  4v  9v ^}>v4 BPHv 6.P6.\v067B:,%@,.067B:,%@,..TYPv BK B^}vv""****************************$w!g `lAp! BVw+! + Bw,, #^}̭ĩw-@  wx##*****************************Pxx  ^}x)yP|yQyy&O&T----------------------------z`DzP( ((( +(P( ^}vz+(+( 򠠠z+(+( z')^} @H)!@P' BP {"@H i B>{2"@I( i Page - 2 Bp{) B^}%(Enter Page Number ){& i Page - & B{8|QL|`| O Tt|P|P| 6-f|Z("^}(>(堠Z(嬠|+(栨ٯΩ"(+( ? ^}|)|_U@x*@*A*A!*A*A*A8*AI_ B|( >:,|>-"^}@x)"A)"A)"A87 B >- NO|8-@@" i" 8SPACE 1/2 PAGE DOWN| ` P|^}i|P|Q} O T }9 6-f6-F:@,*@@96. }G6-k:< ,"g%.7@,/ B^} Gremove leading blanks} 6.(},6-k:< ,"f B `,no blanks-}# "B:,.7g<&g,# B @2}46.^}7@<&g,$67,.7%g,*6.4 B 0<},6-k:<.,"f B ,no dec ptF}6.7g<&g,P}>-gB:,4@:7^}<,,!@d*@:7<,, @> B R}3)@:7<,,!@G*@:7<,, @X3 B T} 6-%g67<,.{U}  ^}"f B!Z}A`-@@A(" illegal character(s) in name.[}?-@@?(%Must be upper-case (^}capital) letters,\}'-@@'( or numbers.]}K-@@*(Please correct -<-@@ K( ^}^}>-@@!( /-@@">( _}-@@#( `}-@@!(^}a}4 B b} B d}@n}Q}}- - END OF PROGRAM - -}D:KIDSWORD.BAS\}P:2$B A 0(ˠҠĠԠBAdAU)@@ A &}/ +@/6-F:A`,%AV$F:Aa,+%@@q+%@A@'AA&}@A@TMIDCOBAKCOTITCODUPPEADKEFILESTARFLALINEWIDTERP} A@ W6}-@6-@'6-@B36-@@;@,M;@,W A ##@@K:( A}A2(@ extras4(@ <6-@@6(@1) GRAPHIC VISION}S =%%(@ 2) ATARI DISPLAY >%%(@ 3) DICE ROLLER ?(@ 4) MAIN MENUK<)@6}-&@H< )!@@uP''@@@@Q!6. D:VISIONS.BAS! @R6. D:}ATARI.BAS @S"6.D:ROLLDICE.BAS" @T6.D:MENU[Πà͛\5 +A}1A 5%26-@/@@P:2$B A 0(ˠҠĠԠBA}dAU)@@ A / +@/6-F:A`,%AV$F:Aa,+%@}@q+%@A@'AA'A '@A'B7tA$8 #A!}!-@@%"167,.>:,5 8$4??104,169,255,141,1,211,24,165,106,105,32,133,106,76,200,21 D:EXTRAS.B}AS-@@%"167,.>:,5 8$4??104,169,255,141,1,211,24,165,106,105,32,133,106,76,200,21 D:EXTRAS.B'A '@A'B7tA$8 #A!!-@@%"167,.>:,5 8$4??104,&}169,255,141,1,211,24,165,106,105,32,133,106,76,200,21D:MENU!-@@%"167,.>:,5 8$4??104,$Dext screen )o-- $ Ƞˠp&p=) ` ((:(%xt_pge = command to make the Printer=(^}0p0-(%print the page number and space ahead0(:p(to the next Page(Dp-*(" - in case you had-(Np1.\}