JKANUMFLDFLDNFNLINANSRINFILTTLCHGNUCHGFLDFNCTTYPETYPEFLNAMLCRITPSRCHFLCHGFLSRCHFLDCHGSEBYTINPTSTSRCSTCHLNGTHSRCLNGTHCHRQUERXSTYPELINFLD1FLD2LNTERERLIIDXFLIDXIDXIDXDEIDNUMFLDSFLDLNGTLNGHTCHDRIVEOUTFILQUTMAXLENUMFTSOTHETYCPPASSTARLINESCRSCRSRCXXTESTSPACESPAC@  !"#$%&'()*+,-./0@123456789@:;<=>?@ABC@DEFGHIJKll*REPRINTED IN ACE NEWSLETTER FEB '85 3662 VINE MAPLE DR EUGENE, OR 97405 *""**************************** DIF COVERSION FILE UTILITYBY DAVID FULLER 9/6/84ATARI ANONYMOUS OF RIUSER'S GROUP72 CRYSTAL DRWARWICK, RI 02889""****************************  A A@(}ԠŠŠ!!( by David Fuller(*(&( How many Drives (1 or 2) *2# @)!@# @@<(-@@((1. FilemanagerF(2. OtherP#((Enter Type of File #Z01*02 @`d! 426-@! An6-@x(((( Insert Filemanager Data Disk-)( in Drive 1 and press Π-- (}()( Files on the Disk-(-6.D1:*.*-@@4@47@<@,4FREEAM7@<@,4DATM(7@<@, 7@<@, A`U@(.( Which File to Convert 9( =F6.D:U67@,.67B:,%@,..FMT ԠĠ٠Ӡ (}AR @@@@6-3-@@'68,--!36- 6-"L@6-B:,/67&@<,..IDXL@@,@6-&@6B-@@$@( 5@B@@D6-6-@868@<@,-@D6-J -@ 68,-T=8,!A*8, A.68,-@=68,-@V58,!A&68,-8,&A568,-Y6-%8,^6-P:8,'@%,h&"8,'@%6-%& Ar6-%@|f"@ (68<@,-&@66-%@B6-S68<@,-\6-8,f A\!AU(68<@,-&@66-%@B6-S68<@,-\6-8, 68<@,-S(S(File >:@4,7@:@4, has  records( Screen(s)( Field names+(6-6-@+6-@/!-@$@@/6-%@56-%@"@)6-@ 56-@"@6-@! -!(. 7<%@, -@@(,(( Is this the right File (Y/N) , 0Y%,(((How many records to convert ,!6-@ !6-@6-@67B:,&@,.DAT&ŠƠŠ0F(&( Enter name of output fileB( up to 8 characters F:V 6.D67@,.=:,.67@,.:=67@,.V67B:,%@,..DIFD"@ AN#(#(Insert Desitnation disk X-)( in Drive 2 and press Π-b% (}(%( Processing...l+-@@+(Total Records: vC-@@"(Field: 4-@@C( Record #:6.>:@4, @@#"@*!@# A:@+@@:@@6-(@TABLE'(@0,16(@K(@VECTORSj(@0,=:&%@,y(@(@TUPLES'(@0,=:,'(@5(@DATA&(@0,05(@-@/"@!-@@%(/ A`7-@@7(7$@&@<$@,&(@-1,0&(@BOT6-%8,  - -@@ (  '6-6-@'6-*@/7-@:7@<@,,"AU*"@7 A1^-@:7@<@,,"AU*!@C-@&@P@T ^ A4S# 8<@,)!8<@,.6-%B:,;@I6-%@S A >S8," A.(@-1,0S(@7&&8,%@<,HL8,"@=(@0,A:7&&8,%@<&,,L(@VR* -%@&@* f p "@z@ 1(@-1,0&(@EOD1@ " A i( (4(&Do you want to convert the rest of theD( records Hi7@<@,0YA @6-%@6-R"@(3(Insert new destination disk N( and press Π R (} A`$-@@!( Š$ԠҠŠϠ% (}%( Convert Other File(($(How many Fields in File (,(%(How many Records in File ),(/(((How many records to convert ,/(  6-@-@$&(Length Field #&68,-.p'(Type of Field [tring/umber] +[7@<@,0S*7@<@,0Nf(S OR Np Ap857@<@,4N+68,-@5 AB68,-L Qp6--@(6-%8,, 8!AU;(Y(Record length longer thanm( 255 characterspSC6-@,68@<@,-@C68@<@,-V) (}(%( # Length Type)(`/-@/(  8, j8,"(Stringt8,"@(Number~   (Q(*(Are all entries Correct (Y/N) .G7@<@,0YQ AK (}(,(Enter name of Source FileG( example: TEST.DAT K 6.D:67@,.6-@ (} A`[6-F:A,46-F:A,%AV$F:A,7([( Ҡ ԠŠ-()( Press Π to continue -%ԠРӠ< (};@4,<6. ԠϠƠŠ٠hh;AU,;@,;A@,;@@,;@,;@@,;@,;@,;@,{{;AU,;AU,;@,;@,;AU,;AU,9@ ,9@ ,9@<@,;AU,V.6.$------------------------------------2(>6-J6-@V6-@ $'6.7&&8,%@<&,'6-&-B:,@6@(7<,0 '$-6-&@2 6-%@$D:DIFCONVT.BAS