TEIL 6.LIST 2

00000000: D8 1F FE 1F E8 03 3B 2A  2A 2A 2A 2A 2A 2A 2A 2A  |......;*********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000020: 2A 2A 2A 2A 2A 2A 2A 00  24 20 F2 03 3B 2A 2A 20  |*******.$ ..;** |
00000030: 49 4E 49 54 49 41 4C 49  53 49 45 52 55 4E 47 20  |INITIALISIERUNG |
00000040: 20 20 20 20 20 20 20 20  20 20 20 2A 2A 00 4A 20  |           **.J |
00000050: FC 03 3B 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |..;*************|
00000060: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000070: 2A 2A 2A 00 57 20 06 04  49 4E 49 54 20 53 45 49  |***.W ..INIT SEI|
00000080: 00 6C 20 10 04 20 4C 44  41 23 3C 28 56 49 44 45  |.l .. LDA#<(VIDE|
00000090: 4F 52 41 4D 29 00 81 20  1A 04 20 4C 44 58 23 3E  |ORAM).. .. LDX#>|
000000A0: 28 56 49 44 45 4F 52 41  4D 29 00 8E 20 24 04 20  |(VIDEORAM).. $. |
000000B0: 53 54 41 56 52 41 4D 00  9D 20 2E 04 20 53 54 58  |STAVRAM.. .. STX|
000000C0: 56 52 41 4D 2B 31 00 B3  20 38 04 20 4C 44 41 23  |VRAM+1.. 8. LDA#|
000000D0: 3C 28 53 43 52 4F 4C 4C  53 43 52 29 00 C9 20 42  |<(SCROLLSCR).. B|
000000E0: 04 20 4C 44 58 23 3E 28  53 43 52 4F 4C 4C 53 43  |. LDX#>(SCROLLSC|
000000F0: 52 29 00 DA 20 4C 04 20  53 54 41 53 43 52 53 54  |R).. L. STASCRST|
00000100: 41 52 54 00 ED 20 56 04  20 53 54 58 53 43 52 53  |ART.. V. STXSCRS|
00000110: 54 41 52 54 2B 31 00 06  21 60 04 20 4C 44 41 23  |TART+1..!`. LDA#|
00000120: 3C 28 53 43 52 4F 4C 4C  42 52 45 49 54 45 29 00  |<(SCROLLBREITE).|
00000130: 1F 21 6A 04 20 4C 44 58  23 3E 28 53 43 52 4F 4C  |.!j. LDX#>(SCROL|
00000140: 4C 42 52 45 49 54 45 29  00 2F 21 74 04 20 53 54  |LBREITE)./!t. ST|
00000150: 41 53 42 52 45 49 54 45  00 41 21 7E 04 20 53 54  |ASBREITE.A!~. ST|
00000160: 58 53 42 52 45 49 54 45  2B 31 00 5D 21 88 04 20  |XSBREITE+1.]!.. |
00000170: 4C 44 41 23 3C 28 53 43  52 4F 4C 4C 42 52 45 49  |LDA#<(SCROLLBREI|
00000180: 54 45 2D 34 30 29 00 79  21 92 04 20 4C 44 58 23  |TE-40).y!.. LDX#|
00000190: 3E 28 53 43 52 4F 4C 4C  42 52 45 49 54 45 2D 34  |>(SCROLLBREITE-4|
000001A0: 30 29 00 88 21 9C 04 20  53 54 41 47 52 45 4E 5A  |0)..!.. STAGRENZ|
000001B0: 45 00 99 21 A6 04 20 53  54 58 47 52 45 4E 5A 45  |E..!.. STXGRENZE|
000001C0: 2B 31 00 A4 21 B0 04 20  4C 44 41 23 30 00 B3 21  |+1..!.. LDA#0..!|
000001D0: BA 04 20 53 54 41 53 43  52 50 4F 53 00 C4 21 C4  |.. STASCRPOS..!.|
000001E0: 04 20 53 54 41 53 43 52  50 4F 53 2B 31 00 D3 21  |. STASCRPOS+1..!|
000001F0: CE 04 20 53 54 41 50 49  58 50 4F 53 00 E2 21 D8  |.. STAPIXPOS..!.|
00000200: 04 20 53 54 41 44 49 52  45 43 54 00 F2 21 E2 04  |. STADIRECT..!..|
00000210: 20 53 54 41 50 44 49 52  45 43 54 00 FD 21 EC 04  | STAPDIRECT..!..|
00000220: 20 4C 44 41 23 31 00 0A  22 F6 04 20 53 54 41 53  | LDA#1..".. STAS|
00000230: 54 45 50 00 18 22 00 05  20 53 54 41 50 53 54 45  |TEP..".. STAPSTE|
00000240: 50 00 27 22 0A 05 20 4C  44 41 23 52 4F 42 45 4E  |P.'".. LDA#ROBEN|
00000250: 00 36 22 14 05 20 53 54  41 52 41 53 54 45 52 00  |.6".. STARASTER.|
00000260: 44 22 1E 05 20 4C 44 41  48 49 42 49 54 00 51 22  |D".. LDAHIBIT.Q"|
00000270: 28 05 20 41 4E 44 23 31  32 37 00 5F 22 32 05 20  |(. AND#127._"2. |
00000280: 53 54 41 48 49 42 49 54  00 6C 22 3C 05 20 4C 44  |STAHIBIT.l"<. LD|
00000290: 41 23 31 32 39 00 7C 22  46 05 20 53 54 41 49 52  |A#129.|"F. STAIR|
000002A0: 51 4D 41 53 4B 00 8F 22  50 05 20 4C 44 41 23 3C  |QMASK.."P. LDA#<|
000002B0: 28 49 52 51 4E 45 55 29  00 A2 22 5A 05 20 4C 44  |(IRQNEU).."Z. LD|
000002C0: 58 23 3E 28 49 52 51 4E  45 55 29 00 B1 22 64 05  |X#>(IRQNEU).."d.|
000002D0: 20 53 54 41 49 52 51 56  45 43 00 C2 22 6E 05 20  | STAIRQVEC.."n. |
000002E0: 53 54 58 49 52 51 56 45  43 2B 31 00 D2 22 78 05  |STXIRQVEC+1.."x.|
000002F0: 20 4C 44 41 43 49 41 54  49 4D 45 00 DF 22 82 05  | LDACIATIME.."..|
00000300: 20 41 4E 44 23 32 35 34  00 EF 22 8C 05 20 53 54  | AND#254..".. ST|
00000310: 41 43 49 41 54 49 4D 45  00 F8 22 96 05 20 43 4C  |ACIATIME..".. CL|
00000320: 49 00 01 23 A0 05 20 52  54 53 00 27 23 D0 07 3B  |I..#.. RTS.'#..;|
00000330: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000340: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000350: 00 4D 23 DA 07 3B 2A 2A  20 49 52 51 2D 52 4F 55  |.M#..;** IRQ-ROU|
00000360: 54 49 4E 45 20 20 20 20  20 20 20 20 20 20 20 20  |TINE            |
00000370: 20 20 20 20 2A 2A 00 73  23 E4 07 3B 2A 2A 2A 2A  |    **.s#..;****|
00000380: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000390: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 00 89 23 EE  |************..#.|
000003A0: 07 49 52 51 4E 45 55 20  4C 44 41 49 52 51 46 4C  |.IRQNEU LDAIRQFL|
000003B0: 41 47 00 99 23 F8 07 20  53 54 41 49 52 51 46 4C  |AG..#.. STAIRQFL|
000003C0: 41 47 00 A8 23 02 08 20  4C 44 41 52 41 53 54 45  |AG..#.. LDARASTE|
000003D0: 52 00 B7 23 0C 08 20 43  4D 50 23 52 48 41 52 44  |R..#.. CMP#RHARD|
000003E0: 00 C7 23 16 08 20 42 43  53 49 52 51 48 41 52 44  |..#.. BCSIRQHARD|
000003F0: 00 D7 23 20 08 20 43 4D  50 23 52 55 4E 54 45 4E  |..# . CMP#RUNTEN|
00000400: 00 E8 23 2A 08 20 42 43  53 49 52 51 55 4E 54 45  |..#*. BCSIRQUNTE|
00000410: 4E 00 F8 23 34 08 20 4A  4D 50 49 52 51 4F 42 45  |N..#4. JMPIRQOBE|
00000420: 4E 00 FE 23 3E 08 3B 00  15 24 48 08 49 52 51 48  |N..#>.;..$H.IRQH|
00000430: 41 52 44 20 4A 53 52 48  53 43 52 4F 4C 4C 00 24  |ARD JSRHSCROLL.$|
00000440: 24 52 08 20 4C 44 41 23  52 4F 42 45 4E 00 33 24  |$R. LDA#ROBEN.3$|
00000450: 5C 08 20 53 54 41 52 41  53 54 45 52 00 42 24 66  |\. STARASTER.B$f|
00000460: 08 20 4A 4D 50 49 52 51  45 4E 44 00 48 24 70 08  |. JMPIRQEND.H$p.|
00000470: 3B 00 5F 24 7A 08 49 52  51 4F 42 45 4E 20 4C 44  |;._$z.IRQOBEN LD|
00000480: 41 58 53 43 52 4F 4C 4C  00 6E 24 84 08 20 41 4E  |AXSCROLL.n$.. AN|
00000490: 44 23 32 35 35 2D 37 00  7E 24 8E 08 20 53 54 41  |D#255-7.~$.. STA|
000004A0: 58 53 43 52 4F 4C 4C 00  8D 24 98 08 20 42 49 54  |XSCROLL..$.. BIT|
000004B0: 44 49 52 45 43 54 00 9B  24 A2 08 20 42 4D 49 43  |DIRECT..$.. BMIC|
000004C0: 4F 4E 54 31 00 AB 24 AC  08 20 42 56 53 53 4C 49  |ONT1..$.. BVSSLI|
000004D0: 4E 4B 53 31 00 B1 24 B6  08 3B 00 C2 24 C0 08 53  |NKS1..$..;..$..S|
000004E0: 52 45 43 48 54 53 31 20  43 4C 43 00 D1 24 CA 08  |RECHTS1 CLC..$..|
000004F0: 20 4C 44 41 50 49 58 50  4F 53 00 DE 24 D4 08 20  | LDAPIXPOS..$.. |
00000500: 41 44 43 53 54 45 50 00  E9 24 DE 08 20 41 4E 44  |ADCSTEP..$.. AND|
00000510: 23 37 00 F8 24 E8 08 20  53 54 41 50 49 58 50 4F  |#7..$.. STAPIXPO|
00000520: 53 00 06 25 F2 08 20 4A  4D 50 43 4F 4E 54 31 00  |S..%.. JMPCONT1.|
00000530: 0C 25 FC 08 3B 00 1C 25  06 09 53 4C 49 4E 4B 53  |.%..;..%..SLINKS|
00000540: 31 20 53 45 43 00 2B 25  10 09 20 4C 44 41 50 49  |1 SEC.+%.. LDAPI|
00000550: 58 50 4F 53 00 38 25 1A  09 20 53 42 43 53 54 45  |XPOS.8%.. SBCSTE|
00000560: 50 00 43 25 24 09 20 41  4E 44 23 37 00 52 25 2E  |P.C%$. AND#7.R%.|
00000570: 09 20 53 54 41 50 49 58  50 4F 53 00 58 25 38 09  |. STAPIXPOS.X%8.|
00000580: 3B 00 6D 25 42 09 43 4F  4E 54 31 20 4C 44 41 23  |;.m%B.CONT1 LDA#|
00000590: 52 55 4E 54 45 4E 00 7C  25 4C 09 20 53 54 41 52  |RUNTEN.|%L. STAR|
000005A0: 41 53 54 45 52 00 8B 25  56 09 20 4A 4D 50 49 52  |ASTER..%V. JMPIR|
000005B0: 51 41 4C 54 00 91 25 60  09 3B 00 A9 25 6A 09 49  |QALT..%`.;..%j.I|
000005C0: 52 51 55 4E 54 45 4E 20  4C 44 41 58 53 43 52 4F  |RQUNTEN LDAXSCRO|
000005D0: 4C 4C 00 B8 25 74 09 20  41 4E 44 23 32 35 35 2D  |LL..%t. AND#255-|
000005E0: 37 00 C7 25 7E 09 20 4F  52 41 50 49 58 50 4F 53  |7..%~. ORAPIXPOS|
000005F0: 00 D7 25 88 09 20 53 54  41 58 53 43 52 4F 4C 4C  |..%.. STAXSCROLL|
00000600: 00 E7 25 92 09 20 4C 44  41 50 44 49 52 45 43 54  |..%.. LDAPDIRECT|
00000610: 00 F6 25 9C 09 20 53 54  41 44 49 52 45 43 54 00  |..%.. STADIRECT.|
00000620: 04 26 A6 09 20 4C 44 41  50 53 54 45 50 00 11 26  |.&.. LDAPSTEP..&|
00000630: B0 09 20 53 54 41 53 54  45 50 00 20 26 BA 09 20  |.. STASTEP. &.. |
00000640: 42 49 54 44 49 52 45 43  54 00 2E 26 C4 09 20 42  |BITDIRECT..&.. B|
00000650: 4D 49 43 4F 4E 54 32 00  3E 26 CE 09 20 42 56 53  |MICONT2.>&.. BVS|
00000660: 53 4C 49 4E 4B 53 32 00  44 26 D8 09 3B 00 55 26  |SLINKS2.D&..;.U&|
00000670: E2 09 53 52 45 43 48 54  53 32 20 43 4C 43 00 64  |..SRECHTS2 CLC.d|
00000680: 26 EC 09 20 4C 44 41 50  49 58 50 4F 53 00 71 26  |&.. LDAPIXPOS.q&|
00000690: F6 09 20 41 44 43 53 54  45 50 00 80 26 00 0A 20  |.. ADCSTEP..&.. |
000006A0: 41 4E 44 23 32 35 35 2D  37 00 90 26 0A 0A 20 42  |AND#255-7..&.. B|
000006B0: 4E 45 53 45 54 48 41 52  44 00 9E 26 14 0A 20 4A  |NESETHARD..&.. J|
000006C0: 4D 50 43 4F 4E 54 32 00  A4 26 1E 0A 3B 00 B4 26  |MPCONT2..&..;..&|
000006D0: 28 0A 53 4C 49 4E 4B 53  32 20 53 45 43 00 C3 26  |(.SLINKS2 SEC..&|
000006E0: 32 0A 20 4C 44 41 50 49  58 50 4F 53 00 D0 26 3C  |2. LDAPIXPOS..&<|
000006F0: 0A 20 53 42 43 53 54 45  50 00 E0 26 46 0A 20 42  |. SBCSTEP..&F. B|
00000700: 43 43 53 45 54 48 41 52  44 00 E6 26 50 0A 3B 00  |CCSETHARD..&P.;.|
00000710: FA 26 5A 0A 43 4F 4E 54  32 20 4C 44 41 23 52 4F  |.&Z.CONT2 LDA#RO|
00000720: 42 45 4E 00 09 27 64 0A  20 53 54 41 52 41 53 54  |BEN..'d. STARAST|
00000730: 45 52 00 18 27 6E 0A 20  4A 4D 50 49 52 51 45 4E  |ER..'n. JMPIRQEN|
00000740: 44 00 1E 27 78 0A 3B 00  34 27 82 0A 53 45 54 48  |D..'x.;.4'..SETH|
00000750: 41 52 44 20 42 49 54 44  49 52 45 43 54 00 44 27  |ARD BITDIRECT.D'|
00000760: 8C 0A 20 42 56 53 53 4C  49 4E 4B 53 33 00 4A 27  |.. BVSSLINKS3.J'|
00000770: 96 0A 3B 00 61 27 A0 0A  53 52 45 43 48 54 53 33  |..;.a'..SRECHTS3|
00000780: 20 44 45 43 53 43 52 50  4F 53 00 70 27 AA 0A 20  | DECSCRPOS.p'.. |
00000790: 4C 44 41 53 43 52 50 4F  53 00 7D 27 B4 0A 20 43  |LDASCRPOS.}'.. C|
000007A0: 4D 50 23 32 35 35 00 8B  27 BE 0A 20 42 4E 45 43  |MP#255..'.. BNEC|
000007B0: 4F 4E 54 34 00 9C 27 C8  0A 20 44 45 43 53 43 52  |ONT4..'.. DECSCR|
000007C0: 50 4F 53 2B 31 00 B2 27  D2 0A 43 4F 4E 54 34 20  |POS+1..'..CONT4 |
000007D0: 4C 44 41 53 43 52 50 4F  53 2B 31 00 BF 27 DC 0A  |LDASCRPOS+1..'..|
000007E0: 20 43 4D 50 23 32 35 35  00 CD 27 E6 0A 20 42 4E  | CMP#255..'.. BN|
000007F0: 45 43 4F 4E 54 35 00 DC  27 F0 0A 20 4C 44 41 53  |ECONT5..'.. LDAS|
00000800: 43 52 50 4F 53 00 E9 27  FA 0A 20 43 4D 50 23 32  |CRPOS..'.. CMP#2|
00000810: 35 35 00 F7 27 04 0B 20  42 4E 45 43 4F 4E 54 35  |55..'.. BNECONT5|
00000820: 00 06 28 0E 0B 20 4C 44  41 47 52 45 4E 5A 45 00  |..(.. LDAGRENZE.|
00000830: 15 28 18 0B 20 53 54 41  53 43 52 50 4F 53 00 26  |.(.. STASCRPOS.&|
00000840: 28 22 0B 20 4C 44 41 47  52 45 4E 5A 45 2B 31 00  |(". LDAGRENZE+1.|
00000850: 37 28 2C 0B 20 53 54 41  53 43 52 50 4F 53 2B 31  |7(,. STASCRPOS+1|
00000860: 00 48 28 36 0B 20 4A 4D  50 53 52 45 43 48 54 53  |.H(6. JMPSRECHTS|
00000870: 33 00 4E 28 40 0B 3B 00  64 28 4A 0B 53 4C 49 4E  |3.N(@.;.d(J.SLIN|
00000880: 4B 53 33 20 49 4E 43 53  43 52 50 4F 53 00 72 28  |KS3 INCSCRPOS.r(|
00000890: 54 0B 20 42 4E 45 43 4F  4E 54 33 00 83 28 5E 0B  |T. BNECONT3..(^.|
000008A0: 20 49 4E 43 53 43 52 50  4F 53 2B 31 00 99 28 68  | INCSCRPOS+1..(h|
000008B0: 0B 43 4F 4E 54 33 20 4C  44 41 53 43 52 50 4F 53  |.CONT3 LDASCRPOS|
000008C0: 2B 31 00 AA 28 72 0B 20  43 4D 50 47 52 45 4E 5A  |+1..(r. CMPGRENZ|
000008D0: 45 2B 31 00 B8 28 7C 0B  20 42 4E 45 43 4F 4E 54  |E+1..(|. BNECONT|
000008E0: 35 00 C7 28 86 0B 20 4C  44 41 53 43 52 50 4F 53  |5..(.. LDASCRPOS|
000008F0: 00 D6 28 90 0B 20 43 4D  50 47 52 45 4E 5A 45 00  |..(.. CMPGRENZE.|
00000900: E4 28 9A 0B 20 42 4E 45  43 4F 4E 54 35 00 EF 28  |.(.. BNECONT5..(|
00000910: A4 0B 20 4C 44 41 23 30  00 FE 28 AE 0B 20 53 54  |.. LDA#0..(.. ST|
00000920: 41 53 43 52 50 4F 53 00  0F 29 B8 0B 20 53 54 41  |ASCRPOS..).. STA|
00000930: 53 43 52 50 4F 53 2B 31  00 15 29 C2 0B 3B 00 23  |SCRPOS+1..)..;.#|
00000940: 29 CC 0B 43 4F 4E 54 35  20 43 4C 43 00 34 29 D6  |)..CONT5 CLC.4).|
00000950: 0B 20 4C 44 41 53 43 52  53 54 41 52 54 00 43 29  |. LDASCRSTART.C)|
00000960: E0 0B 20 41 44 43 53 43  52 50 4F 53 00 50 29 EA  |.. ADCSCRPOS.P).|
00000970: 0B 20 53 54 41 53 52 41  4D 00 63 29 F4 0B 20 4C  |. STASRAM.c).. L|
00000980: 44 41 53 43 52 53 54 41  52 54 2B 31 00 74 29 FE  |DASCRSTART+1.t).|
00000990: 0B 20 41 44 43 53 43 52  50 4F 53 2B 31 00 83 29  |. ADCSCRPOS+1..)|
000009A0: 08 0C 20 53 54 41 53 52  41 4D 2B 31 00 92 29 12  |.. STASRAM+1..).|
000009B0: 0C 20 4C 44 41 23 52 48  41 52 44 00 A1 29 1C 0C  |. LDA#RHARD..)..|
000009C0: 20 53 54 41 52 41 53 54  45 52 00 B0 29 26 0C 20  | STARASTER..)&. |
000009D0: 4A 4D 50 49 52 51 45 4E  44 00 00 00              |JMPIRQEND...    |

X.....;********************************.
$ ..;** INITIALISIERUNG            **.J 
..;********************************.W ..
INIT SEI.L .. LDA#<(VIDEORAM).. .. LDX#>
(VIDEORAM).. $. STAVRAM.. .. STXVRAM+1..
 8. LDA#<(SCROLLSCR).I B. LDX#>(SCROLLSC
R).Z L. STASCRSTART.. V. STXSCRSTART+1..
!`. LDA#<(SCROLLBREITE)..!J. LDX#>(SCROL
LBREITE)./!T. STASBREITE.A!~. STXSBREITE
+1.]!.. LDA#<(SCROLLBREITE-40).Y!.. LDX#
>(SCROLLBREITE-40)..!.. STAGRENZE..!.. S
TXGRENZE+1..!.. LDA#0..!.. STASCRPOS.D!D
. STASCRPOS+1.S!N. STAPIXPOS..!X. STADIR
ECT..!.. STAPDIRECT..!.. LDA#1..".. STAS
TEP..".. STAPSTEP.'".. LDA#ROBEN.6".. ST
ARASTER.D".. LDAHIBIT.Q"(. AND#127._"2. 
STAHIBIT.L"<. LDA#129.|"F. STAIRQMASK.."
P. LDA#<(IRQNEU).."Z. LDX#>(IRQNEU).."D.
 STAIRQVEC.B"N. STXIRQVEC+1.R"X. LDACIAT
IME..".. AND#254..".. STACIATIME..".. CL
I..# . RTS.'#P.;************************
********.M#Z.;** IRQ-ROUTINE            
    **.S#..;****************************
****..#..IRQNEU LDAIRQFLAG..#.. STAIRQFL
AG..#.. LDARASTER..#.. CMP#RHARD.G#.. BC
SIRQHARD.W# . CMP#RUNTEN..#*. BCSIRQUNTE
N..#4. JMPIRQOBEN..#>.;..$H.IRQHARD JSRH
SCROLL.$$R. LDA#ROBEN.3$\. STARASTER.B$F
. JMPIRQEND.H$P.;._$Z.IRQOBEN LDAXSCROLL
.N$.. AND#255-7.~$.. STAXSCROLL..$.. BIT
DIRECT..$.. BMICONT1..$.. BVSSLINKS1..$.
.;.B$..SRECHTS1 CLC.Q$J. LDAPIXPOS..$T. 
ADCSTEP..$.. AND#7..$.. STAPIXPOS..%.. J
MPCONT1..%..;..%..SLINKS1 SEC.+%.. LDAPI
XPOS.8%.. SBCSTEP.C%$. AND#7.R%.. STAPIX
POS.X%8.;.M%B.CONT1 LDA#RUNTEN.|%L. STAR
ASTER..%V. JMPIRQALT..%`.;..%J.IRQUNTEN 
LDAXSCROLL..%T. AND#255-7.G%~. ORAPIXPOS
.W%.. STAXSCROLL..%.. LDAPDIRECT..%.. ST
ADIRECT..&.. LDAPSTEP..&.. STASTEP. &.. 
BITDIRECT..&D. BMICONT2.>&N. BVSSLINKS2.
D&X.;.U&..SRECHTS2 CLC.D&.. LDAPIXPOS.Q&
.. ADCSTEP..&.. AND#255-7..&.. BNESETHAR
D..&.. JMPCONT2..&..;..&(.SLINKS2 SEC.C&
2. LDAPIXPOS.P&<. SBCSTEP..&F. BCCSETHAR
D..&P.;..&Z.CONT2 LDA#ROBEN..'D. STARAST
ER..'N. JMPIRQEND..'X.;.4'..SETHARD BITD
IRECT.D'.. BVSSLINKS3.J'..;.A' .SRECHTS3
 DECSCRPOS.P'.. LDASCRPOS.}'.. CMP#255..
'.. BNECONT4..'H. DECSCRPOS+1..'R.CONT4 
LDASCRPOS+1..'.. CMP#255.M'.. BNECONT5..
'.. LDASCRPOS..'.. CMP#255..'.. BNECONT5
..(.. LDAGRENZE..(.. STASCRPOS.&(". LDAG
RENZE+1.7(,. STASCRPOS+1.H(6. JMPSRECHTS
3.N(@.;.D(J.SLINKS3 INCSCRPOS.R(T. BNECO
NT3..(^. INCSCRPOS+1..(H.CONT3 LDASCRPOS
+1..(R. CMPGRENZE+1..(|. BNECONT5.G(.. L
DASCRPOS.V(.. CMPGRENZE..(.. BNECONT5..(
.. LDA#0..(.. STASCRPOS..).. STASCRPOS+1
..)B.;.#)L.CONT5 CLC.4)V. LDASCRSTART.C)
.. ADCSCRPOS.P).. STASRAM.C).. LDASCRSTA
RT+1.T).. ADCSCRPOS+1..).. STASRAM+1..).
. LDA#RHARD..).. STARASTER..)&. JMPIRQEN
D...

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL