SRF DELETER
FILE INFORMATION
FILENAME(S): SRF DELETER
FILE TYPE(S): PRG
FILE SIZE: 2.9K
FIRST SEEN: 2025-11-30 21:22:20
APPEARS ON: 1 disk(s)
FILE HASH
06bc2e93a2a40fca59360cf9745aa3065f4b582555ec0fe230f61dca8a4622bf
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| NERO SOFT 162B | SRF DELETER | PRG | DuncanTwain | 19 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 14 08 05 00 97 35 35 2C 32 35 35 3A 97 35 |.......55,255:.5|
00000010: 36 2C 36 33 00 2D 08 06 00 97 20 35 31 2C C2 28 |6,63.-.... 51,.(|
00000020: 35 35 29 3A 97 35 32 2C C2 28 35 36 29 00 49 08 |55):.52,.(56).I.|
00000030: 08 00 97 20 34 35 2C C2 28 31 37 34 29 3A 97 20 |... 45,.(174):. |
00000040: 34 36 2C C2 28 31 37 35 29 00 65 08 09 00 97 20 |46,.(175).e.... |
00000050: 34 37 2C C2 28 20 34 35 29 3A 97 20 34 38 2C C2 |47,.( 45):. 48,.|
00000060: 28 20 34 36 29 00 81 08 0A 00 97 20 34 39 2C C2 |( 46)...... 49,.|
00000070: 28 20 34 35 29 3A 97 20 35 30 2C C2 28 20 34 36 |( 45):. 50,.( 46|
00000080: 29 00 C1 08 0C 00 42 24 20 B2 20 22 53 52 46 2D |).....B$ . "SRF-|
00000090: 33 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |3 |
000000A0: 20 20 20 20 20 20 20 20 20 20 22 3A 20 8F 20 20 | ": . |
000000B0: 4D 55 53 54 20 42 45 20 33 30 20 42 4C 41 4E 4B |MUST BE 30 BLANK|
000000C0: 53 00 D0 08 0D 00 86 20 46 4C 24 28 31 30 35 29 |S...... FL$(105)|
000000D0: 00 DB 08 10 00 9E 31 39 33 32 38 00 EC 08 12 00 |......19328.....|
000000E0: A0 31 35 3A 9F 31 35 2C 38 2C 31 35 00 03 09 14 |.15:.15,8,15....|
000000F0: 00 99 22 93 22 3A 20 26 20 52 45 3A 20 26 20 53 |..".": & RE: & S|
00000100: 59 2C 31 00 32 09 15 00 26 20 50 43 2C 38 2C 37 |Y,1.2...& PC,8,7|
00000110: 3A 20 26 20 54 58 2C 22 D3 54 55 44 45 4E 54 20 |: & TX,".TUDENT |
00000120: D2 45 43 4F 52 44 20 C6 49 4C 45 20 28 53 52 46 |.ECORD .ILE (SRF|
00000130: 29 22 00 61 09 16 00 26 20 50 43 2C 20 38 2C 38 |)".a...& PC, 8,8|
00000140: 3A 20 26 20 54 58 2C 22 20 20 20 20 C4 45 4C 45 |: & TX," .ELE|
00000150: 54 49 4F 4E 20 D0 52 4F 47 52 41 4D 20 20 20 20 |TION .ROGRAM |
00000160: 22 00 6C 09 18 00 4E 46 20 B2 20 30 00 A0 09 19 |".l...NF . 0....|
00000170: 00 26 20 50 43 2C 35 2C 31 32 3A 20 26 20 54 58 |.& PC,5,12: & TX|
00000180: 2C 22 D0 52 45 53 53 20 D2 C5 D4 D5 D2 CE 20 54 |,".RESS ...... T|
00000190: 4F 20 44 45 4C 45 54 45 20 46 49 4C 45 53 2E 22 |O DELETE FILES."|
000001A0: 00 D3 09 1A 00 26 20 50 43 2C 35 2C 31 38 3A 20 |.....& PC,5,18: |
000001B0: 26 20 54 58 2C 22 D4 4F 20 45 58 49 54 20 50 52 |& TX,".O EXIT PR|
000001C0: 4F 47 52 41 4D 3A 20 50 52 45 53 53 20 27 45 27 |OGRAM: PRESS 'E'|
000001D0: 2E 20 22 00 02 0A 1C 00 26 20 50 43 2C 38 2C 31 |. ".....& PC,8,1|
000001E0: 34 3A 4E 24 20 B2 20 22 20 22 3A 4C 20 B2 20 31 |4:N$ . " ":L . 1|
000001F0: 3A 20 26 20 45 4E 2C 4E 24 2C 4C 2C 54 25 2C 4E |: & EN,N$,L,T%,N|
00000200: 43 25 00 20 0A 1D 00 8B 20 4E 24 20 B2 20 22 45 |C%. .... N$ . "E|
00000210: 22 20 A7 20 31 32 39 3A 20 8F 20 20 45 58 49 54 |" . 129: . EXIT|
00000220: 00 3B 0A 1E 00 3A 26 54 45 3A 8B 20 4E 43 25 20 |.;...:&TE:. NC% |
00000230: B3 20 20 B1 20 30 20 A7 20 32 30 00 69 0A 1F 00 |. . 0 . 20.i...|
00000240: 99 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 |."..............|
00000250: 11 11 11 11 11 11 11 12 52 45 54 52 49 45 56 49 |........RETRIEVI|
00000260: 4E 47 20 46 49 4C 45 53 22 00 74 0A 27 00 9E 31 |NG FILES".t.'..1|
00000270: 39 33 34 31 00 84 0A 28 00 9F 20 35 2C 38 2C 35 |9341...(.. 5,8,5|
00000280: 2C 22 24 22 00 94 0A 29 00 4A B2 32 35 37 3A 8D |,"$"...).J.257:.|
00000290: 20 31 33 35 00 9F 0A 2A 00 81 49 B2 31 A4 38 00 | 135...*..I.1.8.|
000002A0: AE 0A 2B 00 4A B2 31 35 3A 8D 20 31 34 30 00 C0 |..+.J.15:. 140..|
000002B0: 0A 2C 00 8B 20 C3 28 46 24 29 B2 30 A7 20 35 30 |.,.. .(F$).0. 50|
000002C0: 00 DE 0A 2D 00 8B 20 53 54 B3 B1 30 B0 C6 28 C8 |...-.. ST..0..(.|
000002D0: 28 46 24 2C 31 29 29 B2 30 20 A7 20 35 30 00 14 |(F$,1)).0 . 50..|
000002E0: 0B 2E 00 8B 20 C8 28 46 24 2C 34 29 B2 22 53 52 |.... .(F$,4)."SR|
000002F0: 46 2D 22 20 AF 20 C3 28 54 59 24 29 B3 B1 30 20 |F-" . .(TY$)..0 |
00000300: A7 20 4E 46 B2 4E 46 AA 31 3A 46 4C 24 28 4E 46 |. NF.NF.1:FL$(NF|
00000310: 29 B2 46 24 00 23 0B 2F 00 4A B2 31 35 3A 8D 20 |).F$.#./.J.15:. |
00000320: 31 33 37 00 3F 0B 30 00 8B 49 B3 38 A7 20 A1 23 |137.?.0..I.8. .#|
00000330: 35 2C 54 24 2C 54 24 3A 54 59 24 B2 54 5A 24 00 |5,T$,T$:TY$.TZ$.|
00000340: 4C 0B 31 00 82 20 49 3A 89 20 34 32 00 5B 0B 32 |L.1.. I:. 42.[.2|
00000350: 00 A0 20 35 3A 9E 31 39 33 32 38 00 63 0B 33 00 |.. 5:.19328.c.3.|
00000360: 26 48 47 00 78 0B 34 00 8B 20 4E 46 20 B3 20 20 |&HG.x.4.. NF . |
00000370: B1 20 30 20 A7 20 35 37 00 8E 0B 35 00 26 20 54 |. 0 . 57...5.& T|
00000380: 45 20 3A 20 99 22 93 22 20 3A 20 26 48 47 00 BB |E : ."." : &HG..|
00000390: 0B 36 00 26 20 50 43 2C 38 2C 38 3A 20 26 20 54 |.6.& PC,8,8: & T|
000003A0: 58 2C 22 CE 4F 20 53 52 46 27 53 20 46 4F 55 4E |X,".O SRF'S FOUN|
000003B0: 44 20 4F 4E 20 44 49 53 4B 21 22 00 C5 0B 37 00 |D ON DISK!"...7.|
000003C0: 8D 20 31 32 37 00 CE 0B 38 00 89 20 32 31 00 E1 |. 127...8.. 21..|
000003D0: 0B 39 00 53 4E 20 B2 20 31 3A 46 49 20 B2 20 31 |.9.SN . 1:FI . 1|
000003E0: 35 00 F9 0B 3A 00 8B 20 46 49 20 B1 20 4E 46 20 |5...:.. FI . NF |
000003F0: A7 20 46 49 20 B2 20 4E 46 00 04 0C 3B 00 49 49 |. FI . NF...;.II|
00000400: 20 B2 20 32 00 2E 0C 3C 00 26 20 50 43 2C 33 2C | . 2...<.& PC,3,|
00000410: 31 3A 20 26 20 54 58 2C 22 D3 54 55 44 45 4E 54 |1: & TX,".TUDENT|
00000420: 20 D2 45 43 4F 52 44 20 C6 49 4C 45 53 22 00 40 | .ECORD .ILES".@|
00000430: 0C 3D 00 81 20 49 20 B2 20 53 4E 20 A4 20 46 49 |.=.. I . SN . FI|
00000440: 00 5C 0C 3E 00 49 24 20 B2 20 20 C4 20 28 49 29 |.\.>.I$ . . (I)|
00000450: 3A 49 49 20 B2 20 49 49 20 AA 20 31 00 87 0C 3F |:II . II . 1...?|
00000460: 00 26 20 50 43 2C 33 2C 49 49 3A 20 26 20 54 58 |.& PC,3,II: & TX|
00000470: 2C 22 28 22 3A 20 26 20 54 58 2C 49 24 3A 20 26 |,"(": & TX,I$: &|
00000480: 20 54 58 2C 22 29 22 00 A0 0C 40 00 8B 20 49 20 | TX,")"...@.. I |
00000490: B3 20 31 30 20 A7 20 20 26 20 54 58 2C 22 20 22 |. 10 . & TX," "|
000004A0: 00 B0 0C 41 00 26 20 54 58 2C 46 4C 24 28 49 29 |...A.& TX,FL$(I)|
000004B0: 00 B8 0C 42 00 82 20 49 00 F1 0C 43 00 3A 26 50 |...B.. I...C.:&P|
000004C0: 43 2C 31 2C 32 31 3A 26 54 58 2C 22 D4 59 50 45 |C,1,21:&TX,".YPE|
000004D0: 20 54 48 45 20 4E 55 4D 42 45 52 20 4F 46 20 54 | THE NUMBER OF T|
000004E0: 48 45 20 46 49 4C 45 20 54 48 41 54 20 59 4F 55 |HE FILE THAT YOU|
000004F0: 22 00 2C 0D 45 00 3A 26 50 43 2C 31 2C 32 32 3A |".,.E.:&PC,1,22:|
00000500: 26 54 58 2C 22 57 49 53 48 20 54 4F 20 44 45 4C |&TX,"WISH TO DEL|
00000510: 45 54 45 2C 20 4F 52 20 27 41 4C 4C 27 20 54 4F |ETE, OR 'ALL' TO|
00000520: 20 44 45 4C 45 54 45 20 41 4C 4C 22 00 3A 0D 46 | DELETE ALL".:.F|
00000530: 00 3A 26 50 43 2C 31 2C 32 33 00 8B 0D 47 00 3A |.:&PC,1,23...G.:|
00000540: 26 54 58 2C 22 53 52 46 27 53 20 4F 4E 20 44 49 |&TX,"SRF'S ON DI|
00000550: 53 4B 2C 20 4F 52 20 27 45 27 20 54 4F 20 45 58 |SK, OR 'E' TO EX|
00000560: 49 54 20 50 52 4F 47 52 41 4D 2E 20 20 C8 49 54 |IT PROGRAM. .IT|
00000570: 20 D2 C5 D4 D5 D2 CE 20 54 4F 20 53 45 45 20 4D | ...... TO SEE M|
00000580: 4F 52 45 20 53 52 46 27 53 2E 22 00 BB 0D 48 00 |ORE SRF'S."...H.|
00000590: 26 20 50 43 2C 33 2C 31 38 3A 20 26 20 54 58 2C |& PC,3,18: & TX,|
000005A0: 22 D0 4C 45 41 53 45 20 4D 41 4B 45 20 41 20 53 |".LEASE MAKE A S|
000005B0: 45 4C 45 43 54 49 4F 4E 2E 20 22 00 E2 0D 49 00 |ELECTION. "...I.|
000005C0: 4E 24 20 B2 20 22 45 20 20 22 3A 4C 20 B2 20 33 |N$ . "E ":L . 3|
000005D0: 3A 20 26 20 45 4E 2C 4E 24 2C 4C 2C 54 25 2C 4E |: & EN,N$,L,T%,N|
000005E0: 43 25 00 EC 0D 4A 00 8D 20 31 32 37 00 02 0E 4B |C%...J.. 127...K|
000005F0: 00 26 20 54 45 20 3A 20 99 22 93 22 20 3A 20 26 |.& TE : ."." : &|
00000600: 48 47 00 20 0E 4C 00 8B 20 20 C8 20 28 4E 24 2C |HG. .L.. . (N$,|
00000610: 31 29 20 B3 20 20 B1 20 22 2D 22 20 A7 20 38 31 |1) . . "-" . 81|
00000620: 00 44 0E 4D 00 53 4E 20 B2 20 53 4E 20 AB 20 31 |.D.M.SN . SN . 1|
00000630: 35 3A 20 8B 20 53 4E 20 B3 20 31 20 A7 20 53 4E |5: . SN . 1 . SN|
00000640: 20 B2 20 31 00 6A 0E 4E 00 46 49 20 B2 20 53 4E | . 1.j.N.FI . SN|
00000650: 20 AA 20 31 34 3A 20 8B 20 46 49 20 B3 20 31 35 | . 14: . FI . 15|
00000660: 20 A7 20 46 49 20 B2 20 31 35 00 82 0E 4F 00 8B | . FI . 15...O..|
00000670: 20 4E 46 20 B3 20 31 35 20 A7 20 46 49 20 B2 20 | NF . 15 . FI . |
00000680: 4E 46 00 8B 0E 50 00 89 20 35 39 00 9E 0E 51 00 |NF...P.. 59...Q.|
00000690: 8B 20 4E 43 25 20 B1 20 30 20 A7 20 38 35 00 BF |. NC% . 0 . 85..|
000006A0: 0E 52 00 53 4E 20 B2 20 53 4E 20 AA 20 31 35 3A |.R.SN . SN . 15:|
000006B0: 20 8B 20 53 4E 20 B1 20 4E 46 20 A7 20 35 37 00 | . SN . NF . 57.|
000006C0: E5 0E 53 00 46 49 20 B2 20 46 49 20 AA 20 31 35 |..S.FI . FI . 15|
000006D0: 3A 20 8B 20 46 49 20 B1 20 4E 46 20 A7 20 46 49 |: . FI . NF . FI|
000006E0: 20 B2 20 4E 46 00 EE 0E 54 00 89 20 35 39 00 14 | . NF...T.. 59..|
000006F0: 0F 55 00 8B 20 20 C8 20 28 4E 24 2C 31 29 20 B2 |.U.. . (N$,1) .|
00000700: 20 22 45 22 20 AF 20 4E 43 25 20 B2 20 31 20 A7 | "E" . NC% . 1 .|
00000710: 20 31 32 39 00 2B 0F 56 00 8B 20 4E 24 20 B2 20 | 129.+.V.. N$ . |
00000720: 22 41 4C 4C 22 20 A7 20 31 30 33 00 4B 0F 57 00 |"ALL" . 103.K.W.|
00000730: 4E 44 20 B2 20 20 C5 20 28 4E 24 29 3A 20 8B 20 |ND . . (N$): . |
00000740: 4E 44 20 B1 20 30 20 A7 20 39 30 00 61 0F 58 00 |ND . 0 . 90.a.X.|
00000750: 26 20 54 45 20 3A 20 99 22 93 22 20 3A 20 26 48 |& TE : ."." : &H|
00000760: 47 00 6A 0F 59 00 89 20 35 39 00 8D 0F 5A 00 8B |G.j.Y.. 59...Z..|
00000770: 20 4E 44 20 B1 20 20 B2 20 53 4E 20 AF 20 4E 44 | ND . . SN . ND|
00000780: 20 B3 20 20 B2 20 46 49 20 A7 20 39 32 00 96 0F | . . FI . 92...|
00000790: 5B 00 89 20 38 38 00 A6 0F 5C 00 3A 26 54 45 3A |[.. 88...\.:&TE:|
000007A0: 9E 31 39 33 34 31 00 D1 0F 5D 00 99 22 44 45 4C |.19341...].."DEL|
000007B0: 45 54 49 4E 47 20 22 3B 46 4C 24 28 4E 44 29 3A |ETING ";FL$(ND):|
000007C0: 46 4D 24 B2 46 4C 24 28 4E 44 29 3A 8D 20 31 34 |FM$.FL$(ND):. 14|
000007D0: 35 00 E3 0F 5E 00 98 31 35 2C 22 53 30 3A 22 AA |5...^..15,"S0:".|
000007E0: 46 4D 24 00 FB 0F 5F 00 8B 20 53 54 B3 B1 30 20 |FM$..._.. ST..0 |
000007F0: A7 20 8D 20 31 31 31 3A 89 39 37 00 16 10 60 00 |. . 111:.97...`.|
00000800: 8D 31 32 37 3A 20 99 22 46 49 4C 45 20 44 45 4C |.127: ."FILE DEL|
00000810: 45 54 45 44 21 22 00 21 10 61 00 9E 31 39 33 32 |ETED!".!.a..1932|
00000820: 38 00 2A 10 62 00 3A 26 48 47 00 3D 10 63 00 8B |8.*.b.:&HG.=.c..|
00000830: 20 4E 46 20 B2 20 31 20 A7 20 20 32 30 00 5F 10 | NF . 1 . 20._.|
00000840: 64 00 8B 20 4E 44 20 B2 20 4E 46 20 A7 20 4E 46 |d.. ND . NF . NF|
00000850: 20 B2 20 4E 46 20 AB 20 31 3A 20 89 20 35 37 00 | . NF . 1: . 57.|
00000860: 99 10 65 00 81 20 49 20 B2 20 4E 44 20 A4 20 4E |..e.. I . ND . N|
00000870: 46 20 AB 20 31 3A 46 4C 24 28 49 29 20 B2 20 46 |F . 1:FL$(I) . F|
00000880: 4C 24 28 49 20 AA 20 31 29 3A 20 82 20 3A 4E 46 |L$(I . 1): . :NF|
00000890: 20 B2 20 4E 46 20 AB 20 31 00 A2 10 66 00 89 20 | . NF . 1...f.. |
000008A0: 35 37 00 B9 10 67 00 26 20 54 45 20 3A 20 99 22 |57...g.& TE : ."|
000008B0: 93 22 3A 9E 31 39 33 34 31 00 CA 10 68 00 81 20 |.":.19341...h.. |
000008C0: 49 20 B2 20 31 20 A4 20 4E 46 00 F4 10 69 00 99 |I . 1 . NF...i..|
000008D0: 20 22 44 45 4C 45 54 49 4E 47 20 22 3B 46 4C 24 | "DELETING ";FL$|
000008E0: 28 49 29 3A 46 4D 24 B2 46 4C 24 28 49 29 3A 8D |(I):FM$.FL$(I):.|
000008F0: 20 31 34 35 00 06 11 6A 00 98 31 35 2C 22 53 30 | 145...j..15,"S0|
00000900: 3A 22 AA 46 4D 24 00 1F 11 6B 00 8B 20 53 54 B3 |:".FM$...k.. ST.|
00000910: B1 30 20 A7 20 8D 20 31 31 31 3A 89 31 30 39 00 |.0 . . 111:.109.|
00000920: 3D 11 6C 00 8D 20 31 32 37 3A 20 20 99 20 22 46 |=.l.. 127: . "F|
00000930: 49 4C 45 20 44 45 4C 45 54 45 44 21 22 00 4C 11 |ILE DELETED!".L.|
00000940: 6D 00 82 20 49 3A 9E 31 39 33 32 38 00 55 11 6E |m.. I:.19328.U.n|
00000950: 00 89 20 32 30 00 68 11 6F 00 84 31 35 2C 41 2C |.. 20.h.o..15,A,|
00000960: 58 24 2C 59 24 2C 5A 24 00 79 11 70 00 99 20 41 |X$,Y$,Z$.y.p.. A|
00000970: 2C 58 24 2C 59 24 2C 5A 24 00 84 11 71 00 9E 31 |,X$,Y$,Z$...q..1|
00000980: 39 33 32 38 00 8E 11 72 00 8D 20 31 32 31 00 9C |9328...r.. 121..|
00000990: 11 73 00 3A 26 54 45 3A 99 22 93 22 00 A7 11 74 |.s.:&TE:."."...t|
000009A0: 00 9E 31 39 33 34 31 00 AD 11 76 00 8E 00 EC 11 |..19341...v.....|
000009B0: 79 00 26 20 50 43 2C 31 2C 31 31 3A 20 26 20 54 |y.& PC,1,11: & T|
000009C0: 58 2C 22 D4 59 50 45 20 41 20 43 41 52 52 49 41 |X,".YPE A CARRIA|
000009D0: 47 45 20 52 45 54 55 52 4E 20 54 4F 20 43 4F 4E |GE RETURN TO CON|
000009E0: 54 49 4E 55 45 20 4F 52 20 41 4E 22 00 1B 12 7A |TINUE OR AN"...z|
000009F0: 00 26 20 50 43 2C 31 2C 31 32 3A 20 26 20 54 58 |.& PC,1,12: & TX|
00000A00: 2C 22 27 45 27 20 54 4F 20 45 58 49 54 20 54 48 |,"'E' TO EXIT TH|
00000A10: 45 20 50 52 4F 47 52 41 4D 2E 22 00 40 12 7C 00 |E PROGRAM.".@.|.|
00000A20: 4E 24 20 B2 20 22 20 22 3A 4C 20 B2 20 31 3A 20 |N$ . " ":L . 1: |
00000A30: 26 20 45 4E 2C 4E 24 2C 4C 2C 54 25 2C 4E 43 25 |& EN,N$,L,T%,NC%|
00000A40: 00 55 12 7D 00 8B 20 4E 24 20 B2 20 22 45 22 20 |.U.}.. N$ . "E" |
00000A50: A7 20 31 32 39 00 5B 12 7E 00 8E 00 71 12 7F 00 |. 129.[.~...q...|
00000A60: 81 20 50 41 B2 20 31 20 A4 20 31 30 30 30 3A 20 |. PA. 1 . 1000: |
00000A70: 82 00 77 12 80 00 8E 00 8E 12 81 00 3A 26 20 52 |..w.........:& R|
00000A80: 45 3A 20 A0 20 31 35 3A 9E 31 39 33 34 31 00 9F |E: . 15:.19341..|
00000A90: 12 82 00 93 22 48 45 4C 4C 4F 48 49 22 2C 38 00 |...."HELLOHI",8.|
00000AA0: A5 12 83 00 80 00 B9 12 87 00 A1 23 35 2C 54 24 |...........#5,T$|
00000AB0: 3A 81 4A 4A B2 31 A4 31 36 00 F6 12 88 00 A1 23 |:.JJ.1.16......#|
00000AC0: 35 2C 54 24 2C 54 24 2C 54 24 2C 54 24 2C 54 24 |5,T$,T$,T$,T$,T$|
00000AD0: 2C 54 24 2C 54 24 2C 54 24 2C 54 24 2C 54 24 2C |,T$,T$,T$,T$,T$,|
00000AE0: 54 24 2C 54 24 2C 54 24 2C 54 59 24 2C 54 24 2C |T$,T$,T$,TY$,T$,|
00000AF0: 54 24 3A 82 3A 8E 00 2F 13 89 00 A1 23 35 2C 54 |T$:.:../....#5,T|
00000B00: 24 2C 54 24 2C 54 24 2C 54 24 2C 54 24 2C 54 24 |$,T$,T$,T$,T$,T$|
00000B10: 2C 54 24 2C 54 24 2C 54 24 2C 54 24 2C 54 24 2C |,T$,T$,T$,T$,T$,|
00000B20: 54 24 2C 54 59 24 2C 54 24 2C 54 5A 24 3A 8E 00 |T$,TY$,T$,TZ$:..|
00000B30: 4E 13 8C 00 46 24 B2 22 22 3A 81 4A 4A B2 31 A4 |N...F$."":.JJ.1.|
00000B40: 35 3A A1 23 35 2C 54 24 2C 55 24 2C 56 24 00 65 |5:.#5,T$,U$,V$.e|
00000B50: 13 8D 00 46 24 B2 46 24 AA 54 24 AA 55 24 AA 56 |...F$.F$.T$.U$.V|
00000B60: 24 3A 82 3A 8E 00 75 13 91 00 4C 4C B2 C3 28 46 |$:.:..u...LL..(F|
00000B70: 4D 24 29 AB 34 00 82 13 92 00 81 4A 4A B2 31 A4 |M$).4......JJ.1.|
00000B80: 4C 4C 00 9F 13 93 00 8B 20 C6 28 C9 28 46 4D 24 |LL...... .(.(FM$|
00000B90: 2C 31 29 29 B3 B1 31 36 30 20 A7 20 31 34 39 00 |,1))..160 . 149.|
00000BA0: BF 13 94 00 4C 4D B2 C3 28 46 4D 24 29 3A 46 4D |....LM..(FM$):FM|
00000BB0: 24 B2 C8 28 46 4D 24 2C 4C 4D AB 31 29 3A 82 00 |$..(FM$,LM.1):..|
00000BC0: C5 13 95 00 8E 00 00 00 |........ |
.......55,255:.56,63.-.... 51,B(55):.52,
B(56).I.... 45,B(174):. 46,B(175).E....
47,B( 45):. 48,B( 46)...... 49,B( 45):.
50,B( 46).A...B$ . "SRF-3
": . MUST BE 30 BLANKS.P....
FL$(105)......19328..... 15:.15,8,15....
..".": & RE: & SY,1.2...& PC,8,7: & TX,"
STUDENT RECORD FILE (SRF)".A...& PC, 8,8
: & TX," DELETION PROGRAM ".L...NF
. 0. ...& PC,5,12: & TX,"PRESS RETURN T
O DELETE FILES.".S...& PC,5,18: & TX,"TO
EXIT PROGRAM: PRESS 'E'. ".....& PC,8,1
4:N$ . " ":L . 1: & EN,N$,L,T%,NC%. ....
N$ . "E" . 129: . EXIT.;...:&TE:. NC%
. . 0 . 20.I...."......................
RETRIEVING FILES".T.'..19341...(.. 5,8,5
,"$"...).J.257:. 135...*..I.1.8...+.J.15
:. 140...,.. C(F$).0. 50...-.. ST..0.F(H
(F$,1)).0 . 50...... H(F$,4)."SRF-" . C(
TY$)..0 . NF.NF.1:FL$(NF).F$.#./.J.15:.
137.?.0..I.8. .#5,T$,T$:TY$.TZ$.L.1.. I:
. 42.[.2. 5:.19328.C.3.&HG.X.4.. NF .
. 0 . 57...5.& TE : ."." : &HG...6.& PC,
8,8: & TX,"NO SRF'S FOUND ON DISK!".E.7.
. 127.N.8.. 21...9.SN . 1:FI . 15...:..
FI . NF . FI . NF...;.II . 2...<.& PC,3,
1: & TX,"STUDENT RECORD FILES".@.=.. I .
SN . FI.\.>.I$ . D (I):II . II . 1...?
.& PC,3,II: & TX,"(": & TX,I$: & TX,")".
.@.. I . 10 . & TX," "...A.& TX,FL$(I)
...B.. I...C.:&PC,1,21:&TX,"TYPE THE NUM
BER OF THE FILE THAT YOU".,.E.:&PC,1,22:
&TX,"WISH TO DELETE, OR 'ALL' TO DELETE
ALL".:.F.:&PC,1,23...G.:&TX,"SRF'S ON DI
SK, OR 'E' TO EXIT PROGRAM. HIT RETURN
TO SEE MORE SRF'S."...H.& PC,3,18: & TX,
"PLEASE MAKE A SELECTION. "...I.N$ . "E
":L . 3: & EN,N$,L,T%,NC%...J.. 127...K
.& TE : ."." : &HG. .L.. H (N$,1) . .
"-" . 81.D.M.SN . SN . 15: . SN . 1 . SN
. 1.J.N.FI . SN . 14: . FI . 15 . FI .
15...O.. NF . 15 . FI . NF...P.. 59...Q.
. NC% . 0 . 85...R.SN . SN . 15: . SN .
NF . 57...S.FI . FI . 15: . FI . NF . FI
. NF...T.. 59...U.. H (N$,1) . "E" . N
C% . 1 . 129.+.V.. N$ . "ALL" . 103.K.W.
ND . E (N$): . ND . 0 . 90.A.X.& TE : .
"." : &HG.J.Y.. 59...Z.. ND . . SN . ND
. . FI . 92...[.. 88...\.:&TE:.19341.Q
.].."DELETING ";FL$(ND):FM$.FL$(ND):. 14
5...^..15,"S0:".FM$..._.. ST..0 . . 111:
.97...`..127: ."FILE DELETED!".!.A..1932
8.*.B.:&HG.=.C.. NF . 1 . 20._.D.. ND .
NF . NF . NF . 1: . 57...E.. I . ND . N
F . 1:FL$(I) . FL$(I . 1): . :NF . NF .
1...F.. 57...G.& TE : .".":.19341.J.H..
I . 1 . NF...I.. "DELETING ";FL$(I):FM$.
FL$(I):. 145...J..15,"S0:".FM$...K.. ST.
.0 . . 111:.109.=.L.. 127: . "FILE DELE
TED!".L.M.. I:.19328.U.N.. 20.H.O..15,A,
X$,Y$,Z$.Y.P.. A,X$,Y$,Z$...Q..19328...R
.. 121...S.:&TE:."."...T..19341...V.....
Y.& PC,1,11: & TX,"TYPE A CARRIAGE RETUR
N TO CONTINUE OR AN"...Z.& PC,1,12: & TX
,"'E' TO EXIT THE PROGRAM.".@.|.N$ . " "
:L . 1: & EN,N$,L,T%,NC%.U.}.. N$ . "E"
. 129.[.~...Q... PA. 1 . 1000: ..W.....
....:& RE: 15:.19341......"HELLOHI",8.
...........#5,T$:.JJ.1.16......#5,T$,T$,
T$,T$,T$,T$,T$,T$,T$,T$,T$,T$,T$,TY$,T$,
T$:.:../....#5,T$,T$,T$,T$,T$,T$,T$,T$,T
$,T$,T$,T$,TY$,T$,TZ$:..N...F$."":.JJ.1.
5:.#5,T$,U$,V$.E...F$.F$.T$.U$.V$:.:..U.
..LL.C(FM$).4......JJ.1.LL...... F(I(FM$
,1))..160 . 149.....LM.C(FM$):FM$.H(FM$,
LM.1):..E.......
> CLICK IMAGE PREVIEW FOR FULL MODAL