DISK RANDOM FIAL
FILE INFORMATION
FILENAME(S): DISK RANDOM FIAL
FILE TYPE(S): PRG
FILE SIZE: 3.1K
FIRST SEEN: 2025-11-30 19:47:10
APPEARS ON: 1 disk(s)
FILE HASH
b5799a0a9d84ce5a99b0ebec356265de43247c8c34d0978780e9e3e8eb0e57da
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| HJ LPEDISK A2 2 | DISK RANDOM FIAL | PRG | Curtcool, Frank | 31 | 10 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
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 AA |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