00000000: D8 1F E6 1F 50 00 2E 42 41 20 24 36 30 30 30 00 |....P..BA $6000.|
00000010: F4 1F 5A 00 2E 4C 49 20 31 2C 33 2C 30 00 FA 1F |..Z..LI 1,3,0...|
00000020: 64 00 3B 00 1D 20 6E 00 3B 20 48 59 50 52 41 2D |d.;.. n.; HYPRA-|
00000030: 41 53 53 2D 51 55 45 4C 4C 54 45 58 54 20 5A 55 |ASS-QUELLTEXT ZU|
00000040: 20 45 49 4E 45 52 00 42 20 78 00 3B 20 53 45 4C | EINER.B x.; SEL|
00000050: 42 53 54 4D 4F 44 49 46 49 5A 49 45 52 45 4E 44 |BSTMODIFIZIEREND|
00000060: 45 4E 20 53 43 48 4C 45 49 46 45 00 65 20 82 00 |EN SCHLEIFE.e ..|
00000070: 3B 20 28 41 52 42 45 49 54 45 54 20 57 49 45 20 |; (ARBEITET WIE |
00000080: 4C 49 53 54 49 4E 47 20 31 30 2E 32 38 29 00 6B |LISTING 10.28).k|
00000090: 20 8C 00 3B 00 89 20 96 00 3B 20 31 39 38 35 20 | ..;.. ..; 1985 |
000000A0: 42 59 20 46 4C 4F 52 49 41 4E 20 4D 55 45 4C 4C |BY FLORIAN MUELL|
000000B0: 45 52 00 8F 20 A0 00 3B 00 95 20 AA 00 3B 00 AB |ER.. ..;.. ..;..|
000000C0: 20 B4 00 2E 47 4C 20 53 54 41 52 54 20 3D 20 24 | ...GL START = $|
000000D0: 41 30 30 30 00 C1 20 BE 00 2E 47 4C 20 45 4E 44 |A000.. ...GL END|
000000E0: 45 20 20 3D 20 24 42 46 46 46 00 C7 20 C8 00 3B |E = $BFFF.. ..;|
000000F0: 00 D9 20 D2 00 20 4C 44 58 23 3C 28 53 54 41 52 |.. .. LDX#<(STAR|
00000100: 54 29 00 E8 20 DC 00 20 53 54 58 4D 4F 44 31 2B |T).. .. STXMOD1+|
00000110: 31 00 F7 20 E6 00 20 53 54 58 4D 4F 44 32 2B 31 |1.. .. STXMOD2+1|
00000120: 00 09 21 F0 00 20 4C 44 58 23 3E 28 53 54 41 52 |..!.. LDX#>(STAR|
00000130: 54 29 00 18 21 FA 00 20 53 54 58 4D 4F 44 31 2B |T)..!.. STXMOD1+|
00000140: 32 00 27 21 04 01 20 53 54 58 4D 4F 44 32 2B 32 |2.'!.. STXMOD2+2|
00000150: 00 39 21 0E 01 4D 4F 44 31 20 4C 44 58 24 46 46 |.9!..MOD1 LDX$FF|
00000160: 46 46 00 4B 21 18 01 4D 4F 44 32 20 53 54 58 24 |FF.K!..MOD2 STX$|
00000170: 46 46 46 46 00 5A 21 22 01 20 49 4E 43 4D 4F 44 |FFFF.Z!". INCMOD|
00000180: 31 2B 31 00 69 21 2C 01 20 49 4E 43 4D 4F 44 32 |1+1.i!,. INCMOD2|
00000190: 2B 31 00 76 21 36 01 20 42 4E 45 4D 4F 44 31 00 |+1.v!6. BNEMOD1.|
000001A0: 85 21 40 01 20 49 4E 43 4D 4F 44 31 2B 32 00 94 |.!@. INCMOD1+2..|
000001B0: 21 4A 01 20 49 4E 43 4D 4F 44 32 2B 32 00 A3 21 |!J. INCMOD2+2..!|
000001C0: 54 01 20 4C 44 58 4D 4F 44 31 2B 32 00 B6 21 5E |T. LDXMOD1+2..!^|
000001D0: 01 20 43 50 58 23 3E 28 45 4E 44 45 2B 31 29 00 |. CPX#>(ENDE+1).|
000001E0: C3 21 68 01 20 42 4E 45 4D 4F 44 31 00 00 00 |.!h. BNEMOD1... |
X...P..BA $6000...Z..LI 1,3,0...D.;.. N.
; HYPRA-ASS-QUELLTEXT ZU EINER.B X.; SEL
BSTMODIFIZIERENDEN SCHLEIFE.E ..; (ARBEI
TET WIE LISTING 10.28).K ..;.. ..; 1985
BY FLORIAN MUELLER.. .;.. ..;.. ...GL S
TART = $A000.A ...GL ENDE = $BFFF.G H.;
.Y R. LDX#<(START).. .. STXMOD1+1.. .. S
TXMOD2+1..!.. LDX#>(START)..!.. STXMOD1+
2.'!.. STXMOD2+2.9!..MOD1 LDX$FFFF.K!..M
OD2 STX$FFFF.Z!". INCMOD1+1.I!,. INCMOD2
+1.V!6. BNEMOD1..!@. INCMOD1+2..!J. INCM
OD2+2..!T. LDXMOD1+2..!^. CPX#>(ENDE+1).
C!H. BNEMOD1...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL