@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}NjL= ( 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 ;LHL1  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$}G 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(}sI|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) hK. BINARY SAVED. DELETE FILE(S) L. BINARY LOADE. RENAME FILEm M. RUN AT ADDRES+}SF. LOCK FILE 5N. CREATE MEM.SAVG. UNLOCK FILE: pO. DUPLICATE FILEH. WRITE DOS FILES P. FORMAT SINGLEuL !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}VCOPY--FROM, TO?OPTION NOT ALLOWED697 FREE SECTORS COPYING---D8:COPY32.COM[l# 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}GLLOWED 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}G,^ 1 70 0L#L!-* 1P* 1 y0Yj383}mm ݭI}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?@D|mDiE` V0`8d/8 i:222 1 LP}!ERROR- 144ɛ+,' 20*.. өr2 1``2TOO MANY DIGITSINVALID HEXAQ}rDECIMAL PARAMETER800 0 8 00`,0'D800 H,ɛh`2L1NEED D1 THRU D8wuR}r ECIMAL PARAMETER800 0 8 00`,0'D800 H,ɛh`2L1NEED D1 THRU D8wuoEiͩkΩ͙kCop j`j {j`Hi͝Νh`}T}oL"UNEM:D"NURͩkΩ͙kCop j`j {j`Hi͝Νh`}*8PARMREPLYTYPEDATEDBNAMEYNNAMEDRIVEDCNPTOFFSEVVVVVVVVVVV1V1V1V1V1V1V1V1V1V1UPDAT V}-RECLETOTRECDELRECKEYAREFILENAMEXHD46<>DFLNTV\^dfmnuv } W}    !()0189@AHIPQXY`ahipqxy} X} #$+,34 ;Fc6-@JRo6-@V^{6-@ bj6-@nv6-@z6 \}-@ 6-@6-@!)6-@-8F96-@<D6-@HP'6-@T\36-@`96-P44;,;,;,; ]},;,;AS,;@ ',Z.@+2.@6:@>@FRE:dy +X76-F:A`,%AV$F:Aa,%@ ^} K&@@q!_%@%)@-3y0@79?AG]n A@x7-@ae@i4(ENTER MENU SELE _}CTION BELOW7(!!( - DEFINE A NEW DATABASE##( - ADD RECORDS TO DATABASE##( - INQUIRE/UPDATE DATABASE( `} - REFORMAT A DATABASE( - DATABASE STATISTICS( - FILE DIRECTORY( - QUIT( ( A a}# 4D A`#% D1:DEFINE 4A A` %D1:ADD$ 4I A`$% D1:INQUIRE% 4R A` b}!%% D1:REFORMAT 4S A%X 4F Ap 4Q Ap0-@\`@ d0(INVALID MENU SELECTI c}ON" A , A@6, -,(DO YOU ONLY HAVE 1 DISK DRIVE?@ -(J4Y)4N APT d} A^& -&(ENTER DATABASE FILE NAMEh -(r B:,! A | 4Y6.1 4N e}6.2 A A1 -1(READY DISKETTE IN DRIVE  ĭ# -( PRESS RETURN # f} Ap% )67B:,%,.>:,% A`"F:A,A6" A A6-AV$@: g}ǀ7,,%@:7,,6-@:7,,6-AV$@:7,,%@:7,,6-AV$@:7,,%@:7,,6-AV$@:7,,%@:7,, h}Q& A06(%(PRESS RETURN TO CONTINUE ,6 A:3&@UY@]_eD:*.*0 A@3(D i}4 6- A0N X(bR 6-%"@8(8(PRESS ENTER TO CONTINUE ?I A@L(R6-l A j}+v A`W(>:A%,"-@/17L1( ULTRAFILERC-@#PRXW( aF:BG(, k} Ab*@@d'<B7t@d+^aŠˠ٠Ҡ̯Šӛ$(b in.$ A l}C@6-1(1(&# NAME$ +LEN #0 4NAME9 LEN ! A6-+&,$%##( 7<%, @:7 m}mNJ%,, %!(  A 6-%6-+&,$%""( 7<%, @:7%,, 6-% AJ(( n}FŠ 0(Ġ J( Ԡ 7<,/(M &/(̠ $ 6. o}D67B:,%,.67B:,%,.:67B:,%,.67B:,%,..DEF$ "F:A,Ap" A p}a-@ @ X<("INSERT PROGRAM DISKETTE ON DRIVE 1T(ĭ PRESS RETURNa@\  A*5+F:A, q}Ae*F:A,Ap5 A44 -F:A,"Ae4(INVALID FILE NAME>=F:A,"Ae.(INVALID F r}ILE NAME3= APHR+(#THAT FILE NAME NOT ON THIS DISKETTER( INSERT PROPER DISKETTE ON DRIVE R(ҭ CORRECT s} FILENAME\f APpMM(ҠF:A,ӠĠԠF:A,$AV%F:A,z (CONSULT RE t}FERENCE MANUALD:MENU(ҠF:A,ӠĠԠF:A,$AV%F:A,z (CONSULT RE #uvVVVVVVVVVVV1V1V1V1V1V1V1V1V1V1PARMREPLYTYPEDATEDBNAMEYNNAMEDRIVEDCNPTOFFSELENGTv}HL !()0189@AHIPQ XY `a hi pq xy}w} #$*,24:<BDJLRTZ\bdklst{x} !"&'#-G !!ŠנM h!!Π٠Ҡn %%Ҭy}, UPDATED 02/24/90( A 26-2:6-@>F'6-@JR36-@V^?6-@bjK6-@nvW6-@zc6z}-@ o6-@{6-@ !)6-@-56-@9A6-@EM6-@QY6-@]e6-@it<36-@x6-{}@'6-@36-@F33;AS,;,;,;,;,;,;,;,PE:ZI++6-F:A`|} ,%AV$F:Aa,%9&@q$A%I0d 6-6-6-n# 6. 67AS,.#67,.x A5}} A -5(ENTER FIELD NAME % ҭ -( /* TO END -(@B:, )B:,!-@ ~}C:6(INVALID FIELD NAME@ A0=7<,4 -@ >3(INVALID FIELD NAME= A0 4/* A  A} 67,. 6-%67,.>:B:,, 6-%2 6.A A2BYPASS ASKING TYPE FOR NOW' -'(ENTER F}OIELD TYPE - A OR N -(4A)4N A&-@ S&(INVALID FIELD TYPE A@" 6}d7,., 6-%6 - (ENTER FIELD LENGTH@ APJ -(TB )!Ahp-@ t8(INVA}'LID FIELD LENGTHB A^J%!A+3-@ 7`@(MAXIMUM RECORD LENGTH EXCEEDEDJ Adh$6-P:'AV,$6-}ǟ&$AVr67,.>:,| 6-%67,.>:, 6-%67,.>:, 6-% 6-% A&-@ }J&(FIELD LENGTH ERROR A  A 6-%K!@ NV-@ ZA(!MAXIMUM NUMBER OF FIELDS EXCEE} DEDK A E A E(>:A%,-%( ULTRAFILER1-@#IE(aF:BG(,Ab*@}@d <B7t@daŠˠ٠Ҡ̯Šӛ$8 ( 8(# OF FIELDS =  RECORD LENGTH = }& ( &++(# #FIELD NAME( ,TYPE2 LENGTH0 ( :$D, ( %(PRESS ENTER TO CONTINUE,N$X}c A A0b7 " (#(NO FIELDS DEFINED- A7 Al 6--vE (g vE(7<%,{ } 7%<%,  @:7%<%,, " A 6-%   A1 A(.(ENTER YOUR ME}NU SELECTION1())(!S - SAVE THIS DATABASE DEFINITION,,($R - REENTER THIS DATABASE DEFINITION(M - RETURN TO MAI};N MENU$(Q - QUIT( ($ 4R A?e 4M A  4Q Ai A) -}E)(ENTER TODAYS DATE AS   -(B201I0\)3123199'-@ `8( INVALID DATEB A` }67<,.*, -,(DO YOU ONLY HAVE 1 DISK DRIVE?4 -(>4Y)4N APH AR& -}ǂ&(ENTER DATABASE FILE NAME\ -(f B:,! Ap 6.Dz 4Y6.1 4N6.}267B:,%,.67B:,%,.:67B:,%,.67B:,%,..DEF Ap1 -1(READY DISKETTE IN DRIV}GE  ĭ" -( PRESS RETURN",6-P:+&,'AV,,6-+&,&$AV67<,.>:,}67<,.>:,67<,.>:,67<,.>:,67<,.>:,67<,.>:,$67<,.>:,. 8B A}\LV` A@j%D1:MENUt"F:A,Ap" A ~U-@ `6("INSERT PROGRAM DISKETTE }cON DRIVE 1N(ĭ PRESS RETURNU A "F:A,Ae" A %-@ g%(INVALID FILE NAME} A  APMM(ҠF:A,ӠĠԠF:A,$AV%F:A, (CONSUL}T REFERENCE MANUALD:DEFINEҠF:A,ӠĠԠF:A,$AV%F:A, (CONSUL))VVVVVVVVVVV1V1V1V1V1V1V1V1V1V1PARMFIELDTYPEDATEDBNAMEYNNAMEDRIVERECORDMSGOPTDR}AECLECNTOTRECDELRECPTOFFSELENGTROCOCOLUMCURRECHLEMSGKN@SV@[^@cf@kn@sv@{@} @ @  @! @&) @.1 @69@>A@FI@NQ@VY@^a@egkaad}J  Br QR!YZ"ab#ij$qr%y&}' ()*$%+,-,45-;a. %%ĠӠϠg !!Π٠} A ֬ UPDATED 02/24/90( A`26-GO6-@S['6-@_g36-@ks?6-@wK6-}@W6-@c6-@&o6-@*2{6-@ 6>6-@BJ6-@NV6-@Zb6-@fn6-@r6-@} <36-@6-@$'6-@(036-@4JFDD;AS,;ANs,;,;,;,;,;,;,;Aw,P};,;,;@`,ZE:dI++6-F:A`,%AV$F:Aa,%9&@qdA%I0n6.}e ENTERINGx A ) -)(ENTER TODAYS DATE AS  -(B201i0)3123199'-@ }x8( INVALID DATEB A , -,(DO YOU ONLY HAVE 1 DISK DRIVE? -(4Y)4N A|}[ A`& -&(ENTER DATABASE FILE NAME -( B:,! A_ 4Y6.1 4N}G6.2 A  A1 -1(READY DISKETTE IN DRIVE  ĭ# -( PRESS RETURN #"}ǂ, A 6% )67B:,%,.>:,% A@"F:A,A6" AJ A`T6-AV$}@:7,,%@:7,,^6-@:7,,h6-AV$@:7,,%@:7,,r6-AV$@:7,,%@:7,,|( A ` !} A  A 6.D67B:,%,.67B:,%,.:67B:,%,.67B:,%,..DAT "} !! 6. 67&,. !67,./(((DO YOU WANT AUTO-DUPLICATION?/ A  A} 0 6-6- 6-%& ! A0##6-@:7%,,$AV%@:7%,,:6-@:7%,,D+ 4Y-(}E = +(7<%&,N' "6. OR TO END' AX6. R b -(ENTER 7<%,l6-@:7}%,,v6-P:'@8.,%6-&+&,$@82J% 6-%"@@N6-%6-; -(-(,6}-F:@ ,;6-F:@-,, 6. 67A1S,. %67,.,/%"F:@W`,*"F:@d,*4Y/ AP) B:} ,67Ae,. )67,.7, B:,  A07<,4/* APàk 67<%&,.} 6-% A  A@  A  6-  -*16-@:7%,,16-@:7%,,$AV%@:7%,,4(}ǔ7<%, 7<%&,> 6-%H R6(6( PRESS RETURN TO ACCEPT RECORD # %% \- 0#6. RE-E}sNTERING- Af 6-%p6. ENTERINGz ( AJ(>:A%,-%( ULTRAFILER1-@ wJ(}3aF:BG(,Ab*@7;@d?M<B7t@dQaŠˠ٠Ҡ̯Šӛ$}b -( RECORD # %%$2(Š 2( Ԡ 7<,/(i &/(}̠ $ 6.D67B:,%,.67B:,%,.:67B:,%,.67B:,%,..DEF$ŠԠ} $ A .) -&(TOTAL RECORDS ADDED = )(8B A L A`V` 6-%j}67<,.t&6-P:+,'AV,&6-&$AV~67<,.>:,67<,.>:,  A `'($(}GENTER YOUR MENU SELECTION'(##( - INQUIRE/UPDATE DATABASE( - RETURN TO MAIN MENU( - QUIT( (}4I)4i A4M)4m A04Q)4q A A  AP% D1:IN}\QUIRE(2 AP<%D1:MENUF"F:A,Ap" A`PU-@ `6("INSERT PROGRAM DISKETTE }2ON DRIVE 1N(ĭ PRESS RETURNUU B64I AZ A0d?(DISKETTE IS FULL 8(PRESS RETU}RN TO CONTINUE ?n APx8 A (8(FILE CONTAINS  DELETED RECORDS9 (DO YOU STILL WISH TO ADD}9(USING THIS PROGRAM?  4Y A/(%(TRANSFERRING TO INQUIRE.../ AP% D1:INQUIRE"F:}%A,Ap" A`U-@ )6("INSERT PROGRAM DISKETTE ON DRIVE 1N(ĭ PRESS RETURNU A0}"F:A,"Ab" A5+F:A,Ae*F:A,Ap5 A`4 -F:A,"Ae4(INVA}FLID FILE NAME=F:A,"Ae.(INVALID FILE NAME3= AJR+(#THAT FILE NAME NOT ON THIS DISKETTER( INS}MERT PROPER DISKETTE ON DRIVE (ҭ CORRECT FILENAME AQMM(ҠF:A,ӠĠ}ԠF:A,$AV%F:A," (CONSULT REFERENCE MANUAL,6 D:ADDҠF:A,ӠĠ]z{k9>J>XMENXNEXXYXHDXPRXERVVVVVVVVVVV1V1V1V1V1V1V1V1V1V10V19V25UPDATPARMFIELDDATEDBNAM}EYNNAMEDRIVEOPTKEYPARMMLBUFFERSELPARMPRTPARMPRTSRTOPTCONDREGDRECLECNTOTRECDELRECRECORDKEYAREKEYFSECTO}FBYTKEYKEYLEPTKEINSECTOBYTHLPTRLENGTOFFSEEXTCNRECNULINPAGCURDELSELOSTARSORROCOPLENGTPRTCNPW}IDTPUPLINEADDAAp#'A 0+/A@036AF;?AQ CDKN@SV@[^ @cf @kn @sv @{ @} @@ @!@&)@.1@69@>A@FI@NQ@VY@^aAfjAnrAVvw}}ǁRaad !" #$%<&%')()))d*v+,}E-.Br/@ 0A$$'1@,/2@a453;X4|5BDf6o87A3\]8dg9@lo:@'tw;@8|<}@ =@>@a?AT#@A%'*A@ /2B@7:CA?BD@ GJE@1OPFWXG_`HghIopJwK@}L@ MNA O@"#P*3QB7`R:;SBET@JMU@RUV@Z]W@beX@jnYA2rvZA2z[@}\@f 2]B8 %%ůŠ8 S!!Π٠ҠY  ì UPDATED 02/24/90(K}6-A 76-Ap'6-A 036-A@0?6-AF;WK6-AQ 2 <6-]e6-@iq'6-@u36-@} ?6-@K6-@$W6-@(0c6-@4<o6-@@H{6-@ LT6-@X`6-@dl6-@px6-@|}6-@ 6-@"FQ6-@&.6-@2:'6-@>F36-AJ?6-AK6-AVQ6-P..;AS,;,});,;,;,;,;,Z::;,;@`-,;A`,;,;,;,;A0,d&;,;,;,6.&6.n}AE:xC+%6-F:A`,%$F:Aa,%3&@qE;%C0 ) -)(ENTER TODAYS DATE A}+S  -(B201/0B)3123199'-@ F8( INVALID DATEB A0, -,(DO YOU ONLY HA}VE 1 DISK DRIVE? -( 4Y)4N A Ap& -&(ENTER DATABASE FILE NAME -}( B:,! AP` 4Y6.1 4N6.2 AF` APP1 -1(READY DISKETT}E IN DRIVE  ĭ"# -( PRESS RETURN #,6 A0@% )67B:,%,.>:,% A }JF:,A6 APPT ^6-$@:7,,%@:7,,h6-@:7,,r6-$@:7,,%@:7,,|6-$@:7,,%@:7,}, ;%,6-I:,&;,( AF  APP 6.D67B:,%,.67B:,%,.:67B:}Ǡ,%,.67B:,%,..DAT ! 6. 67&,. !67,.8((MULTI-KEY SORT?  &6.}ǡ,6-26-86- 6-6- 6-%  A& 0Y A0=(( MORE KEYS? ! A 0)4}CJY36-$%= A : AD  A@PN' -'(7<%,P @:7%,,X. -$( KEY FIELD # %? }. A 0b 0Y6-% A0l Av) -"(KEY FIELD LENGTH ? ) )!@:7%,, A}-67,.>:,67%,.>:%,-67%,.>:, 6-%6-% 6-%6-% A06-@:7%,, AP, }\-"(INVALID FIELD LENGTH, A06-@:7%,, " Ap ' A`1 -1(#INSUFFICIENT RO}OM FOR KEYS SELECTED%%(EITHER SELECT FEWER KEYS ҭ##(REDUCE SIZE OF KEY FIELD(S) A# -#(NO KEY}S WERE SELECTED ;/('AT LEAST ONE KEY FIELD MUST BE SELECTED7-;  A  A 6-6-*$  -}$(LOADING KEYS ... 4 > H B:, AHR6-P:',6-&$\+67,.>:,67%,.>:,+67}Ǽ%,.>:,f 6-%p 6-6-%z 6- 6-% ! A 6-+@:7%,,&,$%6-@:7,,6-@}N:7%,,$%@:7%,,67<%&,.7<%&, 6-% 6-% A RF:,A6   6-6-}6-6-% -"(ENTER MENU SELECTION%(( - BUILD NEW KEY FILE( - SORT KEY FILE( - FIND EQUAL }KEY&&( - EXTRACT SELECTION CRITERIA$""( - BROUSE THROUGH RECORDS.( - PRODUCE LABELS8( - RETURN TO MA}IN MENUB( - PRINT REPORTL( - REPLACE FIELDV""( - TOTAL SELECTED RECORDS`%%( - UNDELETE A DELETED RECO}RDj( - CHARACTER SCANt( - WRITE SUBFILE~( - QUIT&((ENTER SELECTION & A P 4K} A 4S A)0 4E A6 4R A&  4F A8 4B A 4}L)4P A2 4T A  4C A%p. 4W$ D:SUBFILE.DAT. A  4M AP}S 4Q AG  G4U*"(1(NO DELETED RECORDS IN FILE?-AWC G  4U A  (}l/ 6- 6-6-(/( PROCESSING...2 6-%! A<(B2yF:B2y, ( A)pF6-@:7},,$%@:7%,,P6-@:7%,,Z@:7%,,"6-%d!4U*@:7%,,"! A2 n4U)@:7%,," x "}C9 A 6-6-6- 6-% ! A=!!6-@:7+@:7,,&,$%,,%&6-@:7%,,??@:7%,},ApAAA0APAp#7<%&,47%<%%,#6- A#7<%&,27%<%%},#6- A#7<%&,37%<%%,#6- A#7<%&,/7%<%%,#6- A#7}<%&,17%<%%,#6- A"#7<%&,07%<%%,#6-, A66-%%@:7%,, A @(} APJ 4T A`T ^ h 0C A`r 6- A(" | 6-% B:,} AH 4T Ap 4R A& 4W   4L A! 4P A#p }!A p) 4C A  AE%) A0 4D A10 4M6.   6-% A04}L*! ADP" 4P-&( " / 4L  / LABELS PRINTED = 4W A' }7+,)+,%(UPDATING COUNTS+6-16-76-Q  ($(Ġ = '(F(PRESS RETURN TO CONTINUE M}Q  & 6-6-0 6-%:" ! 6-"$D6-@:7%,,$%@:7%,,N6-@:7%,,X}c) -( Ҡ()(7<%&,b -(ENTER 7<%,l6-@:7%,,v6-P:'@8g,%6-&+&,$@8}% 6-%"@@ U6-%6-; -(-(,6-F:@Yd,;6-F:@h,& 6. 67,.} 67,.&)"F:@#,,*"F:@07,) A ;# B:,67,. #67,.7,67<%&,. 6-%}/  A@5 6. !@:,!@3B56.>:@:,&@2Fj,$5 6. !@:,!@n56.>:@:,&@2}, $   6- ((* -4+6-@:7%,,+6-@:7%,,$%@:7%,,>(7<%, 7<%&,H 6}-%R \S(((PRESS RETURN TO CONTINUE ҭI(ENTER HANGE, ELETE, ENU S A 0f 4( PROCESSING...p}4C)4D)4M)4$z A!@ " AA A(  A%0# 6-6-6-6-#6-% }! A#P -@:7%,, A#06-@:7%,,+6-+&,$%%+6-$@:7,,%@:7%,,76-@:7,}G,76-+@:7%,,&,%$+&,%++&,$$,% " A#  6. 6-%%6-?:C:,(V A%0` % 6-%+",)+& ,% ABj  }6-6-6-6-%t  ! A%~ - @:7%,, A$ 6-@:7%,, +6-+&,$%%+6-$@}:7,,%@:7%,, 76-@:7,,76-+@:7%,,&,%$+&,%++&,$$,% 67<%&,.7<%&,  6-%   6-%}6- A$     ADP 6-  F:,A8  3,(#PRINTER TIMEOUT - RETURN WHEN READY3}LJ " A%0'4L" A#` A%  A(    ( ( -(ENTER COMPARISON STRING&(-( }B:,")B:,! A%2 A <  A@ A&0F (ENTER FIELD # P  !)  A&0Z 96-+&}LJ,$%6-@:7%,,96-@:7%,,$%@:7%,,d F 6. 67,. 67,."(?(ENTER REPLACEMENT FIELD Fn # B:},67,. #67,.7,x A  67<%&,.   6-    D:SUBFILE.DEF 67}LJ<,. 6-P:+,',6-&$ 67<,.>:, 67<,.>:, 67<,.>:, 67<,.>:,   $}1 B:,"A` A( 6. pp67@59<@=,.Uԅh`hhhhhhmmh}$hhhhhmͥm" oo67@(<Ai,.TΥ8ͥ΢%8͍ `iͥiΩ6ȱ}%8, vv67Ap<A`,.[ `iͥiΩʭ8͍ 8ԥեiԥi}`6 ##67A<A,.>:AU,@ $J (%6-?:C:,:,b  l 6-}%v    # -&#67%%<%%,.>:, F(((PRESS RETURN TO CONTINUE ҭ9( ENTER ENU C A 0F}6$ - 67<,.     A  AE:  !6-& 6-   C  ( (6-6-6-%6}*-+6-34L96-C A3` M A3.V)(ENTER MAXIMUM COLUMNS -C @Zj)!A2M A3n E A3'}((ENTER MAXIMUM LINES +; )!@,E A3 9 A3 !(ENTER SPACING %/ )!9 A3  @(ENTER }$REPORT HEADING 6B:, )B:,!@@(i@ A30 ; A3P)(ENTER STARTING PAGE # -;6-&@m  6-6-} A3 / A3`+(ENTER COLUMNS PER LABEL /* , A3p((ENTER LINES ON LABEL ,4 0 A3,(ENTER #}V OF LABELS ACROSS 0>   ( A@H 6-%R  !  A5p\ d A6Z4L?(ENTER FIELD #  LI}NE #  ҭd( ENTER 0 FOR NEXT LABEL LINE ҭa ( 4P((ENTER FIELD #  ҭc *#(PRESS RETURN TO BEGIN PRI}^NT*f  ! A4 k  *4P A4 p -  6-6- # A@- A4bz 6-+&,$%% = A}4p,(ENTER FIELD PRINT LENGTH 3= A4 6-@:7,,  )!@:7,, A4` #6-@:7&,,6-!}#6- ++%&,!!( WIDTH EXCEED + A4  6-P:O:&,', 967,.>:,67%,.>:,+67%,.>:,967%,.>:}, 67%,.>:, -!*4P#67%<%,.>:%,- A5` 67%,.>:%, = 6-%%6-%6-%%6-%) 3} A@= A4 E A5p(>(#TURN ON PRINTER ĭ PRESS RETURN E  4P AIP:}  A   A5p 6-6-6-6-$ 6-%.5 4B6.B6-6-%6-+6-5 A 8}CK ! B6-+@:7%,,&,$%L  A@PV$ -$(7<%,P @:7,,`) -%(SELECT ON THIS FIELD? }) j 0Y6-% A6 t A8`~( -(( =, <, >, <=, >=, <>3 -((ENTER COMPARISION NUMBER  }/3   )! A8p67,.>:,67%,.>:,67%,.>:,# -#(ENTER COMPARISON DATA -!}e( B:,"67@:7,,,. ;B:,!@:7,,-1(INVALID FIELD LENGTH; A7i67%,.>:B:,,"}67%<%%B:,,.7:A%,-%( ULTRAFILER1-@#ND(aF:BG(,Ab*'}@ @d<B7t@d"haŠˠ٠Ҡ̯Šӛ$ -(FIELD NAMEn LENGTH$(}   6-1(1(&# NAME# *LEN #/ 3NAME8 LEN ! AAp6-+&,$%##( 7<%, @:7)}l%,," %!(  AAp, 6-%6-+&,$%6""( 7<%, @:7%,,@ 6-% AApJ ( $T*} (6-^ -h -r&  6-%67,.*& AB0| 6-%67,.    -(+}7<, 2(ARE FORMS ALIGNED?  (0Y2 ABP -(     $ 6-6-6-6-%,} -&(  .6-&+P:',,&+P:B:,,',.67<%B:,,.M67<,.7<, 67<,./067<,.7<,-}=67<,./M67<,.7<,'67&<&,.PAGE'67&<,.=:,(7<,(   ! AD0 -.}@:7%,, AD6-@:7%,,6-+&,$%&96-@:7%,,96-+@:7%,,&,%$+&,%++&,$$,%06/}Ǫ7<%&,.7<%&,: 6-% D 6-%6- AC@N"(7<,6- "( X$b 6--l#0}G6-++&,$$,%#6-%+$,&v(7<, 6-% $ 6- 6-6-% 6-% ! $6-+@1}1:7%,,&,$%6-@:7,,6-@:7%,,$%@:7%,,67<%&,.7<%&, 6-% 6-% AE ! 62}Z. 67$$,.!67,.$ 2(Š 2( Ԡ 7<,/(a &/(̠3}  (ؠ٠ *$4 6.D>67B:,%,.H67B:,%,.:R67B:,%,.\67B:,%,..DEFf4}$p  z " AH` AF` 67<,.6-P:+,',6-&$67<,.>:,5}67<,.>:,6-P:+,',6-&$67<,.>:,67<,.>:,     ( ( AF 6}((WRONG LENGTH RECORD5.( INPUT SIZE = B:, SHOULD BE = 1(5($  AG . 6-&867}-P:+&,'+%,,6-B -L6-@:7%,,6-@:7%,,V 6-$%6-$%`'67%<%,.>:,'67%<%,.>:,8}Uj 6-%t ~$ AP %D1:MENUF:,Ap U-@ Y6("INSERT PROGRAM DISKETTE ON DRIV9}+E 1N(ĭ PRESS RETURNU AP/#F:,Ae*F:,Ap# . -F:,"Ae.(INVALID FILE N:}AME7F:,"Ae((INVALID FILE NAME-7 AR+(#THAT FILE NAME NOT ON THIS DISKETTER( INSERT PROPER DISKE;}TTE ON DRIVE (ҭ CORRECT FILENAME AAA(ҠF:,ӠĠԠF:A,$%F:A<}dž,  (CONSULT REFERENCE MANUAL  D:INQUIREF:,ӠĠԠF:A,$%F:AO  R. Roger Cole" 1January 1, 1990JJ^ U_L_T_R_A_F_I_L_E_R_>}I _-_ _A_ _B_A_S_I_C_ _F_i_l_i_n_g_ _S_y_s_t_e_m_ll} ?}$ 5ULTRAFILER/COLE/299C ULTRAFILER is a system to allow you to manage a collection@} of Ndata records. ULTRAFILER has functions to add new records, changeS existing records, delete records, and evenA} un-delete records.  VReporting functions allow you to print reports or labels.` ULTRAFILER has a few featuresB}C% that even some commercial programs* qlack. It has the ability to print 1 or 2 or 3 wide labels. The sortv option C}C4allows a multi-field sort. The reporting function9 automatically centers columns and column headers within available D} Hspace. A unique UNDELETE option allows you to re-use space withinM your database without reorganization. A fairly E}sophisticated Ealgorithm allows multiple selection conditions.P The first module of ULTRAFILER is MENU. ThisF} program does what `the name suggests--gives a menu of options. The DEFINE module shoulde be entered to first set G}.up a new database. ADD should be entered to3 vadd the first records to a new database or add more records to an{ exH}@isting database. The INQUIRE module produces printed reports,E labels, and can update or delete existing records. The I} REFORMAT Vmodule is used to modify field definitions for an existing database. [ It will allow you to add/delete fiJ}$elds, change field size and change) ifield names. Each of these modules will be examined in depth.s First, howK}3ever, an explaination of the file structure is in8 order. ULTRAFILER has two files for each database. The first fileL} Jhas an extension of .DEF and contains the definitions of all fieldsO within the database. It also contains certainM} other information such eas date updated, total record count, deleted records, etc. The otherj file, with the exteN}1nsion of .DAT, is the actual data itself. Each6 srecord is actually 1 character longer than the DEFINE program}O}5 FULTRAFILER/COLE/3JJO indicates. The last character of each record P}is an EOL (decimal 155). gThe maximum number of fields per record is 15. The maximum number ofl characters per fiQ}-eld is 100. Additionally, the total sum of2 icharacters cannot exceed 255 (maximum record length).t The numbeR}8r of records that can be placed upon a diskette can be= determined by dividing the free bytes by the record length + 1. S} NSeveral smaller data files can be placed upon one diskette as can theS programs themselves if room permits. For T}Clarger data files, the cprograms should be on a diskette by themselves. Multi-drive systemsh are supported. If yoU}U1u have a multi-drive system, ULTRAFILER expects6 the program diskette to be on Drive 1 and the database diskette to beV} on Drive 2. [The MENU module will transport you to either the DEFINE, ADD,` INQUIRE or REFORMAT module. W})In addition, you have 2 other options. . oYou can enter "F" to get a directory of all files on a diskettet without eX}K - BUILD NEW KEY FILE. This option is for a subsequentC regeneration of the key file without having to exit to the}E menu and +rerun the INQUIRE module.5 uS - SORT KEY FIELD. This option will sort a key field of yourz cho}Eice in ascending order. If a multi-key sort was not specified, youJ will be asked which key you want to sort; otherwise}, the entire key -area will be sorted.7 wF - FIND EQUAL KEY. Many times you will want to find just one| s}Gpecific record, perhaps to update it. You could select the E option,L enter your selection criteria, then select the B }option & browse for [your record. This could take some time especially for a larger` database because the selectio}*n routines compare using BASIC strings. / tThe F option uses a Machine Language routine to find the record youy want}D by searching the key file in memory. You can only search for oneI string at a time and only for an equal compare. If }more than one Xrecord meets your criteria, pressing RETURN will search for the nextbb} } +ULTRAFILER/COLE/7//4 Aoccurrence.K E - ENTER SELECTION CRITERIA. This option allows }you to enter Vselection specifications to determine which records to display or[ print. You will be led through a }%routine which will step you through* pthe key fields and ask if you wish to select based upon that field. u If so, y}>ou will be asked to enter a number corresponding to the typeC of comparison desired (equal, less than, etc.). You will } then be Tasked to enter comparison data. The data you enter will be comparedY with each record in the database and}, based upon your comparison# knumber, decide whether or not to select the record for display, print,p or whatever. }9 If the length of your comparison data is less than the> full field length, both fields will be compared for the shorter} Olength. If more than one selection item is entered, the items have anT 'OR' relationship; i.e., a record will be} selected if ANY ONE of the" dselection criteria is satisfied. If option E is never used, alli records are presumed}C# to meet your selection criteria.- iB - BROWSE THROUGH RECORDS. This option displays selectedn records upon yo}6ur screen. After the record has been displayed, the; program will wait for your input. If you merely type RETURN, the }next Nselected record will be displayed. If you enter "M", you will beS returned to the INQUIRE menu. If you ente}r "C", you will go to a broutine very similar to the ADD program where you will be promptedg through each field of }.the record. If you don't wish to change the3 yfield, type RETURN; otherwise, enter the new data for the field. If} }E you type "D", you will be taken to a delete routine. For safety'sJ sake, you will be asked "ARE YOU SURE?". If you an}swer "Y", the Trecord will be deleted; otherwise you will be displayed the next^^} } 'ULTRAFILER/COLE/8++0 Bselected record.L L - PRODUCE LABELS. This option will produce lab} els. The Xroutine can print 1, 2 or 3-wide labels. You will be guided through a] series of requests for further i}"nformation. The first is "ENTER' kCOLUMNS PER LABEL". Most labels are 35 print positions wide. Thep second reques}8t is "ENTER LINES ON LABEL". Again, most labels are 6= lines high. The third request is "ENTER # OF LABELS ACROSS". T}his is Na number from 1 to 3 depending upon your forms and your printerS capability. You will then be asked for Fi}eld 1, Line 1. Enter the fnumber of the field. You will then be asked for a field length. Ifk the full length of}5 the field is OK, just hit RETURN; otherwise, enter: the length of the field you want to appear on the label. You will} Nthen be asked for the next field number on that line. If there are noS more fields for that line, enter a zero fo}r field number. If there fare no more fields to go on any lines, hit RETURN. Next, you will bek told to turn on th}6e printer and type RETURN. ULTRAFILER will now give; a lineup test. You will then be asked "ARE FORMS ALIGNED?". If y}ou Menter "Y", the labels wil begin to print; otherwise another lineupR test will be printed. At the end of the la}Cbels, the total account fwill appear on the screen. If more than 1 field is placed on a singlek line, the next fie}0ld will begin 1 space after the last non-blank5 Tcharacter in the prior field.^ M - RETURN TO MAIN MENU. This }$option will return you to the Main) 7Menu module.A P - PRINT REPORT. This option will produce a report on your} Nprinter. The first line of each page contains the date, a comment ofS your choice, and the page number. The nex}t printed line contains the%%Z kULTRAFILER/COLE/9oot headings }=for the fields you are going to print. Finally, the detailB lines are produced having the fields arranged in columns. } You will be Uguided through a series of requests. The first request is "ENTERZ MAXIMUM COLUMNS". This tells ULTRA}"FILER how many columns it has to' owork with. A valid response is a number from 40 to 132. If you entert a number }?larger than 80, condensed print control characters will be toD the printer; otherwise regular print control characters w}ill be sent.  WThe next request is "ENTER MAXIMUM LINES". This is the number of\ lines that fill fit on one page. }& Typically this is 66. Next you are+ sasked to "ENTER SPACING". Enter a "1" for single and a "2" for doublex spaci}Ang. You will then be asked to "ENTER REPORT HEADING". You mayF enter a heading of from 1 to 40 characters. It will be} centered on Yline 1 of each page. You will next be asked to "ENTER STARTING PAGE^ #". Merely entering RETURN wil}%l assume page # 1. You may want to* renter a higher page number if you had to stop an earlier report beforew it cou}Bld finish. Finally, you will be told to turn on the printer andG stype RETURN. Printing will then commence.} }=R - REPLACE FIELD. This option will replace a field with aB constant value. Which records will have a field replaced d} epends upon ,your selection criteria.6 wT - TOTAL SELECTED RECORDS. If you merely want to see how many| r}@ecords in your database meet your selection criteria, use thisE option. ULTRAFILER will check each record in the databa}C se and show ,the total on the screen.6 xU - UNDELETE A DELETED RECORD. This option will, if any deleted} }Grecords are in your database, allow you to reuse one record's space. L You will be led through a series of prompts simil} ar to the ADDL ^ULTRAFILER/COLE/10bbg qroutine.{ C }=- CHARACTER SCAN. This option will search every field in aB record for a specified character string. Which records get} searched 7depends upon your selection criteria.A W - WRITE SUB FILE. This is an option to write out a subset} of Jyour existing data base to a new data base. Which records getO selected depends upon your selection criteria.} ULTRAFILER will write athe subfiles to Drive #1 and name the new files "SUBFILE.DEF" andf "SUBFILE.DAT". You may}- rename your new subfiles with DOS. If you2 wonly have a 1 drive system, make sure your data diskette has enough| r} Generally, when a YES/NO question is asked, a "Y" is interprete}d Las a YES; otherwise anything else is interpreted as a NO. In mostQ cases when you are asked for a field length,} just typing RETURN will Cassume the maximum defined length.M The proper control characters for regular and co}ndensed print Zshould be placed in the variables REG$ and COND$ in line 1045 of the_ INQUIRE module. The values sho}&wn are for the Atari XMM801 printer.1 pTo avoid the annoying delay of having a routine poke in machinez }2 DULTRAFILER/COLE/12HHM language, the ML sort routine and the search rou}tine are included in a dstring. This, however, makes it rather hard to type in those lines. i The SORT and the SEA}2RCH programs will, when run, write out the lines7 for the ML routines as an ATASCII file. You can then load the INQUIRE}C Omodule and type ENTER "D:SORT.LST" and ENTER "D:SEARCH.LST. The linesT containing the machine language routines }will be merged. Both machine$ alanguage routines were published in older issues of Computek Since the INQUIRE }0needs every character of memory it can get for5 the key file, REM statements have been eliminated. On a 48K or larger} Csystem, you should have about 14500 characters for the keys.M The MENU program has two pokes which disable the} BREAK key on \REV. B ROM's and later. If you have an early model, you should deletea mthat line.x Final} EF MN UV]^efmnuv}!}  !()0189@AHIOQWY_agi oq!wy"}!}# $%&"$'*,(24):<*BD+JL,RT-[\.cd/kl0st1{2!}C3 456&'7./8679>?:FG;NOfg?no@vwA}!}B CDE!"F)*G12H9:IABJIJKQRLYZMabNijOqrPyQ!}R STU$%V,-W45X<=YDEZLM[TU\\]]de^lm_tu`|a!}bcd e'(f.0g68h>@iFHjNPkWXl_`mghnn ##Ԡ!}.ΠǠś!!Π٠Ҡ4 c$$Ƞ UPDATED 02/24/90('6-A@g6-A@0'6-AQ !}2 <6- 6-@$,'6-@0836-@<D?6-@HPK6-@T\W6-@`hc6-@lto6-@x{6-"}@ 6-@6-@'6-@+36-@7?6-@CK6-@OZFW6-@^f6-@jr'6-@v36-A"}r?6-AK6-AVQ6-W6-P..;AS,;,;,;,;,;,;,Z::;AS,;,;@@v,;,"};@ J,;,;,dI 6. 67AS,. %67,..6.>:,@67@@Nq,.>:,I67,.i' 6.>:,67@ u,.>:,'"}L67,.nE:xC+%6-F:A`,%$F:Aa,%3&@qP;%C0 ) -)(ENTER TO"}6DAYS DATE AS  -(B201:0M)3123199'-@ Q8( INVALID DATEB A0, -,(DO "}YOU ONLY HAVE 1 DISK DRIVE? -( 4Y)4N A Ap& -&(ENTER DATABASE FILE NAME"} -( B:,! AP` 4Y6.1 4N6.2 AF` APP1 -1(RE"}ADY DISKETTE IN DRIVE  ĭ"# -( PRESS RETURN #,6 A0@% )67B:,%,.>:"}ǯ,% A JF:,A6 APPT ^6-$@:7,,%@:7,,h6-@:7,,r6-$@:7,,%@:7,,|6-$@:" }r7,,%@:7,,67<,.7<, ;%,4( AF (0(PRESS RETURN TO CONTINUE4 '6-@v6-" }6-!6-'6- A@( " Ae&&( = TRANSFER ABOVE FIELD AS IS( = CHANGE ABOVE FIELD" }q( = DELETE ABOVE FIELD!!( = END FIELD DEFINITIONS( = ADD NEW FIELD(  4A A u 4" }C E A0 5 " A%3 4D6-%@9d!6-%)6-%3 A% 4T Ahy 4C A}" }  A%ҠĠӠӛ! 6-%67<,.>:,!6-%67<%,.7<%,6-@:7%,, 6-%"}J%!AU-@ @(MAXIMUM RECORD LENGTH EXCEEDEDJ A$$6-P:'AV,$6-&$AV.67,.>:,8"}S 6-%B67,.>:,L 6-%V67,.>:,` 6-%j 6-%K!@ W_-@ cA(!MAXIMUM NUMBER OF FIE"}LDS EXCEEDEDK A 6-%6-% A%ŠΠǠě ^'  -'(ENTER FIELD NAME"}7 %r -(|@B:, )B:,!-@ ;t6(INVALID FIELD NAME@ A0=7<,4 -@ x3("}INVALID FIELD NAME= A0 67,. 6-%67,.>:B:,, 6-%2 6.A A2BYPASS ASKING TYPE FO"}iR NOW' -'(ENTER FIELD TYPE - A OR N -(4A)4N A&-@ m&(INVALID FIE"}LD TYPE A@ 67,. 6-% - (ENTER FIELD LENGTH AP& -(0B )!A"} -@ M8(INVALID FIELD LENGTHB A:J%!AU-@ Q@(MAXIMUM RECORD LENGTH EXCEEDEDJ A"}D$6-P:'AV,$6-&$AVN67,.>:,X 6-%b67,.>:,l 6-%v67,.>:, 6-% 6-%"} A&-@ ^&(FIELD LENGTH ERROR  A 6-%K!@ bj-@ nA(!MAXIMUM NU"}MBER OF FIELDS EXCEEDEDK A)67<,.>:,6-%!6-%)6-% A%Ġנě R'  -"}O'(ENTER FIELD NAME %f -(p@B:, )B:,!-@ S6(INVALID FIELD NAME@ A!0z=7"}<,4 -@ 3(INVALID FIELD NAME= A!0 67,. 6-%67,.>:B:,, 6-%2 6.A A""}2BYPASS ASKING TYPE FOR NOW' -'(ENTER FIELD TYPE - A OR N -(4A)4N A"&-"}@ &(INVALID FIELD TYPE A"@ 67,. 6-% - (ENTER FIELD LENGTH A$P  -("}$ B )!A%-@ )e8(INVALID FIELD LENGTHB A#. J%!AU-@ i@(MAXIMUM RECORD "}GLENGTH EXCEEDEDJ A8 $6-P:'AV,$6-&$AVB 67,.>:,L 6-%V 67,.>:,` 6-%j 67,.>"}1:,t 6-%~ 6-% A$ &-@ 5v&(FIELD LENGTH ERROR   A# 6-% K!@ z-" }@ kA(!MAXIMUM NUMBER OF FIELDS EXCEEDEDK A A% ĠƠҠś  \o APPa  6"!}-&6-f 6.Dp 67B:,%,.z 67B:,%,.: 67B:,%,. 67B:,%,..DAT  !!""} D:SUBFILE.DAT A8d  6-6-  ! 6. 67&,. !67,. -@hl@ p @:7,,"#}" A7  6-+&,$% 6-@:7,, 6-+&,$% 6-$@:7%,,%@:7%,, 6-@:7%,, 6-6-"$}M$@:7%,,%@:7%,,@:7%,, 6-@:7%,,$ 6-B''67<%&@Q^,.7<%&@b,t ~7<,4>:,"%}N A7P( -((REFORMATTING RECORD # % ( 6-% A5RF:,A6  AG 5 6."&} !@:,!@(56.>:@:,&@2,^,$>(>:A%,-%( ULTRAFILER1-@&b>(aF:BG"'}(,Ab*@@d,<B7t@d0vaŠˠ٠Ҡ̯Šӛ$ -(FIELD NAME| L"(}+ENGTH$   6-1(1(&# NAME1 8LEN #= ANAMEF LEN ! AAp6-+&,$%##( 7<")}%, @:7%,," %!(  AAp, 6-%6-+&,$%6""( 7<%, @:7%,,@ 6-% AA"*}WJ(( FIELD # = %$ 2(Š 2( Ԡ 7<,/(^ &/(̠ "+}Dz*$4 6.D>67B:,%,.H67B:,%,.:R67B:,%,.\67B:,%,..DEFf$p   ",} D:SUBFILE.DEF67<,.67<,.6-P:+,',6-&$67<,.>:,67<,.>:,67<,.>:,"-}Ǭ6-P:+,',6-&$67<,.>:,67<,.>:,6-P:+,',6-&$67<,.>:,67<,.>:, ".}    ( ( AF #F:,Ae*F:,Ap# . -F:,"Ae.(INVALID FILE N"/}AME7F:,"Ae((INVALID FILE NAME-7 AR+(#THAT FILE NAME NOT ON THIS DISKETTER( INSERT PROPER DISKE"0}GTTE ON DRIVE (ҭ CORRECT FILENAME AAA(ҠF:,ӠĠԠF:A,$%F:A"1}1G,  (CONSULT REFERENCE MANUAL  D:REFORMATF:,ӠĠԠF:A,$%F:A PEE