@L}5 _$% l0$)$$Hȱ$ UhL" `e$$%`$%`  R@P!( 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`  `1  ɐ     `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.D1:MEM.SAV J y08 B|DEHI$} V0 0`B;DEL`?<0LV`\ʆ v s? F0Ξ05: [ BDEHI%} VY8 B V  @  /DE `E:D1: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 } 3E:}DISK OPERATING SYSTEM II VERSION COPYRIGHT 1984 ATARI CORP.A. DISK DIRECTORY I. FORMAT DISKB. RUN CARTRIDG*}E J. DUPLICATE DISKC. COPY FILE K. BINARY SAVED. DELETE FILE(S) L. BINARY LOADE. RENAME FILE M. RUN AT ADDRES+}SF. LOCK FILE N. CREATE MEM.SAVG. UNLOCK FILE O. DUPLICATE FILEH. WRITE DOS FILES P. FORMAT SINGLEL !N',}#"&))9(&*)/h)''-&؆莟R'S  vL/ˢ L }Insert DOS 2.0s, type Y Λx -}DEfHI 1莏#q! @ y0ɛ8A0,' ȅ 1 1ild! 1L!NO SUCH ITEMSELECT.} ITEM OR FOR MENU! 0 .z:*{}.|{ 1 0 0JB 18L%|DL/}%DIRECTORY--SEARCH SPEC,LIST FILE?[# 0 0 &|D3" 1L!NOT A DISK FILEN !B 1L!E# 1 !BD0}ED:}:1BJ|DE 1DEBHI 1 h0ߢ 0.1}  0?詛 1 y0YЛ 1 ;#L" ;#L! BL1TYPE "Y" TO DELETE...DELETE FILE SPEC2}COPY--FROM, TO?OPTION NOT ALLOWED697 FREE SECTORS COPYING---D8:COPY32.COMl# 0|D .L/%#3}##JB|DE 1BHID#E 1#0: B 1L!#͑### B 1#c$0SY4}S1}:## # # .#Ƚ# # 𩛙## 1,#PD#ELJ- <.BJD#E 5}1 1HH 0hh|DL%1}:̳# L% #D#EL% 1 0 . .0O% 1L!WILD CARDS NOT A6}LLOWED IN DESTINATION 0 <.|K}N 2 FORMAT. t* 5) 1L!`) 0NΞ 0 L1) 1 L!BAD LOAD FILELOAD FROM WHAT FILE?) 0 ?}0#B 1L!WHAT FILE TO LOCK?) 0 0$B 1L!WHAT FILE TO UNLOCK?DUP DISK-SOURCE,DEST DRIVES?TYPE "Y" IF OK TO US@}E PROGRAM AREACAUTION: A "Y" INVALIDATES MEM.SAV.FE! +L1   `*  70 2 2A} 0.* 1 y0 0)INSERT BOTH DISKS, TYPE RETURN^, 1 y038逍 N, 1L! ,B}C, t*  Lx+, 0 ^, 1 y0 , ,0,0 ,L+ ,I0 ,Vǭ0C}Ξ, 0 }, 1 y0C,ШC, 0K'!" H H 'h h Lx+!EF 5L1L!D,I,HhD}` NOT ENOUGH ROOMINSERT SOURCE DISK,TYPE RETURNINSERT DESTINATION DISK,TYPE RETURNE}`  `8 rL1`-* 1P* 1 y0Y`hhL!NAME OF FILE TO MOVE?- 0 0|DL% <.F},^ 1 70 0 .@L# .BJ 1  DEHIB V L1 ,} 1 70,L.  G}JB|,#P#DE 1 HI BDEHHII 1 B 1 ,^ 1 70,0La- B V,#PH},^ 1 70 0L#L!-* 1P* 1 y0Yj383}mm ݭI}}`8}``|* ? ɛ,`|:-)| / 1L!`DESTINATION CANT BE DOJ}S.SYS0 0H{ 24Δ 28/L!/) 2 Π 2 0 ξK}hAΞB,0 J 1 BDEHI,HÝDE 1HIHIDELSAVE-GIVE L}FILE,START,END(,INIT,RUN)O S0 1`BDEPHI V` S0H 1 L!M}0 0 1L~0`PLEASE TYPE 1 LETTER,0`hhL! 70 1L0L<1 ,;ɛ7,"ɛ:ݦ1ݥN}A"D|ݤD|ȩ:|ȩ|ɛ,,(/+.ީ1 1,ɛ`轤{NAMEO} TOO LONG B VL!` L1I H1EΝDL1|mDiE` V0`8d/8 i:222 1 LP}!ERROR- 167ɛ+,' 20*.. өr2 1``2TOO MANY DIGITSINVALID HEXAQ}DECIMAL PARAMETER800 0 8 00`,0'D800 H,ɛh`2L1NEED D1 THRU D8uR} ECIMAL PARAMETER800 0 8 00`,0'D800 H,ɛh`2L1NEED D1 THRU D8u05  15 2 2151^116115ύ011$r2ԭ5 3)5)5ԭx GT}@@L00)+& 2 L0=ɛ -L!1LV1L1 /3 3ȹ441L-4 v3 25 2H 2h͔5U}L3L3 2 k3U hh`DOC`QL3P1Lk0S1H /3h0B k3@ VL0LU!#$53 1181118V}1111Ε5 1Lk0552 1Ȍ1i111i11115Lk0pppB4f5&&&&&&&&^6f^6&&&&&W}&&A1@BJ D2ELVK@BHILV^Щ6 2BD2EJ VBD5EHI0 V0%5X}5 2iХiL[2 25 25`D:*.*` i@`8 ``@i `8@`0 BLV525<4Y}5`HH i ԍΗ552 ԍhh@ Lح1Э1Ѣ 24.4 24Z}4`D4E` 2BJ k3LVRH` 2BD4EhK)I JLV333 BASIC languag i}e OBJ > MACHINE language DOC > DOCumentation PIC|MIC|FNT|MVM > Graphics AMS|MUS|MBD > Music LST j} > BASIC LISTing -Some MACHINE language programs can only be run by booting the disk MENU "without" BASIC! -For s k}ome programs, XL/XE models may require a "TRANSLATOR" program to be booted first! [Also available from BELLCOM] - l}Most programs are relatively self-explanatory; however, some have separate DOCumentation files available. Some BASIC m} programs may contain instructions in their program listings. -To use this great MENU program on your own disks, n}simply copy the file "AUTORUN.SYS" onto your disk. * MENU written by DAVID CASTELL * program on your own disks, ^1 +@%@3-@@3(@ home inventory*-@@*(@[p}]0-@@0(@ RECORDING AND(5-@@ 5(@UPDATING INVENTORY-(-@@q}((@ITEMS2+-@@+(@[]<.-@@.(@ SUMMING ANDF--@r}@-(@ DISPLAYINGP3-@@3(@INVENTORY TOTALSd)F:B2y,"@)% D:INVENTRY.1ns})F:B2y,"@)% D:INVENTRY.2x AD:INVENTRY.BAS TOTALSd)F:B2y,"@)% D:INVENTRY.1nKZZZZZZZZZZZ1Z1Z1Z1Z1Z1Z2Z2Z2Z2Z3Z6Z8ZZOFCRSMENUNXBSXX0BLXXIX2LMLNUMu}RERFPOSFLENFRECLECATSERDATEPRICECURVALDESCTITLEXYOVMAXRESTRTREPLv} w} !"#x}$%&'()*+,-.@/@0123y}456789:@;@<=>?@A=="z}G+@@9%@-050=0G A,{} - 7<,7<, 6-(6. ,     )"AU@"A& ;7"@D)"|}@X)"@4) @2)!A";     4   B:,"%        6.7:,% >:, 9 6.7%+B:,!,,, 7<&B:,%,6"*"9$" A`6-A:~},40" #-B:,7<,0. # %7B:,,40!6.768,-G68,-}P68,-^K:vR(6. 168,-9-N68,-8&,%8&,R xO -67<},.%67<,.267<,. 6 >-K67<,. O _- ! Maximum number of records = %U #Maximum number} of categories = 300_ @e,6 0006 }Options are:1X6. items( 1. Read data file}9  2. ReviewG 3. AddX  4. Change6U  5. Delete$  6. Print> 7. Save data on diskU 8. Return }to MENU@46.Enter option: 6-$6-*6-4 @0JK KAAPAAPAAPA}AP^9F:A,"Ap,6. ϠŮ15 9 `"6. ˠҮ " c 6.0 h 6.}0 @r)6.ҠԠٮ %)  000I" }Operation is Ġ, APE} D:INVDATA.FILI E !2 < @eAE K Reading data file.!6}.)-0>67B:,%,.B GK     A" ! 000! }: } 6--'-8,8,:  Item # %4-8,8,%*  7" A"7<,0 Ap@A -6.7<%8,, 36.ϠŠŮ7 A ApD3 6.6-} 6.6-# )6./6-3 I3 6.6- 6.6-# )6./6-3 N) @%6.ӠĮ}) S  A@X   Z A" ]D 000!6-: }Operation is D A0}bO A@36. = Next, = Delete, = End: 96-?6-E6-O @0d 4E g0DA5l "*}!6.7:, )  .2 6    }; 000; }Operation is Š5 AR& D:INVDATA.FIL- 5-! @}  !  +  %D:INVENTRY.BASK:  I 6.ENTER STARTING RECORD &6-,6-46-%}> @0F6-&I$C 6.6-6-6-8,$6-*6-. 5B:,C676.A$xA 6-6-6-8,6-*6-C . 8 @5>6.A$}C 6.6-6-6-8,$6-*6-. 5B:,C67:,-! -% * -$J @ } "-, @9  = B J6-%P   $Z3-@d >:, )  3 AP} D2:INVENTRY.1, @9  = B J6-%P   $Z3-@d >:, )  3 APZZZZZZZZZZZ1Z1Z1Z1Z1Z1Z1Z2Z2Z3Z3Z6Z8Z8Z9ZZOFCRSMENUNXBSXX0BLXXIX2LM}LNUMRERFPOSFLENCATFRECLEPPCVRVMAXRENUMCATOTPRTOTVALP@@@@@@}@@ @ @ @ @ @@@@@ @%@5@8@`}@@@AdAUBARA@@ !@"#$8&%@H}&&&'@(@)@*L+^&, -@./A0=A1A234&Q5}6@aA7-A8-9:A@;<=>?''HOME INVENTORY 2 Disk V1 2/13/82}AA"G+@@9%@-050=0}G A, - 7<,7<, 6-(6. ,     )"AU@"A& ;7}"@D)"@X)"@4) @2)!A";     4   B:,"%        6}.7:,% >:, 9 6.7%+B:,!,,, 7<&B:,%,6"*"9$& A}`6-A:,&40@#%-B:,7<,0. % %%7B:,,40!6.7 000> }Operation is ŠR -" Enter category code.*6-%06-66-<6-B}6-F N4 R % 6-6--6-! % 3 46- 6-%A:,$6-( 36-%A:,=  -! }Purchase price:-6-@36-96-= N - Current Value:(6-@.6-46-8 @6. D N A`}   M 00, }Operation is <  Fields areM  1. Category_ 2. Serial number2 3. Da}te of PurchaseI 4. Purchase price_ 5. Current valuek 6. Description<  Field number to search (0=Quit)B6-}H6-N6-Z6-@4`6-g6.k   "  f 6-   Search for?&6-8,,6-26->6-@J6-@}N f }Searching for: O A06--!-1 Item # %5 9 C @uOA@9 6- A@} @p' AE3"@i96-/ 6. Ԡ/6. ĠƠ!  A&   +'} 000!6-'6-ND A-6-%! '-+ 16-:6-8,> D6-SI 6-8, 6-}%8,&6-%8,5*'"P:',? @rI AUO  Total:6-%!6-'6-+ 76-@%=6-A K A}O X   Z 000] 6- AP APbC -F:,/ }Ǡ5}6-9 C A@l( - 7<,4( AQv  6-% 6-@d >:, )  .}2 6  +  %D:INVENTRY.BASK 4+ #} Ƞ Ԡ16-4$] Ap}P2 }Operation is N Press any key to ABORTTZ6-]$ K$6.Want to PRINT this? (Y/N) *6-}06-66-@ @0H0YK$% 6- AP AP*C -F:,/ }Ǡ56-9 C A}0/E  6-8, % .6-8,2 9 A6-%E 4C >:,Total:6-" * 06-4 }; C6-%>5-@d >:, )  .2 5$ M - ٺ! 5 ̠Һ9 }M Šź N  Šź 3 Ԡź7 K κN$< 6-6--}-# ' /6-%3 96-<$# -- 7<, #$J 6-%6-J  Home InventoryI T E M L} I S TPage B "B6.2CATEGORY PURCHASE PRICE CURRENT VALUES "S6.CCAT SERIAL NUMBER DATE} PUR PRICE CUR VALUE DESCRIPTION- >:,-! -% * -$- -    % -}6-%P   $Z3-@d >:, )  3 AP D2:INVENTRY.2-    % -[uvH>]>MENUXXCHOICMAINCREATERASRETHARDDISKRECORVIEEXITITLEXLINCHAPAGERERFILECNLINECARERERE}DIDOINIEDILSTARLSTARTCNLASTCNCHANGECHANGMERGINFGOOMAI@@A}AA A A% A0 A5 AY@@}@2A@AE !"#$%}&'2()*+AU,<<;@ ,;@,;AP,;@P,;@P,{6-@}@6-A'6-A36-A?6-A K6-A%W6-A0c6-A5o6-A@{6-AE6-AY}6-AU:6-@6-@'6-@36-:6. ŭҠ }佽 Ҡܠ(C +A1A ACAR@).@}.@@K:-'@A'B7tA2=-@=(# ŭҠ}<>-@@>($䠽F=-@@=(# Ҡ}܎ K+(+( ============================P,,($====    ====Z,,($====   } ====_((( ============================dU(( 1) Create File7( 2) Erase File From DiskU( 3) Load File }Into Buffern`+(# 4) Print File In Buffer To PrinterN( 5) Sub-Directory of Datafiles`( 6) Save Filexu( 7) View F}ile In Buffer3( 8) InformationU( 9) Make new HOMEDAT.DAT fileu(10) Continue File In Buffer^-@@"P(5}What is your choice ~~~~~~~~~~~~~~~~~Z A@^ A@Š}Šũ 0 AP:6-@6-@'6-@36-:6.--(%}=========================}===========))(! ))(!     ,,($========================}============i-@@:( What is the title for this file?S((MAX: 20 characters)\(-=>i@ 4} 6(( ź 2(Is this correct? 6&4Y)4y A03 6.-@@)(}3 A0X"-@@"(Y B]y-@@>($P-}@@y($by-@@>($P-@}@y($gy-@@ >($P-@}@y($ly-@@>($P-@@}y($qy-@@>($P-@@}y($vy-@@>($P-@@y($}{y-@@>($P-@@y($}>-@@>($#-@@!#(TITLE}: o-@@"&(LINE=, 8-@@"Q(CHAR=&@, c-@ @"o(CARD="@}6-@"@6-@"@6-@"@6-@"@6-@}"@6-@"@6-@"@ A-@(>)6-%@!@6})6-@6Z"@6)@("A&0(~~>6-&@L6-&@Z6-&@"@6 }Av -)@;"AU6-%@)6-@5-@;( 1"A& @'6-@}1 Ava"A&(~~$-&@-(;6-&@I6-&@W6-&@a AvA7"@')}"@()"@))"@0)"@1A AeKA"AU)"AT)"AV)"AW)"A%)"A'K Ae}M!67&@<&@,.>:,/6-%@=6-%@M(>:%A(, APs-@@!(0-@}@!o(9Would you like to continue onto another card? s\4Y)4y6-%@+6-@76 }-@I-@@!R(\ A26-%@.67&@<&@,.2 ŠŠũ- }-(%}====================================))(! ))(!     },,($====================================l-@@=(#What is the title of file to erase?V((MAX: 20 characte }rs)_(-=>l@ 4 8 A`8@@ D:HOMEDAT.DAT5 AP@  }4+@5 AT AGf((塠%@9-@A= O-@@\(}f A@0(( ź ,(Erase This 04Y)4y A$,-@@"(, }A@LI-@@"(4-@@I(Erasing ...V_ A`8@@ D:}HOMEDAT.DAT_@@ D:XXX.XXX[ A`@` 4 APe(@ A~}@ 4 A AP@@L@3@ D:HOMEDAT.DAT}@2@D:XXX.XXX,HOMEDAT.DAT.((š&-@A* . ""ĠŠΠ}Ҡҩ 0 AP:6-@6-@'6-@36-:6.--(%}===========================}=========%%(  %%(   ,,($==================================}==k-@@<("What is the title of file to load?U((MAX: 20 characters)^(-=>k@ 4 }(( ź *&(Want to load this file? *4Y)4y AP,-@@"(,} AO-@@"(4-@@O(Searching for ...8 A`8@@} D:HOMEDAT.DAT A@" 4 AP' A`@f@(%(塠9-@}A= O-@@\(f Ar3((Found 3(Loading file into buffer...w6-%@)}@y1"@'67<,.'@1 A|67<,.>:, AU.((š&-@A}* . ԠŠéZ4)4(}'-@@>(No file in buffer!R-@AV Z }--(%}====================================((( (((    },,($====================================Y-@@)(Turn Printer OnD(Press To PrintY(OR t}o abort.)@"@' 7 A`-@@P:7 A`(@K(@}!-@B:,1(@-5 @(@K(@1(@(@&(@1(@.(( }š&-@A* .  ٠ĩ --(%}==================================== &&( !}  &&(    ,,($==================================== ( 8 A`8@"}@ D:HOMEDAT.DAT  A&@ < 4 A&"@2( < A%P #} A%P( `@($(No more files.J(!Press Π to go back to menuS(-=>`@2   Š$}Šĩ Z4)4(}'-@@>(No file in Buffer!R-@AV Z  --(%}==============%}====================== (((   (((    ,,($===============&}===================== /-@@/(ŠΠҺ  $( (Ready to save? $ 4Y)4y '}A0P   H-@@"(4-@@H(Saving ... C A`@C@@(} D:HOMEDAT.DAT 5 A1P@ 4+@5 A1 A0e _ A`8@@)} D:HOMEDAT.DAT_@@ D:XXX.XXX!  A1@@&  4 A1 + (@*} A10 @5  4 A1: A1 D @@L@3@ D:H+}OMEDAT.DAT@2@D:XXX.XXX,HOMEDAT.DATN ^@9@@  D:HOMEDAT.DA,}TF(@S(@^@b .((š&-@A* .  ""נŠΠҠש Z-}4)4(}'-@@>(No file in buffer!R-@AV Z  --(%}=================================.}=== (((    (((    ,,($==================================/}== 36-@6-@'6-@36-@ y-@@>($P-@0}@y($ y-@@>($P-@@1}y($ y-@@ >($P-@@2}y($ y-@@>($P-@@y(3}$ y-@@>($P-@@y($4} y-@@>($P-@@y($5} y-@@>($P-@@y($6} >-@@>($ B A-@@!#(7}TITLE: 5-@1@!A(CARD= "@6-@ "@6-@ "@6-@ 8}"@6-@ "@6-@ "@6-@ "@6-@ "@ A79} - 6-@:7<,,A"AU6-%@)6-@76-%@A A5`"@' A7P/:}(>:%A(,!6-%@/6-%@ A5`tG-@@":(Press Π for next card =>G@;}~M6-@6-@)6-%@;-@@!C(M A5'-@@'( END OF FILE L-@<}@"?($Press Π to go back to menu =>L@ Πé7( }HOME-FILER!+(=}by Martin Bertrand7(VER 1.0.(.(# Did you ever want a program that))(!keeps track of your recipes in an,,($>}orderly fashion? Did you ever try to++(#look for a recipe in your messed up--(%recipe box? Did you ever want to keep?},,($an inventory of your music albums or))(!video games? Well, don't look any**("further, HOME-FILER is the one fo@}r (you!-(-(" HOME-FILER is Public Domain and**("a really 'straight-forward' filing++(#program for aboutA} anyone interested++(#in it. You can create your files on,,($computer-made cards and you can view,,($them and alsB}o print them out on yourA-@@#4(Press Any Key to ContinueA)@"--(%}printer. It doesn't matter C}what kind'(of printer you have.,(((( HOME-FILER consists of two1--(%files, this program and the datafile.6D},,($It is called HOMEDAT.DAT and this is;++(#the datafile that contains all your@&&(Home-Filer files. It is like aEE}**("'sub-directory', viewing the filesJ++(#in one file (very confusing but youO))(!will catch on if you press '5' atTF},,($the Main Menu). You also save, load,Y++(#and delete your files directly thru^( HOMEDAT.DAT.c,(,(!Pretty haG}ndy because you wouldn'th,,($want to browse the disk directory inm++(#DOS and find all these little filesr**("that tH}ake up directory space! It'sw!!(all in one combined file.|A-@@#4(Press Any Key to ContinueA)@I}--(%} You MUST have HOMEDAT.DAT on your--(%disk to store or retrieve your files.--(%If not, pick number '9' frJ}om the Main,,($Menu and initialize it on your disk.P(+( Another neat thing about thisP( program is that you caK}n continueM+(#files if they are not finished, andM(and delete them if necessary!#(#( GOOD LUCK!L}( ((Credits:!!( HOME-FILER!$$( by Martin Bertrand( VER 1.0##(M} Made in Jan.1989!!( Public DomainH-@@#;( Press Any Key to go back to MenuH)N}@ ŠԮԠԩe (}-@@4(MAKE NEW HOMEDAT.DATQ(Press to proceO}ede(OR to Abort)@"@' 8 A`8@@ D:HOMEDAT.DAT(@P}@.((š&-@A* . @ (}-@@<(Clear file in buffer? @Q}"4Y)4y6.6."$ ' {ŠŠΩ|Z4)4(}'-@@>(No fileR} in buffer!R-@AV Z }--(%}====================================~&&(   S}&&(  ,,($====================================36-@6-@'6-@36-@T}y-@@>($P-@@y($U}y-@@>($P-@@y($V}y-@@ >($P-@@y($y-W}@@>($P-@@y($y-@X}@>($P-@@y($y-@Y}@>($P-@@y($y-@@Z}>($P-@@y($>-@@>[}($ BA-@@!#(TITLE: 5-@1@!A(CARD="\}@6-@"@6-@"@6-@"@6-@"@6-@]}"@6-@"@6-@"@ AW -6-@:7<,,A"AU6^}-%@)6-@76-%@A AU`"@' AWP/(>:%A(,!6-%@/6-%@ _}AU`DG-@@":(Press Π for next card =>G@NM6-@6-@)6-%@;-@`}@!C(M AUv6-&@ AEpM@((1( Error - F:A,!E-@Aa}I M  D:HOMEFIL.BASG.D. Starting Stats yll G.D. STARTING STATSCountry: "L"Name of country: RiklobGov't b}type: DemocraticCOUNTRY STATSSize of country: 30 squaresPopulation: 25 Millie of country: RiklobGov't b))HPOSBYTEFUNCPLPKPLSZHPOSREADDPMBASPPPPBEGPSTPPRELFLILGTWFWIWDTXXXXYYYYBYTVALU!d}VPOHHPOPPHIGLOOJOCCXPOYPOXSIZCHXROUDDSEYSIZHIBIMINMINMAXMAX@@!e}@ !f} !"!g}#$%&'()*+,-./012!q} b%DOS SYSb*)DUP SYSb SAUTORUN SYSb_HELP DOCboINVENTRYBASb<tINVENTRY1 b5INVENTRY2 b~HOMEFILEBASbTcDECORATEBASbSAVLOAN BASb@LOGCIRCTDOCbrGLOGCIRCTBASbLOGSMPL1LOGbLOGSMPL2LOGbLOGSMPL3LOG3456789:;<=>?@AB!r}C33"Interior Decorating"VERSION 4.1 BY J.C.PETTYjjThis program was written to aid people who are in the th!s}rows of movingand could use some assistance. ooBetter documentation for this program should follow shortly. In the meant!t}ime, any questions/suggestionsmmshould be directed to J.C.Petty at 463-6904. This program was uploadedto the S.T.A.T.U.S.!u} BBS 24 MAR 85p<9@,;@,;@,9@,9@,H6-B2H\6-AV$@f B p B !v}o +@@10@K0@@@_-AAk@`o J6-F:A!w},&@@&BBy8AY@XJB2w@#'-B2VB2Y#@' (m6-$AV%A$!x}/6-$AV%AE6-$AV%A6[6-$AV%AmA#@- 6-6-%A$2i(@>:!y}A%,:(ENTER LENGTH OF ROOM IN FEETO(轲[6-@Pe A i7-!@&) # A@- !z}@P<K$(ENTER EXTRA INCHES OF LENGTH;(栱G6-@`K>-!@) # A@- @`!{}A-!*!@%# A@- @PFC6-$@%+(ENTER WIDTH IN FEET?(轱CK-!@!|}) # A@- @pPJ#(ENTER EXTRA INCHES OF WIDTH:(栱F6-@JR-!@)!}} # A@- @U-!*!@# A@- @pZu6-+$@%,$?56-+A &,'@!~};6-C6-%I6-a6-+A`&,'@g6-o6-%u6-_! ,///!/dq,&@&@/!}/%@&@E/%@%@[/&@%@q/&@&@iq,&@&@//%@!}&@E/%@%@[/&@%@q/&@&@n A%sCONV BYTE$ TO BYTExl6-!}!6-@:7@,,+ A@=6-@:7@,,G A@i2l$}CLR PLYRS@--+$AV!},%A$$AV%A G9= @$CONV ASCII TO HEX' @X'6-$@%&@H'!@W!}'6-$@%&@U"2@@"$USR VPOS DOWNX6-%@"6-?:A6<,36-?:A6!}<,D6-?:A6<,U6-?:A6<,X$USR VPOS UPX6-&@"6-?:Ab<,36-?:Ab<,D6-?:Ab<,!}U6-?:Ab<,X$HPOS LFTF -@6@468,-8,&@?%8,C F$ HPOS RTF -!}@6@468,-8,%@?%8,C F$SET INIT HPOSV 6--@&68,-1%!}8,O6-%@%P:@$8,,S V$PLYRSIZE POKE/-@(B2V%8,, /$POKE PLYRS!}U6--AV1-%&@<%8,@ N6-%@R U$STICK LOOP ( TRIGGER TO !}DEPOSIT[-@.6-R:,CT:,"UB2xAUX'[$"@ "!}@ Ap"@ A`#"@)"@# Ap#"@ )"@# A` #!@!}* @# A#!@* @# A RT/LFT WALL CURSORIAR@5@@!}K:;,I/%@"I-@,)@8"@2;'F@I$'@E*!}@a ,; @,!/%@-"@E;6-&@1"@a6-%@6 "6-%@!}; "6-&@@3 @,!/%@% 0@3$EUP/DN WALL CURSORJIAR@5@!}@K:;,I/%@OI-@,)@8"@2;'F@I$T!}@C*@B Y; @,!/%@-"@C;6-&@^"@B6-%@c "6-%!}@h "6-&@m3 @,!/%@% 0@3$rPLOT/UNPLOTwl$6-+8,&@H!},$@26-&@2H-&@R@Z,%l/%&@%|   $PLYR SIZE/POKE ROUTE6-!}#-@268,-A68,-E +-@6-&+6-@2-@@!}0& 6-'@# &'0 AG68,-P:'@,&68,-AU4&!7'; G6-@`!}!@(6-P:'@,$@=68@,-@K6-'@`68@,-!8,@!68,-!}=6-A(-@+68,-8,%96-'@= 5-@&8,"@568,-@   $!}b%2@@@@9-@%= _2@b$UP/DN BNDRY CHKR!}"@E6-&@"@a6-%@ "6-%@ "6-&@$LT/RT BNDRY CHKR!}"@C6-&@"@B6-%@ "6-%@ "6-&@$DOOR UP/D!}N"A0A@= ,!/%@/,&@=,%@>-@,)@!}8"@2;'>$ @E*@a 0 AP,&@),%@- 0$DOOR LFT/RT= !},!/%@/,&@=,%@!>-@,)@8"@2;'>$&@C!}*@B +0 A,&@),%@- 0$0WINDOW UP/DN5"A0A:' ,!}!/%@',?>-@,)@8"@2;'>$D@E*@a I AP!}, $NWINDOW RT/LTS' @,!/%@',X>-@,)@8"@2!};'>$]@C*@B b A, $gOPENING UP/DNl"A0APq= ,!!}/%@/,&@=/%@v>-@,)@8"@2;'>${@E*@a!} 0 AP,&@)/%@- 0$OPENING RT/LT= ,!/%@/,&@=/!}%@>-@,)@8"@2;'>$@C*@B 0 A,&@!})/%@- 0$REWALL UP/DN"A0AG ,!/%@+@9,&@G/!}%@>-@,)@8"@2;'>$@E*@a 0 AP,&@!})/%@- 0$REWALL LT/RTG ,!/%@+@9,&@G/%@>-!}@,)@8"@2;'>$@C*@B 0 A,&@)/%@- !}0$J'(DOOR,WINDOW,OPENING,REWALL,F(FURNITURE,OR NEW ROOM J??A5A5A5A5Au!}@PA%-)( PICK WALL(P,OWN,EFT,OR IGHT)-10U*0D*0L*0R' A@1 A5G'(USE CURSO!}R KEYS W/O CTL TO MOVEG(SPACE TO START/STOP DRAWINGE 4L6-%@+6-%+'@,96-&@E6-A!}E 4R6-&@+6-%+'@,96-%@E6-AE 4U6-%+'@,+6-%@96-&@!}E6-A0E 4D6-%+'@,+6-&@96-%@E6-A0V '@@K:K!}AAeA AuV@ A%6-?:A<$AV, :*(!ADD,DELETE,RETURN TO MAIN MENU!}66-A:AA0A%7 A@-(ENTER 1,2, or 3 ONLY PLEASE7 Ad!(ENTER X-SIZE OF !}FURNITURE4( 栲@6-ADP!AVZ A d Ad!(ENTER Y-SIZE OF FURNITURE4( 栲!}@6-ADP!AZ A d A ##(ǠŬŠ%Q6-P:'@,%6-P:$?,/!} A=6-A(&G AQ A*#6-A&'@# A /H A06---B2RB2U<!}F:,H6-@4j "@ A@>(ŠΠ`(REPOSITION THEN TRIGGERj A!}9 Au Au>v6-@6-@% A16-A&; AE AQ6-A[ A v(P!}OSITION ON ITEM, THENCB A0"F:B2R,"8(REPOSITION CURSORB A5H1(ONE MOMENT PLEASE!--!}1 Mo$6-+8,&@H,$@26-&@2N-@V1b"e'o AUR!}6-&@ WN6-%@--@51A"D'N Ae\6-&@ aV6-!}%@--@=1%@I"L'V Auf6-%@ kN 6-%-@!}51%@A"D'N Ap6-%@ u+ 6--!,'/+ z A!}uOBJECT DATA FOR USR4'(1 A@4$F B.(!}8 A@B A F 'OBJECT DATA FOR USR' 68,68,85,D1,68,85,D0,A0,FF'B1,D0,48,C8,B1,D0,AA,68' 91,D0,8!}A,48,C8,D0,F5,68,60' 68,68,85,D1,68,85,D0,A0,01$'B1,D0,48,88,B1,D0,AA,68)' 91,D0,8A,48,88,D0,F5,68,60.'**3'!}68,68,85,CC,68,85,CB8'A0,00,A2,00,A9,00,91='CB,C8,D0,FB,E6,CC,E8,E0B'08,D0,F4,60G'**}u +AR!}@1-@@Q(INTERIOR DECORATOR(Ver.4.1)c-@@u( by J.C. Petty}3-@@3(POKEin!}g USR functions....}"4**$}+ A !6-%@+ B }6-A#B5 }"4**$!} }+ A !6-%@+ B D:INTRDECO.V41+ B }6-A#B5 }"4**$ BU> ?LOONNKENN12LHNNNOPMENUMENUMANBLN10NN1N5TYPTNMMBJIPTKK1N1N1N1CII%}JN2AAXSN1YN2YEAMONNMN50SN40TN1BIJTOTN4YMTXTXTAINRN1@%}@@A%@H @W @ @Q @ @AB1B2@6''A%}@@@PA'A'Y5@AXpB @!@"@I#? %}$@%?P&A9Q'AP(A)B0*@+@,@-@.@C/Ap01@2@ 3AA0%}45@6A7@8@9@:@#;@<@=@>@?@AAABAC@%}D@EBP""FGAH] I@IJKLMN?(O?PQ@ B%}@d! 6-6-6-!B2yfAdAU6-iL6-F:B2y, ''!'((>:,46-@H<6-%%}B6-H"L n !* &x%%F:Ad,"AU)"6AVA@d!A()6*"%}AU9(?6-K6-@HS6-%V$M"A&*(@F:@,&2(7<,I@F:@,&M : !%}!"@F* &)"&((.06-&: A` )!A(>:,56-&@H &) '6-$%5%} A`U &U6-%'+%+",$+",$@%+&,$+",$@%+",$+",$A ,9 6-%6-%!(%}"6-.6-@H66-%9$ A,H2@0!-@%% /27-; E2H$6N2A%} !-@%% 52@`=-A K2N$ ( $I3-@"-(-@8/)%};!A(I6-&A("67<,.>:, 3 "$ 6.=:,6.=:P:,,(B:,"B:,(67B:,%:,!,(%}SCREEN OFF FOR SPEED UP4-8 DAY$P:,A.6-++&P:,,$,'$8 6-% AB-P%}:,L A`V%% AP`% "AY@4% A@j(@ %t2@-2%}( ΠΠ~(($ AT $(% FOR  YEARS))(REGULAR PAYMENT = $ YEAR (%}(ҮԮ(ŠԮԮ 6- 6-%% -'%? 'A06-P:+%}$',$%,' # 6-%6-&6-%#6-& $6-$$A@( 6-%2 6-%6-%6-<%} 6-%6-%F 6-%6-P:$%,'P A0Z6-P:$%,'d(-n6-P:$%,'@ 6-6-%} 6-6-# )6-/6-3 96-= @( 6-%'(AP $Ap66-P:$%,'(,(%}Ԡ = $26-6  A *(( = $#6-' *('( = $ 6-$ %}'(    6-6-"A` 6-%6-  6-&Ap@ % 6-%}%%(ĠԠ. % %6- %!6-.(A P %0 %6-'06-P:+$++%',#&,,$%}%,' L((NUMBER OF INTEREST <(PAYMENTS PER YEAR7<,B6-F L6- % %(>:, 0 6-P:,6-6%}-6-$6-06-@f*= !%(SCREEN OFF FOR SPEED UP--1 =AY4-P:,>% "AY@4%}% A!PH A# R" @(-" A#\ ( %f 6--p(ĠԠz-%}-( PRINCIPAL $ AT $ % INTEREST&(FOR  YEAR(S)&(A"0##( DEPOSITS PER YEAR OF $ 6-%%}$$( ANNUAL YIELD  % PER YEAR--(% ԮԮ (   6-6- -$ %}'%? 'A%0. 6-$+%',8 !A#B '!'A#L  6-%6-%V 6-$'`  6-%6%}-%6-%j '!'A%t -6-P:$%,'!6-P:$%,''"-6-~ 6-P:$%,'  6-% A% %} - @ 6-6- 6-6-# )6-/6-3 =6-%'@( C "6-P:$%,'(0( INTEREST = $66-<%}6-@ C(  6-6-   A%` 6-%%  6-%6-6-      P!(%}ŠŠ-6-A05-=-H68<,-L P  G('(# OF EXISTING LOANS (1-4)?-6-36-;6-%%}? G6-&  6-6-6-%6- H (Π>:%Aw,7,& %168<,-7 %B68<,-H % C %6%}-'68<,-" %-68<,-9 $+',? %C  7 &68<,- AB,68<,-O:,768<,- '68<,-%}!('( Ǯ  A6-P:$%,' 9 )(THIS LOAN HAS BEEN PAID OFF1-5 9  @ 6-%68%}<,-!68<,-@68<,-P:$,%+$&P:$,!, C%(PREPAYMENT PENALTY $+6-/ 76-%?6-%C   (>:,%} %  K 6-%-(YOU NEED A LOAN FOR $36-7 :(E68<,-K6- F6-A0P %6-'# %&(%}F(SHALL LOAN BE DETERMINED BY P$(1-TERM OR 2-PAYMENT AMOUNT?*6-06-66-: @"F %P A0u  %%}$' %  P AB(3( TERM OF LOAN7<, YEARSF(7, MONTHSP A0 2#6-+$','+&'+'%,#%}+$,,26-P:$%,' 3()(REGULAR PAYMENT $3 AB &&(LAST PAYMENT $ 8(((TOTA%}L NEW LOAN FEES $.6-2 86- E(/(#REFIGURE THESE TERMS (1-YES 2-N0)?56-;6-A6-E  " !%} 7( *68<,-P:$,%+$&P:$,!,768<,-%& S68<,-68<,-'68<,-O:,268<,-=68<,-H68<,-%}S68<,-+ /68<,-68<,-$68<,-/68<,-, / 6-6-6-6-% A1 / A1U0 3@(>:%},"8<,3( ̠5  8<,( : :(Π:( OLD LOAN(S) NEW LOANI B%(%}ҮԠ+"7-@!B(FEES=N " "6-6-6- "(P $S 18<, 16-P:8<%},,%+8<,&P:8<,,!,X ' 6--8<,!'6-8<,]  b 0 -6-6-6-#6-) 0( g (%} l + --6-+(8<,A25q 78<, 6-'8<,7P:',"P:+&,',A25v 8<,"8<,%}A25{ ?6-8<,6-8<,$6-8<,/6-8<,56-? A ,8<,"8<,&* &6-%8<,,6- ,8<,%}"8<,&*"&6-%8<,,6- 68<,-8<,% 68<,- 5  6-%)6-%$+&,$+#+&,,-56-% 5 "%}6-%)6-%$+&,$+#+&,,-56-%  A25 6!%&$*(8<,(*668<,-+&,$%$' = %}%&$*8<,*(8<,&(@=68<,-+&,$%$'    , 6-6-6- 6-%6-) ,( K68<,-8<%},%'68<,-8<,%968<,-8<,%K68<,-8<,% O @6-8<,#(&(O($NEW LOAN COSTS MORE THAN %}OLD LOAN(S) H (H(*NEW LOAN PAYS IN P:', YEARS, &P:',$ MONTHS P6-8<,P(@OLD LOAN PAYS IN %}P:', YEARS, &P:',$ MONTHS Z-(%ŠӠ9@Z(OLD LOAN(S) NEW L%}OAN 00(' ӠԮԮӠԮԮ > 6-6-8<, #6-8<,)6-- 86-8<,>6- 8@%} 6-(6-8<,&&, 46-$8  V 6-& 8<,(@(!CONTINUE COMPARISON (1-YES 2-N0)?F6-L6-R6-%}V  + "6-6-%! A1 + A1U -(-(!REFIGURE NEW TERMS (1-YES 2-N0)?  + 6-6-6- !(>:,%}'"+  1 -68<,- "--68<,-1  F -68<,-8<,+68<,-8<,/ :68<,-F %@&}P *(ǠΠ*6-A5 9 % % % %#6-'/$+',5 %9  # &!(#(&} WORKING... C A(*(REMAINING BALANCE= $96-P:$%,'?6-C  ,( (PAYMENTS TO DATE = $(6-$, &} ;( (INTEREST TO DATE = $&6-* ;6-P:$$%,' ,("($% TAX SAVINGS = $(6-,  =( (NET EXPENSE&}S = $*6-$&. 1(5 9 = A((͠Ơ!6-$' %- %3 %9 %A6-' $' %&}  AB6-V(0( LOAN TERM =  YEARS,  MONTHS3(L(LAST PAYMENT = $R6-V @  (#(TOT&}AL PAYMENTS = $66-P:$$$%,'<6-@ 1((TOTAL INTEREST = $'6-&-6-1 <(!($% TAX SAVINGS =&} $26-P:$$%,'86-< +((NET EXPENSES = $'6-&+ R((PRESENT VALUE OF/(REGULAR PAYMENTR(&}AT TERM(+&,$ % INF.)= $%6-P:$+#,$%,'6-" %(P  (,(DO YOU WANT A COMPARISON WITHP(A LARGER &}PAYMENT (1-YES 2-N0)?# 6-6-6- "# ;#(>:,ҠҠ)6-/ %56-;6-  & } % A@p((6-6+K:&+$,'+$,,'+K:%',$,,56-P:$,6-$&)6-P:$$%,'56-%+!,:6-P:,%+&& }P:,!?P,'6-&$:6-P:$$$%,'>(1( NEW TERM IS  YEARS,  MONTHS5 ;6->(,]-( A LOAN OF $& } AT $ % INTEREST0(A( PAYMENT G6-K S( Y6-] 63(( TOTAL COST 6-! )( /6-3 7& }K(( TOT. INT. 6-&%6-) 1( 96-&?6-C K6-&8:(( TAX SAVINGS(6-P:$$%,'.6-2 :& }( 9D6-P:$$%,'6- !(2( NET COST :6-&@6-D : ( 6-&6- ;R(( PRES. VALUE&}%( REG. PYMNT@(AT TERM(+&,$%)F6-J R( <"6-P:$+#,$%,'6-" J,( ("(TOTAL SAVINGS =&} $(6-, O+((NET SAVINGS = $'6-&+ T9( (1( BY PAYING $& MORE EVERY MONTH5 9 h((6-6+K:&}&+$,'+$,,'+K:%',$,,r56-P:$,6-$&)6-P:$$%,'56-%+!,|=6-P:,%+&P:,!?P,'6-&$:6-&}P:$$$%,'=$C6-AE(+(̠Ԡ1 %7 %= %C % '+$,& % # 6-6-&}(#( WORKING...%%6-+$','+&'++'%,#+$,,,6-P:$%,'6-O:&,'6-"AF#6-%&}$+ ,&$+!,# AE0 6-% AE0"6-P:$B%,'B" 2(*(ANNUAL INTEREST RATE = $%. &}2 E!(ҠԠΠ-6-AP3 %9 %? %E %+ 6-'+6-+$','+&'+'%,#+$,,R(&}(REGULAR PAYMENT = $.6-P:$%,'46-8 B ABH6-R A@Ap?%(ŠŠƠΠ-6-$3 %&}9 %? %u %6-'z( %6-J %6-$+%,#+$,36-$++%,#+$,&,';6-%J6-P:$%,&}',((FUTURE VALUE = $$6-( , 16-P:+&&$$,$%,'16-P:$+#,$%,'6-P:+&$,$%,'((&}(TOTAL INTEREST = $$6-( W((AFTER TAX TOT. = $$6-( +(M(IRA @ +&,$ % INF. = $S6-W :&}6-P:$+#,$%,'(:(+&,$% INFLATION = $ 6- (  d<(ĠŠ*6-Ae0 %&}6 %< %i %Ae n* 6- %*6-P:+'+%,#+$,,$,'s2((INIT. DEPOSIT = $$6-( 2 A`@&}xP %6-'%6-$++%,#+$,,A6-+&,$'++%,#+$,&,P6-P:$%,'9( (!(DEPOSITS = $'6-+ &}/ 9 A`@X;(Ҡ#6-$) %/ %5 %; %l.6-$+'++%,#+$,&,%,.6-P:$%,'v.(&} (REG. WITHDRAWAL = $&6-* . 6-P:$+#,$,'V( ((PRESENT VALUE OF2(LAST WITHDRAWALV((+&,$&}% INFLATION) = $ 6-   L9'(̠ԠҠ36-Au96-VR(((AMOUNT OF WITH&}DRAWAL $.6-2 86-> %D %J %R6-$`E((INFLATE WITHDRAWAL/( (1-YES 2-N0)?56-;6-A6-E & }e* "*!( WORKING...$6-*6-jM "-&96-%$'$+&'++%',#+$+&,,,,A &M6-$+&,o* &!}"6-P:$%,' 6-&&6-* t) ")6-$'$+&'++%',#+$,,,~K6-P:$%,'(/(INITIAL DEPOSIT = $&"}56-9 = K"Ap@S($( WITHDRAWAL @ +&,$%>(INFLATION = $D6-H L O(S 2;(%(# O&#}F PAYMENTS MADE7<,+6-/ 86-P:,;$24()(ӠԬԠҠ06-64 2=($(INTEREST RATE (%)&$}7<,*6-06-4 :6-=$29(&( PRINCIPAL7<@,$,6-0 66-9$22("(HOW MANY YEARS?7<,&%}(6-, 26-2D (HOW MANY MONTHS?7<,$ *6-A6-P:+$%,'$%,'D$2;(((INITIAL INVESTMENT(IF ANY) $.&&}6-2 86-;$2N(((# TIMES PER YEAR COMPOUNDED .6-2 A6-+",%P:,K6-''N$2K(((# OF DEPOSITS PER Y&'}EAR .6-2 86-H6-'++",%,K$29(&(REGULAR PAYMENT7<,$,6-0 66-9$2,(,(!WE'RE TALKIN&(}G LOANS, NOT CHARITY!2H"(PRESS TO CONTINUE .6-AU46-:6-> E(>:,H$2;(((# OF PAYMENTS PER YEA&)}R .6-2 86-;$2;(((TOTAL VALUE AFTER X YEARS $.6-2 86-;$2K(((# OF WITHDRAWALS PER YEAR &*}.6-2 >6-+",%H6-''K$2;(((AMOUNT OF DEPOSITS $.6-2 86-;$2[("(START WITH WHAT YEA&+}R? (6-, 26-N(END WITH WHAT YEAR? R X6-[$2-((STARTING MONTH? #6-' -6-2-(STARTING YE&,}AR?  6-$ *6--$28 (ԠРԠӠ, B186-B126("(INFLATION RATE (%) (6-, &-}66-&'2.("(MARGINAL TAX RATE (%) & .6-'2K B0U(/(PRINTER COPY (1-YES 2-N0)56-;6-A6-G6&.}-K 2 "6-32 B 2I!(TURN ON PRINTER!7<,&4-A8 ?(I B0@,3% (>:,&/}%(ﮠ63e( (*(1. FUTURE VALUE - VALUE OF AK( LUMP SUM/REGULAR DEPOSITSe( IN A GIVEN PERI&0}OD.@3k(.(#2. SPECIFIC FUTURE VALUE - LUMP SUMG( /REGULAR DEPOSITSk( FOR A SPECIFIC FUTURE VALUE.J3b(#(3. R&1}EGULAR WITHDRAWALS -F( WITHDRAWALS FROM A LUMP SUMb( OVER A GIVEN PERIOD.T3e('(4. INITIAL DEPOSIT - DEPOSITI(&2} REQUIRED TO ALLOW SPECIFICe( REGULAR WITHDRAWALS.^3$($(5. EARNED INTEREST TABLE.h3$($(6. RESET CONSTANT V&3}ALUES.|3? 6-6-6-B1'6-B2-6-36-;6-%? 3> (>:,>A`AeApAuA &4}B0 3% (>:,%(ﮠ3,( (,( 1. REGULAR PAYMENT - HOW MUCH3( IS A LOAN PAYMENT.3(((&5}( 2. TERM OF A LOAN - HOW LONG3%%( IT TAKES TO REPAY A LOAN.3%(%( 3. ANNUAL INTEREST RATE -3##( A LOAN'&6}S INTEREST RATE.3'('( 4. LOAN AMORTIZATION TABLE.3K(,(! 5. REMAINING BALANCE - PRINCIPALK( THAT'S LEFT ON A &7}LOAN.3E(*( 6. REFINANCE - COMPARE OLD ANDE( NEW LOAN PAYMENTS.3%(%( 7. RESET CONSTANT VALUES.4? 6-6-&8}6-B2'6-B1-6-36-;6-%? 4F (>:,FAPA@AEAA5A0B0 6aa&9}0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,20,23,49,50,100,125,400,500,1000,13000,300,310,0.56''"&:}6"6L';,;@9,;@9,9<,267,. C67@9,. L67,.6)&;}K:)S::) +@-)(SAVINGS & LOAN:9AdAU'AA9A@&<}:+ -(-+( : -( Ҡ:7 -( '-@7(&=}:QA@d!AQF:Ad, @0)F:Ad,!@1BPP:5 6-6-6-6-!6-+ A0&>}56-%$:e+@@d+B7t@d=AAIARU6-B0 [6-a6-e   D:SA&?}VLOAN  D2:SAVLOAN@@d+B7t@d=AAIARU6-B0 [6-a6-e   D:SA$ ԮӛThis is a BASIC program whichallows you to create a simple Logiccircuit and then test it on scr*A}een.Note: It is assumed that the user---- has some knowledge about Logic circuit design in order to use this *B}program.The JOYSTICK is required to movethe cursor around the screen.Keyboard commands are used to erasethe object unde*C}r the cursor or toplace a gate, junction orinput/output node at the currentcursor position. There are threegates availabl*D}e: AND, OR and an INVERTER.Once the logic circuit is drawn youcan test it by setting the inputsand watching the outputs.*E} ̱Ǜ ̲Ǜ ̳ǛThe above data files are threesample logic cir*F}cuits for use withthe above program. ̲Ǜ ̳ǛThe above data files are threesample logic cir(&s88ANNNNNNNN1N1N2N4N9NCSSSTSYMBOXMSTEXMYPLAYERCROSSOLDLOGICFLAERASELCRIGHDOWD.H}ONOOGAAGIIVCHAJJNJSJSERRMESSAGELHSTTIMPITCWAIXHITENG1G2DFILEIIOCIREDIPMPAPADCHSEGRBLC.I}OLRCOLRCM@@@@@@@@ @ @ @@ @ A6.J}@5@@@@@@@3A1@@!A0 A.K}@ !@ "@#@$%@&@A' (@A)*@A+,@0.L}-A.)/@0@1@2d(3@54@P5@6@7@48@9@P:@;<.M}=>? @@AAHBC@D@EA HF@GAPHI@JBK@L.N}@MANAO@PQBrràԢӪЪêŠ.O} ;@,6-@(6-@46-@@6-@L6-@X6-@d6.P}-@p6-@|6-@6-@ 6-@@6-@ A B+ 殠 -.Q}( $ A A$̠#6-?:A6<, A-2..(%} ARE YOU .R}SURE YOU WISH TO QUIT(Y/N)7&6-F:Ad,&"AU@U<$AdAU!@C$$A& @pB2w.S}&%D:MENU.*F + di 6-'6-'n" 6-R:,6-T:,"*""$s"APx"AX.T}-(}'"@6-%+ ,$' A5'"@6-&+!,$' A5-"@#6-%+ AG.U},$- A5'"@6-&+!,$' A5 6- AP%B2H@P%%6-AP%67<%@.V}",."A 1*-@3@7" '* A "@`AJ1+"@*.W}"@,)+"@*"@,7-@(,J AJ1+"@*"@,)+"@*"@,7-@(-J .X}AJ1+"@*"@,)+"@*"@,7-@(*J AJ1+"@*"@,)+"@*"@.Y},7-@(+J A2"@)"@-((&2 A2"@)"@-(('2 A.Z} 6-$,Π. 6-1 B6)B2HB2w)͠;.[}76-A16-@!7= A5@ AE AJ(A .\} 6- BP 6-6-@6-'6-@F67AP<AP%A,.P A.]}5$ A$ɯϠ A A& A0X]F:Ad.^},"AU$b6-F:Ad,gAdAUl@GA`q v @P"@5 B$._}!!@5*@CA0@A?'6-?:A6<,%-A) 56-@.`}? A@EA A A@/-A!2@% /2.a} $##ɯϠ# 6-R:,6-T:,#"A% 6-'1:"A-(.b},-@P0 : A%6"AX-$(@2-@P6  " $-"@#6-%+ AG.c},$- A@ "@6-&+!,$&&67AP%<AP%%@",.$LɯϠQ-.d}@1V"@2A [ -(` e$ -%1@.e}%"@2A -@( $""67AP<AP%A',.'B.f}2w'Я͠6-?:A6<,# AeP#"AA 1!"@2.g}6-%! A@  6-&@0  6-6-6-6- AC 6-% A@  6-.h}(AAP  -6-8<,"AA  6-68<,-' AA0  AAP"'6-8<,%6.i}-8<,!6-'6-$3 1+"@9)"A5)"Ag36-%' AC6(AB; -6-8<,@.j}"AApB 6-E68<,-' AAJ O ABT'6-8<,%6-8<,!6-'6-V3 1+".k}@9)"A5)"Ag36-%Y ACh(ABPm -6-8<,r"AB t 6-w68<,-.l}' AB0|  ABP'6-8<,%6-8<,!6-'6-3 1+"@9)"A5)"Ag36-%.m} AC(AA+B2w6-!6-@+ A5$!B2w$! .n}# 1"@0#6-@b)6-&@2) )"@(AC@ě.o} - >:%,!A(AH7"@0-@-(>:@0%,7 AC`7 Ab%7.p} AC@(AE 6-% .q})68<,-68<,-)"( $" - 6-6-66--.r}6-8<,6-8<,1%%6-&@2I/+")",*+"@)"A)"A5,76-%?6-%I ACu.s}C)+")",*+")"A)"A4,16-%96-%C ACu!=#"*+")"@)"@,+6-%36-%= AC.t}&C)"*+"@)"@)"@,16-%96-%C AC+7"*+")")"@,%6-%-6-%7 AC0.u}=#"*+"@)")"@,+6-%36-%= AC5 6-%"AD06 (*"6-: "6-6-6?.v} "6-6-D "6-6-I ACpNS--8<,8<,% >:@(%,-6-&X) AC.w}`)*AFҠ(AE5 -.!+"8<,,*+&+","8<.x},,$'. AE@ - 6-%68<,-'68<,-&+",-6-68<&,-8<,")8<,"AE`E68<.y},-A(48<,"A`*8<,"A`E68<,-A` AC`*AGĠ.z}(AF5  -*"8<,*&+","8<, '* AF@ - 6-%68<,-'68<,-&+",-6- .{}68<&,-%8<,")8<,"AF`*E68<,-A`48<,"A(*8<,"A(E68<,-A(4 AC`.|}\AHfқk 6-%p68<,-68<,-z "A( 68<,-A` ".}}A` 68<,-A( AC`%% (}"6-@P6-.~}@5"6-6+-@-+2@: -  6-6-%6-,6-60 :2 B.}$ΠQ""V  AbP[ 6-%`3 1+"@9)"A5.})"Ag36-%e$j@ Abpo 6-%t3 1+"@8)"A4)"Af36-%y$~.}Ab "6-66- "6-6-6 6-%6-% 1:*"6*+"A4)"@8)"Af.},26-%:6-%:*"6*+"A5)"@9)"Ag,26-%:6-%$@ Ac  "6-.}6- "66-6-6 6-%6-% 19)"*+"A4)"@8)"Af,16-%96-%:*"6*.}+"A5)"@9)"Ag,26-%:6-%$@AcE "6-6- "66-6-6 .}6-%6-% 1:*"6*+"A4)"@8)"Af,26-%:6-%9)"*+"A5)"@))"Ag,.}16-%96-%$@Ace "66-6- "66-6- 6-%6-% 19).}"*+"A4)"@8)"Af,16-%96-%9)"*+"A5)"@9)"Ag,16-%96-%$.}1 --68<,-)68<,-- 1 & --68<,-" & !!󠦠.}- 6-6-6-6-!6-'6--6-$@EF:Ad,"AU$J<6-F:Ad,.}6-'"6-'*1<AdAUO@c*ApTY#-@3@7" '#$^.} c1%@h#-@3@7" '#$m r"@$w0 6.$6.%"(6.>:@4,.}06.#| -(-%($*@AԠ#-@3@7" '.}#$ 6.<"@6.! -($@A%6-?:A6<,$.}AP//Ǡ 6-$@BA.} -( *"@4)"@6!-%*( *"@5)"@7!-&*( %6-%+ ,$%B2H.}@P% $ @8A% ɯϠ N "1-N(>:@2&$+"@2,,>:@2%.}$+"@2,, `"@1@)-@`(>:@2%$+"@2,,>:@2&$+"@2,, $! .}@GAe& + @P? ""@5(} B"$D !!@5*@CA5I @aAP.}N S  AU *(*(GET FILE NAME( TO ABORT)V AwX .}4A%] ( 6.D:67,.(67B:,%,..LOGb q +6-@6-A2%+%@v %%F:.}@,%%F:@,{ %AD%@  6-?:C:hhhLV,<@,  B B .}$ @bAP 뛨  A -(-(!SAVE FILE NAME(LESS THAN 8 CHAR ).} 4 A   6-B:, 6-B:, %67%,..LOG6.D:%67,.  +6-@6-A.}2%+%@ %%F:@,%%F:@, %AD%@  6-?:C:hhhLV,<@, .} B $!''`" $ "" (}.}D:*.*" 6-6-". .@:, @X*@:,!@GA0"&&7@<@,0LOGA"D 6.}-%"(6-"6-%(".6-@( PRESS RETURND" 7<,  A"  $(#͠2#/ 6-/.}󮩛<#6-AV$'F###6-+P:+C:,%,',%,$'AVP#6-$AV&C:,&Z#+;,.};A H,+砱d## 6.67A,.#67,.n#;@#,;AV,s## 6.67AV,.#67.},.x#3!6.3̬}#B"67@ <@,. B67@<@,.>:A,#.}BBy#AY@b#A##)A@t)򠰛#B2V.}#$%gg̠Ҩ!% #A.}&%JJ165,88,133,0,165,89,133,1,104,104,104,240,42,160,0,162,20,169,18,133(%CC2,169,0,230,0,208,2,230,1,177,0,41,63,145,0,1.}98,2,208,240,230*%EE0,208,2,230,1,230,0,208,2,230,1,202,208,219,96,160,0,162,20,169,%FF20,133,2,169,0,145,0,230,0,208,2,2.}30,1,198,2,208,244,202,208,235.%960%'-@"#A6%' :%D%FF9<,9<,.}9<,9<,;,;@0,;@0,;,;,N%F6.̠!6-)6-%/6-CAV'AVF$%1.}@@'@@91+@% #A% AP% 6-6-%6-A6-A% .}%!AAU!A % 6-%  ,%C "!"6@ *"6@ )"16-%96-%C A.}%"6*"6$&# 6-%6-%/# A & 6-6- A& 6-6- A &6-@6- .}A%&6-@&6- A*&6-@06- AH& -R& W&-@0 \& .}a&-@0 f& p&$&RR0,5,-9,-9,2,1,-5,0,5,3,0,0,-1,-2,0,-9,-9,3,0,-1,0,-3,-9,-9,3,3,4,0,1,-10,-10&.}jj0,5,-9,-9,1,4,-3,0,1,-9,-9,2,1,2,0,-5,-4,0,0,5,3,0,0,-1,-2,0,-9,-9,2,0,-3,2,0,-9,-9,3,-2,1,0,1,-9,-9&3,4,-3,0,5,-10,-.}10&dd0,5,-9,-9,1,4,-2,-9,-9,2,1,0,0,2,-4,0,0,-5,4,0,0,1,-3,0,-9,-9,2,0,3,3,0,-9,-9,3,1,1,0,-2,-9,-9&**3,0,-2,0,-1,-9,-9.},3,-4,2,0,1,-10,-10&220,5,-9,-9,2,1,0,0,-5,-9,-9,3,1,0,0,5,-10,-10&XX0,5,-9,-9,2,1,0,0,-5,4,0,0,1,-3,0,-9,-9,2,0,3,3,0,.}0,1,-3,0,-9,-9,3,0,-2,0,-1,-9,-9&((3,4,-2,0,1,-9,-9,3,0,3,0,1,-10,-10'!!ĭ'?6-+F:A,&.},$AV?Šԯ$'PP6-?:C:.hhhhhhh`,<BsD<<A$,..}' #B@7'қ8'32,48,56,255,255,56,48,329' Ҡ:';;112,56,28,252,253,29,29,31,31,28,28,252,252,28,56,.}112;'Ġ<'9932,48,56,248,253,61,61,63,63,62,60,252,248,56,48,32A'ӭB'0,0,0,255,255,0,0,0C'.}D'24,24,24,24,24,24,24,24E'̛F'24,24,24,248,248,0,0,0G'̛H'0,0,0,248,248,24,24,2.}4I'қJ'24,24,24,31,31,0,0,0K'қL'0,0,0,31,31,24,24,24M'N'24,24,0,255,255,0,24,2.}4O'P'24,24,60,255,255,60,24,24Q'R'%%255,255,255,255,255,255,255,255t'##.}~'%-@U"!%$%% '%-@9"!%$%% '+-@"'%@($%+.} '+-@"'%@0$%+ '$<(כF(:AR: &}ND $ CT < | LEAR SCRN UIT.}P(''  % NVERT ! | ET CIRCUITZ(55 R >:@4, RASE > | AVE CIRCUITd(.+ " # IO BOX &> | OGIC.} ANALYSIS.$)"")-- %}RACE CIRCUIT | USE JOYSTK AND TRIG)** "HANGE MENUS | TO CHA.}NGE INPUT")!!  |  LOW  O,))& UIT |  HIGH  l)$ D8:LCIRCUITNGE MENUS | TO CHA,g  2}       2} 2}0    6}          6} 6} 4     :}             :}    :}  8