> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 2F 08 00 00 8F 22 8D 91 05 20 20 20 20 20 |../...."... |
00000010: 20 4D 41 52 43 55 53 20 53 43 48 41 45 46 45 52 | MARCUS SCHAEFER|
00000020: 27 53 20 44 41 54 41 20 49 4E 50 55 54 8D 9A 00 |'S DATA INPUT...|
00000030: 73 08 01 00 99 22 93 11 2A 2A 2A 2A 2A 20 4D 41 |s...."..***** MA|
00000040: 52 43 55 53 20 53 43 48 41 45 46 45 52 27 53 20 |RCUS SCHAEFER'S |
00000050: 44 41 54 41 2D 49 4E 50 55 54 20 2A 2A 2A 2A 2A |DATA-INPUT *****|
00000060: 22 3A 81 4A B2 37 30 34 A4 37 31 30 3A 97 4A 2C |":.J.704.710:.J,|
00000070: 30 3A 82 00 BE 08 02 00 99 22 20 20 53 49 45 20 |0:......." SIE |
00000080: 47 45 42 45 4E 20 4E 55 52 20 44 49 45 20 44 41 |GEBEN NUR DIE DA|
00000090: 54 41 53 20 45 49 4E 2C 44 45 4E 20 52 45 53 54 |TAS EIN,DEN REST|
000000A0: 22 A6 31 32 29 22 52 45 47 45 4C 54 20 44 41 53 |".12)"REGELT DAS|
000000B0: 20 50 52 4F 47 52 41 4D 4D 2E 22 3A 89 34 00 07 | PROGRAMM.":.4..|
000000C0: 09 03 00 99 22 5A 41 48 4C 20 41 55 53 53 45 52 |...."ZAHL AUSSER|
000000D0: 48 41 4C 42 20 30 2D 32 35 35 21 20 41 3D 41 42 |HALB 0-255! A=AB|
000000E0: 53 50 45 49 43 48 45 52 4E 2C 20 20 20 45 3D 45 |SPEICHERN, E=E|
000000F0: 49 4E 47 41 42 45 57 49 45 44 45 52 48 4F 4C 55 |INGABEWIEDERHOLU|
00000100: 4E 47 22 3A 89 33 31 00 3B 09 04 00 97 37 31 31 |NG":.31.;....711|
00000110: 2C 31 3A 85 22 11 2D 20 45 49 4E 47 41 42 45 20 |,1:.".- EINGABE |
00000120: 44 45 5A 49 4D 41 4C 20 4F 44 45 52 20 48 45 58 |DEZIMAL ODER HEX|
00000130: 41 20 28 44 2F 48 29 22 3B 41 24 00 65 09 05 00 |A (D/H)";A$.e...|
00000140: 43 24 B2 22 30 2D 32 35 35 22 3A 8B 41 24 B2 22 |C$."0-255":.A$."|
00000150: 48 22 A7 97 37 30 34 2C 39 3A 43 24 B2 22 24 30 |H"..704,9:C$."$0|
00000160: 2D 24 46 46 22 00 9B 09 06 00 99 22 2D 20 5A 41 |-$FF"......"- ZA|
00000170: 48 4C 45 4E 42 45 52 45 49 43 48 20 22 43 24 22 |HLENBEREICH "C$"|
00000180: 20 28 4A 2F 4E 29 22 3B 3A 85 42 24 3A 8B 42 24 | (J/N)";:.B$:.B$|
00000190: B2 22 4A 22 A7 97 37 30 35 2C 39 00 AB 09 09 00 |."J"..705,9.....|
000001A0: 8B 42 24 B3 B1 22 4A 22 89 31 35 00 DA 09 0A 00 |.B$.."J".15.....|
000001B0: 99 22 2D 20 53 4F 4C 4C 45 4E 20 4B 4C 45 49 4E |."- SOLLEN KLEIN|
000001C0: 45 20 5A 41 48 4C 45 4E 20 44 55 52 43 48 20 4E |E ZAHLEN DURCH N|
000001D0: 55 4C 4C 45 4E 20 41 55 46 22 00 08 0A 0B 00 99 |ULLEN AUF"......|
000001E0: 22 20 20 5A 57 45 49 20 28 5A 29 2F 44 52 45 49 |" ZWEI (Z)/DREI|
000001F0: 28 44 29 20 53 54 45 4C 4C 45 4E 20 41 55 46 47 |(D) STELLEN AUFG|
00000200: 45 46 55 45 4C 4C 54 22 00 2A 0A 0C 00 85 22 20 |EFUELLT".*...." |
00000210: 20 57 45 52 44 45 4E 20 4F 44 45 52 20 4E 49 43 | WERDEN ODER NIC|
00000220: 48 54 20 28 4E 29 22 3B 46 24 00 3D 0A 0D 00 8B |HT (N)";F$.=....|
00000230: 46 24 B2 22 5A 22 A7 97 37 30 36 2C 32 00 50 0A |F$."Z"..706,2.P.|
00000240: 0E 00 8B 46 24 B2 22 44 22 A7 97 37 30 36 2C 33 |...F$."D"..706,3|
00000250: 00 74 0A 0F 00 85 22 2D 20 45 52 53 54 45 20 5A |.t...."- ERSTE Z|
00000260: 45 49 4C 45 4E 4E 55 4D 4D 45 52 20 28 3E 35 37 |EILENNUMMER (>57|
00000270: 29 22 3B 41 00 90 0A 10 00 41 B2 B5 28 41 29 3A |)";A.....A..(A):|
00000280: 8B 41 B2 B3 35 37 A7 99 22 91 91 22 3A 89 31 35 |.A..57.."..":.15|
00000290: 00 BA 0A 11 00 97 37 30 37 2C 28 41 AB 28 B5 28 |......707,(A.(.(|
000002A0: 41 AD 32 35 36 29 AC 32 35 36 29 29 3A 97 37 30 |A.256).256)):.70|
000002B0: 38 2C B5 28 41 AD 32 35 36 29 00 EF 0A 12 00 85 |8,.(A.256)......|
000002C0: 22 2D 20 53 43 48 52 49 54 54 57 45 49 54 45 20 |"- SCHRITTWEITE |
000002D0: 28 31 2D 32 35 35 29 22 3B 42 3A 42 B2 B5 28 42 |(1-255)";B:B..(B|
000002E0: 29 3A 8B 42 B3 31 B0 42 B1 32 35 35 89 31 38 00 |):.B.1.B.255.18.|
000002F0: FA 0A 13 00 97 37 30 39 2C 42 00 47 0B 14 00 99 |.....709,B.G....|
00000300: 22 11 20 44 49 45 20 44 41 54 45 4E 45 49 4E 47 |". DIE DATENEING|
00000310: 41 42 45 20 57 49 52 44 20 4D 49 54 20 44 45 52 |ABE WIRD MIT DER|
00000320: 20 45 49 4E 47 41 42 45 20 20 56 4F 4E 20 27 2A | EINGABE VON '*|
00000330: 2A 2A 27 20 42 45 45 4E 44 45 54 2E 44 41 54 41 |**' BEENDET.DATA|
00000340: 2D 49 4E 50 55 22 3B 00 94 0B 15 00 99 22 54 20 |-INPU";......"T |
00000350: 57 49 52 44 20 44 41 4E 4E 20 20 41 55 54 4F 4D |WIRD DANN AUTOM|
00000360: 41 54 49 53 43 48 20 47 45 4C 4F 45 53 43 48 54 |ATISCH GELOESCHT|
00000370: 2C 55 4E 44 20 44 41 53 20 47 45 4E 45 52 49 45 |,UND DAS GENERIE|
00000380: 52 54 45 50 52 4F 47 52 41 4D 4D 20 53 54 45 48 |RTEPROGRAMM STEH|
00000390: 54 20 22 3B 00 D4 0B 16 00 99 22 49 4D 20 53 50 |T ";......"IM SP|
000003A0: 45 49 43 48 45 52 2E 11 11 22 A3 32 35 29 22 2E |EICHER...".25)".|
000003B0: 2E 2E 54 41 53 54 45 2E 2E 2E 22 3A 92 31 39 38 |..TASTE...":.198|
000003C0: 2C 31 3A 97 31 39 38 2C 30 3A 9C 3A 99 22 93 22 |,1:.198,0:.:."."|
000003D0: 3A 89 32 34 00 F0 0B 17 00 5A B2 C2 28 37 31 36 |:.24.....Z..(716|
000003E0: 29 AC 32 35 36 AA C2 28 37 31 35 29 3A 58 B2 34 |).256..(715):X.4|
000003F0: 00 36 0C 18 00 81 41 B2 30 A4 34 3A 97 37 38 31 |.6....A.0.4:.781|
00000400: 2C 41 3A 9E 35 39 39 30 33 3A 82 3A 44 24 B2 C4 |,A:.59903:.:D$..|
00000410: 28 C2 28 37 30 38 29 AC 32 35 36 AA C2 28 37 30 |(.(708).256..(70|
00000420: 37 29 29 AA 22 44 41 54 41 22 3A 59 B2 35 3A 8B |7))."DATA":Y.5:.|
00000430: 58 B2 34 89 32 38 00 7B 0C 19 00 41 24 B2 22 22 |X.4.28.{...A$.""|
00000440: 3A 85 22 13 11 11 11 11 11 44 41 54 41 20 20 20 |:."......DATA |
00000450: 20 20 20 9D 9D 9D 9D 9D 9D 22 3B 41 24 3A 8B C8 | ......";A$:..|
00000460: 28 41 24 2C 33 29 B2 22 2A 2A 2A 22 B0 C8 28 41 |(A$,3)."***"..(A|
00000470: 24 2C 31 29 B2 22 3D 22 89 34 39 00 95 0C 1A 00 |$,1)."=".49.....|
00000480: 5A B2 C5 28 41 24 29 3A 8B C2 28 37 30 34 29 B3 |Z..(A$):..(704).|
00000490: B1 39 89 32 38 00 CE 0C 1B 00 5A B2 30 3A 81 41 |.9.28.....Z.0:.A|
000004A0: B2 31 A4 C3 28 41 24 29 3A 58 B2 C6 28 CA 28 41 |.1..(A$):X..(.(A|
000004B0: 24 2C 41 2C 31 29 29 3A 5A B2 31 36 AC 5A AA 58 |$,A,1)):Z.16.Z.X|
000004C0: AB 34 38 AA 28 58 B1 36 34 29 AC 37 3A 82 00 E0 |.48.(X.64).7:...|
000004D0: 0C 1C 00 8B C2 28 37 30 35 29 B3 B1 39 89 33 33 |.....(705)..9.33|
000004E0: 00 F3 0C 1D 00 8B 5A B1 B2 30 AF 5A B3 32 35 36 |......Z..0.Z.256|
000004F0: 89 33 33 00 FB 0C 1E 00 89 35 36 00 36 0D 1F 00 |.33......56.6...|
00000500: 85 5A 24 3A 97 35 34 32 38 33 2C 30 3A 97 37 38 |.Z$:.54283,0:.78|
00000510: 31 2C 36 3A 9E 35 39 39 30 33 3A 97 37 38 31 2C |1,6:.59903:.781,|
00000520: 37 3A 9E 35 39 39 30 33 3A 97 37 38 31 2C 38 3A |7:.59903:.781,8:|
00000530: 9E 35 39 39 30 33 00 45 0D 20 00 8B 5A 24 B2 22 |.59903.E. ..Z$."|
00000540: 45 22 89 32 35 00 6B 0D 21 00 41 24 B2 C9 28 C4 |E".25.k.!.A$..(.|
00000550: 28 5A 29 2C C3 28 C4 28 5A 29 29 AB 31 29 3A 8B |(Z),.(.(Z)).1):.|
00000560: C2 28 37 30 36 29 B2 30 89 33 39 00 82 0D 22 00 |.(706).0.39...".|
00000570: 8B C3 28 41 24 29 B2 31 A7 41 24 B2 22 30 22 AA |..(A$).1.A$."0".|
00000580: 41 24 00 93 0D 23 00 8B C2 28 37 30 36 29 B2 32 |A$...#...(706).2|
00000590: 89 33 39 00 AA 0D 24 00 8B C3 28 41 24 29 B2 32 |.39...$...(A$).2|
000005A0: A7 41 24 B2 22 30 22 AA 41 24 00 EA 0D 27 00 8B |.A$."0".A$...'..|
000005B0: C3 28 44 24 29 AA C3 28 41 24 29 AA 31 B1 37 39 |.(D$)..(A$).1.79|
000005C0: A7 97 37 31 35 2C 28 5A AB 28 B5 28 5A AD 32 35 |..715,(Z.(.(Z.25|
000005D0: 36 29 AC 32 35 36 29 29 3A 97 37 31 36 2C B5 28 |6).256)):.716,.(|
000005E0: 5A AD 32 35 36 29 3A 89 34 32 00 0B 0E 28 00 8B |Z.256):.42...(..|
000005F0: 59 B2 35 A7 44 24 B2 44 24 AA 41 24 3A 99 22 13 |Y.5.D$.D$.A$:.".|
00000600: 22 44 24 3A 59 B2 30 3A 89 32 35 00 27 0E 29 00 |"D$:Y.0:.25.'.).|
00000610: 44 24 B2 44 24 AA 22 2C 22 AA 41 24 3A 99 22 13 |D$.D$.",".A$:.".|
00000620: 22 44 24 3A 89 32 35 00 64 0E 2A 00 99 22 13 11 |"D$:.25.d.*.."..|
00000630: 11 11 52 55 4E 34 35 13 22 3B 3A 97 36 33 31 2C |..RUN45.";:.631,|
00000640: 31 39 3A 97 36 33 32 2C 31 33 3A 97 36 33 33 2C |19:.632,13:.633,|
00000650: 31 34 31 3A 97 36 33 34 2C 31 33 3A 97 31 39 38 |141:.634,13:.198|
00000660: 2C 35 3A 80 00 A6 0E 2D 00 43 B2 C2 28 37 30 38 |,5:....-.C..(708|
00000670: 29 AC 32 35 36 AA C2 28 37 30 37 29 3A 43 B2 43 |).256..(707):C.C|
00000680: AA C2 28 37 30 39 29 3A 97 37 30 37 2C 28 43 AB |..(709):.707,(C.|
00000690: 28 B5 28 43 AD 32 35 36 29 AC 32 35 36 29 29 3A |(.(C.256).256)):|
000006A0: 97 31 39 38 2C 30 00 C3 0E 2E 00 97 37 30 38 2C |.198,0......708,|
000006B0: B5 28 43 AD 32 35 36 29 3A 8B C2 28 32 29 B2 30 |.(C.256):..(2).0|
000006C0: 89 32 33 00 D0 0E 2F 00 97 32 2C 30 3A 89 32 34 |.23.../..2,0:.24|
000006D0: 00 F2 0E 31 00 8B C8 28 41 24 2C 31 29 B2 22 3D |...1...(A$,1)."=|
000006E0: 22 A7 97 32 2C 31 3A 97 36 33 35 2C 31 33 3A 89 |"..2,1:.635,13:.|
000006F0: 34 32 00 2D 0F 32 00 99 22 13 22 3B 3A 97 36 33 |42.-.2..".";:.63|
00000700: 31 2C 31 39 3A 97 36 33 32 2C 31 33 3A 97 36 33 |1,19:.632,13:.63|
00000710: 33 2C 38 32 3A 97 36 33 34 2C 31 31 37 3A 97 36 |3,82:.634,117:.6|
00000720: 33 35 2C 35 33 3A 97 36 33 36 2C 35 30 00 4A 0F |35,53:.636,50.J.|
00000730: 33 00 97 36 33 37 2C 35 38 3A 97 36 33 38 2C 31 |3..637,58:.638,1|
00000740: 33 3A 97 31 39 38 2C 38 3A 80 00 54 0F 34 00 99 |3:.198,8:..T.4..|
00000750: 22 93 22 3B 00 8C 0F 35 00 81 41 B2 C2 28 37 31 |".";...5..A..(71|
00000760: 31 29 A4 C2 28 37 31 31 29 AA 37 3A 99 41 3A 82 |1)..(711).7:.A:.|
00000770: 3A 99 22 52 55 4E 35 35 22 3A 81 42 B2 36 33 32 |:."RUN55":.B.632|
00000780: A4 36 34 30 3A 97 42 2C 31 33 3A 82 00 B0 0F 36 |.640:.B,13:....6|
00000790: 00 97 36 33 31 2C 31 39 3A 97 31 39 38 2C 31 30 |..631,19:.198,10|
000007A0: 3A 97 37 31 31 2C C2 28 37 31 31 29 AA 38 3A 80 |:.711,.(711).8:.|
000007B0: 00 B8 0F 37 00 89 35 32 00 F2 0F 38 00 53 B2 35 |...7..52...8.S.5|
000007C0: 34 32 37 32 3A 97 53 AA 32 34 2C 31 35 3A 97 53 |4272:.S.24,15:.S|
000007D0: AA 37 2C 32 37 3A 97 53 AA 38 2C 34 3A 97 53 AA |.7,27:.S.8,4:.S.|
000007E0: 31 33 2C 32 34 30 3A 97 53 AA 31 31 2C 33 33 3A |13,240:.S.11,33:|
000007F0: 89 33 00 00 00 |.3... |
../...."... MARCUS SCHAEFER'S DATA
INPUT...S...."..***** MARCUS SCHAEFER'S
DATA-INPUT *****":.J.704.710:.J,0:......
." SIE GEBEN NUR DIE DATAS EIN,DEN REST
".12)"REGELT DAS PROGRAMM.":.4......"ZAH
L AUSSERHALB 0-255! A=ABSPEICHERN, E=E
INGABEWIEDERHOLUNG":.31.;....711,1:.".-
EINGABE DEZIMAL ODER HEXA (D/H)";A$.E...
C$."0-255":.A$."H"..704,9:C$."$0-$FF"...
..."- ZAHLENBEREICH "C$" (J/N)";:.B$:.B$
."J"..705,9......B$.."J".15.Z...."- SOLL
EN KLEINE ZAHLEN DURCH NULLEN AUF"......
" ZWEI (Z)/DREI(D) STELLEN AUFGEFUELLT"
.*...." WERDEN ODER NICHT (N)";F$.=....
F$."Z"..706,2.P....F$."D"..706,3.T...."-
ERSTE ZEILENNUMMER (>57)";A.....A..(A):
.A..57.."..":.15......707,(A.(.(A.256).2
56)):.708,.(A.256)......"- SCHRITTWEITE
(1-255)";B:B..(B):.B.1.B.255.18......709
,B.G....". DIE DATENEINGABE WIRD MIT DER
EINGABE VON '***' BEENDET.DATA-INPU";.
....."T WIRD DANN AUTOMATISCH GELOESCHT
,UND DAS GENERIERTEPROGRAMM STEHT ";.T..
.."IM SPEICHER...".25)"...TASTE...":.198
,1:.198,0:.:.".":.24.....Z.B(716).256.B(
715):X.4.6....A.0.4:.781,A:.59903:.:D$.D
(B(708).256.B(707))."DATA":Y.5:.X.4.28.{
...A$."":."......DATA ......";A$:.H
(A$,3)."***".H(A$,1)."=".49.....Z.E(A$):
.B(704)..9.28.N...Z.0:.A.1.C(A$):X.F(J(A
$,A,1)):Z.16.Z.X.48.(X.64).7:.......B(70
5)..9.33......Z..0.Z.256.33......56.6...
.Z$:.54283,0:.781,6:.59903:.781,7:.59903
:.781,8:.59903.E. ..Z$."E".25.K.!.A$.I(D
(Z),C(D(Z)).1):.B(706).0.39..."..C(A$).1
.A$."0".A$...#..B(706).2.39...$..C(A$).2
.A$."0".A$...'..C(D$).C(A$).1.79..715,(Z
.(.(Z.256).256)):.716,.(Z.256):.42...(..
Y.5.D$.D$.A$:."."D$:Y.0:.25.'.).D$.D$.",
".A$:."."D$:.25.D.*.."....RUN45.";:.631,
19:.632,13:.633,141:.634,13:.198,5:....-
.C.B(708).256.B(707):C.C.B(709):.707,(C.
(.(C.256).256)):.198,0.C....708,.(C.256)
:.B(2).0.23.P./..2,0:.24...1..H(A$,1)."=
"..2,1:.635,13:.42.-.2..".";:.631,19:.63
2,13:.633,82:.634,117:.635,53:.636,50.J.
3..637,58:.638,13:.198,8:..T.4..".";...5
..A.B(711).B(711).7:.A:.:."RUN55":.B.632
.640:.B,13:....6..631,19:.198,10:.711,B(
711).8:....7..52...8.S.54272:.S.24,15:.S
.7,27:.S.8,4:.S.13,240:.S.11,33:.3...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL