> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 11 08 05 00 8F 20 20 52 45 4E 55 4D 42 45 |....... RENUMBE|
00000010: 52 00 17 08 0A 00 8F 00 45 08 14 00 99 22 93 9B |R.......E...."..|
00000020: 4E 45 55 45 20 5A 45 49 4C 45 4E 4E 55 4D 4D 45 |NEUE ZEILENNUMME|
00000030: 52 4E 20 55 4E 44 20 53 50 52 55 4E 47 42 45 46 |RN UND SPRUNGBEF|
00000040: 45 48 4C 45 22 00 81 08 1E 00 99 22 44 49 45 53 |EHLE"......"DIES|
00000050: 45 53 20 50 52 4F 47 52 41 4D 4D 20 4B 4F 50 49 |ES PROGRAMM KOPI|
00000060: 45 52 54 20 45 49 4E 20 46 49 4C 45 20 41 55 46 |ERT EIN FILE AUF|
00000070: 20 20 20 20 44 45 52 20 44 49 53 4B 45 54 54 45 | DER DISKETTE|
00000080: 2E 00 CB 08 28 00 99 22 44 41 53 20 4E 45 55 45 |....(.."DAS NEUE|
00000090: 20 46 49 4C 45 20 42 45 4B 4F 4D 4D 54 20 4E 45 | FILE BEKOMMT NE|
000000A0: 55 45 20 5A 45 49 4C 45 4E 2D 20 20 20 20 20 20 |UE ZEILEN- |
000000B0: 4E 55 4D 4D 45 52 4E 2C 20 41 55 43 48 20 4E 41 |NUMMERN, AUCH NA|
000000C0: 43 48 20 47 4F 54 4F 2C 20 22 3B 00 12 09 2D 00 |CH GOTO, ";...-.|
000000D0: 99 22 47 4F 53 55 42 2C 20 54 48 45 4E 2C 20 20 |."GOSUB, THEN, |
000000E0: 20 52 55 4E 20 55 4E 44 20 4C 49 53 54 20 57 45 | RUN UND LIST WE|
000000F0: 52 44 45 4E 20 44 49 45 20 5A 45 49 4C 45 4E 4E |RDEN DIE ZEILENN|
00000100: 55 4D 4D 45 52 4E 20 47 45 2D 41 45 4E 44 45 52 |UMMERN GE-AENDER|
00000110: 54 22 00 51 09 32 00 99 22 2D 20 4E 55 52 20 4E |T".Q.2.."- NUR N|
00000120: 49 43 48 54 20 49 4D 20 54 45 58 54 20 28 48 4F |ICHT IM TEXT (HO|
00000130: 43 48 4B 4F 4D 4D 41 4D 4F 44 55 53 2C 20 20 20 |CHKOMMAMODUS, |
00000140: 20 54 41 53 54 41 54 55 52 50 55 46 46 45 52 29 | TASTATURPUFFER)|
00000150: 2E 00 75 09 3C 00 48 49 B2 32 35 36 3A 86 20 5A |..u.<.HI.256:. Z|
00000160: 28 31 30 30 30 29 3A 8F 20 5A 45 49 4C 45 4E 41 |(1000):. ZEILENA|
00000170: 4E 5A 41 48 4C 00 96 09 46 00 85 22 11 44 41 53 |NZAHL...F..".DAS|
00000180: 20 41 4C 54 45 20 46 49 4C 45 20 48 45 49 53 53 | ALTE FILE HEISS|
00000190: 54 22 3B 46 31 24 00 B6 09 50 00 85 22 44 41 53 |T";F1$...P.."DAS|
000001A0: 20 4E 45 55 45 20 46 49 4C 45 20 48 45 49 53 53 | NEUE FILE HEISS|
000001B0: 54 22 3B 46 32 24 00 E2 09 5A 00 85 22 44 49 45 |T";F2$...Z.."DIE|
000001C0: 20 45 52 53 54 45 20 5A 45 49 4C 45 20 49 4D 20 | ERSTE ZEILE IM |
000001D0: 4E 45 55 45 4E 20 50 52 4F 47 52 41 4D 4D 22 3B |NEUEN PROGRAMM";|
000001E0: 45 5A 00 FA 09 64 00 85 22 5A 45 49 4C 45 4E 41 |EZ...d.."ZEILENA|
000001F0: 42 53 54 41 4E 44 22 3B 5A 41 00 14 0A 6E 00 8B |BSTAND";ZA...n..|
00000200: 20 46 31 24 B2 22 22 A7 99 22 91 91 91 91 91 22 | F1$."".."....."|
00000210: 3A 89 37 30 00 2D 0A 78 00 8B 20 46 32 24 B2 22 |:.70.-.x.. F2$."|
00000220: 22 A7 99 22 91 91 91 91 22 3A 89 38 30 00 4F 0A |".."....":.80.O.|
00000230: 82 00 8B 20 45 5A B3 30 20 B0 20 45 5A B1 36 33 |... EZ.0 . EZ.63|
00000240: 39 39 39 20 A7 99 22 91 91 91 22 3A 89 39 30 00 |999 .."...":.90.|
00000250: 66 0A 8C 00 8B 20 5A 41 B3 31 20 A7 99 22 91 91 |f.... ZA.1 .."..|
00000260: 22 3A 89 31 30 30 00 6E 0A 96 00 99 3A 99 00 7B |":.100.n....:..{|
00000270: 0A A0 00 9F 31 35 2C 38 2C 31 35 00 A0 0A AA 00 |....15,8,15.....|
00000280: 9F 38 2C 38 2C 38 2C 46 31 24 AA 22 2C 50 2C 52 |.8,8,8,F1$.",P,R|
00000290: 22 3A 8D 34 38 30 3A A1 23 38 2C 41 24 2C 42 24 |":.480:.#8,A$,B$|
000002A0: 00 CE 0A B4 00 4C 49 B2 C6 28 41 24 AA C7 28 30 |.....LI..(A$..(0|
000002B0: 29 29 AA 48 49 AC C6 28 42 24 AA C7 28 30 29 29 |)).HI..(B$..(0))|
000002C0: 3A 8B 4C 49 B1 34 30 39 36 30 A7 34 39 30 00 F8 |:.LI.40960.490..|
000002D0: 0A BE 00 9F 39 2C 38 2C 39 2C 22 30 3A 22 AA 46 |....9,8,9,"0:".F|
000002E0: 32 24 AA 22 2C 50 2C 57 22 3A 8D 34 38 30 3A 98 |2$.",P,W":.480:.|
000002F0: 39 2C 41 24 AA 42 24 3B 00 2D 0B C8 00 8D 35 34 |9,A$.B$;.-....54|
00000300: 30 3A 5A 28 41 4E 29 B2 C6 28 4C 4F 24 AA C7 28 |0:Z(AN)..(LO$..(|
00000310: 30 29 29 AA 48 49 AC C6 28 48 49 24 AA C7 28 30 |0)).HI..(HI$..(0|
00000320: 29 29 3A 8B 41 24 B2 22 22 A7 32 34 30 00 4B 0B |)):.A$."".240.K.|
00000330: D2 00 99 22 91 5A 45 49 4C 45 22 3B 5A 28 41 4E |...".ZEILE";Z(AN|
00000340: 29 3B 22 9D 20 49 53 54 20 44 41 00 72 0B DC 00 |);". IST DA.r...|
00000350: 8D 35 32 30 3A 41 4E B2 41 4E AA 31 3A 8B 20 41 |.520:AN.AN.1:. A|
00000360: 4E AC 5A 41 AA 45 5A B3 36 33 39 39 39 20 A7 32 |N.ZA.EZ.63999 .2|
00000370: 30 30 00 A0 0B E6 00 99 22 44 49 45 20 5A 45 49 |00......"DIE ZEI|
00000380: 4C 45 4E 4E 55 4D 4D 45 52 4E 20 57 45 52 44 45 |LENNUMMERN WERDE|
00000390: 4E 20 5A 55 20 47 52 4F 53 53 22 3A 89 34 37 30 |N ZU GROSS":.470|
000003A0: 00 D5 0B F0 00 41 4E B2 41 4E AB 31 3A A0 38 3A |.....AN.AN.1:.8:|
000003B0: 99 22 11 22 3A 9F 38 2C 38 2C 38 2C 46 31 24 AA |.".":.8,8,8,F1$.|
000003C0: 22 2C 50 2C 52 22 3A 8D 34 38 30 3A A1 23 38 2C |",P,R":.480:.#8,|
000003D0: 41 24 2C 41 24 00 E9 0B FA 00 8D 35 34 30 3A 8B |A$,A$......540:.|
000003E0: 41 24 B2 22 22 A7 34 37 30 00 FD 0B 04 01 8D 35 |A$."".470......5|
000003F0: 36 30 3A 8B 41 24 B2 22 22 A7 34 32 30 00 15 0C |60:.A$."".420...|
00000400: 0E 01 8B 41 B2 33 34 A7 8D 36 32 30 3A 8B 41 B2 |...A.34..620:.A.|
00000410: 30 A7 34 32 30 00 2A 0C 18 01 8B 41 B2 31 34 33 |0.420.*....A.143|
00000420: A7 8D 36 34 30 3A 89 34 32 30 00 5D 0C 22 01 8B |..640:.420.]."..|
00000430: 41 B3 B1 31 33 37 AF 41 B3 B1 31 33 38 AF 41 B3 |A..137.A..138.A.|
00000440: B1 31 34 31 AF 41 B3 B1 31 35 35 AF 41 B3 B1 31 |.141.A..155.A..1|
00000450: 36 37 AF 41 B3 B1 32 30 33 A7 32 36 30 00 95 0C |67.A..203.260...|
00000460: 2C 01 8B 41 B2 32 30 33 A7 43 24 B2 C8 28 43 24 |,..A.203.C$..(C$|
00000470: 2C C3 28 43 24 29 AB 31 29 AA C7 28 31 33 37 29 |,.(C$).1)..(137)|
00000480: 3A 8D 35 38 30 3A 8B 41 24 B3 B1 C7 28 31 36 34 |:.580:.A$...(164|
00000490: 29 A7 35 30 30 00 BB 0C 36 01 8B 41 B2 31 36 37 |).500...6..A.167|
000004A0: A7 8D 35 38 30 3A 8B 41 24 B1 22 39 22 A7 43 24 |..580:.A$."9".C$|
000004B0: B2 43 24 AA 41 24 3A 89 32 37 30 00 CB 0C 40 01 |.C$.A$:.270...@.|
000004C0: 8B 41 24 B3 22 3A 22 A7 33 36 30 00 D4 0C 4A 01 |.A$.":".360...J.|
000004D0: 8D 35 38 30 00 F2 0C 54 01 8B 41 B2 30 B0 41 B2 |.580...T..A.0.A.|
000004E0: 35 38 A7 43 24 B2 43 24 AA C7 28 41 29 3A 89 34 |58.C$.C$..(A):.4|
000004F0: 31 30 00 0D 0D 5E 01 8B 41 B2 31 37 31 A7 43 24 |10...^..A.171.C$|
00000500: B2 43 24 AA C7 28 41 29 3A 89 33 33 30 00 2D 0D |.C$..(A):.330.-.|
00000510: 68 01 42 24 B2 41 24 3A 8D 36 30 30 3A 8B 41 B1 |h.B$.A$:.600:.A.|
00000520: 35 38 AF 41 B3 B1 31 37 31 A7 35 30 30 00 4E 0D |58.A..171.500.N.|
00000530: 72 01 43 B2 C5 28 42 24 29 3A 81 42 B2 30 A4 41 |r.C..(B$):.B.0.A|
00000540: 4E 3A 8B 20 5A 28 42 29 B2 43 A7 34 30 30 00 65 |N:. Z(B).C.400.e|
00000550: 0D 7C 01 82 3A 8B 5A 28 30 29 B3 B1 30 AF 43 B2 |.|..:.Z(0)..0.C.|
00000560: 30 A7 34 31 30 00 6E 0D 86 01 89 35 30 30 00 9D |0.410.n....500..|
00000570: 0D 90 01 43 24 B2 43 24 AA CA 28 C4 28 42 AC 5A |...C$.C$..(.(B.Z|
00000580: 41 AA 45 5A 29 2C 32 29 AA C7 28 41 29 3A 8B 41 |A.EZ),2)..(A):.A|
00000590: B2 34 34 B0 41 B2 31 37 31 A7 33 33 30 00 AB 0D |.44.A.171.330...|
000005A0: 9A 01 8B 41 B2 35 38 A7 32 36 30 00 D0 0D A4 01 |...A.58.260.....|
000005B0: 4C 49 B2 4C 49 AA 34 AA C3 28 43 24 29 3A 5A B2 |LI.LI.4..(C$):Z.|
000005C0: 4E 52 AC 5A 41 AA 45 5A 3A 4E 52 B2 4E 52 AA 31 |NR.ZA.EZ:NR.NR.1|
000005D0: 00 F2 0D AE 01 42 24 B2 C7 28 5A AB B5 28 5A AD |.....B$..(Z..(Z.|
000005E0: 32 35 36 29 AC 32 35 36 29 AA C7 28 5A AD 32 35 |256).256)..(Z.25|
000005F0: 36 29 00 1A 0E B8 01 42 24 B2 C7 28 4C 49 AB B5 |6).....B$..(LI..|
00000600: 28 4C 49 AD 32 35 36 29 AC 32 35 36 29 AA C7 28 |(LI.256).256)..(|
00000610: 4C 49 AD 32 35 36 29 AA 42 24 00 54 0E C2 01 98 |LI.256).B$.T....|
00000620: 39 2C 42 24 3B 43 24 3B 3A 43 24 B2 22 22 3A 99 |9,B$;C$;:C$."":.|
00000630: 22 91 5A 45 49 4C 45 22 3B 5A 3B 22 9D 20 49 53 |".ZEILE";Z;". IS|
00000640: 54 20 47 45 53 50 45 49 43 48 45 52 54 20 57 4F |T GESPEICHERT WO|
00000650: 52 44 45 4E 00 5D 0E CC 01 89 32 35 30 00 74 0E |RDEN.]....250.t.|
00000660: D6 01 98 39 2C C7 28 30 29 AA C7 28 30 29 3B 3A |...9,.(0)..(0);:|
00000670: 89 34 39 30 00 92 0E E0 01 84 31 35 2C 45 4E 24 |.490......15,EN$|
00000680: 2C 45 4D 24 3A 8B 20 C5 28 45 4E 24 29 B3 32 30 |,EM$:. .(EN$).20|
00000690: A7 8E 00 BC 0E EA 01 99 22 44 49 53 4B 20 53 54 |........"DISK ST|
000006A0: 41 54 55 53 3A 22 3B 45 4E 24 22 2C 22 45 4D 24 |ATUS:";EN$","EM$|
000006B0: 3A A0 38 3A A0 39 3A A0 31 35 3A 80 00 EF 0E F4 |:.8:.9:.15:.....|
000006C0: 01 99 22 46 45 48 4C 45 52 20 49 4E 20 5A 45 49 |.."FEHLER IN ZEI|
000006D0: 4C 45 22 3B C6 28 4C 4F 24 AA C7 28 30 29 29 AA |LE";.(LO$..(0)).|
000006E0: 32 35 36 AC C6 28 48 49 24 AA C7 28 30 29 29 00 |256..(HI$..(0)).|
000006F0: 1D 0F FE 01 99 22 44 45 53 48 41 4C 42 20 49 53 |....."DESHALB IS|
00000700: 54 20 22 3B 46 32 24 3B 22 20 4E 49 43 48 54 20 |T ";F2$;" NICHT |
00000710: 46 45 52 54 49 47 21 22 3A 89 34 37 30 00 34 0F |FERTIG!":.470.4.|
00000720: 08 02 A1 23 38 2C 41 24 3A 8B 41 24 B3 B1 22 22 |...#8,A$:.A$..""|
00000730: A7 35 32 30 00 3A 0F 12 02 8E 00 50 0F 1C 02 A1 |.520.:.....P....|
00000740: 23 38 2C 41 24 2C 41 24 2C 4C 4F 24 2C 48 49 24 |#8,A$,A$,LO$,HI$|
00000750: 00 56 0F 26 02 8E 00 8F 0F 30 02 A1 23 38 2C 41 |.V.&.....0..#8,A|
00000760: 24 3A 41 B2 C6 28 41 24 AA C7 28 30 29 29 3A 43 |$:A..(A$..(0)):C|
00000770: 24 B2 43 24 AA C7 28 41 29 3A 8B 41 B3 31 33 37 |$.C$..(A):.A.137|
00000780: AF 41 B3 B1 33 34 AF 41 B3 B1 30 A7 35 36 30 00 |.A..34.A..0.560.|
00000790: 95 0F 3A 02 8E 00 B7 0F 44 02 A1 23 38 2C 41 24 |..:.....D..#8,A$|
000007A0: 3A 41 B2 C6 28 41 24 AA C7 28 30 29 29 3A 8B 41 |:A..(A$..(0)):.A|
000007B0: B2 33 32 A7 35 38 30 00 BD 0F 4E 02 8E 00 ED 0F |.32.580...N.....|
000007C0: 58 02 A1 23 38 2C 41 24 3A 42 24 B2 42 24 AA 41 |X..#8,A$:B$.B$.A|
000007D0: 24 3A 41 B2 C6 28 41 24 AA C7 28 30 29 29 3A 8B |$:A..(A$..(0)):.|
000007E0: 41 B1 34 37 AF 41 B3 35 38 A7 36 30 30 00 F3 0F |A.47.A.58.600...|
000007F0: 62 02 8E 00 26 10 6C 02 A1 23 38 2C 41 24 3A 41 |b...&.l..#8,A$:A|
00000800: B2 C6 28 41 24 AA C7 28 30 29 29 3A 43 24 B2 43 |..(A$..(0)):C$.C|
00000810: 24 AA C7 28 41 29 3A 8B 41 B3 B1 33 34 AF 41 B3 |$..(A):.A..34.A.|
00000820: B1 30 A7 36 32 30 00 2C 10 76 02 8E 00 59 10 80 |.0.620.,.v...Y..|
00000830: 02 A1 23 38 2C 41 24 3A 41 B2 C6 28 41 24 AA C7 |..#8,A$:A..(A$..|
00000840: 28 30 29 29 3A 43 24 B2 43 24 AA C7 28 41 29 3A |(0)):C$.C$..(A):|
00000850: 8B 41 B3 B1 30 A7 36 34 30 00 5F 10 8A 02 8E 00 |.A..0.640._.....|
00000860: 00 00 |.. |
....... RENUMBER.......E...."..NEUE ZEI
LENNUMMERN UND SPRUNGBEFEHLE"......"DIES
ES PROGRAMM KOPIERT EIN FILE AUF DER
DISKETTE..K.(.."DAS NEUE FILE BEKOMMT NE
UE ZEILEN- NUMMERN, AUCH NACH GOTO,
";...-.."GOSUB, THEN, RUN UND LIST WE
RDEN DIE ZEILENNUMMERN GE-AENDERT".Q.2..
"- NUR NICHT IM TEXT (HOCHKOMMAMODUS,
TASTATURPUFFER)..U.<.HI.256:. Z(1000):.
ZEILENANZAHL...F..".DAS ALTE FILE HEISS
T";F1$...P.."DAS NEUE FILE HEISST";F2$..
.Z.."DIE ERSTE ZEILE IM NEUEN PROGRAMM";
EZ...D.."ZEILENABSTAND";ZA...N.. F1$."".
.".....":.70.-.X.. F2$."".."....":.80.O.
... EZ.0 . EZ.63999 .."...":.90.F.... ZA
.1 .."..":.100.N....:..{. ..15,8,15. ...
.8,8,8,F1$.",P,R":.480:.#8,A$,B$.N...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.K.R..".ZEILE";Z(AN);". IST
DA.R....520:AN.AN.1:. AN.ZA.EZ.63999 .2
00. ...."DIE ZEILENNUMMERN WERDEN ZU GRO
SS":.470.U...AN.AN.1: 8:.".":.8,8,8,F1$.
",P,R":.480:.#8,A$,A$......540:.A$."".47
0......560:.A$."".420......A.34..620:.A.
0.420.*....A.143..640:.420.]."..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.167..580:.A$."9".C$
.C$.A$:.270.K.@..A$.":".360.T.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..17
1.500.N.R.C.E(B$):.B.0.AN:. Z(B).C.400.E
.|..:.Z(0)..0.C.0.410.N....500.....C$.C$
.J(D(B.ZA.EZ),2).G(A):.A.44.A.171.330...
...A.58.260.P...LI.LI.4.C(C$):Z.NR.ZA.EZ
:NR.NR.1.....B$.G(Z..(Z.256).256).G(Z.25
6).....B$.G(LI..(LI.256).256).G(LI.256).
B$.T.B..9,B$;C$;:C$."":.".ZEILE";Z;". IS
T GESPEICHERT WORDEN.].L..250.T.V..9,G(0
).G(0);:.490......15,EN$,EM$:. E(EN$).20
........"DISK STATUS:";EN$","EM$: 8: 9:
15:......."FEHLER IN ZEILE";F(LO$.G(0)).
256.F(HI$.G(0))......"DESHALB IST ";F2$;
" NICHT FERTIG!":.470.4....#8,A$:.A$..""
.520.:.....P....#8,A$,A$,LO$,HI$.V.&....
.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.....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...Y....#8,A$:A.F(A$.G(0)):C$.
C$.G(A):.A..0.640._.......
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL