FILE MENU
FILE INFORMATION
FILENAME(S): FILE MENU
FILE TYPE(S): PRG
FILE SIZE: 2.2K
FIRST SEEN: 2025-11-30 20:14:47
APPEARS ON: 3 disk(s)
FILE HASH
f556ce2e978eda97ec4064e2c84fa70117703ec9acb53138eab298169ed56b52
FOUND ON DISKS (3 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PER CEDERHOLM | FILE MENU | PRG | Curtcool, LPN | 19 | 0 | DOWNLOAD FILE |
| PRACTIFILE | FILE MENU | PRG | Curtcool, LPN | 19 | 0 | DOWNLOAD FILE |
| PRACTIFILE | FILE MENU | PRG | Curtcool, LPN | 19 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 33 08 00 00 4C 4C 24 B2 22 22 3A 8F 20 46 |..3...LL$."":. F| 00000010: 4C 45 58 20 46 49 4C 45 20 32 2E 30 20 28 43 29 |LEX FILE 2.0 (C)| 00000020: 20 31 39 38 32 20 4D 49 43 48 41 45 4C 20 52 49 | 1982 MICHAEL RI| 00000030: 4C 45 59 00 3E 08 01 00 89 20 31 31 30 30 00 77 |LEY.>.... 1100.w| 00000040: 08 02 00 9F 20 31 35 2C 38 2C 31 35 2C 22 49 30 |.... 15,8,15,"I0| 00000050: 22 3A 98 31 35 2C 22 53 30 3A 46 49 4C 45 20 4D |":.15,"S0:FILE M| 00000060: 45 4E 55 22 3A 94 22 30 3A 46 49 4C 45 20 4D 45 |ENU":."0:FILE ME| 00000070: 4E 55 22 2C 38 3A 80 00 A3 08 03 00 99 22 43 4F |NU",8:......."CO| 00000080: 52 52 45 43 54 49 4F 4E 53 3F 28 12 59 92 2F 12 |RRECTIONS?(.Y./.| 00000090: 4E 92 29 22 3A 47 31 24 B2 22 59 4E 22 3A 8D 20 |N.)":G1$."YN":. | 000000A0: 35 3A 8E 00 B1 08 04 00 9F 34 2C 34 3A 9D 34 3A |5:.......4,4:.4:| 000000B0: 9B 00 DB 08 05 00 A1 47 24 3A 81 56 B2 31 A4 C3 |.......G$:.V.1..| 000000C0: 28 47 31 24 29 3A 8B 47 24 B3 B1 CA 28 47 31 24 |(G1$):.G$...(G1$| 000000D0: 2C 56 2C 31 29 A7 82 56 3A 89 35 00 E1 08 06 00 |,V,1)..V:.5.....| 000000E0: 8E 00 FD 08 08 00 84 4B 4B 28 56 4F 29 2C 45 2C |.......KK(VO),E,| 000000F0: 45 24 2C 53 2C 54 3A 8B 45 B3 32 A7 8E 00 18 09 |E$,S,T:.E.2.....| 00000100: 09 00 99 22 44 49 53 4B 20 45 52 52 4F 52 3A 22 |..."DISK ERROR:"| 00000110: 45 3B 45 24 3B 53 3B 54 00 36 09 0A 00 99 22 11 |E;E$;S;T.6....".| 00000120: 12 52 92 45 41 44 59 3F 22 3A 47 31 24 B2 22 52 |.R.EADY?":G1$."R| 00000130: 22 3A 8D 35 3A 8E 00 46 09 0B 00 8F 20 46 49 4C |":.5:..F.... FIL| 00000140: 45 20 4D 45 4E 55 00 59 09 0D 00 8F 20 53 54 41 |E MENU.Y.... STA| 00000150: 52 54 20 41 52 52 41 59 53 00 6A 09 0F 00 8F 20 |RT ARRAYS.j.... | 00000160: 54 52 41 4E 53 20 44 49 53 50 00 78 09 11 00 8F |TRANS DISP.x....| 00000170: 20 52 41 20 4F 50 45 4E 00 88 09 13 00 8F 20 53 | RA OPEN...... S| 00000180: 41 56 45 20 42 4F 4F 4B 00 93 09 2C 00 8F 20 59 |AVE BOOK...,.. Y| 00000190: 45 53 3F 00 A2 09 31 00 41 53 4B 20 4E 55 4D 42 |ES?...1.ASK NUMB| 000001A0: 45 52 00 B1 09 51 00 8F 20 56 49 45 57 20 44 49 |ER...Q.. VIEW DI| 000001B0: 52 00 BC 09 5B 00 8F 20 45 58 49 54 00 CC 09 5C |R...[.. EXIT...\| 000001C0: 00 8F 20 4C 4F 41 44 20 50 52 4F 47 00 DF 09 84 |.. LOAD PROG....| 000001D0: 03 81 58 B2 31 A4 33 30 30 30 3A 82 58 3A 8E 00 |..X.1.3000:.X:..| 000001E0: E5 09 E8 03 8F 00 F5 09 4C 04 8F 20 46 49 4C 45 |........L.. FILE| 000001F0: 20 4D 45 4E 55 00 0A 0A 51 04 8B 4C 49 B3 32 35 | MENU...Q..LI.25| 00000200: 33 A7 97 49 56 2C 4C 49 AA 33 00 2F 0A 5B 04 8B |3..IV,LI.3./.[..| 00000210: 20 53 50 20 A7 20 8D 20 31 39 30 30 3A 53 50 B2 | SP . . 1900:SP.| 00000220: 30 3A 8F 20 53 41 46 45 54 59 20 53 41 56 45 00 |0:. SAFETY SAVE.| 00000230: 41 0A 60 04 8D 20 31 35 30 30 3A 8F 20 44 49 53 |A.`.. 1500:. DIS| 00000240: 50 00 69 0A 65 04 47 31 24 B2 22 5E 44 4D 52 43 |P.i.e.G1$."^DMRC| 00000250: 4C 41 46 42 56 22 3A 8B 20 58 46 20 A7 20 47 31 |LAFBV":. XF . G1| 00000260: 24 B2 47 31 24 AA 22 55 22 00 71 0A 6A 04 8D 20 |$.G1$."U".q.j.. | 00000270: 35 00 B2 0A 6B 04 91 20 56 20 8D 20 31 31 33 35 |5...k.. V . 1135| 00000280: 2C 31 31 34 30 2C 31 31 34 35 2C 31 31 35 30 2C |,1140,1145,1150,| 00000290: 31 31 35 35 2C 31 31 36 30 2C 31 31 36 35 2C 31 |1155,1160,1165,1| 000002A0: 31 37 30 2C 31 31 37 35 2C 31 31 38 30 2C 31 31 |170,1175,1180,11| 000002B0: 39 30 00 BD 0A 6C 04 89 20 31 31 30 35 00 D1 0A |90...l.. 1105...| 000002C0: 6F 04 8D 20 39 31 30 30 3A 8E 3A 8F 20 45 58 49 |o.. 9100:.:. EXI| 000002D0: 54 00 EA 0A 74 04 58 24 B2 22 44 49 52 45 43 54 |T...t.X$."DIRECT| 000002E0: 22 3A 8D 20 39 32 30 30 3A 8E 00 08 0B 79 04 58 |":. 9200:....y.X| 000002F0: 24 B2 22 4D 41 49 4C 20 4C 41 42 45 4C 53 22 3A |$."MAIL LABELS":| 00000300: 8D 20 39 32 30 30 3A 8E 00 28 0B 7E 04 58 24 B2 |. 9200:..(.~.X$.| 00000310: 22 52 45 50 4F 52 54 20 57 52 49 54 45 52 22 3A |"REPORT WRITER":| 00000320: 8D 20 39 32 30 30 3A 8E 00 45 0B 83 04 58 24 B2 |. 9200:..E...X$.| 00000330: 22 43 52 45 41 54 45 20 53 45 51 22 3A 8D 20 39 |"CREATE SEQ":. 9| 00000340: 32 30 30 3A 8E 00 60 0B 88 04 58 24 B2 22 4C 4F |200:..`...X$."LO| 00000350: 41 44 20 53 45 51 22 3A 8D 20 39 32 30 30 3A 8E |AD SEQ":. 9200:.| 00000360: 00 7E 0B 8D 04 58 24 B2 22 41 4C 50 48 41 20 4F |.~...X$."ALPHA O| 00000370: 52 44 45 52 22 3A 8D 20 39 32 30 30 3A 8E 00 9A |RDER":. 9200:...| 00000380: 0B 92 04 58 24 B2 22 43 41 4C 43 20 46 49 4C 45 |...X$."CALC FILE| 00000390: 22 3A 8D 20 39 32 30 30 3A 8E 00 B8 0B 97 04 58 |":. 9200:......X| 000003A0: 24 B2 22 42 41 54 43 48 20 45 4E 54 52 59 22 3A |$."BATCH ENTRY":| 000003B0: 8D 20 39 32 30 30 3A 8E 00 C9 0B 9C 04 8D 31 34 |. 9200:.......14| 000003C0: 30 30 3A 89 20 31 31 30 30 00 E2 0B A6 04 58 24 |00:. 1100.....X$| 000003D0: B2 22 55 50 44 41 54 45 22 3A 8D 20 39 32 30 30 |."UPDATE":. 9200| 000003E0: 3A 8E 00 F1 0B 78 05 8F 20 56 49 45 57 20 44 49 |:....x.. VIEW DI| 000003F0: 52 00 2A 0C 7D 05 99 22 93 22 3B 3A 8B 44 54 B1 |R.*.}..".";:.DT.| 00000400: 31 A7 99 22 11 44 52 49 56 45 3F 28 12 31 92 2F |1..".DRIVE?(.1./| 00000410: 12 30 92 29 22 3A 47 31 24 B2 22 31 30 22 3A 8D |.0.)":G1$."10":.| 00000420: 35 3A 56 4F B2 C5 28 47 24 29 00 49 0C 82 05 8B |5:VO..(G$).I....| 00000430: 44 54 B2 31 A7 99 22 11 12 49 4E 53 45 52 54 20 |DT.1.."..INSERT | 00000440: 44 49 53 4B 22 3A 8D 31 30 00 60 0C 87 05 98 4B |DISK":.10.`....K| 00000450: 4B 28 56 4F 29 2C 22 49 22 44 52 24 28 56 4F 29 |K(VO),"I"DR$(VO)| 00000460: 00 88 0C 8C 05 9F 53 45 2C 44 56 28 56 4F 29 2C |......SE,DV(VO),| 00000470: 30 2C 22 24 22 AA 44 52 24 28 56 4F 29 3A 8D 38 |0,"$".DR$(VO):.8| 00000480: 3A 8B 45 A7 31 34 35 35 00 98 0C 91 05 A1 23 53 |:.E.1455......#S| 00000490: 45 2C 58 24 2C 58 31 24 00 BD 0C 96 05 A1 23 53 |E,X$,X1$......#S| 000004A0: 45 2C 58 24 2C 58 31 24 3A A1 47 24 3A 8B 58 24 |E,X$,X1$:.G$:.X$| 000004B0: B2 22 22 A7 8D 31 30 3A 89 31 34 35 35 00 FB 0C |.""..10:.1455...| 000004C0: 9B 05 3A 8B 47 24 B3 B1 22 22 A7 99 22 12 43 92 |..:.G$..""..".C.| 000004D0: 4F 4E 54 49 4E 55 45 2C 12 5E 92 52 45 54 55 52 |ONTINUE,.^.RETUR| 000004E0: 4E 22 3A 47 31 24 B2 22 43 5E 22 3A 8D 35 3A 8B |N":G1$."C^":.5:.| 000004F0: 47 24 B2 22 5E 22 A7 31 34 35 35 00 25 0D A0 05 |G$."^".1455.%...| 00000500: 3A A1 23 53 45 2C 58 24 2C 58 31 24 3A 99 C6 28 |:.#SE,X$,X1$:..(| 00000510: 58 24 AA 5A 24 29 AA 32 35 36 AC C6 28 58 31 24 |X$.Z$).256..(X1$| 00000520: AA 5A 24 29 3B 00 4B 0D A5 05 3A 20 81 58 B2 31 |.Z$);.K...: .X.1| 00000530: A4 39 39 39 3A A1 23 53 45 2C 58 24 3A 8B 58 24 |.999:.#SE,X$:.X$| 00000540: B3 B1 22 22 A7 99 58 24 3B 3A 82 00 57 0D AA 05 |..""..X$;:..W...| 00000550: 99 3A 89 31 34 33 30 00 62 0D AF 05 A0 20 53 45 |.:.1430.b.... SE| 00000560: 3A 8E 00 73 0D DC 05 8F 20 54 52 41 4E 53 20 44 |:..s.... TRANS D| 00000570: 49 53 50 00 8B 0D E1 05 99 22 93 22 A3 31 33 29 |ISP......".".13)| 00000580: 22 12 46 49 4C 45 20 4D 45 4E 55 00 C7 0D E6 05 |".FILE MENU.....| 00000590: 8B 20 B8 28 30 29 B3 31 30 30 30 A7 20 99 22 11 |. .(0).1000. .".| 000005A0: 12 57 41 52 4E 49 4E 47 3A 20 4F 4E 4C 59 22 B8 |.WARNING: ONLY".| 000005B0: 28 30 29 22 9D 20 42 59 54 45 53 20 46 52 45 45 |(0)". BYTES FREE| 000005C0: 20 49 4E 20 52 41 4D 00 DF 0D EB 05 99 22 11 12 | IN RAM......"..| 000005D0: 56 92 49 45 57 20 44 49 52 45 43 54 4F 52 59 00 |V.IEW DIRECTORY.| 000005E0: 0E 0E F0 05 8B 4D 54 B3 B1 32 A7 99 22 11 12 44 |.....MT..2.."..D| 000005F0: 92 49 52 45 43 54 20 46 49 4C 45 20 4D 41 49 4E |.IRECT FILE MAIN| 00000600: 54 45 4E 41 4E 43 45 22 3A 89 31 35 32 35 00 2A |TENANCE":.1525.*| 00000610: 0E F1 05 3A 99 22 11 12 44 92 49 52 45 43 54 20 |...:."..D.IRECT | 00000620: 46 49 4C 45 20 4D 41 49 4E 54 00 3F 0E F5 05 99 |FILE MAINT.?....| 00000630: 22 11 12 42 92 41 54 43 48 20 45 4E 54 52 59 00 |"..B.ATCH ENTRY.| 00000640: 54 0E FA 05 99 22 11 12 4D 92 41 49 4C 20 4C 41 |T...."..M.AIL LA| 00000650: 42 45 4C 53 00 6C 0E FF 05 99 22 11 12 52 92 45 |BELS.l...."..R.E| 00000660: 50 4F 52 54 20 57 52 49 54 45 52 22 00 85 0E 04 |PORT WRITER"....| 00000670: 06 99 22 11 12 43 92 52 45 41 54 45 20 53 45 51 |.."..C.REATE SEQ| 00000680: 20 46 49 4C 45 00 A1 0E 09 06 99 22 11 12 4C 92 | FILE......"..L.| 00000690: 4F 41 44 20 46 52 4F 4D 20 53 45 51 20 46 49 4C |OAD FROM SEQ FIL| 000006A0: 45 00 D3 0E 0E 06 8B 20 4D 54 B3 B1 32 A7 20 99 |E...... MT..2. .| 000006B0: 22 11 12 41 92 4C 50 48 41 42 45 54 49 43 41 4C |"..A.LPHABETICAL| 000006C0: 20 52 45 4F 52 44 45 52 49 4E 47 22 3A 89 20 31 | REORDERING":. 1| 000006D0: 35 35 35 00 EE 0E 0F 06 3A 99 22 11 12 41 92 4C |555.....:."..A.L| 000006E0: 50 48 41 20 52 45 4F 52 44 45 52 49 4E 47 00 09 |PHA REORDERING..| 000006F0: 0F 13 06 99 22 11 12 46 92 49 4C 45 20 43 41 4C |...."..F.ILE CAL| 00000700: 43 55 4C 41 54 49 4F 4E 53 00 20 0F 18 06 8B 20 |CULATIONS. .... | 00000710: 58 46 20 A7 20 99 22 11 12 55 92 50 44 41 54 45 |XF . ."..U.PDATE| 00000720: 00 4B 0F 1D 06 8B 20 4D 54 B3 B1 32 20 A7 20 99 |.K.... MT..2 . .| 00000730: 22 11 12 5E 92 20 52 45 54 55 52 4E 20 54 4F 20 |"..^. RETURN TO | 00000740: 22 4D 4D 24 3A 89 20 31 35 37 30 00 63 0F 1E 06 |"MM$:. 1570.c...| 00000750: 3A 99 22 11 12 5E 92 20 52 54 4E 20 54 4F 20 22 |:."..^. RTN TO "| 00000760: 4D 4D 24 00 69 0F 22 06 8E 00 9B 0F 2E 13 58 24 |MM$.i.".......X$| 00000770: B2 CA 28 C4 28 58 24 29 2C 32 29 3A 8D 34 35 30 |..(.(X$),2):.450| 00000780: 30 3A 58 B2 C5 28 58 24 29 3A 8B 58 B2 30 AF 58 |0:X..(X$):.X.0.X| 00000790: 24 B3 B1 22 30 22 A7 34 39 31 32 00 AE 0F 2F 13 |$.."0".4912.../.| 000007A0: 8B 58 B2 B1 58 31 AF 58 B2 B3 58 32 A7 8E 00 DC |.X..X1.X..X2....| 000007B0: 0F 30 13 99 22 12 49 4C 4C 45 47 41 4C 20 45 4E |.0..".ILLEGAL EN| 000007C0: 54 52 59 20 2D 20 50 4C 45 41 53 45 20 45 4E 54 |TRY - PLEASE ENT| 000007D0: 45 52 20 41 20 4E 55 4D 42 45 52 22 00 04 10 33 |ER A NUMBER"...3| 000007E0: 13 99 22 12 49 4E 20 54 48 45 20 52 41 4E 47 45 |..".IN THE RANGE| 000007F0: 20 4F 46 22 58 31 22 9D 20 54 4F 22 58 32 3A 89 | OF"X1". TO"X2:.| 00000800: 34 39 30 30 00 0F 10 8C 23 8F 20 45 58 49 54 00 |4900....#. EXIT.| 00000810: 47 10 91 23 99 22 11 41 52 45 20 59 4F 55 20 53 |G..#.".ARE YOU S| 00000820: 55 52 45 28 12 59 92 2F 12 4E 92 29 3F 22 3A 47 |URE(.Y./.N.)?":G| 00000830: 31 24 B2 22 59 4E 22 3A 8D 20 35 3A 8B 20 47 24 |1$."YN":. 5:. G$| 00000840: B2 22 4E 22 A7 20 8E 00 5B 10 96 23 58 24 B2 4D |."N". ..[..#X$.M| 00000850: 4D 24 3A 8D 20 39 32 30 30 3A 8E 00 6B 10 F0 23 |M$:. 9200:..k..#| 00000860: 8F 20 4C 4F 41 44 20 50 52 4F 47 00 8E 10 F5 23 |. LOAD PROG....#| 00000870: 98 4B 4B 28 30 29 2C 22 49 30 22 3A 99 22 11 28 |.KK(0),"I0":.".(| 00000880: 4C 4F 41 44 49 4E 47 20 22 58 24 22 29 22 00 C1 |LOADING "X$")"..| 00000890: 10 FA 23 9F 20 53 45 2C 38 2C 53 45 2C 22 30 3A |..#. SE,8,SE,"0:| 000008A0: 22 AA 58 24 AA 22 2C 50 2C 52 22 3A 56 4F B2 30 |".X$.",P,R":VO.0| 000008B0: 3A 8D 20 38 3A A0 20 53 45 3A 8B 20 45 20 A7 20 |:. 8:. SE:. E . | 000008C0: 8E 00 D8 10 FF 23 8B 20 4C 49 B3 32 35 33 20 A7 |.....#. LI.253 .| 000008D0: 20 97 20 49 56 2C 4C 49 00 EA 10 04 24 93 20 22 | . IV,LI....$. "| 000008E0: 30 3A 22 AA 58 24 2C 38 3A 90 00 00 00 4F 23 24 |0:".X$,8:....O#$| 000008F0: 3A DA 24 22 |:.$" |
..3...LL$."":. FLEX FILE 2.0 (C) 1982 MI CHAEL RILEY.>.... 1100.W.... 15,8,15,"I0 ":.15,"S0:FILE MENU":."0:FILE MENU",8:.. ....."CORRECTIONS?(.Y./.N.)":G1$."YN":. 5:.......4,4:.4:.......G$:.V.1.C(G1$):.G $..J(G1$,V,1)..V:.5............KK(VO),E, E$,S,T:.E.2........"DISK ERROR:"E;E$;S;T .6...."..R.EADY?":G1$."R":.5:..F.... FIL E MENU.Y.... START ARRAYS.J.... TRANS DI SP.X.... RA OPEN...... SAVE BOOK...,.. Y ES?...1.ASK NUMBER...Q.. VIEW DIR...[.. EXIT.L.\.. LOAD PROG......X.1.3000:.X:.. ........L.. FILE MENU...Q..LI.253..IV,LI .3./.[.. SP . . 1900:SP.0:. SAFETY SAVE. A.`.. 1500:. DISP.I.E.G1$."^DMRCLAFBV":. XF . G1$.G1$."U".Q.J.. 5...K.. V . 1135 ,1140,1145,1150,1155,1160,1165,1170,1175 ,1180,1190...L.. 1105.Q.O.. 9100:.:. EXI T...T.X$."DIRECT":. 9200:....Y.X$."MAIL LABELS":. 9200:..(.~.X$."REPORT WRITER": . 9200:..E...X$."CREATE SEQ":. 9200:..`. ..X$."LOAD SEQ":. 9200:..~...X$."ALPHA O RDER":. 9200:......X$."CALC FILE":. 9200 :......X$."BATCH ENTRY":. 9200:..I....14 00:. 1100.....X$."UPDATE":. 9200:....X.. VIEW DIR.*.}..".";:.DT.1..".DRIVE?(.1./ .0.)":G1$."10":.5:VO.E(G$).I....DT.1..". .INSERT DISK":.10.`....KK(VO),"I"DR$(VO) ......SE,DV(VO),0,"$".DR$(VO):.8:.E.1455 ......#SE,X$,X1$......#SE,X$,X1$:.G$:.X$ .""..10:.1455.....:.G$..""..".C.ONTINUE, .^.RETURN":G1$."C^":.5:.G$."^".1455.%. . :.#SE,X$,X1$:.F(X$.Z$).256.F(X1$.Z$);.K. ..: .X.1.999:.#SE,X$:.X$..""..X$;:..W... .:.1430.B... SE:..S.... TRANS DISP..... .".".13)".FILE MENU.G.... .(0).1000. .". .WARNING: ONLY".(0)". BYTES FREE IN RAM. ....."..V.IEW DIRECTORY......MT..2.."..D .IRECT FILE MAINTENANCE":.1525.*...:.".. D.IRECT FILE MAINT.?...."..B.ATCH ENTRY. T...."..M.AIL LABELS.L...."..R.EPORT WRI TER"......"..C.REATE SEQ FILE......"..L. OAD FROM SEQ FILE.S.... MT..2. ."..A.LPH ABETICAL REORDERING":. 1555.....:."..A.L PHA REORDERING......"..F.ILE CALCULATION S. .... XF . ."..U.PDATE.K.... MT..2 . . "..^. RETURN TO "MM$:. 1570.C...:."..^. RTN TO "MM$.I.".......X$.J(D(X$),2):.450 0:X.E(X$):.X.0.X$.."0".4912.../..X..X1.X ..X2.....0..".ILLEGAL ENTRY - PLEASE ENT ER A NUMBER"...3..".IN THE RANGE OF"X1". TO"X2:.4900....#. EXIT.G..#.".ARE YOU S URE(.Y./.N.)?":G1$."YN":. 5:. G$."N". .. [..#X$.MM$:. 9200:..K..#. LOAD PROG....# .KK(0),"I0":.".(LOADING "X$")".A..#. SE, 8,SE,"0:".X$.",P,R":VO.0:. 8: SE:. E . ..X..#. LI.253 . . IV,LI....$. "0:".X$,8 :....O#$:Z$"
> CLICK IMAGE PREVIEW FOR FULL MODAL