00000000: 2B 24 43 24 64 00 8F 20 20 20 20 46 49 4E 44 20 |+$C$d.. FIND |
00000010: 46 55 45 52 20 43 31 32 38 00 49 24 6E 00 8F 00 |FUER C128.I$n...|
00000020: 6D 24 78 00 8F 20 20 20 20 46 52 45 49 20 56 45 |m$x.. FREI VE|
00000030: 52 53 43 48 49 45 42 42 41 52 45 20 56 45 52 53 |RSCHIEBBARE VERS|
00000040: 49 4F 4E 00 94 24 82 00 8F 20 20 20 20 44 45 53 |ION..$... DES|
00000050: 20 50 52 4F 47 52 41 4D 4D 45 53 20 41 55 53 20 | PROGRAMMES AUS |
00000060: 36 34 27 45 52 20 36 2F 38 36 00 9A 24 8C 00 8F |64'ER 6/86..$...|
00000070: 00 A0 24 96 00 8F 00 B5 24 E8 03 9F 31 2C 30 3A |..$.....$...1,0:|
00000080: 41 44 24 B2 22 24 31 42 30 30 22 00 E2 24 F2 03 |AD$."$1B00"..$..|
00000090: 99 22 93 11 20 53 54 41 52 54 41 44 52 45 53 53 |.".. STARTADRESS|
000000A0: 45 3A 20 22 41 44 24 3A 99 22 91 22 A6 31 35 29 |E: "AD$:.".".15)|
000000B0: 3B 3A 84 31 2C 41 44 24 00 05 25 FC 03 99 3A 48 |;:.1,AD$..%...:H|
000000C0: 24 B2 C8 28 41 44 24 2C 31 29 3A 8B 20 C3 28 41 |$..(AD$,1):. .(A|
000000D0: 44 24 29 B1 35 A7 20 31 30 31 30 00 2F 25 06 04 |D$).5. 1010./%..|
000000E0: 8B 20 48 24 B2 20 22 24 22 A7 20 41 44 B2 D1 28 |. H$. "$". AD..(|
000000F0: CA 28 41 44 24 2C 32 29 29 3A 99 A6 32 32 29 22 |.(AD$,2)):..22)"|
00000100: 91 3D 22 41 44 00 59 25 10 04 8B 20 48 24 B3 B1 |.="AD.Y%... H$..|
00000110: 22 24 22 A7 20 41 44 B2 C5 28 41 44 24 29 3A 99 |"$". AD..(AD$):.|
00000120: A6 32 32 29 22 91 3D 20 24 22 D2 28 41 44 29 00 |.22)".= $".(AD).|
00000130: 7A 25 1A 04 99 22 11 20 45 4E 44 41 44 52 45 53 |z%...". ENDADRES|
00000140: 53 45 20 20 3A 22 3B 3A 5A B2 41 44 AA 32 33 38 |SE :";:Z.AD.238|
00000150: 00 9B 25 24 04 8B 20 48 24 B2 20 22 24 22 A7 20 |..%$.. H$. "$". |
00000160: 99 22 20 24 22 D2 28 5A 29 A3 32 32 29 22 3D 22 |." $".(Z).22)"="|
00000170: 5A 00 BC 25 2E 04 8B 20 48 24 B3 B1 22 24 22 A7 |Z..%... H$.."$".|
00000180: 20 99 20 5A 20 A3 32 32 29 22 3D 20 24 22 D2 28 | . Z .22)"= $".(|
00000190: 5A 29 00 EA 25 38 04 99 22 11 20 41 4C 4C 45 53 |Z)..%8..". ALLES|
000001A0: 20 4F 4B 20 20 28 4A 2F 4E 29 20 3F 22 3A A1 F9 | OK (J/N) ?":..|
000001B0: 45 24 3A 8B 45 24 B3 B1 22 4A 22 A7 31 30 31 30 |E$:.E$.."J".1010|
000001C0: 00 0B 26 3D 04 99 22 11 20 42 49 54 54 45 2C 20 |..&=..". BITTE, |
000001D0: 45 49 4E 45 4E 20 4D 4F 4D 45 4E 54 20 2E 2E 2E |EINEN MOMENT ...|
000001E0: 22 00 31 26 42 04 81 20 48 B2 41 44 A4 5A 3A 87 |".1&B.. H.AD.Z:.|
000001F0: 58 24 3A 58 B2 D1 28 58 24 29 3A 97 48 2C 58 3A |X$:X..(X$):.H,X:|
00000200: 53 B2 53 AA 58 3A 82 00 54 26 4C 04 8B 20 53 B3 |S.S.X:..T&L.. S.|
00000210: B1 32 39 33 31 35 A7 20 99 22 20 44 41 54 41 46 |.29315. ." DATAF|
00000220: 45 48 4C 45 52 20 21 22 3A 80 00 74 26 B0 04 99 |EHLER !":..t&...|
00000230: 22 11 20 53 50 45 49 43 48 45 52 4E 20 28 4A 2F |". SPEICHERN (J/|
00000240: 4E 29 20 3F 22 3A A1 F9 45 24 00 A6 26 BA 04 8B |N) ?":..E$..&...|
00000250: 45 24 B2 22 4A 22 A7 20 FE 10 22 46 49 4E 44 20 |E$."J". .."FIND |
00000260: 43 31 32 38 20 22 AA 41 44 24 2C 91 42 30 2C 50 |C128 ".AD$,.B0,P|
00000270: 28 41 44 29 A4 20 50 28 5A AA 31 29 00 AF 26 C4 |(AD). P(Z.1)..&.|
00000280: 04 9E 20 41 44 00 E5 26 00 1B 83 20 44 38 2C 31 |.. AD..&... D8,1|
00000290: 38 2C 41 35 2C 30 34 2C 36 39 2C 31 31 2C 38 44 |8,A5,04,69,11,8D|
000002A0: 2C 30 38 2C 30 33 2C 41 35 2C 30 33 2C 36 39 2C |,08,03,A5,03,69,|
000002B0: 30 30 2C 38 44 2C 30 39 2C 30 33 00 1B 27 10 1B |00,8D,09,03..'..|
000002C0: 83 20 36 30 2C 32 30 2C 38 30 2C 30 33 2C 43 39 |. 60,20,80,03,C9|
000002D0: 2C 34 30 2C 46 30 2C 30 36 2C 32 30 2C 38 36 2C |,40,F0,06,20,86,|
000002E0: 30 33 2C 34 43 2C 46 33 2C 34 41 2C 41 39 2C 30 |03,4C,F3,4A,A9,0|
000002F0: 30 00 51 27 20 1B 83 20 38 35 2C 46 41 2C 41 32 |0.Q' .. 85,FA,A2|
00000300: 2C 30 30 2C 32 30 2C 38 30 2C 30 33 2C 46 30 2C |,00,20,80,03,F0,|
00000310: 45 46 2C 43 39 2C 32 32 2C 44 30 2C 30 36 2C 41 |EF,C9,22,D0,06,A|
00000320: 39 2C 30 31 2C 38 35 00 87 27 30 1B 83 20 46 41 |9,01,85..'0.. FA|
00000330: 2C 44 30 2C 30 45 2C 39 44 2C 30 30 2C 30 43 2C |,D0,0E,9D,00,0C,|
00000340: 45 38 2C 32 30 2C 38 30 2C 30 33 2C 44 30 2C 46 |E8,20,80,03,D0,F|
00000350: 37 2C 39 44 2C 30 30 2C 30 43 2C 46 30 00 BD 27 |7,9D,00,0C,F0..'|
00000360: 40 1B 83 20 31 39 2C 32 30 2C 38 30 2C 30 33 2C |@.. 19,20,80,03,|
00000370: 43 39 2C 32 32 2C 46 30 2C 30 36 2C 39 44 2C 30 |C9,22,F0,06,9D,0|
00000380: 30 2C 30 43 2C 45 38 2C 44 30 2C 46 33 2C 41 39 |0,0C,E8,D0,F3,A9|
00000390: 2C 30 30 00 F3 27 50 1B 83 20 39 44 2C 30 30 2C |,00..'P.. 9D,00,|
000003A0: 30 43 2C 32 30 2C 38 30 2C 30 33 2C 41 39 2C 30 |0C,20,80,03,A9,0|
000003B0: 31 2C 38 35 2C 46 41 2C 41 35 2C 32 44 2C 38 35 |1,85,FA,A5,2D,85|
000003C0: 2C 46 43 2C 41 35 2C 32 45 00 29 28 60 1B 83 20 |,FC,A5,2E.)(`.. |
000003D0: 38 35 2C 46 44 2C 41 39 2C 30 30 2C 38 35 2C 46 |85,FD,A9,00,85,F|
000003E0: 42 2C 41 30 2C 30 31 2C 41 39 2C 46 43 2C 32 30 |B,A0,01,A9,FC,20|
000003F0: 2C 39 46 2C 30 33 2C 46 30 2C 37 44 2C 41 30 00 |,9F,03,F0,7D,A0.|
00000400: 5F 28 70 1B 83 20 30 34 2C 41 32 2C 30 30 2C 41 |_(p.. 04,A2,00,A|
00000410: 39 2C 46 43 2C 32 30 2C 39 46 2C 30 33 2C 34 38 |9,FC,20,9F,03,48|
00000420: 2C 43 39 2C 32 32 2C 44 30 2C 30 36 2C 41 39 2C |,C9,22,D0,06,A9,|
00000430: 30 31 2C 34 35 00 95 28 80 1B 83 20 46 42 2C 38 |01,45..(... FB,8|
00000440: 35 2C 46 42 2C 36 38 2C 46 30 2C 34 45 2C 34 38 |5,FB,68,F0,4E,48|
00000450: 2C 41 35 2C 46 41 2C 43 35 2C 46 42 2C 46 30 2C |,A5,FA,C5,FB,F0,|
00000460: 30 38 2C 36 38 2C 43 38 2C 44 30 00 CB 28 90 1B |08,68,C8,D0..(..|
00000470: 83 20 45 30 2C 46 30 2C 44 45 2C 44 30 2C 43 44 |. E0,F0,DE,D0,CD|
00000480: 2C 36 38 2C 44 44 2C 30 30 2C 30 43 2C 46 30 2C |,68,DD,00,0C,F0,|
00000490: 30 33 2C 43 38 2C 44 30 2C 44 35 2C 43 38 2C 45 |03,C8,D0,D5,C8,E|
000004A0: 38 00 01 29 A0 1B 83 20 42 44 2C 30 30 2C 30 43 |8..)... BD,00,0C|
000004B0: 2C 46 30 2C 30 46 2C 34 38 2C 41 39 2C 46 43 2C |,F0,0F,48,A9,FC,|
000004C0: 32 30 2C 39 46 2C 30 33 2C 38 35 2C 36 33 2C 36 |20,9F,03,85,63,6|
000004D0: 38 2C 43 35 2C 36 33 00 37 29 B0 1B 83 20 46 30 |8,C5,63.7)... F0|
000004E0: 2C 45 43 2C 44 30 2C 42 44 2C 41 39 2C 30 44 2C |,EC,D0,BD,A9,0D,|
000004F0: 32 30 2C 30 43 2C 35 36 2C 41 35 2C 46 43 2C 38 |20,0C,56,A5,FC,8|
00000500: 35 2C 36 31 2C 41 35 2C 46 44 2C 38 35 00 6D 29 |5,61,A5,FD,85.m)|
00000510: C0 1B 83 20 36 32 2C 41 30 2C 30 33 2C 41 39 2C |... 62,A0,03,A9,|
00000520: 46 43 2C 32 30 2C 39 46 2C 30 33 2C 34 38 2C 38 |FC,20,9F,03,48,8|
00000530: 38 2C 41 39 2C 46 43 2C 32 30 2C 39 46 2C 30 33 |8,A9,FC,20,9F,03|
00000540: 2C 41 41 00 A3 29 D0 1B 83 20 36 38 2C 32 30 2C |,AA..)... 68,20,|
00000550: 32 33 2C 35 31 2C 41 30 2C 30 30 2C 41 39 2C 46 |23,51,A0,00,A9,F|
00000560: 43 2C 32 30 2C 39 46 2C 30 33 2C 41 41 2C 43 38 |C,20,9F,03,AA,C8|
00000570: 2C 41 39 2C 46 43 2C 32 30 00 D6 29 E0 1B 83 20 |,A9,FC,20..)... |
00000580: 39 46 2C 30 33 2C 38 35 2C 46 44 2C 38 36 2C 46 |9F,03,85,FD,86,F|
00000590: 43 2C 41 35 2C 39 31 2C 43 39 2C 37 46 2C 44 30 |C,A5,91,C9,7F,D0|
000005A0: 2C 41 37 2C 34 43 2C 46 36 2C 34 41 00 00 00 |,A7,4C,F6,4A... |
+$C$D.. FIND FUER C128.I$N...M$X..
FREI VERSCHIEBBARE VERSION..$... DES
PROGRAMMES AUS 64'ER 6/86..$.... $.....
$...1,0:AD$."$1B00"..$...".. STARTADRESS
E: "AD$:.".".15);:.1,AD$..%...:H$.H(AD$,
1):. C(AD$).5. 1010./%... H$. "$". AD.Q(
J(AD$,2)):..22)".="AD.Y%... H$.."$". AD.
E(AD$):..22)".= $"R(AD).Z%...". ENDADRES
SE :";:Z.AD.238..%$.. H$. "$". ." $"R(Z
).22)"="Z..%... H$.."$". . Z .22)"= $"R(
Z)..%8..". ALLES OK (J/N) ?":..E$:.E$..
"J".1010..&=..". BITTE, EINEN MOMENT ...
".1&B.. H.AD.Z:.X$:X.Q(X$):.H,X:S.S.X:..
T&L.. S..29315. ." DATAFEHLER !":..T&...
". SPEICHERN (J/N) ?":..E$..&...E$."J".
.."FIND C128 ".AD$,.B0,P(AD). P(Z.1)..&D
.. AD..&... D8,18,A5,04,69,11,8D,08,03,A
5,03,69,00,8D,09,03..'... 60,20,80,03,C9
,40,F0,06,20,86,03,4C,F3,4A,A9,00.Q' ..
85,FA,A2,00,20,80,03,F0,EF,C9,22,D0,06,A
9,01,85..'0.. FA,D0,0E,9D,00,0C,E8,20,80
,03,D0,F7,9D,00,0C,F0..'@.. 19,20,80,03,
C9,22,F0,06,9D,00,0C,E8,D0,F3,A9,00..'P.
. 9D,00,0C,20,80,03,A9,01,85,FA,A5,2D,85
,FC,A5,2E.)(`.. 85,FD,A9,00,85,FB,A0,01,
A9,FC,20,9F,03,F0,7D,A0._(P.. 04,A2,00,A
9,FC,20,9F,03,48,C9,22,D0,06,A9,01,45..(
... FB,85,FB,68,F0,4E,48,A5,FA,C5,FB,F0,
08,68,C8,D0.K(... E0,F0,DE,D0,CD,68,DD,0
0,0C,F0,03,C8,D0,D5,C8,E8..) .. BD,00,0C
,F0,0F,48,A9,FC,20,9F,03,85,63,68,C5,63.
7)... F0,EC,D0,BD,A9,0D,20,0C,56,A5,FC,8
5,61,A5,FD,85.M)... 62,A0,03,A9,FC,20,9F
,03,48,88,A9,FC,20,9F,03,AA..)P.. 68,20,
23,51,A0,00,A9,FC,20,9F,03,AA,C8,A9,FC,2
0.V)... 9F,03,85,FD,86,FC,A5,91,C9,7F,D0
,A7,4C,F6,4A...