00000000: 01 04 1F 04 0A 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |....... ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00000020: 3D 04 0C 00 8F 20 2A 20 52 41 4E 44 4F 4D 20 46 |=.... * RANDOM F|
00000030: 49 4C 45 20 45 58 41 4D 50 4C 45 20 2A 00 5B 04 |ILE EXAMPLE *.[.|
00000040: 0E 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |... ************|
00000050: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 7C 04 10 00 |***********.|...|
00000060: 86 49 24 28 36 36 34 29 3A 46 44 B2 30 3A 46 58 |.I$(664):FD.0:FX|
00000070: B2 35 3A 43 48 B2 32 3A 46 50 B2 31 00 9D 04 12 |.5:CH.2:FP.1....|
00000080: 00 99 22 93 11 11 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 |..".............|
00000090: C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 22 00 B8 04 |............"...|
000000A0: 14 00 99 22 20 20 49 4E 53 45 52 54 20 44 41 54 |..." INSERT DAT|
000000B0: 41 20 53 48 45 45 54 22 00 D5 04 16 00 99 22 C4 |A SHEET"......".|
000000C0: C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 |................|
000000D0: C4 C4 C4 C4 22 00 F2 04 18 00 99 22 11 11 20 20 |...."......".. |
000000E0: 20 20 53 54 41 52 54 20 50 52 45 53 53 20 27 53 | START PRESS 'S|
000000F0: 27 22 00 06 05 1A 00 A1 50 24 3A 8B 50 24 B3 B1 |'"......P$:.P$..|
00000100: 22 53 22 A7 32 36 00 23 05 1C 00 9F 31 35 2C 38 |"S".26.#....15,8|
00000110: 2C 31 35 2C 22 49 30 22 3A 9F 32 2C 38 2C 32 2C |,15,"I0":.2,8,2,|
00000120: 22 23 22 00 43 05 1E 00 99 22 93 11 C6 C6 C6 C6 |"#".C...."......|
00000130: C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 |................|
00000140: C6 C6 22 00 5F 05 20 00 99 22 49 4E 44 45 58 20 |.."._. .."INDEX |
00000150: 46 49 4C 45 20 4F 50 45 52 41 54 49 4F 4E 22 00 |FILE OPERATION".|
00000160: 7D 05 22 00 99 22 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 |}.".."..........|
00000170: C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 22 00 A1 05 |............"...|
00000180: 24 00 85 22 11 20 20 20 20 20 4E 45 57 20 53 48 |$..". NEW SH|
00000190: 45 45 54 3F 20 4E 9D 9D 9D 22 3B 4F 24 3A 99 22 |EET? N...";O$:."|
000001A0: 22 00 B0 05 26 00 8B 4F 24 B2 22 4E 22 A7 34 36 |"...&..O$."N".46|
000001B0: 00 C0 05 28 00 8B 4F 24 B3 B1 22 59 22 A7 33 36 |...(..O$.."Y".36|
000001C0: 00 DC 05 2A 00 99 3A 99 22 20 20 20 20 57 41 49 |...*..:." WAI|
000001D0: 54 21 22 3A 81 49 B2 31 A4 36 36 34 00 0D 06 2C |T!":.I.1.664...,|
000001E0: 00 99 22 13 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 11 11 |..".............|
000001F0: 11 11 11 11 11 11 11 20 20 20 20 9D 9D 9D 9D 9D |....... .....|
00000200: 22 49 3B 3A 49 24 28 49 29 B2 22 2F 22 00 1E 06 |"I;:I$(I)."/"...|
00000210: 2D 00 99 49 24 28 49 29 3A 82 3A 89 35 30 00 37 |-..I$(I):.:.50.7|
00000220: 06 2E 00 9F 35 2C 38 2C 35 2C 22 30 3A 49 4E 44 |....5,8,5,"0:IND|
00000230: 45 58 2C 53 2C 52 22 00 4D 06 2F 00 81 49 B2 31 |EX,S,R".M./..I.1|
00000240: A4 36 36 34 3A 84 35 2C 49 24 28 49 29 00 7A 06 |.664:.5,I$(I).z.|
00000250: 30 00 99 22 13 11 11 11 11 11 11 11 11 1D 1D 1D |0.."............|
00000260: 1D 1D 1D 57 41 49 54 21 20 20 20 20 20 9D 9D 9D |...WAIT! ...|
00000270: 9D 9D 22 49 3B 49 24 28 49 29 00 84 06 31 00 82 |.."I;I$(I)...1..|
00000280: 49 3A A0 35 00 A4 06 32 00 99 22 93 11 C6 C6 C6 |I:.5...2..".....|
00000290: C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 |................|
000002A0: C6 C6 C6 22 00 C1 06 34 00 99 22 20 20 20 20 20 |..."...4.." |
000002B0: 4A 4F 42 20 4D 45 4E 55 20 20 20 20 20 20 20 20 |JOB MENU |
000002C0: 22 00 DF 06 36 00 99 22 C4 C4 C4 C4 C4 C4 C4 C4 |"...6.."........|
000002D0: C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 22 00 |..............".|
000002E0: E5 06 38 00 99 00 FA 06 3A 00 99 22 20 20 20 20 |..8.....:.." |
000002F0: 20 31 3D 43 52 45 41 54 45 22 00 0F 07 3C 00 99 | 1=CREATE"...<..|
00000300: 22 20 20 20 20 20 32 3D 44 45 4C 45 54 45 22 00 |" 2=DELETE".|
00000310: 24 07 3E 00 99 22 20 20 20 20 20 33 3D 53 45 41 |$.>.." 3=SEA|
00000320: 52 43 48 22 00 36 07 40 00 99 22 20 20 20 20 20 |RCH".6.@.." |
00000330: 30 3D 45 4E 44 22 00 3C 07 41 00 99 00 5B 07 42 |0=END".<.A...[.B|
00000340: 00 85 22 31 20 2C 20 32 20 2C 20 33 20 2C 20 30 |.."1 , 2 , 3 , 0|
00000350: 20 20 20 31 9D 9D 9D 22 3B 4F 24 00 73 07 44 00 | 1...";O$.s.D.|
00000360: 8B 4F 24 B2 22 30 22 A7 A0 31 35 3A A0 35 3A A0 |.O$."0"..15:.5:.|
00000370: 32 3A 80 00 83 07 46 00 8B 4F 24 B2 22 31 22 A7 |2:....F..O$."1".|
00000380: 31 30 34 00 93 07 48 00 8B 4F 24 B2 22 33 22 A7 |104...H..O$."3".|
00000390: 33 30 30 00 A3 07 4A 00 8B 4F 24 B3 B1 22 32 22 |300...J..O$.."2"|
000003A0: A7 35 30 00 AC 07 4C 00 89 32 30 30 00 CA 07 64 |.50...L..200...d|
000003B0: 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************|
000003C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 E8 07 66 00 8F |**********...f..|
000003D0: 20 2A 20 4D 41 53 54 45 52 20 46 49 4C 45 20 43 | * MASTER FILE C|
000003E0: 52 45 41 54 45 20 20 2A 00 06 08 67 00 8F 20 2A |REATE *...g.. *|
000003F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000400: 2A 2A 2A 2A 2A 2A 00 27 08 68 00 99 22 93 11 11 |******.'.h.."...|
00000410: C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 |................|
00000420: C6 C6 C6 C6 C6 C6 22 00 43 08 69 00 99 22 20 A0 |......".C.i.." .|
00000430: 4D 41 53 54 45 52 20 46 49 4C 45 20 43 52 45 41 |MASTER FILE CREA|
00000440: 54 45 22 00 61 08 6A 00 99 22 C4 C4 C4 C4 C4 C4 |TE".a.j.."......|
00000450: C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 |................|
00000460: 22 00 7C 08 6B 00 85 22 52 45 43 4F 52 44 20 4E |".|.k.."RECORD N|
00000470: 4F 2E 20 3D 20 30 9D 9D 9D 22 3B 46 00 8A 08 6D |O. = 0...";F...m|
00000480: 00 8B 20 46 B2 30 A7 31 37 30 00 A7 08 6E 00 85 |.. F.0.170...n..|
00000490: 22 4E 41 4D 45 20 20 20 20 20 3D 2E 9D 9D 9D 22 |"NAME =...."|
000004A0: 3B 46 42 24 28 31 29 00 C4 08 78 00 85 22 41 44 |;FB$(1)...x.."AD|
000004B0: 44 52 45 53 53 20 20 3D 2E 9D 9D 9D 22 3B 46 42 |DRESS =....";FB|
000004C0: 24 28 32 29 00 E1 08 82 00 85 22 5A 49 50 20 20 |$(2)......"ZIP |
000004D0: 20 20 20 20 3D 2E 9D 9D 9D 22 3B 46 42 24 28 33 | =....";FB$(3|
000004E0: 29 00 FE 08 84 00 85 22 54 45 4C 20 20 20 20 20 |)......"TEL |
000004F0: 20 3D 2E 9D 9D 9D 22 3B 46 42 24 28 34 29 00 1B | =....";FB$(4)..|
00000500: 09 86 00 85 22 43 4F 4D 4D 45 4E 54 20 20 3D 2E |...."COMMENT =.|
00000510: 9D 9D 9D 22 3B 46 42 24 28 35 29 00 25 09 8C 00 |...";FB$(5).%...|
00000520: 8D 35 32 30 30 00 33 09 96 00 49 24 28 46 29 B2 |.5200.3...I$(F).|
00000530: 22 31 22 00 3C 09 A0 00 89 31 30 34 00 56 09 AA |"1".<....104.V..|
00000540: 00 9F 35 2C 38 2C 35 2C 22 40 30 3A 49 4E 44 45 |..5,8,5,"@0:INDE|
00000550: 58 2C 53 2C 57 22 00 73 09 AF 00 81 49 B2 31 A4 |X,S,W".s....I.1.|
00000560: 36 36 34 3A 98 35 2C 49 24 28 49 29 3B C7 28 31 |664:.5,I$(I);.(1|
00000570: 33 29 3B 00 A0 09 B4 00 99 22 13 11 11 11 11 11 |3);......"......|
00000580: 11 11 11 1D 1D 1D 1D 1D 1D 57 41 49 54 21 20 20 |.........WAIT! |
00000590: 20 20 20 9D 9D 9D 9D 9D 22 49 3B 49 24 28 49 29 | ....."I;I$(I)|
000005A0: 00 A9 09 B9 00 82 3A A0 35 00 B1 09 BE 00 89 37 |......:.5......7|
000005B0: 34 00 CF 09 C8 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |4...... ********|
000005C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
000005D0: ED 09 C9 00 8F 20 2A 20 20 4D 41 53 54 45 52 20 |..... * MASTER |
000005E0: 46 49 4C 45 20 44 45 4C 45 54 45 20 2A 00 0B 0A |FILE DELETE *...|
000005F0: CA 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |... ************|
00000600: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 2C 0A D2 00 |***********.,...|
00000610: 99 22 93 11 11 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 |."..............|
00000620: C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 22 00 48 0A D4 |...........".H..|
00000630: 00 99 22 20 20 4D 41 53 54 45 52 20 46 49 4C 45 |.." MASTER FILE|
00000640: 20 44 45 4C 45 54 45 22 00 68 0A D6 00 99 22 C4 | DELETE".h....".|
00000650: C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 |................|
00000660: C4 C4 C4 C4 C4 22 3A 99 00 83 0A DC 00 85 22 52 |.....":......."R|
00000670: 45 43 4F 52 44 20 4E 4F 2E 20 3D 20 30 9D 9D 9D |ECORD NO. = 0...|
00000680: 22 3B 46 00 90 0A E6 00 8B 46 B2 30 A7 32 36 30 |";F......F.0.260|
00000690: 00 A4 0A EB 00 8B 49 24 28 46 29 B3 B1 22 31 22 |......I$(F).."1"|
000006A0: A7 32 32 30 00 CB 0A F0 00 49 24 28 46 29 B2 22 |.220.....I$(F)."|
000006B0: 2F 22 3A 99 22 11 52 45 43 4F 52 44 20 4E 4F 2E |/":.".RECORD NO.|
000006C0: 22 46 3B 22 44 45 4C 45 54 45 22 00 D4 0A FA 00 |"F;"DELETE".....|
000006D0: 89 32 32 30 00 EE 0A 04 01 9F 35 2C 38 2C 35 2C |.220......5,8,5,|
000006E0: 22 40 30 3A 49 4E 44 45 58 2C 53 2C 57 22 00 0B |"@0:INDEX,S,W"..|
000006F0: 0B 09 01 81 49 B2 31 A4 36 36 34 3A 98 35 2C 49 |....I.1.664:.5,I|
00000700: 24 28 49 29 3B C7 28 31 33 29 3B 00 36 0B 0E 01 |$(I);.(13);.6...|
00000710: 99 22 13 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D 57 |.".............W|
00000720: 41 49 54 21 20 20 20 20 20 9D 9D 9D 9D 9D 22 49 |AIT! ....."I|
00000730: 3B 49 24 28 49 29 00 3F 0B 13 01 82 3A A0 35 00 |;I$(I).?....:.5.|
00000740: 47 0B 18 01 89 35 30 00 65 0B 2C 01 8F 20 2A 2A |G....50.e.,.. **|
00000750: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000760: 2A 2A 2A 2A 2A 00 83 0B 2D 01 8F 20 2A 20 20 46 |*****...-.. * F|
00000770: 49 4C 45 20 53 45 41 52 43 48 20 20 20 20 20 20 |ILE SEARCH |
00000780: 20 20 2A 00 A1 0B 2E 01 8F 20 2A 2A 2A 2A 2A 2A | *...... ******|
00000790: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000007A0: 2A 00 C2 0B 36 01 99 22 93 11 11 C6 C6 C6 C6 C6 |*...6.."........|
000007B0: C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 C6 |................|
000007C0: C6 22 00 DE 0B 38 01 99 22 20 20 20 20 20 20 20 |."...8.." |
000007D0: 53 45 41 52 43 48 20 20 20 20 20 20 20 22 00 FE |SEARCH "..|
000007E0: 0B 3A 01 99 22 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 |.:.."...........|
000007F0: C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 22 3A 99 00 19 |...........":...|
00000800: 0C 40 01 85 22 52 45 43 4F 52 44 20 4E 4F 2E 20 |.@.."RECORD NO. |
00000810: 3D 20 30 9D 9D 9D 22 3B 46 00 25 0C 41 01 8B 46 |= 0...";F.%.A..F|
00000820: B2 30 A7 35 30 00 39 0C 42 01 8B 49 24 28 46 29 |.0.50.9.B..I$(F)|
00000830: B3 B1 22 31 22 A7 33 32 30 00 43 0C 45 01 8D 35 |.."1".320.C.E..5|
00000840: 31 30 30 00 5D 0C 68 01 99 22 4E 41 4D 45 20 20 |100.].h.."NAME |
00000850: A0 A0 20 3D 20 22 3B 46 42 24 28 31 29 00 77 0C |.. = ";FB$(1).w.|
00000860: 72 01 99 22 41 44 44 52 45 53 53 20 20 3D 20 22 |r.."ADDRESS = "|
00000870: 3B 46 42 24 28 32 29 00 91 0C 7C 01 99 22 5A 49 |;FB$(2)...|.."ZI|
00000880: 50 20 20 20 A0 A0 20 3D 20 22 3B 46 42 24 28 33 |P .. = ";FB$(3|
00000890: 29 00 AB 0C 7E 01 99 22 54 45 4C 20 20 20 A0 A0 |)...~.."TEL ..|
000008A0: 20 3D 20 22 3B 46 42 24 28 34 29 00 C5 0C 7F 01 | = ";FB$(4).....|
000008B0: 99 22 43 4F 4D 4D 45 4E 54 A0 20 3D 20 22 3B 46 |."COMMENT. = ";F|
000008C0: 42 24 28 35 29 00 E2 0C 81 01 99 22 2D 2D 2D 2D |B$(5)......"----|
000008D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000008E0: 2D 22 00 EB 0C 86 01 89 33 32 30 00 09 0D EC 13 |-"......320.....|
000008F0: 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |. **************|
00000900: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 27 0D F1 13 8F 20 |*********.'.... |
00000910: 2A 20 46 44 44 20 42 4C 4F 43 4B 20 52 45 41 44 |* FDD BLOCK READ|
00000920: 20 20 20 20 20 20 2A 00 45 0D F4 13 8F 20 2A 2A | *.E.... **|
00000930: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000940: 2A 2A 2A 2A 2A 00 4F 0D F6 13 8D 35 33 33 30 00 |*****.O....5330.|
00000950: 69 0D 00 14 98 31 35 2C 22 55 31 3A 22 3B 43 48 |i....15,"U1:";CH|
00000960: 3B 46 44 3B 46 54 3B 46 53 00 7E 0D 0A 14 98 31 |;FD;FT;FS.~....1|
00000970: 35 2C 22 42 2D 50 3A 22 3B 43 48 3B 46 50 00 88 |5,"B-P:";CH;FP..|
00000980: 0D 14 14 8D 35 32 37 30 00 95 0D 1E 14 81 46 49 |....5270......FI|
00000990: B2 31 A4 46 58 00 A6 0D 28 14 84 43 48 2C 46 42 |.1.FX...(..CH,FB|
000009A0: 24 28 46 49 29 3A 00 AC 0D 3C 14 82 00 B2 0D 46 |$(FI):...<.....F|
000009B0: 14 8E 00 D0 0D 50 14 8F 20 2A 2A 2A 2A 2A 2A 2A |.....P.. *******|
000009C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000009D0: 00 EE 0D 51 14 8F 20 2A 20 46 44 44 20 42 4C 4F |...Q.. * FDD BLO|
000009E0: 43 4B 20 57 52 49 54 45 20 20 20 20 20 2A 00 0C |CK WRITE *..|
000009F0: 0E 52 14 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.R.. ***********|
00000A00: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 16 0E 5A |************...Z|
00000A10: 14 8D 35 33 33 30 00 2B 0E 64 14 98 31 35 2C 22 |..5330.+.d..15,"|
00000A20: 42 2D 50 3A 22 3B 43 48 3B 46 50 00 4D 0E 6E 14 |B-P:";CH;FP.M.n.|
00000A30: 81 46 49 B2 31 A4 46 58 3A 98 43 48 2C 46 42 24 |.FI.1.FX:.CH,FB$|
00000A40: 28 46 49 29 3B C7 28 31 33 29 3B 3A 82 00 67 0E |(FI);.(13);:..g.|
00000A50: 78 14 98 31 35 2C 22 55 32 3A 22 3B 43 48 3B 46 |x..15,"U2:";CH;F|
00000A60: 44 3B 46 54 3B 46 53 00 71 0E 82 14 8D 35 32 37 |D;FT;FS.q....527|
00000A70: 30 00 77 0E 8C 14 8E 00 95 0E 96 14 8F 20 2A 2A |0.w.......... **|
00000A80: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000A90: 2A 2A 2A 2A 2A 00 B3 0E 9B 14 8F 20 2A 20 20 45 |*****...... * E|
00000AA0: 52 52 4F 52 20 43 48 45 43 4B 20 20 20 20 20 20 |RROR CHECK |
00000AB0: 20 20 2A 00 D1 0E 9E 14 8F 20 2A 2A 2A 2A 2A 2A | *...... ******|
00000AC0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000AD0: 2A 00 E6 0E A0 14 84 31 35 2C 45 4E 2C 45 4D 24 |*......15,EN,EM$|
00000AE0: 2C 45 54 2C 45 53 00 F2 0E AA 14 8B 45 4E B2 30 |,ET,ES......EN.0|
00000AF0: A7 8E 00 14 0F B4 14 99 22 45 52 52 4F 52 20 53 |........"ERROR S|
00000B00: 54 41 54 55 53 3A 22 3B 45 4E 3B 45 4D 24 3B 45 |TATUS:";EN;EM$;E|
00000B10: 54 3B 45 53 00 32 0F BE 14 85 22 43 4F 4E 54 49 |T;ES.2...."CONTI|
00000B20: 4E 55 45 3F 22 3B 59 24 3A 8B 59 24 B2 22 59 22 |NUE?";Y$:.Y$."Y"|
00000B30: A7 8E 00 38 0F C8 14 90 00 56 0F CA 14 8F 20 2A |...8.....V.... *|
00000B40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000B50: 2A 2A 2A 2A 2A 2A 00 74 0F CC 14 8F 20 2A 20 53 |******.t.... * S|
00000B60: 45 54 20 54 52 41 43 4B 20 26 20 53 45 43 54 4F |ET TRACK & SECTO|
00000B70: 52 20 20 2A 00 92 0F CE 14 8F 20 2A 2A 2A 2A 2A |R *...... *****|
00000B80: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000B90: 2A 2A 00 B3 0F D2 14 8B 46 B3 33 35 38 A7 46 31 |**......F.358.F1|
00000BA0: B2 30 3A 46 32 B2 32 32 3A 46 33 B2 31 3A 89 35 |.0:F2.22:F3.1:.5|
00000BB0: 33 37 30 00 DD 0F DC 14 8B 46 B1 33 35 37 AF 46 |370......F.357.F|
00000BC0: B3 34 37 32 A7 46 31 B2 33 35 37 3A 46 32 B2 32 |.472.F1.357:F2.2|
00000BD0: 30 3A 46 33 B2 31 39 3A 89 35 33 37 30 00 07 10 |0:F3.19:.5370...|
00000BE0: E6 14 8B 46 B1 34 37 31 AF 46 B3 35 38 30 A7 46 |...F.471.F.580.F|
00000BF0: 31 B2 34 37 31 3A 46 32 B2 31 39 3A 46 33 B2 32 |1.471:F2.19:F3.2|
00000C00: 35 3A 89 35 33 37 30 00 25 10 F0 14 8B 46 B1 35 |5:.5370.%....F.5|
00000C10: 37 39 A7 46 31 B2 35 37 39 3A 46 32 B2 31 38 3A |79.F1.579:F2.18:|
00000C20: 46 33 B2 33 31 00 44 10 FA 14 46 54 B2 B5 28 28 |F3.31.D...FT..((|
00000C30: 28 46 AB 46 31 29 AB 31 29 AD 28 46 32 AB 31 29 |(F.F1).1).(F2.1)|
00000C40: 29 AA 46 33 00 65 10 04 15 46 53 B2 46 AB 46 31 |).F3.e...FS.F.F1|
00000C50: AB 28 46 54 AB 46 33 29 AC 46 32 AA 28 46 54 AB |.(FT.F3).F2.(FT.|
00000C60: 46 33 AB 31 29 00 6B 10 0E 15 8E 00 00 00 |F3.1).k....... |
....... ***********************.=.... *
RANDOM FILE EXAMPLE *.[.... ************
***********.|....I$(664):FD.0:FX.5:CH.2:
FP.1......"...FFFFFFFFFFFFFFFFFFFFFF"...
..." INSERT DATA SHEET".U...."DDDDDDDDD
DDDDDDDDDDDD"......".. START PRESS 'S
'"......P$:.P$.."S".26.#....15,8,15,"I0"
:.2,8,2,"#".C...."..FFFFFFFFFFFFFFFFFFFF
FF"._. .."INDEX FILE OPERATION".}.".."DD
DDDDDDDDDDDDDDDDDDDD"...$..". NEW SH
EET? N...";O$:.""...&..O$."N".46...(..O$
.."Y".36...*..:." WAIT!":.I.1.664...,
..".................... ....."I;:I$(I
)."/"...-..I$(I):.:.50.7....5,8,5,"0:IND
EX,S,R".M./..I.1.664:.5,I$(I).Z.0.."....
...........WAIT! ....."I;I$(I)...1..
I: 5...2.."..FFFFFFFFFFFFFFFFFFFFFF".A.4
.." JOB MENU "...6.."DDDDDDDD
DDDDDDDDDDDDDD"...8.....:.." 1=CREAT
E"...<.." 2=DELETE".$.>.." 3=SEA
RCH".6.@.." 0=END".<.A...[.B.."1 , 2
, 3 , 0 1...";O$.S.D..O$."0". 15: 5:
2:....F..O$."1".104...H..O$."3".300...J.
.O$.."2".50...L..200.J.D.. *************
**********...F.. * MASTER FILE CREATE *
...G.. ***********************.'.H.."...
FFFFFFFFFFFFFFFFFFFFFF".C.I.." MASTER F
ILE CREATE".A.J.."DDDDDDDDDDDDDDDDDDDDDD
".|.K.."RECORD NO. = 0...";F...M.. F.0.1
70...N.."NAME =....";FB$(1).D.X.."AD
DRESS =....";FB$(2)......"ZIP =...
.";FB$(3)......"TEL =....";FB$(4)..
...."COMMENT =....";FB$(5).%....5200.3.
..I$(F)."1".<. ..104.V....5,8,5,"@0:INDE
X,S,W".S....I.1.664:.5,I$(I);G(13);. ...
."...............WAIT! ....."I;I$(I)
......: 5......74.O.H.. ****************
*******...I.. * MASTER FILE DELETE *...
J.. ***********************.,.R.."...FFF
FFFFFFFFFFFFFFFFFFF".H.T.." MASTER FILE
DELETE".H.V.."DDDDDDDDDDDDDDDDDDDDDD":.
......"RECORD NO. = 0...";F......F.0.260
......I$(F).."1".220.K...I$(F)."/":.".RE
CORD NO."F;"DELETE".T....220......5,8,5,
"@0:INDEX,S,W"......I.1.664:.5,I$(I);G(1
3);.6....".............WAIT! ....."I
;I$(I).?....: 5.G....50.E.,.. **********
*************...-.. * FILE SEARCH
*...... ***********************.B.6.."
...FFFFFFFFFFFFFFFFFFFFFF"...8.."
SEARCH "...:.."DDDDDDDDDDDDDDDDDDD
DDD":....@.."RECORD NO. = 0...";F.%.A..F
.0.50.9.B..I$(F).."1".320.C.E..5100.].H.
."NAME = ";FB$(1).W.R.."ADDRESS = "
;FB$(2)...|.."ZIP = ";FB$(3)...~.."
TEL = ";FB$(4).E..."COMMENT = ";F
B$(5)......"---------------------"......
320...... ***********************.'....
* FDD BLOCK READ *.E.... **********
*************.O....5330.I....15,"U1:";CH
;FD;FT;FS.~....15,"B-P:";CH;FP......5270
......FI.1.FX...(..CH,FB$(FI):...<.....F
...P.P.. ***********************...Q.. *
FDD BLOCK WRITE *...R.. ***********
************...Z..5330.+.D..15,"B-P:";CH
;FP.M.N..FI.1.FX:.CH,FB$(FI);G(13);:..G.
X..15,"U2:";CH;FD;FT;FS.Q....5270.W.....
..... ***********************...... * E
RROR CHECK *.Q.... **************
*********... ..15,EN,EM$,ET,ES......EN.0
........"ERROR STATUS:";EN;EM$;ET;ES.2..
.."CONTINUE?";Y$:.Y$."Y"...8.H...V.J.. *
**********************.T.L.. * SET TRACK
& SECTOR *...N.. *********************
**...R..F.358.F1.0:F2.22:F3.1:.5370.....
.F.357.F.472.F1.357:F2.20:F3.19:.5370...
...F.471.F.580.F1.471:F2.19:F3.25:.5370.
%....F.579.F1.579:F2.18:F3.31.D...FT..((
(F.F1).1).(F2.1)).F3.E...FS.F.F1.(FT.F3)
.F2.(FT.F3.1).K.......
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL