NOFREEZE.SRC
FILE INFORMATION
FILENAME(S): NOFREEZE.SRC
FILE TYPE(S): PRG
FILE SIZE: 2.9K
FIRST SEEN: 2025-11-30 01:12:44
APPEARS ON: 2 disk(s)
FILE HASH
6dc919518a31faae076ee2fc1148a66410fafea1264808e8298fa083f2f5d8eb
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 10005 SEITE 1 | NOFREEZE.SRC | PRG | C64er | 5 | 2 | DOWNLOAD FILE |
| 10005 SEITE 1 | NOFREEZE.SRC | PRG | DuncanTwain | 5 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0D 08 0A 00 9E 39 AC 34 30 39 36 00 19 08 |.......9.4096...| 00000010: 14 00 2E 4F 50 54 20 4F 4F 00 25 08 1E 00 AC B2 |...OPT OO.%.....| 00000020: 24 43 30 30 30 00 2B 08 28 00 3B 00 58 08 32 00 |$C000.+.(.;.X.2.| 00000030: 49 52 51 56 45 4B 20 B2 20 24 30 33 31 34 20 20 |IRQVEK . $0314 | 00000040: 20 3B 20 56 45 4B A4 52 20 41 55 46 20 49 52 51 | ; VEK.R AUF IRQ| 00000050: AB 52 4F 55 54 49 4E 45 00 83 08 3C 00 56 49 43 |.ROUTINE...<.VIC| 00000060: 52 45 47 20 B2 20 24 44 30 31 31 20 20 20 3B 20 |REG . $D011 ; | 00000070: 56 49 43 AB 9A 52 4F 4C 4C 52 45 47 49 53 54 45 |VIC..ROLLREGISTE| 00000080: 52 20 31 00 AF 08 46 00 52 41 53 54 45 52 20 B2 |R 1...F.RASTER .| 00000090: 20 24 44 30 31 32 20 20 20 3B 20 41 4B 54 55 45 | $D012 ; AKTUE| 000000A0: 4C 4C 45 20 52 41 53 54 45 52 5A 45 49 4C 45 00 |LLE RASTERZEILE.| 000000B0: E7 08 50 00 49 52 51 46 52 51 20 B2 20 24 44 43 |..P.IRQFRQ . $DC| 000000C0: 30 34 20 20 20 3B 20 52 45 47 49 53 54 45 52 20 |04 ; REGISTER | 000000D0: 46 55 45 52 20 49 52 51 AB B8 51 55 45 4E 5A 20 |FUER IRQ..QUENZ | 000000E0: 28 4C 4F AD 48 49 29 00 11 09 5A 00 43 49 41 43 |(LO.HI)...Z.CIAC| 000000F0: 54 4C 20 B2 20 24 44 43 30 45 20 20 20 3B 20 43 |TL . $DC0E ; C| 00000100: 49 41 31 AB 9A 52 4F 4C 4C 52 45 47 49 53 54 45 |IA1..ROLLREGISTE| 00000110: 52 00 3A 09 64 00 4E 52 4D 49 52 51 20 B2 20 24 |R.:.d.NRMIRQ . $| 00000120: 45 41 33 31 20 20 3B 20 4E B0 4D 41 4C 45 20 49 |EA31 ; N.MALE I| 00000130: 52 51 AB 52 4F 55 54 49 4E 45 00 5E 09 6E 00 52 |RQ.ROUTINE.^.n.R| 00000140: 45 53 45 54 20 20 B2 20 24 46 43 45 32 20 20 3B |ESET . $FCE2 ;| 00000150: 20 52 45 53 45 54 AB 52 4F 55 54 49 4E 45 00 64 | RESET.ROUTINE.d| 00000160: 09 78 00 3B 00 93 09 82 00 4C 49 4E 45 20 B2 20 |.x.;.....LINE . | 00000170: 32 35 30 20 20 20 20 20 20 3B 20 52 41 53 54 45 |250 ; RASTE| 00000180: 52 5A 45 49 4C 45 20 46 55 45 52 20 B5 45 52 52 |RZEILE FUER .ERR| 00000190: 55 50 54 00 99 09 8C 00 3B 00 BC 09 96 00 4C 44 |UPT.....;.....LD| 000001A0: 41 20 23 30 20 20 20 20 20 20 20 20 20 20 3B 20 |A #0 ; | 000001B0: 43 49 41 AB B5 45 52 52 55 50 54 53 00 DA 09 A0 |CIA..ERRUPTS....| 000001C0: 00 53 54 41 20 43 49 41 43 54 4C 20 20 20 20 20 |.STA CIACTL | 000001D0: 20 3B 20 53 50 45 52 52 45 4E 00 FA 09 AA 00 4C | ; SPERREN.....L| 000001E0: 44 41 20 23 B3 52 4F 55 54 20 20 20 20 20 20 3B |DA #.ROUT ;| 000001F0: 20 49 52 51 AB 56 45 4B A4 52 00 1B 0A B4 00 4C | IRQ.VEK.R.....L| 00000200: 44 58 20 23 B1 52 4F 55 54 20 20 20 20 20 20 3B |DX #.ROUT ;| 00000210: 20 41 55 46 20 45 49 47 45 4E 45 00 39 0A BE 00 | AUF EIGENE.9...| 00000220: 53 54 41 20 49 52 51 56 45 4B 20 20 20 20 20 20 |STA IRQVEK | 00000230: 3B 20 52 4F 55 54 49 4E 45 00 56 0A C8 00 53 54 |; ROUTINE.V...ST| 00000240: 58 20 49 52 51 56 45 4B AA 31 20 20 20 20 3B 20 |X IRQVEK.1 ; | 00000250: 42 49 45 47 45 4E 00 7F 0A D2 00 4C 44 41 20 23 |BIEGEN.....LDA #| 00000260: 31 39 39 20 20 20 20 20 20 20 20 3B 20 43 49 41 |199 ; CIA| 00000270: AB B5 45 52 52 55 50 54 AB B8 51 55 45 4E 5A 00 |..ERRUPT..QUENZ.| 00000280: A3 0A DC 00 4C 44 58 20 23 37 36 20 20 20 20 20 |....LDX #76 | 00000290: 20 20 20 20 3B 20 41 55 46 20 55 4E 47 45 46 41 | ; AUF UNGEFA| 000002A0: 45 48 52 00 C5 0A E6 00 53 54 41 20 49 52 51 46 |EHR.....STA IRQF| 000002B0: 52 51 20 20 20 20 20 20 3B 20 35 30 20 48 5A 20 |RQ ; 50 HZ | 000002C0: 53 54 45 4C C3 00 F3 0A F0 00 53 54 58 20 49 52 |STEL......STX IR| 000002D0: 51 46 52 51 AA 31 20 20 20 20 3B 20 28 53 4F 20 |QFRQ.1 ; (SO | 000002E0: 57 49 45 20 42 45 49 20 52 41 53 54 45 52 AB 49 |WIE BEI RASTER.I| 000002F0: 52 51 29 00 21 0B FA 00 49 31 20 4C 44 41 20 56 |RQ).!...I1 LDA V| 00000300: 49 43 52 45 47 20 20 20 3B 20 57 41 52 54 45 4E |ICREG ; WARTEN| 00000310: 2C 20 42 49 53 20 52 41 53 54 45 52 5A 45 49 4C |, BIS RASTERZEIL| 00000320: 45 00 3C 0B 04 01 42 50 4C 20 49 31 20 20 20 20 |E.<...BPL I1 | 00000330: 20 20 20 20 20 20 3B 20 B1 32 35 35 00 6A 0B 0E | ; .255.j..| 00000340: 01 49 31 41 20 4C 44 41 20 56 49 43 52 45 47 20 |.I1A LDA VICREG | 00000350: 20 3B 20 57 41 52 54 45 4E 2C 20 42 49 53 20 52 | ; WARTEN, BIS R| 00000360: 41 53 54 45 52 5A 45 49 4C 45 00 8A 0B 18 01 42 |ASTERZEILE.....B| 00000370: 4D 49 20 49 31 41 20 20 20 20 20 20 20 20 20 3B |MI I1A ;| 00000380: 20 57 49 45 44 45 52 20 B2 30 00 B9 0B 22 01 4C | WIEDER .0...".L| 00000390: 44 41 20 23 4C 49 4E 45 AB 35 20 20 20 20 20 3B |DA #LINE.5 ;| 000003A0: 20 57 41 52 54 45 4E 2C 20 42 49 53 20 52 41 53 | WARTEN, BIS RAS| 000003B0: 54 45 52 53 54 52 41 48 4C 00 E0 0B 2C 01 49 32 |TERSTRAHL...,.I2| 000003C0: 20 43 4D 50 20 52 41 53 54 45 52 20 20 20 3B 20 | CMP RASTER ; | 000003D0: 35 20 5A 45 49 C3 20 55 4E 54 45 52 20 44 45 52 |5 ZEI. UNTER DER| 000003E0: 00 0D 0C 36 01 42 4E 45 20 49 32 20 20 20 20 20 |...6.BNE I2 | 000003F0: 20 20 20 20 20 3B 20 47 45 57 55 45 4E 53 43 48 | ; GEWUENSCH| 00000400: 54 45 4E 20 5A 45 49 4C 45 20 49 53 54 00 30 0C |TEN ZEILE IST.0.| 00000410: 40 01 4C 44 41 20 23 31 20 20 20 20 20 20 20 20 |@.LDA #1 | 00000420: 20 20 3B 20 43 49 41 AB B5 45 52 52 55 50 54 53 | ; CIA..ERRUPTS| 00000430: 00 55 0C 4A 01 53 54 41 20 43 49 41 43 54 4C 20 |.U.J.STA CIACTL | 00000440: 20 20 20 20 20 3B 20 57 49 45 44 45 52 20 B8 49 | ; WIEDER .I| 00000450: 47 45 42 45 4E 00 5D 0C 54 01 52 54 53 00 63 0C |GEBEN.].T.RTS.c.| 00000460: E8 03 3B 00 8C 0C F2 03 52 4F 55 54 20 4C 44 41 |..;.....ROUT LDA| 00000470: 20 52 41 53 54 45 52 3B 20 4D 4F 4D 45 4E C0 45 | RASTER; MOMEN.E| 00000480: 20 52 41 53 54 45 52 5A 45 49 4C 45 00 AF 0C FC | RASTERZEILE....| 00000490: 03 43 4D 50 20 23 4C 49 4E 45 AB 35 20 20 20 20 |.CMP #LINE.5 | 000004A0: 3B 20 B2 20 53 54 41 52 54 5A 45 49 4C 45 3F 00 |; . STARTZEILE?.| 000004B0: D8 0C 06 04 42 45 51 20 4F 4B 20 20 20 20 20 20 |....BEQ OK | 000004C0: 20 20 20 3B 20 57 45 4E 4E 20 4A 41 2C 20 44 41 | ; WENN JA, DA| 000004D0: 4E 4E 20 5A 55 20 4F 4B 00 0A 0D 10 04 4C 44 58 |NN ZU OK.....LDX| 000004E0: 20 23 38 20 20 20 20 20 20 20 20 20 3B 20 56 45 | #8 ; VE| 000004F0: 52 5A 4F 45 47 45 52 4E 2C 20 42 49 53 20 52 41 |RZOEGERN, BIS RA| 00000500: 53 54 45 52 53 54 52 41 48 4C 00 2E 0D 1A 04 43 |STERSTRAHL.....C| 00000510: 31 20 44 45 58 20 20 20 20 20 20 20 20 20 3B 20 |1 DEX ; | 00000520: 4E 41 45 43 48 53 54 45 20 5A 45 49 4C 45 00 50 |NAECHSTE ZEILE.P| 00000530: 0D 24 04 42 4E 45 20 43 31 20 20 20 20 20 20 20 |.$.BNE C1 | 00000540: 20 20 3B 20 45 52 52 45 49 43 48 54 20 48 41 54 | ; ERREICHT HAT| 00000550: 00 79 0D 2E 04 4C 44 41 20 52 41 53 54 45 52 20 |.y...LDA RASTER | 00000560: 20 20 20 20 3B 20 4D 4F 4D 45 4E C0 45 20 52 41 | ; MOMEN.E RA| 00000570: 53 54 45 52 5A 45 49 4C 45 00 AF 0D 38 04 43 4D |STERZEILE...8.CM| 00000580: 50 20 23 4C 49 4E 45 AB 34 20 20 20 20 3B 20 B2 |P #LINE.4 ; .| 00000590: 20 53 54 41 52 54 5A 45 49 4C 45 AB 31 3F 20 28 | STARTZEILE.1? (| 000005A0: 5A 55 52 20 53 49 43 48 45 52 48 45 49 54 29 00 |ZUR SICHERHEIT).| 000005B0: D8 0D 42 04 42 45 51 20 4F 4B 20 20 20 20 20 20 |..B.BEQ OK | 000005C0: 20 20 20 3B 20 57 45 4E 4E 20 4A 41 2C 20 44 41 | ; WENN JA, DA| 000005D0: 4E 4E 20 5A 55 20 4F 4B 00 13 0E 4C 04 4A 4D 50 |NN ZU OK...L.JMP| 000005E0: 20 52 45 53 45 54 20 20 20 20 20 20 3B 20 57 45 | RESET ; WE| 000005F0: 4E 4E 20 4E 45 49 4E 2C 20 44 41 4E 4E 20 52 45 |NN NEIN, DANN RE| 00000600: 53 45 54 20 28 B2 B1 20 B8 45 5A 45 53 43 48 55 |SET (.. .EZESCHU| 00000610: 54 5A 29 00 36 0E 56 04 4F 4B 20 4C 44 41 20 23 |TZ).6.V.OK LDA #| 00000620: 4C 49 4E 45 AB 33 20 3B 20 44 41 46 55 45 52 20 |LINE.3 ; DAFUER | 00000630: 53 B0 47 45 4E 2C 00 58 0E 60 04 57 31 20 43 4D |S.GEN,.X.`.W1 CM| 00000640: 50 20 52 41 53 54 45 52 20 20 3B 20 44 41 53 53 |P RASTER ; DASS| 00000650: 20 44 49 45 20 47 45 AB 00 7F 0E 6A 04 42 4E 45 | DIE GE....j.BNE| 00000660: 20 57 31 20 20 20 20 20 20 20 20 20 3B 20 57 55 | W1 ; WU| 00000670: 45 4E 53 43 48 54 45 20 52 41 53 54 45 52 AB 00 |ENSCHTE RASTER..| 00000680: A5 0E 74 04 4C 44 58 20 23 31 30 20 20 20 20 20 |..t.LDX #10 | 00000690: 20 20 20 3B 20 5A 45 49 4C 45 20 28 4C 49 4E 45 | ; ZEILE (LINE| 000006A0: 29 20 41 42 AB 00 CA 0E 7E 04 57 32 20 44 45 58 |) AB....~.W2 DEX| 000006B0: 20 20 20 20 20 20 20 20 20 3B 20 53 4F 4C 55 54 | ; SOLUT| 000006C0: 20 46 4C 49 4D 4D 45 52 B8 49 00 EF 0E 88 04 42 | FLIMMER.I.....B| 000006D0: 4E 45 20 57 32 20 20 20 20 20 20 20 20 20 3B 20 |NE W2 ; | 000006E0: 41 4E 47 45 53 50 8A 47 45 4E 20 57 49 52 44 00 |ANGESP.GEN WIRD.| 000006F0: 14 0F 92 04 4E 4F 50 20 20 20 20 20 20 20 20 20 |....NOP | 00000700: 20 20 20 3B 20 28 4E 41 43 48 5A 55 4C 45 53 45 | ; (NACHZULESE| 00000710: 4E 20 49 4E 00 36 0F 9C 04 4C 44 41 20 52 41 53 |N IN.6...LDA RAS| 00000720: 54 45 52 20 20 20 20 20 3B 20 36 34 27 45 52 20 |TER ; 64'ER | 00000730: 30 36 AD 38 39 2C 00 58 0F A6 04 43 4D 50 20 23 |06.89,.X...CMP #| 00000740: 4C 49 4E 45 AB 32 20 20 20 20 3B 20 53 45 49 54 |LINE.2 ; SEIT| 00000750: 45 20 39 30 20 46 46 29 00 6D 0F B0 04 42 45 51 |E 90 FF).m...BEQ| 00000760: 20 57 33 20 20 20 20 20 20 20 20 20 3B 00 82 0F | W3 ;...| 00000770: BA 04 42 49 54 20 32 20 20 20 20 20 20 20 20 20 |..BIT 2 | 00000780: 20 3B 00 97 0F C4 04 4E 4F 50 20 20 20 20 20 20 | ;.....NOP | 00000790: 20 20 20 20 20 20 3B 00 AC 0F CE 04 57 33 20 4C | ;.....W3 L| 000007A0: 44 58 20 23 39 20 20 20 20 20 20 3B 00 C1 0F D8 |DX #9 ;....| 000007B0: 04 57 34 20 44 45 58 20 20 20 20 20 20 20 20 20 |.W4 DEX | 000007C0: 3B 00 D6 0F E2 04 42 4E 45 20 57 34 20 20 20 20 |;.....BNE W4 | 000007D0: 20 20 20 20 20 3B 00 EB 0F EC 04 4E 4F 50 20 20 | ;.....NOP | 000007E0: 20 20 20 20 20 20 20 20 20 20 3B 00 00 10 F6 04 | ;.....| 000007F0: 4E 4F 50 20 20 20 20 20 20 20 20 20 20 20 20 3B |NOP ;| 00000800: 00 15 10 00 05 4E 4F 50 20 20 20 20 20 20 20 20 |.....NOP | 00000810: 20 20 20 20 3B 00 2A 10 0A 05 4C 44 41 20 52 41 | ;.*...LDA RA| 00000820: 53 54 45 52 20 20 20 20 20 3B 00 3F 10 14 05 43 |STER ;.?...C| 00000830: 4D 50 20 23 4C 49 4E 45 AB 31 20 20 20 20 3B 00 |MP #LINE.1 ;.| 00000840: 54 10 1E 05 42 45 51 20 57 35 20 20 20 20 20 20 |T...BEQ W5 | 00000850: 20 20 20 3B 00 69 10 28 05 42 49 54 20 32 20 20 | ;.i.(.BIT 2 | 00000860: 20 20 20 20 20 20 20 20 3B 00 7E 10 32 05 57 35 | ;.~.2.W5| 00000870: 20 4C 44 58 20 23 31 30 20 20 20 20 20 3B 00 93 | LDX #10 ;..| 00000880: 10 3C 05 57 36 20 44 45 58 20 20 20 20 20 20 20 |.<.W6 DEX | 00000890: 20 20 3B 00 A8 10 46 05 42 4E 45 20 57 36 20 20 | ;...F.BNE W6 | 000008A0: 20 20 20 20 20 20 20 3B 00 BD 10 50 05 4E 4F 50 | ;...P.NOP| 000008B0: 20 20 20 20 20 20 20 20 20 20 20 20 3B 00 D2 10 | ;...| 000008C0: 5A 05 4C 44 41 20 52 41 53 54 45 52 20 20 20 20 |Z.LDA RASTER | 000008D0: 20 3B 00 E7 10 64 05 43 4D 50 20 23 4C 49 4E 45 | ;...d.CMP #LINE| 000008E0: 20 20 20 20 20 20 3B 00 FC 10 6E 05 42 4E 45 20 | ;...n.BNE | 000008F0: 57 37 20 20 20 20 20 20 20 20 20 3B 00 11 11 78 |W7 ;...x| 00000900: 05 57 37 20 4C 44 58 20 23 35 20 20 20 20 20 20 |.W7 LDX #5 | 00000910: 3B 00 26 11 82 05 57 38 20 44 45 58 20 20 20 20 |;.&...W8 DEX | 00000920: 20 20 20 20 20 3B 00 3B 11 8C 05 42 4E 45 20 57 | ;.;...BNE W| 00000930: 38 20 20 20 20 20 20 20 20 20 3B 00 59 11 96 05 |8 ;.Y...| 00000940: 4E 4F 50 20 20 20 20 20 20 20 20 20 20 20 20 3B |NOP ;| 00000950: 20 4E 4F 43 48 4D 41 4C 53 00 79 11 A0 05 4E 4F | NOCHMALS.y...NO| 00000960: 50 20 20 20 20 20 20 20 20 20 20 20 20 3B 20 56 |P ; V| 00000970: 45 52 5A 4F 45 47 45 52 4E 00 8E 11 AA 05 4E 4F |ERZOEGERN.....NO| 00000980: 50 20 20 20 20 20 20 20 20 20 20 20 20 3B 00 A3 |P ;..| 00000990: 11 B4 05 4E 4F 50 20 20 20 20 20 20 20 20 20 20 |...NOP | 000009A0: 20 20 3B 00 B8 11 BE 05 4E 4F 50 20 20 20 20 20 | ;.....NOP | 000009B0: 20 20 20 20 20 20 20 3B 00 CD 11 C8 05 4E 4F 50 | ;.....NOP| 000009C0: 20 20 20 20 20 20 20 20 20 20 20 20 3B 00 D3 11 | ;...| 000009D0: D2 05 3B 00 F7 11 DC 05 3B 20 41 42 20 48 49 45 |..;.....; AB HIE| 000009E0: 52 20 46 4F 4C 47 54 20 44 41 4E 4E 20 44 49 45 |R FOLGT DANN DIE| 000009F0: 20 48 41 55 50 54 AB 00 1C 12 E6 05 3B 20 52 41 | HAUPT......; RA| 00000A00: 53 54 45 52 AB B5 45 52 52 55 50 54 AB 52 4F 55 |STER..ERRUPT.ROU| 00000A10: 54 49 4E 45 2C 20 44 49 45 20 53 4F 00 40 12 F0 |TINE, DIE SO.@..| 00000A20: 05 3B 20 57 49 45 20 4E B0 4D 41 4C 20 50 52 4F |.; WIE N.MAL PRO| 00000A30: 47 52 41 4D 4D 49 45 52 54 20 57 45 52 44 45 4E |GRAMMIERT WERDEN| 00000A40: 00 65 12 FA 05 3B 20 4B 41 4E 4E 2C 20 4E 55 52 |.e...; KANN, NUR| 00000A50: 20 42 52 41 55 43 48 54 20 4D 41 4E 20 44 41 53 | BRAUCHT MAN DAS| 00000A60: 20 49 52 51 AB 00 8A 12 04 06 3B 20 52 45 51 55 | IRQ......; REQU| 00000A70: 45 53 54 AB 52 45 47 49 53 54 45 52 20 4E 49 43 |EST.REGISTER NIC| 00000A80: 48 54 20 4D 45 48 52 20 5A 55 00 99 12 0E 06 3B |HT MEHR ZU.....;| 00000A90: 20 4C 4F 45 53 43 48 45 4E 00 9F 12 D0 07 3B 00 | LOESCHEN.....;.| 00000AA0: C6 12 DA 07 4D 41 49 4E 20 4C 44 41 20 23 31 39 |....MAIN LDA #19| 00000AB0: 20 20 20 3B 20 42 49 4C 44 53 43 48 49 52 4D 20 | ; BILDSCHIRM | 00000AC0: 41 55 46 20 32 34 00 E9 12 E4 07 53 54 41 20 56 |AUF 24.....STA V| 00000AD0: 49 43 52 45 47 20 20 20 20 20 3B 20 5A 45 49 C3 |ICREG ; ZEI.| 00000AE0: 20 53 43 48 41 4C 54 45 4E 00 09 13 EE 07 4C 44 | SCHALTEN.....LD| 00000AF0: 58 20 23 31 34 20 20 20 20 20 20 20 20 3B 20 56 |X #14 ; V| 00000B00: 45 52 5A 4F 45 47 45 52 4E 00 1E 13 F8 07 4C 31 |ERZOEGERN.....L1| 00000B10: 20 44 45 58 20 20 20 20 20 20 20 20 20 3B 00 33 | DEX ;.3| 00000B20: 13 02 08 42 4E 45 20 4C 31 20 20 20 20 20 20 20 |...BNE L1 | 00000B30: 20 20 3B 00 5B 13 0C 08 4C 44 41 20 23 32 37 20 | ;.[...LDA #27 | 00000B40: 20 20 20 20 20 20 20 3B 20 57 49 45 44 45 52 20 | ; WIEDER | 00000B50: 41 55 46 20 32 35 20 5A 45 49 C3 00 80 13 16 08 |AUF 25 ZEI......| 00000B60: 53 54 41 20 56 49 43 52 45 47 20 20 20 20 20 3B |STA VICREG ;| 00000B70: 20 5A 55 52 55 45 43 4B 53 43 48 41 4C 54 45 4E | ZURUECKSCHALTEN| 00000B80: 00 AF 13 20 08 4A 4D 50 20 4E 52 4D 49 52 51 20 |... .JMP NRMIRQ | 00000B90: 20 20 20 20 3B 20 5A 55 52 20 4E B0 4D 41 C3 20 | ; ZUR N.MA. | 00000BA0: B5 45 52 52 55 50 54 AB 52 4F 55 54 49 4E 45 00 |.ERRUPT.ROUTINE.| 00000BB0: 00 00 |.. |
.......9.4096......OPT OO.%.....$C000.+.
(.;.X.2.IRQVEK . $0314 ; VEK.R AUF IRQ
.ROUTINE...<.VICREG . $D011 ; VIC..ROL
LREGISTER 1...F.RASTER . $D012 ; AKTUE
LLE RASTERZEILE...P.IRQFRQ . $DC04 ; R
EGISTER FUER IRQ..QUENZ (LO.HI)...Z.CIAC
TL . $DC0E ; CIA1..ROLLREGISTER.:.D.NR
MIRQ . $EA31 ; N.MALE IRQ.ROUTINE.^.N.R
ESET . $FCE2 ; RESET.ROUTINE.D.X.;....
.LINE . 250 ; RASTERZEILE FUER .ERR
UPT.....;.....LDA #0 ; CIA..ERR
UPTS.Z. .STA CIACTL ; SPERREN.....L
DA #.ROUT ; IRQ.VEK.R.....LDX #.ROU
T ; AUF EIGENE.9...STA IRQVEK
; ROUTINE.V.H.STX IRQVEK.1 ; BIEGEN.
.R.LDA #199 ; CIA..ERRUPT..QUENZ.
....LDX #76 ; AUF UNGEFAEHR.E...
STA IRQFRQ ; 50 HZ STELC.....STX IR
QFRQ.1 ; (SO WIE BEI RASTER.IRQ).!...
I1 LDA VICREG ; WARTEN, BIS RASTERZEIL
E.<...BPL I1 ; .255.J...I1A LDA
VICREG ; WARTEN, BIS RASTERZEILE.....B
MI I1A ; WIEDER .0...".LDA #LINE
.5 ; WARTEN, BIS RASTERSTRAHL...,.I2
CMP RASTER ; 5 ZEIC UNTER DER...6.BNE
I2 ; GEWUENSCHTEN ZEILE IST.0.
@.LDA #1 ; CIA..ERRUPTS.U.J.STA
CIACTL ; WIEDER .IGEBEN.].T.RTS.C.
..;.....ROUT LDA RASTER; MOMEN.E RASTERZ
EILE.....CMP #LINE.5 ; . STARTZEILE?.
X...BEQ OK ; WENN JA, DANN ZU OK
.....LDX #8 ; VERZOEGERN, BIS RA
STERSTRAHL.....C1 DEX ; NAECHSTE
ZEILE.P.$.BNE C1 ; ERREICHT HAT
.Y...LDA RASTER ; MOMEN.E RASTERZEIL
E...8.CMP #LINE.4 ; . STARTZEILE.1? (
ZUR SICHERHEIT).X.B.BEQ OK ; WEN
N JA, DANN ZU OK...L.JMP RESET ; WE
NN NEIN, DANN RESET (.. .EZESCHUTZ).6.V.
OK LDA #LINE.3 ; DAFUER S.GEN,.X.`.W1 CM
P RASTER ; DASS DIE GE...J.BNE W1
; WUENSCHTE RASTER....T.LDX #10
; ZEILE (LINE) AB..J.~.W2 DEX
; SOLUT FLIMMER.I.....BNE W2 ;
ANGESP.GEN WIRD.....NOP ; (NA
CHZULESEN IN.6...LDA RASTER ; 64'ER
06.89,.X...CMP #LINE.2 ; SEITE 90 FF)
.M...BEQ W3 ;.....BIT 2
;...D.NOP ;...N.W3 LDX #9
;.A.X.W4 DEX ;.V...BNE W4
;.....NOP ;.....NOP
;.....NOP ;.*...LDA RA
STER ;.?...CMP #LINE.1 ;.T...BEQ
W5 ;.I.(.BIT 2 ;.~.2.W5
LDX #10 ;...<.W6 DEX ;...F.
BNE W6 ;...P.NOP ;.R.
Z.LDA RASTER ;...D.CMP #LINE ;.
..N.BNE W7 ;...X.W7 LDX #5
;.&...W8 DEX ;.;...BNE W8
;.Y...NOP ; NOCHMALS.Y. .NO
P ; VERZOEGERN.....NOP
;.....NOP ;.....NOP
;.M.H.NOP ;.S.R.;.....
; AB HIER FOLGT DANN DIE HAUPT......; RA
STER..ERRUPT.ROUTINE, DIE SO.@...; WIE N
.MAL PROGRAMMIERT WERDEN.E...; KANN, NUR
BRAUCHT MAN DAS IRQ......; REQUEST.REGI
STER NICHT MEHR ZU.....; LOESCHEN...P.;.
F.Z.MAIN LDA #19 ; BILDSCHIRM AUF 24..
...STA VICREG ; ZEIC SCHALTEN.....LD
X #14 ; VERZOEGERN.....L1 DEX
;.3...BNE L1 ;.[...LDA #27
; WIEDER AUF 25 ZEIC.....STA VICR
EG ; ZURUECKSCHALTEN... .JMP NRMIRQ
; ZUR N.MAC .ERRUPT.ROUTINE...
> CLICK IMAGE PREVIEW FOR FULL MODAL