/ Run Magazine ReRun 1987 July & August / rerun-1987-07-08.d64 / dfclone

next >

view JSON data

view as text

open on a Mac

open on a PC

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 01 1c 22 1c 02 00 8b 46 | 4c b2 30 a7 46 4c b2 31 |.."....F|L.0.FL.1|
|00000010| 3a 93 22 44 50 5d 20 44 | 4f 53 35 2e 31 22 2c 38 |:."DP] D|OS5.1",8|
|00000020| 2c 31 00 3d 1c 03 00 8b | 46 4c b2 31 a7 46 4c b2 |,1.=....|FL.1.FL.|
|00000030| 32 3a 9e 35 32 32 32 34 | 3a 46 4c b2 30 00 80 1c |2:.52224|:FL.0...|
|00000040| 05 00 8f 20 44 41 54 41 | 46 49 4c 45 20 55 54 49 |... DATA|FILE UTI|
|00000050| 4c 49 54 59 20 50 52 4f | 47 52 41 4d 20 44 46 43 |LITY PRO|GRAM DFC|
|00000060| 4c 4f 4e 45 20 31 2e 32 | 41 28 43 29 31 39 38 36 |LONE 1.2|A(C)1986|
|00000070| 20 42 59 20 4d 49 4b 45 | 20 4b 4f 4e 53 48 41 4b | BY MIKE| KONSHAK|
|00000080| 00 9f 1c 0a 00 97 35 33 | 32 38 30 2c 37 3a 97 35 |......53|280,7:.5|
|00000090| 33 32 38 31 2c 30 3a 99 | 22 9e 22 3a 89 35 35 00 |3281,0:.|".":.55.|
|000000a0| aa 1c 0f 00 8f 2d 2d 47 | 45 54 00 bc 1c 14 00 a1 |.....--G|ET......|
|000000b0| 41 24 3a 8b 41 24 b2 22 | 22 a7 32 30 00 c2 1c 19 |A$:.A$."|".20....|
|000000c0| 00 8e 00 d4 1c 1e 00 8f | 2d 2d 44 49 53 4b 20 45 |........|--DISK E|
|000000d0| 52 52 4f 52 00 01 1d 23 | 00 84 31 35 2c 45 4e 2c |RROR...#|..15,EN,|
|000000e0| 45 4d 24 2c 45 54 2c 45 | 53 3a 8b 28 45 4e b3 32 |EM$,ET,E|S:.(EN.2|
|000000f0| 30 29 b0 28 45 4e b2 36 | 32 29 a7 45 54 b2 30 3a |0).(EN.6|2).ET.0:|
|00000100| 8e 00 35 1d 28 00 99 22 | 11 20 12 96 44 49 53 4b |..5.(.."|. ..DISK|
|00000110| 20 45 52 52 4f 52 92 22 | 45 4e 22 9d 2c 20 22 45 | ERROR."|EN"., "E|
|00000120| 4d 24 22 2c 22 45 54 22 | 9d 2c 22 45 53 22 9e 22 |M$","ET"|.,"ES"."|
|00000130| 3a 45 54 b2 38 00 6d 1d | 2d 00 99 22 11 20 50 52 |:ET.8.m.|-..". PR|
|00000140| 45 53 53 20 12 41 4e 59 | 20 4b 45 59 92 20 54 4f |ESS .ANY| KEY. TO|
|00000150| 20 52 45 54 55 52 4e 20 | 54 4f 20 4d 45 4e 55 22 | RETURN |TO MENU"|
|00000160| 3a 8d 32 30 3a a0 35 3a | a0 31 35 3a 8e 00 7f 1d |:.20:.5:|.15:....|
|00000170| 32 00 8f 2d 2d 53 54 41 | 52 54 20 4d 45 4e 55 00 |2..--STA|RT MENU.|
|00000180| a7 1d 37 00 9c 3a 99 22 | 9e 93 20 12 20 20 20 44 |..7..:."|.. .   D|
|00000190| 43 4c 4f 4e 45 20 50 52 | 4f 47 52 41 4d 20 20 56 |CLONE PR|OGRAM  V|
|000001a0| 31 2e 32 41 20 20 22 00 | d6 1d 3c 00 99 22 11 99 |1.2A  ".|..<.."..|
|000001b0| 20 54 48 49 53 20 50 52 | 4f 47 52 41 4d 20 57 49 | THIS PR|OGRAM WI|
|000001c0| 4c 4c 20 43 4f 50 59 20 | 54 48 45 20 53 54 52 55 |LL COPY |THE STRU|
|000001d0| 43 54 55 52 45 22 00 02 | 1e 41 00 99 22 20 41 4e |CTURE"..|.A.." AN|
|000001e0| 44 20 52 45 43 4f 52 44 | 20 44 41 54 41 20 4f 46 |D RECORD| DATA OF|
|000001f0| 20 46 49 4c 45 53 20 43 | 52 45 41 54 45 44 20 42 | FILES C|REATED B|
|00000200| 59 22 00 2f 1e 46 00 99 | 22 20 54 48 45 20 9e 12 |Y"./.F..|" THE ..|
|00000210| 44 41 54 41 46 49 4c 45 | 92 99 20 44 41 54 41 42 |DATAFILE|.. DATAB|
|00000220| 41 53 45 20 4d 41 4e 41 | 47 45 4d 45 4e 54 22 00 |ASE MANA|GEMENT".|
|00000230| 58 1e 4b 00 99 22 20 53 | 59 53 54 45 4d 2c 20 57 |X.K.." S|YSTEM, W|
|00000240| 52 49 54 54 45 4e 20 42 | 59 20 4d 49 4b 45 20 4b |RITTEN B|Y MIKE K|
|00000250| 4f 4e 53 48 41 4b 2e 22 | 00 85 1e 50 00 99 22 11 |ONSHAK."|...P..".|
|00000260| 20 54 48 45 20 46 4f 4c | 4c 4f 57 49 4e 47 20 4f | THE FOL|LOWING O|
|00000270| 50 54 49 4f 4e 53 20 41 | 52 45 20 50 4f 53 53 49 |PTIONS A|RE POSSI|
|00000280| 42 4c 45 3a 22 00 b1 1e | 55 00 99 22 11 20 2a 20 |BLE:"...|U..". * |
|00000290| 43 4f 50 59 20 41 4c 4c | 20 4f 52 20 50 41 52 54 |COPY ALL| OR PART|
|000002a0| 20 4f 46 20 54 48 45 20 | 45 58 49 53 54 49 4e 47 | OF THE |EXISTING|
|000002b0| 22 00 d9 1e 5a 00 99 22 | 20 46 49 4c 45 20 41 53 |"...Z.."| FILE AS|
|000002c0| 20 49 53 20 49 4e 54 4f | 20 41 20 4e 45 57 20 46 | IS INTO| A NEW F|
|000002d0| 49 4c 45 20 57 49 54 48 | 22 00 f5 1e 5f 00 99 22 |ILE WITH|"..._.."|
|000002e0| 20 54 48 45 20 53 41 4d | 45 20 53 54 52 55 43 54 | THE SAM|E STRUCT|
|000002f0| 55 52 45 2e 22 00 21 1f | 64 00 99 22 11 20 2a 20 |URE.".!.|d..". * |
|00000300| 43 4f 50 59 20 41 4c 4c | 20 4f 52 20 50 41 52 54 |COPY ALL| OR PART|
|00000310| 20 4f 46 20 54 48 45 20 | 45 58 49 53 54 49 4e 47 | OF THE |EXISTING|
|00000320| 22 00 49 1f 69 00 99 22 | 20 46 49 4c 45 20 49 4e |".I.i.."| FILE IN|
|00000330| 54 4f 20 41 20 4e 45 57 | 20 46 49 4c 45 20 57 49 |TO A NEW| FILE WI|
|00000340| 54 48 20 41 20 4e 45 57 | 22 00 72 1f 6e 00 99 22 |TH A NEW|".r.n.."|
|00000350| 20 53 54 52 55 43 54 55 | 52 45 2e 28 23 20 41 4e | STRUCTU|RE.(# AN|
|00000360| 44 20 4e 41 4d 45 20 4f | 46 20 46 49 45 4c 44 53 |D NAME O|F FIELDS|
|00000370| 29 22 00 9e 1f 73 00 99 | 22 11 20 2a 20 43 4f 50 |)"...s..|". * COP|
|00000380| 59 20 46 49 4c 45 20 49 | 4e 54 4f 20 41 20 46 4f |Y FILE I|NTO A FO|
|00000390| 52 4d 20 43 4f 4d 50 41 | 54 49 42 4c 45 22 00 c8 |RM COMPA|TIBLE"..|
|000003a0| 1f 78 00 99 22 20 57 49 | 54 48 20 44 46 49 4c 45 |.x.." WI|TH DFILE|
|000003b0| 31 32 38 20 42 59 20 4d | 49 4b 45 20 4b 4f 4e 53 |128 BY M|IKE KONS|
|000003c0| 48 41 4b 20 46 4f 52 22 | 00 db 1f 7d 00 99 22 20 |HAK FOR"|...}.." |
|000003d0| 54 48 45 20 43 2d 31 32 | 38 2e 22 00 1a 20 82 00 |THE C-12|8.".. ..|
|000003e0| 99 22 11 11 99 20 50 52 | 45 53 53 20 12 05 43 99 |."... PR|ESS ..C.|
|000003f0| 92 4f 4e 54 49 4e 55 45 | 2c 20 12 05 24 99 92 20 |.ONTINUE|, ..$.. |
|00000400| 12 05 44 92 99 49 52 45 | 43 54 4f 52 59 20 4f 52 |..D..IRE|CTORY OR|
|00000410| 20 12 05 51 99 92 55 49 | 54 22 00 2c 20 87 00 8d | ..Q..UI|T"., ...|
|00000420| 32 30 3a 8b 41 24 b2 22 | 51 22 a7 80 00 4f 20 8c |20:.A$."|Q"...O .|
|00000430| 00 8b 41 24 b2 22 24 22 | b0 41 24 b2 22 34 22 b0 |..A$."$"|.A$."4".|
|00000440| 41 24 b2 22 44 22 a7 8d | 36 38 35 3a 89 35 35 00 |A$."D"..|685:.55.|
|00000450| 5f 20 91 00 8b 41 24 b2 | 22 43 22 a7 34 37 35 00 |_ ...A$.|"C".475.|
|00000460| 68 20 96 00 89 31 33 35 | 00 8e 20 9b 00 8f 2d 2d |h ...135|.. ...--|
|00000470| 50 52 49 4e 54 20 46 49 | 45 4c 44 20 49 4e 46 4f |PRINT FI|ELD INFO|
|00000480| 20 46 4f 52 20 52 45 46 | 45 52 45 4e 43 45 00 b5 | FOR REF|ERENCE..|
|00000490| 20 a0 00 99 22 99 93 20 | 12 46 49 45 4c 44 20 4e | ...".. |.FIELD N|
|000004a0| 41 4d 45 28 4c 45 4e 47 | 54 48 29 20 46 4f 52 20 |AME(LENG|TH) FOR |
|000004b0| 9e 22 4e 46 24 00 d1 20 | a5 00 4f 45 b2 31 3a 8b |."NF$.. |..OE.1:.|
|000004c0| 28 46 ad 32 29 b2 b5 28 | 46 ad 32 29 a7 4f 45 b2 |(F.2)..(|F.2).OE.|
|000004d0| 30 00 ea 20 aa 00 4f 46 | b2 b5 28 46 ad 32 29 3a |0.. ..OF|..(F.2):|
|000004e0| 81 49 b2 31 a4 4f 46 aa | 4f 45 00 05 21 af 00 99 |.I.1.OF.|OE..!...|
|000004f0| 22 20 12 05 22 49 22 99 | 92 22 46 24 28 49 29 4c |" .."I".|."F$(I)L|
|00000500| 25 28 49 29 3b 00 13 21 | b4 00 8b 4f 45 b2 31 a7 |%(I);..!|...OE.1.|
|00000510| 31 39 30 00 3e 21 b9 00 | 99 a3 31 39 29 22 12 05 |190.>!..|..19)"..|
|00000520| 22 49 aa 4f 46 22 99 92 | 22 46 24 28 49 aa 4f 46 |"I.OF"..|"F$(I.OF|
|00000530| 29 4c 25 28 49 aa 4f 46 | 29 3a 89 31 39 35 00 72 |)L%(I.OF|):.195.r|
|00000540| 21 be 00 8b 49 aa 4f 46 | b3 46 a7 99 a3 31 39 29 |!...I.OF|.F...19)|
|00000550| 22 05 12 22 49 aa 4f 46 | aa 31 22 99 92 22 46 24 |".."I.OF|.1".."F$|
|00000560| 28 49 aa 4f 46 aa 31 29 | 4c 25 28 49 aa 4f 46 aa |(I.OF.1)|L%(I.OF.|
|00000570| 31 29 00 7b 21 c3 00 82 | 49 3a 8e 00 a4 21 c8 00 |1).{!...|I:...!..|
|00000580| 99 22 9e 22 52 22 99 52 | 45 43 4f 52 44 53 20 50 |."."R".R|ECORDS P|
|00000590| 4f 53 53 49 42 4c 45 20 | 49 4e 20 4f 4c 44 20 46 |OSSIBLE |IN OLD F|
|000005a0| 49 4c 45 22 00 cc 21 cd | 00 99 22 9e 22 58 22 99 |ILE"..!.|.."."X".|
|000005b0| 52 45 43 4f 52 44 53 20 | 43 55 52 52 45 4e 54 4c |RECORDS |CURRENTL|
|000005c0| 59 20 50 52 45 53 45 4e | 54 22 3a 8e 00 e1 21 d2 |Y PRESEN|T":...!.|
|000005d0| 00 8f 2d 2d 43 48 4f 4f | 53 45 20 4f 50 54 49 4f |..--CHOO|SE OPTIO|
|000005e0| 4e 00 07 22 d7 00 8d 31 | 36 30 3a 8d 32 30 30 3a |N.."...1|60:.200:|
|000005f0| 99 22 11 20 9e 12 43 52 | 45 41 54 45 20 4e 45 57 |.". ..CR|EATE NEW|
|00000600| 20 46 49 4c 45 3a 22 00 | 43 22 dc 00 99 22 99 11 | FILE:".|C"..."..|
|00000610| 43 4c 4f 4e 45 20 53 54 | 52 55 43 54 55 52 45 20 |CLONE ST|RUCTURE |
|00000620| 41 53 20 41 42 4f 56 45 | 3f 20 12 05 59 99 92 45 |AS ABOVE|? ..Y..E|
|00000630| 53 20 12 05 4e 99 92 4f | 20 12 05 45 99 92 58 49 |S ..N..O| ..E..XI|
|00000640| 54 9e 22 00 57 22 e1 00 | 8d 32 30 3a 8b 41 24 b2 |T.".W"..|.20:.A$.|
|00000650| 22 59 22 a7 32 34 35 00 | 67 22 e6 00 8b 41 24 b2 |"Y".245.|g"...A$.|
|00000660| 22 4e 22 a7 32 35 35 00 | 77 22 eb 00 8b 41 24 b2 |"N".255.|w"...A$.|
|00000670| 22 45 22 a7 31 33 30 00 | 80 22 f0 00 89 32 32 35 |"E".130.|."...225|
|00000680| 00 bc 22 f5 00 46 30 b2 | 46 3a 81 49 b2 31 a4 46 |.."..F0.|F:.I.1.F|
|00000690| 3a 46 30 24 28 49 29 b2 | 46 24 28 49 29 3a 4c 30 |:F0$(I).|F$(I):L0|
|000006a0| 25 28 49 29 b2 4c 25 28 | 49 29 3a 4d 4c 28 49 2c |%(I).L%(|I):ML(I,|
|000006b0| 31 29 b2 49 3a 82 49 3a | 89 37 38 35 00 d3 22 fa |1).I:.I:|.785..".|
|000006c0| 00 8f 2d 2d 43 52 45 41 | 54 45 20 4e 45 57 20 46 |..--CREA|TE NEW F|
|000006d0| 49 4c 45 00 02 23 ff 00 | 8d 31 36 30 3a 99 22 99 |ILE..#..|.160:.".|
|000006e0| 11 20 4e 55 4d 42 45 52 | 20 4f 46 20 46 49 45 4c |. NUMBER| OF FIEL|
|000006f0| 44 53 20 50 45 52 20 52 | 45 43 4f 52 44 9e 3f 22 |DS PER R|ECORD.?"|
|00000700| 46 30 00 1e 23 04 01 99 | 22 91 22 a3 32 38 29 3b |F0..#...|".".28);|
|00000710| 3a 85 46 30 3a 8b 46 30 | b2 30 a7 31 33 30 00 3a |:.F0:.F0|.0.130.:|
|00000720| 23 09 01 81 49 b2 31 a4 | 46 30 3a 99 22 11 20 99 |#...I.1.|F0:.". .|
|00000730| 12 46 49 45 4c 44 23 9e | 22 49 00 66 23 0e 01 99 |.FIELD#.|"I.f#...|
|00000740| 22 20 99 12 54 49 54 4c | 45 92 20 20 20 9e 3f 20 |" ..TITL|E.   .? |
|00000750| 22 46 30 24 28 49 29 22 | 20 20 20 20 20 20 20 20 |"F0$(I)"|        |
|00000760| 20 20 20 20 20 22 00 8b | 23 13 01 99 22 20 99 12 |     "..|#..." ..|
|00000770| 4c 45 4e 47 54 48 92 20 | 20 9e 3f 22 4c 30 25 28 |LENGTH. | .?"L0%(|
|00000780| 49 29 22 9d 20 20 20 20 | 20 20 22 00 a1 23 18 01 |I)".    |  "..#..|
|00000790| 99 22 91 91 22 a3 39 29 | 3b 3a 85 46 30 24 28 49 |."..".9)|;:.F0$(I|
|000007a0| 29 00 c1 23 1d 01 99 a3 | 39 29 3b 3a 85 4c 30 25 |)..#....|9);:.L0%|
|000007b0| 28 49 29 3a 8b 4c 30 25 | 28 49 29 b2 30 a7 32 31 |(I):.L0%|(I).0.21|
|000007c0| 35 00 d1 23 22 01 99 22 | 91 91 91 91 91 22 3a 82 |5..#".."|.....":.|
|000007d0| 49 00 ec 23 27 01 8f 2d | 2d 43 41 4c 43 55 4c 41 |I..#'..-|-CALCULA|
|000007e0| 54 45 20 23 20 52 45 43 | 4f 52 44 53 00 0a 24 2c |TE # REC|ORDS..$,|
|000007f0| 01 4d 28 31 29 b2 32 39 | 32 39 33 3a 4d 28 32 29 |.M(1).29|293:M(2)|
|00000800| b2 36 30 30 30 30 3a 43 | b2 30 00 1d 24 31 01 43 |.60000:C|.0..$1.C|
|00000810| b2 43 aa 31 3a 8b 43 b2 | 33 a7 33 33 35 00 2e 24 |.C.1:.C.|3.335..$|
|00000820| 36 01 52 4c b2 30 3a 81 | 4a b2 30 a4 46 30 00 3f |6.RL.0:.|J.0.F0.?|
|00000830| 24 3b 01 52 4c b2 52 4c | aa 4c 30 25 28 4a 29 00 |$;.RL.RL|.L0%(J).|
|00000840| 46 24 40 01 82 4a 00 5b | 24 45 01 52 4c b2 52 4c |F$@..J.[|$E.RL.RL|
|00000850| aa 33 ac 28 46 30 aa 31 | 29 aa 35 00 86 24 4a 01 |.3.(F0.1|).5..$J.|
|00000860| 4e 52 28 43 29 b2 b5 28 | 28 4d 28 43 29 ab 31 32 |NR(C)..(|(M(C).12|
|00000870| ac 28 46 30 aa 31 29 ab | 32 31 30 30 29 ad 52 4c |.(F0.1).|2100).RL|
|00000880| 29 3a 89 33 30 35 00 af | 24 4f 01 99 22 99 93 11 |):.305..|$O.."...|
|00000890| 20 59 4f 55 52 20 53 45 | 4c 45 43 54 49 4f 4e 53 | YOUR SE|LECTIONS|
|000008a0| 20 57 49 4c 4c 20 41 4c | 4c 4f 57 3a 11 9e 22 00 | WILL AL|LOW:..".|
|000008b0| d8 24 54 01 99 4e 52 28 | 31 29 22 99 52 45 43 4f |.$T..NR(|1)".RECO|
|000008c0| 52 44 53 20 49 4e 20 41 | 20 43 2d 36 34 20 43 4f |RDS IN A| C-64 CO|
|000008d0| 4d 50 55 54 45 52 9e 22 | 00 01 25 59 01 99 4e 52 |MPUTER."|..%Y..NR|
|000008e0| 28 32 29 22 99 52 45 43 | 4f 52 44 53 20 49 4e 20 |(2)".REC|ORDS IN |
|000008f0| 41 20 43 2d 31 32 38 20 | 43 4f 4d 50 55 54 45 52 |A C-128 |COMPUTER|
|00000900| 22 00 3c 25 5e 01 99 22 | 11 20 50 52 45 53 53 20 |".<%^.."|. PRESS |
|00000910| 12 05 52 99 92 45 4a 45 | 43 54 20 4f 52 20 41 43 |..R..EJE|CT OR AC|
|00000920| 43 45 50 54 20 12 05 31 | 99 92 20 43 36 34 20 20 |CEPT ..1|.. C64  |
|00000930| 12 05 32 99 92 20 43 31 | 32 38 9e 22 00 50 25 63 |..2.. C1|28.".P%c|
|00000940| 01 8d 32 30 3a 8b 41 24 | b2 22 52 22 a7 32 35 35 |..20:.A$|."R".255|
|00000950| 00 6a 25 68 01 8b 41 24 | b2 22 31 22 a7 4e 52 b2 |.j%h..A$|."1".NR.|
|00000960| 4e 52 28 31 29 3a 89 33 | 38 30 00 84 25 6d 01 8b |NR(1):.3|80..%m..|
|00000970| 41 24 b2 22 32 22 a7 4e | 52 b2 4e 52 28 32 29 3a |A$."2".N|R.NR(2):|
|00000980| 89 33 38 30 00 8d 25 72 | 01 89 33 35 35 00 a1 25 |.380..%r|..355..%|
|00000990| 77 01 8f 2d 2d 43 4c 4f | 4e 45 20 46 49 45 4c 44 |w..--CLO|NE FIELD|
|000009a0| 53 00 d5 25 7c 01 8d 31 | 36 30 3a 99 22 99 11 20 |S..%|..1|60:.".. |
|000009b0| 55 50 20 54 4f 20 54 48 | 52 45 45 20 4f 46 20 54 |UP TO TH|REE OF T|
|000009c0| 48 45 20 4f 4c 44 20 46 | 49 45 4c 44 53 20 4d 41 |HE OLD F|IELDS MA|
|000009d0| 59 20 42 45 22 00 02 26 | 81 01 99 22 20 43 4f 4d |Y BE"..&|..." COM|
|000009e0| 42 49 4e 45 44 20 49 4e | 54 4f 20 4f 4e 45 20 4f |BINED IN|TO ONE O|
|000009f0| 46 20 54 48 45 20 4e 45 | 57 20 46 49 45 4c 44 53 |F THE NE|W FIELDS|
|00000a00| 2e 22 00 2e 26 86 01 99 | 22 11 20 45 4e 54 45 52 |."..&...|". ENTER|
|00000a10| 20 46 49 45 4c 44 53 20 | 54 4f 20 42 45 20 43 4c | FIELDS |TO BE CL|
|00000a20| 4f 4e 45 44 20 49 4e 54 | 4f 20 4e 45 57 22 00 5d |ONED INT|O NEW".]|
|00000a30| 26 8b 01 99 22 20 46 49 | 4c 45 20 41 53 20 50 52 |&..." FI|LE AS PR|
|00000a40| 4f 4d 50 54 45 44 2e 20 | 45 4e 54 45 52 20 12 05 |OMPTED. |ENTER ..|
|00000a50| 30 99 92 20 54 4f 20 4c | 45 41 56 45 22 00 77 26 |0.. TO L|EAVE".w&|
|00000a60| 90 01 99 22 20 4e 45 57 | 20 46 49 45 4c 44 20 45 |..." NEW| FIELD E|
|00000a70| 4d 50 54 59 2e 11 22 00 | 8a 26 95 01 81 49 b2 31 |MPTY..".|.&...I.1|
|00000a80| a4 46 30 3a 81 4a b2 31 | a4 33 00 b9 26 9a 01 99 |.F0:.J.1|.3..&...|
|00000a90| 22 20 12 99 4e 45 57 20 | 46 49 45 4c 44 92 9e 22 |" ..NEW |FIELD.."|
|00000aa0| 49 3b a3 31 35 29 46 30 | 24 28 49 29 22 20 20 20 |I;.15)F0|$(I)"   |
|00000ab0| 20 20 20 20 20 20 20 11 | 22 00 ee 26 9f 01 81 4a |       .|"..&...J|
|00000ac0| b2 31 a4 33 3a 99 22 20 | 99 12 4f 4c 44 20 46 49 |.1.3:." |..OLD FI|
|00000ad0| 45 4c 44 92 9e 22 4a 3b | a3 31 32 29 22 3f 20 30 |ELD.."J;|.12)"? 0|
|00000ae0| 9d 9d 22 4d 4c 28 49 2c | 4a 29 22 20 20 22 00 05 |.."ML(I,|J)"  "..|
|00000af0| 27 a4 01 99 22 91 22 a3 | 31 33 29 3b 3a 85 4d 4c |'...".".|13);:.ML|
|00000b00| 28 49 2c 4a 29 00 1c 27 | a9 01 99 22 91 91 22 3a |(I,J)..'|..."..":|
|00000b10| 82 4a 3a 99 22 91 91 91 | 22 3a 82 49 00 4f 27 ae |.J:."...|":.I.O'.|
|00000b20| 01 99 22 93 20 99 12 49 | 53 20 54 48 49 53 20 54 |..". ..I|S THIS T|
|00000b30| 48 45 20 49 4e 54 45 4e | 44 45 44 20 43 4c 4f 4e |HE INTEN|DED CLON|
|00000b40| 45 3f 92 20 12 05 59 92 | 20 12 4e 92 11 99 22 00 |E?. ..Y.| .N...".|
|00000b50| 83 27 b3 01 99 22 20 12 | 99 4e 45 57 20 46 49 4c |.'..." .|.NEW FIL|
|00000b60| 45 20 20 20 20 92 20 20 | 20 20 12 4f 4c 44 20 46 |E    .  |  .OLD F|
|00000b70| 49 4c 45 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |ILE     |        |
|00000b80| 92 11 22 00 af 27 b8 01 | 81 49 b2 31 a4 46 30 3a |.."..'..|.I.1.F0:|
|00000b90| 99 22 05 22 49 22 9e 22 | 46 30 24 28 49 29 a3 31 |."."I"."|F0$(I).1|
|00000ba0| 32 29 22 99 3d 99 22 3b | 3a 81 4a b2 31 a4 33 00 |2)".=.";|:.J.1.3.|
|00000bb0| d8 27 bd 01 8b 4d 4c 28 | 49 2c 4a 29 b3 b1 30 a7 |.'...ML(|I,J)..0.|
|00000bc0| 99 22 9e 12 22 46 24 28 | 4d 4c 28 49 2c 4a 29 29 |.".."F$(|ML(I,J))|
|00000bd0| 22 92 20 22 3b 3a 82 4a | 00 e1 27 c2 01 99 3a 82 |". ";:.J|..'...:.|
|00000be0| 49 00 f5 27 c7 01 8d 32 | 30 3a 8b 41 24 b2 22 4e |I..'...2|0:.A$."N|
|00000bf0| 22 a7 33 38 30 00 05 28 | cc 01 8b 41 24 b2 22 59 |".380..(|...A$."Y|
|00000c00| 22 a7 37 38 35 00 0e 28 | d1 01 89 34 35 35 00 2e |".785..(|...455..|
|00000c10| 28 d6 01 8f 2d 2d 4f 50 | 45 4e 20 46 49 4c 45 20 |(...--OP|EN FILE |
|00000c20| 2d 20 52 45 41 44 20 52 | 45 43 4f 52 44 53 00 63 |- READ R|ECORDS.c|
|00000c30| 28 db 01 9c 3a 99 22 9e | 93 20 12 20 20 20 20 20 |(...:.".|. .     |
|00000c40| 20 20 43 4c 4f 4e 45 20 | 44 41 54 41 46 49 4c 45 |  CLONE |DATAFILE|
|00000c50| 20 52 45 43 4f 52 44 20 | 46 49 4c 45 20 20 20 20 | RECORD |FILE    |
|00000c60| 20 92 22 00 97 28 e0 01 | 99 22 99 11 20 49 4e 53 | ."..(..|.".. INS|
|00000c70| 45 52 54 20 44 49 53 4b | 20 43 4f 4e 54 41 49 4e |ERT DISK| CONTAIN|
|00000c80| 49 4e 47 20 54 48 45 20 | 9e 4f 4c 44 99 20 44 41 |ING THE |.OLD. DA|
|00000c90| 54 41 46 49 4c 45 22 00 | d5 28 e5 01 99 22 20 52 |TAFILE".|.(..." R|
|00000ca0| 45 43 4f 52 44 20 46 49 | 4c 45 20 54 4f 20 42 45 |ECORD FI|LE TO BE|
|00000cb0| 20 9e 43 4c 4f 4e 45 44 | 99 2e 22 3a 99 22 11 20 | .CLONED|..":.". |
|00000cc0| 50 52 45 53 53 20 05 12 | 41 4e 59 20 4b 45 59 99 |PRESS ..|ANY KEY.|
|00000cd0| 22 3a 8d 32 30 00 07 29 | e7 01 99 22 93 99 41 56 |":.20..)|..."..AV|
|00000ce0| 41 49 4c 41 42 4c 45 20 | 52 45 43 4f 52 44 20 46 |AILABLE |RECORD F|
|00000cf0| 49 4c 45 53 20 41 52 45 | 3a 9e 11 22 3a 40 22 24 |ILES ARE|:..":@"$|
|00000d00| 30 3a 44 46 5d 2a 22 00 | 3a 29 ea 01 99 22 11 99 |0:DF]*".|:)..."..|
|00000d10| 50 52 45 53 53 20 12 05 | 52 45 54 55 52 4e 92 99 |PRESS ..|RETURN..|
|00000d20| 20 57 49 54 48 4f 55 54 | 20 41 4e 20 45 4e 54 52 | WITHOUT| AN ENTR|
|00000d30| 59 20 54 4f 20 45 58 49 | 54 22 00 66 29 ef 01 85 |Y TO EXI|T".f)...|
|00000d40| 22 11 20 4e 41 4d 45 20 | 4f 46 20 44 41 54 41 46 |". NAME |OF DATAF|
|00000d50| 49 4c 45 20 9e 22 3b 4e | 46 24 3a 8b 4e 46 24 b2 |ILE .";N|F$:.NF$.|
|00000d60| 22 22 a7 31 33 30 00 9c | 29 f4 01 9f 31 35 2c 38 |"".130..|)...15,8|
|00000d70| 2c 31 35 3a 9f 35 2c 38 | 2c 35 2c 22 30 3a 44 46 |,15:.5,8|,5,"0:DF|
|00000d80| 5d 20 22 aa 4e 46 24 aa | 22 2c 53 2c 52 22 3a 8d |] ".NF$.|",S,R":.|
|00000d90| 33 35 3a 8b 45 54 b2 38 | a7 31 33 30 00 b0 29 f9 |35:.ET.8|.130..).|
|00000da0| 01 8b 45 4e b2 36 32 a7 | 8d 34 30 3a 89 31 33 30 |..EN.62.|.40:.130|
|00000db0| 00 d0 29 fe 01 84 35 2c | 52 2c 46 2c 58 3a 4e 52 |..)...5,|R,F,X:NR|
|00000dc0| b2 52 3a 8d 33 35 3a 8b | 45 54 b2 38 a7 31 33 30 |.R:.35:.|ET.8.130|
|00000dd0| 00 1d 2a 03 02 86 20 4b | 25 28 52 aa 31 29 2c 46 |..*... K|%(R.1),F|
|00000de0| 24 28 46 aa 31 29 2c 4c | 25 28 46 aa 31 29 2c 52 |$(F.1),L|%(F.1),R|
|00000df0| 45 43 24 28 52 aa 31 2c | 46 aa 31 29 2c 46 30 24 |EC$(R.1,|F.1),F0$|
|00000e00| 28 33 31 29 2c 4c 30 25 | 28 33 31 29 2c 4d 4c 28 |(31),L0%|(31),ML(|
|00000e10| 33 31 2c 34 29 2c 52 43 | 24 28 33 31 29 00 48 2a |31,4),RC|$(31).H*|
|00000e20| 08 02 81 4e b2 31 a4 46 | 3a 84 35 2c 46 24 28 4e |...N.1.F|:.5,F$(N|
|00000e30| 29 2c 4c 25 28 4e 29 3a | 82 4e 3a 8d 33 35 3a 8b |),L%(N):|.N:.35:.|
|00000e40| 45 54 b2 38 a7 31 33 30 | 00 70 2a 0d 02 81 49 b2 |ET.8.130|.p*...I.|
|00000e50| 31 a4 58 3a 99 22 11 20 | 52 45 41 44 49 4e 47 20 |1.X:.". |READING |
|00000e60| 52 45 43 4f 52 44 20 23 | 22 3b 49 3b 22 91 91 22 |RECORD #|";I;".."|
|00000e70| 00 9e 2a 12 02 81 4e b2 | 31 a4 46 3a 84 35 2c 52 |..*...N.|1.F:.5,R|
|00000e80| 45 43 24 28 49 2c 4e 29 | 3a 82 4e 3a 82 49 3a 99 |EC$(I,N)|:.N:.I:.|
|00000e90| 3a 8d 33 35 3a 8b 45 54 | b2 38 a7 31 33 30 00 ae |:.35:.ET|.8.130..|
|00000ea0| 2a 17 02 a0 35 3a a0 31 | 35 3a 89 32 31 35 00 c6 |*...5:.1|5:.215..|
|00000eb0| 2a 1c 02 8f 2d 2d 53 41 | 56 45 20 43 4c 4f 4e 45 |*...--SA|VE CLONE|
|00000ec0| 44 20 46 49 4c 45 00 ff | 2a 21 02 43 52 24 b2 c7 |D FILE..|*!.CR$..|
|00000ed0| 28 31 33 29 3a 99 22 99 | 93 20 49 4e 53 45 52 54 |(13):.".|. INSERT|
|00000ee0| 20 54 48 45 20 44 49 53 | 4b 20 54 4f 20 52 45 43 | THE DIS|K TO REC|
|00000ef0| 45 49 56 45 20 54 48 45 | 20 46 49 4c 45 2e 22 00 |EIVE THE| FILE.".|
|00000f00| 2d 2b 26 02 99 22 20 45 | 4e 54 45 52 20 4e 41 4d |-+&.." E|NTER NAM|
|00000f10| 45 20 4f 46 20 9e 4e 45 | 57 99 20 43 4c 4f 4e 45 |E OF .NE|W. CLONE|
|00000f20| 44 20 46 49 4c 45 20 54 | 4f 20 42 45 22 00 5b 2b |D FILE T|O BE".[+|
|00000f30| 2b 02 99 22 20 53 41 56 | 45 44 20 28 31 32 20 43 |+.." SAV|ED (12 C|
|00000f40| 48 41 52 41 43 54 45 52 | 53 20 4d 41 58 29 2e 20 |HARACTER|S MAX). |
|00000f50| 49 46 20 54 48 45 20 4f | 4c 44 22 00 85 2b 30 02 |IF THE O|LD"..+0.|
|00000f60| 99 22 20 46 49 4c 45 20 | 4e 41 4d 45 20 49 53 20 |." FILE |NAME IS |
|00000f70| 43 48 4f 53 45 4e 2c 20 | 54 48 45 20 4f 4c 44 20 |CHOSEN, |THE OLD |
|00000f80| 46 49 4c 45 22 00 ab 2b | 35 02 99 22 20 57 49 4c |FILE"..+|5.." WIL|
|00000f90| 4c 20 42 45 20 52 45 4e | 41 4d 45 44 20 57 49 54 |L BE REN|AMED WIT|
|00000fa0| 48 20 9e 21 4f 4c 44 2e | 11 11 22 00 ce 2b 3a 02 |H .!OLD.|.."..+:.|
|00000fb0| 99 22 20 20 22 3b 46 46 | 24 3a 85 22 91 22 3b 46 |."  ";FF|$:.".";F|
|00000fc0| 46 24 3a 8b 46 46 24 b2 | 22 22 a7 32 31 35 00 f9 |F$:.FF$.|"".215..|
|00000fd0| 2b 3f 02 9f 31 35 2c 38 | 2c 31 35 3a 98 31 35 2c |+?..15,8|,15:.15,|
|00000fe0| 22 53 30 3a 44 46 5d 20 | 22 aa c8 28 46 46 24 2c |"S0:DF] |"..(FF$,|
|00000ff0| 38 29 aa 22 21 4f 4c 44 | 22 00 0b 2c 44 02 8d 33 |8)."!OLD|"..,D..3|
|00001000| 35 3a 8b 45 54 b2 38 a7 | 32 31 35 00 44 2c 49 02 |5:.ET.8.|215.D,I.|
|00001010| 98 31 35 2c 22 52 30 3a | 44 46 5d 20 22 aa c8 28 |.15,"R0:|DF] "..(|
|00001020| 46 46 24 2c 38 29 aa 22 | 21 4f 4c 44 3d 44 46 5d |FF$,8)."|!OLD=DF]|
|00001030| 20 22 aa 46 46 24 3a 8d | 33 35 3a 8b 45 54 b2 38 | ".FF$:.|35:.ET.8|
|00001040| a7 32 31 35 00 71 2c 4e | 02 9f 35 2c 38 2c 35 2c |.215.q,N|..5,8,5,|
|00001050| 22 30 3a 44 46 5d 20 22 | aa 46 46 24 aa 22 2c 53 |"0:DF] "|.FF$.",S|
|00001060| 2c 57 22 3a 8d 33 35 3a | 8b 45 54 b2 38 a7 32 31 |,W":.35:|.ET.8.21|
|00001070| 35 00 89 2c 53 02 98 35 | 2c 4e 52 3b 43 52 24 3b |5..,S..5|,NR;CR$;|
|00001080| 46 30 3b 43 52 24 3b 58 | 52 00 95 2c 58 02 81 4e |F0;CR$;X|R..,X..N|
|00001090| b2 31 a4 46 30 00 ae 2c | 5d 02 98 35 2c 46 30 24 |.1.F0..,|]..5,F0$|
|000010a0| 28 4e 29 3b 43 52 24 3b | 4c 30 25 28 4e 29 00 b6 |(N);CR$;|L0%(N)..|
|000010b0| 2c 62 02 82 4e 3a 00 c8 | 2c 67 02 8d 33 35 3a 8b |,b..N:..|,g..35:.|
|000010c0| 45 54 b2 38 a7 32 31 35 | 00 ce 2c 6c 02 8e 00 d6 |ET.8.215|..,l....|
|000010d0| 2c 71 02 8f 2d 2d 00 f6 | 2c 76 02 99 22 11 20 53 |,q..--..|,v..". S|
|000010e0| 41 56 49 4e 47 20 52 45 | 43 4f 52 44 20 23 22 3b |AVING RE|CORD #";|
|000010f0| 49 3b 22 91 91 22 00 26 | 2d 7b 02 81 4e b2 31 a4 |I;"..".&|-{..N.1.|
|00001100| 46 30 3a 8b 52 45 43 24 | 28 4b 25 28 49 29 2c 4d |F0:.REC$|(K%(I),M|
|00001110| 4c 28 4e 2c 31 29 29 b2 | 22 22 a7 52 24 b2 22 3e |L(N,1)).|"".R$.">|
|00001120| 22 3a 89 36 34 35 00 50 | 2d 80 02 52 24 b2 52 45 |":.645.P|-..R$.RE|
|00001130| 43 24 28 4b 25 28 49 29 | 2c 4d 4c 28 4e 2c 31 29 |C$(K%(I)|,ML(N,1)|
|00001140| 29 3a 8b 4d 4c 28 4e 2c | 32 29 b2 30 a7 36 34 35 |):.ML(N,|2).0.645|
|00001150| 00 81 2d 81 02 52 24 b2 | 52 24 aa 22 20 22 aa 52 |..-..R$.|R$." ".R|
|00001160| 45 43 24 28 4b 25 28 49 | 29 2c 4d 4c 28 4e 2c 32 |EC$(K%(I|),ML(N,2|
|00001170| 29 29 3a 8b 4d 4c 28 4e | 2c 33 29 b2 30 a7 36 34 |)):.ML(N|,3).0.64|
|00001180| 35 00 a3 2d 82 02 52 24 | b2 52 24 aa 22 20 22 aa |5..-..R$|.R$." ".|
|00001190| 52 45 43 24 28 4b 25 28 | 49 29 2c 4d 4c 28 4e 2c |REC$(K%(|I),ML(N,|
|000011a0| 33 29 29 00 b7 2d 85 02 | 98 35 2c c8 28 52 24 2c |3))..-..|.5,.(R$,|
|000011b0| 4c 30 25 28 4e 29 29 00 | cc 2d 8a 02 82 4e 3a 8d |L0%(N)).|.-...N:.|
|000011c0| 33 35 3a 8b 45 54 b2 38 | a7 32 31 35 00 d2 2d 8f |35:.ET.8|.215..-.|
|000011d0| 02 8e 00 da 2d 94 02 8f | 2d 2d 00 e5 2d 99 02 a0 |....-...|--..-...|
|000011e0| 35 3a a0 31 35 00 18 2e | 9e 02 99 22 93 52 45 43 |5:.15...|...".REC|
|000011f0| 4f 52 44 20 46 49 4c 45 | 53 20 4f 4e 20 44 49 53 |ORD FILE|S ON DIS|
|00001200| 4b 20 41 52 45 20 4e 4f | 57 3a 11 9e 22 3a 40 22 |K ARE NO|W:..":@"|
|00001210| 24 30 3a 44 46 5d 2a 22 | 00 3b 2e a3 02 99 a3 32 |$0:DF]*"|.;.....2|
|00001220| 35 29 22 50 52 45 53 53 | 20 12 05 41 4e 59 20 4b |5)"PRESS| ..ANY K|
|00001230| 45 59 92 99 22 3a 8d 32 | 30 3a 8e 00 4c 2e a8 02 |EY..":.2|0:..L...|
|00001240| 8f 2d 2d 44 49 52 45 43 | 54 4f 52 59 00 7c 2e ad |.--DIREC|TORY.|..|
|00001250| 02 99 22 93 9e 22 3b 3a | 40 22 24 22 3a 99 a3 32 |.."..";:|@"$":..2|
|00001260| 35 29 22 99 50 52 45 53 | 53 20 12 05 41 4e 59 20 |5)".PRES|S ..ANY |
|00001270| 4b 45 59 92 9e 22 3a 8d | 32 30 3a 8e 00 92 2e 0c |KEY..":.|20:.....|
|00001280| 03 8f 2d 2d 53 45 41 52 | 43 48 20 52 45 43 4f 52 |..--SEAR|CH RECOR|
|00001290| 44 53 00 c6 2e 11 03 48 | b2 30 3a 99 22 9e 93 20 |DS.....H|.0:.".. |
|000012a0| 12 20 20 54 52 41 4e 53 | 46 45 52 20 52 45 43 4f |.  TRANS|FER RECO|
|000012b0| 52 44 20 44 41 54 41 20 | 54 4f 20 4e 45 57 20 46 |RD DATA |TO NEW F|
|000012c0| 49 4c 45 20 20 22 00 f5 | 2e 16 03 99 22 11 99 20 |ILE  "..|....".. |
|000012d0| 43 4c 4f 4e 45 20 12 05 | 41 99 92 4c 4c 20 54 48 |CLONE ..|A..LL TH|
|000012e0| 45 20 52 45 43 4f 52 44 | 53 20 46 52 4f 4d 20 12 |E RECORD|S FROM .|
|000012f0| 9e 22 4e 46 24 00 26 2f | 1b 03 99 22 11 20 20 20 |."NF$.&/|...".   |
|00001300| 20 20 20 20 12 05 46 99 | 92 49 4e 44 20 52 45 43 |    ..F.|.IND REC|
|00001310| 4f 52 44 53 20 57 49 54 | 48 20 43 4f 4d 4d 4f 4e |ORDS WIT|H COMMON|
|00001320| 20 44 41 54 41 22 00 48 | 2f 1e 03 99 22 11 20 20 | DATA".H|/...".  |
|00001330| 20 20 20 20 20 12 05 44 | 99 92 49 52 45 43 54 4f |     ..D|..IRECTO|
|00001340| 52 59 20 12 05 24 92 22 | 00 76 2f 1f 03 99 22 11 |RY ..$."|.v/...".|
|00001350| 20 20 20 20 20 20 20 12 | 05 56 99 92 49 45 57 20 |       .|.V..IEW |
|00001360| 41 20 52 45 43 4f 52 44 | 20 46 49 4c 45 20 4f 4e |A RECORD| FILE ON|
|00001370| 20 44 49 53 4b 22 00 8e | 2f 20 03 99 22 11 20 20 | DISK"..|/ ..".  |
|00001380| 20 20 20 20 20 12 05 45 | 99 92 58 49 54 22 00 be |     ..E|..XIT"..|
|00001390| 2f 25 03 99 22 11 9e 20 | 12 20 20 20 20 20 50 52 |/%..".. |.     PR|
|000013a0| 45 53 53 20 54 48 45 20 | 41 50 50 52 4f 50 52 49 |ESS THE |APPROPRI|
|000013b0| 41 54 45 20 4b 45 59 20 | 20 20 20 20 20 22 00 d2 |ATE KEY |     "..|
|000013c0| 2f 2a 03 8d 32 30 3a 8b | 41 24 b2 22 45 22 a7 32 |/*..20:.|A$."E".2|
|000013d0| 31 35 00 e2 2f 2f 03 8b | 41 24 b2 22 41 22 a7 38 |15..//..|A$."A".8|
|000013e0| 33 35 00 06 30 32 03 8b | 41 24 b2 22 44 22 b0 41 |35..02..|A$."D".A|
|000013f0| 24 b2 22 24 22 b0 41 24 | b2 22 34 22 a7 8d 36 38 |$."$".A$|."4"..68|
|00001400| 35 3a 89 37 38 35 00 17 | 30 33 03 8b 41 24 b2 22 |5:.785..|03..A$."|
|00001410| 56 22 a7 31 32 32 35 00 | 27 30 34 03 8b 41 24 b2 |V".1225.|'04..A$.|
|00001420| 22 46 22 a7 38 35 35 00 | 30 30 39 03 89 38 31 30 |"F".855.|009..810|
|00001430| 00 41 30 3e 03 8f 2d 2d | 43 4c 4f 4e 45 20 41 4c |.A0>..--|CLONE AL|
|00001440| 4c 00 4f 30 43 03 58 52 | b2 58 3a 8d 35 34 35 00 |L.O0C.XR|.X:.545.|
|00001450| 6b 30 48 03 81 49 b2 31 | a4 58 52 3a 4b 25 28 49 |k0H..I.1|.XR:K%(I|
|00001460| 29 b2 49 3a 8d 36 33 30 | 3a 82 49 00 79 30 4d 03 |).I:.630|:.I.y0M.|
|00001470| 8d 36 36 35 3a 89 37 38 | 35 00 98 30 52 03 8f 2d |.665:.78|5..0R..-|
|00001480| 2d 45 4e 54 45 52 20 53 | 45 41 52 43 48 20 50 41 |-ENTER S|EARCH PA|
|00001490| 52 41 4d 45 54 45 52 53 | 00 a1 30 57 03 8d 31 36 |RAMETERS|..0W..16|
|000014a0| 30 00 ab 30 5c 03 48 b2 | 48 aa 31 00 d1 30 61 03 |0..0\.H.|H.1..0a.|
|000014b0| 99 22 11 20 12 99 53 45 | 41 52 43 48 20 46 49 45 |.". ..SE|ARCH FIE|
|000014c0| 4c 44 23 9e 22 48 22 92 | 22 3b 3a 85 53 46 28 48 |LD#."H".|";:.SF(H|
|000014d0| 29 00 f2 30 66 03 8b 53 | 46 28 48 29 b3 31 b0 53 |)..0f..S|F(H).1.S|
|000014e0| 46 28 48 29 b1 46 a7 99 | 22 91 91 22 3b 3a 89 38 |F(H).F..|"..";:.8|
|000014f0| 36 35 00 38 31 6b 03 99 | 22 20 99 12 4f 50 45 52 |65.81k..|" ..OPER|
|00001500| 41 54 4f 52 3a 92 20 05 | 12 20 3d 20 92 20 12 20 |ATOR:. .|. = . . |
|00001510| 3e 20 92 20 12 20 3c 20 | 92 20 12 20 3c 3e 20 92 |> . . < |. . <> .|
|00001520| 20 12 20 3f 3f 20 92 9e | 20 3f 20 3d 9d 9d 9d 22 | . ?? ..| ? =..."|
|00001530| 3b 3a 85 51 24 28 48 29 | 00 75 31 70 03 8b 51 24 |;:.Q$(H)|.u1p..Q$|
|00001540| 28 48 29 b2 22 3d 22 b0 | 51 24 28 48 29 b2 22 3e |(H)."=".|Q$(H).">|
|00001550| 22 b0 51 24 28 48 29 b2 | 22 3c 22 b0 51 24 28 48 |".Q$(H).|"<".Q$(H|
|00001560| 29 b2 22 3c 3e 22 b0 51 | 24 28 48 29 b2 22 3f 3f |)."<>".Q|$(H)."??|
|00001570| 22 a7 38 39 30 00 84 31 | 75 03 99 22 91 22 3b 3a |".890..1|u..".";:|
|00001580| 89 38 37 35 00 b6 31 7a | 03 99 22 20 99 12 44 41 |.875..1z|.." ..DA|
|00001590| 54 41 92 20 9e 22 3b 3a | 85 53 46 24 28 48 29 3a |TA. .";:|.SF$(H):|
|000015a0| 8b 48 b2 33 a7 4f 50 24 | 28 33 29 b2 22 45 4e 44 |.H.3.OP$|(3)."END|
|000015b0| 22 3a 89 39 32 30 00 ec | 31 7f 03 99 22 20 12 05 |":.920..|1..." ..|
|000015c0| 41 4e 44 99 92 2c 20 12 | 05 4f 52 20 99 92 2c 20 |AND.., .|.OR .., |
|000015d0| 05 12 45 4e 44 9e 92 20 | 3f 20 45 4e 44 9d 9d 9d |..END.. |? END...|
|000015e0| 9d 9d 22 3b 3a 85 4f 50 | 24 28 48 29 00 02 32 84 |..";:.OP|$(H)..2.|
|000015f0| 03 8b 4f 50 24 28 48 29 | b2 22 45 4e 44 22 a7 39 |..OP$(H)|."END".9|
|00001600| 32 30 00 24 32 89 03 8b | 4f 50 24 28 48 29 b2 22 |20.$2...|OP$(H)."|
|00001610| 41 4e 44 22 b0 4f 50 24 | 28 48 29 b2 22 4f 52 22 |AND".OP$|(H)."OR"|
|00001620| a7 38 35 35 00 33 32 8e | 03 99 22 91 22 3b 3a 89 |.855.32.|..".";:.|
|00001630| 38 39 35 00 47 32 93 03 | 8f 2d 2d 42 45 47 49 4e |895.G2..|.--BEGIN|
|00001640| 20 53 45 41 52 43 48 00 | 62 32 98 03 99 22 93 20 | SEARCH.|b2...". |
|00001650| 53 45 41 52 43 48 49 4e | 47 20 46 4f 52 2e 2e 2e |SEARCHIN|G FOR...|
|00001660| 11 22 00 9a 32 9d 03 81 | 4a b2 31 a4 48 3a 99 4a |."..2...|J.1.H:.J|
|00001670| 22 3a 20 22 46 24 28 53 | 46 28 4a 29 29 22 20 22 |": "F$(S|F(J))" "|
|00001680| 51 24 28 4a 29 22 20 22 | 53 46 24 28 4a 29 22 20 |Q$(J)" "|SF$(J)" |
|00001690| 22 4f 50 24 28 4a 29 3a | 82 4a 00 c4 32 a2 03 99 |"OP$(J):|.J..2...|
|000016a0| 22 11 11 22 3a 58 52 b2 | 30 3a 81 49 b2 31 a4 58 |"..":XR.|0:.I.1.X|
|000016b0| 3a 99 22 91 22 49 3a 81 | 4a b2 31 a4 48 3a 51 28 |:."."I:.|J.1.H:Q(|
|000016c0| 4a 29 b2 30 00 d8 32 a7 | 03 8f 2d 2d 43 4f 4d 50 |J).0..2.|..--COMP|
|000016d0| 41 52 45 20 44 41 54 41 | 00 00 33 ac 03 8b 51 24 |ARE DATA|..3...Q$|
|000016e0| 28 4a 29 b2 22 3d 22 af | 52 45 43 24 28 49 2c 53 |(J)."=".|REC$(I,S|
|000016f0| 46 28 4a 29 29 b2 53 46 | 24 28 4a 29 a7 39 37 30 |F(J)).SF|$(J).970|
|00001700| 00 28 33 b1 03 8b 51 24 | 28 4a 29 b2 22 3e 22 af |.(3...Q$|(J).">".|
|00001710| 52 45 43 24 28 49 2c 53 | 46 28 4a 29 29 b1 53 46 |REC$(I,S|F(J)).SF|
|00001720| 24 28 4a 29 a7 39 37 30 | 00 50 33 b6 03 8b 51 24 |$(J).970|.P3...Q$|
|00001730| 28 4a 29 b2 22 3c 22 af | 52 45 43 24 28 49 2c 53 |(J)."<".|REC$(I,S|
|00001740| 46 28 4a 29 29 b3 53 46 | 24 28 4a 29 a7 39 37 30 |F(J)).SF|$(J).970|
|00001750| 00 7a 33 bb 03 8b 51 24 | 28 4a 29 b2 22 3c 3e 22 |.z3...Q$|(J)."<>"|
|00001760| af 52 45 43 24 28 49 2c | 53 46 28 4a 29 29 b3 b1 |.REC$(I,|SF(J))..|
|00001770| 53 46 24 28 4a 29 a7 39 | 37 30 00 b0 33 c0 03 8b |SF$(J).9|70..3...|
|00001780| 51 24 28 4a 29 b2 22 3f | 3f 22 af 53 46 24 28 4a |Q$(J)."?|?".SF$(J|
|00001790| 29 b2 c8 28 52 45 43 24 | 28 49 2c 53 46 28 4a 29 |)..(REC$|(I,SF(J)|
|000017a0| 29 2c c3 28 53 46 24 28 | 4a 29 29 29 a7 39 37 30 |),.(SF$(|J))).970|
|000017b0| 00 bc 33 c5 03 82 4a 3a | 89 39 38 30 00 de 33 ca |..3...J:|.980..3.|
|000017c0| 03 51 28 4a 29 b2 31 3a | 89 39 36 35 3a 8f 20 20 |.Q(J).1:|.965:.  |
|000017d0| 53 45 54 20 51 55 45 52 | 59 20 54 52 55 45 00 02 |SET QUER|Y TRUE..|
|000017e0| 34 cf 03 8f 2d 2d 44 45 | 54 45 52 4d 49 4e 45 20 |4...--DE|TERMINE |
|000017f0| 4c 4f 47 49 43 41 4c 20 | 4f 50 45 52 41 54 4f 52 |LOGICAL |OPERATOR|
|00001800| 53 2d 00 26 34 d4 03 8b | 4f 50 24 28 31 29 b2 22 |S-.&4...|OP$(1)."|
|00001810| 41 4e 44 22 af 4f 50 24 | 28 32 29 b2 22 41 4e 44 |AND".OP$|(2)."AND|
|00001820| 22 a7 31 30 33 30 00 49 | 34 d9 03 8b 4f 50 24 28 |".1030.I|4...OP$(|
|00001830| 31 29 b2 22 41 4e 44 22 | af 4f 50 24 28 32 29 b2 |1)."AND"|.OP$(2).|
|00001840| 22 4f 52 22 a7 31 30 34 | 30 00 6c 34 de 03 8b 4f |"OR".104|0.l4...O|
|00001850| 50 24 28 31 29 b2 22 4f | 52 22 af 4f 50 24 28 32 |P$(1)."O|R".OP$(2|
|00001860| 29 b2 22 41 4e 44 22 a7 | 31 30 35 30 00 8e 34 e3 |)."AND".|1050..4.|
|00001870| 03 8b 4f 50 24 28 31 29 | b2 22 4f 52 22 af 4f 50 |..OP$(1)|."OR".OP|
|00001880| 24 28 32 29 b2 22 4f 52 | 22 a7 31 30 36 30 00 a5 |$(2)."OR|".1060..|
|00001890| 34 e8 03 8b 4f 50 24 28 | 31 29 b2 22 41 4e 44 22 |4...OP$(|1)."AND"|
|000018a0| a7 31 30 37 30 00 bb 34 | ed 03 8b 4f 50 24 28 31 |.1070..4|...OP$(1|
|000018b0| 29 b2 22 4f 52 22 a7 31 | 30 38 30 00 cd 34 f2 03 |)."OR".1|080..4..|
|000018c0| 8f 2d 2d 46 49 4e 41 4c | 20 54 45 53 54 00 dc 34 |.--FINAL| TEST..4|
|000018d0| f7 03 8b 51 28 31 29 a7 | 31 30 32 35 00 e9 34 fc |...Q(1).|1025..4.|
|000018e0| 03 82 49 3a 89 31 30 39 | 35 00 04 35 01 04 58 52 |..I:.109|5..5..XR|
|000018f0| b2 58 52 aa 31 3a 4b 25 | 28 58 52 29 b2 49 3a 89 |.XR.1:K%|(XR).I:.|
|00001900| 31 30 32 30 00 1d 35 06 | 04 8b 51 28 31 29 af 51 |1020..5.|..Q(1).Q|
|00001910| 28 32 29 af 51 28 33 29 | a7 31 30 32 35 00 27 35 |(2).Q(3)|.1025.'5|
|00001920| 0b 04 89 31 30 32 30 00 | 42 35 10 04 8b 51 28 31 |...1020.|B5...Q(1|
|00001930| 29 af 28 51 28 32 29 b0 | 51 28 33 29 29 a7 31 30 |).(Q(2).|Q(3)).10|
|00001940| 32 35 00 4c 35 15 04 89 | 31 30 32 30 00 67 35 1a |25.L5...|1020.g5.|
|00001950| 04 8b 51 28 31 29 b0 28 | 51 28 32 29 af 51 28 33 |..Q(1).(|Q(2).Q(3|
|00001960| 29 29 a7 31 30 32 35 00 | 71 35 1f 04 89 31 30 32 |)).1025.|q5...102|
|00001970| 30 00 8a 35 24 04 8b 51 | 28 31 29 b0 51 28 32 29 |0..5$..Q|(1).Q(2)|
|00001980| b0 51 28 33 29 a7 31 30 | 32 35 00 94 35 29 04 89 |.Q(3).10|25..5)..|
|00001990| 31 30 32 30 00 a8 35 2e | 04 8b 51 28 31 29 af 51 |1020..5.|..Q(1).Q|
|000019a0| 28 32 29 a7 31 30 32 35 | 00 b2 35 33 04 89 31 30 |(2).1025|..53..10|
|000019b0| 32 30 00 c6 35 38 04 8b | 51 28 31 29 b0 51 28 32 |20..58..|Q(1).Q(2|
|000019c0| 29 a7 31 30 32 35 00 d0 | 35 3d 04 89 31 30 32 30 |).1025..|5=..1020|
|000019d0| 00 f5 35 42 04 8f 2d 2d | 57 52 49 54 45 20 52 45 |..5B..--|WRITE RE|
|000019e0| 43 4f 52 44 53 20 46 4f | 55 4e 44 20 49 4e 20 53 |CORDS FO|UND IN S|
|000019f0| 45 41 52 43 48 00 fe 35 | 47 04 8d 35 34 35 00 12 |EARCH..5|G..545..|
|00001a00| 36 4c 04 81 49 b2 31 a4 | 58 52 3a 8d 36 33 30 3a |6L..I.1.|XR:.630:|
|00001a10| 82 49 00 20 36 51 04 8d | 36 36 35 3a 89 37 38 35 |.I. 6Q..|665:.785|
|00001a20| 00 39 36 56 04 8f 2d 2d | 53 43 41 4e 20 46 49 4c |.96V..--|SCAN FIL|
|00001a30| 45 20 4f 4e 20 44 49 53 | 4b 00 69 36 c9 04 99 22 |E ON DIS|K.i6..."|
|00001a40| 93 20 12 20 46 41 53 54 | 20 53 43 41 4e 20 4f 46 |. . FAST| SCAN OF|
|00001a50| 20 52 45 43 4f 52 44 53 | 20 49 4e 20 44 46 49 4c | RECORDS| IN DFIL|
|00001a60| 45 36 34 20 46 49 4c 45 | 22 00 99 36 ce 04 99 22 |E64 FILE|"..6..."|
|00001a70| 11 99 20 49 4e 53 45 52 | 54 20 44 49 53 4b 20 43 |.. INSER|T DISK C|
|00001a80| 4f 4e 54 41 49 4e 49 4e | 47 20 52 45 43 4f 52 44 |ONTAININ|G RECORD|
|00001a90| 20 46 49 4c 45 20 49 4e | 22 00 c4 36 d3 04 99 22 | FILE IN|"..6..."|
|00001aa0| 20 44 52 49 56 45 2e 20 | 50 52 45 53 53 20 12 05 | DRIVE. |PRESS ..|
|00001ab0| 41 4e 59 20 4b 45 59 99 | 22 3a 8d 32 30 3a 46 46 |ANY KEY.|":.20:FF|
|00001ac0| 24 b2 22 22 00 f6 36 d8 | 04 99 22 93 99 41 56 41 |$.""..6.|.."..AVA|
|00001ad0| 49 4c 41 42 4c 45 20 52 | 45 43 4f 52 44 20 46 49 |ILABLE R|ECORD FI|
|00001ae0| 4c 45 53 20 41 52 45 3a | 9e 11 22 3a 40 22 24 30 |LES ARE:|..":@"$0|
|00001af0| 3a 44 46 5d 2a 22 00 29 | 37 dd 04 99 22 11 11 11 |:DF]*".)|7..."...|
|00001b00| 99 20 4e 41 4d 45 20 4f | 46 20 52 45 43 4f 52 44 |. NAME O|F RECORD|
|00001b10| 20 46 49 4c 45 9e 22 3b | 3a 85 46 46 24 3a 8b 46 | FILE.";|:.FF$:.F|
|00001b20| 46 24 b2 22 22 a7 37 38 | 35 00 5f 37 e2 04 9f 31 |F$."".78|5._7...1|
|00001b30| 35 2c 38 2c 31 35 3a 9f | 35 2c 38 2c 35 2c 22 30 |5,8,15:.|5,8,5,"0|
|00001b40| 3a 44 46 5d 20 22 aa 46 | 46 24 aa 22 2c 53 2c 52 |:DF] ".F|F$.",S,R|
|00001b50| 22 3a 8d 33 35 3a 8b 45 | 54 b2 38 a7 37 38 35 00 |":.35:.E|T.8.785.|
|00001b60| 73 37 e7 04 8b 45 4e b2 | 36 32 a7 8d 34 30 3a 89 |s7...EN.|62..40:.|
|00001b70| 37 38 35 00 87 37 ec 04 | 84 35 2c 52 32 2c 46 32 |785..7..|.5,R2,F2|
|00001b80| 2c 58 32 3a 8d 33 35 00 | b2 37 f6 04 99 22 99 93 |,X2:.35.|.7..."..|
|00001b90| 20 46 49 4c 45 20 9e 22 | 46 46 24 22 99 20 48 41 | FILE ."|FF$". HA|
|00001ba0| 53 9e 22 46 32 22 99 46 | 49 45 4c 44 53 20 41 4e |S."F2".F|IELDS AN|
|00001bb0| 44 22 00 d7 37 fb 04 99 | 22 20 43 55 52 52 45 4e |D"..7...|" CURREN|
|00001bc0| 54 4c 59 20 48 4f 4c 44 | 53 9e 22 58 32 22 99 52 |TLY HOLD|S."X2".R|
|00001bd0| 45 43 4f 52 44 53 22 00 | f0 37 0f 05 99 22 93 20 |ECORDS".|.7...". |
|00001be0| 50 4f 53 49 54 49 4f 4e | 49 4e 47 2e 2e 2e 9e 22 |POSITION|ING...."|
|00001bf0| 00 1e 38 14 05 81 4e b2 | 31 a4 46 32 3a 84 35 2c |..8...N.|1.F2:.5,|
|00001c00| 52 43 24 28 30 29 2c 52 | 43 24 28 30 29 3a 82 4e |RC$(0),R|C$(0):.N|
|00001c10| 3a 8d 33 35 3a 8b 45 54 | b2 38 a7 37 38 35 00 43 |:.35:.ET|.8.785.C|
|00001c20| 38 19 05 81 49 b2 31 a4 | 58 32 3a 99 22 11 12 99 |8...I.1.|X2:."...|
|00001c30| 52 45 43 4f 52 44 20 23 | 9e 22 49 3a 81 4e b2 31 |RECORD #|."I:.N.1|
|00001c40| a4 46 32 00 5f 38 1e 05 | 84 35 2c 52 43 24 28 4e |.F2._8..|.5,RC$(N|
|00001c50| 29 3a 8d 33 35 3a 8b 45 | 54 b2 38 a7 37 38 35 00 |):.35:.E|T.8.785.|
|00001c60| 7a 38 23 05 99 22 12 05 | 22 4e 22 12 9e 22 52 43 |z8#.."..|"N".."RC|
|00001c70| 24 28 4e 29 3a 8d 31 33 | 34 30 00 99 38 28 05 8b |$(N):.13|40..8(..|
|00001c80| 41 24 b2 22 45 22 a7 a0 | 35 3a a0 31 35 3a 99 22 |A$."E"..|5:.15:."|
|00001c90| 99 13 13 22 3a 89 37 38 | 35 00 aa 38 2d 05 82 4e |...":.78|5..8-..N|
|00001ca0| 3a 82 49 3a a0 35 3a a0 | 31 35 00 ce 38 32 05 99 |:.I:.5:.|15..82..|
|00001cb0| 22 99 20 50 52 45 53 53 | 20 05 12 41 4e 59 20 4b |". PRESS| ..ANY K|
|00001cc0| 45 59 92 99 22 3a 8d 32 | 30 3a 89 37 38 35 00 d4 |EY..":.2|0:.785..|
|00001cd0| 38 37 05 3a 00 e9 38 3c | 05 a1 41 24 3a 8b 41 24 |87.:..8<|..A$:.A$|
|00001ce0| b3 b1 22 22 a7 31 33 35 | 30 00 ef 38 41 05 8e 00 |.."".135|0..8A...|
|00001cf0| 22 39 46 05 99 22 11 12 | 05 41 4e 59 20 4b 45 59 |"9F.."..|.ANY KEY|
|00001d00| 99 92 20 54 4f 20 43 4f | 4e 54 49 4e 55 45 20 4f |.. TO CO|NTINUE O|
|00001d10| 52 20 12 05 45 92 99 58 | 49 54 9e 22 3a 8d 32 30 |R ..E..X|IT.":.20|
|00001d20| 3a 8e 00 00 00          |                         |:....   |        |
+--------+-------------------------+-------------------------+--------+--------+