_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

HIGHSPEED C64.A

FILE INFORMATION

FILENAME(S): HIGHSPEED C64.A

FILE TYPE(S): PRG

FILE SIZE: 5.3K

FIRST SEEN: 2025-11-30 01:13:01

APPEARS ON: 1 disk(s)

FILE HASH

641407b3d600aa5f2c23e660ac4a1719b5aa560d67c9901d25494361f3b31751

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
10103 SEITE B HIGHSPEED C64.A PRG C64er 28 5 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 0D 0D 52 45 41 44 59 2E  0D 30 30 30 30 20 3B 2A  |..READY..0000 ;*|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000020: 2A 2A 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |**              |
00000030: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000040: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000050: 20 20 20 20 20 20 20 20  0D 30 30 30 31 20 3B 2A  |        .0001 ;*|
00000060: 20 48 49 47 48 53 50 45  45 44 20 43 36 34 20 20  | HIGHSPEED C64  |
00000070: 20 2A 20 20 20 20 20 20  20 20 20 20 20 20 20 20  | *              |
00000080: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000090: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000000A0: 20 20 20 20 20 20 20 20  0D 30 30 30 32 20 3B 2A  |        .0002 ;*|
000000B0: 20 51 55 45 4C 4C 43 4F  44 45 20 20 20 20 20 20  | QUELLCODE      |
000000C0: 20 2A 20 20 20 20 20 20  20 20 20 20 20 20 20 20  | *              |
000000D0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000000E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000000F0: 20 20 20 20 20 20 20 20  0D 30 30 30 33 20 3B 2A  |        .0003 ;*|
00000100: 20 57 52 49 54 54 45 4E  20 49 4E 20 31 39 39 30  | WRITTEN IN 1990|
00000110: 20 2A 20 20 20 20 20 20  20 20 20 20 20 20 20 20  | *              |
00000120: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000130: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000140: 20 20 20 20 20 20 20 20  0D 30 30 30 34 20 3B 2A  |        .0004 ;*|
00000150: 20 42 59 20 4C 41 52 53  20 57 45 52 4E 45 52 20  | BY LARS WERNER |
00000160: 20 2A 20 20 20 20 20 20  20 20 20 20 20 20 20 20  | *              |
00000170: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000180: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000190: 20 20 20 20 20 20 20 20  0D 30 30 30 35 20 3B 2A  |        .0005 ;*|
000001A0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000001B0: 2A 2A 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |**              |
000001C0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000001D0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000001E0: 20 20 20 20 20 20 20 20  0D 30 30 30 36 20 3B 20  |        .0006 ; |
000001F0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000200: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000210: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000220: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000230: 20 20 20 20 20 20 20 20  0D 30 30 30 37 20 20 20  |        .0007   |
00000240: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 2A 3D  |              *=|
00000250: 20 20 20 20 24 30 32 41  34 20 20 20 20 20 20 20  |    $02A4       |
00000260: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000270: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000280: 20 20 20 20 20 20 20 20  0D 30 30 30 38 20 20 20  |        .0008   |
00000290: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 2E 42  |              .B|
000002A0: 41 4E 4B 20 24 30 46 20  20 20 20 20 20 20 20 20  |ANK $0F         |
000002B0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000002C0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000002D0: 20 20 20 20 20 20 20 20  0D 30 30 30 39 20 20 20  |        .0009   |
000002E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 2E 4F  |              .O|
000002F0: 42 4A 20 20 4D 20 20 20  20 20 20 20 20 20 20 20  |BJ  M           |
00000300: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000310: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000320: 20 20 20 20 20 20 20 20  0D 30 30 31 30 20 3B 20  |        .0010 ; |
00000330: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000340: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000350: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000360: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000370: 20 20 20 20 20 20 20 20  0D 30 30 31 31 20 20 52  |        .0011  R|
00000380: 41 4E 44 4F 20 20 20 20  20 20 20 20 20 20 3D 20  |ANDO          = |
00000390: 20 20 20 20 35 30 20 20  20 20 20 20 20 20 20 20  |    50          |
000003A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000003B0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000003C0: 20 20 20 20 20 20 20 20  0D 30 30 31 32 20 20 52  |        .0012  R|
000003D0: 41 4E 44 55 20 20 20 20  20 20 20 20 20 20 3D 20  |ANDU          = |
000003E0: 20 20 20 20 32 35 30 20  20 20 20 20 20 20 20 20  |    250         |
000003F0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000400: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000410: 20 20 20 20 20 20 20 20  0D 30 30 31 33 20 20 52  |        .0013  R|
00000420: 41 53 54 45 52 20 20 20  20 20 20 20 20 20 3D 20  |ASTER         = |
00000430: 20 20 20 20 24 44 30 31  32 20 20 20 20 20 20 20  |    $D012       |
00000440: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000450: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000460: 20 20 20 20 20 20 20 20  0D 30 30 31 34 20 20 4D  |        .0014  M|
00000470: 41 53 4B 20 20 20 20 20  20 20 20 20 20 20 3D 20  |ASK           = |
00000480: 20 20 20 20 24 44 30 31  41 20 20 20 20 20 20 20  |    $D01A       |
00000490: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000004A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000004B0: 20 20 20 20 20 20 20 20  0D 30 30 31 35 20 20 52  |        .0015  R|
000004C0: 45 51 55 45 53 54 20 20  20 20 20 20 20 20 3D 20  |EQUEST        = |
000004D0: 20 20 20 20 24 44 30 31  39 20 20 20 20 20 20 20  |    $D019       |
000004E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000004F0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000500: 20 20 20 20 20 20 20 20  0D 30 30 31 36 20 20 43  |        .0016  C|
00000510: 49 41 52 45 51 55 45 53  54 20 20 20 20 20 3D 20  |IAREQUEST     = |
00000520: 20 20 20 20 24 44 43 30  44 20 20 20 20 20 20 20  |    $DC0D       |
00000530: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000540: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000550: 20 20 20 20 20 20 20 20  0D 30 30 31 37 20 3B 20  |        .0017 ; |
00000560: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000570: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000580: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000590: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000005A0: 20 20 20 20 20 20 20 20  0D 30 30 31 38 20 20 20  |        .0018   |
000005B0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 53 45  |              SE|
000005C0: 49 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |I               |
000005D0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000005E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000005F0: 20 20 20 20 20 20 20 20  0D 30 30 31 39 20 20 20  |        .0019   |
00000600: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 4C 44  |              LD|
00000610: 41 20 20 20 24 30 33 31  34 20 20 20 20 20 20 20  |A   $0314       |
00000620: 3B 41 4C 54 45 4E 20 49  52 51 20 20 20 20 20 20  |;ALTEN IRQ      |
00000630: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000640: 20 20 20 20 20 20 20 20  0D 30 30 32 30 20 20 20  |        .0020   |
00000650: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 4C 44  |              LD|
00000660: 58 20 20 20 24 30 33 31  35 20 20 20 20 20 20 20  |X   $0315       |
00000670: 3B 4D 45 52 4B 45 4E 20  20 20 20 20 20 20 20 20  |;MERKEN         |
00000680: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000690: 20 20 20 20 20 20 20 20  0D 30 30 32 31 20 20 20  |        .0021   |
000006A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 53 54  |              ST|
000006B0: 41 20 20 20 49 52 51 41  4C 54 20 20 20 20 20 20  |A   IRQALT      |
000006C0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000006D0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000006E0: 20 20 20 20 20 20 20 20  0D 30 30 32 32 20 20 20  |        .0022   |
000006F0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 53 54  |              ST|
00000700: 58 20 20 20 49 52 51 41  4C 54 2B 31 20 20 20 20  |X   IRQALT+1    |
00000710: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000720: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000730: 20 20 20 20 20 20 20 20  0D 30 30 32 33 20 3B 20  |        .0023 ; |
00000740: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000750: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000760: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000770: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000780: 20 20 20 20 20 20 20 20  0D 30 30 32 34 20 20 20  |        .0024   |
00000790: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 4C 44  |              LD|
000007A0: 41 20 20 20 23 3C 49 52  51 4E 45 55 20 20 20 20  |A   #<IRQNEU    |
000007B0: 3B 4E 45 55 45 4E 20 49  52 51 20 20 20 20 20 20  |;NEUEN IRQ      |
000007C0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000007D0: 20 20 20 20 20 20 20 20  0D 30 30 32 35 20 20 20  |        .0025   |
000007E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 4C 44  |              LD|
000007F0: 58 20 20 20 23 3E 49 52  51 4E 45 55 20 20 20 20  |X   #>IRQNEU    |
00000800: 3B 53 45 54 5A 45 4E 20  20 20 20 20 20 20 20 20  |;SETZEN         |
00000810: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000820: 20 20 20 20 20 20 20 20  0D 30 30 32 36 20 20 20  |        .0026   |
00000830: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 53 54  |              ST|
00000840: 41 20 20 20 24 30 33 31  34 20 20 20 20 20 20 20  |A   $0314       |
00000850: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000860: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000870: 20 20 20 20 20 20 20 20  0D 30 30 32 37 20 20 20  |        .0027   |
00000880: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 53 54  |              ST|
00000890: 58 20 20 20 24 30 33 31  35 20 20 20 20 20 20 20  |X   $0315       |
000008A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000008B0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000008C0: 20 20 20 20 20 20 20 20  0D 30 30 32 38 20 3B 20  |        .0028 ; |
000008D0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000008E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000008F0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000900: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000910: 20 20 20 20 20 20 20 20  0D 30 30 32 39 20 20 20  |        .0029   |
00000920: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 4C 44  |              LD|
00000930: 41 20 20 20 23 52 41 4E  44 4F 20 20 20 20 20 20  |A   #RANDO      |
00000940: 3B 52 41 53 54 45 52 5A  45 49 4C 45 4E 2D 49 52  |;RASTERZEILEN-IR|
00000950: 51 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |Q               |
00000960: 20 20 20 20 20 20 20 20  0D 30 30 33 30 20 20 20  |        .0030   |
00000970: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 53 54  |              ST|
00000980: 41 20 20 20 52 41 53 54  45 52 20 20 20 20 20 20  |A   RASTER      |
00000990: 3B 53 45 54 5A 45 4E 20  20 20 20 20 20 20 20 20  |;SETZEN         |
000009A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000009B0: 20 20 20 20 20 20 20 20  0D 30 30 33 31 20 20 20  |        .0031   |
000009C0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 4C 44  |              LD|
000009D0: 41 20 20 20 52 41 53 54  45 52 2D 31 20 20 20 20  |A   RASTER-1    |
000009E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000009F0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000A00: 20 20 20 20 20 20 20 20  0D 30 30 33 32 20 20 20  |        .0032   |
00000A10: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 41 4E  |              AN|
00000A20: 44 20 20 20 23 25 30 31  31 31 31 31 31 31 20 20  |D   #%01111111  |
00000A30: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000A40: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000A50: 20 20 20 20 20 20 20 20  0D 30 30 33 33 20 20 20  |        .0033   |
00000A60: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 53 54  |              ST|
00000A70: 41 20 20 20 52 41 53 54  45 52 2D 31 20 20 20 20  |A   RASTER-1    |
00000A80: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000A90: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000AA0: 20 20 20 20 20 20 20 20  0D 30 30 33 34 20 20 20  |        .0034   |
00000AB0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 4C 44  |              LD|
00000AC0: 41 20 20 20 23 25 31 30  30 30 30 30 30 31 20 20  |A   #%10000001  |
00000AD0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000AE0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000AF0: 20 20 20 20 20 20 20 20  0D 30 30 33 35 20 20 20  |        .0035   |
00000B00: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 53 54  |              ST|
00000B10: 41 20 20 20 4D 41 53 4B  20 20 20 20 20 20 20 20  |A   MASK        |
00000B20: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000B30: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000B40: 20 20 20 20 20 20 20 20  0D 30 30 33 36 20 20 20  |        .0036   |
00000B50: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 43 4C  |              CL|
00000B60: 49 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |I               |
00000B70: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000B80: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000B90: 20 20 20 20 20 20 20 20  0D 30 30 33 37 20 20 20  |        .0037   |
00000BA0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 52 54  |              RT|
00000BB0: 53 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |S               |
00000BC0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000BD0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000BE0: 20 20 20 20 20 20 20 20  0D 30 30 33 38 20 3B 20  |        .0038 ; |
00000BF0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000C00: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000C10: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000C20: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000C30: 20 20 20 20 20 20 20 20  0D 30 30 33 39 20 20 49  |        .0039  I|
00000C40: 52 51 4E 45 55 20 20 20  20 20 20 20 20 20 4C 44  |RQNEU         LD|
00000C50: 41 20 20 20 52 45 51 55  45 53 54 20 20 20 20 20  |A   REQUEST     |
00000C60: 3B 52 41 53 54 45 52 2D  49 52 51 2D 52 45 47 49  |;RASTER-IRQ-REGI|
00000C70: 53 54 45 52 20 20 20 20  20 20 20 20 20 20 20 20  |STER            |
00000C80: 20 20 20 20 20 20 20 20  0D 30 30 34 30 20 20 20  |        .0040   |
00000C90: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 53 54  |              ST|
00000CA0: 41 20 20 20 52 45 51 55  45 53 54 20 20 20 20 20  |A   REQUEST     |
00000CB0: 3B 4C 4F 45 53 43 48 45  4E 20 20 20 20 20 20 20  |;LOESCHEN       |
00000CC0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000CD0: 20 20 20 20 20 20 20 20  0D 30 30 34 31 20 20 20  |        .0041   |
00000CE0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 42 4D  |              BM|
00000CF0: 49 20 20 20 52 41 53 54  45 52 49 52 51 20 20 20  |I   RASTERIRQ   |
00000D00: 3B 41 55 46 20 54 49 4D  45 52 2D 49 52 51 20 50  |;AUF TIMER-IRQ P|
00000D10: 52 55 45 46 45 4E 20 20  20 20 20 20 20 20 20 20  |RUEFEN          |
00000D20: 20 20 20 20 20 20 20 20  0D 30 30 34 32 20 3B 20  |        .0042 ; |
00000D30: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000D40: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000D50: 3B 57 45 4E 4E 20 41 4B  54 49 56 20 3D 3E 52 41  |;WENN AKTIV =>RA|
00000D60: 53 54 45 52 49 52 51 20  20 20 20 20 20 20 20 20  |STERIRQ         |
00000D70: 20 20 20 20 20 20 20 20  0D 30 30 34 33 20 20 54  |        .0043  T|
00000D80: 49 4D 45 52 49 52 51 20  20 20 20 20 20 20 4C 44  |IMERIRQ       LD|
00000D90: 41 20 20 20 43 49 41 52  45 51 55 45 53 54 20 20  |A   CIAREQUEST  |
00000DA0: 3B 54 49 4D 45 52 2D 49  52 51 2D 52 45 47 49 53  |;TIMER-IRQ-REGIS|
00000DB0: 54 45 52 20 4C 4F 45 53  43 48 45 4E 20 20 20 20  |TER LOESCHEN    |
00000DC0: 20 20 20 20 20 20 20 20  0D 30 30 34 34 20 20 20  |        .0044   |
00000DD0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 43 4C  |              CL|
00000DE0: 49 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |I               |
00000DF0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000E00: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000E10: 20 20 20 20 20 20 20 20  0D 30 30 34 35 20 20 46  |        .0045  F|
00000E20: 41 4C 53 43 48 45 5A 45  49 4C 45 20 20 20 4A 4D  |ALSCHEZEILE   JM|
00000E30: 50 20 20 20 28 49 52 51  41 4C 54 29 20 20 20 20  |P   (IRQALT)    |
00000E40: 3B 53 50 52 55 4E 47 20  5A 55 4D 20 54 49 4D 45  |;SPRUNG ZUM TIME|
00000E50: 52 2D 49 52 51 20 20 20  20 20 20 20 20 20 20 20  |R-IRQ           |
00000E60: 20 20 20 20 20 20 20 20  0D 30 30 34 36 20 3B 20  |        .0046 ; |
00000E70: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000E80: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000E90: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000EA0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000EB0: 20 20 20 20 20 20 20 20  0D 30 30 34 37 20 20 52  |        .0047  R|
00000EC0: 41 53 54 45 52 49 52 51  20 20 20 20 20 20 4C 44  |ASTERIRQ      LD|
00000ED0: 41 20 20 20 52 41 53 54  45 52 20 20 20 20 20 20  |A   RASTER      |
00000EE0: 3B 52 41 53 54 45 52 5A  45 49 4C 45 20 48 4F 4C  |;RASTERZEILE HOL|
00000EF0: 45 4E 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |EN              |
00000F00: 20 20 20 20 20 20 20 20  0D 30 30 34 38 20 20 20  |        .0048   |
00000F10: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 43 4D  |              CM|
00000F20: 50 20 20 20 23 52 41 4E  44 55 20 20 20 20 20 20  |P   #RANDU      |
00000F30: 3B 55 4E 54 45 52 45 52  20 42 49 4C 44 53 43 48  |;UNTERER BILDSCH|
00000F40: 49 52 4D 52 41 4E 44 20  3F 20 20 20 20 20 20 20  |IRMRAND ?       |
00000F50: 20 20 20 20 20 20 20 20  0D 30 30 34 39 20 20 20  |        .0049   |
00000F60: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 42 43  |              BC|
00000F70: 53 20 20 20 4F 4B 20 20  20 20 20 20 20 20 20 20  |S   OK          |
00000F80: 3B 57 45 4E 4E 20 45 52  52 45 49 43 48 54 20 53  |;WENN ERREICHT S|
00000F90: 50 52 55 4E 47 20 3D 3E  20 4F 4B 20 20 20 20 20  |PRUNG => OK     |
00000FA0: 20 20 20 20 20 20 20 20  0D 30 30 35 30 20 3B 20  |        .0050 ; |
00000FB0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000FC0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000FD0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000FE0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000FF0: 20 20 20 20 20 20 20 20  0D 30 30 35 31 20 20 20  |        .0051   |
00001000: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 4C 44  |              LD|
00001010: 41 20 20 20 23 32 35 32  20 20 20 20 20 20 20 20  |A   #252        |
00001020: 3B 54 41 4B 54 46 52 45  51 55 45 4E 5A 20 41 55  |;TAKTFREQUENZ AU|
00001030: 46 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |F               |
00001040: 20 20 20 20 20 20 20 20  0D 30 30 35 32 20 20 20  |        .0052   |
00001050: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 53 54  |              ST|
00001060: 41 20 20 20 24 44 30 33  30 20 20 20 20 20 20 20  |A   $D030       |
00001070: 3B 31 20 4D 48 5A 20 53  45 54 5A 45 4E 20 20 20  |;1 MHZ SETZEN   |
00001080: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001090: 20 20 20 20 20 20 20 20  0D 30 30 35 33 20 20 20  |        .0053   |
000010A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 4C 44  |              LD|
000010B0: 41 20 20 20 23 52 41 4E  44 55 20 20 20 20 20 20  |A   #RANDU      |
000010C0: 3B 4E 45 55 45 20 52 41  53 54 45 52 5A 45 49 4C  |;NEUE RASTERZEIL|
000010D0: 45 20 48 4F 4C 45 4E 20  20 20 20 20 20 20 20 20  |E HOLEN         |
000010E0: 20 20 20 20 20 20 20 20  0D 30 30 35 34 20 20 20  |        .0054   |
000010F0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 4A 4D  |              JM|
00001100: 50 20 20 20 45 58 49 54  20 20 20 20 20 20 20 20  |P   EXIT        |
00001110: 3B 49 52 51 20 56 45 52  4C 41 53 53 45 4E 20 20  |;IRQ VERLASSEN  |
00001120: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001130: 20 20 20 20 20 20 20 20  0D 30 30 35 35 20 3B 20  |        .0055 ; |
00001140: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001150: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001160: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001170: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001180: 20 20 20 20 20 20 20 20  0D 30 30 35 36 20 20 4F  |        .0056  O|
00001190: 4B 20 20 20 20 20 20 20  20 20 20 20 20 20 4C 44  |K             LD|
000011A0: 41 20 20 20 23 32 35 33  20 20 20 20 20 20 20 20  |A   #253        |
000011B0: 3B 54 41 4B 54 46 52 45  51 55 45 4E 5A 20 41 55  |;TAKTFREQUENZ AU|
000011C0: 46 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |F               |
000011D0: 20 20 20 20 20 20 20 20  0D 30 30 35 37 20 20 20  |        .0057   |
000011E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 53 54  |              ST|
000011F0: 41 20 20 20 24 44 30 33  30 20 20 20 20 20 20 20  |A   $D030       |
00001200: 3B 32 20 4D 48 5A 20 53  45 54 5A 45 4E 20 20 20  |;2 MHZ SETZEN   |
00001210: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001220: 20 20 20 20 20 20 20 20  0D 30 30 35 38 20 20 20  |        .0058   |
00001230: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 4C 44  |              LD|
00001240: 41 20 20 20 23 52 41 4E  44 4F 20 20 20 20 20 20  |A   #RANDO      |
00001250: 3B 4E 45 55 45 20 52 41  53 54 45 52 5A 45 49 4C  |;NEUE RASTERZEIL|
00001260: 45 20 48 4F 4C 45 4E 20  20 20 20 20 20 20 20 20  |E HOLEN         |
00001270: 20 20 20 20 20 20 20 20  0D 30 30 35 39 20 3B 20  |        .0059 ; |
00001280: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001290: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000012A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000012B0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000012C0: 20 20 20 20 20 20 20 20  0D 30 30 36 30 20 20 45  |        .0060  E|
000012D0: 58 49 54 20 20 20 20 20  20 20 20 20 20 20 53 54  |XIT           ST|
000012E0: 41 20 20 20 52 41 53 54  45 52 20 20 20 20 20 20  |A   RASTER      |
000012F0: 3B 4E 45 55 45 20 52 41  53 54 45 52 5A 45 49 4C  |;NEUE RASTERZEIL|
00001300: 45 20 53 45 54 5A 45 4E  20 20 20 20 20 20 20 20  |E SETZEN        |
00001310: 20 20 20 20 20 20 20 20  0D 30 30 36 31 20 20 20  |        .0061   |
00001320: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 4A 4D  |              JM|
00001330: 50 20 20 20 24 45 41 37  45 20 20 20 20 20 20 20  |P   $EA7E       |
00001340: 3B 49 52 51 20 56 45 52  4C 41 53 53 45 4E 20 20  |;IRQ VERLASSEN  |
00001350: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001360: 20 20 20 20 20 20 20 20  0D 30 30 36 32 20 3B 20  |        .0062 ; |
00001370: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001380: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001390: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000013A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000013B0: 20 20 20 20 20 20 20 20  0D 30 30 36 33 20 3B 20  |        .0063 ; |
000013C0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000013D0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000013E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000013F0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001400: 20 20 20 20 20 20 20 20  0D 30 30 36 34 20 20 49  |        .0064  I|
00001410: 52 51 41 4C 54 20 20 20  20 20 20 20 20 20 2E 42  |RQALT         .B|
00001420: 59 54 45 20 24 30 30 2C  24 30 30 20 20 20 20 20  |YTE $00,$00     |
00001430: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001440: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001450: 20 20 20 20 20 20 20 20  0D 30 30 36 35 20 3B 20  |        .0065 ; |
00001460: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001470: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001480: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001490: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000014A0: 20 20 20 20 20 20 20 20  0D 30 30 36 36 20 20 20  |        .0066   |
000014B0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 2E 45  |              .E|
000014C0: 4E 44 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |ND              |
000014D0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000014E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000014F0: 20 20 20 20 20 20 20 20  0D 30 30 36 37 20 20 20  |        .0067   |
00001500: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001510: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001520: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001530: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00001540: 20 20 20 20 20 20 20 20  0D 0D 52 45 41 44 59 2E  |        ..READY.|
00001550: 0D                                                |.               |
..READY..0000 ;*******************      
                                        
        .0001 ;* HIGHSPEED C64   *      
                                        
        .0002 ;* QUELLCODE       *      
                                        
        .0003 ;* WRITTEN IN 1990 *      
                                        
        .0004 ;* BY LARS WERNER  *      
                                        
        .0005 ;*******************      
                                        
        .0006 ;                         
                                        
        .0007                 *=    $02A
4                                       
        .0008                 .BANK $0F 
                                        
        .0009                 .OBJ  M   
                                        
        .0010 ;                         
                                        
        .0011  RANDO          =     50  
                                        
        .0012  RANDU          =     250 
                                        
        .0013  RASTER         =     $D01
2                                       
        .0014  MASK           =     $D01
A                                       
        .0015  REQUEST        =     $D01
9                                       
        .0016  CIAREQUEST     =     $DC0
D                                       
        .0017 ;                         
                                        
        .0018                 SEI       
                                        
        .0019                 LDA   $031
4       ;ALTEN IRQ                      
        .0020                 LDX   $031
5       ;MERKEN                         
        .0021                 STA   IRQA
LT                                      
        .0022                 STX   IRQA
LT+1                                    
        .0023 ;                         
                                        
        .0024                 LDA   #<IR
QNEU    ;NEUEN IRQ                      
        .0025                 LDX   #>IR
QNEU    ;SETZEN                         
        .0026                 STA   $031
4                                       
        .0027                 STX   $031
5                                       
        .0028 ;                         
                                        
        .0029                 LDA   #RAN
DO      ;RASTERZEILEN-IRQ               
        .0030                 STA   RAST
ER      ;SETZEN                         
        .0031                 LDA   RAST
ER-1                                    
        .0032                 AND   #%01
