@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 ALLOWED736 FREE SECTORS COPYING---D1:DIRECK.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 D8u32000 REM AUTOTYPO V. 2.0632001 REM BY BRIAN SANDFORD32003 REM (TYPO II BY ANDY BARTON,32004 REM TURBO TYPO BY J.D. McLAUGT}HLIN)32010 REM (c) 1986, ANTIC PUBLISHING32015 POKE 775,0:IF PEEK(53279)=5 THEN POKE 775,3432020 CLR :DIM LINE$(120),IN$(2U}),OUT$(2):CLOSE #2:CLOSE #3:CLOSE #432025 SCR=PEEK(775):DIM B$(75)32026 B$="hhhhhϩ˅б̅m V}`"32030 OPEN #2,4,0,"E":OPEN #3,5,0,"E":OPEN #4,4,0,"K"32035 STM=PEEK(136)+PEEK(137)*256:IN$=""32040W} ? "}":POSITION 2,0:? ""32050 TRAP 32040:REV=0:POKE 710,148:POSITION 11,0:? "^=CONTROL ?=upper case alpha"32055 ? "X}[^B]à [^L]Ԡ [^R]נ"32060 ? "CODE[??],line#,prgm line -ENTER"32065 ? "CODE[*] ,line#,[RTN] -ENTY}ER/-EDIT"32068 ? "CODE[*] ,[RTN] -EDIT LAST LINE"32070 ? "CODE[??],line# -DELETE"32080 ? "CODE[RTN],Z}line# -DELETE"32090 POSITION 2,16:? "Entered CODE ";IN$;" for LAST LINE ";B:POSITION 2,732100 POKE 559,34:POK[}E 82,0:? :GOSUB 32280:POKE 82,2:? 32110 INPUT #2;LINE$:IF LINE$="" THEN 3227032120 IF IN$="" THEN B=VAL(LINE$):GOTO 32270\}32130 POKE 559,SCR:POSITION 2,14:? "CONT"32140 B=VAL(LINE$):POSITION 1,7:? " ";32150 POKE 842,13:STOP 32160 POKE 842,1232]}170 ? "}":POSITION 2,0:? "":POSITION 2,18:LIST B:C=0:ANS=C32180 POSITION 2,19:INPUT #3;LINE$:IF LINE$="" THEN ? "LIN^}E ";B;" Ġ":GOTO 3205032185 IF IN$="" THEN D=LEN(STR$(B)):IF LEN(LINE$)>(D+6) THEN IF LINE$(D+2,D+6)="ERROR" THEN I_}N$="":GOTO 3224032190 ANS=USR(ADR(B$),ADR(LINE$),LEN(LINE$)):ANS=PEEK(1789)+256*PEEK(1790)+65536*PEEK(1791)32200 CODE=ANS-`}(INT(ANS/676)*676):HCODE=INT(CODE/26):LCODE=CODE-(HCODE*26)32210 OUT$=CHR$(HCODE+193):OUT$(2)=CHR$(LCODE+193)32220 POSITIONa} 0,19:? OUT$:IF IN$="" THEN IN$=OUT$32225 IF REV THEN IN$=OUT$:GOTO 3238032230 IF OUT$=IN$ THEN 3205032240 POKE 710,48:Sb}OUND 0,75,12,10:FOR X=1 TO 40:NEXT X32250 POSITION 2,17:? "THIS LINE HAS AN Ҡ."32260 POSITION 2,6:? "Re-enter anc}d to EDIT line":TRAP 32040:SOUND 0,0,0,0:GOTO 3209032270 POSITION 2,8:LIST B:POSITION 1,9:? " ";:IF IN$="" THEN IN$=d}""32275 GOTO 3211032280 IN$="":L=032290 GET #4,A:IF A=155 AND L<>1 THEN RETURN 32300 IF A=42 AND L=0 THEN 32340:REM *3e}2310 IF A=2 THEN GRAPHICS 0:POKE 82,2:TRAP 40000:END :REM ^Basic32320 IF A=12 THEN ? "}":POKE 82,2:GOTO 32360:REM ^List3232f}5 IF A=18 THEN POKE 82,2:? "}":POP :GOTO 32380:REM ^Review32330 IF A<65 OR A>90 THEN SOUND 0,121,10,10:FOR X=1 TO 20:NEXT X:g}SOUND 0,0,0,0:GOTO 3229032340 L=L+1:IN$(L,L)=CHR$(A+128):? CHR$(A+128);:IF L=2 OR A=42 THEN RETURN 32350 GOTO 3229032360 Th}RAP 40000:POSITION 2,9:? "ENTER list device (Xx:Filename.ext)"32370 INPUT LINE$:LIST LINE$,0,31999:LINE$="":GOTO 3202032380i} TRAP 32035:POSITION 2,0:? "Ϡ":POSITION 8,2:? "נϠӠ"32390 ? " [ANY KEY] -CHECK Codes":? "[CTRL-D] -j}DONE, exit to AUTOTYPO"32400 POKE 710,192:IF REV THEN POSITION 2,16:? " CODE ";IN$;" for line ";B32410 POSITION 2,7:? :REk}V=1:POKE 559,34:GET #4,A:IF A=4 THEN 3203532420 B=PEEK(STM)+PEEK(STM+1)*256:IF B>31999 THEN 3203532430 DISP=PEEK(STM+2):STMl}=STM+DISP32440 POKE 559,SCR:POSITION 2,8:LIST B:POSITION 1,9:? " ";32450 INPUT #3;LINE$:GOTO 32130430 DISP=PEEK(STM+2):STMe+++N8NNYIPCNNCNNNSTAYNCSMSMEMN1PRNPWTCNDSIZN2TCTN1N1NNNN1N1N2PLBLN1N1N1S n}NST5PNCCNN1N1N6STMBRTOCBCHKBAMSTSTN6AN2N75ZLMCNAMMNXTCHN9NXTDYNTTAAANENNXTRIJN o}PERN3N7T5 p} q} !"#$%&'()*+, r}-./0123456789:;< s}=>?@ABCDEFGHIJK t}LMNOPQRSTUVWXYZ[ u}\]^BUDGET-DBBY J. ROGER KEARNEY (c) 1986, ANTIC PUBLISHING APU @  v})(} Enter trans;(  List transU( List budget/actual`( List misc info0( Reconcile chkbkM( w} Reconcile charge acct`( Set up data(7( Save on DISK$( Quit*-(7 A2Y 6- YAA x}PAAA0AA AASS 6.6-6-!(}LIST9( Cleared checksS( y} Uncleared checksa( All checks1( Cleared chargesL( Uncleared chargesa( All charges( z} Cash purchasesJ( Selected from all.( All28(}J!) @ ( "6.N6.6-( {}A0M(Payee(or 'RETURN'):(Taxed items only('Y')>E4M6.N ( :( A0 (En |}d=$: )!)!A A5 6-6-(( Printer('Y') 4(6.N# 4Y A@# }}P: (}-"AUC-A I!6-@:7%,,C@:7<,, )@:7<,,!AP# B:,"#07 ~}%<%,APAP"*+")",A ""*+ )",A %"*"A '"*+")" },A ,**+")",A 6 AP@774Y*@:7%,,"*@:7%,,"*@:7%,,"APE& 67,.- }"67B:,%,.& J67<,.7%<%,T$ B:,!$07<%B:,,AP^M67<,.=:@:7<,,,367<,.=:@:7%< }%,,,M67<,.=:@:7%<%,,,c?67<,.67<,.?6-@:7%,,$%@:7%,,$%@:7%,,h2 A67,."2 }67@0,.Sv chgr= ")"$67@0,.Deposit367@f,.= A0| "67@0,.CashB ")" }67@0,.B67@6,.=:@:7%,,$%@:7%,,,K6-@:7%,,")"/67@0,.Chg K67@4<@4,.7% },l67@D,.>:,,67@E,.-X67@F<@Q,.7$+&,%<$+&,%,l"A0Z67@S, }. TAX=$A6-+@:7%,,$%@:7%,,$%@:7%,,,K AZ67@X,. ")"67@f,.(4Y( } 6-%D'&P:',"$( '' to cont(4-@"D0CA`  &6-% (Found  AP } @ 7@w%A7B7tA$L 6- A(%B:,".6-@ }:,L @*!@dA0 A (}6-M(!-A IA I%$/6-@:7%,,;"@M" })"Ap!!"*"*"@:7%,,Ap A DD(}=:@:7<,,,=:@:7%<%,,,=:@:7%<%,,,7< },(7%<%,7<, A+6-+@:7%,,$%@:7%,,$%@:7%,,,5 AA(7<, "6-6(Deposit #  }"#(@:7%,,$%@:7%,,* "(Chg 7%<%,4 " ( AP96-@:7%,,>=(7<,>:,=( }-7$+&,%<$+&,%,7<,H44( TAX=$+@:7%,,$%@:7%,,$%@:7%,,,'RF A 2(Enter 'Y' if cleared( }'M'=MENU)6F4M@ \0YA f "6-p ")"6-&z67%<%,.>:, A  6- }%' B:,& ) 6-$ A)( Outstanding=$( " (((( Statement % AP @ }& A6-Aw"(}&$ 46.=:,!$6.=:&, 6-A:,&  )!A "6- }( 46.A 2A)3ZA0$6-@:,&6-%!$6-& (}--3/( B }DGT_7+%,$%<+%,$%,_ACTL3 * -%*(>:%,-7$%<$%,$K -#6-%%$%$@rK6-+@: }7,,,$%+@:7%,,,$%@:7%,,.) A(7<&B:,,!(% ) 8@  ( '' to cont&4C.6-%66- }&@ A@B APG @ L' "(}NO MORE SPACE' APQ' @  A'6-$%A IV167 }<,.>:,#67%<%,.>:,167%,.7,`:( 6-$ A&(:(  Cashj>(  Deposit2 }( Charge Sv chg>@t;;AAAPApAA~G 6-( Chg account ! }1@:, )@:,!=(G AP 6-%67<,. A  6- A  6- A0 6- A } 5 6-%6-6.=:, 6-&",6-1(5H67<,.>:P:+A:,,',,#6-%H67<,.>:++A:,,'&P:+A:,,', },$,.( .@:7<,, )@:7<,,!A  6-%67<,.>:, 67%<%,.7<,8 (Date }4&67<,.>:,867%<%,.>:,F 467<,.>:,*67%<%,.>:,<67%<%,.>:,F Ap= A#67< },.>:A:7<,,,=67%<%,.>:A:7<,,,67%<%,.>:A:7<,,,O Ap(Amount'6-$'/6-%@67< },.>:P:,,O6-+&P:,,$ "6-6367%<%,.>:P:,,367%<%,.>:+&P:,,$,& ")"6.CHKACCNT& A }  9 A(Tax$6-$'967%<%,.>:P:,,'6-+&P:,,$'67%<%,.>:P:,,67%<%,.>:+&P: },,$,3 A(Payee%B:, 367B:,%,.(67%<%,.2$ (OK$7<,0YA<"A }F86-@:7%,,&6-%#6-%)6-8"6APU'6-A%@r$%+@:7,,&,$U6-+@:7,,$%+@:7%,,,$ }%@:7%,,%$,'Z867<,.>:P:,,#6-+&P:,,$867%<%,.>:P:,,_67%<%,.>:+&P:,,$,d  6-& } 6-% AT (}6-$ A-( Sales tax=$>(Next F6-$P AT(6)(#trans= Room } for & more,(6 AP @ @  6-6-$6J96.=:+%?,',(6.7:%,-7%<%,i -3(>:%@s,-7%@U<%@`,?-@0i(>:%@,-7%A <%A },  ($lV 6-$'*67Aq<Aq,.>:P:,,96-+&P:,,$V67Ar<Ar,.>:P:,,q&&67As< }As,.>:+&P:,,$,vI"67Ai<Ai,.>:P:',,I67Ap<Ap,.>:+'&P:',,$,p67Af<Af,.>:,7 }67Ag<Ag,.>:,Q67Ah<Ah,.>:,p67Ac<Ac,.>:P:',,Z*67Ad<Ad,.>:+'&P:',,$,D }67Ae<Ae,.>:,N6-$'Z6-Atc67<,.>:P:,,#6-+&P:,,$@67Au<Au,.>:P:,,c67Av<A }v,.>:+&P:,,$,%( Sure('Y')%4@ 0Y@ , A@,D:BDGTDISK.DATI }6-AH%"6-C:,'3%+&P:,,$>%P:,I6-B:,'P%+&P:,,$%P:,;6-?:C:hhhLV,<@ },F@P @ ' (} (('( Set budgetF( Set  ( Name .( Set F( Clear all } data.9 9A A!pA!A"@A"` * A (}(*4A"P*%%@:7<,, )@ }:7<,,!A 4(( MONTH(A=ALL)(4AA! > 6-A:,&  )!A!H>(AMOUNT6-$'>6-A }w%@r$+@:7<,,&,R 4A-\B 6-%$67<,.>:P:,,-6-+&P:,,$B67%<%,.>:P:,,f*67%< }%,.>:+&P:,,$,&4A* p A z- A!p( Enter next #- A"P6 A#(,e.g.'A-AUTOMO'' }64A"P..7<,0-)7<,2@)7<,3ZA! B:, 67B:,%<,.$6-%+@:,&,$$67<%,.7 }, A! A"@(Bal= @ O67Ac,.>:,'67A H,.>:,?67Ad,.7Ac,E6-O } @ 0 A@6-F:A,0ApA@Pc#(}Input file D:BDGTDATA.DAT>(is not on this disk.c(Sh }all I create an empty one Y0Y+d67,. 67Ab,. (67,.:67Ac,.>:,L67A H,.> }:,d67Ad,.7Ac, AQp((Error # !B:, A H%+( AP @ f6-@6 }-&6-%.6-%66-%>6-%F6-%N6-%V6-%^6-%f6-% 6-F:B2y,"6-Y 6-%6 }-%6-%#6-%+6-%36-%;6-%C6-%Q6-%@Y6-$K 6-$6-$6-$#6-$+6-%36-% };6-%C6-$K6-$/ 6-$6-AR#6-B2y+6-$/+C -( ԭ -*(BY0-C( } J.R.KEARNEYHH;,;@6,;,;,;,;,;,;,;,;,;@w,9#;,;,;,;,;,;,+6. }/96. b.6.$@6. PLEASE WAITS6. NOT CLEAREDb6.CategoryP6. }Balance=$ 6.check#76.RETURN=main menuJ6. Start month=P6-,6-I:,&A !B'f,6-B'g46-P:+ }&A H,',;,*67,.04 A@ SD:BDGTDISK.DAT)6-AH1%<6-C:,'S%@+&P:,,$ }%P:,@ %%AU56-?:C:hhhLV,<@,@@6.7:A:7<,,,16-A:7<,,?6-A:7<,,M6-A:7<,,Q67Af }<Af,.>:,767Ag<Ag,.>:,Q67Ah<Ah,.>:, @  (Sure 4@ $ 4Y }@@!+$ @ D1:BUDGETDB.BAS,.>:, @  (Sure 4@ $ 4Y ; 980 956 824 698 590 563 611 674 890 998 1070 1025Yx<=BRPRICAMOUNTRADTADPAMISRATFINAREPAPAYMENEATIM}  CAR FINANCER BY ELAINE A. PATTERSON (c) }1986, ANTIC PUBLISHING06-@$F:B2y,"@06-8 A0@8@@K}:COST OF AUTO| +@AAF4AF:A,FA @@XAA8jA@0}|AR@#^ A0-@@>(@THIS PROGRAM WILL^(@ TAKE INTO ACCOUNT(a!(@} ALL VARIABLESA(@ WHEN BUYING A CARa(@ TO DETERMINE YOUR-v#(@ monthly payments5-@}@N(@ WHAT IS THEv(@ >:AY,2 @P6-<0-@@&(}@$0 AF"@x@0O TRADEP(@>:A%,+-@@K(@WILL YOU TR}ADE-IN?]-@@p(@(Y/N)w(} AZ%"@x6-% A0dL-@7(@}A AH(}Ln\-@@&(@$0 A<"@xR(@>:A}%,\ Ax 6-& TAXm(@>:A%,+-@@D(@ WHAT IS THEm(@ }>:AY,b-@@4(@ENTER 4 FOR 4% orF-@@b(@6.75 FOR 6.75%E }AP(}*-@@ ;(@%E A"@xA006-'A06-P:+%$,$A,}'ADOWN PAYMENTx(@>:A%,+-@@A(@HOW MUCHS-@@x(@ }>:AY,Y A(}*-@@ ;(@$E AY"@xAMISC. EXP}ENSESu(@>:A%,+-@@H(@TAG, TITLE, ANDZ-@@u(@ MISCELLANEOUS}6-@@6(@>:AY,Y A(}*-@@;(@$E AY"}@xA 6-%&FINANCE RATE{(@>:A%,+-@@D(@ WHAT IS THEV-@}@{(@ finance rate>:@1,-@@3(@ENTER 19 FOR 19%E-@ @U(@}ORg-@@(@ 9.9 FOR 9.9%E AP(}*-@@;(@%E A"}@xA06-'ANUMBER OF MONTHSS(@>:A%,+-@@S(@HOW MANY }>:AY,"" A(}" B,6-@@,(@ MONTHS6 A6"@xA?}SOURCE OF LOAN@y(@>:A%,+-@@S(@WILL THIS LOAN BE FROM A:e-@@y(@}1 bankJc-@@ 3(@2 car finance coE-@@c(@(GMAC,FORD,ETC.)TK-}@A(@>:AY,K A ^A`AgBANK METHODh66-$$'@}66-P:$A%?P,'Ar4 6-%6-'46-P:$A%?P,'A| ACAR FINANCE CO. METHOD}R6-+%+$$'@,,'+6-&@016-R6-P:$A%?P,'A#-@#@w>6-}$$+@'@,>6-P:$A%?P,'A 6-%& ( Ǡ4 @@*!6@@ 6-*6-}$&4 A 6@@6-&?P::.5'S CAN BE CHANGED TO .75 IF THAT WOULD SPEED IT UP!@@6-%}?P 6- AOUTPUT CHOICEc(@>:A%,+-@@H(@DO YOU WANT THEc(@} RESULTS ON:W-@@.(@ 1 or@-@@W(@ 2 A-@}7(@WHAT IS YOUR CHOICE?A A AA DISPLAY RESULTS > + A0&(PRICE: }$>(TRADE-IN VALUE: $*6 ( TAX RATE: $A%6(DOWN PAYMENT: $4^$(FINANCE RATE: $A%=(AMO}UNT FINANCED: $L(MONTHS: ^( INTEREST: $>@(TOTAL TO REPAY: $%6(MONTHLY PAYMENT: $@ A0PRINT} RESULTSK + A0$(PRINTING33PRICE: $K3TRADE-IN VALUE: $6 3 TAX RATE: $A%63DOWN }PAYMENT: $L$3FINANCE RATE: $A%=3AMOUNT FINANCED: $L3MONTHS: H3 INTEREST: $/3TOTAL TO RE}PAY: $%H3MONTHLY PAYMENT: $ A0X-@@3(@IS THIS CORRECT?E-@@X(@}(Y/N)))@&"@)"@x)$ AF-@@)( ONE MORE TIME;-@@}F( QUIT/-@@ /( A $"@@0. +<)@}6-&@H< @)!@A $ DISABLE BREAK =@w+@A=B7tA} $D1:CARFINAN.BASA $ DISABLE BREAK =@w+@A=B7tA#78;LODSDDPRRSCDROPEBLSDSHSHAPICBYT} }CLIFFHANGER!BY HEATH LAWRENCE (c) 1986, ANTIC PUBLISHING A+ A A`}! A+ A`MOVE DEBRIS(# 6-6-&?P P:,#$2J@w'%%@ $3 @}= APG A`J$<;6-F:%P:,%@ $,'"Ar1 A; A`F!%P:,%@ $A@!$P DOW}NZh @@%%%@ $A36-%@H6-F:%%@ $,T"A@^ Ah A`d^"AhA}+"AA JT:,)!@T A0^ A`n%%%@ $Ar% @xUPU}-@6@/6-F:%%@ $,;"A@A6-K AU A`X%%@ $Ar3%%@ $}7 U%%@ $@ArX$ PULLYi @@6-R:,>2@ST:},"_6-@i @"@A`%2@AU@@C%%@ $@@a}%%@ $@6-&@$+"@,%@$+"@,6-&@$+!@,%@$+ @,I!}%%@ $@@3?%%@ $@ArI A`GOT DEBRISf-@6@2%%@ $}AsF-@@0J b%%@ $f !!%%@ $@Ar-@6@<2@}AU@@Z%%@ $@@3x%%@ $@As-@@0 6-@}!%%@ $@@?%%@ $@C W%@!@3k%@AAr-@@%} -@@ !%@%@ $A@5-@@9 W%@%@ $s2@}@@w -@@? 32@@@3%AAX!@#%A}A' ;%AX-@6?02@@@# 1-@?6-%@}[-@@P@ w2@@@2@  A  A`}$HIT GRUD"-@@3-@@P@O2@@@s2@%@P@}@w 6-&@ 6-,X A 32@U2@}X$6HIT GAS BUBBLE@o-AAU@;2@@@S%%@ $AFk%%@ }$Ao A%%@ $AJG%2@9-@A= G A TDEBR}IS IMPACTS^k-AAU@;2@@@Q%@ $AFg%@ $Ak _'%}@ $AH'6-%@hF%2@/ AC"@AF$rCOLLAPSE!|-}@@#-@0(@D-@@H T-@a(@2@%@P@@}} -@@;2@%A@@G-V(@Dj-@@n z- }(@  q #A0*-@ @6@."D-@&J-Y(@] q-@ }@  A )2@=-@APA  +@AVA$1-@ }@J(@ GAME OVER\-@@r(@:-@@C(@(-@ }@C(@ <>* F:B2y,@A@* @ GET DEBRIS Ym%6-P:H:,$@,% }@@6-F:%@%@ $,^%@%@ $A@j6-@m$UPDATE SCOREJ-@@#((@} :-@@#G(@J$PLAYFIELD +@!AV'AVC6-F:@,%AV$F:@},O6-[6-g6-@s6-@6-@-@@"-{(@-@}-(@1 E-@Q-@!`(@l-@"{(@ -@@ $}(@6-@@!E(@W-@@ f(@x-@(@ -@}@(@$-@3(@DE-@@T(@h-@@t-@}(@b -@@$(@8-@@D-@S(@bW i-@@#}(@: u:&E-@@$(@A6-@@E(@0SET OBSTACLES:-@}@16-P:H:,$@,E"@A_6-P:H:,$@,6-A$+",%A$+"@},D5%-P:H:,$@,%@5(@>:,N   $XREDEFINEbW;@,;@,46.yyyyyyyyyy}yyyyyyyyM6. W#A`c AF:A@,&@l +@'0@@@9-@}@R(@ CLIFFHANGERd-@@(@٠Ƞm-@@vh(@ }=6-+F:A,%@,$AVQ-A#d%F:BsD%,h w-@@ 4"-}@")%%- 1 4$SHAPE DATAYY264,126,255,129,60,129,255,60,24,272,0,0,0,85,170,0,0,0,288,126,129,185,}145,181,169[[255,255,304,15,19,37,73,255,3,5,13,312,213,107,222,107,214,181,218,107,320,0,24,60,90]]126,36,90,36,328,}214,107,180,104,176,108,218,116,336,107,214,45,22,13,54,91,46,344,16,8WW16,8,16,8,16,8,352,24,24,60,102,195,195,102,36,36}0,24,24,60,110,239,110,60,24,368RR0,60,110,94,94,110,60,0,384,0,28,110,219,247,92,48,0,392,0,0,0,24,52,106,210SS173,4}16,1,1,2,7,14,21,122,171,424,129,90,60,90,126,36,90,129,432,0,18,64,4,32VV8,64,0,440,65,8,32,129,36,0,34,144,448,213,166,}58,192,64,128,105,150,456,0,48,7272,132,132,3,0CLIFF FALL DATA0,2,3,3,4,6 D1:CLIFF.144,448,213,166,m 1120 1064 756 462 210 147 259 406 910 1162 1330 1225,166,xd9ONAMETXTDUMLLLOOWAI@I# @@P@@! $$THE NE!"}W OWNER'S COLUMN, PART 7BY DAVID PLOTKIN (c) 1986, ANTIC PUBLISHING20 +0;@ ,;@,;@0!#},<F-@@ , WHAT IS YOUR NAME0FTHE INPUT STATEMENTF.AR@'-@.  P @!$}B,@@1/@6@C/@6@U/@@g/@@y/@@/@!%}@ZK6-@%B:,*6-@ &'@76.HELLO K67B:,%@,.d1-@'-%&@@1 7!&}<,ne-@@ ;2$@@@? C e2x2-@@ !'}2 PRESS TO CONTINUE##@@K:$)@$AUA@" >:A%,"-@!(}@CC ;PRESS ANY KEY AND I WILL TELL YOU WHICH KEY YOU PRESSED--TEST FOR KEYS WHICH ARE CURSOR CONTROLS!)})@6.#"@'6.ESC# AP#"A'6.TAB# AP#"AY6.SET# AP!*}#"AX6.CLR# AP)"A&6. BACKSPACE) AP&"AV6.DELETE& AP+"A!+}T!6. CTRL-DELETE+ AP&"AW6.INSERT& AP,"AU"6. CNTRL-INSERT, AP%"A!,}%6.CLEAR% AP"&"AU6.RETURN& AP,Y"@1/67@<@,.>:@',O67@:@1,Y AP6Y"@0/67@<@,.>:@',O67@<@,.>:@0,Y AP@Y!.}"@(/67@<@,.>:@',O67@<@,.>:@(,Y APJY"@)/67@<@,.>:@'!/},O67@<@,.>:@),Y APT 6.>:,^##  YOU PRESSED  : CODE h ArD1:NE!0}WOWN7.BAS@<@,.>:@),Y APT 6.>:,^##  YOU PRESSED  : CODE h ArD1:NE 800 760 540 330 150 105 185 290 650 830 950 875D1:NE$xst**BRAFGTXLMTLYLKCLYABPTSFILEYMAYMIGVLOHDISCALXLABEPTLCOLSTAREECHARSEEP)3}OWE @ @ @ @)4})5} !"#$%&'()*+ V-GRAPH)6}BY ALFRED FILSKOV (c) 1986, ANTIC PUBLISHING#06-@$F:B2y,"@06-(hh;@ ,;@,)7};@7,;@@,;A,;@r,;@@,;@ ,;@%,2LL;@,9A<@,9A,9)8}A<@,9@,<L.6.$JANFEBMARAPRMAYJUNJULAUGSEPOCTNOVDEC=67@7,.L6.>:A%,Ff +@)9}@1@@9<@\@@K:f A0PI(-@@%(V-GRAPHI( ):} by Alfred H. Filskov, IIIZ](](RThis program will plot graphs with up to 100 points based on data from disk files.d/);}(/(#Do you want a disk directory (Y/N)?n A(A@x?( A@?@@)<}D:*.*?@( ?7@<@ ,0FREE A0N@((N(4How many files do you want to )=}graph at once (1-3)?<)@6-&@H< @)!@APV( (6-"6-.6-B)>}66. G67@6,. V67@,.LOAD FILES=6-%@0(Enter filename . D:=@c)?} 6.D:67@,.% A0@M@@Y6-c AP:@!B0)@}(DATA TOO LARGE!: A/ %(DATA LESS THAN 0!/ A06-%@$68<&@,-* 06-)A} !6- AA:"6-&@0(BAD LOAD FILE!: A3 68,-%67$@&@)B},.3 A"@A --"@*8@,"8@,A "CC"@*8@,"8@,)C}*8@,"8@,A ,D:(2FILES DID NOT HAVE THE SAME NUMBER OF DATA POINTS!D A6,("( DISK ERROR #F:)D}A,, A@ A0SET SCALEJ ASET LABELST MENU^l BA@d)+3 A)E}0E@@H(K([( M E N Ul( ---------h;(( 1. BARGRAPH(( 2. LINE GRAPH;(3. POINT GRAPHrO)F}(4. CHANGE SCALE,(5. CHANGE LABELS<( 6. NEW DATAO(7. END PROGRAM|+(( YOUR CHOICE?+@@<))G}@6-&@H< @)!@A'("@ A0' AP#"@ A# AP)H}"@%"@(M!@((=(" DO YOU WANT VERTICAL LINES (Y/N)?G AM6-D)I}RAW GRAPH)+@%@ A0)@9,@V@'/@VAU9/AAU'-+&,')J}'6-AU&+&,$$,@P/@U$6.=:,,6-@&B:,"6-&@, A@)-@YA)K}@%,)  B 06.,6-@ &P:B:,'@,86-B A@c 0-@B:,&6.7)L}<,26-U6-@r&B:,$@%$@_ A@c &"@A026-@-@26.7<)M}%&@,:Q-@6.7<,-6-8,'@C6-AI%$@M A@Q D 6-%!B:, 6-@)N}N X7!@+&@A@A 7PRINT KEYb^*!@-@<-AT@ 6@E,)O}8,I M ^VERTICAL LINESl5A A@A@5PLOT BARS OR POINTSvb6.(M)enu6-(6-A`)P}2 A@@6.(P)rintL6-X6-Ahb A@.)@.@w*@A@"@wAP)Q}Q !-@U-,A`9/At= G@Q A0##PUT GR.8+16 DUMP ROUTINE HERE A)R}`/6-F:@,%F:@,$AV:@Z@@P:(@>:@',A>:@,H)S}-@9H(@>:@',L>:A(,>:@,K -A6@56-F:%%$@@,K(@)T}>:,>:,! (@ !@ B A0PRINT IN GR.8K 6-P:,6-P:,!6-@@)U}K6-+F:@,$AV%F:@,,%$% -@B:, 6-@:7,,=% @2)+!A'* A`,36-%@d)V}= A'!@1* @'6-&@2 $$6-F:AV,$AV%$@ -@@6@ %)W}$F:%, *36-%@'6-%$@36-46-%@ $>TWO FILES IN KEYH6.Key: )X} - ->67@ ,.7@<@,^67@!,.7@ <@,j6-@v6-A A@Rb!@)Y}6-A'6-A36-@= AI6-AU6-@_ Ab$\3-AA#,A//)Z}A3 f,AA'/AA9/AAK/AA]/AAo,AA)[}/AAp$zTHREE FILES IN KEY*6. Key: - - -J67@ ,.7@<@,j67)\}@!,.7@ <@,67@3,.7@<@$,%6-6-A% A@!@6-@R')]}6-A36-@= AI6-AHU6-@_ Ak6-ADw6-@ A$3-@P@T)^}#,A//A3 ,AFA'/AFA9/APAK/APA]/AFAo,)_}AGA/AIAo,ABA'/ABA9/AFAK/AFA],ADA)`}o/ADA$BARGRAPH-@&"@6-6@& A<"@6-6@& )a}A26-@< AS"@6-6@& A36-6@= AI6-@S A0   $)b}POINT AND LINE GRAPH'-&@'-@/ 6-8,6-8<,%6-%@/ A$   .)c}"@$8O-&@3,8@,8@<,A-@O/8,8<,B  $LDRAW POINTSV)d}3 ,&@)/%@3@`{"@,#,&@9,%@&@O/%@%@)e}e/&@%@{/&@&@jm"@,+,&@&@A/%@&@W,%@)f}&@m/%@%@tg"@%,%@%@;/&@%@Q,&@%@g/&@)g}&@~g"@%,&@&@;/%@%@Q,%@&@g/&@%@$D)q}?B%DOS SYSB*)DUP SYSBSAUTOTYPOLSTBWmBUDGETDBBASBCAPS PRFB)CARFINANBASB2CLIFF BASB COATS PRFB!NEWOWN7 BASB1SCARFS PRFBV2VGRAPH BASRAW BARSA-%@),8,%8<,:/8,%AU> A$Z /-8,%%@8,%%@@,)r}8<@,L/ATP Z@a,8,%AU*/8,%8<@,H/8,%%@8<@,a/8,%%@)s}AU]8<@, AR;-8<@,AS@F,8,%Y/8,%%@] $""8<@)t},!ASAP +,8,%%@8<@,D/8,%%@ATb,8,%%@8<@,{/8,%)u}%@AT@a,8,%AU*/8,%8<@,H/8,%%@8<@,a/8,%%@AU)v}=!,8,%%@8<@,:/8,%%@AU=$GET YES OR NOR (YA@d*)@R)w}@x*@*AUA"AU6-@ % (>:,"6-+&@x,'@%$ CUSTOM/(/(CU)x}STOM LABELS: ( DATA POINTS)(A(A(5HOW MANY CHARACTERS LONG WILL EACH LABEL BE (1-3)?2F A0)@)y}(6-&@HF @)!@A0<Y( (Y(JTYPE THE LABELS FOR EACH POINT. PRESS [RETURN] WHEN YOU ARE D)z}ONE ANDF2&(YOU WANT THE LABELS TO REPEAT.26-@P6(*(TYPE LABEL FOR POINT . >66-@Z>)@){}0"AU*"@*!@;(REPEAT>$d!! @2)!A#Apn67$&%,.>:,(>:,x!  6-)|}%@! Ap!  6-%@! A` ( $ LETTERS>-@e@+67&@d,.>:,/ ;6-)}}@>$ MONTHSX A`(-(STARTING MONTH # (1-12)1:6-P:,X @)!@A`;6-@)~}%6-$@&@86.7<%@5,;$ NUMBERSX A(-(STARTING WITH # (0-900)1:6-P:,X )})!A A+ 6. 67A,. +67@,.H6-B:=:%,,-@A67$&%@,.=:%&@)},E H$SET Y-AXIS SCALE((SET Y-AXIS SCALE:8(%(ENTER LOW VALUE FOR SCALE.8((0-) 0= ()}06-! Ap%= )!A@CALCULATE SCALE" 6-&,6-65A6-'@)}+6-%@5 A@5 @6-$@+6-&@5 AJ6-P:%?,T2'@"P:'@)},(6-@2 A`^2'@"P:'@,(6-@2 A`h2'@"P:'@,(6-@2 A`)}r6-%@ A |/!-@+6-$@/ 0 -6@,6-'@0 )}6-AD' 6-%>('(TOP VALUE FOR SCALE = .>(IS THIS OK (Y/N)? AA`K A )}(G(+WHAT TOP VALUE DO YOU WANT (GREATER THAN )K )!BA  6-& A CALCULAT)}E POINTS ON SCREENK( (CALCULATING POINTS.../6-8@,=-@K-@{+68,-P:AE'$+&?P)},%@e,J68,-P:8,'@,$@{68<&@,-P:AUP&+8<&@,&,$,  $SET LABELS,)}(,(SET LABELS: ( DATA POINTS)+('(ENTER A TITLE FOR THE GRAPH.+&("(ENTER THE Y-AXIS LABEL.&&)}"@A0>(*(ENTER THE LABELS FOR THE FILES.>((8 LETTERS MAX):?(6. 67@$,. .67@,)}.?67@7,. DG-@G(FILE  (7$@&@<$@,) N'0'67$@&@)},.X 67@%,. bc(c(WLABEL X-AXIS WITH (K)-CUSTOM LABELS, (L)ETTERS, (M)ONTHS, (N)UMBERS, OR N(O) LABEL)}?lNA@d")@06-&@tN @)!@AvB(>:%@t, @BAA)}@A`A$KA@'A@9A @K@w+@A)}+B7tA$t+@%@%@' A09A@dKAR@t($} *** PRIN)}TER OFFLINE ***I-@@ 5+@%@%@2? A0I A0 D1:VGRAPH.BAS *** PRIN(p