> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 12 08 0A 00 8F 20 47 43 52 2D 4D 41 53 54 |....... GCR-MAST|
00000010: 45 52 00 4F 08 14 00 8F 20 4E 49 4B 4F 4C 41 55 |ER.O.... NIKOLAU|
00000020: 53 20 48 45 55 53 4C 45 52 2C 20 5A 57 45 4E 47 |S HEUSLER, ZWENG|
00000030: 41 55 45 52 57 45 47 20 31 38 2C 20 38 31 34 37 |AUERWEG 18, 8147|
00000040: 39 20 53 4F 4C 4C 4E 20 28 31 31 2E 39 33 29 00 |9 SOLLN (11.93).|
00000050: 6C 08 19 00 86 44 24 28 31 35 29 3A 81 49 B2 30 |l....D$(15):.I.0|
00000060: A4 31 35 3A 87 44 24 28 49 29 3A 82 00 B3 08 1A |.15:.D$(I):.....|
00000070: 00 83 30 31 30 31 30 2C 30 31 30 31 31 2C 31 30 |..01010,01011,10|
00000080: 30 31 30 2C 31 30 30 31 31 2C 30 31 31 31 30 2C |010,10011,01110,|
00000090: 30 31 31 31 31 2C 31 30 31 31 30 2C 31 30 31 31 |01111,10110,1011|
000000A0: 31 2C 30 31 30 30 31 2C 31 31 30 30 31 2C 31 31 |1,01001,11001,11|
000000B0: 30 31 30 00 EB 08 1B 00 83 31 31 30 31 31 2C 30 |010......11011,0|
000000C0: 31 31 30 31 2C 31 31 31 30 31 2C 31 31 31 31 30 |1101,11101,11110|
000000D0: 2C 31 30 31 30 31 3A 41 24 B2 22 30 31 32 33 34 |,10101:A$."01234|
000000E0: 35 36 37 38 39 41 42 43 44 45 46 00 0F 09 1E 00 |56789ABCDEF.....|
000000F0: 99 3A 99 3A 99 3A 99 22 20 41 20 2D 20 57 41 4E |.:.:.:." A - WAN|
00000100: 44 45 4C 4E 20 48 45 58 20 2D 3E 20 47 43 52 00 |DELN HEX -> GCR.|
00000110: 2D 09 28 00 99 22 20 42 20 2D 20 57 41 4E 44 45 |-.(.." B - WANDE|
00000120: 4C 4E 20 47 43 52 20 2D 3E 20 48 45 58 00 3D 09 |LN GCR -> HEX.=.|
00000130: 32 00 99 22 20 43 20 2D 20 45 4E 44 45 00 51 09 |2.." C - ENDE.Q.|
00000140: 3C 00 A1 52 24 3A 8B 52 24 B2 22 43 22 A7 99 3A |<..R$:.R$."C"..:|
00000150: 80 00 61 09 46 00 8B 52 24 B2 22 41 22 A7 31 30 |..a.F..R$."A".10|
00000160: 30 00 71 09 50 00 8B 52 24 B2 22 42 22 A7 32 30 |0.q.P..R$."B".20|
00000170: 30 00 79 09 5A 00 89 36 30 00 A4 09 64 00 57 4C |0.y.Z..60...d.WL|
00000180: B2 38 3A 99 3A 99 22 42 49 54 54 45 20 56 49 45 |.8:.:."BITTE VIE|
00000190: 52 20 48 45 58 42 59 54 45 53 20 45 49 4E 47 45 |R HEXBYTES EINGE|
000001A0: 42 45 4E 21 00 CF 09 6E 00 99 22 28 5A 2E 42 2E |BEN!...n.."(Z.B.|
000001B0: 20 45 44 20 33 34 20 32 37 20 35 38 29 22 3A 99 | ED 34 27 58)":.|
000001C0: 3A 85 22 48 45 58 22 3B 48 24 3A 8D 33 30 30 00 |:."HEX";H$:.300.|
000001D0: 03 0A 7C 00 47 43 24 B2 22 22 3A 81 58 B2 31 A4 |..|.GC$."":.X.1.|
000001E0: 34 3A 48 31 24 B2 CA 28 58 24 2C 58 AC 32 AB 31 |4:H1$..(X$,X.2.1|
000001F0: 2C 31 29 3A 48 32 24 B2 CA 28 58 24 2C 58 AC 32 |,1):H2$..(X$,X.2|
00000200: 2C 31 29 00 37 0A 80 00 48 31 B2 C5 28 48 31 24 |,1).7...H1..(H1$|
00000210: 29 3A 48 32 B2 C5 28 48 32 24 29 3A 8B 48 31 B2 |):H2..(H2$):.H1.|
00000220: 30 AF 48 31 24 B3 B1 22 30 22 A7 48 31 B2 C6 28 |0.H1$.."0".H1..(|
00000230: 48 31 24 29 AB 35 35 00 57 0A 82 00 8B 48 32 B2 |H1$).55.W....H2.|
00000240: 30 AF 48 32 24 B3 B1 22 30 22 A7 48 32 B2 C6 28 |0.H2$.."0".H2..(|
00000250: 48 32 24 29 AB 35 35 00 89 0A 83 00 8B 48 31 B1 |H2$).55......H1.|
00000260: 31 35 B0 48 32 B1 31 35 B0 48 31 B3 30 B0 48 32 |15.H2.15.H1.0.H2|
00000270: B3 30 A7 99 3A 99 22 46 41 4C 53 43 48 45 20 45 |.0..:."FALSCHE E|
00000280: 49 4E 47 41 42 45 22 3A 8A 00 A5 0A 84 00 47 43 |INGABE":......GC|
00000290: 24 B2 47 43 24 AA 44 24 28 48 31 29 AA 44 24 28 |$.GC$.D$(H1).D$(|
000002A0: 48 32 29 3A 82 00 CE 0A 86 00 81 58 B2 31 A4 31 |H2):.......X.1.1|
000002B0: 30 3A 42 B2 30 3A 42 24 B2 CA 28 47 43 24 2C 58 |0:B.0:B$..(GC$,X|
000002C0: AC 34 AB 33 2C 34 29 3A 81 59 B2 30 A4 33 00 EF |.4.3,4):.Y.0.3..|
000002D0: 0A 88 00 8B CA 28 42 24 2C 59 AA 31 2C 31 29 B2 |.....(B$,Y.1,1).|
000002E0: 22 31 22 A7 42 B2 42 AA 32 AE 28 33 AB 59 29 00 |"1".B.B.2.(3.Y).|
000002F0: 1D 0B 8A 00 82 3A 45 24 B2 45 24 AA CA 28 41 24 |.....:E$.E$..(A$|
00000300: 2C 42 AA 31 2C 31 29 3A 8B 58 AD 32 B2 B5 28 58 |,B.1,1):.X.2..(X|
00000310: AD 32 29 A7 45 24 B2 45 24 AA 22 20 22 00 32 0B |.2).E$.E$." ".2.|
00000320: 8C 00 82 3A 99 3A 99 22 47 43 52 3A 20 22 45 24 |...:.:."GCR: "E$|
00000330: 3A 8A 00 60 0B C8 00 57 4C B2 31 30 3A 99 3A 99 |:..`...WL.10:.:.|
00000340: 22 42 49 54 54 45 20 46 55 45 4E 46 20 47 43 52 |"BITTE FUENF GCR|
00000350: 2D 42 59 54 45 53 20 45 49 4E 47 45 42 45 4E 21 |-BYTES EINGEBEN!|
00000360: 00 7F 0B D2 00 99 22 28 5A 2E 42 2E 20 46 37 20 |......"(Z.B. F7 |
00000370: 36 36 20 45 39 20 35 44 20 45 39 29 22 3A 99 00 |66 E9 5D E9)":..|
00000380: 9F 0B DC 00 85 22 47 43 52 22 3B 48 24 3A 8D 33 |....."GCR";H$:.3|
00000390: 30 30 3A 47 43 24 B2 22 22 3A 48 24 B2 58 24 00 |00:GC$."":H$.X$.|
000003A0: DB 0B DE 00 81 58 B2 31 A4 31 30 3A 58 24 B2 CA |.....X.1.10:X$..|
000003B0: 28 48 24 2C 58 2C 31 29 3A 58 58 B2 C5 28 58 24 |(H$,X,1):XX..(X$|
000003C0: 29 3A 8B 58 58 B2 30 AF 58 24 B3 B1 22 30 22 A7 |):.XX.0.X$.."0".|
000003D0: 58 58 B2 C6 28 58 24 29 AB 35 35 00 1D 0C E0 00 |XX..(X$).55.....|
000003E0: 81 59 B2 30 A4 33 3A 59 59 B2 B5 28 58 58 AD 32 |.Y.0.3:YY..(XX.2|
000003F0: AE 28 33 AB 59 29 29 3A 58 58 B2 58 58 AB 59 59 |.(3.Y)):XX.XX.YY|
00000400: AC 32 AE 28 33 AB 59 29 3A 8B 59 59 A7 47 43 24 |.2.(3.Y):.YY.GC$|
00000410: B2 47 43 24 AA 22 31 22 3A 89 32 33 32 00 2C 0C |.GC$."1":.232.,.|
00000420: E4 00 47 43 24 B2 47 43 24 AA 22 30 00 5D 0C E8 |..GC$.GC$."0.]..|
00000430: 00 82 59 2C 58 3A 48 43 24 B2 22 22 3A 81 58 B2 |..Y,X:HC$."":.X.|
00000440: 31 A4 38 3A 58 24 B2 CA 28 47 43 24 2C 58 AC 35 |1.8:X$..(GC$,X.5|
00000450: AB 34 2C 35 29 3A 81 59 B2 30 A4 31 35 00 8A 0C |.4,5):.Y.0.15...|
00000460: EA 00 8B 58 24 B3 B1 44 24 28 59 29 A7 82 59 3A |...X$..D$(Y)..Y:|
00000470: 99 3A 99 22 43 4F 44 45 20 4E 49 43 48 54 20 45 |.:."CODE NICHT E|
00000480: 52 4C 41 55 42 54 21 22 3A 8A 00 BA 0C EC 00 48 |RLAUBT!":......H|
00000490: 43 24 B2 48 43 24 AA CA 28 41 24 2C 59 AA 31 2C |C$.HC$..(A$,Y.1,|
000004A0: 31 29 3A 8B 58 AD 32 B2 B5 28 58 AD 32 29 A7 48 |1):.X.2..(X.2).H|
000004B0: 43 24 B2 48 43 24 AA 22 20 22 00 D1 0C EE 00 82 |C$.HC$." "......|
000004C0: 58 3A 99 3A 99 22 48 45 58 3A 20 22 48 43 24 3A |X:.:."HEX: "HC$:|
000004D0: 8A 00 06 0D 2C 01 58 24 B2 22 22 3A 81 49 B2 31 |....,.X$."":.I.1|
000004E0: A4 C3 28 48 24 29 3A 8B CA 28 48 24 2C 49 2C 31 |..(H$):..(H$,I,1|
000004F0: 29 B3 B1 22 20 22 A7 58 24 B2 58 24 AA CA 28 48 |).." ".X$.X$..(H|
00000500: 24 2C 49 2C 31 29 00 2E 0D 2E 01 82 3A 8B C3 28 |$,I,1)......:..(|
00000510: 58 24 29 B3 B1 57 4C A7 99 3A 99 22 46 41 4C 53 |X$)..WL..:."FALS|
00000520: 43 48 45 20 45 49 4E 47 41 42 45 22 3A 8A 00 34 |CHE EINGABE":..4|
00000530: 0D 30 01 8E 00 00 00 |.0..... |
....... GCR-MASTER.O.... NIKOLAUS HEUSLE
R, ZWENGAUERWEG 18, 81479 SOLLN (11.93).
L....D$(15):.I.0.15:.D$(I):.......01010,
01011,10010,10011,01110,01111,10110,1011
1,01001,11001,11010......11011,01101,111
01,11110,10101:A$."0123456789ABCDEF.....
.:.:.:." A - WANDELN HEX -> GCR.-.(.." B
- WANDELN GCR -> HEX.=.2.." C - ENDE.Q.
<..R$:.R$."C"..:..A.F..R$."A".100.Q.P..R
$."B".200.Y.Z..60...D.WL.8:.:."BITTE VIE
R HEXBYTES EINGEBEN!.O.N.."(Z.B. ED 34 2
7 58)":.:."HEX";H$:.300...|.GC$."":.X.1.
4:H1$.J(X$,X.2.1,1):H2$.J(X$,X.2,1).7...
H1.E(H1$):H2.E(H2$):.H1.0.H1$.."0".H1.F(
H1$).55.W....H2.0.H2$.."0".H2.F(H2$).55.
.....H1.15.H2.15.H1.0.H2.0..:."FALSCHE E
INGABE":......GC$.GC$.D$(H1).D$(H2):..N.
...X.1.10:B.0:B$.J(GC$,X.4.3,4):.Y.0.3..
....J(B$,Y.1,1)."1".B.B.2.(3.Y)......:E$
.E$.J(A$,B.1,1):.X.2..(X.2).E$.E$." ".2.
...:.:."GCR: "E$:..`.H.WL.10:.:."BITTE F
UENF GCR-BYTES EINGEBEN!..R.."(Z.B. F7
66 E9 5D E9)":......."GCR";H$:.300:GC$."
":H$.X$......X.1.10:X$.J(H$,X,1):XX.E(X$
):.XX.0.X$.."0".XX.F(X$).55......Y.0.3:Y
Y..(XX.2.(3.Y)):XX.XX.YY.2.(3.Y):.YY.GC$
.GC$."1":.232.,...GC$.GC$."0.]....Y,X:HC
$."":.X.1.8:X$.J(GC$,X.5.4,5):.Y.0.15...
...X$..D$(Y)..Y:.:."CODE NICHT ERLAUBT!"
:......HC$.HC$.J(A$,Y.1,1):.X.2..(X.2).H
C$.HC$." ".Q....X:.:."HEX: "HC$:....,.X$
."":.I.1.C(H$):.J(H$,I,1).." ".X$.X$.J(H
$,I,1)......:.C(X$)..WL..:."FALSCHE EING
ABE":..4.0.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL