@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`  `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 } 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- 138ɛ+,' 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 D8u)6^^<s3>00x|73>00x`c6<9c` 33c366fffg~33>00xgfffff< T}11111{!!\]_\ED!EOHI B V`}   U} TURBO-BASIC XL 1.5 (c) 1985 Frank Ostrowski!  ӥL]""$$ (p V}%J[WܠjeC /D%Zub2gTSt$8®݊Ò2% 5R W}Ţtd.’$3@X7t5w5$?## $#L+D:*.*S:C:P:$#.#) `:#(6ENeU\l؏&/ؕ؄sأ$ X}LENeU\lأ$8آǔƐƉƐƇ4cY%٦rULۉCۄړp^gyض%iwܸJڅ*ܣ$ڭڞجئأأ Y}$ ,(""(222000000..222222222222222222222222222222**22*22(222(2222222222 ,(""( Z}0000000--**2*(22(2222222 V`hh@,lHH$HHHHHHӍl" [}H$HHl $`GHFH\` ` 4ӭ l 4Lq ӠԪӅԆL} Ӡ L(  \}) ` b% +L:#HH 0 HHLj%ӥHlL{ee 8eee ]}eӦee褢%ƚƜ`88夅奅8 ^}夕奕Ӡȱȱȱ㦢`L+`8` .E)))8@8e0 _}*څۅ܅݅ޅ߄ԠF0y"ޥy"ݥy"ܥy"ۥy"ڥy"و0ǠF0y"ݥy"ܥy"ۥy"ڥy"٥y"؈ `}0ǠF0y"ܥy"ۥy"ڥy"٥y"إy"׈0ǠF0y"ۥy"ڥy"٥y"إy"ץy"ֈ0 a}ǠF0y"ڥy"٥y"إy"ץy"֥y"Ո0L-`8`E)))8i@0 *ڄԠ b}"("!""" "L**""""""&О"("!"" c}" "L**""""""&О"("!""" "L** d}""""""&О"("!""" "L**"""" e}""&О"("!""" "L**""""""&Оd f}"("!""" "L**""""""&ОL-6"e" g}"e""e""e""e""i""}"""}"""}"""}"""}"""}""ǭ"m"""m" h}""m"""m"""m"""m"""}"""}"""}"""}"""}"""}""ǥՅօׅ؅مԅՅօ i}ׅ؅`` ` ` `80 `ԥՅ +.JJJJ)iFiFi1FicFi'ȐȦoFiU j}ȐFiiFi#iFiGi Fii@F iiFiiciՊFigi'iՊօשBL-`I k}))83Ԥԥդե֤֥פץؤإ٤L,K6"ХL--L--L- l}-E0:e٥eإeץe֥eՐ؅٥ׅإօץՅ֩L-8٥إץ֥հ'I8 m}م٘؅ؘׅטօ֘ՅL-ؤm\G0Q@Ն֩م؅2եمֆשم"ե؅֥م׆ةեׅ֥ n}؅ץم؆لԘ)q +` . |. &7i |. ,%!L?.`刱䈱㈱∱ o}ሱ`ԅՅօׅ؅م`ԍՍ֍׍؍ٍ`ԍՍ֍׍؍ٍ`L.L. Խսֽ p}׽ؽ` L%/`ӽޕ &ԅ)@إ)JJJe)e - M q} 1. &Je0F 2 . /L(8`@ԠՈքׄ؄` . |. , . . |. , #/L(8`0 I@ԥ) r} 2f / . & r 1. #/ &?P , .Iiԩ +)ԅ ,ӽޕL(`8`$ s})Ԧ61718191:1;1 (ť)8@0$Յ)e)e -F . / , . &1 1. t} #/ &F I`U9>`D'RFuCU?b9dYdg@W2@?tS)%)@0)%ԅԢ / . &G  u} 1.Ӱ6 #/ &.ӽߕ ,ԅԥ B1 (`8``0?i? . . / , #/ &ԍՍ v}֍׍؍ٍ . . ( / , O2 / ,0 .JeF 2`L+) .e٥eإeץe֥e w}Պi؊؅٥ׅإօץՅֆե1ԥ'JffffJffffJffffJffffم`ԩ&&&&*&&&&*&&&&*& x}&&&*`Pi`)JJJeԅԘ)Peԅ`եԆ8@EB)JJJeԅԥ)PeԅԘ)3eԅԽ3eՅ՘)JJJ}3 y}}3`)JJJeԅԥ)PeԅԹ3eԅԹ3eՅդЧ` 0@P`'Nu pX@(#d,X L(  兢 z}0襙 bɥ⥋㩀 50ɥ0DȱȱȄ   ik#ZMkVgğe拰ㅋ {}⅊0 eee拰 L f5дƨħ 4LY4 f5К,樥ŧH 4h h5L4樤ܱ.* O %30 |}  5Ԅ +(fԤԈ`ř嚰Ԥ`ڥۥड़0-԰eڅڐۈ0eeL+58` }}O#`,#5  6`]5 6DE 68DHEIHI V0$ 6Sл B ~} V,# 6` $#LllBHI V0HH V0Ԩh``{a$%Ȏ$$xө$Ѝ$ ` } `@X a Ӆʢ ʎD  _ɠ %` ɩHH `өL: g% D }:??????*.ARBөjJHH`ՠԢӱԙ!ӹ!`֝DEIHB V0Y|ڝDa۝E }օܥׅݥܝHݝI V0+Ӡڑڑ0`l `  䅠 _ɠԐ }e拢 &L &Lħ © ¥4 䥝ň剰' k ɀ8@4= LY ĩ`OJ ]J?L } KԪȱLRHHצ R, hhLRHHHHHH /0ȑȑޠhhhhh }h`HHHHHHHHHH $H bɐhȥLHhhhhLň剰) }i桰` )``L(兢ħ #$ x Hҩ h$襚ҥ ԝ` } UV #T` ` `,H ¥ȍ` JKhLŢ  #)I L ¤Ȣ`L¦ ¦ Lĩ } ½J*K+ $LąLĩ …L~ …`H Ġh é`,H hH Ġ  ĭ 8}} } L n [h`LkL © 8倝偝 Ġ  ĥ󥃅  Lĩ LH } éLH#h ĩ`H hKJ L+ , H hHHħ s hKhJ  Lĩ# qL } ŘL ũ& QŽLM " ĽNL  ĥԝL՝M  ĥԝN%LV  ¤ħ` Ťħ` ƪ Ċ }Ťħ` ¢`届 x݅ L ĽCӠɀ L]Ɉ L] Ln LŠI }HEDBL$HH hh +L `ħ LĢl ¦`OBRUT ԅՅ֦ }󅗄`L+ ¢p 0 Hp hɈL` ,#,$,!Lé ,H ĥDEԝH՝Ih L }©L $`L© , k ĩԅ  + ĥ 夨ħ`2ƪƪ ! A!Ƚa!Ƚ!Ƚ!Ƚ!Ƚ! }``氤hhL1@$ƪư 0 0 n$P`L+FҐ֥װ綾إٰو LǠFf }ؐ ee&ee* &eeeԪeըee$.ƪ@!Ƚ`!Ƚ!Ƚ!Ƚ!Ƚ!`檦 }!!!!`!@!^!` Ȅ 8 n奱 ٥Lǥ֤צưĘ=ŗ78֪א& } eԥe$`L: L ԅՅօׄ 1פ& ٤ţĢԅeՅe8包卅 ]& } 8Ԩժ%אְ`ֆL夨ħ` FҰg8&0ei֥i0Tׅiإi0BJe؅eم0&f }fff&0 &0 eeL+օפإ颎 %8包ԥ卅 L ɥ }ȱъŠe拰8``,ªȱȱI ѝ3ȥLɥHHO] }  ȥe暰Х ȥL+ʅȱhh`Lħ OԪȱԨ``L :0 } `L(奷 bɥ󥋅ȱȱȱȄ#鈄0B8eeŶ }ɛ,@LBˤ,ɛ`L?± ˤ樱f Oƨ x݅ + ~ [ˠ O樥0# +  L˥` }LL :ɛ,$PH h $P润䧰 ʐLʦ䧐 +` ʐL3LBˢ }ԝD՝E֝HםI L 兢L]& 兢L% ,L6 ,L6 &L6 (L6妪@!I@!` ؐb`P KW ؐRB ؐ }=;G ؐ4@ ;+ƪƪ@!=A! (ƪƪ@!A! ƪ@! ,@@檦@!`!!!!!!`ƪ@! ǩjҤ } /L.٤ƪƪ@!@!, 舽`!`!!ـ!!٠!!!!!`@!jI*` . ֪ ( }ϰ`(8` ֤ׅԄ +҅L: Lyƪ8吪周Ly sũ + ŐL Ly sŠԄ h L} } L}٩    e쪽pLyL( + ڥHJJJJ h) 0:i`  ک; n +ȱ)ȥ% }ݓ Lh ԍՅԄׅ֩өL:ƪ?Ԣ )ɠ )  -L &Lڦ@!)@!` n)8@ } -L:` / n)8@I= n)8@/ѩ֔$ሄ ,L: + n 0L8 n } 0L8 n H1L8 n /L8 n /L8 n D/L8 n 1L8LLإL( &)ԥ)8@JjH@ }MC)JJJe)e .F / .P . &F . #/ &L.L(HHHHHH /hhhhhh & } Y/hԅL:,` L _ܘ%ᨥ%Ly _ܘᨥLy _ܘEᨥELyٚ<|'g 0L` }!!!!i ` &LإL٥LyɥLzvmZ ƨ!0 4 䦵 ¥ԝD՝E֝Heם }I Lܤį eį L` x݅ƨLLLܤ ©`#ۢ Lĩ_,ߤ } ڄ . eڅԥeۅհ"8څ֥ۅא8ܥݰL۠Q%0ԅإՅ٥ަ0%Q% }L-ե0LޥڤLyمօנ6&֐ eו`L( Hħ hբՅ `ޥԢ `ޥՅ֠ }&&֐eܥeېڈ 7 \ 7 j N \ N j$0!ee80å/8ܥ۰uڕ0 }eUiV`TUV`8UV`eTi`8TȢ` $L„')Q ȱ8 e }新`8`L齀).Q Ӱȱ8e新 O :L䅫# *$Ŭ } Ʃ HL"䥫ș L` Ml/#樱0ZS'`ȱȱȱȱȱȱȄ`ȱօȘuԩׅu՘e֨҄` }I 屝Ҡȱȱȱȱȱ` n$҅J?eԨe` L 兙 兛 n %3 Ԥ` ҩ, } , , L檤 ٙ!ؙ!י!֙!ՙ`!ԙ@!ә !ҙ!` 䤪ƪ!ٹ!ع!׹!ֹ`!չ@!Թ !ӹ!`ƪ!! }!㹁!a!A!Lp ґȥӑȥԑȥՑȥ֑ȥבȥؑȥّ` ***j)e)e`ʭȅiȅ }iȅȩȩ Lfإ  4  \ +] ¥򄟄 }   넨ɛ$0L祔 Z f0#ڠ쩀 ߩ6ei$0 녖چ + !5 }ɛȑ @膔7 ɛ 襔!ɛL! _ɩ8$IȢ %e拢 } &!$P* &8孨客 "&$ 1L~ L~ &L _ɰe拢 &L~ +0 %30Ԅ }L 9:枢0 O L :H9Hhh tLHH`h }hLCL馩`ʆLC枢0ְşLC`A枢Ɣ!L!L }!T 򈩛LQLD ijq ߰,iŰD VD8` 覲`8` 넬 S( +饰 }0 S0:$$ p8`$p (ȩ@҅ҥ򄬤 ߰ A L8򨢄 %Ӥ򈦬ʽ ʽ % }+HH 屝EҨhh$P0Ƭ 襯I `_A[`8`80 &Ոԅ }` 넬$ +  + h갳 h) + , 褔ԙ!` "8` 襔 ɛ "ȱ" }嫤!`! `) ɛ%)a{)_0:A[_դ`RE͕DATINPUԑCOLOҝLISԖENTEҚLEԛIƜFO }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ęREA }ĨRESTORŐRETURΩRUΐSTOАPOХGEԫPUԑGRAPHICӒPLOԒPOSITIOΐDOӒDRAWTϓSETCOLOҬLOCATŔSOUNĦLPRINԐCSAVŐCLOAĚERROR- }DPOKœMOVœ-MOVŪ*ƐREPEAԑUNTȊWHILŐWENĐELSŐENDIBPUBGEԒFILLTϐDϐLOOШEXIDIҖLOC˖UNLOC˖RENAMŖDELETőPAUSŖTI }ME$PROøEXEÐENDPROÑFCOLOҪ*̕-RENU͒DEDUMЪTRACTEXԖBLOAĖBRUθGO*’PAINԟCLӔDSOUNCIRCLū%PUԘ%GEԚG }OTGOSUTSTETHEΣ<<>ުNOOANĨ<<>STRCHRUSASVALEADATCOPEESIRNFREXLOCLOSQSGABIN }PADDLSTICPTRISTRIDPEE˦INSTINKEYEXOHEXDEDIFRATIMETIMMOEXERNRANTRUN%%%%GOUINSTERER+,%5 }&6(+8,<Xk`fghilm^deDѳHc?,Ќ,е,Y_Ҳ+7,/0 }1 2!3"4Ɛ"-"."-؂ٿ֐ː }ĐאŐbj+9,+;,ʐͭ }ͭ@ABC\=>[<+:е<,&%rvnnxc<\ }-78s_XV+@D&0d*"'2GJh N }Rl~&2 +饰(+VWZ ]a8`L`  ¤ħ.H h L5 䄡 } 䅭 bɠ04Ů .ŭ%) e拰 ĩ L+Ư0 Le }`毤Hɛ) h`  L ȱ R @ʆ ȱȄ Iğ` :62T F : }7 8 Lbԩ- L 8 8,I ɨ 8L.UH `ƨh $ %3   + \L L 8󅯩" } 8" ©" Ư" L8q :Z#]abj(=) W같  L樤ħ`hh`H YhZ }L<>EO ƹƹ0`H f5h`I&` =? FQA` L񄳱ȱI 䦐 }Ħ ąŅ T k /䧰 k ,Ǡ ĩJH ThĥȑĥȑĦʊȑ`HHąŅ }H h hhhh ȱIELZ L`ȱI Hȱȱȱȱȱ }, h @ $L+L.*ȱȱȱȱȱjEE `EjI `e`ħ ¥ }0 ` Lk 䦪`! 䧰L A@L `I&`L ©؅ L. }0`STOPPED륺 bɠhhL :ʅ` k %3Hƹ h5h`hbjH h # }ԤLQ #LLei  `LԑȥՑȥ֑ȥבȥؑȥّ``䈥剰 }#)iiLɠL4űI&`048ץğ=ȱȄ  }`L  L0e拠0ȱȄL  䦪`!' >?L (<ж`!  $Л +`,LőŐ78Ƒ8 Ƒ`8` - PѠ }`,,L L PQ 8,L ȱI ѝߠȱ`ԩ },L E  $EL+L],,,؍ 0âLɀL ©7 F󦹩 RbL g  }0g `Ո V fL{Ն + +􅕄L AT LINE?BLOAMEVALU>#VAR$LE?DAT>3276INPUDISTACOVERFLO?LIN? }FOTOO LON?DE?GOSUGARBAG?CHMEͣ?LOA?NES?WHIL?REPEA?D?EXIXPRO?EXE?PRO?IS OPE?DEWR ONLCMNOT OPEΣRD ONLEOT }RUNTIMEOUNA!FRAMCURSO!OVERRUCHKSUDONMODNOT IMPRA͠D?>#FILEDSK FULFATAL I/FILENAMPOINLOCKEDCM>DI }?FILPOIN?APPNBAD SECTORӥHՄ +h & .hԩ + ,҅L: ƪn (@Մ$ 0` 0 }` 0LoH - . /h &@Յ՘JJJJ X) 0:i`AVC@ sŠ 5  <)  < } L L + e +e`e`&&&&&&eee` & }&eee&*`` 兙 䦪!0 4 ۄܱ **m ݤܱEۅڦڱ= } ܥeƥiեLN@ ` **)]` 00`` ( ((((((((8 }`W)ߥ & &e &߽řِ׼JJJJ&eXޥeYߥ䥛 9 FfЎᰈ } `  M 8*` 兙 󥐅i祣L{ &L }  0 & L ȑ & L; # )ȱ L })ȱ) )ȱ 8ƣŐő0eސ`ƙ8ް`)ȱJJJ` }``=`]``` E߭H Ġ} hL±&Lv`[  ȱ R] } L L  䅠 bɰhhğȱȄ L l"0e拱LjLx`[  ȱ R] hEF MAINMODECCOCCOCCOCCOCCOSCRSCRD1D1S1S1D2D2S2P$} $} =;A0,;@a,/-A$AT3"9=  ee162,16,169,0,157,72,3,169$},0,157,73,3,32,86,228,192,0,48,9,238,31,4,208,3,238,32,4,96,104,104,966-AY6-A'6-A`36-A ?6$}-AaK6-AW6-Abc6-Ao6-Ac{6-A6-Ad6-AeFF6.:@4,o67AY<AY,.>:@4,6$}7@<@,.>:Ab,<6-F:A,&A&@20+@$<6-?:C:,,"a6-F:A`,!6-F:Aa,06$}-F:@,?6-F:@,KAU+@$a6-?:C:,,&K6-F:A`,!6-F:Aa,06-F:@,?6-F:@,E$}K(C,@@ D:ANTIC.SCR86-?:C:,,C@*66-F:AY,$AY-F:,6$}F:,,B F:,F:,F:,*A`6AaBAY0 F:Ad,"AU@H2<F:Ad,"@1$}*AdAU<% D:ADDRESS.BAS4;F:Ad,"@0*AdAU;% D:BUDGET.BAS6=F:Ad,"@&*$}AdAU=%D:CALENDAR.BAS8=F:Ad,"@$*AdAU=%D:CALCULAT.BAS:<F:Ad,"@)*A$}dAU<% D:FINANCE.BAS<;F:Ad,"@'*AdAU;% D:VGRAPH.BAS>F:Ad,"@Q*Ad$}AU<AAF+XAjAR@p(% D:PUBLISH.BASF.F:Ad,"@S$6-@$}. AH.F:Ad,"@H$6-@. AJ.F:Ad,"@P$6-@. APAdAU$} @Hd1 +AR@1Ax'-@@'( z'-@@'($} |||'-@@'( |𠠠|~'-@@'( |렠|'-@@ '( |$}|'-@@'( |䠠|'-@@'( ||'-@@'( |󠠠|$}'-@@'( |Π|'-@@'( ||'-@@'(  F:$}Ad,@AEAdAUR"@@C@@ D:SPELL.EXER6-?:AUv$},R"@@C@@ D:DBASE.EXER6-?:AUv,AAH'-@@$}'( ||'-@@'( ||'-@@ '( |󠠠|'-@@'( |$}䬠|'-@@'( |Ӡ٠|'-@@'( |٠|'-@@'( |$}|G@8@@ D:WRITER.EXEG6-?:AUv, D:AUTORUN.ARB@@'( |$_(B  ? ? 0 0 0 00P00@ W)}0??05@OWPU0?00USW\00WWTU00UT0)}0 U#0?$05PC0?0@4"00"00뻮0)}0??!!!!!(")}U@t @ 0 @ 4@@ 40P P   D @ 0C )}   t 01   p 0 0  07 @ 0pG |@?01p 0=_ ]5] }p7p7|)} 5p0   <0  3 7 ]("z ?U 5U\U 5U\U )}5U\U 5U\V 5\Z <?6\0V306\30V?3?63V3<0633)}0j3<3?5\30U 5U\U 5U\ ?b("z ?U 5U\U 5U\U)} 5U\U 5U\Z 6i<3<?5V30 U30 5Z\30 V?3? 5i\3 ZU3) }0 5\330 j:AU,367@,.>:AU,V6.ӠΠҠΠՠu6.ӠҠƠ-}Š<nn6.dPress '' to print envelopes or '' to print addressee on letter, or '' to print addressee & @ data=CC67B-}:,%@,.+. BE SURE PRINTER IS READYF6.hhhLVPqq67@<@,.Vԅh`h-}hhhhhmmhhhhhhmͥmRqq67@<Ar,.V8ͥ΢%8͍-} `iͥiΩ6ȱ%8͍Sss67As<A`,.X `iͥiΩ*ʭ8͍-} 8ԥեiԥi`T,#67A<A,.>:AU,,6-C:,ZMAIN MENUd +AR-}@1AdAUC@@UAVA&gA@dyAAA 6-- }n-@-@@Kx6. D:ADDLIST A0 +AR@1AdAU-!}C@@UAVA&gA@dyAAA 6-"("( -"}Ӡˠ#( (#( - FIND & PRINT"("( - SCROLL & PRINT ( ( - PRINT LABELS(( -#} - SCREEN LIST(( - CHANGE MENU(( - DIR & LOAD!(!( - MAKE NEW LIST%(%( -$} - QUIT TO MAIN MENU( (( :6-F:Ad,"AU0@w: A0$)@$"A-%}UA@OO&@HApA`A0AA0ApA @A A0""FIND ENTRY & P-&}RINT ENVELOPESk (}A-AR?-@@g(#Locator for Name/Address to displayk" -'} Ap, A`6"A@d(}("(@E(1(&Press Ҡ to get next same name4(E(7<%@,-(}JA@d AT"@2A^ A0hPRINT ENVELOPES SERIALLYr%6-%@ A -)}% A|A@d(}(;(/($Press Ҡ to scroll not print2(;(7<, A55"@2-*})"@e)"@i)"@Ap A0PRINT COMPLETE LISTTT(L}You may wish to use these program -+} lines to adjust your printer for theKK(Ccorrect spacing used by labels. BE SURE THAT PRINTER IS READY-@-,}AP F@.@@P:; @F@ A0SCREEN COMPLETE:--}-@A ("(6-@AP: =B:,"%(NO LIST LOADED9-@AP=  A0-.}CHANGE MENU5 (}-@@5(Šՠ&^( ("( - Add Name/Address%(A( - Delete Na-/}me/AddressD(^( - Save Updated List01(.(# - Main Menu (Without saving list)1(:<-@@ <("Š-0}ǠϠΠD#-@@(# A NYA'AR-(}Y&@HA -1}A A@A0X A0bADD NAMElL (}B:,",67B:,%@,.>-@@L( נ-2}v((ŠĠ _(,(&B:, FREE CHARACTERS IN MEMORY>-@@"_(PRESS FOR CHANGE MENU-3};AR'-@@7( FIRST LINE;B:,"A@467B:,%@,.467B:,%@,-4}.>:AU,(( NEXT LINE?B:,"/67B:,%@,.>:AU,5(}? A0 ApDELETE -5}A NAME6-@@"6(PRESS FOR CHANGE MENUVA'-@@;(Name to Delete?V-6}B:,"A@ Ap A`5($(PRESSŠҠTO DELETE5(7<%@,$)@$"AU-7}Ap @2A@6-&%@ !!67SAVE ROUTINEHA@dRB:,"A\#( (ŮŠ #(aII(@Press to -9}add changes to this file. Press ӧ to change f.(to a new$(DEVICE.FILENAME. Ap"@2A z; (}-:}-@@7(DEVICE.FILENAME TO SAVE;B:,"A0i A 0@5@@-;}A-M6-@2V6-B:,_6-C:,i Ap"@ B" A0E-@@0( I/O ERROR-<} #F:A,;@E BMAKE NEW LIST( (} ((( ǠנӠm(C(8If you have a word pr-=}ocessor, use it to make new files.m(%Separate addresses with two 's.Q(Q(FYou can also use this program to make->} lists. Follow directions below._A@d6.(?(NEW DEVICE:FILENAME TO USECUA_ A -?}PAUSE SUBROUTINE-@@"(:6-F:Ad,"AU0@w: A$)@-@}$"AUA "AUA0-#"@i)"@e)"@- A $$RAND SUBROUTINE.B:,"-A}A086-%@B""6-?::@',>:A, I/O ERROR #F:A,> BI@]-@APa k A-F}0v"@iC(@>:@',M>:@@,7<&@,h(@>:@',M>:,s@v$-G}v"@eC @>:@',M>:@,7<&@,h(@>:@',M>:,s@v$k"@-H}] @>:@',M>:@,7<%@,>:@',M>:,h@k$ A0LOAD MENU-I}n A(}@A@@D:*.*U-@Bb)@j(>:,n  @-J}( BLOAD ROUTINE8AR(4(DEVICE.FILENAME TO LOAD8(B:,"A02f A`-K}@5@@A-@M6-@2S6-\6-C:,f Ap<-@ 67,.>:AU,* -L}B-$FK (}-@@6( I/O ERROR #F:A,A@K BP A0ZIO LOAD/SAVEd36--M}A46-A6'6-A@36-A5n<6-P:'AV,$6-&$AV,%<%%@x<6-P:'AV,$6-N}-&$AV,%<%%@)%@&@$)6-?:C:,<,%%6-F:%,%AV$F:%%@,$-O}% D:AUTORUN.ARBD2:ADDRESS.BAS)%@&@$)6-?:C:,<,%%6-F:%,%AV$F:%%@,$,()+>+N8NNYIPCNNCNNNSTAYNCSMSMEMN1PRNPWTCNDSIZN2TCTN1N1NNNN1N1N2PLBLN1N1N1S1Q}NST5PNCCNN1N1N6STMBRTOCBCHKBAMSTSTN6AN2N75ZLMCNAMMNXTCHN9NXTDYNTTAAANENNXTRIJN1R}PERN3N7T5@@@ ? @ @ 5  @1S} @@T B@!xP@@1T}@@@ @!@"@ #_M$8%&@'@(@)G*@+,BU61U}-AV., /H 01@2@34@d566@789A: ;<1V}=@>?@@eAB@%CARD$$EFAGHIJ@K1W}LM@N@OPQRSTUVWXYZAp[@31X}\@x]B2y^ BUDGET-DB by Roger Kearney%%ANTIC Nov. 1986, with mod. fromANTIC March 1987, page 91Y} APU @ )(} Enter trans;(  List transU( List budget/actual`( List misc info0(1Z} Reconcile chkbkM( Reconcile charge acct`( Set up data(D( Save on DISK1( Quit to Main Menu7:1[}(D A2Y 6- YAAPAAA0AA AASS 6.6-6-!(1\}}LIST9( Cleared checksS( Uncleared checksa( All checks1( Cleared chargesL( Uncleare1]}d chargesa( All charges( Cash purchasesJ( Selected from all.( All28(}J!) 1^}@ ( "6.N6.6-( A0M(Payee(or 'RETURN'):(Taxed items only('Y')>E4M6.N1_} ( :( A0 (End=$: )!)!A A5 6-6-(( Printer('Y') 1`}4(6.N# 4Y A@#P: (}-"AUC-A I!6-@:7%,,C@:7<,, 1a})@:7<,,!AP# B:,"#07%<%,APAP"*+")",A ""*+ )",A 1b}%"*"A '"*+")",A ,**+")",A 6 AP@774Y*@:7%,,"*@:7%,1c},"*@:7%,,"APE& 67,.-"67B:,%,.& J67<,.7%<%,T$ B:,!$07<%B:,,AP^M1d}67<,.=:@:7<,,,367<,.=:@:7%<%,,,M67<,.=:@:7%<%,,,c?67<,.67<,.?6-@:7%,,$%@:7%,,$1e}%@:7%,,h2 A67,."267@0,.Sv chgr= ")"$67@0,.Deposit367@f,.= A0|1f} "67@0,.CashB ")"67@0,.B67@6,.=:@:7%,,$%@:7%,,,K6-@:7%,,")"/67@1g}0,.Chg K67@4<@4,.7%,l67@D,.>:,,67@E,.-X67@F<@Q,.7$+&,%<$+&1q}@@à@Ӡ@@屠@B%DOS SYSB*)DUP SYSBSAUTORUN SYSBAUTORUN ARBBANTIC SCRb>ADDRESS BASbWPBUDGET BASbJCALENDARBASb>CALCULATBASbC8FINANCE BAS#W{VGRAPH BASBONDS PRFSTOCKS PRFMUTUALS PRF#}PUBLISH BAS>SPUBLISH PICCPUB SMALL FITFRAME FITTEXAS FITTAVERN FITHEBREW FITLOMBARDYFIT,%,l"A0Z67@S,. TAX=$A6-+@:7%,,$%@:7%,,$%@:7%,,,K AZ67@X,. ")1r}"67@f,.(4Y( 6-%8'&P:',"$( '' to cont(80CA`  &6-%1s} (Found  AP @ 7@w%A7B7tA$L 6- A1t}(%B:,".6-@:,L @*!@dA0 A (}6-M(!-A IA I%$/61u}-@:7%,,;"@M")"Ap!!"*"*"@:7%,,Ap A DD(}=:@:7<,,,=:@:7%<%1v},,,=:@:7%<%,,,7<,(7%<%,7<, A+6-+@:7%,,$%@:7%,,$%@:7%,,,5 AA(7<, 1w}"6-6(Deposit # "#(@:7%,,$%@:7%,,* "(Chg 7%<%,4 " ( AP96-@:7%,,1x}>=(7<,>:,=(-7$+&,%<$+&,%,7<,H44( TAX=$+@:7%,,$%@:7%,,$%@:7%,,,'RF A 1y}2(Enter 'Y' if cleared('M'=MENU)6F4M@ \0YA f "6-p ")"6-&z67%<1z}%,.>:, A  6-%' B:,& ) 6-$ A)( Outstanding=$( " (((( Statement 1{}% AP @ & A6-Aw"(}&$ 46.=:,!$6.=:&, 6-A:,&  )1|}!A "6-( 46.A 2A)3ZA0$6-@:,&6-%!$6-& (1}}}--3/( BDGT_7+%,$%<+%,$%,_ACTL3 * -%*(>:%,-7$%<$%,$K -#1~}6-%%$%$@rK6-+@:7,,,$%+@:7%,,,$%@:7%,,.) A(7<&B:,,!(% ) 8@  ( '' to con1}t&4C.6-%66-&@ A@B APG @ L' "(}NO MORE SPACE' APQ' @  A1}'6-$%A IV167<,.>:,#67%<%,.>:,167%,.7,`:( 6-$ A&(:(  Cas1}hj>(  Deposit2( Charge Sv chg>@t;;AAAPApAA~1}G 6-( Chg account !1@:, )@:,!=(G AP 6-%67<,. A  6- A  61}- A0 6- A 5 6-%6-6.=:, 6-&",6-1(5H67<,.>:P:+A:,,',,#6-%H671}<,.>:++A:,,'&P:+A:,,',,$,.( .@:7<,, )@:7<,,!A  6-%67<,.>:, 67%<%,1}.7<,8 (Date4&67<,.>:,867%<%,.>:,F 467<,.>:,*67%<%,.>:,<67%<%,.>:,F1} Ap= A#67<,.>:A:7<,,,=67%<%,.>:A:7<,,,67%<%,.>:A:7<,,,O Ap(Amount1}'6-$'/6-%@67<,.>:P:,,O6-+&P:,,$ "6-6367%<%,.>:P:,,367%<%,.>:+&P:,,$,& 1}")"6.CHKACCNT& A  9 A(Tax$6-$'967%<%,.>:P:,,'6-+&P:,,$'67%<%,.>:P:1},,67%<%,.>:+&P:,,$,3 A(Payee%B:, 367B:,%,.(67%<%,.2$ (OK$7<1},0YA<"AF86-@:7%,,&6-%#6-%)6-8"6APU'6-A%@r$%+@:7,,&,$1}U6-+@:7,,$%+@:7%,,,$%@:7%,,%$,'Z867<,.>:P:,,#6-+&P:,,$867%<%,.>:P:,,_67%<%,.>:+&P1}:,,$,d  6-& 6-% AT (}6-$ A-( Sales tax=$>(Next F6-$P A1}T(6)(#trans= Room for & more,(6 AP @ @  6-6-$6J96.=:+%?,',(6.1}7:%,-7%<%,i -3(>:%@s,-7%@U<%@`,?-@0i(>:%@1},-7%A <%A,  ($lV 6-$'*67Aq<Aq,.>:P:,,96-+&P:,,$V67Ar<Ar1},.>:P:,,q&&67As<As,.>:+&P:,,$,vI"67Ai<Ai,.>:P:',,I67Ap<Ap,.>:+'&P:',,$,1}p67Af<Af,.>:,767Ag<Ag,.>:,Q67Ah<Ah,.>:,p67Ac<Ac,.>:P:',,Z*67Ad<1}Ad,.>:+'&P:',,$,D67Ae<Ae,.>:,N6-$'Z6-Atc67<,.>:P:,,#6-+&P:,,$@67Au<A1}u,.>:P:,,c67Av<Av,.>:+&P:,,$,%( Sure('Y')%4@ 0Y@ , A@,1}D:BDGTDISK.DATI6-AH%"6-C:,'3%+&P:,,$>%P:,I6-B:,'P%+&P:,,$%P:1},;6-?:C:hhhLV,<@,F@P @ ' (} (('( Set budgetF( Set  ( Name .(1} Set F( Clear all data.9 9A A!pA!A"@A"` * A (}(*41}A"P*%%@:7<,, )@:7<,,!A 4(( MONTH(A=ALL)(4AA! > 6-A:,&  )!A!H>(1}AMOUNT6-$'>6-Aw%@r$+@:7<,,&,R 4A-\B 6-%$67<,.>:P:,,-6-+&P:,,$B671}%<%,.>:P:,,f*67%<%,.>:+&P:,,$,&4A* p A z- A!p( Enter next #- A"P6 A1}#(,e.g.'A-AUTOMO''64A"P..7<,0-)7<,2@)7<,3ZA! B:, 67B:,%<,.$61}-%+@:,&,$$67<%,.7, A! A"@(Bal= @ O67Ac,.>:,'67A H,.>:,?61}7Ad,.7Ac,E6-O @ 0 A@6-F:A,0ApA@Pc#(}Input file D:BDGTDATA.DAT>(i1}s not on this disk.c(Shall I create an empty one Y0Y+d67,. 67Ab,. (67,.:671}Ac,.>:,L67A H,.>:,d67Ad,.7Ac, AQp((Error # !B:, A H%+( AP 1}@ f6-@6-&6-%.6-%66-%>6-%F6-%N6-%V6-%^6-%f6-% 6-F:B1}2y,"6-Y 6-%6-%6-%#6-%+6-%36-%;6-%C6-%Q6-%@Y6-$K 6-$6-$61}-$#6-$+6-%36-%;6-%C6-$K6-$/ 6-$6-AR#6-B2y+6-$/+C -( ԭ1} -*(BY0-C( J.R.KEARNEYHH;,;@6,;,;,;,;,;,;,;,;,;@w,9#;,1};,;,;,;,;,+6./96. b.6.$@6. PLEASE WAITS6. NOT CLEA1}REDb6.CategoryP6. Balance=$ 6.check#76.RETURN=main menuJ6. Start month=P6-,6-I:,&A !B1}'f,6-B'g46-P:+&A H,',;,*67,.04 A@ SD:BDGTDISK.DAT)6-AH1%<6-C:1},'S%@+&P:,,$%P:,@ %%AU56-?:C:hhhLV,<@,@@6.7:A:7<,,,16-A:7<,,?6-A:7<,,1}M6-A:7<,,Q67Af<Af,.>:,767Ag<Ag,.>:,Q67Ah<Ah,.>:, @  (Sure1} 4@  4Y% D:AUTORUN.ARB @  D2:BUDGET.BAS<Ah,.>:, @  (Sure0N ^$$FF1FFFCLCSSLF1LABCFDF1F2F1FF1F2FF1FUF1F1F1MYFDATDAYFIFDFJF12F12B5}KMSCSRDAF2F1DE@@@@AR@& @ @ & 5}& &@H@'@@ @@@@"@@@@@5}@t } @ !"#$%&A'()*@+5},B-A&.A%/B~~0123@!4@A56 APPOINTMENT CALENDAR%%BY ALF5}RED FILSKOV, ANTIC JAN.86 ""ԠҠ""٠ĠȮ֠ A(DISPLAY CALEN5}DAR2- A!00!('-6-<K 6- A!0@#+-@#/(3(7(?-C(G K(F5}K 6- A!0@(+-@(/(3(7(?-C(G K(P8 6- A!0-#(+-/(3 5}8(Z7 6- A!0-#('(+(/(3(7(d! 6- A!0-(!(n) -!67<,.>:@#,5}% )(x- 67,.67,.-%-)(- 7 -67<,.>:, )-/-3(7 / -!65}7<,.>:@$,% +-/(?67<,.>:@$,#67,.>:,)-2(7<,;(7<,?(< 6.67B:,%,. (67B5}:,%,.8-P:&B:,',<(. #A-"!-*(7<,. >>MONDAY,TUESDAY,WEDNESDAY,THURSDAY,FRIDAY,SATU5}RDAY,SUNDAY! -"-(! __27,1,SELECTION,24,3,1. View date,24,4,2. Edit date,24,5,3. Print date,24,6,5}4. Print month??24,7,5. Menu,30,12,MESSAGE,2,18,DATE,11,15,><DISPLAY DATESF 6-#A@-5}"# :"@(*'"P:',F6-@)))31,28,31,30,31,30,31,31,30,31,30,31;6-+&A,$%%6-A:7<,,/6-5}$&56-;6- -'  6. 67,.=:,' A 6.=:,">7$&<$,0-:67<,.>:@:7<5},,%A(,> , - (6 6-%!6-6-%@ 6-% JGET MENU OPTIONT 6- A^, )5}6-&@H, )!%APh77AAAA`A ArVIEW DAY|, 6-% A!5}-@6',(4 )4+!@W) @H,*@2A@ (>:,)(>:,77+!@W) @H,5}*@2*AUA@/6-&@H6-&@G) )!/6-  )!6-6-$%& A`5} 6- )!A@ "6- A 6-%& !6-& A2 #A-" )-5}@ 2(7<,-&B:=:,,( > -6-$&%$!-%,(7<%,0 >"A@EDIT APPOINTME5}NTS 6-6-& -(0 ):"@'AD%"@(*!6-&% APN%"@)*5} 6-%% APX1+"@0)"A&,*!'6-&1 APb+"@1* @&!6-%+ APl+"AU5}* 6-%!6-+ APv77 @2)+!A$* A`,)!ARA` 6-6-$&%+&,$%&675}<,.>:,(>:,'"@&(>:@0,' AP 6-% AP%-@$%( 6.  6- 5}A APPRINT DATE(AP A@6- A7 6.-67,. 67,.,67<,.+765}7,.+, #A-" #6.,67,.567&P:B:,'%?P,,.,67B:,%,.567,.* 6.67B:,%5},. *67B:,%,.=:,Q67B:,%,., %67B:,%,.=:,+6.F67&P:B:,'%?P,,.Q67<,. 67B:,%,.675},..3"3| APPOINTMENTS FOR |&3*3.3 8 -6-$&%$43| 7<%@, |8 *Q 6.67,.5}67,.#6._.67,. 767,.E67<,.| Q67,. |4 -33 3>3 3 3 A@H/ 6- A5}!-A% / A@RPRINT MONTH\ 6- A Af9P((3(>:@',A5}>:,96-p# 6.67<,.#67@3,.z0 6-B:,!6-&P:'%?P,067<%&,.(>:,(F A5}-@g*67<,.+. ?67@x,.+F(7 6.-@g$67<,.( 767@x,.[ #A5}-""6-B:,A6-$@&P:'%?P,&P67<%&,.T [(W A-@s*67<,.+;65}7%<%,.+? P67@x,.+W(d 6.-A(67,. <67%,.>:@',P67%,.-1| |d65}7%,.>:@',67%,.-0 . -+"*,)$68,-. AA 6-%68,-6-$&'6.=:,-5} 56. A67,.=:,67<%,.- -(>:,>:@',Q>:A7,? -6. 67A,.0-5}A4;67<,.?  -(8,A@$$67$&<$,.78,$&%$&, ( 4(>:,>:@'5},QP48,*8, A @$? A-@g*67<,.+. ?67@x,.+.2#(>:@',A>:,5}>:,(2 A@85 6.-67@,. %67,.267<,.+5$B6- AL-A  A@5}V EXIT`(Aj 6- At )6.>:,~4Y)4yA4N)4nA@ A5}@SAVE MONTH A@6- A+ 6.D:67,.67,.+67,..AC2-@15}6-$&)(7<%,- 2(-@$(7<,6-( A@-F:A,"Ab#6-- A` 6-5}) A-A ) A@ MESSAGE$ --@) (7<,$   6-6-#A`5}A@"4X$(-@)(2 6-% A<"0XA@F 6-% APChoo5}se a,menu,option.,XZ**What date,do you,want to,view? >__,Xd**What date,do you,want to,edit? >__,Xn;;Edit the,appoint5}-,ments for,the date,and press,ESC.,XxFinished,editing.,X Printing,current,date...,XPrinting,month...,X5}Error in,printing!,XSaving,month...,XDisk not,ready,error!,XDisk full,error!,X++Exit,without,saving,mon5}th?,(Y/N) >_,X START #A;;"OO0,1,2,3,4,5,6,7,8,9,105},11,12,13,14,15,16,17,18,19,20,21,22,82,125,126,752*+@@9!0'*(>>;A9,;,;A,5};,;,;,;,;,9,66;@8,;@8,;@8,;A4,;,W 6. 67,. 67,..6.>:@05},@67,.>:@1,O6.>:A%,W6.|K"""READ FIRST DAY OF EACH MONTH,> #A6.(-@5}@,":67B:,%,.> 6255136147257,366247251361@477351362472,512573514624J733614625735,144725736145}6T255136147257,367351362472^511462473513,622573514624h733614625735,145136147257r366247251361,4773513624725}|511462473513MAIN MENU- A!(%0-0 #@"("(6-@& 5}A!0; - (((-!(% )(-(1(;#A0( -"-$%$(. ( IILoad/Cr5}eate a month,Delete a month,Disk directory,Quit to Main Menu< -(MENU-1(Choose an option =>7<(* 5})6-&@H* )!AP+(+AAPA @A!LOAD/CREATE A MONTH6. load/creat5}e A. A.(Loading month...8-@1%67$&,.) .8 @P F:A5},ApA!5#(Creating new month...1-AP5 &/ 6. 67A9,. %67,./ @P05}DELETE MONTH:6.delete AD: A!( Erasing...0@3: AN!!LOAD/CREATE, DELETE RO5}UTINEX* 6-@8 A!0#(&(*(b..(&| 1-JANUARY 5-MAY 9-SEPTEMBER |l..(&| 2-FEBRUARY 6-JUNE 5}10-OCTOBER |v..(&| 3-MARCH 7-JULY 11-NOVEMBER |..(&| 4-APRIL 8-AUGUST 12-DECEMBER |(  A 5} >( (!(What # month to %> )!)P:,A 1 #A -" #-1(MONTH: / -5}/(What year (85-99)7:)?I A C 6-%5}'"P:',(0( Press a key>7):(=(C6-* A `4RUN MAIN MENU>  +% D:AUTORUN.ARBHCON5}STRUCT STRINGSR: 6.>:,67,.  67,..67<,.>:,:67,.>:,\3 6. 67,. 67,.*67<,.367,.f5}# 6.67<,.>:,#67,.>:,p, 6.67<,.>:@&,)67,.>:,,$z ERRORSP  (M(ERROR #F:A,5} AT LINE F:A,%F:A,$AVP&N ((2(DISK ERROR--OPERATION ABORTED!@-AD N A5}D2:CALENDAR.BASAPPOINT.BASAYMO.BAS ((2(DISK ERROR--OPERATION ABORTED!@-AD N A45CHPRTENDPBLPXVKPADSTMROPCHRBDEESEOSDMCTSHFLOCRSINDLISKPOROLDKDPPRALMESTATTYPA9}ENMODOLDOOSVTYPDEKEE"1$U _et v |A 9}  A&AT@'AUAYAARBh@@@@9}@ !@"#$@%&@'()*9}+,-./PRINTING DESK CALCULATORBY JAMES W. BROWN (c) 1987, ANTIC PUBLISH9}INGd11;@,;@,;@,;@,n11;@6,;@,;@,;@,x&&;@,;@:},;@,..9@<@,;@$,;@,2218,7,19,6,20,7,21,6,22,7,23,6,26,0,27,0,28,00,3,3,3,6:},6,60,0,1,3,4,4,61,1,1,4,4,4,40,2,2,3,5,5,62,2,2,5,5,5,50,1,2,3,5,5,60,1,0,0,0,0,00:},2,2,3,5,5,6,36-A&6-AT'6-@'36-AU1'6-AY6-A'6-AR6 +:};'AA'AA@'AA'AAE%%6-F:A`,%AV$F:Aa,J-:}@@ O "%T ^+-@+-@c"68<,-h   m6. :} r!6. !6.w6.|""6.RET - E -> A 6.+-*/))(! :}))(! | PRINTING DESK CALCULATOR |//(&//(&| A:} - Advance paper N - Note to prt|//(&| C - Clear entry P - Printer ---|//(&| D - Decimal ----- S - Subtotal:} |//(&| MC - Clear Memory T - Total/clr A|//(&| MR - Recall M -> E V - Version ---|//(&| MS - Store E ->: } M RET - E -> A |//(&| M+ - Add E to M ESC - Reset |//(&| M- - Subtr E from M + - * / % = .|//(&: }( -@@ (MEM 0 -@@ (ACC 0 -@@: } (ENT 0##@@K:&@4@*6-@6-46.D456N789Y123: }0.+->67@<@,.>:,6- AB6-@ AE6-@ A76-: } INIT6-6-@:6-6-'6-@36-:6.#6-@ AU# AW:}-@$@(  MAIN LOOP 6-8<,  Ae6. A /-@@/(7@:}<@, ")"A1 @:0,*@:9,A2 @:A,*@:Z,A3 + 4+6-@! A4:}+ A0 + 4-6-@! A4+ A0 + 4*6-@! A4+ A0 + 4/6-@! A:}4+ A0 4%A8 4=AF 4.AH "AI "A9  A A0:} DELETE A KEYSTROKE&  @A00 6-B:,&@: "6.D ! 6.7@<,:}N AP A0 DIGIT 6-@ 6. AQ 6- #!@ A# A0:} 6-B:,%@67,. ! AP!A0 -@@( A0 LETTER 4A:}A@ 4CAA  4D AB A0 4MAC 4NAD  4P AE A0:}* 4SAF4 4TAF>  4V A7 A G  A A0H ARITHMETIC OPERATORM ":}-@$@"(7<,R G6-3*+")"@)"@,= AG A0\ AQf ":}6-p ''A4PA4`A4pA4z  6-% A4  6-& A4  6-$ A4 6-' :} 6- AR $tV~6-@&?-@6@?(7@%@$<@%@$,?-@$@:}?(7@%@$<@%@$,-@$@( $%G6-@3*+")"@:})"@,= AG A0 AQ AR6-?$ AU; A0< ESCF3 ***RESET*:}**%A  3  A0C-6-@6.0#6-- AQg A0hDr6-@:}&|?-@@?(7@%@$<@%@$,$M Ae67@,./6-:}6-@/6-@%+4R,;'*"@*+")"@,1 A; A04CA`4RAa:}4SAb4+Ac4-Ad/ A AC0N:D/-@: }@/(Enter one-line note:N-@@X@b$ 3-@@$(l>":!}!-@@>(Printer is toggled off!v/-@@/(7@<@, A0P6:"}-@&?-@6@?(7@%@$<@%@$,$S, T, or =6-@%+4T,6-:#} %* @ A% A0 A46-@  6-6-* 4T)6-4 AR> :$}AW AUH*"@A R-@$@( [ A0 PERIOD(6-@6.0.(6:%}-@)" 6-B:,%@)67,.6-6-A:,-@@(-@@(:&}/-@@(+-@@/(# A0$ ENTER. A A08 6-6.EN AR:'} A0CONVERT ENTRY  $ 6-B:,6-!6-A:, AU$CONVERT :(}AND RESET, AP6-%6-@,6.O$PDISPLAY AC AND PRINT ENTZ, AW6-%6-@:)},6.d"$n 6.=:,x AT 6-B:,; @;67%@<@,.7%@<@:*},67@,. 67@,.3$FIX DECIMAL POINT"* 6.6-B:,6-*6-,-@:+}17<,4E6-67<,4.6-@ J  $T*"6-%@*67,..00^ "67%:,}@,.00h$"&@$67%@,.0r5 6.567@&<@,.7@<%@,{$|DISPLAY E:-}-@@(-@@($DISPLAY M-@@(-@@(C:.}$DDISPLAY AN-@@(X-@@($pMCz6- AV AR:/} A0MR 6- AU AR 6.=:,7 A08MSB 6- AV AR A0:0}M+ 6-% AV AR A0M-  6-& AV ARc A0dGET CHARACT:1}ERnE@d!@A3B7tAE@wx=F:Ad, AU$6-1)@:6.:2}>:,=$(T:&@,6-( Ae6-R:&@,%@"Ae6.7<,6-@:,%%2:3}@`@@-@@ +%2+6-$(#TRAP HANDLER2#$:4}-@@$6-F:A,<#%%6-F:A,%AV$F:A,F#)"@( Bad value.) AP#("@:5}( OVERFLOW.( AZ#/!A(*%(Check printer./ Ad###(Error  at line .#( Press C:6}# A0& BUZZ&%%2@U@@&-@@  &%%2:7}'$D2:CALCULAT.BAS@U@@&-@@  &%%28w!!SPCMSGYEARHEADHEAD2HEAD3FINANCEDMONEYMONAMTMNYIPRINBALLINEPMTCHRGNUPMAMMONEIMOPR>9}ICHRBACAPDO'''CG'n''L     *>:} 18 B'ip@P>;} !"#$A%&'()*+><}, Š堛à@-@@K7+>=}Q0@@k0}@@AR@(]];@9,;@(,;>>}@,;@9,;@9,;@9,;A,;@,2ss;@,;@,;@,;@,;@,;>?}@,;@,;@9,;@,;@,<N 6. 67@9,. +67@,.N6.ӠΧҠ>@}F##6.MON PYMNT IN+CHGS PRINP*** MAIN MENU***Zi6-6-'6-.6.:6-F6->A}M6.T6.[6.b6.i6.d (} (( Šn ( ( - AMOUNT of Paymentx!(!( - NUMBER >B}of Payments$($( - AMORTIZATION Schedule1(1(& - AMORTIZATION with Varying Payments$($( - APPRECIATION S>C}chedule(( - SAVINGS Schedule ( ( - QUIT to Main Menu'( (( ŠŠ' AQ A0Q>D}&@HAA@AA ApA 0A***PAYMENT AMOUNT*** (} A A [K>E}6-P:$$+@'+@&+@%,#+6,,,$A%?P,'AQ6-[ A`L( ((Ӡ $!(4( >F}Ԡ $>6-$&H A`L(#-@@(# A *** NUMBER OF PAYMENTS *** (} A>G} A0336-P:6+K:@&'$,,'K:%@,%?,T( (&(ҠƠӠ )(<( Ԡ $F6->H}$&P A`T(#-@@(# A"##*** AMORTIZATION SCHEDULE ***,X (}X(JThis schedule is automa>I}tic given the data required below, and will print6? Ap A ! A0+ Ap5 A? A@'6->J}6-'6-J-%&@TM(6-P:+$,$A%?P,'A2 A`86.C6-&A:,M A`>K}^* 6.6-A:,6-&$ A0*6.h 6-%6-%A:,6-%r| 6. 67@<@,.767@<@>L},.N67@<@,.e67@ <@&,.|67@0<@9,.|("@ A?'6-P:A:,$A%>M}?P,'A56-%@? AR06-P:$+@%,$A%?P,'A6<6-F A`L6.R6->N}$$P:'@,"'@A0 @ ?('( INTEREST= PRIN=36-?6-"@>O} A;6-@ A-6.=:A:,%@,;6-%@ A@ A A@K67@<>P}@,.K67@<@),. AMORTIZATION - BALANCE= 116.'MON PYMNT INTRST PRIN BALANCE"@ >Q}Ap (} (((($&&*** AMORTIZATION VARYING PMTS***p (}p(bThis program is very flexible as it >R} allows for differing payments and also for various charges.nn(fIt isn't necessary to enter a zero if no payment or char>S}ge is to be assessed.Simply press the RETURN.&W(9(-INPUT STARTING YEAR (PRESS 'RETURN' FOR 1990)=LB:,"W6>T}.19900+ A Ap! A+ Ap:7 A6-6-+6-76-@D5 6.***>U}6.***%6-&/ A`56.NW*6-+P:+$,$A%?P,'A,26-%< A`B6.M6-&A:,W A`X. >V}6.6-A:,"(6-6A:,.6.b 6-& A06.l 6-%6-%6-%v67@<@8,.16>W}7@<@,.H67@<@,._67@<@,.v67@ <@&,.67@)<@8,.*-@>X}( "@* AA:, A`A:,"A?'6-P:A:,$A%?P,'A56->Y}%@? AV46-P:+$+@%,%,$A%?P,'A:@6-J A`P6.V6-$$P:'@,"'>Z}@A1 A6-%@'6-1 AD( (-( INTEREST= CHARGES=D(PRINCIPAL P>[}AID= "@ A A:, A@ @-6-@ A-6.=:A:,%@, A@ >\}Ap ApJ67@<@,.J67@<@),. AMORTIZATION - BALANCE= 116.'MON PYMNT IN/CHRG >]}PRIN BALANCE"@ A`  (} (((($*_-@@"(( Ҡ,;B:,">^}G6-U6. - _ A04% 6-A:, A`6.%6-A:,>K-@"@""(&5B:,">_}A6-K APH 6-A:,R-@@"($\0(&(ΠĠٺ O:A:,,0 Af**>`}* APPRECIATION ***p (} A APz666-P:$+@%,#+$,$A%?P,'A.( (.(YOUR INVES>a}TMENT WILL BE WORTH :-@@"(&)@:"AU@ @*** SAVINGS SCHEDULE ***>b}; (} A A0' A`1 Ap; A+6-6-+6-'+A, Ap6-%$>c}@-X(6-P:+$,$A%?P,'A2 A`86.>6-J"X6. 0.00& 6-%% A0>d}6.&6-A:,2(   ("@2 AF6-%@6-%A:,$6-%0"@<6-@>e}F A@: " ((ĠƠ#(0)@: @ v(&( INTEREST= PAYMENTS=2"@>f}f(@>:@, INTEREST= PAYMENTS=vPRINTS TOTALS A@ Ap $ Ap A0.N (>g}} (5($MONTH PAYMENT INTEREST AMOUNT8(D"@N A8$B*** PAUSE ROUTINES ***L$)@$>h}"AUAV"AU@`!! @I)!@UA j$t[-@@"(:( Ӡ٠٠>i}ϠŠG)@["AUA@~"AU@$***INPUTS***] (} (?(-INPUT STARTING Y>j}EAR (PRESS 'RETURN' FOR 1990)CRB:,"]6.1990''A:,!A P)A:, ApA @('(ENTER STARTING >k}MONEY AMOUNT1 A76.@6-A:,4((ENTER INTEREST RATE#16-'A4$+($(ENTER NUMBER OF PAYMENTS>l}(+$!(!(ENTER MONTHLY PAYMENT A@6.6-A:,$E(/(#ENTER # OF COMPOUNDING PERIODS/YEAR3E>m}6-'+A$,-(&(HOW MANY YEARS TO COMPOUND*-$+('(ENTER STARTING MONTH (1-12)+* 6.=:,* @>n})!@A  + 6. (67@&B:,<@,.+$7((٠ٯΠ# A7@AP>o}*** PRINTER SUBROUTINE***(; (} (.(ƠҠӠ٠ӠЧ;)@2@A <{@->p}@@P{(@>:@',@>:@',l>:@,>:@',Q>:@U,FU$UABOVE SETS >q}PRINTER TO DEFAULT, SETS LEFT MARGIN AT 15 AND RIGHT MARGIN AT 55PH$(@>:@,>:@,HTHIS LINE JUST ADDS T>r}WO 'RETURNS'Z^5(@>:@,>:@,>:@,8$^THIS ADDS THE HEADINGS WITH RETURNSdMJ(@>:@>s},MONTHPAYMENTINTERESTAMOUNT>:@,M$nj(@$jTHESE TWO LINES PRINT THE HEADING,'RETU>t}RNS',& EACH LINE OF THE SAVINGS PROGRAMx(@$v8(@>:@, INTEREST= PRIN=Q(@>u} CHARGES= T$vPRINTS TOTALS AT BOTTOM OF PAGE*** ERROR ROUTINE ***M (} (+(INPUT MISTAKE - START OVER?>v}-@AC M @***CONVERT ROUTINE ***.6.=:P:$A,,.B:,!@A0(">w}6. 0.00( A 6-B:,6-P:,L6. 0.00567@<@,.7&@<,LP:,"A>x})67@&<@,.=:,) A*** CONVERT LARGE ***6.=:P:$A,,*" 6. 0>y}.00* A 6-B:,6-P:,k6. 0.00867@ <@,.7&@<,GP:,"a67@<@>z},.0.k A"67@&<@,.=:,,$@% D:AUTORUN.ARBD2:FINANCE.BAS"a67@<@<astO+d+BRAFGTXLMTLYLKCLYABPTSFILEYMAYMIGVLOHDISCALXLABEPTLCOLSTAREECHARSEEPB|}OWE@#%H(p,HH(   9A :eA T eA eAB}}B~} !"#$%&'()*+ !!֭ȠB}!!à򠱹#06-@$F:B2y,"@06-(hh;@ ,;@B},;@7,;@@,;A,;@r,;@@,;@ ,;@%,2LL;@,9A<@,9AB},9A<@,9@,<L.6.$JANFEBMARAPRMAYJUNJULAUGSEPOCTNOVDEC=67@7,.L6.>:A%,Ff +@B}@1@@9<@\@@K:f A0PE(-@@%(V-GRAPH((B}E( by Alfred FilskovZ](](RThis program will plot graphs with up to 100 points based on data from disk files._6B}(6(+There are 3 sample files on this disk:`( BONDS.PRFa( STOCKS.PRFb( MUTUALS.PRFB}d/(/(#Do you want a disk directory (Y/N)?n A(A@x?( A@?@@B}D:*.*?@( ?7@<@ ,0FREE A0N@((N(4How many files do you wantB} to graph at once (1-3)?<)@6-&@H< @)!@APV( (6-"6-.6B}-B66. G67@6,. V67@,.LOAD FILES=6-%@0(Enter filename . D:=@B}c 6.D:67@,.% A0@M@@Y6-c AP:@!BB}0(DATA TOO LARGE!: A/ %(DATA LESS THAN 0!/ A06-%@$68<&@,-* 06B}- !6- AA:"6-&@0(BAD LOAD FILE!: A3 68,-%67$@&B}@,.3 A"@A --"@*8@,"8@,A "CC"@*8@,"8@B},*8@,"8@,A ,D:(2FILES DID NOT HAVE THE SAME NUMBER OF DATA POINTS!D A6,("( DISK ERROR #B}F:A,, A@ A0SET SCALEJ ASET LABELST MENU^l BA@d)+3B} A0E@@H(K([( M E N Ul( ---------h;(( 1. BARGRAPH(( 2. LINE GRAPH;(3. POINT GRAPHB}rO(4. CHANGE SCALE,(5. CHANGE LABELS<( 6. NEW DATAO(7. END PROGRAM|+(( YOUR CHOICE?+@@:@',A>:@,B}H-@9H(@>:@',L>:A(,>:@,K -A6@56-F:%%$@@,KB}(@>:,>:,! (@ !@ B A0PRINT IN GR.8K 6-P:,6-P:,!6-@@B}K6-+F:@,$AV%F:@,,%$% -@B:, 6-@:7,,=% @2)+!A'* A`,36-%@dB}= A'!@1* @'6-&@2 $$6-F:AV,$AV%$@ -@@6@ B}%$F:%, *36-%@'6-%$@36-46-%@ $>TWO FILES IN KEYH6.KB}ey: - ->67@ ,.7@<@,^67@!,.7@ <@,j6-@v6-A A@Rb!B}@6-A'6-A36-@= AI6-AU6-@_ Ab$\3-AA#,AB}//A3 f,AA'/AA9/AAK/AA]/AAo,AAB}/AAp$zTHREE FILES IN KEY*6. Key: - - -J67@ ,.7@<@,B}j67@!,.7@ <@,67@3,.7@<@$,%6-6-A% A@!@6-@RB}'6-A36-@= AI6-AHU6-@_ Ak6-ADw6-@ A$3-@P@B}T#,A//A3 ,AFA'/AFA9/APAK/APA]/AFAB}o,AGA/AIAo,ABA'/ABA9/AFAK/AFA],ADAB}o/ADA$BARGRAPH-@&"@6-6@& A<"@6-6@B}& A26-@< AS"@6-6@& A36-6@= AI6-@S A0   B}$POINT AND LINE GRAPH'-&@'-@/ 6-8,6-8<,%6-%@/ A$   B}."@$8O-&@3,8@,8@<,A-@O/8,8<,B  $LDRAW POINB}TSV3 ,&@)/%@3@`{"@,#,&@9,%@&@O/%@%B}@e/&@%@{/&@&@jm"@,+,&@&@A/%@&@W,%@B}&@m/%@%@tg"@%,%@%@;/&@%@Q,&@%@g/&@B}&@~g"@%,&@&@;/%@%@Q,%@&@g/&@%@$B}DRAW BARSA-%@),8,%8<,:/8,%AU> A$Z /-8,%%@8,%%@B}@,8<@,L/ATP Z@a,8,%AU*/8,%8<@,H/8,%%@8<@,a/8,%%B}@AU]8<@, AR;-8<@,AS@F,8,%Y/8,%%@] $""8<@B},!ASAP +,8,%%@8<@,D/8,%%@ATb,8,%%@8<@,{/8B},%%@AT@a,8,%AU*/8,%8<@,H/8,%%@8<@,a/8,%%@AUB}=!,8,%%@8<@,:/8,%%@AU=$GET YES OR NOR (YA@d*)@B}R@x*@*AUA"AU6-@ % (>:,"6-+&@x,'@%$ CUSTOM/(/(B}CUSTOM LABELS: ( DATA POINTS)(A(A(5HOW MANY CHARACTERS LONG WILL EACH LABEL BE (1-3)?2F A0)@B}(6-&@HF @)!@A0<Y( (Y(JTYPE THE LABELS FOR EACH POINT. PRESS [RETURN] WHEN YOU AB}RE DONE ANDF2&(YOU WANT THE LABELS TO REPEAT.26-@P6(*(TYPE LABEL FOR POINT . >66-@Z>)@B}0"AU*"@*!@;(REPEAT>$d!! @2)!A#Apn67$&%,.>:,(>:,x!  B}6-%@! Ap!  6-%@! A` ( $ LETTERS>-@e@+67&@d,.>:,/ B};6-@>$ MONTHSX A`(-(STARTING MONTH # (1-12)1:6-P:,X @)!@A`;6-@B}%6-$@&@86.7<%@5,;$ NUMBERSX A(-(STARTING WITH # (0-900)1:6-P:,X B})!A A+ 6. 67A,. +67@,.H6-B:=:%,,-@A67$&%@,.=:%&B}@,E H$SET Y-AXIS SCALE((SET Y-AXIS SCALE:8(%(ENTER LOW VALUE FOR SCALE.8((0-) 0=B} (06-! Ap%= )!A@CALCULATE SCALE" 6-&,6-65A6-B}'@+6-%@5 A@5 @6-$@+6-&@5 AJ6-P:%?,T2'@"P:'B}@,(6-@2 A`^2'@"P:'@,(6-@2 A`h2'@"P:'@,(6-@2 AB}`r6-%@ A |/!-@+6-$@/ 0 -6@,6-'@0B} 6-AD' 6-%>('(TOP VALUE FOR SCALE = .>(IS THIS OK (Y/N)? AA`K AB} (G(+WHAT TOP VALUE DO YOU WANT (GREATER THAN )K )!BA  6-& A CALCB}ULATE POINTS ON SCREENK( (CALCULATING POINTS.../6-8@,=-@K-@{+68,-P:AE'$+&?B}P,%@e,J68,-P:8,'@,$@{68<&@,-P:AUP&+8<&@,&,$,  $SET LABELSB},(,(SET LABELS: ( DATA POINTS)+('(ENTER A TITLE FOR THE GRAPH.+&("(ENTER THE Y-AXIS LABEL.&B}&"@A0>(*(ENTER THE LABELS FOR THE FILES.>((8 LETTERS MAX):?(6. 67@$,. .67@B},.?67@7,. DG-@G(FILE  (7$@&@<$@,) N'0'67$@&@B},.X 67@%,. bc(c(WLABEL X-AXIS WITH (K)-CUSTOM LABELS, (L)ETTERS, (M)ONTHS, (N)UMBERS, OR N(O) LB}ABEL?lNA@d")@06-&@tN @)!@AvB(>:%@t, @BAB}A@A`A$KA@'A@9A @K@w+@B}