> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1C 08 01 00 97 35 33 32 38 30 2C 30 3A 97 |.......53280,0:.|
00000010: 35 33 32 38 31 2C 30 3A 99 22 9E 22 00 37 08 0A |53281,0:.".".7..|
00000020: 00 50 4E 24 B2 22 C4 C9 D3 CB 20 C9 C4 20 C3 C8 |.PN$.".... .. ..|
00000030: C1 CE C7 C5 D2 22 3A 00 74 08 14 00 99 22 93 11 |.....":.t...."..|
00000040: 12 20 22 AA 50 4E 24 AA 22 20 22 3A 99 22 11 CD |. ".PN$." ":."..|
00000050: 49 54 20 44 49 45 53 45 4D 20 D0 52 4F 47 52 41 |IT DIESEM .ROGRA|
00000060: 4D 4D 20 4B 4F 45 4E 4E 45 4E 20 C4 C9 D3 CB 2D |MM KOENNEN ....-|
00000070: CE C1 CD C5 00 9E 08 1E 00 99 22 11 55 4E 44 2F |..........".UND/|
00000080: 4F 44 45 52 20 C4 C9 D3 CB 2D C9 C4 20 47 45 41 |ODER ....-.. GEA|
00000090: 45 4E 44 45 52 54 20 57 45 52 44 45 4E 2E 00 BF |ENDERT WERDEN...|
000000A0: 08 28 00 81 4C B2 31 A4 31 33 3A 99 22 A3 A3 A3 |.(..L.1.13:."...|
000000B0: 22 3B 3A 82 3A 99 3A 99 3A 58 24 B2 22 30 22 00 |";:.:.:.:X$."0".|
000000C0: CC 08 32 00 44 56 B2 C5 28 58 24 29 00 ED 08 3C |..2.DV..(X$)...<|
000000D0: 00 44 56 24 B2 58 24 3A 8B 44 56 AF 32 35 34 A7 |.DV$.X$:.DV.254.|
000000E0: 99 22 91 91 91 91 91 91 22 3A 89 34 30 00 F5 08 |."......":.40...|
000000F0: 41 00 99 44 56 00 32 09 46 00 99 22 11 C1 45 4E |A..DV.2.F.."..EN|
00000100: 44 45 52 55 4E 47 20 56 4F 4E 20 20 C4 C9 D3 CB |DERUNG VON ....|
00000110: 2D 12 CE 92 C1 CD C5 22 3A 99 3A 99 A3 39 29 22 |-......":.:..9)"|
00000120: 4F 44 45 52 20 C4 C9 D3 CB 2D 12 C9 92 C4 20 3F |ODER ....-.... ?|
00000130: 22 3B 00 6D 09 50 00 99 22 20 20 20 20 20 28 12 |";.m.P.." (.|
00000140: CE 92 2F 12 C9 92 29 20 20 22 3B 3A 8D 32 32 30 |../...) ";:.220|
00000150: 3A 8B 58 24 B3 B1 22 4E 22 AF 58 24 B3 B1 22 49 |:.X$.."N".X$.."I|
00000160: 22 A7 99 22 91 91 91 91 22 3A 89 37 30 00 B5 09 |".."....":.70...|
00000170: 5A 00 99 58 24 3A 9F 31 35 2C 38 2C 31 35 3A 98 |Z..X$:.15,8,15:.|
00000180: 31 35 2C 22 49 22 AA 44 56 24 3A 9F 31 2C 38 2C |15,"I".DV$:.1,8,|
00000190: 33 2C 22 23 22 3A 98 31 35 2C 22 55 31 3A 33 22 |3,"#":.15,"U1:3"|
000001A0: 44 56 22 2C 31 38 2C 30 22 3A 8B 58 24 B2 22 4E |DV",18,0":.X$."N|
000001B0: 22 89 31 37 30 00 FE 09 64 00 98 31 35 2C 22 42 |".170...d..15,"B|
000001C0: 2D 50 3A 33 2C 31 36 32 22 3A A1 23 31 2C 41 24 |-P:3,162":.#1,A$|
000001D0: 2C 42 24 2C 43 24 2C 44 24 2C 45 24 3A 99 22 11 |,B$,C$,D$,E$:.".|
000001E0: C4 45 52 5A 45 49 54 49 47 45 52 20 C4 C9 D3 CB |.ERZEITIGER ....|
000001F0: 2D C9 C4 20 49 53 54 20 12 20 22 41 24 3B 00 37 |-.. IST . "A$;.7|
00000200: 0A 6E 00 99 42 24 3B 43 24 3B 44 24 3B 45 24 3A |.n..B$;C$;D$;E$:|
00000210: 85 22 11 CE 45 55 45 52 20 C4 C9 D3 CB 2D C9 C4 |."..EUER ....-..|
00000220: 20 28 4D 41 58 2E 20 35 20 DA 45 49 43 48 45 4E | (MAX. 5 .EICHEN|
00000230: 29 20 22 3B 4E 49 24 00 56 0A 6F 00 8B C3 28 4E |) ";NI$.V.o...(N|
00000240: 49 24 29 B3 B1 34 A7 49 24 B2 C8 28 4E 49 24 AA |I$)..4.I$..(NI$.|
00000250: 22 20 22 2C 35 29 00 66 0A 77 00 58 5A 24 B2 22 |" ",5).f.w.XZ$."|
00000260: 53 4F 46 54 2E 22 00 95 0A 78 00 98 31 35 2C 22 |SOFT."...x..15,"|
00000270: 42 2D 50 3A 33 2C 31 36 32 22 3A 98 31 2C 58 5A |B-P:3,162":.1,XZ|
00000280: 24 3B 3A 98 31 35 2C 22 55 32 3A 33 22 44 56 22 |$;:.15,"U2:3"DV"|
00000290: 2C 31 38 2C 30 00 B2 0A 82 00 49 24 B2 22 49 22 |,18,0.....I$."I"|
000002A0: AA CA 28 C4 28 44 56 29 2C 32 29 3A 98 31 35 2C |..(.(DV),2):.15,|
000002B0: 49 24 00 BC 0A A0 00 89 20 34 30 30 00 F3 0A AA |I$...... 400....|
000002C0: 00 98 31 35 2C 22 42 2D 50 3A 33 2C 31 34 34 22 |..15,"B-P:3,144"|
000002D0: 3A 44 4E 24 B2 22 22 3A 81 4C B2 31 A4 31 36 3A |:DN$."":.L.1.16:|
000002E0: A1 23 31 2C 41 24 3A 44 4E 24 B2 44 4E 24 AA 41 |.#1,A$:DN$.DN$.A|
000002F0: 24 3A 82 00 26 0B B4 00 99 22 11 C4 45 52 5A 45 |$:..&...."..ERZE|
00000300: 49 54 49 47 45 52 20 C4 C9 D3 CB 2D CE C1 CD C5 |ITIGER ....-....|
00000310: 20 49 53 54 3A 22 3A 99 3A 99 22 12 20 22 AA 44 | IST:":.:.". ".D|
00000320: 4E 24 AA 22 20 22 00 5E 0B BE 00 99 22 11 CE 45 |N$." ".^...."..E|
00000330: 55 45 52 20 C4 C9 D3 CB 2D CE C1 CD C5 20 28 20 |UER ....-.... ( |
00000340: 4D 41 58 49 4D 41 4C 20 31 36 20 DA 45 49 43 48 |MAXIMAL 16 .EICH|
00000350: 45 4E 21 20 29 20 22 3A 85 4E 44 24 3A 99 00 81 |EN! ) ":.ND$:...|
00000360: 0B C8 00 4E 44 24 B2 C8 28 4E 44 24 AA 22 20 20 |...ND$..(ND$." |
00000370: 20 20 20 20 20 20 20 20 20 20 20 20 22 2C 31 36 | ",16|
00000380: 29 00 9C 0B D1 00 57 45 24 B2 22 4D 41 44 2D 4D |).....WE$."MAD-M|
00000390: 4F 4E 45 59 2D 4D 41 43 4B 45 52 22 00 D1 0B D2 |ONEY-MACKER"....|
000003A0: 00 98 31 35 2C 22 42 2D 50 3A 33 2C 31 34 34 22 |..15,"B-P:3,144"|
000003B0: 3A 98 31 2C 57 45 24 3B 3A 98 31 35 2C 22 55 32 |:.1,WE$;:.15,"U2|
000003C0: 3A 33 22 44 56 22 2C 31 38 2C 30 22 3A 89 31 33 |:3"DV",18,0":.13|
000003D0: 30 00 DB 0B DC 00 A1 58 24 3A 8E 00 FE 0B 90 01 |0......X$:......|
000003E0: 99 22 20 20 20 20 20 20 20 20 20 20 20 20 20 12 |." .|
000003F0: 57 20 3D 20 57 45 49 54 45 52 92 22 3A 99 00 1E |W = WEITER.":...|
00000400: 0C 91 01 99 22 20 20 20 20 20 20 20 20 20 20 20 |...." |
00000410: 20 20 12 53 20 3D 20 20 53 54 4F 50 92 22 00 3F | .S = STOP.".?|
00000420: 0C 92 01 8F 20 47 45 54 20 52 31 24 3A 49 46 52 |.... GET R1$:IFR|
00000430: 31 24 3D 20 22 57 22 54 48 45 4E 20 34 30 35 00 |1$= "W"THEN 405.|
00000440: 56 0C 93 01 8F 49 46 52 31 24 3D 22 53 22 54 48 |V....IFR1$="S"TH|
00000450: 45 4E 20 34 31 30 00 64 0C 94 01 8F 20 47 4F 54 |EN 410.d.... GOT|
00000460: 4F 34 30 32 00 6A 0C 95 01 8A 00 7D 0C 9A 01 99 |O402.j.....}....|
00000470: 22 93 11 11 11 05 52 55 4E 13 22 3A 80 00 00 00 |".....RUN.":....|
00000480: 20 FF FF 4B 24 A9 35 33 | ..K$.53 |
.......53280,0:.53281,0:.".".7...PN$."DI
SK ID CHANGER":.T...."... ".PN$." ":.".M
IT DIESEM PROGRAMM KOENNEN DISK-NAME....
..".UND/ODER DISK-ID GEAENDERT WERDEN...
.(..L.1.13:."...";:.:.:.:X$."0".L.2.DV.E
(X$)...<.DV$.X$:.DV.254.."......":.40...
A..DV.2.F..".AENDERUNG VON DISK-.N.AME"
:.:..9)"ODER DISK-.I.D ?";.M.P.." (.
N./.I.) ";:.220:.X$.."N".X$.."I".."....
":.70...Z..X$:.15,8,15:.15,"I".DV$:.1,8,
3,"#":.15,"U1:3"DV",18,0":.X$."N".170...
D..15,"B-P:3,162":.#1,A$,B$,C$,D$,E$:.".
DERZEITIGER DISK-ID IST . "A$;.7.N..B$;C
$;D$;E$:.".NEUER DISK-ID (MAX. 5 ZEICHEN
) ";NI$.V.O..C(NI$)..4.I$.H(NI$." ",5).F
.W.XZ$."SOFT."...X..15,"B-P:3,162":.1,XZ
$;:.15,"U2:3"DV",18,0.....I$."I".J(D(DV)
,2):.15,I$... .. 400......15,"B-P:3,144"
:DN$."":.L.1.16:.#1,A$:DN$.DN$.A$:..&...
.".DERZEITIGER DISK-NAME IST:":.:.". ".D
N$." ".^....".NEUER DISK-NAME ( MAXIMAL
16 ZEICHEN! ) ":.ND$:....H.ND$.H(ND$."
",16)...Q.WE$."MAD-MONEY-MAC
KER".Q.R..15,"B-P:3,144":.1,WE$;:.15,"U2
:3"DV",18,0":.130......X$:......."
.W = WEITER.":......."
.S = STOP.".?.... GET R1$:IFR1$= "W"T
HEN 405.V....IFR1$="S"THEN 410.D.... GOT
O402.J.....}....".....RUN.":.... ..K$.53
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL