CURSOR.SRC
FILE INFORMATION
FILENAME(S): CURSOR.SRC
FILE TYPE(S): PRG
FILE SIZE: 746b
FIRST SEEN: 2025-11-30 21:23:14
APPEARS ON: 1 disk(s)
FILE HASH
1f34d9e835236164b131fc86ed410539b17851ebe6b474f05cb2340e4d50089b
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 HULP 1 1 | CURSOR.SRC | PRG | DuncanTwain | 12 | 8 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0E 08 5A 00 9E 20 38 AC 34 30 39 36 00 1C |....Z.. 8.4096..| 00000010: 08 64 00 2E 4F 50 54 20 50 2C 4F 4F 00 22 08 6E |.d..OPT P,OO.".n| 00000020: 00 3B 00 2E 08 78 00 3B 20 43 55 52 53 B0 00 34 |.;...x.; CURS..4| 00000030: 08 82 00 3B 00 54 08 8C 00 90 20 B2 20 24 46 46 |...;.T.... . $FF| 00000040: 45 41 20 3B 20 90 54 41 53 54 45 20 41 42 46 52 |EA ; .TASTE ABFR| 00000050: 41 47 45 4E 00 67 08 96 00 43 55 52 53 46 4C 41 |AGEN.g...CURSFLA| 00000060: 47 20 B2 20 24 43 43 00 78 08 A0 00 49 4E 56 45 |G . $CC.x...INVE| 00000070: 52 53 20 B2 20 24 43 46 00 8B 08 AA 00 43 55 52 |RS . $CF.....CUR| 00000080: 53 43 4F 4C 20 B2 20 24 32 38 37 00 9E 08 B4 00 |SCOL . $287.....| 00000090: 43 55 52 53 43 48 41 52 20 B2 20 24 43 45 00 AD |CURSCHAR . $CE..| 000000A0: 08 BE 00 43 48 41 52 20 B2 20 24 44 31 00 BC 08 |...CHAR . $D1...| 000000B0: C8 00 43 4F 4C B0 20 B2 20 24 46 33 00 CF 08 D2 |..COL. . $F3....| 000000C0: 00 53 45 54 43 4F 4C 20 B2 20 24 45 41 32 34 00 |.SETCOL . $EA24.| 000000D0: E0 08 DC 00 53 50 41 4C 54 45 20 B2 20 24 44 33 |....SPALTE . $D3| 000000E0: 00 F2 08 E6 00 43 4F 4C 53 54 52 20 B2 20 24 32 |.....COLSTR . $2| 000000F0: 38 36 00 04 09 F0 00 49 52 51 56 45 43 20 B2 20 |86.....IRQVEC . | 00000100: 24 33 31 34 00 15 09 FA 00 9A 49 52 51 20 B2 20 |$314......IRQ . | 00000110: 24 45 41 36 31 00 1B 09 04 01 3B 00 3D 09 0E 01 |$EA61.....;.=...| 00000120: 49 4E 49 54 20 53 45 49 20 3B 20 B5 45 52 52 55 |INIT SEI ; .ERRU| 00000130: 50 54 20 56 45 52 48 49 4E 44 45 52 4E 00 4D 09 |PT VERHINDERN.M.| 00000140: 18 01 4C 44 41 20 23 B3 A2 43 55 52 53 00 5D 09 |..LDA #..CURS.].| 00000150: 22 01 4C 44 59 20 23 B1 A2 43 55 52 53 00 8A 09 |".LDY #..CURS...| 00000160: 2C 01 53 54 41 20 49 52 51 56 45 43 20 3B 20 49 |,.STA IRQVEC ; I| 00000170: 52 51 AB 56 45 43 A4 52 20 41 55 46 20 42 4C 49 |RQ.VEC.R AUF BLI| 00000180: 4E 4B AB 52 4F 55 54 49 4E 45 00 9B 09 36 01 53 |NK.ROUTINE...6.S| 00000190: 54 59 20 49 52 51 56 45 43 AA 31 00 A3 09 40 01 |TY IRQVEC.1...@.| 000001A0: 43 4C 49 00 AB 09 4A 01 52 54 53 00 B1 09 54 01 |CLI...J.RTS...T.| 000001B0: 3B 00 D1 09 5E 01 A2 43 55 52 53 20 4A 53 52 20 |;...^..CURS JSR | 000001C0: 90 20 3B 20 90 54 41 53 54 45 20 54 45 53 54 45 |. ; .TASTE TESTE| 000001D0: 4E 00 F3 09 68 01 4C 44 41 20 43 55 52 53 46 4C |N...h.LDA CURSFL| 000001E0: 41 47 20 3B 20 43 55 52 53 B0 20 53 49 43 48 54 |AG ; CURS. SICHT| 000001F0: 42 41 52 00 0A 0A 72 01 42 4E 45 20 4E 4F 43 55 |BAR...r.BNE NOCU| 00000200: 52 53 B0 20 3B 20 4E 45 49 4E 00 19 0A 7C 01 4C |RS. ; NEIN...|.L| 00000210: 44 59 20 53 50 41 4C 54 45 00 28 0A 86 01 4C 44 |DY SPALTE.(...LD| 00000220: 41 20 49 4E 56 45 52 53 00 38 0A 90 01 42 4E 45 |A INVERS.8...BNE| 00000230: 20 4E 4F 43 55 52 53 B0 00 47 0A 9A 01 49 4E 43 | NOCURS..G...INC| 00000240: 20 49 4E 56 45 52 53 00 56 0A A4 01 4A 53 52 20 | INVERS.V...JSR | 00000250: 53 45 54 43 4F 4C 00 76 0A AE 01 4C 44 41 20 28 |SETCOL.v...LDA (| 00000260: 43 48 41 52 29 2C 59 20 3A 20 53 54 41 20 43 55 |CHAR),Y : STA CU| 00000270: 52 53 43 48 41 52 00 82 0A B8 01 45 B0 20 23 24 |RSCHAR.....E. #$| 00000280: 38 30 00 93 0A C2 01 53 54 41 20 28 43 48 41 52 |80.....STA (CHAR| 00000290: 29 2C 59 00 B2 0A CC 01 4C 44 41 20 28 43 4F 4C |),Y.....LDA (COL| 000002A0: B0 29 2C 59 20 3A 20 53 54 41 20 43 55 52 53 43 |.),Y : STA CURSC| 000002B0: 4F 4C 00 C1 0A D6 01 4C 44 41 20 43 4F 4C 53 54 |OL.....LDA COLST| 000002C0: 52 00 D2 0A E0 01 53 54 41 20 28 43 4F 4C B0 29 |R.....STA (COL.)| 000002D0: 2C 59 00 E7 0A EA 01 4E 4F 43 55 52 53 B0 20 4A |,Y.....NOCURS. J| 000002E0: 4D 50 20 9A 49 52 51 00 00 00 |MP .IRQ... |
....Z.. 8.4096...D..OPT P,OO.".N.;...X.; CURS..4...;.T.... . $FFEA ; .TASTE ABFR AGEN.G...CURSFLAG . $CC.X. .INVERS . $CF .....CURSCOL . $287.....CURSCHAR . $CE.. ...CHAR . $D1...H.COL. . $F3.O.R.SETCOL . $EA24.....SPALTE . $D3.....COLSTR . $2 86.....IRQVEC . $314......IRQ . $EA61... ..;.=...INIT SEI ; .ERRUPT VERHINDERN.M. ..LDA #..CURS.].".LDY #..CURS...,.STA IR QVEC ; IRQ.VEC.R AUF BLINK.ROUTINE...6.S TY IRQVEC.1...@.CLI...J.RTS...T.;.Q.^..C URS JSR . ; .TASTE TESTEN...H.LDA CURSFL AG ; CURS. SICHTBAR...R.BNE NOCURS. ; NE IN...|.LDY SPALTE.(...LDA INVERS.8...BNE NOCURS..G...INC INVERS.V...JSR SETCOL.V ...LDA (CHAR),Y : STA CURSCHAR.....E. #$ 80...B.STA (CHAR),Y...L.LDA (COL.),Y : S TA CURSCOL.A.V.LDA COLSTR.R...STA (COL.) ,Y.....NOCURS. JMP .IRQ...
> CLICK IMAGE PREVIEW FOR FULL MODAL