AUTOMENU 1541
FILE INFORMATION
FILENAME(S): AUTOMENU 1541
FILE TYPE(S): PRG
FILE SIZE: 1.1K
FIRST SEEN: 2025-11-30 19:47:23
APPEARS ON: 1 disk(s)
FILE HASH
0c8f55d6341c6788eb21591c40136308872baba41928dd6bebf83cc64282b9a4
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| HJ LPEDISK A6 1 | AUTOMENU 1541 | PRG | Curtcool, Frank | 3 | 7 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 29 08 BE 00 41 45 24 B2 22 22 3A 41 4E B2 |..)...AE$."":AN.| 00000010: 30 3A 41 30 B2 30 3A 43 24 B2 22 22 3A 44 45 B2 |0:A0.0:C$."":DE.| 00000020: 30 3A 44 52 24 B2 22 30 22 00 4F 08 C8 00 45 52 |0:DR$."0".O...ER| 00000030: B2 30 3A 46 24 B2 22 22 3A 46 4C B2 30 3A 49 B2 |.0:F$."":FL.0:I.| 00000040: 30 3A 4A B2 30 3A 4D 4D B2 30 3A 4D 4E B2 30 00 |0:J.0:MM.0:MN.0.| 00000050: 6C 08 D2 00 86 41 45 24 28 31 35 30 29 20 3A 97 |l....AE$(150) :.| 00000060: 35 33 32 38 31 2C 30 3A 99 22 05 22 00 86 08 DC |53281,0:."."....| 00000070: 00 97 35 33 32 38 30 2C 30 3A 20 9F 31 2C 38 2C |..53280,0: .1,8,| 00000080: 31 35 2C 22 49 22 00 8D 08 E6 00 A0 31 00 BD 08 |15,"I"......1...| 00000090: F0 00 99 22 93 12 41 55 54 4F 4D 45 4E 55 20 46 |..."..AUTOMENU F| 000000A0: 4F 52 20 31 35 34 31 20 44 49 53 4B 45 54 54 45 |OR 1541 DISKETTE| 000000B0: 20 53 54 41 54 49 4F 4E 20 2E 2E 2E 2E 00 E2 08 | STATION .......| 000000C0: FA 00 99 22 11 11 11 11 41 4E 54 41 4C 20 50 52 |..."....ANTAL PR| 000000D0: 4F 47 52 41 4D 4D 45 52 20 46 55 4E 44 45 54 20 |OGRAMMER FUNDET | 000000E0: 3A 22 00 FC 08 04 01 9F 38 2C 38 2C 35 2C 22 24 |:"......8,8,5,"$| 000000F0: 22 AA 44 52 24 AA 22 2C 53 45 51 22 00 12 09 0E |".DR$.",SEQ"....| 00000100: 01 81 51 B2 31 A4 32 35 34 3A A1 23 38 2C 43 24 |..Q.1.254:.#8,C$| 00000110: 3A 82 00 2F 09 18 01 81 44 45 B2 31 A4 38 3A 46 |:../....DE.1.8:F| 00000120: 24 B2 22 22 3A A1 23 38 2C 43 24 28 44 45 29 00 |$."":.#8,C$(DE).| 00000130: 46 09 22 01 8B 43 24 28 44 45 29 B2 C7 28 31 39 |F."..C$(DE)..(19| 00000140: 39 29 A7 34 31 30 00 5F 09 2C 01 8B 43 24 28 44 |9).410._.,..C$(D| 00000150: 45 29 B2 22 22 A7 4A B2 32 39 3A 89 33 37 30 00 |E)."".J.29:.370.| 00000160: 7D 09 36 01 8B C6 28 43 24 28 44 45 29 29 B3 B1 |}.6...(C$(DE))..| 00000170: 31 33 30 A7 4A B2 32 39 3A 89 33 37 30 00 9C 09 |130.J.29:.370...| 00000180: 40 01 41 4E B2 41 4E AA 31 3A 4A B2 31 31 3A A1 |@.AN.AN.1:J.11:.| 00000190: 23 38 2C 43 24 3A A1 23 38 2C 43 24 00 BA 09 4A |#8,C$:.#8,C$...J| 000001A0: 01 81 51 B2 31 A4 31 36 3A A1 23 38 2C 43 24 3A |..Q.1.16:.#8,C$:| 000001B0: 46 24 B2 46 24 AA 43 24 3A 82 00 CC 09 5E 01 99 |F$.F$.C$:....^..| 000001C0: 22 91 22 A3 32 36 29 41 4E AB 41 30 00 E3 09 68 |".".26)AN.A0...h| 000001D0: 01 41 45 24 28 41 4E 29 B2 44 52 24 AA 22 3A 22 |.AE$(AN).DR$.":"| 000001E0: AA 46 24 00 F7 09 72 01 81 49 B2 31 A4 4A 3A A1 |.F$...r..I.1.J:.| 000001F0: 23 38 2C 43 24 3A 82 00 10 0A 7C 01 8B 44 45 B3 |#8,C$:....|..DE.| 00000200: B1 38 A7 A1 23 38 2C 43 24 3A A1 23 38 2C 43 24 |.8..#8,C$:.#8,C$| 00000210: 00 1B 0A 86 01 82 3A 89 32 38 30 00 3C 0A 90 01 |......:.280.<...| 00000220: 99 22 11 49 4E 47 45 4E 20 44 49 53 4B 45 54 54 |.".INGEN DISKETT| 00000230: 45 20 49 20 44 52 45 56 45 54 11 22 00 47 0A 9A |E I DREVET.".G..| 00000240: 01 A0 38 3A A0 31 35 00 74 0A AE 01 8B 41 4E B2 |..8:.15.t....AN.| 00000250: 30 A7 99 22 11 11 49 4E 47 45 4E 20 50 52 4F 47 |0.."..INGEN PROG| 00000260: 52 41 4D 4D 45 52 20 50 41 41 20 44 49 53 4B 45 |RAMMER PAA DISKE| 00000270: 4E 22 3A 80 00 A3 0A B8 01 4D 4D B2 39 3A 99 22 |N":......MM.9:."| 00000280: 93 11 22 A3 31 32 29 22 12 50 52 4F 47 52 41 4D |..".12)".PROGRAM| 00000290: 20 4D 45 4E 55 20 23 22 C4 28 4D 4E AA 31 29 22 | MENU #".(MN.1)"| 000002A0: 11 11 22 00 CE 0A C2 01 81 49 B2 31 A4 39 3A 8B |.."......I.1.9:.| 000002B0: 41 45 24 28 4D 4E AC 39 AA 49 29 B2 22 22 A7 4D |AE$(MN.9.I)."".M| 000002C0: 4D B2 49 AB 31 3A 49 B2 39 3A 89 34 37 30 00 F9 |M.I.1:I.9:.470..| 000002D0: 0A CC 01 99 A3 31 32 29 C9 28 C4 28 49 29 2C 31 |.....12).(.(I),1| 000002E0: 29 22 20 22 CA 28 41 45 24 28 4D 4E AC 39 AA 49 |)" ".(AE$(MN.9.I| 000002F0: 29 2C 33 2C 31 36 29 22 11 00 2C 0B D6 01 82 3A |),3,16)"..,....:| 00000300: 99 22 11 11 20 56 41 45 4C 47 20 45 4E 20 45 4C |.".. VAELG EN EL| 00000310: 4C 45 52 20 54 52 59 4B 20 52 45 54 55 52 4E 20 |LER TRYK RETURN | 00000320: 46 4F 52 20 4E 59 20 4D 45 4E 55 91 00 3F 0B EA |FOR NY MENU..?..| 00000330: 01 A1 43 24 3A 8B 43 24 B2 22 22 A7 34 39 30 00 |..C$:.C$."".490.| 00000340: 53 0B F4 01 8B 20 43 24 B3 B1 C7 28 31 33 29 A7 |S.... C$...(13).| 00000350: 35 33 30 00 6F 0B FE 01 4D 4E B2 4D 4E AA 31 3A |530.o...MN.MN.1:| 00000360: 8B 4D 4E AC 39 AA 31 B1 41 4E A7 4D 4E B2 30 00 |.MN.9.1.AN.MN.0.| 00000370: 78 0B 08 02 89 34 34 30 00 92 0B 12 02 8B C5 28 |x....440.......(| 00000380: 43 24 29 B3 31 B0 C5 28 43 24 29 B1 4D 4D A7 34 |C$).1..(C$).MM.4| 00000390: 39 30 00 AA 0B 1C 02 41 45 24 B2 41 45 24 28 4D |90.....AE$.AE$(M| 000003A0: 4E AC 39 AA C5 28 43 24 29 29 00 DB 0B 26 02 99 |N.9..(C$))...&..| 000003B0: 3A 99 22 93 11 11 11 11 56 41 4C 47 54 20 4D 45 |:.".....VALGT ME| 000003C0: 4E 55 20 4E 52 20 3A 20 22 43 24 22 20 2D 20 22 |NU NR : "C$" - "| 000003D0: CA 28 41 45 24 2C 33 2C 31 36 29 00 EF 0B 30 02 |.(AE$,3,16)...0.| 000003E0: 81 49 B2 31 38 A4 31 A9 AB 31 3A 46 4C B2 49 00 |.I.18.1..1:FL.I.| 000003F0: 0B 0C 3A 02 8B C6 28 CA 28 41 45 24 2C 49 2C 31 |..:...(.(AE$,I,1| 00000400: 29 29 B3 B1 31 36 30 A7 49 B2 31 00 39 0C 44 02 |))..160.I.1.9.D.| 00000410: 82 3A 99 22 90 11 11 11 11 4C 4F 41 44 22 C7 28 |.:.".....LOAD".(| 00000420: 33 34 29 C8 28 41 45 24 2C 46 4C 29 C7 28 33 34 |34).(AE$,FL).(34| 00000430: 29 22 2C 38 11 11 11 11 22 00 44 0C 4E 02 99 22 |)",8....".D.N.."| 00000440: 52 55 4E 22 00 55 0C 4F 02 99 22 91 91 91 91 91 |RUN".U.O..".....| 00000450: 91 91 91 91 22 00 7C 0C 58 02 97 20 36 33 31 2C |....".|.X.. 631,| 00000460: 31 33 3A 97 36 33 32 2C 31 33 3A 97 36 33 33 2C |13:.632,13:.633,| 00000470: 31 35 38 3A 97 31 39 38 2C 33 3A 80 00 7D 0C 00 |158:.198,3:..}..|
..)...AE$."":AN.0:A0.0:C$."":DE.0:DR$."0 ".O.H.ER.0:F$."":FL.0:I.0:J.0:MM.0:MN.0. L.R..AE$(150) :.53281,0:."."......53280, 0: .1,8,15,"I"..... 1......"..AUTOMENU F OR 1541 DISKETTE STATION ..........".... ANTAL PROGRAMMER FUNDET :"......8,8,5,"$ ".DR$.",SEQ"......Q.1.254:.#8,C$:../.... DE.1.8:F$."":.#8,C$(DE).F."..C$(DE).G(19 9).410._.,..C$(DE)."".J.29:.370.}.6..F(C $(DE))..130.J.29:.370...@.AN.AN.1:J.11:. #8,C$:.#8,C$...J..Q.1.16:.#8,C$:F$.F$.C$ :..L.^..".".26)AN.A0...H.AE$(AN).DR$.":" .F$...R..I.1.J:.#8,C$:....|..DE..8..#8,C $:.#8,C$......:.280.<....".INGEN DISKETT E I DREVET.".G... 8: 15.T....AN.0.."..IN GEN PROGRAMMER PAA DISKEN":......MM.9:." ..".12)".PROGRAM MENU #"D(MN.1)"..".N.B. .I.1.9:.AE$(MN.9.I)."".MM.I.1:I.9:.470.. .L...12)I(D(I),1)" "J(AE$(MN.9.I),3,16)" ..,.V..:.".. VAELG EN ELLER TRYK RETURN FOR NY MENU..?....C$:.C$."".490.S.... C$ ..G(13).530.O...MN.MN.1:.MN.9.1.AN.MN.0. X....440......E(C$).1.E(C$).MM.490.....A E$.AE$(MN.9.E(C$))...&..:.".....VALGT ME NU NR : "C$" - "J(AE$,3,16)...0..I.18.1. .1:FL.I...:..F(J(AE$,I,1))..160.I.1.9.D. .:.".....LOAD"G(34)H(AE$,FL)G(34)",8.... ".D.N.."RUN".U.O..".........".|.X.. 631, 13:.632,13:.633,158:.198,3:..}..
> CLICK IMAGE PREVIEW FOR FULL MODAL