111111                                  
        .0033                 STA   RAST
ER-1                                    
        .0034                 LDA   #%10
000001                                  
        .0035                 STA   MASK
                                        
        .0036                 CLI       
                                        
        .0037                 RTS       
                                        
        .0038 ;                         
                                        
        .0039  IRQNEU         LDA   REQU
EST     ;RASTER-IRQ-REGISTER            
        .0040                 STA   REQU
EST     ;LOESCHEN                       
        .0041                 BMI   RAST
ERIRQ   ;AUF TIMER-IRQ PRUEFEN          
        .0042 ;                         
        ;WENN AKTIV =>RASTERIRQ         
        .0043  TIMERIRQ       LDA   CIAR
EQUEST  ;TIMER-IRQ-REGISTER LOESCHEN    
        .0044                 CLI       
                                        
        .0045  FALSCHEZEILE   JMP   (IRQ
ALT)    ;SPRUNG ZUM TIMER-IRQ           
        .0046 ;                         
                                        
        .0047  RASTERIRQ      LDA   RAST
ER      ;RASTERZEILE HOLEN              
        .0048                 CMP   #RAN
DU      ;UNTERER BILDSCHIRMRAND ?       
        .0049                 BCS   OK  
        ;WENN ERREICHT SPRUNG => OK     
        .0050 ;                         
                                        
        .0051                 LDA   #252
        ;TAKTFREQUENZ AUF               
        .0052                 STA   $D03
0       ;1 MHZ SETZEN                   
        .0053                 LDA   #RAN
DU      ;NEUE RASTERZEILE HOLEN         
        .0054                 JMP   EXIT
        ;IRQ VERLASSEN                  
        .0055 ;                         
                                        
        .0056  OK             LDA   #253
        ;TAKTFREQUENZ AUF               
        .0057                 STA   $D03
0       ;2 MHZ SETZEN                   
        .0058                 LDA   #RAN
DO      ;NEUE RASTERZEILE HOLEN         
        .0059 ;                         
                                        
        .0060  EXIT           STA   RAST
ER      ;NEUE RASTERZEILE SETZEN        
        .0061                 JMP   $EA7
E       ;IRQ VERLASSEN                  
        .0062 ;                         
                                        
        .0063 ;                         
                                        
        .0064  IRQALT         .BYTE $00,
$00                                     
        .0065 ;                         
                                        
        .0066                 .END      
                                        
        .0067                           
                                        
        ..READY..
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL