LISTING 03.P

00000000: 01 08 0E 08 0A 00 86 20  4D 25 28 32 36 29 00 5B  |....... M%(26).[|
00000010: 08 38 C7 8F 20 42 45 46  45 48 4C 53 5A 45 52 4C  |.8.. BEFEHLSZERL|
00000020: 45 47 55 4E 47 2D 43 4F  44 49 45 52 55 4E 47 20  |EGUNG-CODIERUNG |
00000030: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000040: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 2D  |----------------|
00000050: 2D 2D 2D 2D 2D 2D 2D 2D  2D 2D 2D 00 61 08 39 C7  |-----------.a.9.|
00000060: 3A 00 78 08 42 C7 56 47  24 B2 22 4E 49 4D 4D 22  |:.x.B.VG$."NIMM"|
00000070: 3A 56 47 B2 31 30 31 32  00 9B 08 4C C7 8F 20 4D  |:VG.1012...L.. M|
00000080: 24 2D 54 41 42 45 4C 4C  45 20 41 4E 4C 45 47 45  |$-TABELLE ANLEGE|
00000090: 4E 20 2D 2D 2D 2D 2D 2D  2D 2D 2D 00 B7 08 60 C7  |N ---------...`.|
000000A0: 81 49 B2 31 A4 32 36 3A  4D 25 28 49 29 B2 C3 28  |.I.1.26:M%(I)..(|
000000B0: 56 47 24 29 3A 82 49 00  E8 08 6A C7 81 49 B2 31  |VG$):.I...j..I.1|
000000C0: A4 C3 28 56 47 24 29 3A  4D 25 28 C6 28 CA 28 56  |..(VG$):M%(.(.(V|
000000D0: 47 24 2C 49 2C 31 29 29  AB 36 34 29 B2 C3 28 56  |G$,I,1)).64)..(V|
000000E0: 47 24 29 AB 49 3A 82 49  00 1C 09 6C C7 81 49 B2  |G$).I:.I...l..I.|
000000F0: 31 A4 C3 28 56 47 24 29  3A 99 CA 28 56 47 24 2C  |1..(VG$):..(VG$,|
00000100: 49 2C 31 29 2C 4D 25 28  C6 28 CA 28 56 47 24 2C  |I,1),M%(.(.(VG$,|
00000110: 49 2C 31 29 29 AB 36 34  29 3A 82 49 00 3F 09 74  |I,1)).64):.I.?.t|
00000120: C7 8F 20 56 47 24 20 49  4E 20 42 45 24 20 53 55  |.. VG$ IN BE$ SU|
00000130: 43 48 45 4E 20 2D 2D 2D  2D 2D 2D 2D 2D 2D 2D 00  |CHEN ----------.|
00000140: 4D 09 79 C7 99 22 93 20  22 3B 42 45 24 00 56 09  |M.y..". ";BE$.V.|
00000150: 7E C7 50 4F B2 31 00 70  09 88 C7 81 49 B2 31 A4  |~.PO.1.p....I.1.|
00000160: 50 4F 3A 99 22 20 22 3B  3A 82 49 3A 99 56 47 24  |PO:." ";:.I:.VG$|
00000170: 00 9A 09 8D C7 8B 56 47  24 B2 CA 28 42 45 24 2C  |......VG$..(BE$,|
00000180: 50 4F 2C C3 28 56 47 24  29 29 A7 99 22 47 45 46  |PO,.(VG$)).."GEF|
00000190: 55 4E 44 45 4E 20 21 22  3A 80 00 AD 09 92 C7 81  |UNDEN !":.......|
000001A0: 49 B2 C3 28 56 47 24 29  A4 31 A9 AB 31 00 D9 09  |I..(VG$).1..1...|
000001B0: 97 C7 3A 8B CA 28 42 45  24 2C 50 4F AA 49 2C 31  |..:..(BE$,PO.I,1|
000001C0: 29 B2 22 22 A7 99 22 4E  49 43 48 54 20 47 45 46  |)."".."NICHT GEF|
000001D0: 55 4E 44 45 4E 21 22 3A  80 00 00 0A A1 C7 3A 8B  |UNDEN!":......:.|
000001E0: CA 28 56 47 24 2C 49 2C  31 29 B2 CA 28 42 45 24  |.(VG$,I,1)..(BE$|
000001F0: 2C 50 4F AA 49 AB 31 2C  31 29 A7 35 31 31 32 30  |,PO.I.1,1).51120|
00000200: 00 34 0A A5 C7 3A 8B C6  28 CA 28 42 45 24 2C 50  |.4...:..(.(BE$,P|
00000210: 4F AA 49 AB 31 2C 31 29  29 B2 33 32 A7 50 4F B2  |O.I.1,1)).32.PO.|
00000220: 50 4F AA C3 28 56 47 24  29 3A 49 B2 30 3A 89 35  |PO..(VG$):I.0:.5|
00000230: 31 31 32 30 00 66 0A A6  C7 3A 50 4F B2 50 4F AA  |1120.f...:PO.PO.|
00000240: 4D 25 28 C6 28 CA 28 42  45 24 2C 50 4F AA 49 AB  |M%(.(.(BE$,PO.I.|
00000250: 31 2C 31 29 29 AB 36 34  29 AA C3 28 56 47 24 29  |1,1)).64)..(VG$)|
00000260: AB 49 3A 49 B2 30 00 6D  0A B0 C7 82 49 00 78 0A  |.I:I.0.m....I.x.|
00000270: BA C7 89 35 31 30 38 30  00 00 00                 |...51080...     |

....... M%(26).[.8G. BEFEHLSZERLEGUNG-CO
DIERUNG --------------------------------
-----------.A.9G:.X.BGVG$."NIMM":VG.1012
...LG. M$-TABELLE ANLEGEN ---------...`G
.I.1.26:M%(I).C(VG$):.I...JG.I.1.C(VG$):
M%(F(J(VG$,I,1)).64).C(VG$).I:.I...LG.I.
1.C(VG$):.J(VG$,I,1),M%(F(J(VG$,I,1)).64
):.I.?.TG. VG$ IN BE$ SUCHEN ----------.
M.YG.". ";BE$.V.~GPO.1.P..G.I.1.PO:." ";
:.I:.VG$....G.VG$.J(BE$,PO,C(VG$)).."GEF
UNDEN !":.....G.I.C(VG$).1..1.Y..G:.J(BE
$,PO.I,1)."".."NICHT GEFUNDEN!":.....G:.
J(VG$,I,1).J(BE$,PO.I.1,1).51120.4..G:.F
(J(BE$,PO.I.1,1)).32.PO.PO.C(VG$):I.0:.5
1120.F..G:PO.PO.M%(F(J(BE$,PO.I.1,1)).64
).C(VG$).I:I.0.M..G.I.X..G.51080...

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL