TASKHEADER .HYP
FILE INFORMATION
FILENAME(S): TASKHEADER .HYP
FILE TYPE(S): PRG
FILE SIZE: 5.1K
FIRST SEEN: 2025-11-30 21:12:38
APPEARS ON: 1 disk(s)
FILE HASH
c568880f5cb9c0844c46d39e9d10be0984d288adca8fee6f41902d4ec4184990
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 64 ER 04 95 | TASKHEADER .HYP | PRG | DuncanTwain | 12 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: D8 1F DE 1F 00 00 3B 00 EF 1F 0A 00 2E 44 50 31 |......;......DP1|
00000010: 39 2C 32 36 2C 35 2C 35 00 14 20 14 00 3B 20 2A |9,26,5,5.. ..; *|
00000020: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000030: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 39 20 |*************.9 |
00000040: 1E 00 3B 20 2A 20 20 20 20 20 20 20 20 20 20 20 |..; * |
00000050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000060: 20 2A 00 5E 20 28 00 3B 20 2A 20 52 2E 45 2E 44 | *.^ (.; * R.E.D|
00000070: 2E 20 56 33 2E 31 20 54 41 53 4B 48 45 41 44 45 |. V3.1 TASKHEADE|
00000080: 52 2E 48 59 50 20 2A 00 83 20 32 00 3B 20 2A 20 |R.HYP *.. 2.; * |
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 20 20 20 2A 00 A8 20 3C | *.. <|
000000B0: 00 3B 20 2A 20 20 20 20 20 20 20 20 41 54 54 45 |.; * ATTE|
000000C0: 4E 54 49 4F 4E 20 21 21 20 20 20 20 20 20 20 20 |NTION !! |
000000D0: 2A 00 CD 20 46 00 3B 20 2A 20 20 20 20 20 20 20 |*.. F.; * |
000000E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000F0: 20 20 20 20 20 2A 00 F2 20 50 00 3B 20 2A 20 20 | *.. P.; * |
00000100: 20 20 4C 4F 41 44 20 28 41 4E 44 20 41 53 53 45 | LOAD (AND ASSE|
00000110: 4D 42 4C 45 29 3A 20 20 20 20 2A 00 17 21 5A 00 |MBLE): *..!Z.|
00000120: 3B 20 2A 20 20 20 20 20 20 20 20 52 2E 45 2E 44 |; * R.E.D|
00000130: 2E 20 56 33 2E 31 20 20 20 20 20 20 20 20 20 2A |. V3.1 *|
00000140: 00 3C 21 64 00 3B 20 2A 20 42 45 46 4F 52 45 20 |.<!d.; * BEFORE |
00000150: 55 53 49 4E 47 20 54 48 49 53 20 50 52 4F 47 52 |USING THIS PROGR|
00000160: 41 4D 21 20 2A 00 61 21 6E 00 3B 20 2A 20 20 20 |AM! *.a!n.; * |
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 2A 00 86 21 78 00 3B | *..!x.;|
00000190: 20 2A 20 20 20 43 4F 50 59 52 49 47 48 54 20 42 | * COPYRIGHT B|
000001A0: 59 20 42 45 4E 4E 59 53 4F 46 54 20 20 20 2A 00 |Y BENNYSOFT *.|
000001B0: AB 21 82 00 3B 20 2A 20 20 20 20 20 20 20 4A 55 |.!..; * JU|
000001C0: 45 52 47 45 4E 20 47 55 54 4D 41 4E 4E 20 20 20 |ERGEN GUTMANN |
000001D0: 20 20 20 2A 00 D0 21 8C 00 3B 20 2A 20 20 20 20 | *..!..; * |
000001E0: 20 20 4C 55 44 57 49 47 2D 4A 41 48 4E 2D 53 54 | LUDWIG-JAHN-ST|
000001F0: 52 2E 32 20 20 20 20 20 2A 00 F5 21 96 00 3B 20 |R.2 *..!..; |
00000200: 2A 20 20 20 20 20 20 20 20 35 35 34 31 31 20 42 |* 55411 B|
00000210: 49 4E 47 45 4E 20 20 20 20 20 20 20 20 2A 00 1A |INGEN *..|
00000220: 22 A0 00 3B 20 2A 20 20 20 20 20 20 20 20 20 20 |"..; * |
00000230: 47 45 52 4D 41 4E 59 20 20 20 20 20 20 20 20 20 |GERMANY |
00000240: 20 20 2A 00 3F 22 AA 00 3B 20 2A 20 20 20 20 20 | *.?"..; * |
00000250: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000260: 20 20 20 20 20 20 20 2A 00 64 22 B4 00 3B 20 2A | *.d"..; *|
00000270: 20 20 20 20 41 4C 4C 20 52 49 47 48 54 53 20 52 | ALL RIGHTS R|
00000280: 45 53 45 52 56 45 44 2E 20 20 20 20 2A 00 89 22 |ESERVED. *.."|
00000290: BE 00 3B 20 2A 20 20 20 20 20 20 20 20 20 20 20 |..; * |
000002A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000002B0: 20 2A 00 AE 22 C8 00 3B 20 2A 20 20 54 45 4C 2E | *.."..; * TEL.|
000002C0: 3A 20 2B 2B 34 39 2F 28 30 29 36 37 32 31 2F 34 |: ++49/(0)6721/4|
000002D0: 31 31 31 30 20 20 2A 00 D3 22 D2 00 3B 20 2A 20 |1110 *.."..; * |
000002E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000002F0: 20 20 20 20 20 20 20 20 20 20 20 2A 00 F8 22 DC | *..".|
00000300: 00 3B 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.; *************|
00000310: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000320: 2A 00 FE 22 E6 00 3B 00 04 23 F0 00 3B 00 0A 23 |*.."..;..#..;..#|
00000330: FA 00 3B 00 10 23 04 01 3B 00 16 23 0E 01 3B 00 |..;..#..;..#..;.|
00000340: 1C 23 18 01 3B 00 42 23 E8 03 3B 2D 2D 2D 2D 2D |.#..;.B#..;-----|
00000350: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000360: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 48 23 F2 03 |-----------.H#..|
00000370: 3B 00 60 23 FC 03 3B 20 20 53 59 53 54 45 4D 20 |;.`#..; SYSTEM |
00000380: 41 44 44 52 45 53 53 45 53 00 7C 23 06 04 3B 20 |ADDRESSES.|#..; |
00000390: 20 41 4E 44 20 53 59 53 54 45 4D 20 56 41 52 49 | AND SYSTEM VARI|
000003A0: 41 42 4C 45 53 00 82 23 10 04 3B 00 A7 23 1A 04 |ABLES..#..;..#..|
000003B0: 3B 20 20 28 22 4C 22 3D 52 4F 55 54 49 4E 45 20 |; ("L"=ROUTINE |
000003C0: 4C 45 4E 47 54 48 20 49 4E 20 42 59 54 45 53 29 |LENGTH IN BYTES)|
000003D0: 00 AD 23 24 04 3B 00 B3 23 2E 04 3B 00 D9 23 38 |..#$.;..#..;..#8|
000003E0: 04 2E 47 4C 20 53 54 41 52 54 20 20 20 20 20 20 |..GL START |
000003F0: 20 20 20 20 20 3D 24 38 30 30 30 3B 4C 3A 24 31 | =$8000;L:$1|
00000400: 30 30 00 FF 23 42 04 2E 47 4C 20 49 52 51 4C 49 |00..#B..GL IRQLI|
00000410: 4E 45 20 20 20 20 20 20 20 20 20 3D 24 30 32 34 |NE =$024|
00000420: 20 3B 30 2D 24 31 33 37 00 25 24 4C 04 2E 47 4C | ;0-$137.%$L..GL|
00000430: 20 50 52 45 43 59 43 4C 45 53 20 20 20 20 20 20 | PRECYCLES |
00000440: 20 3D 24 31 31 20 20 3B 30 2D 20 24 39 37 00 2B | =$11 ;0- $97.+|
00000450: 24 56 04 3B 00 50 24 60 04 2E 47 4C 20 49 52 51 |$V.;.P$`..GL IRQ|
00000460: 50 52 45 43 59 43 4C 45 44 45 46 20 20 3D 53 54 |PRECYCLEDEF =ST|
00000470: 41 52 54 2B 24 30 30 31 34 00 75 24 6A 04 2E 47 |ART+$0014.u$j..G|
00000480: 4C 20 50 52 45 43 46 4F 52 43 45 4C 4F 41 44 20 |L PRECFORCELOAD |
00000490: 20 20 3D 53 54 41 52 54 2B 24 30 30 31 42 00 9A | =START+$001B..|
000004A0: 24 74 04 2E 47 4C 20 54 41 53 4B 56 45 43 54 4F |$t..GL TASKVECTO|
000004B0: 52 20 20 20 20 20 20 3D 53 54 41 52 54 2B 24 30 |R =START+$0|
000004C0: 30 46 45 00 BF 24 7E 04 2E 47 4C 20 54 41 53 4B |0FE..$~..GL TASK|
000004D0: 45 4E 44 20 20 20 20 20 20 20 20 20 3D 53 54 41 |END =STA|
000004E0: 52 54 2B 24 30 31 30 30 00 E4 24 88 04 3B 20 20 |RT+$0100..$..; |
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 3B 4C 3A 24 33 38 00 EA 24 | ;L:$38..$|
00000510: 92 04 3B 00 09 25 9C 04 2E 47 4C 20 54 41 53 4B |..;..%...GL TASK|
00000520: 49 4E 49 54 20 20 20 20 20 20 20 20 3D 24 38 32 |INIT =$82|
00000530: 30 30 00 28 25 A6 04 2E 47 4C 20 54 41 53 4B 30 |00.(%...GL TASK0|
00000540: 20 20 20 20 20 20 20 20 20 20 20 3D 24 38 34 30 | =$840|
00000550: 30 00 2E 25 B0 04 3B 00 34 25 BA 04 3B 00 5A 25 |0..%..;.4%..;.Z%|
00000560: C4 04 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |..;-------------|
00000570: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000580: 2D 2D 2D 00 60 25 CE 04 3B 00 80 25 D8 04 3B 20 |---.`%..;..%..; |
00000590: 20 54 41 53 4B 20 55 54 49 4C 49 54 59 20 53 55 | TASK UTILITY SU|
000005A0: 42 52 4F 55 54 49 4E 45 53 00 A0 25 E2 04 3B 20 |BROUTINES..%..; |
000005B0: 20 41 4E 44 20 54 48 45 49 52 20 53 54 41 52 54 | AND THEIR START|
000005C0: 41 44 44 52 45 53 53 45 53 00 A6 25 EC 04 3B 00 |ADDRESSES..%..;.|
000005D0: AC 25 F6 04 3B 00 D2 25 00 05 2E 47 4C 20 54 41 |.%..;..%...GL TA|
000005E0: 53 4B 43 59 43 4C 45 53 20 20 20 20 20 20 3D 24 |SKCYCLES =$|
000005F0: 38 31 34 30 20 3B 4C 3A 24 34 30 00 F4 25 0A 05 |8140 ;L:$40..%..|
00000600: 3B 20 20 20 28 41 4C 4C 4F 57 45 44 20 56 41 4C |; (ALLOWED VAL|
00000610: 55 45 53 3A 20 24 30 45 2D 24 38 41 29 00 FA 25 |UES: $0E-$8A)..%|
00000620: 14 05 3B 00 20 26 1E 05 2E 47 4C 20 4D 41 4B 45 |..;. &...GL MAKE|
00000630: 53 50 52 20 20 20 20 20 20 20 20 20 3D 24 38 31 |SPR =$81|
00000640: 38 30 20 3B 4C 3A 24 31 41 00 45 26 28 05 2E 47 |80 ;L:$1A.E&(..G|
00000650: 4C 20 53 50 52 44 41 54 41 20 20 20 20 20 20 20 |L SPRDATA |
00000660: 20 20 3D 4D 41 4B 45 53 50 52 2B 24 34 30 00 6B | =MAKESPR+$40.k|
00000670: 26 32 05 2E 47 4C 20 53 50 52 42 4C 4F 43 4B 20 |&2..GL SPRBLOCK |
00000680: 20 20 20 20 20 20 20 3D 38 33 32 20 20 20 20 3B | =832 ;|
00000690: 24 33 34 30 00 71 26 3C 05 3B 00 97 26 46 05 2E |$340.q&<.;..&F..|
000006A0: 47 4C 20 43 59 43 4C 45 53 31 30 30 20 20 20 20 |GL CYCLES100 |
000006B0: 20 20 20 3D 24 38 31 41 30 20 3B 4C 3A 24 30 44 | =$81A0 ;L:$0D|
000006C0: 00 BD 26 50 05 2E 47 4C 20 43 59 43 4C 45 53 35 |..&P..GL CYCLES5|
000006D0: 30 30 20 20 20 20 20 20 20 3D 24 38 31 42 30 20 |00 =$81B0 |
000006E0: 3B 4C 3A 24 30 44 00 C3 26 5A 05 3B 00 E3 26 64 |;L:$0D..&Z.;..&d|
000006F0: 05 3B 20 20 20 4E 4F 54 45 20 54 48 45 20 22 43 |.; NOTE THE "C|
00000700: 59 43 4C 45 53 22 2D 4D 41 43 52 4F 00 03 27 6E |YCLES"-MACRO..'n|
00000710: 05 3B 20 20 20 49 4E 20 4C 49 4E 45 53 20 20 34 |.; IN LINES 4|
00000720: 30 30 30 2D 20 34 32 36 30 20 21 21 00 09 27 78 |000- 4260 !!..'x|
00000730: 05 3B 00 0F 27 82 05 3B 00 35 27 8C 05 3B 2D 2D |.;..'..;.5'..;--|
00000740: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000750: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 3B |--------------.;|
00000760: 27 96 05 3B 00 5C 27 A0 05 3B 20 20 49 52 51 20 |'..;.\'..; IRQ |
00000770: 4D 41 4E 49 50 55 4C 41 54 49 4E 47 20 52 4F 55 |MANIPULATING ROU|
00000780: 54 49 4E 45 53 00 62 27 AA 05 3B 00 68 27 B4 05 |TINES.b'..;.h'..|
00000790: 3B 00 8E 27 BE 05 2E 47 4C 20 4A 4F 59 53 54 49 |;..'...GL JOYSTI|
000007A0: 43 4B 52 4F 55 54 49 4E 45 20 3D 24 37 45 30 30 |CKROUTINE =$7E00|
000007B0: 20 3B 4C 3A 24 43 44 00 B3 27 C8 05 2E 47 4C 20 | ;L:$CD..'...GL |
000007C0: 4D 45 4D 4F 52 59 45 4E 44 20 20 20 3D 4A 4F 59 |MEMORYEND =JOY|
000007D0: 53 54 49 43 4B 52 4F 55 54 49 4E 45 00 D9 27 D2 |STICKROUTINE..'.|
000007E0: 05 2E 47 4C 20 46 55 4E 43 54 4B 45 59 52 4F 55 |..GL FUNCTKEYROU|
000007F0: 54 49 4E 45 20 3D 24 37 46 30 30 20 3B 4C 3A 24 |TINE =$7F00 ;L:$|
00000800: 35 46 00 F8 27 DC 05 2E 47 4C 20 4D 41 4B 45 54 |5F..'...GL MAKET|
00000810: 41 53 4B 43 54 41 42 20 20 20 20 3D 24 37 46 33 |ASKCTAB =$7F3|
00000820: 38 00 1E 28 E6 05 2E 47 4C 20 43 4F 55 4E 54 45 |8..(...GL COUNTE|
00000830: 52 20 20 20 20 20 20 20 20 20 3D 24 37 46 36 30 |R =$7F60|
00000840: 20 3B 4C 3A 24 36 31 00 44 28 F0 05 2E 47 4C 20 | ;L:$61.D(...GL |
00000850: 54 57 4F 42 59 54 45 53 4F 55 54 20 20 20 20 20 |TWOBYTESOUT |
00000860: 3D 24 37 46 44 30 20 3B 4C 3A 24 32 34 00 69 28 |=$7FD0 ;L:$24.i(|
00000870: FA 05 2E 47 4C 20 42 59 54 45 4F 55 54 20 20 20 |...GL BYTEOUT |
00000880: 20 20 3D 54 57 4F 42 59 54 45 53 4F 55 54 2B 24 | =TWOBYTESOUT+$|
00000890: 30 39 00 6F 28 04 06 3B 00 91 28 0E 06 2E 47 4C |09.o(..;..(...GL|
000008A0: 20 44 49 53 50 4C 41 59 50 4F 53 20 20 20 20 20 | DISPLAYPOS |
000008B0: 20 3D 24 30 34 30 30 2B 32 37 00 97 28 18 06 3B | =$0400+27..(..;|
000008C0: 00 9D 28 22 06 3B 00 C3 28 2C 06 3B 2D 2D 2D 2D |..(".;..(,.;----|
000008D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000008E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 C9 28 36 |------------..(6|
000008F0: 06 3B 00 E7 28 40 06 3B 20 20 46 49 58 45 44 20 |.;..(@.; FIXED |
00000900: 53 59 53 54 45 4D 20 41 44 44 52 45 53 53 45 53 |SYSTEM ADDRESSES|
00000910: 00 ED 28 4A 06 3B 00 F3 28 54 06 3B 00 0A 29 5E |..(J.;..(T.;..)^|
00000920: 06 2E 47 4C 20 42 41 53 49 43 45 4E 44 20 20 3D |..GL BASICEND =|
00000930: 24 33 39 00 21 29 68 06 2E 47 4C 20 4C 41 53 54 |$39.!)h..GL LAST|
00000940: 4B 45 59 20 20 20 3D 24 43 42 00 27 29 72 06 3B |KEY =$CB.')r.;|
00000950: 00 40 29 7C 06 2E 47 4C 20 49 52 51 56 45 43 54 |.@)|..GL IRQVECT|
00000960: 20 20 20 3D 24 30 33 31 34 00 59 29 86 06 2E 47 | =$0314.Y)...G|
00000970: 4C 20 4F 4C 44 49 52 51 20 20 20 20 3D 24 45 41 |L OLDIRQ =$EA|
00000980: 33 31 00 72 29 90 06 2E 47 4C 20 49 52 51 4C 45 |31.r)...GL IRQLE|
00000990: 41 56 45 20 20 3D 24 45 41 38 31 00 78 29 9A 06 |AVE =$EA81.x)..|
000009A0: 3B 00 91 29 A4 06 2E 47 4C 20 4A 4F 59 53 54 49 |;..)...GL JOYSTI|
000009B0: 43 4B 32 20 3D 24 44 43 30 30 00 AA 29 AE 06 2E |CK2 =$DC00..)...|
000009C0: 47 4C 20 4A 4F 59 53 54 49 43 4B 31 20 3D 24 44 |GL JOYSTICK1 =$D|
000009D0: 43 30 31 00 CF 29 B8 06 2E 47 4C 20 43 49 41 31 |C01..)...GL CIA1|
000009E0: 49 43 52 20 20 20 3D 24 44 43 30 44 20 3B 49 4E |ICR =$DC0D ;IN|
000009F0: 54 45 52 52 55 50 54 2D 00 F5 29 C2 06 3B 20 20 |TERRUPT-..)..; |
00000A00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000A10: 20 20 20 43 4F 4E 54 52 4F 4C 52 45 47 2E 00 FB | CONTROLREG...|
00000A20: 29 CC 06 3B 00 01 2A D6 06 3B 00 27 2A D0 07 3B |)..;..*..;.'*..;|
00000A30: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000A40: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000A50: 00 2D 2A DA 07 3B 00 42 2A E4 07 3B 20 20 56 41 |.-*..;.B*..; VA|
00000A60: 52 49 41 42 4C 45 20 4C 49 53 54 00 5F 2A EE 07 |RIABLE LIST._*..|
00000A70: 3B 20 20 46 4F 52 20 41 4C 4C 20 56 49 43 2D 52 |; FOR ALL VIC-R|
00000A80: 45 47 49 53 54 45 52 53 00 65 2A F8 07 3B 00 6B |EGISTERS.e*..;.k|
00000A90: 2A 02 08 3B 00 8E 2A 0C 08 2E 47 4C 20 53 50 52 |*..;..*...GL SPR|
00000AA0: 30 50 20 20 20 20 20 3D 32 30 34 30 20 20 3B 20 |0P =2040 ; |
00000AB0: 20 3D 24 30 37 46 38 00 B1 2A 16 08 2E 47 4C 20 | =$07F8..*...GL |
00000AC0: 53 50 52 31 50 20 20 20 20 20 3D 32 30 34 31 20 |SPR1P =2041 |
00000AD0: 20 3B 20 20 3D 24 30 37 46 39 00 D4 2A 20 08 2E | ; =$07F9..* ..|
00000AE0: 47 4C 20 53 50 52 32 50 20 20 20 20 20 3D 32 30 |GL SPR2P =20|
00000AF0: 34 32 20 20 3B 20 20 3D 24 30 37 46 41 00 F7 2A |42 ; =$07FA..*|
00000B00: 2A 08 2E 47 4C 20 53 50 52 33 50 20 20 20 20 20 |*..GL SPR3P |
00000B10: 3D 32 30 34 33 20 20 3B 20 20 3D 24 30 37 46 42 |=2043 ; =$07FB|
00000B20: 00 1A 2B 34 08 2E 47 4C 20 53 50 52 34 50 20 20 |..+4..GL SPR4P |
00000B30: 20 20 20 3D 32 30 34 34 20 20 3B 20 20 3D 24 30 | =2044 ; =$0|
00000B40: 37 46 43 00 3D 2B 3E 08 2E 47 4C 20 53 50 52 35 |7FC.=+>..GL SPR5|
00000B50: 50 20 20 20 20 20 3D 32 30 34 35 20 20 3B 20 20 |P =2045 ; |
00000B60: 3D 24 30 37 46 44 00 60 2B 48 08 2E 47 4C 20 53 |=$07FD.`+H..GL S|
00000B70: 50 52 36 50 20 20 20 20 20 3D 32 30 34 36 20 20 |PR6P =2046 |
00000B80: 3B 20 20 3D 24 30 37 46 45 00 83 2B 52 08 2E 47 |; =$07FE..+R..G|
00000B90: 4C 20 53 50 52 37 50 20 20 20 20 20 3D 32 30 34 |L SPR7P =204|
00000BA0: 37 20 20 3B 20 20 3D 24 30 37 46 46 00 89 2B 5C |7 ; =$07FF..+\|
00000BB0: 08 3B 00 A2 2B 66 08 2E 47 4C 20 53 50 52 30 58 |.;..+f..GL SPR0X|
00000BC0: 20 20 20 20 20 3D 24 44 30 30 30 00 BB 2B 70 08 | =$D000..+p.|
00000BD0: 2E 47 4C 20 53 50 52 30 59 20 20 20 20 20 3D 24 |.GL SPR0Y =$|
00000BE0: 44 30 30 31 00 D4 2B 7A 08 2E 47 4C 20 53 50 52 |D001..+z..GL SPR|
00000BF0: 31 58 20 20 20 20 20 3D 24 44 30 30 32 00 ED 2B |1X =$D002..+|
00000C00: 84 08 2E 47 4C 20 53 50 52 31 59 20 20 20 20 20 |...GL SPR1Y |
00000C10: 3D 24 44 30 30 33 00 06 2C 8E 08 2E 47 4C 20 53 |=$D003..,...GL S|
00000C20: 50 52 32 58 20 20 20 20 20 3D 24 44 30 30 34 00 |PR2X =$D004.|
00000C30: 1F 2C 98 08 2E 47 4C 20 53 50 52 32 59 20 20 20 |.,...GL SPR2Y |
00000C40: 20 20 3D 24 44 30 30 35 00 38 2C A2 08 2E 47 4C | =$D005.8,...GL|
00000C50: 20 53 50 52 33 58 20 20 20 20 20 3D 24 44 30 30 | SPR3X =$D00|
00000C60: 36 00 51 2C AC 08 2E 47 4C 20 53 50 52 33 59 20 |6.Q,...GL SPR3Y |
00000C70: 20 20 20 20 3D 24 44 30 30 37 00 6A 2C B6 08 2E | =$D007.j,...|
00000C80: 47 4C 20 53 50 52 34 58 20 20 20 20 20 3D 24 44 |GL SPR4X =$D|
00000C90: 30 30 38 00 83 2C C0 08 2E 47 4C 20 53 50 52 34 |008..,...GL SPR4|
00000CA0: 59 20 20 20 20 20 3D 24 44 30 30 39 00 9C 2C CA |Y =$D009..,.|
00000CB0: 08 2E 47 4C 20 53 50 52 35 58 20 20 20 20 20 3D |..GL SPR5X =|
00000CC0: 24 44 30 30 41 00 B5 2C D4 08 2E 47 4C 20 53 50 |$D00A..,...GL SP|
00000CD0: 52 35 59 20 20 20 20 20 3D 24 44 30 30 42 00 CE |R5Y =$D00B..|
00000CE0: 2C DE 08 2E 47 4C 20 53 50 52 36 58 20 20 20 20 |,...GL SPR6X |
00000CF0: 20 3D 24 44 30 30 43 00 E7 2C E8 08 2E 47 4C 20 | =$D00C..,...GL |
00000D00: 53 50 52 36 59 20 20 20 20 20 3D 24 44 30 30 44 |SPR6Y =$D00D|
00000D10: 00 00 2D F2 08 2E 47 4C 20 53 50 52 37 58 20 20 |..-...GL SPR7X |
00000D20: 20 20 20 3D 24 44 30 30 45 00 19 2D FC 08 2E 47 | =$D00E..-...G|
00000D30: 4C 20 53 50 52 37 59 20 20 20 20 20 3D 24 44 30 |L SPR7Y =$D0|
00000D40: 30 46 00 1F 2D 06 09 3B 00 38 2D 10 09 2E 47 4C |0F..-..;.8-...GL|
00000D50: 20 53 50 52 58 20 20 20 20 20 20 3D 24 44 30 31 | SPRX =$D01|
00000D60: 30 00 51 2D 1A 09 2E 47 4C 20 43 54 52 4C 31 20 |0.Q-...GL CTRL1 |
00000D70: 20 20 20 20 3D 24 44 30 31 31 00 6A 2D 24 09 2E | =$D011.j-$..|
00000D80: 47 4C 20 52 41 53 54 45 52 20 20 20 20 3D 24 44 |GL RASTER =$D|
00000D90: 30 31 32 00 83 2D 2E 09 2E 47 4C 20 4C 50 58 20 |012..-...GL LPX |
00000DA0: 20 20 20 20 20 20 3D 24 44 30 31 33 00 9C 2D 38 | =$D013..-8|
00000DB0: 09 2E 47 4C 20 4C 50 59 20 20 20 20 20 20 20 3D |..GL LPY =|
00000DC0: 24 44 30 31 34 00 B5 2D 42 09 2E 47 4C 20 53 50 |$D014..-B..GL SP|
00000DD0: 52 45 41 20 20 20 20 20 3D 24 44 30 31 35 00 CE |REA =$D015..|
00000DE0: 2D 4C 09 2E 47 4C 20 43 54 52 4C 32 20 20 20 20 |-L..GL CTRL2 |
00000DF0: 20 3D 24 44 30 31 36 00 E7 2D 56 09 2E 47 4C 20 | =$D016..-V..GL |
00000E00: 53 50 52 45 58 50 59 20 20 20 3D 24 44 30 31 37 |SPREXPY =$D017|
00000E10: 00 00 2E 60 09 2E 47 4C 20 4D 45 4D 4F 52 59 20 |...`..GL MEMORY |
00000E20: 20 20 20 3D 24 44 30 31 38 00 19 2E 6A 09 2E 47 | =$D018...j..G|
00000E30: 4C 20 49 52 51 53 54 41 54 55 53 20 3D 24 44 30 |L IRQSTATUS =$D0|
00000E40: 31 39 00 32 2E 74 09 2E 47 4C 20 49 52 51 4D 41 |19.2.t..GL IRQMA|
00000E50: 53 4B 20 20 20 3D 24 44 30 31 41 00 4B 2E 7E 09 |SK =$D01A.K.~.|
00000E60: 2E 47 4C 20 53 50 52 53 43 52 50 52 20 20 3D 24 |.GL SPRSCRPR =$|
00000E70: 44 30 31 42 00 64 2E 88 09 2E 47 4C 20 53 50 52 |D01B.d....GL SPR|
00000E80: 4D 43 4F 4C 45 41 20 3D 24 44 30 31 43 00 7D 2E |MCOLEA =$D01C.}.|
00000E90: 92 09 2E 47 4C 20 53 50 52 45 58 50 58 20 20 20 |...GL SPREXPX |
00000EA0: 3D 24 44 30 31 44 00 96 2E 9C 09 2E 47 4C 20 53 |=$D01D......GL S|
00000EB0: 50 52 53 50 52 43 4F 4C 4C 3D 24 44 30 31 45 00 |PRSPRCOLL=$D01E.|
00000EC0: AF 2E A6 09 2E 47 4C 20 53 50 52 53 43 52 43 4F |.....GL SPRSCRCO|
00000ED0: 4C 4C 3D 24 44 30 31 46 00 B5 2E B0 09 3B 00 CE |LL=$D01F.....;..|
00000EE0: 2E BA 09 2E 47 4C 20 42 4F 52 44 45 52 20 20 20 |....GL BORDER |
00000EF0: 20 3D 24 44 30 32 30 00 E7 2E C4 09 2E 47 4C 20 | =$D020......GL |
00000F00: 53 43 52 45 45 4E 20 20 20 20 3D 24 44 30 32 31 |SCREEN =$D021|
00000F10: 00 00 2F CE 09 2E 47 4C 20 4D 43 4F 4C 31 20 20 |../...GL MCOL1 |
00000F20: 20 20 20 3D 24 44 30 32 32 00 19 2F D8 09 2E 47 | =$D022../...G|
00000F30: 4C 20 4D 43 4F 4C 32 20 20 20 20 20 3D 24 44 30 |L MCOL2 =$D0|
00000F40: 32 33 00 32 2F E2 09 2E 47 4C 20 4D 43 4F 4C 33 |23.2/...GL MCOL3|
00000F50: 20 20 20 20 20 3D 24 44 30 32 34 00 4B 2F EC 09 | =$D024.K/..|
00000F60: 2E 47 4C 20 53 50 52 4D 43 4F 4C 31 20 20 3D 24 |.GL SPRMCOL1 =$|
00000F70: 44 30 32 35 00 64 2F F6 09 2E 47 4C 20 53 50 52 |D025.d/...GL SPR|
00000F80: 4D 43 4F 4C 32 20 20 3D 24 44 30 32 36 00 6A 2F |MCOL2 =$D026.j/|
00000F90: 00 0A 3B 00 83 2F 0A 0A 2E 47 4C 20 53 50 52 30 |..;../...GL SPR0|
00000FA0: 43 4F 4C 20 20 20 3D 24 44 30 32 37 00 9C 2F 14 |COL =$D027../.|
00000FB0: 0A 2E 47 4C 20 53 50 52 31 43 4F 4C 20 20 20 3D |..GL SPR1COL =|
00000FC0: 24 44 30 32 38 00 B5 2F 1E 0A 2E 47 4C 20 53 50 |$D028../...GL SP|
00000FD0: 52 32 43 4F 4C 20 20 20 3D 24 44 30 32 39 00 CE |R2COL =$D029..|
00000FE0: 2F 28 0A 2E 47 4C 20 53 50 52 33 43 4F 4C 20 20 |/(..GL SPR3COL |
00000FF0: 20 3D 24 44 30 32 41 00 E7 2F 32 0A 2E 47 4C 20 | =$D02A../2..GL |
00001000: 53 50 52 34 43 4F 4C 20 20 20 3D 24 44 30 32 42 |SPR4COL =$D02B|
00001010: 00 00 30 3C 0A 2E 47 4C 20 53 50 52 35 43 4F 4C |..0<..GL SPR5COL|
00001020: 20 20 20 3D 24 44 30 32 43 00 19 30 46 0A 2E 47 | =$D02C..0F..G|
00001030: 4C 20 53 50 52 36 43 4F 4C 20 20 20 3D 24 44 30 |L SPR6COL =$D0|
00001040: 32 44 00 32 30 50 0A 2E 47 4C 20 53 50 52 37 43 |2D.20P..GL SPR7C|
00001050: 4F 4C 20 20 20 3D 24 44 30 32 45 00 38 30 5A 0A |OL =$D02E.80Z.|
00001060: 3B 00 51 30 64 0A 2E 47 4C 20 46 41 53 54 20 20 |;.Q0d..GL FAST |
00001070: 20 20 20 20 3D 24 44 30 33 30 00 57 30 6E 0A 3B | =$D030.W0n.;|
00001080: 00 5D 30 78 0A 3B 00 63 30 82 0A 3B 00 7E 30 B8 |.]0x.;.c0..;.~0.|
00001090: 0B 3B 20 20 20 20 20 20 20 20 20 20 20 20 20 2E |.; .|
000010A0: 47 4F 20 34 30 30 30 00 A4 30 C2 0B 3B 2D 2D 2D |GO 4000..0..;---|
000010B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000010C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 AA 30 |-------------..0|
000010D0: CC 0B 3B 00 C8 30 D6 0B 3B 20 20 49 52 51 50 52 |..;..0..; IRQPR|
000010E0: 45 43 59 43 4C 45 44 45 46 20 52 4F 55 54 49 4E |ECYCLEDEF ROUTIN|
000010F0: 45 00 E0 30 E0 0B 3B 20 20 20 20 20 20 20 28 4F |E..0..; (O|
00001100: 56 45 52 57 52 49 54 45 29 00 E6 30 EA 0B 3B 00 |VERWRITE)..0..;.|
00001110: EC 30 F4 0B 3B 00 03 31 FE 0B 2E 42 41 20 49 52 |.0..;..1...BA IR|
00001120: 51 50 52 45 43 59 43 4C 45 44 45 46 00 20 31 08 |QPRECYCLEDEF. 1.|
00001130: 0C 4C 49 4E 45 48 49 44 45 46 20 4C 44 41 23 3E |.LINEHIDEF LDA#>|
00001140: 28 49 52 51 4C 49 4E 45 29 00 35 31 12 0C 20 4C |(IRQLINE).51.. L|
00001150: 53 52 3B 43 41 52 52 59 5F 39 2E 42 49 54 00 50 |SR;CARRY_9.BIT.P|
00001160: 31 1C 0C 4C 49 4E 45 44 45 46 20 4C 44 41 23 3C |1..LINEDEF LDA#<|
00001170: 28 49 52 51 4C 49 4E 45 29 00 71 31 26 0C 50 52 |(IRQLINE).q1&.PR|
00001180: 45 43 59 43 4C 45 44 45 46 20 4C 44 58 23 3C 28 |ECYCLEDEF LDX#<(|
00001190: 50 52 45 43 59 43 4C 45 53 29 00 77 31 30 0C 3B |PRECYCLES).w10.;|
000011A0: 00 7D 31 3A 0C 3B 00 A3 31 A0 0F 3B 2D 2D 2D 2D |.}1:.;..1..;----|
000011B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000011C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 A9 31 AA |------------..1.|
000011D0: 0F 3B 00 BF 31 B4 0F 3B 20 20 22 43 59 43 4C 45 |.;..1..; "CYCLE|
000011E0: 53 22 20 4D 41 43 52 4F 00 C5 31 BE 0F 3B 00 CB |S" MACRO..1..;..|
000011F0: 31 C8 0F 3B 00 DD 31 D2 0F 2E 4D 41 20 43 59 43 |1..;..1...MA CYC|
00001200: 4C 45 53 28 43 29 00 E9 31 DC 0F 2E 49 46 20 43 |LES(C)..1...IF C|
00001210: 3C 32 00 F6 31 E6 0F 20 2E 47 4F 34 32 33 30 00 |<2..1.. .GO4230.|
00001220: FF 31 F0 0F 20 2E 45 49 00 0B 32 FA 0F 2E 49 46 |.1.. .EI..2...IF|
00001230: 20 43 3E 33 00 14 32 04 10 20 4E 4F 50 00 22 32 | C>3..2.. NOP."2|
00001240: 0E 10 20 2E 45 51 43 3D 43 2D 32 00 2F 32 18 10 |.. .EQC=C-2./2..|
00001250: 20 2E 47 4F 34 30 39 30 00 38 32 22 10 20 2E 45 | .GO4090.82". .E|
00001260: 49 00 44 32 2C 10 2E 49 46 20 43 3D 33 00 50 32 |I.D2,..IF C=3.P2|
00001270: 36 10 20 42 49 54 24 45 41 00 70 32 40 10 3B 20 |6. BIT$EA.p2@.; |
00001280: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001290: 22 49 4C 4C 45 47 41 4C 22 00 93 32 4A 10 3B 20 |"ILLEGAL"..2J.; |
000012A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000012B0: 41 4C 54 45 52 4E 41 54 49 56 45 3A 00 B5 32 54 |ALTERNATIVE:..2T|
000012C0: 10 3B 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |.; |
000012D0: 20 20 20 2E 42 59 20 24 30 34 2C 24 45 41 00 BE | .BY $04,$EA..|
000012E0: 32 5E 10 20 2E 45 49 00 CA 32 68 10 2E 49 46 20 |2^. .EI..2h..IF |
000012F0: 43 3D 32 00 D3 32 72 10 20 4E 4F 50 00 DC 32 7C |C=2..2r. NOP..2||
00001300: 10 20 2E 45 49 00 E4 32 86 10 2E 52 54 00 EA 32 |. .EI..2...RT..2|
00001310: 90 10 3B 00 F0 32 9A 10 3B 00 F6 32 A4 10 3B 00 |..;..2..;..2..;.|
00001320: 44 33 88 13 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |D3..;-----------|
00001330: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001340: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001350: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00001360: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 4A 33 |-------------.J3|
00001370: 92 13 3B 00 5F 33 9C 13 3B 20 20 54 41 53 4B 20 |..;._3..; TASK |
00001380: 52 4F 55 54 49 4E 45 53 00 65 33 A6 13 3B 00 6B |ROUTINES.e3..;.k|
00001390: 33 B0 13 3B 00 7C 33 BA 13 2E 42 41 20 54 41 53 |3..;.|3...BA TAS|
000013A0: 4B 49 4E 49 54 00 85 33 C4 13 20 52 54 53 00 8B |KINIT..3.. RTS..|
000013B0: 33 CE 13 3B 00 91 33 D8 13 3B 00 B7 33 70 17 3B |3..;..3..;..3p.;|
000013C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000013D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000013E0: 00 BD 33 7A 17 3B 00 CB 33 84 17 2E 42 41 20 54 |..3z.;..3...BA T|
000013F0: 41 53 4B 30 00 DD 33 8E 17 20 4C 44 58 23 37 3B |ASK0..3.. LDX#7;|
00001400: 59 45 4C 4C 4F 57 00 EC 33 98 17 20 4C 44 59 42 |YELLOW..3.. LDYB|
00001410: 4F 52 44 45 52 00 F2 33 A2 17 3B 00 01 34 AC 17 |ORDER..3..;..4..|
00001420: 20 53 54 58 42 4F 52 44 45 52 00 14 34 B6 17 20 | STXBORDER..4.. |
00001430: 4A 53 52 54 41 53 4B 43 59 43 4C 45 53 00 23 34 |JSRTASKCYCLES.#4|
00001440: C0 17 20 53 54 59 42 4F 52 44 45 52 00 29 34 CA |.. STYBORDER.)4.|
00001450: 17 3B 00 39 34 D4 17 20 4A 4D 50 54 41 53 4B 45 |.;.94.. JMPTASKE|
00001460: 4E 44 00 00 00 |ND... |
X.....;......DP19,26,5,5.. ..; *********
*********************.9 ..; *
*.^ (.; * R.E.D. V3.1 T
ASKHEADER.HYP *.. 2.; *
*.. <.; * ATTENTION !!
*.M F.; *
*.. P.; * LOAD (AND ASSEMBLE):
*..!Z.; * R.E.D. V3.1 *
.<!D.; * BEFORE USING THIS PROGRAM! *.A!
N.; * *..!X.;
* COPYRIGHT BY BENNYSOFT *..!..; *
JUERGEN GUTMANN *.P!..; *
LUDWIG-JAHN-STR.2 *..!..; *
55411 BINGEN *.." .; *
GERMANY *.?"..; *
*.D"..; * ALL RIGHTS R
ESERVED. *.."..; *
*.."H.; * TEL.: ++49/(0)6721/4
1110 *.S"R.; *
*.."..; *****************************
*.."..;..#..;..#..;..#..;..#..;..#..;.B#
..;--------------------------------.H#..
;.`#..; SYSTEM ADDRESSES.|#..; AND SYS
TEM VARIABLES..#..;..#..; ("L"=ROUTINE
LENGTH IN BYTES)..#$.;..#..;.Y#8..GL STA
RT =$8000;L:$100..#B..GL IRQLI
NE =$024 ;0-$137.%$L..GL PRECYCL
ES =$11 ;0- $97.+$V.;.P$`..GL IRQ
PRECYCLEDEF =START+$0014.U$J..GL PRECFO
RCELOAD =START+$001B..$T..GL TASKVECTO
R =START+$00FE..$~..GL TASKEND
=START+$0100..$..;
;L:$38..$..;..%...GL TASKINIT
=$8200.(%...GL TASK0 =$840
0..%..;.4%..;.Z%D.;---------------------
-----------.`%N.;..%X.; TASK UTILITY SU
BROUTINES. %..; AND THEIR STARTADDRESSE
S..%..;..%..;.R%...GL TASKCYCLES =$
8140 ;L:$40..%..; (ALLOWED VALUES: $0E
-$8A)..%..;. &...GL MAKESPR =$81
80 ;L:$1A.E&(..GL SPRDATA =MAKES
PR+$40.K&2..GL SPRBLOCK =832 ;
$340.Q&<.;..&F..GL CYCLES100 =$81A
0 ;L:$0D..&P..GL CYCLES500 =$81B0
;L:$0D.C&Z.;..&D.; NOTE THE "CYCLES"-M
ACRO..'N.; IN LINES 4000- 4260 !!..'X
.;..'..;.5'..;--------------------------
------.;'..;.\' .; IRQ MANIPULATING ROU
TINES.B'..;.H'..;..'...GL JOYSTICKROUTIN
E =$7E00 ;L:$CD..'H..GL MEMORYEND =JOY
STICKROUTINE.Y'R..GL FUNCTKEYROUTINE =$7
F00 ;L:$5F..'...GL MAKETASKCTAB =$7F3
8..(...GL COUNTER =$7F60 ;L:$61.
D(...GL TWOBYTESOUT =$7FD0 ;L:$24.I(
...GL BYTEOUT =TWOBYTESOUT+$09.O(..;
..(...GL DISPLAYPOS =$0400+27..(..;
..(".;.C(,.;----------------------------
----.I(6.;..(@.; FIXED SYSTEM ADDRESSES
..(J.;..(T.;..)^..GL BASICEND =$39.!)H.
.GL LASTKEY =$CB.')R.;.@)|..GL IRQVECT
=$0314.Y)...GL OLDIRQ =$EA31.R)...
GL IRQLEAVE =$EA81.X)..;..)...GL JOYSTI
CK2 =$DC00..)...GL JOYSTICK1 =$DC01.O)..
.GL CIA1ICR =$DC0D ;INTERRUPT-..)B.;
CONTROLREG...)L.;..*V
.;.'*P.;--------------------------------
.-*Z.;.B*..; VARIABLE LIST._*..; FOR A
LL VIC-REGISTERS.E*..;.K*..;..*...GL SPR
0P =2040 ; =$07F8..*...GL SPR1P
=2041 ; =$07F9.T* ..GL SPR2P =20
42 ; =$07FA..**..GL SPR3P =2043 ;
=$07FB..+4..GL SPR4P =2044 ; =$0
7FC.=+>..GL SPR5P =2045 ; =$07FD.`
+H..GL SPR6P =2046 ; =$07FE..+R..G
L SPR7P =2047 ; =$07FF..+\.;..+F..
GL SPR0X =$D000..+P..GL SPR0Y =$
D001.T+Z..GL SPR1X =$D002..+...GL SP
R1Y =$D003..,...GL SPR2X =$D004.
.,...GL SPR2Y =$D005.8,...GL SPR3X
=$D006.Q,...GL SPR3Y =$D007.J,...
GL SPR4X =$D008..,...GL SPR4Y =$
D009..,J..GL SPR5X =$D00A..,T..GL SP
R5Y =$D00B.N,...GL SPR6X =$D00C.
.,...GL SPR6Y =$D00D..-...GL SPR7X
=$D00E..-...GL SPR7Y =$D00F..-..;
.8-...GL SPRX =$D010.Q-...GL CTRL1
=$D011.J-$..GL RASTER =$D012..-..
.GL LPX =$D013..-8..GL LPY =
$D014..-B..GL SPREA =$D015.N-L..GL C
TRL2 =$D016..-V..GL SPREXPY =$D017
...`..GL MEMORY =$D018...J..GL IRQSTA
TUS =$D019.2.T..GL IRQMASK =$D01A.K.~.
.GL SPRSCRPR =$D01B.D....GL SPRMCOLEA =
$D01C.}....GL SPREXPX =$D01D......GL S
PRSPRCOLL=$D01E......GL SPRSCRCOLL=$D01F
.....;.N....GL BORDER =$D020...D..GL
SCREEN =$D021../N..GL MCOL1 =$D02
2../X..GL MCOL2 =$D023.2/...GL MCOL3
=$D024.K/...GL SPRMCOL1 =$D025.D/.
..GL SPRMCOL2 =$D026.J/..;../...GL SPR0
COL =$D027../...GL SPR1COL =$D028../
...GL SPR2COL =$D029.N/(..GL SPR3COL
=$D02A../2..GL SPR4COL =$D02B..0<..GL
SPR5COL =$D02C..0F..GL SPR6COL =$D0
2D.20P..GL SPR7COL =$D02E.80Z.;.Q0D..G
L FAST =$D030.W0N.;.]0X.;.C0..;.~0.
.; .GO 4000..0B.;-----------
---------------------..0L.;.H0V.; IRQPR
ECYCLEDEF ROUTINE..0..; (OVERWRITE
)..0..;..0..;..1...BA IRQPRECYCLEDEF. 1.
.LINEHIDEF LDA#>(IRQLINE).51.. LSR;CARRY
_9.BIT.P1..LINEDEF LDA#<(IRQLINE).Q1&.PR
ECYCLEDEF LDX#<(PRECYCLES).W10.;.}1:.;..
1 .;--------------------------------..1.
.;..1..; "CYCLES" MACRO.E1..;.K1H.;..1R
..MA CYCLES(C)..1...IF C<2..1.. .GO4230.
.1.. .EI..2...IF C>3..2.. NOP."2.. .EQC=
C-2./2.. .GO4090.82". .EI.D2,..IF C=3.P2
6. BIT$EA.P2@.; "ILLEGAL
"..2J.; ALTERNATIVE:..2T
.; .BY $04,$EA..2^. .EI.
J2H..IF C=2.S2R. NOP..2|. .EI..2...RT..2
..;..2..;..2..;.D3..;-------------------
----------------------------------------
-------------.J3..;._3..; TASK ROUTINES
.E3..;.K3..;.|3...BA TASKINIT..3D. RTS..
3N.;..3X.;..3P.;------------------------
--------..3Z.;.K3...BA TASK0..3.. LDX#7;
YELLOW..3.. LDYBORDER..3..;..4.. STXBORD
ER..4.. JSRTASKCYCLES.#4.. STYBORDER.)4J
.;.94T. JMPTASKEND...
> CLICK IMAGE PREVIEW FOR FULL MODAL