> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 2F 08 14 00 99 22 93 9B 4E 45 55 45 20 5A |../...."..NEUE Z|
00000010: 45 49 4C 45 4E 4E 55 4D 4D 45 52 4E 20 55 4E 44 |EILENNUMMERN UND|
00000020: 20 53 50 52 55 4E 47 42 45 46 45 48 4C 45 22 00 | SPRUNGBEFEHLE".|
00000030: 6B 08 1E 00 99 22 44 49 45 53 45 53 20 50 52 4F |k...."DIESES PRO|
00000040: 47 52 41 4D 4D 20 4B 4F 50 49 45 52 54 20 45 49 |GRAMM KOPIERT EI|
00000050: 4E 20 46 49 4C 45 20 41 55 46 20 20 20 20 44 45 |N FILE AUF DE|
00000060: 52 20 44 49 53 4B 45 54 54 45 2E 00 B5 08 28 00 |R DISKETTE....(.|
00000070: 99 22 44 41 53 20 4E 45 55 45 20 46 49 4C 45 20 |."DAS NEUE FILE |
00000080: 42 45 4B 4F 4D 4D 54 20 4E 45 55 45 20 5A 45 49 |BEKOMMT NEUE ZEI|
00000090: 4C 45 4E 2D 20 20 20 20 20 20 4E 55 4D 4D 45 52 |LEN- NUMMER|
000000A0: 4E 2C 20 41 55 43 48 20 4E 41 43 48 20 47 4F 54 |N, AUCH NACH GOT|
000000B0: 4F 2C 20 22 3B 00 FC 08 2D 00 99 22 47 4F 53 55 |O, ";...-.."GOSU|
000000C0: 42 2C 20 54 48 45 4E 2C 20 20 20 52 55 4E 20 55 |B, THEN, RUN U|
000000D0: 4E 44 20 4C 49 53 54 20 57 45 52 44 45 4E 20 44 |ND LIST WERDEN D|
000000E0: 49 45 20 5A 45 49 4C 45 4E 4E 55 4D 4D 45 52 4E |IE ZEILENNUMMERN|
000000F0: 20 47 45 2D 41 45 4E 44 45 52 54 22 00 3B 09 32 | GE-AENDERT".;.2|
00000100: 00 99 22 2D 20 4E 55 52 20 4E 49 43 48 54 20 49 |.."- NUR NICHT I|
00000110: 4D 20 54 45 58 54 20 28 48 4F 43 48 4B 4F 4D 4D |M TEXT (HOCHKOMM|
00000120: 41 4D 4F 44 55 53 2C 20 20 20 20 54 41 53 54 41 |AMODUS, TASTA|
00000130: 54 55 52 50 55 46 46 45 52 29 2E 00 5F 09 3C 00 |TURPUFFER).._.<.|
00000140: 48 49 B2 32 35 36 3A 86 20 5A 28 31 30 30 30 29 |HI.256:. Z(1000)|
00000150: 3A 8F 20 5A 45 49 4C 45 4E 41 4E 5A 41 48 4C 00 |:. ZEILENANZAHL.|
00000160: 80 09 46 00 85 22 11 44 41 53 20 41 4C 54 45 20 |..F..".DAS ALTE |
00000170: 46 49 4C 45 20 48 45 49 53 53 54 22 3B 46 31 24 |FILE HEISST";F1$|
00000180: 00 A0 09 50 00 85 22 44 41 53 20 4E 45 55 45 20 |...P.."DAS NEUE |
00000190: 46 49 4C 45 20 48 45 49 53 53 54 22 3B 46 32 24 |FILE HEISST";F2$|
000001A0: 00 CC 09 5A 00 85 22 44 49 45 20 45 52 53 54 45 |...Z.."DIE ERSTE|
000001B0: 20 5A 45 49 4C 45 20 49 4D 20 4E 45 55 45 4E 20 | ZEILE IM NEUEN |
000001C0: 50 52 4F 47 52 41 4D 4D 22 3B 45 5A 00 E4 09 64 |PROGRAMM";EZ...d|
000001D0: 00 85 22 5A 45 49 4C 45 4E 41 42 53 54 41 4E 44 |.."ZEILENABSTAND|
000001E0: 22 3B 5A 41 00 FE 09 6E 00 8B 20 46 31 24 B2 22 |";ZA...n.. F1$."|
000001F0: 22 A7 99 22 91 91 91 91 91 22 3A 89 37 30 00 17 |"..".....":.70..|
00000200: 0A 78 00 8B 20 46 32 24 B2 22 22 A7 99 22 91 91 |.x.. F2$."".."..|
00000210: 91 91 22 3A 89 38 30 00 39 0A 82 00 8B 20 45 5A |..":.80.9.... EZ|
00000220: B3 30 20 B0 20 45 5A B1 36 33 39 39 39 20 A7 99 |.0 . EZ.63999 ..|
00000230: 22 91 91 91 22 3A 89 39 30 00 50 0A 8C 00 8B 20 |"...":.90.P.... |
00000240: 5A 41 B3 31 20 A7 99 22 91 91 22 3A 89 31 30 30 |ZA.1 .."..":.100|
00000250: 00 58 0A 96 00 99 3A 99 00 65 0A A0 00 9F 31 35 |.X....:..e....15|
00000260: 2C 38 2C 31 35 00 8A 0A AA 00 9F 38 2C 38 2C 38 |,8,15......8,8,8|
00000270: 2C 46 31 24 AA 22 2C 50 2C 52 22 3A 8D 34 38 30 |,F1$.",P,R":.480|
00000280: 3A A1 23 38 2C 41 24 2C 42 24 00 B8 0A B4 00 4C |:.#8,A$,B$.....L|
00000290: 49 B2 C6 28 41 24 AA C7 28 30 29 29 AA 48 49 AC |I..(A$..(0)).HI.|
000002A0: C6 28 42 24 AA C7 28 30 29 29 3A 8B 4C 49 B1 34 |.(B$..(0)):.LI.4|
000002B0: 30 39 36 30 A7 34 39 30 00 E2 0A BE 00 9F 39 2C |0960.490......9,|
000002C0: 38 2C 39 2C 22 30 3A 22 AA 46 32 24 AA 22 2C 50 |8,9,"0:".F2$.",P|
000002D0: 2C 57 22 3A 8D 34 38 30 3A 98 39 2C 41 24 AA 42 |,W":.480:.9,A$.B|
000002E0: 24 3B 00 17 0B C8 00 8D 35 34 30 3A 5A 28 41 4E |$;......540:Z(AN|
000002F0: 29 B2 C6 28 4C 4F 24 AA C7 28 30 29 29 AA 48 49 |)..(LO$..(0)).HI|
00000300: AC C6 28 48 49 24 AA C7 28 30 29 29 3A 8B 41 24 |..(HI$..(0)):.A$|
00000310: B2 22 22 A7 32 34 30 00 35 0B D2 00 99 22 91 5A |."".240.5....".Z|
00000320: 45 49 4C 45 22 3B 5A 28 41 4E 29 3B 22 9D 20 49 |EILE";Z(AN);". I|
00000330: 53 54 20 44 41 00 5C 0B DC 00 8D 35 32 30 3A 41 |ST DA.\....520:A|
00000340: 4E B2 41 4E AA 31 3A 8B 20 41 4E AC 5A 41 AA 45 |N.AN.1:. AN.ZA.E|
00000350: 5A B3 36 33 39 39 39 20 A7 32 30 30 00 8A 0B E6 |Z.63999 .200....|
00000360: 00 99 22 44 49 45 20 5A 45 49 4C 45 4E 4E 55 4D |.."DIE ZEILENNUM|
00000370: 4D 45 52 4E 20 57 45 52 44 45 4E 20 5A 55 20 47 |MERN WERDEN ZU G|
00000380: 52 4F 53 53 22 3A 89 34 37 30 00 BF 0B F0 00 41 |ROSS":.470.....A|
00000390: 4E B2 41 4E AB 31 3A A0 38 3A 99 22 11 22 3A 9F |N.AN.1:.8:.".":.|
000003A0: 38 2C 38 2C 38 2C 46 31 24 AA 22 2C 50 2C 52 22 |8,8,8,F1$.",P,R"|
000003B0: 3A 8D 34 38 30 3A A1 23 38 2C 41 24 2C 41 24 00 |:.480:.#8,A$,A$.|
000003C0: D3 0B FA 00 8D 35 34 30 3A 8B 41 24 B2 22 22 A7 |.....540:.A$."".|
000003D0: 34 37 30 00 E7 0B 04 01 8D 35 36 30 3A 8B 41 24 |470......560:.A$|
000003E0: B2 22 22 A7 34 32 30 00 FF 0B 0E 01 8B 41 B2 33 |."".420......A.3|
000003F0: 34 A7 8D 36 32 30 3A 8B 41 B2 30 A7 34 32 30 00 |4..620:.A.0.420.|
00000400: 14 0C 18 01 8B 41 B2 31 34 33 A7 8D 36 34 30 3A |.....A.143..640:|
00000410: 89 34 32 30 00 47 0C 22 01 8B 41 B3 B1 31 33 37 |.420.G."..A..137|
00000420: AF 41 B3 B1 31 33 38 AF 41 B3 B1 31 34 31 AF 41 |.A..138.A..141.A|
00000430: B3 B1 31 35 35 AF 41 B3 B1 31 36 37 AF 41 B3 B1 |..155.A..167.A..|
00000440: 32 30 33 A7 32 36 30 00 7F 0C 2C 01 8B 41 B2 32 |203.260...,..A.2|
00000450: 30 33 A7 43 24 B2 C8 28 43 24 2C C3 28 43 24 29 |03.C$..(C$,.(C$)|
00000460: AB 31 29 AA C7 28 31 33 37 29 3A 8D 35 38 30 3A |.1)..(137):.580:|
00000470: 8B 41 24 B3 B1 C7 28 31 36 34 29 A7 35 30 30 00 |.A$...(164).500.|
00000480: A5 0C 36 01 8B 41 B2 31 36 37 A7 8D 35 38 30 3A |..6..A.167..580:|
00000490: 8B 41 24 B1 22 39 22 A7 43 24 B2 43 24 AA 41 24 |.A$."9".C$.C$.A$|
000004A0: 3A 89 32 37 30 00 B5 0C 40 01 8B 41 24 B3 22 3A |:.270...@..A$.":|
000004B0: 22 A7 33 36 30 00 BE 0C 4A 01 8D 35 38 30 00 DC |".360...J..580..|
000004C0: 0C 54 01 8B 41 B2 30 B0 41 B2 35 38 A7 43 24 B2 |.T..A.0.A.58.C$.|
000004D0: 43 24 AA C7 28 41 29 3A 89 34 31 30 00 F7 0C 5E |C$..(A):.410...^|
000004E0: 01 8B 41 B2 31 37 31 A7 43 24 B2 43 24 AA C7 28 |..A.171.C$.C$..(|
000004F0: 41 29 3A 89 33 33 30 00 17 0D 68 01 42 24 B2 41 |A):.330...h.B$.A|
00000500: 24 3A 8D 36 30 30 3A 8B 41 B1 35 38 AF 41 B3 B1 |$:.600:.A.58.A..|
00000510: 31 37 31 A7 35 30 30 00 38 0D 72 01 43 B2 C5 28 |171.500.8.r.C..(|
00000520: 42 24 29 3A 81 42 B2 30 A4 41 4E 3A 8B 20 5A 28 |B$):.B.0.AN:. Z(|
00000530: 42 29 B2 43 A7 34 30 30 00 4F 0D 7C 01 82 3A 8B |B).C.400.O.|..:.|
00000540: 5A 28 30 29 B3 B1 30 AF 43 B2 30 A7 34 31 30 00 |Z(0)..0.C.0.410.|
00000550: 58 0D 86 01 89 35 30 30 00 87 0D 90 01 43 24 B2 |X....500.....C$.|
00000560: 43 24 AA CA 28 C4 28 42 AC 5A 41 AA 45 5A 29 2C |C$..(.(B.ZA.EZ),|
00000570: 32 29 AA C7 28 41 29 3A 8B 41 B2 34 34 B0 41 B2 |2)..(A):.A.44.A.|
00000580: 31 37 31 A7 33 33 30 00 95 0D 9A 01 8B 41 B2 35 |171.330......A.5|
00000590: 38 A7 32 36 30 00 BA 0D A4 01 4C 49 B2 4C 49 AA |8.260.....LI.LI.|
000005A0: 34 AA C3 28 43 24 29 3A 5A B2 4E 52 AC 5A 41 AA |4..(C$):Z.NR.ZA.|
000005B0: 45 5A 3A 4E 52 B2 4E 52 AA 31 00 DC 0D AE 01 42 |EZ:NR.NR.1.....B|
000005C0: 24 B2 C7 28 5A AB B5 28 5A AD 32 35 36 29 AC 32 |$..(Z..(Z.256).2|
000005D0: 35 36 29 AA C7 28 5A AD 32 35 36 29 00 04 0E B8 |56)..(Z.256)....|
000005E0: 01 42 24 B2 C7 28 4C 49 AB B5 28 4C 49 AD 32 35 |.B$..(LI..(LI.25|
000005F0: 36 29 AC 32 35 36 29 AA C7 28 4C 49 AD 32 35 36 |6).256)..(LI.256|
00000600: 29 AA 42 24 00 3E 0E C2 01 98 39 2C 42 24 3B 43 |).B$.>....9,B$;C|
00000610: 24 3B 3A 43 24 B2 22 22 3A 99 22 91 5A 45 49 4C |$;:C$."":.".ZEIL|
00000620: 45 22 3B 5A 3B 22 9D 20 49 53 54 20 47 45 53 50 |E";Z;". IST GESP|
00000630: 45 49 43 48 45 52 54 20 57 4F 52 44 45 4E 00 47 |EICHERT WORDEN.G|
00000640: 0E CC 01 89 32 35 30 00 5E 0E D6 01 98 39 2C C7 |....250.^....9,.|
00000650: 28 30 29 AA C7 28 30 29 3B 3A 89 34 39 30 00 7C |(0)..(0);:.490.||
00000660: 0E E0 01 84 31 35 2C 45 4E 24 2C 45 4D 24 3A 8B |....15,EN$,EM$:.|
00000670: 20 C5 28 45 4E 24 29 B3 32 30 A7 8E 00 A6 0E EA | .(EN$).20......|
00000680: 01 99 22 44 49 53 4B 20 53 54 41 54 55 53 3A 22 |.."DISK STATUS:"|
00000690: 3B 45 4E 24 22 2C 22 45 4D 24 3A A0 38 3A A0 39 |;EN$","EM$:.8:.9|
000006A0: 3A A0 31 35 3A 80 00 D9 0E F4 01 99 22 46 45 48 |:.15:......."FEH|
000006B0: 4C 45 52 20 49 4E 20 5A 45 49 4C 45 22 3B C6 28 |LER IN ZEILE";.(|
000006C0: 4C 4F 24 AA C7 28 30 29 29 AA 32 35 36 AC C6 28 |LO$..(0)).256..(|
000006D0: 48 49 24 AA C7 28 30 29 29 00 07 0F FE 01 99 22 |HI$..(0))......"|
000006E0: 44 45 53 48 41 4C 42 20 49 53 54 20 22 3B 46 32 |DESHALB IST ";F2|
000006F0: 24 3B 22 20 4E 49 43 48 54 20 46 45 52 54 49 47 |$;" NICHT FERTIG|
00000700: 21 22 3A 89 34 37 30 00 1E 0F 08 02 A1 23 38 2C |!":.470......#8,|
00000710: 41 24 3A 8B 41 24 B3 B1 22 22 A7 35 32 30 00 24 |A$:.A$.."".520.$|
00000720: 0F 12 02 8E 00 3A 0F 1C 02 A1 23 38 2C 41 24 2C |.....:....#8,A$,|
00000730: 41 24 2C 4C 4F 24 2C 48 49 24 00 40 0F 26 02 8E |A$,LO$,HI$.@.&..|
00000740: 00 79 0F 30 02 A1 23 38 2C 41 24 3A 41 B2 C6 28 |.y.0..#8,A$:A..(|
00000750: 41 24 AA C7 28 30 29 29 3A 43 24 B2 43 24 AA C7 |A$..(0)):C$.C$..|
00000760: 28 41 29 3A 8B 41 B3 31 33 37 AF 41 B3 B1 33 34 |(A):.A.137.A..34|
00000770: AF 41 B3 B1 30 A7 35 36 30 00 7F 0F 3A 02 8E 00 |.A..0.560...:...|
00000780: A1 0F 44 02 A1 23 38 2C 41 24 3A 41 B2 C6 28 41 |..D..#8,A$:A..(A|
00000790: 24 AA C7 28 30 29 29 3A 8B 41 B2 33 32 A7 35 38 |$..(0)):.A.32.58|
000007A0: 30 00 A7 0F 4E 02 8E 00 D7 0F 58 02 A1 23 38 2C |0...N.....X..#8,|
000007B0: 41 24 3A 42 24 B2 42 24 AA 41 24 3A 41 B2 C6 28 |A$:B$.B$.A$:A..(|
000007C0: 41 24 AA C7 28 30 29 29 3A 8B 41 B1 34 37 AF 41 |A$..(0)):.A.47.A|
000007D0: B3 35 38 A7 36 30 30 00 DD 0F 62 02 8E 00 10 10 |.58.600...b.....|
000007E0: 6C 02 A1 23 38 2C 41 24 3A 41 B2 C6 28 41 24 AA |l..#8,A$:A..(A$.|
000007F0: C7 28 30 29 29 3A 43 24 B2 43 24 AA C7 28 41 29 |.(0)):C$.C$..(A)|
00000800: 3A 8B 41 B3 B1 33 34 AF 41 B3 B1 30 A7 36 32 30 |:.A..34.A..0.620|
00000810: 00 16 10 76 02 8E 00 43 10 80 02 A1 23 38 2C 41 |...v...C....#8,A|
00000820: 24 3A 41 B2 C6 28 41 24 AA C7 28 30 29 29 3A 43 |$:A..(A$..(0)):C|
00000830: 24 B2 43 24 AA C7 28 41 29 3A 8B 41 B3 B1 30 A7 |$.C$..(A):.A..0.|
00000840: 36 34 30 00 49 10 8A 02 8E 00 00 00 |640.I....... |
../...."..NEUE ZEILENNUMMERN UND SPRUNGB
EFEHLE".K...."DIESES PROGRAMM KOPIERT EI
N FILE AUF DER DISKETTE....(.."DAS NE
UE FILE BEKOMMT NEUE ZEILEN- NUMMER
N, AUCH NACH GOTO, ";...-.."GOSUB, THEN,
RUN UND LIST WERDEN DIE ZEILENNUMMERN
GE-AENDERT".;.2.."- NUR NICHT IM TEXT (
HOCHKOMMAMODUS, TASTATURPUFFER).._.<.
HI.256:. Z(1000):. ZEILENANZAHL...F..".D
AS ALTE FILE HEISST";F1$. .P.."DAS NEUE
FILE HEISST";F2$.L.Z.."DIE ERSTE ZEILE I
M NEUEN PROGRAMM";EZ...D.."ZEILENABSTAND
";ZA...N.. F1$.""..".....":.70...X.. F2$
."".."....":.80.9.... EZ.0 . EZ.63999 ..
"...":.90.P.... ZA.1 .."..":.100.X....:.
.E. ..15,8,15......8,8,8,F1$.",P,R":.480
:.#8,A$,B$.....LI.F(A$.G(0)).HI.F(B$.G(0
)):.LI.40960.490......9,8,9,"0:".F2$.",P
,W":.480:.9,A$.B$;...H..540:Z(AN).F(LO$.
G(0)).HI.F(HI$.G(0)):.A$."".240.5.R..".Z
EILE";Z(AN);". IST DA.\....520:AN.AN.1:.
AN.ZA.EZ.63999 .200......"DIE ZEILENNUM
MERN WERDEN ZU GROSS":.470.....AN.AN.1:
8:.".":.8,8,8,F1$.",P,R":.480:.#8,A$,A$.
S....540:.A$."".470......560:.A$."".420.
.....A.34..620:.A.0.420......A.143..640:
.420.G."..A..137.A..138.A..141.A..155.A.
.167.A..203.260..,..A.203.C$.H(C$,C(C$)
.1).G(137):.580:.A$..G(164).500...6..A.1
67..580:.A$."9".C$.C$.A$:.270...@..A$.":
".360...J..580...T..A.0.A.58.C$.C$.G(A):
.410...^..A.171.C$.C$.G(A):.330...H.B$.A
$:.600:.A.58.A..171.500.8.R.C.E(B$):.B.0
.AN:. Z(B).C.400.O.|..:.Z(0)..0.C.0.410.
X....500.....C$.C$.J(D(B.ZA.EZ),2).G(A):
.A.44.A.171.330......A.58.260.....LI.LI.
4.C(C$):Z.NR.ZA.EZ:NR.NR.1.....B$.G(Z..(
Z.256).256).G(Z.256).....B$.G(LI..(LI.25
6).256).G(LI.256).B$.>.B..9,B$;C$;:C$.""
:.".ZEILE";Z;". IST GESPEICHERT WORDEN.G
.L..250.^.V..9,G(0).G(0);:.490.|....15,E
N$,EM$:. E(EN$).20........"DISK STATUS:"
;EN$","EM$: 8: 9: 15:..Y...."FEHLER IN Z
EILE";F(LO$.G(0)).256.F(HI$.G(0))......"
DESHALB IST ";F2$;" NICHT FERTIG!":.470.
.....#8,A$:.A$.."".520.$.....:....#8,A$,
A$,LO$,HI$.@.&...Y.0..#8,A$:A.F(A$.G(0))
:C$.C$.G(A):.A.137.A..34.A..0.560..:...
..D..#8,A$:A.F(A$.G(0)):.A.32.580...N...
W.X..#8,A$:B$.B$.A$:A.F(A$.G(0)):.A.47.A
.58.600...B.....L..#8,A$:A.F(A$.G(0)):C$
.C$.G(A):.A..34.A..0.620...V...C....#8,A
$:A.F(A$.G(0)):C$.C$.G(A):.A..0.640.I...
....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL