MPRG IM BASIC

FILE INFORMATION

FILENAME(S): MPRG IM BASIC

FILE TYPE(S): PRG

FILE SIZE: 2.2K

FIRST SEEN: 2025-10-20 14:29:58

APPEARS ON: 2 disk(s)

FILE HASH

7b0cbee5cf2d6fb2de0db2b6f0858e0d6043677089fcac3ac2c4c173f7b379f6

FOUND ON DISKS (2 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
MT90499 SEITE 1	MPRG IM BASIC	PRG	Treasure Chest - Klaus Der Suhler	13	0	DOWNLOAD FILE
15721 SEITE B	MPRG IM BASIC	PRG	C64er	5	10	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 44 08 0A 00 8D 35  34 30 3A 99 22 11 11 20  |..D....540:.".. |
00000010: 45 53 20 57 45 52 44 45  4E 20 50 52 4F 47 52 41  |ES WERDEN PROGRA|
00000020: 4D 4D 45 20 49 4E 20 4D  41 53 43 48 49 4E 45 4E  |MME IN MASCHINEN|
00000030: 53 50 52 41 43 48 45 20  4D 49 54 20 42 49 53 20  |SPRACHE MIT BIS |
00000040: 5A 55 22 3B 00 91 08 14  00 99 22 20 32 34 39 20  |ZU";......" 249 |
00000050: 42 59 54 45 53 20 49 4E  20 42 41 53 49 43 2D 5A  |BYTES IN BASIC-Z|
00000060: 45 49 4C 45 4E 20 20 20  20 56 45 52 50 41 43 4B  |EILEN    VERPACK|
00000070: 54 20 55 4E 44 20 41 55  54 4F 4D 41 54 49 53 43  |T UND AUTOMATISC|
00000080: 48 20 41 55 46 20 44 49  53 4B 45 54 54 45 20 22  |H AUF DISKETTE "|
00000090: 3B 00 D6 08 1E 00 99 22  20 20 47 45 53 50 45 49  |;......"  GESPEI|
000000A0: 43 48 45 52 54 2E 22 2C  2C 2C 22 11 20 49 48 52  |CHERT.",,,". IHR|
000000B0: 20 53 54 41 52 54 20 4C  49 45 47 54 20 4A 45 57  | START LIEGT JEW|
000000C0: 45 49 4C 53 20 42 45 49  20 81 53 59 53 32 30 35  |EILS BEI .SYS205|
000000D0: 34 9A 2E 20 20 22 00 00  09 28 00 99 22 11 11 11  |4..  "...(.."...|
000000E0: 20 42 49 54 54 45 20 9F  53 48 49 46 54 9A 20 44  | BITTE .SHIFT. D|
000000F0: 52 55 45 43 4B 45 4E 2E  22 3A 92 36 35 33 2C 31  |RUECKEN.":.653,1|
00000100: 00 43 09 64 00 8D 35 34  30 3A 99 2C 22 11 4D 41  |.C.d..540:.,".MA|
00000110: 58 49 4D 41 4C 20 32 34  39 20 5A 45 49 43 48 45  |XIMAL 249 ZEICHE|
00000120: 4E 22 A6 32 32 29 22 53  54 41 52 54 20 4D 49 54  |N".22)"START MIT|
00000130: 20 53 59 53 32 30 35 34  11 11 22 3A 9F 32 2C 38  | SYS2054..":.2,8|
00000140: 2C 31 35 00 7C 09 6E 00  99 22 20 49 53 54 20 44  |,15.|.n.." IST D|
00000150: 41 53 20 50 52 47 20 41  55 46 20 44 49 53 4B 45  |AS PRG AUF DISKE|
00000160: 54 54 45 20 28 4A 2F 4E  29 3F 22 3A 8D 35 30 30  |TTE (J/N)?":.500|
00000170: 3A 8B 41 24 B2 22 4E 22  A7 35 32 30 00 B2 09 78  |:.A$."N".520...x|
00000180: 00 85 22 20 4E 41 4D 45  20 44 45 53 20 50 52 4F  |.." NAME DES PRO|
00000190: 47 52 41 4D 4D 53 22 3B  4E 41 24 3A 9F 31 2C 38  |GRAMMS";NA$:.1,8|
000001A0: 2C 38 2C 4E 41 24 AA 22  2C 50 2C 52 22 3A 8D 35  |,8,NA$.",P,R":.5|
000001B0: 36 30 00 DC 09 82 00 8B  41 B2 36 32 A7 97 31 39  |60......A.62..19|
000001C0: 38 2C 30 3A 92 31 39 38  2C 31 3A 8D 35 39 30 3A  |8,0:.198,1:.590:|
000001D0: 8D 35 39 30 3A A0 31 3A  89 31 32 30 00 0A 0A 8C  |.590:.1:.120....|
000001E0: 00 99 3A 99 3A 8B C9 28  4E 41 24 2C 31 29 B2 22  |..:.:..(NA$,1)."|
000001F0: 2A 22 A7 41 B2 C3 28 4E  41 24 29 AB 31 3A 4E 41  |*".A..(NA$).1:NA|
00000200: 24 B2 C8 28 4E 41 24 2C  41 29 00 4B 0A 96 00 85  |$..(NA$,A).K....|
00000210: 22 91 20 42 41 53 49 43  2D 5A 45 49 4C 45 4E 4E  |". BASIC-ZEILENN|
00000220: 55 4D 4D 45 52 20 20 20  20 9D 9D 9D 9D 22 3B 5A  |UMMER    ....";Z|
00000230: 4E 24 3A 8B C6 28 5A 4E  24 29 B1 35 37 B0 C6 28  |N$:..(ZN$).57..(|
00000240: 5A 4E 24 29 B3 34 38 A7  31 35 30 00 65 0A A0 00  |ZN$).48.150.e...|
00000250: 5A 4E B2 C5 28 5A 4E 24  29 3A 8B 5A 4E B3 31 30  |ZN..(ZN$):.ZN.10|
00000260: 30 A7 31 38 30 00 A6 0A  AA 00 99 22 91 20 05 4E  |0.180......". .N|
00000270: 49 43 48 54 20 47 52 4F  45 53 53 45 52 20 41 4C  |ICHT GROESSER AL|
00000280: 53 20 39 39 21 9A 20 20  20 20 20 20 20 20 20 20  |S 99!.          |
00000290: 20 20 22 3A 97 31 39 38  2C 30 3A 92 31 39 38 2C  |  ":.198,0:.198,|
000002A0: 31 3A 89 31 35 30 00 C2  0A B4 00 53 56 24 B2 C8  |1:.150.....SV$..|
000002B0: 28 28 5A 4E 24 AA 22 20  22 AA 4E 41 24 29 2C 31  |((ZN$." ".NA$),1|
000002C0: 36 29 00 F9 0A BE 00 4E  31 B2 32 30 35 34 3A 4E  |6).....N1.2054:N|
000002D0: 32 B2 32 33 30 32 3A 97  32 30 34 39 2C 30 3A 97  |2.2302:.2049,0:.|
000002E0: 32 30 35 30 2C 39 3A 97  32 30 35 31 2C 5A 4E 3A  |2050,9:.2051,ZN:|
000002F0: 97 32 30 35 33 2C 31 34  33 00 20 0B C8 00 A1 23  |.2053,143. ....#|
00000300: 31 2C 41 24 3A A1 23 31  2C 41 24 3A 99 22 11 9F  |1,A$:.#1,A$:."..|
00000310: 20 4C 4F 41 44 49 4E 47  20 22 4E 41 24 22 9A 22  | LOADING "NA$"."|
00000320: 00 56 0B D2 00 81 49 B2  4E 31 A4 4E 32 3A A1 23  |.V....I.N1.N2:.#|
00000330: 31 2C 41 24 3A 41 B2 C6  28 41 24 AA C7 28 30 29  |1,A$:A..(A$..(0)|
00000340: 29 3A 97 49 2C 41 3A 8B  41 B2 30 A7 49 B2 49 AB  |):.I,A:.A.0.I.I.|
00000350: 31 3A 89 32 34 30 00 62  0B DC 00 8B 53 54 A7 32  |1:.240.b....ST.2|
00000360: 34 30 00 9B 0B E6 00 82  3A 99 22 11 20 05 50 52  |40......:.". .PR|
00000370: 4F 47 52 41 4D 4D 20 5A  55 20 4C 41 4E 47 21 9A  |OGRAMM ZU LANG!.|
00000380: 22 3A 97 31 39 38 2C 30  3A 92 31 39 38 2C 31 3A  |":.198,0:.198,1:|
00000390: 41 24 B2 22 4A 22 3A 89  34 31 30 00 DB 0B F0 00  |A$."J":.410.....|
000003A0: 42 5A B2 49 3A A0 31 3A  99 22 11 20 53 50 45 49  |BZ.I:.1:.". SPEI|
000003B0: 43 48 45 52 4E 20 41 55  46 20 44 49 53 4B 45 54  |CHERN AUF DISKET|
000003C0: 54 45 20 22 2C 2C 22 20  41 4C 53 9F 20 22 53 56  |TE ",," ALS. "SV|
000003D0: 24 22 9A 20 28 4A 2F 4E  29 3F 22 00 F8 0B 04 01  |$". (J/N)?".....|
000003E0: 8D 35 30 30 3A 99 3A 8B  41 24 B2 22 4A 22 A7 99  |.500:.:.A$."J"..|
000003F0: 22 11 22 3A 89 32 39 30  00 36 0C 0E 01 97 31 39  |".":.290.6....19|
00000400: 2C 36 34 3A 85 22 20 4E  45 55 45 52 20 50 52 4F  |,64:." NEUER PRO|
00000410: 47 52 41 4D 4D 4E 41 4D  45 3A 20 22 3B 41 24 3A  |GRAMMNAME: ";A$:|
00000420: 97 31 39 2C 30 3A 53 56  24 B2 C8 28 41 24 2C 31  |.19,0:SV$..(A$,1|
00000430: 36 29 3A 99 22 11 00 6B  0C 22 01 99 22 20 44 49  |6):."..k.".." DI|
00000440: 53 4B 45 54 54 45 20 45  49 4E 47 45 4C 45 47 45  |SKETTE EINGELEGE|
00000450: 4E 20 55 4E 44 20 9F 53  48 49 46 54 9A 2E 22 3A  |N UND .SHIFT..":|
00000460: 92 36 35 33 2C 31 3A 8D  35 39 30 00 8A 0C 2C 01  |.653,1:.590...,.|
00000470: 53 57 24 B2 53 56 24 AA  C7 28 33 34 29 AA 22 2C  |SW$.SV$..(34).",|
00000480: 38 3A 22 AA C7 28 31 34  33 29 00 B8 0C 36 01 4E  |8:"..(143)...6.N|
00000490: 56 B2 C3 28 53 57 24 29  3A 81 49 B2 31 A4 4E 56  |V..(SW$):.I.1.NV|
000004A0: 3A 97 33 33 37 31 AA 49  2C C6 28 CA 28 53 57 24  |:.3371.I,.(.(SW$|
000004B0: 2C 49 2C 31 29 29 3A 82  00 F9 0C 40 01 41 B2 42  |,I,1)):....@.A.B|
000004C0: 5A AA 32 3A 97 32 30 34  39 2C 41 AF 32 35 35 3A  |Z.2:.2049,A.255:|
000004D0: 97 32 30 35 30 2C 41 AD  32 35 36 3A 97 32 35 31  |.2050,A.256:.251|
000004E0: 2C 28 41 AA 32 29 AF 32  35 35 3A 97 32 35 32 2C  |,(A.2).255:.252,|
000004F0: 28 41 AA 32 29 AD 32 35  36 00 26 0D 4A 01 97 41  |(A.2).256.&.J..A|
00000500: AB 31 2C 30 3A 97 41 2C  30 3A 97 41 AA 31 2C 30  |.1,0:.A,0:.A.1,0|
00000510: 3A 97 34 35 2C C2 28 32  35 31 29 3A 97 34 36 2C  |:.45,.(251):.46,|
00000520: C2 28 32 35 32 29 00 45  0D 54 01 94 22 2A 2A 2A  |.(252).E.T.."***|
00000530: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000540: 2A 2A 2A 2A 2A 00 7E 0D  5E 01 97 34 35 2C 31 38  |*****.~.^..45,18|
00000550: 36 3A 97 34 36 2C 31 36  3A 97 32 30 34 39 2C 30  |6:.46,16:.2049,0|
00000560: 3A 97 32 30 35 30 2C 39  3A 97 32 33 30 34 2C 36  |:.2050,9:.2304,6|
00000570: 37 3A 97 32 33 30 35 2C  39 3A 8D 35 36 30 00 AB  |7:.2305,9:.560..|
00000580: 0D 68 01 91 41 AA 31 89  33 39 30 3A 8B 41 B2 33  |.h..A.1.390:.A.3|
00000590: 33 A7 97 31 39 38 2C 30  3A 92 31 39 38 2C 31 3A  |3..198,0:.198,1:|
000005A0: 97 31 39 38 2C 30 3A 89  33 38 35 00 DD 0D 72 01  |.198,0:.385...r.|
000005B0: 99 22 20 81 55 45 42 45  52 53 43 48 52 45 49 42  |." .UEBERSCHREIB|
000005C0: 45 4E 3F 9A 20 28 4A 2F  4E 29 9A 22 3A 8D 35 30  |EN?. (J/N).":.50|
000005D0: 30 3A 8B 41 24 B2 22 4E  22 A7 33 38 35 00 F9 0D  |0:.A$."N".385...|
000005E0: 7C 01 53 57 24 B2 22 40  30 3A 22 AA 53 57 24 3A  ||.SW$."@0:".SW$:|
000005F0: 8D 35 39 30 3A 89 33 31  30 00 0E 0E 81 01 8D 35  |.590:.310......5|
00000600: 39 30 3A 99 22 91 91 91  22 3A 89 32 37 30 00 45  |90:."...":.270.E|
00000610: 0E 86 01 8D 35 39 30 3A  99 22 20 4E 4F 43 48 4D  |....590:." NOCHM|
00000620: 41 4C 20 53 50 45 49 43  48 45 52 4E 20 28 4A 2F  |AL SPEICHERN (J/|
00000630: 4E 29 3F 22 3A 8D 35 30  30 3A 8B 41 24 B2 22 4A  |N)?":.500:.A$."J|
00000640: 22 A7 32 39 30 00 69 0E  90 01 99 22 11 9F 20 57  |".290.i....".. W|
00000650: 45 49 54 45 52 4D 41 43  48 45 4E 20 28 4A 2F 4E  |EITERMACHEN (J/N|
00000660: 29 3F 9A 22 3A 8D 35 30  30 00 98 0E 9A 01 8D 35  |)?.":.500......5|
00000670: 34 30 3A 81 49 B2 4E 31  A4 4E 32 3A 97 49 2C 34  |40:.I.N1.N2:.I,4|
00000680: 32 3A 82 3A 81 49 B2 31  A4 32 34 3A 97 33 33 37  |2:.:.I.1.24:.337|
00000690: 31 AA 49 2C 34 32 3A 82  00 AF 0E A4 01 97 32 30  |1.I,42:.......20|
000006A0: 35 31 2C 31 30 3A 97 32  33 37 35 2C 31 34 33 00  |51,10:.2375,143.|
000006B0: CA 0E AE 01 A0 31 3A A0  32 3A 97 31 39 38 2C 30  |.....1:.2:.198,0|
000006C0: 3A 8B 41 24 B2 22 4A 22  A7 8A 00 FF 0E B8 01 99  |:.A$."J"........|
000006D0: 22 11 11 20 44 49 45 20  4E 45 55 45 20 5A 45 49  |".. DIE NEUE ZEI|
000006E0: 4C 45 20 4C 41 44 45 4E  3F 20 28 4A 2F 4E 29 22  |LE LADEN? (J/N)"|
000006F0: 3A 8D 35 30 30 3A 8B 41  24 B2 22 4E 22 A7 80 00  |:.500:.A$."N"...|
00000700: 35 0F C2 01 97 36 33 31  2C 31 34 37 3A 97 36 33  |5....631,147:.63|
00000710: 32 2C 37 36 3A 97 36 33  33 2C 32 30 37 3A 97 36  |2,76:.633,207:.6|
00000720: 33 34 2C 38 33 3A 97 36  33 35 2C 38 36 3A 97 36  |34,83:.635,86:.6|
00000730: 33 36 2C 33 36 00 5A 0F  CC 01 97 36 33 37 2C 34  |36,36.Z....637,4|
00000740: 34 3A 97 36 33 38 2C 35  36 3A 97 36 33 39 2C 31  |4:.638,56:.639,1|
00000750: 33 3A 97 31 39 38 2C 39  3A 80 00 78 0F F4 01 A1  |3:.198,9:..x....|
00000760: 41 24 3A 8B 41 24 B2 22  4A 22 B0 41 24 B2 22 4E  |A$:.A$."J".A$."N|
00000770: 22 A7 8D 35 39 30 3A 8E  00 81 0F FE 01 89 35 30  |"..590:.......50|
00000780: 30 00 C9 0F 08 02 99 22  93 11 05 20 44 41 53 20  |0......"... DAS |
00000790: 4D 41 53 43 48 49 4E 45  4E 50 52 4F 47 52 41 4D  |MASCHINENPROGRAM|
000007A0: 4D 20 42 49 54 54 45 22  2C 2C 22 11 20 45 52 53  |M BITTE",,". ERS|
000007B0: 54 20 41 55 46 20 44 49  53 4B 45 54 54 45 20 42  |T AUF DISKETTE B|
000007C0: 52 49 4E 47 45 4E 21 9A  22 00 D2 0F 12 02 A0 32  |RINGEN!."......2|
000007D0: 3A 80 00 09 10 1C 02 99  C7 28 31 34 32 29 3B 22  |:........(142);"|
000007E0: 93 11 9F 20 20 20 42 41  53 49 43 2D 5A 45 49 4C  |...   BASIC-ZEIL|
000007F0: 45 20 4D 49 54 20 4D 41  53 43 48 49 4E 45 4E 50  |E MIT MASCHINENP|
00000800: 52 4F 47 52 41 4D 4D 9A  22 00 30 10 26 02 99 A3  |ROGRAMM.".0.&...|
00000810: 37 29 22 11 28 43 29 20  31 39 38 36 20 42 59 20  |7)".(C) 1986 BY |
00000820: 41 58 45 4C 20 48 4F 48  4C 46 45 4C 44 22 3A 8E  |AXEL HOHLFELD":.|
00000830: 00 4F 10 30 02 84 32 2C  41 2C 41 24 3A 99 22 81  |.O.0..2,A,A$:.".|
00000840: 20 53 54 41 54 55 53 3A  20 22 41 24 22 9A 22 00  | STATUS: "A$".".|
00000850: 69 10 3A 02 8B 41 B2 30  B0 41 B2 33 33 B0 41 B2  |i.:..A.0.A.33.A.|
00000860: 36 32 B0 41 B2 36 33 A7  8E 00 87 10 44 02 97 31  |62.A.63.....D..1|
00000870: 39 38 2C 30 3A 92 31 39  38 2C 31 3A 41 24 B2 22  |98,0:.198,1:A$."|
00000880: 4A 22 3A 89 34 31 30 00  B8 10 4E 02 99 22 91 20  |J":.410...N..". |
00000890: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000008A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000008B0: 20 20 20 20 91 22 3A 8E  00 00 00                 |    .":....     |

..D....540:.".. ES WERDEN PROGRAMME IN M
ASCHINENSPRACHE MIT BIS ZU";......" 249 
BYTES IN BASIC-ZEILEN    VERPACKT UND AU
TOMATISCH AUF DISKETTE ";.V...."  GESPEI
CHERT.",,,". IHR START LIEGT JEWEILS BEI
 .SYS2054..  "...(.."... BITTE .SHIFT. D
RUECKEN.":.653,1.C.D..540:.,".MAXIMAL 24
9 ZEICHEN".22)"START MIT SYS2054..":.2,8
,15.|.N.." IST DAS PRG AUF DISKETTE (J/N
)?":.500:.A$."N".520...X.." NAME DES PRO
GRAMMS";NA$:.1,8,8,NA$.",P,R":.560......
A.62..198,0:.198,1:.590:.590: 1:.120....
..:.:.I(NA$,1)."*".A.C(NA$).1:NA$.H(NA$,
A).K....". BASIC-ZEILENNUMMER    ....";Z
N$:.F(ZN$).57.F(ZN$).48.150.E. .ZN.E(ZN$
):.ZN.100.180......". .NICHT GROESSER AL
S 99!.            ":.198,0:.198,1:.150.B
...SV$.H((ZN$." ".NA$),16).....N1.2054:N
2.2302:.2049,0:.2050,9:.2051,ZN:.2053,14
3. .H..#1,A$:.#1,A$:.".. LOADING "NA$"."
.V.R..I.N1.N2:.#1,A$:A.F(A$.G(0)):.I,A:.
A.0.I.I.1:.240.B....ST.240......:.". .PR
OGRAMM ZU LANG!.":.198,0:.198,1:A$."J":.
410.....BZ.I: 1:.". SPEICHERN AUF DISKET
TE ",," ALS. "SV$". (J/N)?"......500:.:.
A$."J"..".":.290.6....19,64:." NEUER PRO
GRAMMNAME: ";A$:.19,0:SV$.H(A$,16):."..K
.".." DISKETTE EINGELEGEN UND .SHIFT..":
.653,1:.590...,.SW$.SV$.G(34).",8:".G(14
3)...6.NV.C(SW$):.I.1.NV:.3371.I,F(J(SW$
,I,1)):....@.A.BZ.2:.2049,A.255:.2050,A.
256:.251,(A.2).255:.252,(A.2).256.&.J..A
.1,0:.A,0:.A.1,0:.45,B(251):.46,B(252).E
.T.."************************.~.^..45,18
6:.46,16:.2049,0:.2050,9:.2304,67:.2305,
9:.560...H..A.1.390:.A.33..198,0:.198,1:
.198,0:.385...R.." .UEBERSCHREIBEN?. (J/
N).":.500:.A$."N".385...|.SW$."@0:".SW$:
.590:.310......590:."...":.270.E....590:
." NOCHMAL SPEICHERN (J/N)?":.500:.A$."J
".290.I....".. WEITERMACHEN (J/N)?.":.50
0......540:.I.N1.N2:.I,42:.:.I.1.24:.337
1.I,42:.......2051,10:.2375,143.J... 1: 
2:.198,0:.A$."J"........".. DIE NEUE ZEI
LE LADEN? (J/N)":.500:.A$."N"...5.B..631
,147:.632,76:.633,207:.634,83:.635,86:.6
36,36.Z.L..637,44:.638,56:.639,13:.198,9
:..X....A$:.A$."J".A$."N"..590:.......50
0.I...."... DAS MASCHINENPROGRAMM BITTE"
,,". ERST AUF DISKETTE BRINGEN!.".R... 2
:.......G(142);"...   BASIC-ZEILE MIT MA
SCHINENPROGRAMM.".0.&...7)".(C) 1986 BY 
AXEL HOHLFELD":..O.0..2,A,A$:.". STATUS:
 "A$".".I.:..A.0.A.33.A.62.A.63.....D..1
98,0:.198,1:A$."J":.410...N..".         
                            .":....

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL