QUELLCODE MESSR.
FILE INFORMATION
FILENAME(S): QUELLCODE MESSR.
FILE TYPE(S): PRG
FILE SIZE: 2.4K
FIRST SEEN: 2025-11-30 01:12:40
APPEARS ON: 1 disk(s)
FILE HASH
28f739c73ecb61de4275cc56f60b5aa32c0c739e026d4a194d4e55c00a4384a5
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 15713 64 ER SH13 | QUELLCODE MESSR. | PRG | C64er | 10 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0D 08 64 00 9E 39 AC 34 30 39 36 00 1B 08 |....d..9.4096...| 00000010: 6E 00 2E 4F 50 54 20 50 2C 4F 4F 00 28 08 78 00 |n..OPT P,OO.(.x.| 00000020: AC B2 20 35 32 30 30 30 00 3B 08 7D 00 49 52 51 |.. 52000.;.}.IRQ| 00000030: 56 45 43 20 B2 20 24 46 46 46 45 00 4E 08 82 00 |VEC . $FFFE.N...| 00000040: 4E 4D 49 56 45 43 20 B2 20 24 46 46 46 41 00 5E |NMIVEC . $FFFA.^| 00000050: 08 87 00 56 49 43 20 B2 20 24 44 30 30 30 00 70 |...VIC . $D000.p| 00000060: 08 8C 00 54 41 31 4C 4F 20 B2 20 24 44 43 30 34 |...TA1LO . $DC04| 00000070: 00 82 08 96 00 54 41 31 48 49 20 B2 20 24 44 43 |.....TA1HI . $DC| 00000080: 30 35 00 94 08 A0 00 54 42 31 4C 4F 20 B2 20 24 |05.....TB1LO . $| 00000090: 44 43 30 36 00 A6 08 AA 00 54 42 31 48 49 20 B2 |DC06.....TB1HI .| 000000A0: 20 24 44 43 30 37 00 B7 08 B4 00 49 43 52 31 20 | $DC07.....ICR1 | 000000B0: B2 20 24 44 43 30 44 00 C8 08 BE 00 43 52 41 31 |. $DC0D.....CRA1| 000000C0: 20 B2 20 24 44 43 30 45 00 D9 08 C8 00 43 52 42 | . $DC0E.....CRB| 000000D0: 31 20 B2 20 24 44 43 30 46 00 DF 08 D2 00 3B 00 |1 . $DC0F.....;.| 000000E0: F1 08 DC 00 54 41 32 4C 4F 20 B2 20 24 44 44 30 |....TA2LO . $DD0| 000000F0: 34 00 03 09 E6 00 54 41 32 48 49 20 B2 20 24 44 |4.....TA2HI . $D| 00000100: 44 30 35 00 15 09 F0 00 54 42 32 4C 4F 20 B2 20 |D05.....TB2LO . | 00000110: 24 44 44 30 36 00 27 09 FA 00 54 42 32 48 49 20 |$DD06.'...TB2HI | 00000120: B2 20 24 44 44 30 37 00 38 09 04 01 49 43 52 32 |. $DD07.8...ICR2| 00000130: 20 B2 20 24 44 44 30 44 00 49 09 0E 01 43 52 41 | . $DD0D.I...CRA| 00000140: 32 20 B2 20 24 44 44 30 45 00 5A 09 18 01 43 52 |2 . $DD0E.Z...CR| 00000150: 42 32 20 B2 20 24 44 44 30 46 00 6E 09 22 01 56 |B2 . $DD0F.n.".V| 00000160: 49 43 53 52 31 20 B2 20 56 49 43 AA 31 37 00 74 |ICSR1 . VIC.17.t| 00000170: 09 2C 01 3B 00 96 09 36 01 42 54 41 31 4C 4F 20 |.,.;...6.BTA1LO | 00000180: B2 20 24 30 32 43 30 2C 42 55 46 46 45 52 53 20 |. $02C0,BUFFERS | 00000190: 41 42 20 37 30 34 00 AC 09 40 01 42 54 41 31 48 |AB 704...@.BTA1H| 000001A0: 49 20 B2 20 42 54 41 31 4C 4F AA 31 00 C2 09 4A |I . BTA1LO.1...J| 000001B0: 01 42 54 42 31 4C 4F 20 B2 20 42 54 41 31 4C 4F |.BTB1LO . BTA1LO| 000001C0: AA 32 00 D8 09 54 01 42 54 42 31 48 49 20 B2 20 |.2...T.BTB1HI . | 000001D0: 42 54 41 31 4C 4F AA 33 00 EC 09 5E 01 46 55 4C |BTA1LO.3...^.FUL| 000001E0: 4C 20 B2 20 42 54 41 31 4C 4F AA 34 00 F2 09 68 |L . BTA1LO.4...h| 000001F0: 01 3B 00 16 0A 7C 01 49 52 51 42 55 46 20 B2 20 |.;...|.IRQBUF . | 00000200: 24 30 32 44 30 3B 5A 57 49 53 43 48 45 4E 53 50 |$02D0;ZWISCHENSP| 00000210: 45 49 43 48 45 52 00 2C 0A 86 01 4E 4D 49 42 55 |EICHER.,...NMIBU| 00000220: 46 20 B2 20 49 52 51 42 55 46 AA 32 00 42 0A 90 |F . IRQBUF.2.B..| 00000230: 01 43 50 55 42 55 46 20 B2 20 49 52 51 42 55 46 |.CPUBUF . IRQBUF| 00000240: AA 34 00 48 0A C2 01 3B 00 56 0A F4 01 53 54 41 |.4.H...;.V...STA| 00000250: 52 54 20 53 45 49 00 62 0A F6 01 4C 44 41 20 24 |RT SEI.b...LDA $| 00000260: 30 31 00 7E 0A F8 01 53 54 41 20 43 50 55 42 55 |01.~...STA CPUBU| 00000270: 46 3B 5A 55 53 C0 44 20 4D 45 52 4B 45 4E 00 8B |F;ZUS.D MERKEN..| 00000280: 0A FA 01 4C 44 41 20 23 24 33 35 00 9F 0A FC 01 |...LDA #$35.....| 00000290: 53 54 41 20 24 30 31 3B 52 4F 4D 20 41 55 53 00 |STA $01;ROM AUS.| 000002A0: BC 0A FE 01 4C 44 41 20 49 52 51 56 45 43 3B 49 |....LDA IRQVEC;I| 000002B0: 52 51 56 45 43 20 4D 45 52 4B 45 4E 00 CB 0A 08 |RQVEC MERKEN....| 000002C0: 02 53 54 41 20 49 52 51 42 55 46 00 DC 0A 12 02 |.STA IRQBUF.....| 000002D0: 4C 44 41 20 49 52 51 56 45 43 AA 31 00 ED 0A 17 |LDA IRQVEC.1....| 000002E0: 02 53 54 41 20 49 52 51 42 55 46 AA 31 00 FE 0A |.STA IRQBUF.1...| 000002F0: 1C 02 53 54 41 20 49 52 51 42 55 46 AA 31 00 1B |..STA IRQBUF.1..| 00000300: 0B 1E 02 4C 44 41 20 4E 4D 49 56 45 43 3B 4E 4D |...LDA NMIVEC;NM| 00000310: 49 56 45 43 20 4D 45 52 4B 45 4E 00 2A 0B 20 02 |IVEC MERKEN.*. .| 00000320: 53 54 41 20 4E 4D 49 42 55 46 00 3B 0B 22 02 4C |STA NMIBUF.;.".L| 00000330: 44 41 20 4E 4D 49 56 45 43 AA 31 00 4C 0B 24 02 |DA NMIVEC.1.L.$.| 00000340: 53 54 41 20 4E 4D 49 42 55 46 AA 31 00 52 0B 25 |STA NMIBUF.1.R.%| 00000350: 02 3B 00 6F 0B 26 02 4C 44 41 20 23 B3 41 42 4C |.;.o.&.LDA #.ABL| 00000360: 45 53 45 3B 4E 45 55 45 52 20 56 45 4B A4 52 00 |ESE;NEUER VEK.R.| 00000370: 7E 0B 30 02 53 54 41 20 49 52 51 56 45 43 00 8D |~.0.STA IRQVEC..| 00000380: 0B 35 02 53 54 41 20 4E 4D 49 56 45 43 00 9E 0B |.5.STA NMIVEC...| 00000390: 3A 02 4C 44 41 20 23 B1 41 42 4C 45 53 45 00 AF |:.LDA #.ABLESE..| 000003A0: 0B 44 02 53 54 41 20 49 52 51 56 45 43 AA 31 00 |.D.STA IRQVEC.1.| 000003B0: C0 0B 49 02 53 54 41 20 4E 4D 49 56 45 43 AA 31 |..I.STA NMIVEC.1| 000003C0: 00 C6 0B 57 02 3B 00 E5 0B 58 02 90 20 4C 44 41 |...W.;...X.. LDA| 000003D0: 20 23 25 31 30 30 31 30 30 30 30 3B 9E 54 45 4D | #%10010000;.TEM| 000003E0: 54 41 4B 54 45 00 F2 0B 62 02 53 54 41 20 43 52 |TAKTE...b.STA CR| 000003F0: 41 31 00 17 0C 6C 02 4C 44 41 20 23 25 31 31 30 |A1...l.LDA #%110| 00000400: 31 31 30 30 30 3B 55 4E 54 45 52 4C 41 45 55 46 |11000;UNTERLAEUF| 00000410: 45 20 5A 41 45 48 C3 00 24 0C 76 02 53 54 41 20 |E ZAEH..$.v.STA | 00000420: 43 52 42 31 00 49 0C 80 02 4C 44 41 20 23 25 31 |CRB1.I...LDA #%1| 00000430: 30 31 31 31 30 30 30 3B 43 4E 54 AB 46 4C 41 4E |0111000;CNT.FLAN| 00000440: 4B 45 4E 20 5A 41 45 48 C3 00 56 0C 8A 02 53 54 |KEN ZAEH..V...ST| 00000450: 41 20 43 52 41 32 00 74 0C 94 02 53 45 54 20 4C |A CRA2.t...SET L| 00000460: 44 41 20 42 54 41 31 4C 4F 3B 41 4C 4C 45 20 4C |DA BTA1LO;ALLE L| 00000470: 41 44 45 4E 00 82 0C 9E 02 53 54 41 20 54 41 31 |ADEN.....STA TA1| 00000480: 4C 4F 00 91 0C A8 02 4C 44 41 20 42 54 41 31 48 |LO.....LDA BTA1H| 00000490: 49 00 9F 0C B2 02 53 54 41 20 54 41 31 48 49 00 |I.....STA TA1HI.| 000004A0: AE 0C BC 02 4C 44 41 20 42 54 42 31 4C 4F 00 BC |....LDA BTB1LO..| 000004B0: 0C C6 02 53 54 41 20 54 42 31 4C 4F 00 CB 0C D0 |...STA TB1LO....| 000004C0: 02 4C 44 41 20 42 54 42 31 48 49 00 D9 0C DA 02 |.LDA BTB1HI.....| 000004D0: 53 54 41 20 54 42 31 48 49 00 EC 0C E4 02 4C 44 |STA TB1HI.....LD| 000004E0: 41 20 23 24 46 46 3B 96 41 55 4C 54 00 F9 0C E9 |A #$FF;.AULT....| 000004F0: 02 53 54 41 20 46 55 4C 4C 00 07 0D EE 02 53 54 |.STA FULL.....ST| 00000500: 41 20 54 41 32 4C 4F 00 15 0D F8 02 53 54 41 20 |A TA2LO.....STA | 00000510: 54 41 32 48 49 00 38 0D 02 03 53 45 54 49 43 52 |TA2HI.8...SETICR| 00000520: 20 4C 44 41 20 23 25 30 31 31 31 31 31 31 31 3B | LDA #%01111111;| 00000530: 4C 4F 45 53 43 48 45 4E 00 45 0D 0C 03 53 54 41 |LOESCHEN.E...STA| 00000540: 20 49 43 52 31 00 52 0D 16 03 53 54 41 20 49 43 | ICR1.R...STA IC| 00000550: 52 32 00 79 0D 20 03 4C 44 41 20 23 25 31 30 30 |R2.y. .LDA #%100| 00000560: 30 30 30 31 30 3B 49 52 51 20 44 55 52 43 48 20 |00010;IRQ DURCH | 00000570: 42 AB 55 4E 54 45 52 4C 2E 00 86 0D 2A 03 53 54 |B.UNTERL....*.ST| 00000580: 41 20 49 43 52 31 00 A5 0D 34 03 4C 44 41 20 23 |A ICR1...4.LDA #| 00000590: 25 31 31 30 31 31 30 30 31 3B 55 48 52 20 53 54 |%11011001;UHR ST| 000005A0: 41 52 54 20 42 00 B2 0D 39 03 53 54 41 20 43 52 |ART B...9.STA CR| 000005B0: 42 31 00 CF 0D 3C 03 4C 44 41 20 23 25 31 30 30 |B1...<.LDA #%100| 000005C0: 31 30 30 30 31 3B 55 48 52 20 53 54 41 52 54 00 |10001;UHR START.| 000005D0: F0 0D 3E 03 4C 44 58 20 23 25 31 30 31 31 31 30 |..>.LDX #%101110| 000005E0: 30 31 3B 43 4F 55 4E 54 45 52 20 53 54 41 52 54 |01;COUNTER START| 000005F0: 00 27 0E 43 03 4C 44 59 20 23 25 31 30 31 30 31 |.'.C.LDY #%10101| 00000600: 30 30 30 3B 90 20 46 55 45 52 20 53 50 41 45 54 |000;. FUER SPAET| 00000610: 45 52 20 59 AB 52 45 47 20 42 4C 45 49 42 54 20 |ER Y.REG BLEIBT | 00000620: 42 45 49 20 49 52 51 00 2F 0E 48 03 43 4C 49 00 |BEI IRQ./.H.CLI.| 00000630: 46 0E 52 03 53 54 41 20 43 52 41 31 3B 53 54 41 |F.R.STA CRA1;STA| 00000640: 52 54 20 55 48 52 00 61 0E 5C 03 53 54 58 20 43 |RT UHR.a.\.STX C| 00000650: 52 41 32 3B 53 54 41 52 54 20 43 4F 55 4E 54 45 |RA2;START COUNTE| 00000660: 52 00 82 0E 70 03 54 45 53 54 20 4C 44 41 20 54 |R...p.TEST LDA T| 00000670: 41 32 48 49 3B 55 45 42 45 52 4C 41 55 46 54 45 |A2HI;UEBERLAUFTE| 00000680: 53 54 00 8F 0E 7A 03 42 4E 45 20 54 45 53 54 00 |ST...z.BNE TEST.| 00000690: A4 0E 84 03 4C 44 41 20 54 41 32 4C 4F 3B 4C 4F |....LDA TA2LO;LO| 000006A0: 42 59 54 45 00 B1 0E 8E 03 42 4E 45 20 54 45 53 |BYTE.....BNE TES| 000006B0: 54 00 B9 0E B6 03 53 45 49 00 C6 0E C0 03 4C 44 |T.....SEI.....LD| 000006C0: 41 20 23 24 30 31 00 DF 0E CA 03 53 54 41 20 46 |A #$01.....STA F| 000006D0: 55 4C 4C 3B 46 4C 41 47 20 53 45 54 5A 45 4E 00 |ULL;FLAG SETZEN.| 000006E0: ED 0E D4 03 4A 4D 50 20 4E B0 4D 41 4C 00 F3 0E |....JMP N.MAL...| 000006F0: E7 03 3B 00 0E 0F F2 03 41 42 4C 45 53 45 20 53 |..;.....ABLESE S| 00000700: 45 49 3B 49 52 51 20 52 4F 55 54 49 4E 45 00 28 |EI;IRQ ROUTINE.(| 00000710: 0F FC 03 53 54 59 20 43 52 41 32 3B 43 4F 55 4E |...STY CRA2;COUN| 00000720: 54 45 52 20 90 50 45 4E 00 40 0F 06 04 4C 44 41 |TER .PEN.@...LDA| 00000730: 20 54 41 32 4C 4F 3B B6 50 45 49 43 48 45 52 4E | TA2LO;.PEICHERN| 00000740: 00 4F 0F 10 04 53 54 41 20 42 54 41 31 4C 4F 00 |.O...STA BTA1LO.| 00000750: 5D 0F 1A 04 4C 44 41 20 54 41 32 48 49 00 6C 0F |]...LDA TA2HI.l.| 00000760: 24 04 53 54 41 20 42 54 41 31 48 49 00 74 0F 2E |$.STA BTA1HI.t..| 00000770: 04 50 4C 41 00 7D 0F 33 04 3B 50 4C 41 00 85 0F |.PLA.}.3.;PLA...| 00000780: 38 04 50 4C 41 00 8E 0F 3D 04 3B 50 4C 41 00 96 |8.PLA...=.;PLA..| 00000790: 0F 42 04 50 4C 41 00 9F 0F 47 04 3B 50 4C 41 00 |.B.PLA...G.;PLA.| 000007A0: BC 0F 4C 04 4E B0 4D 41 4C 20 4C 44 41 20 23 25 |..L.N.MAL LDA #%| 000007B0: 31 30 30 31 30 30 30 30 3B 41 20 90 00 C9 0F 56 |10010000;A ....V| 000007C0: 04 53 54 41 20 43 52 41 31 00 E0 0F 60 04 4C 44 |.STA CRA1...`.LD| 000007D0: 41 20 23 25 31 31 30 31 31 30 30 30 3B 42 20 90 |A #%11011000;B .| 000007E0: 00 ED 0F 6A 04 53 54 41 20 43 52 42 31 00 06 10 |...j.STA CRB1...| 000007F0: 7E 04 4C 44 41 20 49 52 51 42 55 46 3B 56 45 4B |~.LDA IRQBUF;VEK| 00000800: A4 52 20 48 4F C3 00 15 10 88 04 53 54 41 20 49 |.R HO......STA I| 00000810: 52 51 56 45 43 00 26 10 92 04 4C 44 41 20 49 52 |RQVEC.&...LDA IR| 00000820: 51 42 55 46 AA 31 00 37 10 9C 04 53 54 41 20 49 |QBUF.1.7...STA I| 00000830: 52 51 56 45 43 AA 31 00 50 10 9E 04 4C 44 41 20 |RQVEC.1.P...LDA | 00000840: 4E 4D 49 42 55 46 3B 56 45 4B A4 52 20 48 4F C3 |NMIBUF;VEK.R HO.| 00000850: 00 5F 10 A0 04 53 54 41 20 4E 4D 49 56 45 43 00 |._...STA NMIVEC.| 00000860: 70 10 A2 04 4C 44 41 20 4E 4D 49 42 55 46 AA 31 |p...LDA NMIBUF.1| 00000870: 00 81 10 A4 04 53 54 41 20 4E 4D 49 56 45 43 AA |.....STA NMIVEC.| 00000880: 31 00 8E 10 A6 04 4C 44 41 20 23 24 34 30 00 9C |1.....LDA #$40..| 00000890: 10 B0 04 53 54 41 20 54 41 31 48 49 00 B8 10 CE |...STA TA1HI....| 000008A0: 04 4C 44 41 20 23 25 30 31 31 31 31 31 31 31 3B |.LDA #%01111111;| 000008B0: 4C 4F 45 53 43 48 45 4E 00 C5 10 D8 04 53 54 41 |LOESCHEN.....STA| 000008C0: 20 49 43 52 31 00 D2 10 E2 04 53 54 41 20 49 43 | ICR1.....STA IC| 000008D0: 52 32 00 F8 10 EC 04 4C 44 41 20 23 25 31 30 30 |R2.....LDA #%100| 000008E0: 30 30 30 30 31 3B 49 52 51 20 44 55 52 43 48 20 |00001;IRQ DURCH | 000008F0: 41 AB 55 4E 54 45 52 4C 00 05 11 F6 04 53 54 41 |A.UNTERL.....STA| 00000900: 20 49 43 52 31 00 22 11 00 05 4C 44 41 20 23 24 | ICR1."...LDA #$| 00000910: 30 31 3B 54 49 4D 45 52 20 41 20 53 54 41 52 54 |01;TIMER A START| 00000920: 45 4E 00 2F 11 0A 05 53 54 41 20 43 52 41 31 00 |EN./...STA CRA1.| 00000930: 3E 11 14 05 4C 44 41 20 43 50 55 42 55 46 00 56 |>...LDA CPUBUF.V| 00000940: 11 1E 05 53 54 41 20 24 30 31 3B 41 4C 54 45 52 |...STA $01;ALTER| 00000950: 20 5A 55 53 C0 44 00 5E 11 3C 05 43 4C 49 00 66 | ZUS.D.^.<.CLI.f| 00000960: 11 46 05 52 54 53 00 00 00 |.F.RTS... |
....D..9.4096...N..OPT P,OO.(.X... 52000 .;.}.IRQVEC . $FFFE.N...NMIVEC . $FFFA.^ ...VIC . $D000.P...TA1LO . $DC04.....TA1 HI . $DC05... .TB1LO . $DC06.....TB1HI . $DC07.....ICR1 . $DC0D.H...CRA1 . $DC0E .Y.H.CRB1 . $DC0F...R.;.....TA2LO . $DD0 4.....TA2HI . $DD05.....TB2LO . $DD06.'. ..TB2HI . $DD07.8...ICR2 . $DD0D.I...CRA 2 . $DD0E.Z...CRB2 . $DD0F.N.".VICSR1 . VIC.17.T.,.;...6.BTA1LO . $02C0,BUFFERS AB 704...@.BTA1HI . BTA1LO.1.B.J.BTB1LO . BTA1LO.2.X.T.BTB1HI . BTA1LO.3...^.FUL L . BTA1LO.4...H.;...|.IRQBUF . $02D0;ZW ISCHENSPEICHER.,...NMIBUF . IRQBUF.2.B.. .CPUBUF . IRQBUF.4.H.B.;.V...START SEI.B ...LDA $01.~...STA CPUBUF;ZUS.D MERKEN.. ...LDA #$35.....STA $01;ROM AUS.....LDA IRQVEC;IRQVEC MERKEN.K...STA IRQBUF..... LDA IRQVEC.1.....STA IRQBUF.1.....STA IR QBUF.1.....LDA NMIVEC;NMIVEC MERKEN.*. . STA NMIBUF.;.".LDA NMIVEC.1.L.$.STA NMIB UF.1.R.%.;.O.&.LDA #.ABLESE;NEUER VEK.R. ~.0.STA IRQVEC...5.STA NMIVEC...:.LDA #. ABLESE...D.STA IRQVEC.1...I.STA NMIVEC.1 .F.W.;...X.. LDA #%10010000;.TEMTAKTE... B.STA CRA1...L.LDA #%11011000;UNTERLAEUF E ZAEHC.$.V.STA CRB1.I...LDA #%10111000; CNT.FLANKEN ZAEHC.V...STA CRA2.T...SET L DA BTA1LO;ALLE LADEN.....STA TA1LO.....L DA BTA1HI.....STA TA1HI.....LDA BTB1LO.. .F.STA TB1LO.K.P.LDA BTB1HI.Y.Z.STA TB1H I.....LDA #$FF;.AULT.....STA FULL.....ST A TA2LO.....STA TA2HI.8...SETICR LDA #%0 1111111;LOESCHEN.E...STA ICR1.R...STA IC R2.Y. .LDA #%10000010;IRQ DURCH B.UNTERL ....*.STA ICR1...4.LDA #%11011001;UHR ST ART B...9.STA CRB1.O.<.LDA #%10010001;UH R START...>.LDX #%10111001;COUNTER START .'.C.LDY #%10101000;. FUER SPAETER Y.REG BLEIBT BEI IRQ./.H.CLI.F.R.STA CRA1;STA RT UHR.A.\.STX CRA2;START COUNTER...P.TE ST LDA TA2HI;UEBERLAUFTEST...Z.BNE TEST. ....LDA TA2LO;LOBYTE.....BNE TEST.....SE I.F...LDA #$01...J.STA FULL;FLAG SETZEN. ..T.JMP N.MAL.....;.....ABLESE SEI;IRQ R OUTINE.(...STY CRA2;COUNTER .PEN.@...LDA TA2LO;.PEICHERN.O...STA BTA1LO.]...LDA TA2HI.L.$.STA BTA1HI.T...PLA.}.3.;PLA... 8.PLA...=.;PLA...B.PLA...G.;PLA...L.N.MA L LDA #%10010000;A ..I.V.STA CRA1...`.LD A #%11011000;B ....J.STA CRB1...~.LDA IR QBUF;VEK.R HOC.....STA IRQVEC.&...LDA IR QBUF.1.7...STA IRQVEC.1.P...LDA NMIBUF;V EK.R HOC._. .STA NMIVEC.P...LDA NMIBUF.1 .....STA NMIVEC.1.....LDA #$40.....STA T A1HI...N.LDA #%01111111;LOESCHEN.E.X.STA ICR1.R...STA ICR2.....LDA #%10000001;IR Q DURCH A.UNTERL.....STA ICR1."...LDA #$ 01;TIMER A STARTEN./...STA CRA1.>...LDA CPUBUF.V...STA $01;ALTER ZUS.D.^.<.CLI.F .F.RTS...
> CLICK IMAGE PREVIEW FOR FULL MODAL