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

TURBO SOURCECODE

FILE INFORMATION

FILENAME(S): TURBO SOURCECODE

FILE TYPE(S): SEQ

FILE SIZE: 51.1K

FIRST SEEN: 2025-11-30 19:11:18

APPEARS ON: 1 disk(s)

FILE HASH

6820080eab102766d08c87c7b885bd56d9b0f86aaaa283a2163b6a0d112c9635

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
CLASSICSTARTREK TURBO SOURCECODE SEQ Commodore 64 Extras 16 17 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 3B 20 20 20 20 20 20 A7  A3 A3 A3 A3 A3 A3 A3 A3  |;      .........|
00000010: A3 A3 A3 A3 A3 A3 A3 A3  A3 A3 A3 A3 A3 A3 A5 0D  |................|
00000020: 3B 20 20 20 20 20 20 A7  20 D3 54 41 52 20 D4 52  |;      . .TAR .R|
00000030: 45 4B 20 D3 49 4D 55 4C  41 54 49 4F 4E 20 A5 0D  |EK .IMULATION ..|
00000040: 3B 20 20 20 20 20 20 A7  20 28 53 45 51 2E 20 53  |;      . (SEQ. S|
00000050: 4F 55 52 43 45 20 43 4F  44 45 29 20 20 20 A5 0D  |OURCE CODE)   ..|
00000060: 3B 20 20 20 20 20 20 A7  20 D2 4F 59 20 C2 41 54  |;      . .OY .AT|
00000070: 54 59 20 20 CA 41 4E 2E  20 32 30 30 31 20 A5 0D  |TY  .AN. 2001 ..|
00000080: 3B 20 20 20 20 20 20 A7  A4 A4 A4 A4 A4 A4 A4 A4  |;      .........|
00000090: A4 A4 A4 A4 A4 A4 A4 A4  A4 A4 A4 A4 A4 A4 A5 0D  |................|
000000A0: 0D 0D 20 20 20 20 20 20  20 20 20 2A 3D 20 24 31  |..         *= $1|
000000B0: 30 30 30 0D 0D 54 4D 50  31 20 20 20 20 20 3D 20  |000..TMP1     = |
000000C0: 24 30 32 0D 54 4D 50 32  20 20 20 20 20 3D 20 24  |$02.TMP2     = $|
000000D0: 30 33 0D 52 4E 44 58 20  20 20 20 20 3D 20 24 30  |03.RNDX     = $0|
000000E0: 34 0D 4E 4F 4B 31 20 20  20 20 20 3D 20 24 30 35  |4.NOK1     = $05|
000000F0: 0D 4B 4D 4F 56 20 20 20  20 20 3D 20 24 30 36 0D  |.KMOV     = $06.|
00000100: 54 49 4D 34 20 20 20 20  20 3D 20 24 30 37 0D 54  |TIM4     = $07.T|
00000110: 49 4D 35 20 20 20 20 20  3D 20 24 30 38 0D 41 54  |IM5     = $08.AT|
00000120: 54 31 20 20 20 20 20 3D  20 24 30 39 0D 41 54 54  |T1     = $09.ATT|
00000130: 32 20 20 20 20 20 3D 20  24 30 41 0D 4B 4E 54 31  |2     = $0A.KNT1|
00000140: 20 20 20 20 20 3D 20 24  30 42 0D 4B 4E 54 32 20  |     = $0B.KNT2 |
00000150: 20 20 20 20 3D 20 24 30  43 0D 4A 4F 59 32 20 20  |    = $0C.JOY2  |
00000160: 20 20 20 3D 20 24 30 44  0D 45 43 4E 54 20 20 20  |   = $0D.ECNT   |
00000170: 20 20 3D 20 24 30 45 0D  53 49 44 20 20 20 20 20  |  = $0E.SID     |
00000180: 20 3D 20 24 44 34 30 30  0D 0D 41 4E 45 57 20 20  | = $D400..ANEW  |
00000190: 20 20 20 4C 44 41 20 23  30 0D 20 20 20 20 20 20  |   LDA #0.      |
000001A0: 20 20 20 53 54 41 20 24  44 30 32 30 0D 20 20 20  |   STA $D020.   |
000001B0: 20 20 20 20 20 20 53 54  41 20 24 44 30 32 31 0D  |      STA $D021.|
000001C0: 20 20 20 20 20 20 20 20  20 53 54 41 20 4B 4D 4F  |         STA KMO|
000001D0: 56 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 41  |V.         STA A|
000001E0: 54 54 31 0D 20 20 20 20  20 20 20 20 20 53 54 41  |TT1.         STA|
000001F0: 20 41 54 54 32 0D 20 20  20 20 20 20 20 20 20 4C  | ATT2.         L|
00000200: 44 41 20 23 31 0D 20 20  20 20 20 20 20 20 20 53  |DA #1.         S|
00000210: 54 41 20 47 58 0D 20 20  20 20 20 20 20 20 20 53  |TA GX.         S|
00000220: 54 41 20 47 59 0D 20 20  20 20 20 20 20 20 20 53  |TA GY.         S|
00000230: 54 41 20 50 4C 45 56 0D  20 20 20 20 20 20 20 20  |TA PLEV.        |
00000240: 20 53 54 41 20 53 4C 45  56 0D 20 20 20 20 20 20  | STA SLEV.      |
00000250: 20 20 20 4C 44 41 20 23  34 0D 20 20 20 20 20 20  |   LDA #4.      |
00000260: 20 20 20 53 54 41 20 53  58 0D 20 20 20 20 20 20  |   STA SX.      |
00000270: 20 20 20 53 54 41 20 53  59 0D 20 20 20 20 20 20  |   STA SY.      |
00000280: 20 20 20 4A 53 52 20 52  4E 44 47 45 4E 20 20 3B  |   JSR RNDGEN  ;|
00000290: 52 41 4E 44 4F 4D 20 54  41 42 4C 45 53 0D 20 20  |RANDOM TABLES.  |
000002A0: 20 20 20 20 20 20 20 4A  53 52 20 53 45 54 55 50  |       JSR SETUP|
000002B0: 20 20 20 3B 4D 41 4B 45  20 47 41 4C 41 58 59 0D  |   ;MAKE GALAXY.|
000002C0: 20 20 20 20 20 20 20 20  20 4C 44 41 20 23 31 38  |         LDA #18|
000002D0: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 24 44  |.         STA $D|
000002E0: 30 31 38 20 20 20 3B 43  53 45 54 20 40 20 24 30  |018   ;CSET @ $0|
000002F0: 38 30 30 0D 20 20 20 20  20 20 20 20 20 53 45 49  |800.         SEI|
00000300: 0D 20 20 20 20 20 20 20  20 20 4C 44 41 20 23 24  |.         LDA #$|
00000310: 37 46 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |7F.         STA |
00000320: 24 44 43 30 44 0D 20 20  20 20 20 20 20 20 20 4C  |$DC0D.         L|
00000330: 44 41 20 23 24 30 31 0D  20 20 20 20 20 20 20 20  |DA #$01.        |
00000340: 20 53 54 41 20 24 44 30  31 41 0D 20 20 20 20 20  | STA $D01A.     |
00000350: 20 20 20 20 4C 44 41 20  23 24 31 42 0D 20 20 20  |    LDA #$1B.   |
00000360: 20 20 20 20 20 20 53 54  41 20 24 44 30 31 31 0D  |      STA $D011.|
00000370: 20 20 20 20 20 20 20 20  20 4C 44 41 20 23 24 30  |         LDA #$0|
00000380: 30 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 24  |0.         STA $|
00000390: 44 30 31 32 0D 20 20 20  20 20 20 20 20 20 4C 44  |D012.         LD|
000003A0: 41 20 23 3C 49 52 51 31  0D 20 20 20 20 20 20 20  |A #<IRQ1.       |
000003B0: 20 20 53 54 41 20 24 30  33 31 34 0D 20 20 20 20  |  STA $0314.    |
000003C0: 20 20 20 20 20 4C 44 41  20 23 3E 49 52 51 31 0D  |     LDA #>IRQ1.|
000003D0: 20 20 20 20 20 20 20 20  20 53 54 41 20 24 30 33  |         STA $03|
000003E0: 31 35 0D 20 20 20 20 20  20 20 20 20 43 4C 49 0D  |15.         CLI.|
000003F0: 52 53 45 54 20 20 20 20  20 4C 44 58 20 23 30 20  |RSET     LDX #0 |
00000400: 20 20 20 20 20 20 3B 53  45 54 20 55 50 20 53 50  |      ;SET UP SP|
00000410: 52 49 54 45 53 0D 41 53  53 47 20 20 20 20 20 4C  |RITES.ASSG     L|
00000420: 44 41 20 53 50 4E 4F 2C  58 0D 20 20 20 20 20 20  |DA SPNO,X.      |
00000430: 20 20 20 53 54 41 20 24  30 37 46 38 2C 58 0D 20  |   STA $07F8,X. |
00000440: 20 20 20 20 20 20 20 20  49 4E 58 0D 20 20 20 20  |        INX.    |
00000450: 20 20 20 20 20 43 50 58  20 23 38 0D 20 20 20 20  |     CPX #8.    |
00000460: 20 20 20 20 20 42 4E 45  20 41 53 53 47 0D 20 20  |     BNE ASSG.  |
00000470: 20 20 20 20 20 20 20 4C  44 41 20 23 31 0D 20 20  |       LDA #1.  |
00000480: 20 20 20 20 20 20 20 53  54 41 20 24 44 30 32 37  |       STA $D027|
00000490: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 24 44  |.         STA $D|
000004A0: 30 32 42 0D 20 20 20 20  20 20 20 20 20 53 54 41  |02B.         STA|
000004B0: 20 24 44 30 32 43 0D 20  20 20 20 20 20 20 20 20  | $D02C.         |
000004C0: 53 54 41 20 24 44 30 32  44 0D 20 20 20 20 20 20  |STA $D02D.      |
000004D0: 20 20 20 53 54 41 20 24  44 30 32 45 0D 20 20 20  |   STA $D02E.   |
000004E0: 20 20 20 20 20 20 4C 44  41 20 23 35 0D 20 20 20  |      LDA #5.   |
000004F0: 20 20 20 20 20 20 53 54  41 20 24 44 30 32 38 0D  |      STA $D028.|
00000500: 20 20 20 20 20 20 20 20  20 53 54 41 20 24 44 30  |         STA $D0|
00000510: 32 41 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |2A.         LDA |
00000520: 23 31 33 0D 20 20 20 20  20 20 20 20 20 53 54 41  |#13.         STA|
00000530: 20 24 44 30 32 39 0D 20  20 20 20 20 20 20 20 20  | $D029.         |
00000540: 4C 44 41 20 23 31 31 0D  20 20 20 20 20 20 20 20  |LDA #11.        |
00000550: 20 53 54 41 20 24 44 30  32 35 0D 20 20 20 20 20  | STA $D025.     |
00000560: 20 20 20 20 4C 44 41 20  23 31 35 0D 20 20 20 20  |    LDA #15.    |
00000570: 20 20 20 20 20 53 54 41  20 24 44 30 32 36 0D 20  |     STA $D026. |
00000580: 20 20 20 20 20 20 20 20  4C 44 41 20 23 33 32 0D  |        LDA #32.|
00000590: 20 20 20 20 20 20 20 20  20 53 54 41 20 24 44 30  |         STA $D0|
000005A0: 31 43 0D 0D 47 53 54 41  52 54 20 20 20 4C 44 41  |1C..GSTART   LDA|
000005B0: 20 23 24 34 30 0D 20 20  20 20 20 20 20 20 20 53  | #$40.         S|
000005C0: 54 41 20 32 35 32 0D 20  20 20 20 20 20 20 20 20  |TA 252.         |
000005D0: 4C 44 41 20 23 24 34 34  0D 20 20 20 20 20 20 20  |LDA #$44.       |
000005E0: 20 20 53 54 41 20 31 37  35 0D 20 20 20 20 20 20  |  STA 175.      |
000005F0: 20 20 20 4A 53 52 20 50  49 43 20 20 20 20 3B 50  |   JSR PIC    ;P|
00000600: 55 54 20 4D 41 49 4E 20  53 43 52 45 45 4E 0D 20  |UT MAIN SCREEN. |
00000610: 20 20 20 20 20 20 20 20  4C 44 41 20 23 31 36 30  |        LDA #160|
00000620: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 54 49  |.         STA TI|
00000630: 4D 33 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |M3.         LDA |
00000640: 23 30 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |#0.         STA |
00000650: 24 44 30 31 42 0D 20 20  20 20 20 20 20 20 20 4C  |$D01B.         L|
00000660: 44 41 20 23 35 30 0D 20  20 20 20 20 20 20 20 20  |DA #50.         |
00000670: 53 54 41 20 52 43 4E 54  0D 20 20 20 20 20 20 20  |STA RCNT.       |
00000680: 20 20 4A 53 52 20 53 54  41 52 53 20 20 3B 54 48  |  JSR STARS  ;TH|
00000690: 52 4F 57 20 53 4F 4D 45  20 53 54 41 52 53 20 49  |ROW SOME STARS I|
000006A0: 4E 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 47  |N.         LDA G|
000006B0: 58 0D 20 20 20 20 20 20  20 20 20 43 4D 50 20 23  |X.         CMP #|
000006C0: 31 0D 20 20 20 20 20 20  20 20 20 42 43 43 20 56  |1.         BCC V|
000006D0: 4F 49 31 0D 20 20 20 20  20 20 20 20 20 43 4D 50  |OI1.         CMP|
000006E0: 20 23 39 0D 20 20 20 20  20 20 20 20 20 42 43 53  | #9.         BCS|
000006F0: 20 56 4F 49 31 0D 20 20  20 20 20 20 20 20 20 4C  | VOI1.         L|
00000700: 44 41 20 47 59 0D 20 20  20 20 20 20 20 20 20 43  |DA GY.         C|
00000710: 4D 50 20 23 31 0D 20 20  20 20 20 20 20 20 20 42  |MP #1.         B|
00000720: 43 43 20 56 4F 49 31 0D  20 20 20 20 20 20 20 20  |CC VOI1.        |
00000730: 20 43 4D 50 20 23 31 30  0D 20 20 20 20 20 20 20  | CMP #10.       |
00000740: 20 20 42 43 53 20 56 4F  49 31 0D 20 20 20 20 20  |  BCS VOI1.     |
00000750: 20 20 20 20 4A 4D 50 20  56 43 4F 4E 54 0D 56 4F  |    JMP VCONT.VO|
00000760: 49 31 20 20 20 20 20 4C  44 41 20 23 31 20 20 20  |I1     LDA #1   |
00000770: 20 20 3B 41 52 45 20 59  4F 55 20 49 4E 20 54 48  |  ;ARE YOU IN TH|
00000780: 45 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 43  |E.         STA C|
00000790: 4F 44 20 20 20 20 3B 56  4F 49 44 3F 0D 20 20 20  |OD    ;VOID?.   |
000007A0: 20 20 20 20 20 20 4A 4D  50 20 44 45 41 44 0D 56  |      JMP DEAD.V|
000007B0: 43 4F 4E 54 20 20 20 20  4C 44 58 20 23 30 0D 56  |CONT    LDX #0.V|
000007C0: 43 4F 20 20 20 20 20 20  4C 44 59 20 52 4E 44 58  |CO      LDY RNDX|
000007D0: 0D 20 20 20 20 20 20 20  20 20 4C 44 41 20 24 36  |.         LDA $6|
000007E0: 30 30 30 2C 59 0D 20 20  20 20 20 20 20 20 20 43  |000,Y.         C|
000007F0: 4C 43 0D 20 20 20 20 20  20 20 20 20 41 44 43 20  |LC.         ADC |
00000800: 23 31 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |#1.         STA |
00000810: 52 58 2C 58 0D 20 20 20  20 20 20 20 20 20 49 4E  |RX,X.         IN|
00000820: 43 20 52 4E 44 58 0D 20  20 20 20 20 20 20 20 20  |C RNDX.         |
00000830: 49 4E 58 0D 20 20 20 20  20 20 20 20 20 43 50 58  |INX.         CPX|
00000840: 20 23 32 0D 20 20 20 20  20 20 20 20 20 42 4E 45  | #2.         BNE|
00000850: 20 56 43 4F 0D 20 20 20  20 20 20 20 20 20 4C 44  | VCO.         LD|
00000860: 58 20 47 58 0D 20 20 20  20 20 20 20 20 20 4C 44  |X GX.         LD|
00000870: 41 20 4D 54 41 42 2C 58  0D 20 20 20 20 20 20 20  |A MTAB,X.       |
00000880: 20 20 43 4C 43 0D 20 20  20 20 20 20 20 20 20 41  |  CLC.         A|
00000890: 44 43 20 47 59 0D 20 20  20 20 20 20 20 20 20 53  |DC GY.         S|
000008A0: 54 41 20 54 45 4D 50 32  0D 20 20 20 20 20 20 20  |TA TEMP2.       |
000008B0: 20 20 54 41 58 0D 20 20  20 20 20 20 20 20 20 4C  |  TAX.         L|
000008C0: 44 41 20 47 41 4C 54 41  42 2C 58 0D 20 20 20 20  |DA GALTAB,X.    |
000008D0: 20 20 20 20 20 41 4E 44  20 23 33 0D 20 20 20 20  |     AND #3.    |
000008E0: 20 20 20 20 20 53 54 41  20 4E 4F 4B 31 0D 20 20  |     STA NOK1.  |
000008F0: 20 20 20 20 20 20 20 42  45 51 20 50 4E 55 30 0D  |       BEQ PNU0.|
00000900: 20 20 20 20 20 20 20 20  20 41 53 4C 20 41 0D 20  |         ASL A. |
00000910: 20 20 20 20 20 20 20 20  53 54 41 20 54 45 4D 50  |        STA TEMP|
00000920: 31 0D 20 20 20 20 20 20  20 20 20 4C 44 58 20 23  |1.         LDX #|
00000930: 30 0D 50 4E 55 4D 20 20  20 20 20 4C 44 59 20 52  |0.PNUM     LDY R|
00000940: 4E 44 58 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |NDX.         LDA|
00000950: 20 24 36 30 30 30 2C 59  0D 20 20 20 20 20 20 20  | $6000,Y.       |
00000960: 20 20 43 4C 43 0D 20 20  20 20 20 20 20 20 20 41  |  CLC.         A|
00000970: 44 43 20 23 31 0D 20 20  20 20 20 20 20 20 20 53  |DC #1.         S|
00000980: 54 41 20 58 31 2C 58 0D  20 20 20 20 20 20 20 20  |TA X1,X.        |
00000990: 20 49 4E 43 20 52 4E 44  58 0D 20 20 20 20 20 20  | INC RNDX.      |
000009A0: 20 20 20 49 4E 58 0D 20  20 20 20 20 20 20 20 20  |   INX.         |
000009B0: 43 50 58 20 54 45 4D 50  31 0D 20 20 20 20 20 20  |CPX TEMP1.      |
000009C0: 20 20 20 42 4E 45 20 50  4E 55 4D 0D 20 20 20 20  |   BNE PNUM.    |
000009D0: 20 20 20 20 20 4A 53 52  20 43 48 4B 49 54 20 20  |     JSR CHKIT  |
000009E0: 3B 4B 4C 49 4E 47 4F 4E  20 41 54 54 41 43 4B 3F  |;KLINGON ATTACK?|
000009F0: 0D 20 20 20 20 20 20 20  20 20 4C 44 41 20 42 54  |.         LDA BT|
00000A00: 54 0D 20 20 20 20 20 20  20 20 20 42 45 51 20 50  |T.         BEQ P|
00000A10: 4E 55 30 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |NU0.         LDA|
00000A20: 20 4E 4F 4B 31 0D 20 20  20 20 20 20 20 20 20 43  | NOK1.         C|
00000A30: 4D 50 20 23 33 0D 20 20  20 20 20 20 20 20 20 42  |MP #3.         B|
00000A40: 4E 45 20 50 4E 55 55 0D  20 20 20 20 20 20 20 20  |NE PNUU.        |
00000A50: 20 4C 44 41 20 23 32 0D  20 20 20 20 20 20 20 20  | LDA #2.        |
00000A60: 20 53 54 41 20 42 54 54  0D 50 4E 55 55 20 20 20  | STA BTT.PNUU   |
00000A70: 20 20 4C 44 41 20 23 3C  4C 4E 39 0D 20 20 20 20  |  LDA #<LN9.    |
00000A80: 20 20 20 20 20 53 54 41  20 31 37 34 0D 20 20 20  |     STA 174.   |
00000A90: 20 20 20 20 20 20 4C 44  41 20 23 3E 4C 4E 39 0D  |      LDA #>LN9.|
00000AA0: 20 20 20 20 20 20 20 20  20 53 54 41 20 31 37 35  |         STA 175|
00000AB0: 0D 20 20 20 20 20 20 20  20 20 4A 53 52 20 41 4C  |.         JSR AL|
00000AC0: 45 52 54 0D 20 20 20 20  20 20 20 20 20 4A 4D 50  |ERT.         JMP|
00000AD0: 20 52 44 41 4C 0D 50 4E  55 30 20 20 20 20 20 4C  | RDAL.PNU0     L|
00000AE0: 44 58 20 54 45 4D 50 32  0D 20 20 20 20 20 20 20  |DX TEMP2.       |
00000AF0: 20 20 4C 44 41 20 47 41  4C 54 41 42 2C 58 0D 20  |  LDA GALTAB,X. |
00000B00: 20 20 20 20 20 20 20 20  41 4E 44 20 23 38 0D 20  |        AND #8. |
00000B10: 20 20 20 20 20 20 20 20  42 45 51 20 50 4E 55 31  |        BEQ PNU1|
00000B20: 0D 20 20 20 20 20 20 20  20 20 4C 44 41 20 53 58  |.         LDA SX|
00000B30: 0D 20 20 20 20 20 20 20  20 20 43 4D 50 20 52 58  |.         CMP RX|
00000B40: 0D 20 20 20 20 20 20 20  20 20 42 4E 45 20 50 4E  |.         BNE PN|
00000B50: 55 31 0D 20 20 20 20 20  20 20 20 20 4A 4D 50 20  |U1.         JMP |
00000B60: 52 49 46 54 20 20 20 20  20 3B 54 45 4D 50 4F 52  |RIFT     ;TEMPOR|
00000B70: 41 4C 20 52 49 46 54 0D  50 4E 55 31 20 20 20 20  |AL RIFT.PNU1    |
00000B80: 20 4C 44 41 20 54 45 4D  50 32 0D 20 20 20 20 20  | LDA TEMP2.     |
00000B90: 20 20 20 20 4C 44 41 20  47 41 4C 54 41 42 2C 58  |    LDA GALTAB,X|
00000BA0: 0D 20 20 20 20 20 20 20  20 20 41 4E 44 20 23 31  |.         AND #1|
00000BB0: 36 0D 20 20 20 20 20 20  20 20 20 42 45 51 20 50  |6.         BEQ P|
00000BC0: 4E 55 32 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |NU2.         LDA|
00000BD0: 20 53 58 0D 20 20 20 20  20 20 20 20 20 43 4D 50  | SX.         CMP|
00000BE0: 20 49 58 0D 20 20 20 20  20 20 20 20 20 42 4E 45  | IX.         BNE|
00000BF0: 20 50 4E 55 32 0D 20 20  20 20 20 20 20 20 20 4A  | PNU2.         J|
00000C00: 4D 50 20 53 54 4F 52 4D  20 20 20 20 3B 49 4F 4E  |MP STORM    ;ION|
00000C10: 20 53 54 4F 52 4D 0D 50  4E 55 32 20 20 20 20 20  | STORM.PNU2     |
00000C20: 4C 44 41 20 53 58 0D 20  20 20 20 20 20 20 20 20  |LDA SX.         |
00000C30: 43 4D 50 20 23 34 0D 20  20 20 20 20 20 20 20 20  |CMP #4.         |
00000C40: 42 4E 45 20 50 4E 55 33  0D 20 20 20 20 20 20 20  |BNE PNU3.       |
00000C50: 20 20 4C 44 41 20 53 59  0D 20 20 20 20 20 20 20  |  LDA SY.       |
00000C60: 20 20 43 4D 50 20 23 34  0D 50 4E 55 33 20 20 20  |  CMP #4.PNU3   |
00000C70: 20 20 42 4E 45 20 43 53  42 37 0D 20 20 20 20 20  |  BNE CSB7.     |
00000C80: 20 20 20 20 4C 44 41 20  47 58 0D 20 20 20 20 20  |    LDA GX.     |
00000C90: 20 20 20 20 43 4D 50 20  23 31 0D 20 20 20 20 20  |    CMP #1.     |
00000CA0: 20 20 20 20 42 4E 45 20  43 53 42 34 0D 20 20 20  |    BNE CSB4.   |
00000CB0: 20 20 20 20 20 20 4C 44  41 20 47 59 0D 20 20 20  |      LDA GY.   |
00000CC0: 20 20 20 20 20 20 43 4D  50 20 23 31 0D 20 20 20  |      CMP #1.   |
00000CD0: 20 20 20 20 20 20 42 4E  45 20 43 53 42 34 0D 20  |      BNE CSB4. |
00000CE0: 20 20 20 20 20 20 20 20  42 45 51 20 43 53 42 36  |        BEQ CSB6|
00000CF0: 0D 43 53 42 34 20 20 20  20 20 4C 44 41 20 47 58  |.CSB4     LDA GX|
00000D00: 0D 20 20 20 20 20 20 20  20 20 43 4D 50 20 23 34  |.         CMP #4|
00000D10: 0D 20 20 20 20 20 20 20  20 20 42 4E 45 20 43 53  |.         BNE CS|
00000D20: 42 35 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |B5.         LDA |
00000D30: 47 59 0D 20 20 20 20 20  20 20 20 20 43 4D 50 20  |GY.         CMP |
00000D40: 53 42 32 59 0D 20 20 20  20 20 20 20 20 20 42 4E  |SB2Y.         BN|
00000D50: 45 20 43 53 42 35 0D 20  20 20 20 20 20 20 20 20  |E CSB5.         |
00000D60: 42 45 51 20 43 53 42 36  0D 43 53 42 35 20 20 20  |BEQ CSB6.CSB5   |
00000D70: 20 20 4C 44 41 20 47 58  20 20 20 20 20 3B 44 4F  |  LDA GX     ;DO|
00000D80: 43 4B 45 44 20 40 20 53  54 41 52 42 41 53 45 3F  |CKED @ STARBASE?|
00000D90: 0D 20 20 20 20 20 20 20  20 20 43 4D 50 20 23 37  |.         CMP #7|
00000DA0: 0D 20 20 20 20 20 20 20  20 20 42 4E 45 20 43 53  |.         BNE CS|
00000DB0: 42 37 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |B7.         LDA |
00000DC0: 47 59 0D 20 20 20 20 20  20 20 20 20 43 4D 50 20  |GY.         CMP |
00000DD0: 53 42 33 59 0D 20 20 20  20 20 20 20 20 20 42 4E  |SB3Y.         BN|
00000DE0: 45 20 43 53 42 37 0D 43  53 42 36 20 20 20 20 20  |E CSB7.CSB6     |
00000DF0: 4C 44 41 20 23 32 30 31  0D 20 20 20 20 20 20 20  |LDA #201.       |
00000E00: 20 20 53 54 41 20 24 30  37 46 44 0D 20 20 20 20  |  STA $07FD.    |
00000E10: 20 20 20 20 20 4C 44 41  20 23 31 36 30 0D 20 20  |     LDA #160.  |
00000E20: 20 20 20 20 20 20 20 53  54 41 20 24 44 30 30 41  |       STA $D00A|
00000E30: 0D 20 20 20 20 20 20 20  20 20 4C 44 41 20 23 31  |.         LDA #1|
00000E40: 31 38 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |18.         STA |
00000E50: 24 44 30 30 42 0D 20 20  20 20 20 20 20 20 20 4C  |$D00B.         L|
00000E60: 44 41 20 23 33 32 0D 20  20 20 20 20 20 20 20 20  |DA #32.         |
00000E70: 53 54 41 20 24 44 30 31  37 0D 20 20 20 20 20 20  |STA $D017.      |
00000E80: 20 20 20 53 54 41 20 24  44 30 31 44 0D 20 20 20  |   STA $D01D.   |
00000E90: 20 20 20 20 20 20 4C 44  41 20 24 44 30 31 35 0D  |      LDA $D015.|
00000EA0: 20 20 20 20 20 20 20 20  20 4F 52 41 20 23 33 32  |         ORA #32|
00000EB0: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 24 44  |.         STA $D|
00000EC0: 30 31 35 0D 20 20 20 20  20 20 20 20 20 4A 53 52  |015.         JSR|
00000ED0: 20 4D 45 54 45 52 0D 20  20 20 20 20 20 20 20 20  | METER.         |
00000EE0: 4C 44 41 20 23 32 34 0D  20 20 20 20 20 20 20 20  |LDA #24.        |
00000EF0: 20 53 54 41 20 54 49 4D  33 0D 4C 56 4C 20 20 20  | STA TIM3.LVL   |
00000F00: 20 20 20 4A 53 52 20 54  49 4D 45 52 0D 20 20 20  |   JSR TIMER.   |
00000F10: 20 20 20 20 20 20 4C 44  41 20 50 4C 45 56 0D 20  |      LDA PLEV. |
00000F20: 20 20 20 20 20 20 20 20  43 4D 50 20 23 32 33 0D  |        CMP #23.|
00000F30: 20 20 20 20 20 20 20 20  20 42 45 51 20 4C 56 4C  |         BEQ LVL|
00000F40: 30 0D 20 20 20 20 20 20  20 20 20 49 4E 43 20 50  |0.         INC P|
00000F50: 4C 45 56 0D 20 20 20 20  20 20 20 20 20 4A 53 52  |LEV.         JSR|
00000F60: 20 4C 45 56 50 0D 20 20  20 20 20 20 20 20 20 4A  | LEVP.         J|
00000F70: 4D 50 20 4C 56 4C 0D 4C  56 4C 30 20 20 20 20 20  |MP LVL.LVL0     |
00000F80: 4A 53 52 20 54 49 4D 45  52 0D 20 20 20 20 20 20  |JSR TIMER.      |
00000F90: 20 20 20 4C 44 41 20 53  4C 45 56 0D 20 20 20 20  |   LDA SLEV.    |
00000FA0: 20 20 20 20 20 43 4D 50  20 23 32 33 0D 20 20 20  |     CMP #23.   |
00000FB0: 20 20 20 20 20 20 42 45  51 20 43 53 42 37 0D 20  |      BEQ CSB7. |
00000FC0: 20 20 20 20 20 20 20 20  49 4E 43 20 53 4C 45 56  |        INC SLEV|
00000FD0: 0D 20 20 20 20 20 20 20  20 20 4A 53 52 20 4C 45  |.         JSR LE|
00000FE0: 56 53 0D 20 20 20 20 20  20 20 20 20 4A 4D 50 20  |VS.         JMP |
00000FF0: 4C 56 4C 30 0D 43 53 42  37 20 20 20 20 20 4C 44  |LVL0.CSB7     LD|
00001000: 41 20 23 31 36 30 0D 20  20 20 20 20 20 20 20 20  |A #160.         |
00001010: 53 54 41 20 54 49 4D 33  0D 20 20 20 20 20 20 20  |STA TIM3.       |
00001020: 20 20 4A 53 52 20 54 49  4D 45 52 0D 20 20 20 20  |  JSR TIMER.    |
00001030: 20 20 20 20 20 4C 44 41  20 23 34 30 0D 20 20 20  |     LDA #40.   |
00001040: 20 20 20 20 20 20 53 54  41 20 54 49 4D 33 0D 20  |      STA TIM3. |
00001050: 20 20 20 20 20 20 20 20  4C 44 41 20 23 31 34 0D  |        LDA #14.|
00001060: 20 20 20 20 20 20 20 20  20 53 54 41 20 4A 4F 59  |         STA JOY|
00001070: 32 0D 20 20 20 20 20 20  20 20 20 4C 44 59 20 23  |2.         LDY #|
00001080: 30 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 23  |0.         LDA #|
00001090: 24 34 39 0D 20 20 20 20  20 20 20 20 20 53 54 41  |$49.         STA|
000010A0: 20 32 30 0D 20 20 20 20  20 20 20 20 20 4C 44 41  | 20.         LDA|
000010B0: 20 23 24 30 37 0D 20 20  20 20 20 20 20 20 20 53  | #$07.         S|
000010C0: 54 41 20 32 31 0D 20 20  20 20 20 20 20 20 20 4A  |TA 21.         J|
000010D0: 53 52 20 54 47 31 0D 51  55 45 32 20 20 20 20 20  |SR TG1.QUE2     |
000010E0: 4C 44 41 20 24 44 43 30  30 20 20 3B 57 48 41 44  |LDA $DC00  ;WHAD|
000010F0: 59 41 20 57 41 4E 4E 41  20 44 4F 3F 0D 20 20 20  |YA WANNA DO?.   |
00001100: 20 20 20 20 20 20 41 4E  44 20 23 31 36 0D 20 20  |      AND #16.  |
00001110: 20 20 20 20 20 20 20 42  4E 45 20 51 54 30 0D 20  |       BNE QT0. |
00001120: 20 20 20 20 20 20 20 20  4A 53 52 20 42 42 45 45  |        JSR BBEE|
00001130: 50 0D 20 20 20 20 20 20  20 20 20 4A 4D 50 20 54  |P.         JMP T|
00001140: 41 53 4B 31 0D 51 54 30  20 20 20 20 20 20 4A 53  |ASK1.QT0      JS|
00001150: 52 20 54 49 4D 45 52 0D  20 20 20 20 20 20 20 20  |R TIMER.        |
00001160: 20 4C 44 41 20 24 44 43  30 30 0D 20 20 20 20 20  | LDA $DC00.     |
00001170: 20 20 20 20 41 4E 44 20  23 31 35 0D 20 20 20 20  |    AND #15.    |
00001180: 20 20 20 20 20 43 4D 50  20 23 31 35 0D 20 20 20  |     CMP #15.   |
00001190: 20 20 20 20 20 20 42 45  51 20 51 55 45 32 0D 20  |      BEQ QUE2. |
000011A0: 20 20 20 20 20 20 20 20  43 4D 50 20 23 31 33 0D  |        CMP #13.|
000011B0: 20 20 20 20 20 20 20 20  20 42 4E 45 20 51 54 30  |         BNE QT0|
000011C0: 30 0D 20 20 20 20 20 20  20 20 20 43 4D 50 20 4A  |0.         CMP J|
000011D0: 4F 59 32 0D 20 20 20 20  20 20 20 20 20 42 45 51  |OY2.         BEQ|
000011E0: 20 51 55 45 32 0D 20 20  20 20 20 20 20 20 20 53  | QUE2.         S|
000011F0: 54 41 20 4A 4F 59 32 0D  20 20 20 20 20 20 20 20  |TA JOY2.        |
00001200: 20 4A 53 52 20 54 47 31  0D 20 20 20 20 20 20 20  | JSR TG1.       |
00001210: 20 20 43 4C 43 0D 20 20  20 20 20 20 20 20 20 4C  |  CLC.         L|
00001220: 44 41 20 32 30 0D 20 20  20 20 20 20 20 20 20 41  |DA 20.         A|
00001230: 44 43 20 23 34 30 0D 20  20 20 20 20 20 20 20 20  |DC #40.         |
00001240: 53 54 41 20 32 30 0D 20  20 20 20 20 20 20 20 20  |STA 20.         |
00001250: 4A 53 52 20 54 47 31 0D  20 20 20 20 20 20 20 20  |JSR TG1.        |
00001260: 20 4A 4D 50 20 51 55 45  32 0D 51 54 30 30 20 20  | JMP QUE2.QT00  |
00001270: 20 20 20 43 4D 50 20 23  31 34 0D 20 20 20 20 20  |   CMP #14.     |
00001280: 20 20 20 20 42 4E 45 20  51 54 31 0D 20 20 20 20  |    BNE QT1.    |
00001290: 20 20 20 20 20 43 4D 50  20 4A 4F 59 32 0D 20 20  |     CMP JOY2.  |
000012A0: 20 20 20 20 20 20 20 42  45 51 20 51 55 45 32 0D  |       BEQ QUE2.|
000012B0: 20 20 20 20 20 20 20 20  20 53 54 41 20 4A 4F 59  |         STA JOY|
000012C0: 32 0D 20 20 20 20 20 20  20 20 20 4A 53 52 20 54  |2.         JSR T|
000012D0: 47 31 0D 20 20 20 20 20  20 20 20 20 53 45 43 0D  |G1.         SEC.|
000012E0: 20 20 20 20 20 20 20 20  20 4C 44 41 20 32 30 0D  |         LDA 20.|
000012F0: 20 20 20 20 20 20 20 20  20 53 42 43 20 23 34 30  |         SBC #40|
00001300: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 32 30  |.         STA 20|
00001310: 0D 20 20 20 20 20 20 20  20 20 4A 53 52 20 54 47  |.         JSR TG|
00001320: 31 0D 20 20 20 20 20 20  20 20 20 4A 4D 50 20 51  |1.         JMP Q|
00001330: 55 45 32 0D 51 54 31 20  20 20 20 20 20 43 4D 50  |UE2.QT1      CMP|
00001340: 20 23 37 0D 20 20 20 20  20 20 20 20 20 42 4E 45  | #7.         BNE|
00001350: 20 51 54 32 0D 20 20 20  20 20 20 20 20 20 43 50  | QT2.         CP|
00001360: 59 20 23 32 37 0D 20 20  20 20 20 20 20 20 20 42  |Y #27.         B|
00001370: 45 51 20 51 54 30 0D 20  20 20 20 20 20 20 20 20  |EQ QT0.         |
00001380: 43 50 59 20 23 31 34 0D  20 20 20 20 20 20 20 20  |CPY #14.        |
00001390: 20 42 4E 45 20 51 54 31  31 0D 20 20 20 20 20 20  | BNE QT11.      |
000013A0: 20 20 20 4A 53 52 20 54  47 31 0D 20 20 20 20 20  |   JSR TG1.     |
000013B0: 20 20 20 20 4C 44 59 20  23 32 37 0D 20 20 20 20  |    LDY #27.    |
000013C0: 20 20 20 20 20 4A 53 52  20 54 47 31 0D 20 20 20  |     JSR TG1.   |
000013D0: 20 20 20 20 20 20 4A 4D  50 20 51 55 45 32 0D 51  |      JMP QUE2.Q|
000013E0: 54 31 31 20 20 20 20 20  4A 53 52 20 54 47 31 0D  |T11     JSR TG1.|
000013F0: 20 20 20 20 20 20 20 20  20 4C 44 59 20 23 31 34  |         LDY #14|
00001400: 0D 20 20 20 20 20 20 20  20 20 4A 53 52 20 54 47  |.         JSR TG|
00001410: 31 0D 20 20 20 20 20 20  20 20 20 4A 4D 50 20 51  |1.         JMP Q|
00001420: 55 45 32 0D 51 54 32 20  20 20 20 20 20 43 4D 50  |UE2.QT2      CMP|
00001430: 20 23 31 31 0D 20 20 20  20 20 20 20 20 20 42 4E  | #11.         BN|
00001440: 45 20 51 54 30 0D 20 20  20 20 20 20 20 20 20 43  |E QT0.         C|
00001450: 50 59 20 23 30 0D 20 20  20 20 20 20 20 20 20 42  |PY #0.         B|
00001460: 45 51 20 51 54 30 0D 20  20 20 20 20 20 20 20 20  |EQ QT0.         |
00001470: 43 50 59 20 23 31 34 0D  20 20 20 20 20 20 20 20  |CPY #14.        |
00001480: 20 42 4E 45 20 51 54 32  32 0D 20 20 20 20 20 20  | BNE QT22.      |
00001490: 20 20 20 4A 53 52 20 54  47 31 0D 20 20 20 20 20  |   JSR TG1.     |
000014A0: 20 20 20 20 4C 44 59 20  23 30 0D 20 20 20 20 20  |    LDY #0.     |
000014B0: 20 20 20 20 4A 53 52 20  54 47 31 0D 20 20 20 20  |    JSR TG1.    |
000014C0: 20 20 20 20 20 4A 4D 50  20 51 55 45 32 0D 51 54  |     JMP QUE2.QT|
000014D0: 32 32 20 20 20 20 20 4A  53 52 20 54 47 31 0D 20  |22     JSR TG1. |
000014E0: 20 20 20 20 20 20 20 20  4C 44 59 20 23 31 34 0D  |        LDY #14.|
000014F0: 20 20 20 20 20 20 20 20  20 4A 53 52 20 54 47 31  |         JSR TG1|
00001500: 0D 20 20 20 20 20 20 20  20 20 4A 4D 50 20 51 55  |.         JMP QU|
00001510: 45 32 0D 54 47 31 20 20  20 20 20 20 53 54 59 20  |E2.TG1      STY |
00001520: 53 54 52 59 0D 20 20 20  20 20 20 20 20 20 4C 44  |STRY.         LD|
00001530: 58 20 23 31 32 0D 54 47  32 20 20 20 20 20 20 4C  |X #12.TG2      L|
00001540: 44 41 20 28 32 30 29 2C  59 0D 20 20 20 20 20 20  |DA (20),Y.      |
00001550: 20 20 20 43 4C 43 0D 20  20 20 20 20 20 20 20 20  |   CLC.         |
00001560: 41 44 43 20 23 31 32 38  0D 20 20 20 20 20 20 20  |ADC #128.       |
00001570: 20 20 53 54 41 20 28 32  30 29 2C 59 0D 20 20 20  |  STA (20),Y.   |
00001580: 20 20 20 20 20 20 49 4E  59 0D 20 20 20 20 20 20  |      INY.      |
00001590: 20 20 20 44 45 58 0D 20  20 20 20 20 20 20 20 20  |   DEX.         |
000015A0: 42 4E 45 20 54 47 32 0D  20 20 20 20 20 20 20 20  |BNE TG2.        |
000015B0: 20 4C 44 59 20 53 54 52  59 0D 20 20 20 20 20 20  | LDY STRY.      |
000015C0: 20 20 20 52 54 53 0D 54  41 53 4B 31 20 20 20 20  |   RTS.TASK1    |
000015D0: 4C 44 41 20 23 30 20 20  20 20 20 20 3B 54 41 53  |LDA #0      ;TAS|
000015E0: 4B 31 3D 50 41 55 53 45  0D 20 20 20 20 20 20 20  |K1=PAUSE.       |
000015F0: 20 20 53 54 41 20 24 44  30 31 35 0D 20 20 20 20  |  STA $D015.    |
00001600: 20 20 20 20 20 53 54 41  20 24 44 30 31 37 0D 20  |     STA $D017. |
00001610: 20 20 20 20 20 20 20 20  53 54 41 20 24 44 30 31  |        STA $D01|
00001620: 44 0D 20 20 20 20 20 20  20 20 20 43 50 59 20 23  |D.         CPY #|
00001630: 31 34 0D 20 20 20 20 20  20 20 20 20 42 4E 45 20  |14.         BNE |
00001640: 54 4B 31 0D 20 20 20 20  20 20 20 20 20 49 4E 43  |TK1.         INC|
00001650: 20 53 54 4F 50 0D 20 20  20 20 20 20 20 20 20 4A  | STOP.         J|
00001660: 53 52 20 45 52 41 53 45  0D 20 20 20 20 20 20 20  |SR ERASE.       |
00001670: 20 20 4C 44 41 20 23 3C  4C 4E 32 31 0D 20 20 20  |  LDA #<LN21.   |
00001680: 20 20 20 20 20 20 53 54  41 20 31 37 34 0D 20 20  |      STA 174.  |
00001690: 20 20 20 20 20 20 20 4C  44 41 20 23 3E 4C 4E 32  |       LDA #>LN2|
000016A0: 31 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 31  |1.         STA 1|
000016B0: 37 35 0D 20 20 20 20 20  20 20 20 20 4A 53 52 20  |75.         JSR |
000016C0: 50 55 54 4C 4E 0D 20 20  20 20 20 20 20 20 20 4A  |PUTLN.         J|
000016D0: 53 52 20 4C 57 41 49 54  0D 4D 4F 52 20 20 20 20  |SR LWAIT.MOR    |
000016E0: 20 20 4C 44 41 20 24 44  43 30 30 0D 20 20 20 20  |  LDA $DC00.    |
000016F0: 20 20 20 20 20 41 4E 44  20 23 31 36 0D 20 20 20  |     AND #16.   |
00001700: 20 20 20 20 20 20 42 4E  45 20 4D 4F 52 0D 20 20  |      BNE MOR.  |
00001710: 20 20 20 20 20 20 20 4C  44 41 20 23 30 0D 20 20  |       LDA #0.  |
00001720: 20 20 20 20 20 20 20 53  54 41 20 53 54 4F 50 0D  |       STA STOP.|
00001730: 20 20 20 20 20 20 20 20  20 4A 4D 50 20 47 53 54  |         JMP GST|
00001740: 41 52 54 0D 0D 54 4B 31  20 20 20 20 20 20 4C 44  |ART..TK1      LD|
00001750: 41 20 4A 4F 59 32 0D 20  20 20 20 20 20 20 20 20  |A JOY2.         |
00001760: 43 4D 50 20 23 31 34 0D  20 20 20 20 20 20 20 20  |CMP #14.        |
00001770: 20 42 4E 45 20 54 4B 34  0D 20 20 20 20 20 20 20  | BNE TK4.       |
00001780: 20 20 43 50 59 20 23 32  37 0D 20 20 20 20 20 20  |  CPY #27.      |
00001790: 20 20 20 42 4E 45 20 54  4B 32 0D 20 20 20 20 20  |   BNE TK2.     |
000017A0: 20 20 20 20 4A 4D 50 20  53 48 4F 52 54 20 20 3B  |    JMP SHORT  ;|
000017B0: 54 41 53 4B 32 3D 53 48  4F 52 54 20 53 43 41 4E  |TASK2=SHORT SCAN|
000017C0: 0D 54 4B 32 20 20 20 20  20 20 4A 4D 50 20 4E 41  |.TK2      JMP NA|
000017D0: 56 20 20 20 20 3B 54 41  53 4B 35 3D 4E 41 56 49  |V    ;TASK5=NAVI|
000017E0: 47 41 54 49 4F 4E 0D 54  4B 34 20 20 20 20 20 20  |GATION.TK4      |
000017F0: 43 50 59 20 23 32 37 0D  20 20 20 20 20 20 20 20  |CPY #27.        |
00001800: 20 42 4E 45 20 53 54 41  54 0D 20 20 20 20 20 20  | BNE STAT.      |
00001810: 20 20 20 4A 4D 50 20 4C  4F 4E 47 20 20 20 3B 54  |   JMP LONG   ;T|
00001820: 41 53 4B 33 3D 4C 4F 4E  47 20 53 43 41 4E 0D 53  |ASK3=LONG SCAN.S|
00001830: 54 41 54 20 20 20 20 20  4A 53 52 20 4D 45 54 45  |TAT     JSR METE|
00001840: 52 20 20 3B 54 41 53 4B  34 3D 53 54 41 54 55 53  |R  ;TASK4=STATUS|
00001850: 0D 20 20 20 20 20 20 20  20 20 4A 53 52 20 4C 57  |.         JSR LW|
00001860: 41 49 54 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |AIT.         LDA|
00001870: 20 23 30 0D 20 20 20 20  20 20 20 20 20 53 54 41  | #0.         STA|
00001880: 20 24 44 30 31 35 0D 20  20 20 20 20 20 20 20 20  | $D015.         |
00001890: 4A 4D 50 20 47 53 54 41  52 54 0D 0D 4E 41 56 20  |JMP GSTART..NAV |
000018A0: 20 20 20 20 20 4C 44 41  20 23 24 34 38 20 20 3B  |     LDA #$48  ;|
000018B0: 4C 45 54 53 20 47 45 54  20 4F 55 54 54 41 20 48  |LETS GET OUTTA H|
000018C0: 45 52 45 0D 20 20 20 20  20 20 20 20 20 53 54 41  |ERE.         STA|
000018D0: 20 32 35 32 0D 20 20 20  20 20 20 20 20 20 4C 44  | 252.         LD|
000018E0: 41 20 23 24 34 43 0D 20  20 20 20 20 20 20 20 20  |A #$4C.         |
000018F0: 53 54 41 20 31 37 35 0D  20 20 20 20 20 20 20 20  |STA 175.        |
00001900: 20 4A 53 52 20 50 49 43  0D 20 20 20 20 20 20 20  | JSR PIC.       |
00001910: 20 20 4C 44 41 20 23 33  35 0D 20 20 20 20 20 20  |  LDA #35.      |
00001920: 20 20 20 53 54 41 20 52  43 4E 54 0D 20 20 20 20  |   STA RCNT.    |
00001930: 20 20 20 20 20 4A 53 52  20 53 54 41 52 53 0D 20  |     JSR STARS. |
00001940: 20 20 20 20 20 20 20 20  4C 44 58 20 53 58 0D 20  |        LDX SX. |
00001950: 20 20 20 20 20 20 20 20  4C 44 41 20 53 45 4E 54  |        LDA SENT|
00001960: 58 2C 58 0D 20 20 20 20  20 20 20 20 20 53 54 41  |X,X.         STA|
00001970: 20 24 44 30 30 31 0D 20  20 20 20 20 20 20 20 20  | $D001.         |
00001980: 4C 44 58 20 53 59 0D 20  20 20 20 20 20 20 20 20  |LDX SY.         |
00001990: 4C 44 41 20 53 45 4E 54  59 2C 58 0D 20 20 20 20  |LDA SENTY,X.    |
000019A0: 20 20 20 20 20 53 54 41  20 24 44 30 30 30 0D 20  |     STA $D000. |
000019B0: 20 20 20 20 20 20 20 20  4A 53 52 20 4D 53 42 4F  |        JSR MSBO|
000019C0: 46 46 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |FF.         LDA |
000019D0: 53 4D 53 42 2C 58 0D 20  20 20 20 20 20 20 20 20  |SMSB,X.         |
000019E0: 42 45 51 20 4E 41 56 30  0D 20 20 20 20 20 20 20  |BEQ NAV0.       |
000019F0: 20 20 4C 44 41 20 24 44  30 31 30 0D 20 20 20 20  |  LDA $D010.    |
00001A00: 20 20 20 20 20 4F 52 41  20 23 31 0D 20 20 20 20  |     ORA #1.    |
00001A10: 20 20 20 20 20 53 54 41  20 24 44 30 31 30 0D 4E  |     STA $D010.N|
00001A20: 41 56 30 20 20 20 20 20  4C 44 41 20 24 44 30 31  |AV0     LDA $D01|
00001A30: 35 0D 20 20 20 20 20 20  20 20 20 4F 52 41 20 23  |5.         ORA #|
00001A40: 31 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 24  |1.         STA $|
00001A50: 44 30 31 35 0D 20 20 20  20 20 20 20 20 20 4C 44  |D015.         LD|
00001A60: 41 20 4E 4F 4B 31 20 20  20 20 3B 41 4E 59 20 4B  |A NOK1    ;ANY K|
00001A70: 4C 49 4E 47 4F 4E 53 3F  0D 20 20 20 20 20 20 20  |LINGONS?.       |
00001A80: 20 20 42 4E 45 20 4B 54  53 54 0D 20 20 20 20 20  |  BNE KTST.     |
00001A90: 20 20 20 20 4A 4D 50 20  4E 4F 4B 4C 0D 4B 54 53  |    JMP NOKL.KTS|
00001AA0: 54 20 20 20 20 20 43 4D  50 20 23 31 0D 20 20 20  |T     CMP #1.   |
00001AB0: 20 20 20 20 20 20 42 45  51 20 4B 4F 4E 45 0D 20  |      BEQ KONE. |
00001AC0: 20 20 20 20 20 20 20 20  43 4D 50 20 23 32 0D 20  |        CMP #2. |
00001AD0: 20 20 20 20 20 20 20 20  42 45 51 20 4B 54 57 4F  |        BEQ KTWO|
00001AE0: 0D 20 20 20 20 20 20 20  20 20 4C 44 41 20 23 32  |.         LDA #2|
00001AF0: 30 33 20 20 20 20 3B 59  45 41 48 2C 20 33 20 4F  |03    ;YEAH, 3 O|
00001B00: 46 20 45 4D 21 0D 20 20  20 20 20 20 20 20 20 53  |F EM!.         S|
00001B10: 54 41 20 24 30 37 46 42  0D 20 20 20 20 20 20 20  |TA $07FB.       |
00001B20: 20 20 4C 44 58 20 58 33  0D 20 20 20 20 20 20 20  |  LDX X3.       |
00001B30: 20 20 4C 44 41 20 53 45  4E 54 58 2C 58 0D 20 20  |  LDA SENTX,X.  |
00001B40: 20 20 20 20 20 20 20 53  54 41 20 24 44 30 30 37  |       STA $D007|
00001B50: 0D 20 20 20 20 20 20 20  20 20 4C 44 58 20 59 33  |.         LDX Y3|
00001B60: 0D 20 20 20 20 20 20 20  20 20 4C 44 41 20 53 45  |.         LDA SE|
00001B70: 4E 54 59 2C 58 0D 20 20  20 20 20 20 20 20 20 53  |NTY,X.         S|
00001B80: 54 41 20 24 44 30 30 36  0D 20 20 20 20 20 20 20  |TA $D006.       |
00001B90: 20 20 4C 44 41 20 53 4D  53 42 2C 58 0D 20 20 20  |  LDA SMSB,X.   |
00001BA0: 20 20 20 20 20 20 42 45  51 20 4A 53 54 31 0D 20  |      BEQ JST1. |
00001BB0: 20 20 20 20 20 20 20 20  4C 44 41 20 24 44 30 31  |        LDA $D01|
00001BC0: 30 0D 20 20 20 20 20 20  20 20 20 4F 52 41 20 23  |0.         ORA #|
00001BD0: 38 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 24  |8.         STA $|
00001BE0: 44 30 31 30 0D 4A 53 54  31 20 20 20 20 20 4C 44  |D010.JST1     LD|
00001BF0: 41 20 24 44 30 31 35 0D  20 20 20 20 20 20 20 20  |A $D015.        |
00001C00: 20 4F 52 41 20 23 38 0D  20 20 20 20 20 20 20 20  | ORA #8.        |
00001C10: 20 53 54 41 20 24 44 30  31 35 0D 4B 54 57 4F 20  | STA $D015.KTWO |
00001C20: 20 20 20 20 4C 44 41 20  23 32 31 33 20 20 20 20  |    LDA #213    |
00001C30: 3B 4F 4E 4C 59 20 54 57  4F 2E 2E 2E 0D 20 20 20  |;ONLY TWO....   |
00001C40: 20 20 20 20 20 20 53 54  41 20 24 30 37 46 41 0D  |      STA $07FA.|
00001C50: 20 20 20 20 20 20 20 20  20 4C 44 58 20 58 32 0D  |         LDX X2.|
00001C60: 20 20 20 20 20 20 20 20  20 4C 44 41 20 53 45 4E  |         LDA SEN|
00001C70: 54 58 2C 58 0D 20 20 20  20 20 20 20 20 20 53 54  |TX,X.         ST|
00001C80: 41 20 24 44 30 30 35 0D  20 20 20 20 20 20 20 20  |A $D005.        |
00001C90: 20 4C 44 58 20 59 32 0D  20 20 20 20 20 20 20 20  | LDX Y2.        |
00001CA0: 20 4C 44 41 20 53 45 4E  54 59 2C 58 0D 20 20 20  | LDA SENTY,X.   |
00001CB0: 20 20 20 20 20 20 53 54  41 20 24 44 30 30 34 0D  |      STA $D004.|
00001CC0: 20 20 20 20 20 20 20 20  20 4C 44 41 20 53 4D 53  |         LDA SMS|
00001CD0: 42 2C 58 0D 20 20 20 20  20 20 20 20 20 42 45 51  |B,X.         BEQ|
00001CE0: 20 4A 53 54 32 0D 20 20  20 20 20 20 20 20 20 4C  | JST2.         L|
00001CF0: 44 41 20 24 44 30 31 30  0D 20 20 20 20 20 20 20  |DA $D010.       |
00001D00: 20 20 4F 52 41 20 23 34  0D 20 20 20 20 20 20 20  |  ORA #4.       |
00001D10: 20 20 53 54 41 20 24 44  30 31 30 0D 4A 53 54 32  |  STA $D010.JST2|
00001D20: 20 20 20 20 20 4C 44 41  20 24 44 30 31 35 0D 20  |     LDA $D015. |
00001D30: 20 20 20 20 20 20 20 20  4F 52 41 20 23 34 0D 20  |        ORA #4. |
00001D40: 20 20 20 20 20 20 20 20  53 54 41 20 24 44 30 31  |        STA $D01|
00001D50: 35 0D 4B 4F 4E 45 20 20  20 20 20 4C 44 41 20 23  |5.KONE     LDA #|
00001D60: 32 30 33 0D 20 20 20 20  20 20 20 20 20 53 54 41  |203.         STA|
00001D70: 20 24 30 37 46 39 20 20  20 3B 4A 55 53 54 20 4F  | $07F9   ;JUST O|
00001D80: 4E 45 2E 0D 20 20 20 20  20 20 20 20 20 4C 44 58  |NE..         LDX|
00001D90: 20 58 31 0D 20 20 20 20  20 20 20 20 20 4C 44 41  | X1.         LDA|
00001DA0: 20 53 45 4E 54 58 2C 58  0D 20 20 20 20 20 20 20  | SENTX,X.       |
00001DB0: 20 20 53 54 41 20 24 44  30 30 33 0D 20 20 20 20  |  STA $D003.    |
00001DC0: 20 20 20 20 20 4C 44 58  20 59 31 0D 20 20 20 20  |     LDX Y1.    |
00001DD0: 20 20 20 20 20 4C 44 41  20 53 45 4E 54 59 2C 58  |     LDA SENTY,X|
00001DE0: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 24 44  |.         STA $D|
00001DF0: 30 30 32 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |002.         LDA|
00001E00: 20 53 4D 53 42 2C 58 0D  20 20 20 20 20 20 20 20  | SMSB,X.        |
00001E10: 20 42 45 51 20 4A 53 54  33 0D 20 20 20 20 20 20  | BEQ JST3.      |
00001E20: 20 20 20 4C 44 41 20 24  44 30 31 30 0D 20 20 20  |   LDA $D010.   |
00001E30: 20 20 20 20 20 20 4F 52  41 20 23 32 0D 20 20 20  |      ORA #2.   |
00001E40: 20 20 20 20 20 20 53 54  41 20 24 44 30 31 30 0D  |      STA $D010.|
00001E50: 4A 53 54 33 20 20 20 20  20 4C 44 41 20 24 44 30  |JST3     LDA $D0|
00001E60: 31 35 0D 20 20 20 20 20  20 20 20 20 4F 52 41 20  |15.         ORA |
00001E70: 23 32 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |#2.         STA |
00001E80: 24 44 30 31 35 0D 4E 4F  4B 4C 20 20 20 20 20 4C  |$D015.NOKL     L|
00001E90: 44 41 20 47 58 20 20 20  20 20 20 3B 53 54 41 52  |DA GX      ;STAR|
00001EA0: 42 41 53 45 3F 0D 20 20  20 20 20 20 20 20 20 43  |BASE?.         C|
00001EB0: 4D 50 20 23 31 0D 20 20  20 20 20 20 20 20 20 42  |MP #1.         B|
00001EC0: 4E 45 20 43 53 42 30 0D  20 20 20 20 20 20 20 20  |NE CSB0.        |
00001ED0: 20 4C 44 41 20 47 59 0D  20 20 20 20 20 20 20 20  | LDA GY.        |
00001EE0: 20 43 4D 50 20 23 31 0D  20 20 20 20 20 20 20 20  | CMP #1.        |
00001EF0: 20 42 4E 45 20 43 53 42  30 0D 20 20 20 20 20 20  | BNE CSB0.      |
00001F00: 20 20 20 4A 4D 50 20 43  53 42 32 0D 43 53 42 30  |   JMP CSB2.CSB0|
00001F10: 20 20 20 20 20 4C 44 41  20 47 58 0D 20 20 20 20  |     LDA GX.    |
00001F20: 20 20 20 20 20 43 4D 50  20 23 34 0D 20 20 20 20  |     CMP #4.    |
00001F30: 20 20 20 20 20 42 4E 45  20 43 53 42 31 0D 20 20  |     BNE CSB1.  |
00001F40: 20 20 20 20 20 20 20 4C  44 41 20 47 59 0D 20 20  |       LDA GY.  |
00001F50: 20 20 20 20 20 20 20 43  4D 50 20 53 42 32 59 0D  |       CMP SB2Y.|
00001F60: 20 20 20 20 20 20 20 20  20 42 4E 45 20 43 53 42  |         BNE CSB|
00001F70: 31 0D 20 20 20 20 20 20  20 20 20 4A 4D 50 20 43  |1.         JMP C|
00001F80: 53 42 32 0D 43 53 42 31  20 20 20 20 20 4C 44 41  |SB2.CSB1     LDA|
00001F90: 20 47 58 0D 20 20 20 20  20 20 20 20 20 43 4D 50  | GX.         CMP|
00001FA0: 20 23 37 0D 20 20 20 20  20 20 20 20 20 42 4E 45  | #7.         BNE|
00001FB0: 20 43 53 42 33 0D 20 20  20 20 20 20 20 20 20 4C  | CSB3.         L|
00001FC0: 44 41 20 47 59 0D 20 20  20 20 20 20 20 20 20 43  |DA GY.         C|
00001FD0: 4D 50 20 53 42 33 59 0D  20 20 20 20 20 20 20 20  |MP SB3Y.        |
00001FE0: 20 42 4E 45 20 43 53 42  33 0D 43 53 42 32 20 20  | BNE CSB3.CSB2  |
00001FF0: 20 20 20 4C 44 41 20 23  31 35 34 0D 20 20 20 20  |   LDA #154.    |
00002000: 20 20 20 20 20 53 54 41  20 24 44 30 30 41 0D 20  |     STA $D00A. |
00002010: 20 20 20 20 20 20 20 20  4C 44 41 20 23 31 31 36  |        LDA #116|
00002020: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 24 44  |.         STA $D|
00002030: 30 30 42 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |00B.         LDA|
00002040: 20 23 32 30 31 0D 20 20  20 20 20 20 20 20 20 53  | #201.         S|
00002050: 54 41 20 24 30 37 46 44  0D 20 20 20 20 20 20 20  |TA $07FD.       |
00002060: 20 20 4C 44 41 20 24 44  30 31 35 0D 20 20 20 20  |  LDA $D015.    |
00002070: 20 20 20 20 20 4F 52 41  20 23 33 32 0D 20 20 20  |     ORA #32.   |
00002080: 20 20 20 20 20 20 53 54  41 20 24 44 30 31 35 0D  |      STA $D015.|
00002090: 43 53 42 33 20 20 20 20  20 4A 53 52 20 4C 49 4E  |CSB3     JSR LIN|
000020A0: 45 35 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |E5.         LDA |
000020B0: 23 34 30 0D 20 20 20 20  20 20 20 20 20 53 54 41  |#40.         STA|
000020C0: 20 54 49 4D 33 0D 52 4F  54 20 20 20 20 20 20 4A  | TIM3.ROT      J|
000020D0: 53 52 20 54 49 4D 45 52  20 20 20 20 20 3B 47 45  |SR TIMER     ;GE|
000020E0: 54 20 44 49 52 2F 53 50  45 45 44 0D 20 20 20 20  |T DIR/SPEED.    |
000020F0: 20 20 20 20 20 4C 44 41  20 24 44 43 30 30 0D 20  |     LDA $DC00. |
00002100: 20 20 20 20 20 20 20 20  41 4E 44 20 23 31 35 0D  |        AND #15.|
00002110: 20 20 20 20 20 20 20 20  20 43 4D 50 20 23 31 31  |         CMP #11|
00002120: 0D 20 20 20 20 20 20 20  20 20 42 4E 45 20 52 51  |.         BNE RQ|
00002130: 30 0D 20 20 20 20 20 20  20 20 20 49 4E 43 20 24  |0.         INC $|
00002140: 30 37 35 35 0D 20 20 20  20 20 20 20 20 20 4C 44  |0755.         LD|
00002150: 41 20 24 30 37 35 35 0D  20 20 20 20 20 20 20 20  |A $0755.        |
00002160: 20 43 4D 50 20 23 38 35  0D 20 20 20 20 20 20 20  | CMP #85.       |
00002170: 20 20 42 43 43 20 52 51  30 0D 20 20 20 20 20 20  |  BCC RQ0.      |
00002180: 20 20 20 4C 44 41 20 23  37 37 0D 20 20 20 20 20  |   LDA #77.     |
00002190: 20 20 20 20 53 54 41 20  24 30 37 35 35 0D 20 20  |    STA $0755.  |
000021A0: 20 20 20 20 20 20 20 4C  44 41 20 24 44 43 30 30  |       LDA $DC00|
000021B0: 0D 52 51 30 20 20 20 20  20 20 43 4D 50 20 23 37  |.RQ0      CMP #7|
000021C0: 0D 20 20 20 20 20 20 20  20 20 42 4E 45 20 52 51  |.         BNE RQ|
000021D0: 31 0D 20 20 20 20 20 20  20 20 20 44 45 43 20 24  |1.         DEC $|
000021E0: 30 37 35 35 0D 20 20 20  20 20 20 20 20 20 4C 44  |0755.         LD|
000021F0: 41 20 24 30 37 35 35 0D  20 20 20 20 20 20 20 20  |A $0755.        |
00002200: 20 43 4D 50 20 23 37 36  0D 20 20 20 20 20 20 20  | CMP #76.       |
00002210: 20 20 42 4E 45 20 52 51  31 0D 20 20 20 20 20 20  |  BNE RQ1.      |
00002220: 20 20 20 4C 44 41 20 23  38 34 0D 20 20 20 20 20  |   LDA #84.     |
00002230: 20 20 20 20 53 54 41 20  24 30 37 35 35 0D 20 20  |    STA $0755.  |
00002240: 20 20 20 20 20 20 20 4C  44 41 20 24 44 43 30 30  |       LDA $DC00|
00002250: 0D 52 51 31 20 20 20 20  20 20 43 4D 50 20 23 31  |.RQ1      CMP #1|
00002260: 34 0D 20 20 20 20 20 20  20 20 20 42 4E 45 20 52  |4.         BNE R|
00002270: 51 32 0D 20 20 20 20 20  20 20 20 20 49 4E 43 20  |Q2.         INC |
00002280: 24 30 37 36 46 0D 20 20  20 20 20 20 20 20 20 4C  |$076F.         L|
00002290: 44 41 20 24 30 37 36 46  0D 20 20 20 20 20 20 20  |DA $076F.       |
000022A0: 20 20 43 4D 50 20 23 35  37 0D 20 20 20 20 20 20  |  CMP #57.      |
000022B0: 20 20 20 42 4E 45 20 52  51 32 0D 20 20 20 20 20  |   BNE RQ2.     |
000022C0: 20 20 20 20 4C 44 41 20  23 34 38 0D 20 20 20 20  |    LDA #48.    |
000022D0: 20 20 20 20 20 53 54 41  20 24 30 37 36 46 0D 20  |     STA $076F. |
000022E0: 20 20 20 20 20 20 20 20  4C 44 41 20 24 30 37 36  |        LDA $076|
000022F0: 45 0D 20 20 20 20 20 20  20 20 20 43 4D 50 20 23  |E.         CMP #|
00002300: 34 36 0D 20 20 20 20 20  20 20 20 20 42 4E 45 20  |46.         BNE |
00002310: 52 51 31 41 0D 20 20 20  20 20 20 20 20 20 4C 44  |RQ1A.         LD|
00002320: 41 20 23 33 32 0D 20 20  20 20 20 20 20 20 20 53  |A #32.         S|
00002330: 54 41 20 24 30 37 36 45  0D 20 20 20 20 20 20 20  |TA $076E.       |
00002340: 20 20 4A 4D 50 20 52 51  33 0D 52 51 31 41 20 20  |  JMP RQ3.RQ1A  |
00002350: 20 20 20 4C 44 41 20 23  34 36 0D 20 20 20 20 20  |   LDA #46.     |
00002360: 20 20 20 20 53 54 41 20  24 30 37 36 45 0D 20 20  |    STA $076E.  |
00002370: 20 20 20 20 20 20 20 4C  44 41 20 24 44 43 30 30  |       LDA $DC00|
00002380: 0D 52 51 32 20 20 20 20  20 20 43 4D 50 20 23 31  |.RQ2      CMP #1|
00002390: 33 0D 20 20 20 20 20 20  20 20 20 42 4E 45 20 52  |3.         BNE R|
000023A0: 51 33 0D 20 20 20 20 20  20 20 20 20 44 45 43 20  |Q3.         DEC |
000023B0: 24 30 37 36 46 0D 20 20  20 20 20 20 20 20 20 4C  |$076F.         L|
000023C0: 44 41 20 24 30 37 36 46  0D 20 20 20 20 20 20 20  |DA $076F.       |
000023D0: 20 20 43 4D 50 20 23 34  37 0D 20 20 20 20 20 20  |  CMP #47.      |
000023E0: 20 20 20 42 4E 45 20 52  51 33 0D 20 20 20 20 20  |   BNE RQ3.     |
000023F0: 20 20 20 20 4C 44 41 20  23 35 36 0D 20 20 20 20  |    LDA #56.    |
00002400: 20 20 20 20 20 53 54 41  20 24 30 37 36 46 0D 20  |     STA $076F. |
00002410: 20 20 20 20 20 20 20 20  4C 44 41 20 24 30 37 36  |        LDA $076|
00002420: 45 0D 20 20 20 20 20 20  20 20 20 43 4D 50 20 23  |E.         CMP #|
00002430: 34 36 0D 20 20 20 20 20  20 20 20 20 42 4E 45 20  |46.         BNE |
00002440: 52 51 32 41 0D 20 20 20  20 20 20 20 20 20 4C 44  |RQ2A.         LD|
00002450: 41 20 23 33 32 0D 20 20  20 20 20 20 20 20 20 53  |A #32.         S|
00002460: 54 41 20 24 30 37 36 45  0D 20 20 20 20 20 20 20  |TA $076E.       |
00002470: 20 20 4A 4D 50 20 52 51  33 0D 52 51 32 41 20 20  |  JMP RQ3.RQ2A  |
00002480: 20 20 20 4C 44 41 20 23  34 36 0D 20 20 20 20 20  |   LDA #46.     |
00002490: 20 20 20 20 53 54 41 20  24 30 37 36 45 0D 52 51  |    STA $076E.RQ|
000024A0: 33 20 20 20 20 20 20 4C  44 41 20 24 44 43 30 30  |3      LDA $DC00|
000024B0: 0D 20 20 20 20 20 20 20  20 20 41 4E 44 20 23 31  |.         AND #1|
000024C0: 36 0D 20 20 20 20 20 20  20 20 20 42 45 51 20 4E  |6.         BEQ N|
000024D0: 52 4F 55 54 0D 20 20 20  20 20 20 20 20 20 4A 4D  |ROUT.         JM|
000024E0: 50 20 52 4F 54 0D 4E 52  4F 55 54 20 20 20 20 4A  |P ROT.NROUT    J|
000024F0: 53 52 20 42 42 45 45 50  0D 20 20 20 20 20 20 20  |SR BBEEP.       |
00002500: 20 20 4C 44 41 20 24 30  37 36 46 0D 20 20 20 20  |  LDA $076F.    |
00002510: 20 20 20 20 20 43 4D 50  20 23 34 38 0D 20 20 20  |     CMP #48.   |
00002520: 20 20 20 20 20 20 42 4E  45 20 4D 4F 56 49 54 0D  |      BNE MOVIT.|
00002530: 20 20 20 20 20 20 20 20  20 4A 4D 50 20 54 45 58  |         JMP TEX|
00002540: 49 54 0D 4D 4F 56 49 54  20 20 20 20 4C 44 41 20  |IT.MOVIT    LDA |
00002550: 23 31 30 20 20 20 20 20  20 20 3B 57 41 52 50 20  |#10       ;WARP |
00002560: 4F 55 54 2E 2E 2E 0D 20  20 20 20 20 20 20 20 20  |OUT....         |
00002570: 53 54 41 20 54 49 4D 33  0D 20 20 20 20 20 20 20  |STA TIM3.       |
00002580: 20 20 4C 44 41 20 24 30  37 36 46 0D 20 20 20 20  |  LDA $076F.    |
00002590: 20 20 20 20 20 53 45 43  0D 20 20 20 20 20 20 20  |     SEC.       |
000025A0: 20 20 53 42 43 20 23 34  38 0D 20 20 20 20 20 20  |  SBC #48.      |
000025B0: 20 20 20 53 54 41 20 54  45 4D 50 31 0D 20 20 20  |   STA TEMP1.   |
000025C0: 20 20 20 20 20 20 4C 44  41 20 24 30 37 36 45 0D  |      LDA $076E.|
000025D0: 20 20 20 20 20 20 20 20  20 43 4D 50 20 23 34 36  |         CMP #46|
000025E0: 0D 20 20 20 20 20 20 20  20 20 42 4E 45 20 41 43  |.         BNE AC|
000025F0: 30 30 0D 20 20 20 20 20  20 20 20 20 4A 4D 50 20  |00.         JMP |
00002600: 4D 4F 56 32 0D 41 43 30  30 20 20 20 20 20 4C 44  |MOV2.AC00     LD|
00002610: 41 20 50 4C 45 56 0D 20  20 20 20 20 20 20 20 20  |A PLEV.         |
00002620: 43 4D 50 20 23 31 0D 20  20 20 20 20 20 20 20 20  |CMP #1.         |
00002630: 42 43 53 20 41 43 30 30  41 0D 20 20 20 20 20 20  |BCS AC00A.      |
00002640: 20 20 20 4A 53 52 20 45  52 41 53 45 0D 20 20 20  |   JSR ERASE.   |
00002650: 20 20 20 20 20 20 4C 44  41 20 23 3C 4C 4E 31 36  |      LDA #<LN16|
00002660: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 31 37  |.         STA 17|
00002670: 34 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 23  |4.         LDA #|
00002680: 3E 4C 4E 31 36 0D 20 20  20 20 20 20 20 20 20 53  |>LN16.         S|
00002690: 54 41 20 31 37 35 0D 20  20 20 20 20 20 20 20 20  |TA 175.         |
000026A0: 4A 53 52 20 50 55 54 4C  4E 0D 20 20 20 20 20 20  |JSR PUTLN.      |
000026B0: 20 20 20 4A 53 52 20 4C  57 41 49 54 0D 20 20 20  |   JSR LWAIT.   |
000026C0: 20 20 20 20 20 20 4A 53  52 20 45 52 41 53 45 0D  |      JSR ERASE.|
000026D0: 20 20 20 20 20 20 20 20  20 4C 44 41 20 23 3C 4C  |         LDA #<L|
000026E0: 4E 31 37 0D 20 20 20 20  20 20 20 20 20 53 54 41  |N17.         STA|
000026F0: 20 31 37 34 0D 20 20 20  20 20 20 20 20 20 4C 44  | 174.         LD|
00002700: 41 20 23 3E 4C 4E 31 37  0D 20 20 20 20 20 20 20  |A #>LN17.       |
00002710: 20 20 53 54 41 20 31 37  35 0D 20 20 20 20 20 20  |  STA 175.      |
00002720: 20 20 20 4A 53 52 20 50  55 54 4C 4E 0D 20 20 20  |   JSR PUTLN.   |
00002730: 20 20 20 20 20 20 4A 53  52 20 4C 57 41 49 54 0D  |      JSR LWAIT.|
00002740: 20 20 20 20 20 20 20 20  20 4A 4D 50 20 4E 41 56  |         JMP NAV|
00002750: 0D 41 43 30 30 41 20 20  20 20 4C 44 41 20 50 4C  |.AC00A    LDA PL|
00002760: 45 56 0D 20 20 20 20 20  20 20 20 20 53 45 43 0D  |EV.         SEC.|
00002770: 20 20 20 20 20 20 20 20  20 53 42 43 20 54 45 4D  |         SBC TEM|
00002780: 50 31 0D 20 20 20 20 20  20 20 20 20 42 43 53 20  |P1.         BCS |
00002790: 41 43 30 30 42 0D 20 20  20 20 20 20 20 20 20 4C  |AC00B.         L|
000027A0: 44 41 20 23 30 0D 41 43  30 30 42 20 20 20 20 53  |DA #0.AC00B    S|
000027B0: 54 41 20 50 4C 45 56 0D  20 20 20 20 20 20 20 20  |TA PLEV.        |
000027C0: 20 44 45 43 20 54 45 4D  50 31 0D 20 20 20 20 20  | DEC TEMP1.     |
000027D0: 20 20 20 20 4A 53 52 20  4C 45 56 50 0D 20 20 20  |    JSR LEVP.   |
000027E0: 20 20 20 20 20 20 4C 44  41 20 24 30 37 35 35 0D  |      LDA $0755.|
000027F0: 20 20 20 20 20 20 20 20  20 43 4D 50 20 23 37 37  |         CMP #77|
00002800: 0D 20 20 20 20 20 20 20  20 20 42 4E 45 20 41 43  |.         BNE AC|
00002810: 30 0D 20 20 20 20 20 20  20 20 20 4A 53 52 20 41  |0.         JSR A|
00002820: 44 47 59 0D 20 20 20 20  20 20 20 20 20 4A 4D 50  |DGY.         JMP|
00002830: 20 4D 4F 56 31 0D 41 43  30 20 20 20 20 20 20 43  | MOV1.AC0      C|
00002840: 4D 50 20 23 37 38 0D 20  20 20 20 20 20 20 20 20  |MP #78.         |
00002850: 42 4E 45 20 41 43 31 0D  20 20 20 20 20 20 20 20  |BNE AC1.        |
00002860: 20 4A 53 52 20 41 44 47  59 0D 20 20 20 20 20 20  | JSR ADGY.      |
00002870: 20 20 20 4A 53 52 20 53  42 47 58 0D 20 20 20 20  |   JSR SBGX.    |
00002880: 20 20 20 20 20 4A 4D 50  20 4D 4F 56 31 0D 41 43  |     JMP MOV1.AC|
00002890: 31 20 20 20 20 20 20 43  4D 50 20 23 37 39 0D 20  |1      CMP #79. |
000028A0: 20 20 20 20 20 20 20 20  42 4E 45 20 41 43 32 0D  |        BNE AC2.|
000028B0: 20 20 20 20 20 20 20 20  20 4A 53 52 20 53 42 47  |         JSR SBG|
000028C0: 58 0D 20 20 20 20 20 20  20 20 20 4A 4D 50 20 4D  |X.         JMP M|
000028D0: 4F 56 31 0D 41 43 32 20  20 20 20 20 20 43 4D 50  |OV1.AC2      CMP|
000028E0: 20 23 38 30 0D 20 20 20  20 20 20 20 20 20 42 4E  | #80.         BN|
000028F0: 45 20 41 43 33 0D 20 20  20 20 20 20 20 20 20 4A  |E AC3.         J|
00002900: 53 52 20 53 42 47 59 0D  20 20 20 20 20 20 20 20  |SR SBGY.        |
00002910: 20 4A 53 52 20 53 42 47  58 0D 20 20 20 20 20 20  | JSR SBGX.      |
00002920: 20 20 20 4A 4D 50 20 4D  4F 56 31 0D 41 43 33 20  |   JMP MOV1.AC3 |
00002930: 20 20 20 20 20 43 4D 50  20 23 38 31 0D 20 20 20  |     CMP #81.   |
00002940: 20 20 20 20 20 20 42 4E  45 20 41 43 34 0D 20 20  |      BNE AC4.  |
00002950: 20 20 20 20 20 20 20 4A  53 52 20 53 42 47 59 0D  |       JSR SBGY.|
00002960: 20 20 20 20 20 20 20 20  20 4A 4D 50 20 4D 4F 56  |         JMP MOV|
00002970: 31 0D 41 43 34 20 20 20  20 20 20 43 4D 50 20 23  |1.AC4      CMP #|
00002980: 38 32 0D 20 20 20 20 20  20 20 20 20 42 4E 45 20  |82.         BNE |
00002990: 41 43 35 0D 20 20 20 20  20 20 20 20 20 4A 53 52  |AC5.         JSR|
000029A0: 20 53 42 47 59 0D 20 20  20 20 20 20 20 20 20 4A  | SBGY.         J|
000029B0: 53 52 20 41 44 47 58 0D  20 20 20 20 20 20 20 20  |SR ADGX.        |
000029C0: 20 4A 4D 50 20 4D 4F 56  31 0D 41 43 35 20 20 20  | JMP MOV1.AC5   |
000029D0: 20 20 20 43 4D 50 20 23  38 33 0D 20 20 20 20 20  |   CMP #83.     |
000029E0: 20 20 20 20 42 4E 45 20  41 43 36 0D 20 20 20 20  |    BNE AC6.    |
000029F0: 20 20 20 20 20 4A 53 52  20 41 44 47 58 0D 20 20  |     JSR ADGX.  |
00002A00: 20 20 20 20 20 20 20 4A  4D 50 20 4D 4F 56 31 0D  |       JMP MOV1.|
00002A10: 41 43 36 20 20 20 20 20  20 4A 53 52 20 41 44 47  |AC6      JSR ADG|
00002A20: 59 0D 20 20 20 20 20 20  20 20 20 4A 53 52 20 41  |Y.         JSR A|
00002A30: 44 47 58 0D 4D 4F 56 31  20 20 20 20 20 4C 44 41  |DGX.MOV1     LDA|
00002A40: 20 23 38 0D 20 20 20 20  20 20 20 20 20 53 54 41  | #8.         STA|
00002A50: 20 54 45 4D 50 31 0D 4D  4F 56 32 20 20 20 20 20  | TEMP1.MOV2     |
00002A60: 4C 44 41 20 54 45 4D 50  31 0D 20 20 20 20 20 20  |LDA TEMP1.      |
00002A70: 20 20 20 54 41 58 0D 20  20 20 20 20 20 20 20 20  |   TAX.         |
00002A80: 4C 44 41 20 44 49 53 54  41 42 2C 58 0D 20 20 20  |LDA DISTAB,X.   |
00002A90: 20 20 20 20 20 20 54 41  58 0D 20 20 20 20 20 20  |      TAX.      |
00002AA0: 20 20 20 4C 44 41 20 24  30 37 35 35 0D 20 20 20  |   LDA $0755.   |
00002AB0: 20 20 20 20 20 20 43 4D  50 20 23 37 37 0D 20 20  |      CMP #77.  |
00002AC0: 20 20 20 20 20 20 20 42  4E 45 20 44 43 30 0D 20  |       BNE DC0. |
00002AD0: 20 20 20 20 20 20 20 20  4A 4D 50 20 52 54 0D 44  |        JMP RT.D|
00002AE0: 43 30 20 20 20 20 20 20  43 4D 50 20 23 37 38 0D  |C0      CMP #78.|
00002AF0: 20 20 20 20 20 20 20 20  20 42 4E 45 20 44 43 31  |         BNE DC1|
00002B00: 0D 20 20 20 20 20 20 20  20 20 4A 4D 50 20 55 52  |.         JMP UR|
00002B10: 0D 44 43 31 20 20 20 20  20 20 43 4D 50 20 23 37  |.DC1      CMP #7|
00002B20: 39 0D 20 20 20 20 20 20  20 20 20 42 4E 45 20 44  |9.         BNE D|
00002B30: 43 32 0D 20 20 20 20 20  20 20 20 20 4A 4D 50 20  |C2.         JMP |
00002B40: 55 50 0D 44 43 32 20 20  20 20 20 20 43 4D 50 20  |UP.DC2      CMP |
00002B50: 23 38 30 0D 20 20 20 20  20 20 20 20 20 42 4E 45  |#80.         BNE|
00002B60: 20 44 43 33 0D 20 20 20  20 20 20 20 20 20 4A 4D  | DC3.         JM|
00002B70: 50 20 55 4C 0D 44 43 33  20 20 20 20 20 20 43 4D  |P UL.DC3      CM|
00002B80: 50 20 23 38 31 0D 20 20  20 20 20 20 20 20 20 42  |P #81.         B|
00002B90: 4E 45 20 44 43 34 0D 20  20 20 20 20 20 20 20 20  |NE DC4.         |
00002BA0: 4A 4D 50 20 4C 54 0D 44  43 34 20 20 20 20 20 20  |JMP LT.DC4      |
00002BB0: 43 4D 50 20 23 38 32 0D  20 20 20 20 20 20 20 20  |CMP #82.        |
00002BC0: 20 42 4E 45 20 44 43 35  0D 20 20 20 20 20 20 20  | BNE DC5.       |
00002BD0: 20 20 4A 4D 50 20 44 4C  0D 44 43 35 20 20 20 20  |  JMP DL.DC5    |
00002BE0: 20 20 43 4D 50 20 23 38  33 0D 20 20 20 20 20 20  |  CMP #83.      |
00002BF0: 20 20 20 42 4E 45 20 44  43 36 0D 20 20 20 20 20  |   BNE DC6.     |
00002C00: 20 20 20 20 4A 4D 50 20  44 57 4E 0D 44 43 36 20  |    JMP DWN.DC6 |
00002C10: 20 20 20 20 20 4A 4D 50  20 44 52 0D 0D 52 54 20  |     JMP DR..RT |
00002C20: 20 20 20 20 20 20 4A 53  52 20 54 49 4D 45 52 0D  |      JSR TIMER.|
00002C30: 20 20 20 20 20 20 20 20  20 4A 53 52 20 52 47 54  |         JSR RGT|
00002C40: 0D 20 20 20 20 20 20 20  20 20 44 45 58 0D 20 20  |.         DEX.  |
00002C50: 20 20 20 20 20 20 20 42  4E 45 20 52 54 0D 20 20  |       BNE RT.  |
00002C60: 20 20 20 20 20 20 20 4C  44 58 20 54 45 4D 50 31  |       LDX TEMP1|
00002C70: 0D 52 58 54 20 20 20 20  20 20 4A 53 52 20 49 43  |.RXT      JSR IC|
00002C80: 53 59 0D 20 20 20 20 20  20 20 20 20 44 45 58 0D  |SY.         DEX.|
00002C90: 20 20 20 20 20 20 20 20  20 42 4E 45 20 52 58 54  |         BNE RXT|
00002CA0: 0D 20 20 20 20 20 20 20  20 20 4A 4D 50 20 54 45  |.         JMP TE|
00002CB0: 58 49 54 0D 55 52 20 20  20 20 20 20 20 4A 53 52  |XIT.UR       JSR|
00002CC0: 20 54 49 4D 45 52 0D 20  20 20 20 20 20 20 20 20  | TIMER.         |
00002CD0: 4A 53 52 20 55 50 50 0D  20 20 20 20 20 20 20 20  |JSR UPP.        |
00002CE0: 20 4A 53 52 20 52 47 54  0D 20 20 20 20 20 20 20  | JSR RGT.       |
00002CF0: 20 20 44 45 58 0D 20 20  20 20 20 20 20 20 20 42  |  DEX.         B|
00002D00: 4E 45 20 55 52 0D 20 20  20 20 20 20 20 20 20 4C  |NE UR.         L|
00002D10: 44 58 20 54 45 4D 50 31  0D 55 58 54 20 20 20 20  |DX TEMP1.UXT    |
00002D20: 20 20 4A 53 52 20 49 43  53 59 0D 20 20 20 20 20  |  JSR ICSY.     |
00002D30: 20 20 20 20 4A 53 52 20  44 43 53 58 0D 20 20 20  |    JSR DCSX.   |
00002D40: 20 20 20 20 20 20 44 45  58 0D 20 20 20 20 20 20  |      DEX.      |
00002D50: 20 20 20 42 4E 45 20 55  58 54 0D 20 20 20 20 20  |   BNE UXT.     |
00002D60: 20 20 20 20 4A 4D 50 20  54 45 58 49 54 0D 55 50  |    JMP TEXIT.UP|
00002D70: 20 20 20 20 20 20 20 4A  53 52 20 54 49 4D 45 52  |       JSR TIMER|
00002D80: 0D 20 20 20 20 20 20 20  20 20 4A 53 52 20 55 50  |.         JSR UP|
00002D90: 50 0D 20 20 20 20 20 20  20 20 20 44 45 58 0D 20  |P.         DEX. |
00002DA0: 20 20 20 20 20 20 20 20  42 4E 45 20 55 50 0D 20  |        BNE UP. |
00002DB0: 20 20 20 20 20 20 20 20  4C 44 58 20 54 45 4D 50  |        LDX TEMP|
00002DC0: 31 0D 55 58 50 20 20 20  20 20 20 4A 53 52 20 44  |1.UXP      JSR D|
00002DD0: 43 53 58 0D 20 20 20 20  20 20 20 20 20 44 45 58  |CSX.         DEX|
00002DE0: 0D 20 20 20 20 20 20 20  20 20 42 4E 45 20 55 58  |.         BNE UX|
00002DF0: 50 0D 20 20 20 20 20 20  20 20 20 4A 4D 50 20 54  |P.         JMP T|
00002E00: 45 58 49 54 0D 55 4C 20  20 20 20 20 20 20 4A 53  |EXIT.UL       JS|
00002E10: 52 20 54 49 4D 45 52 0D  20 20 20 20 20 20 20 20  |R TIMER.        |
00002E20: 20 4A 53 52 20 55 50 50  0D 20 20 20 20 20 20 20  | JSR UPP.       |
00002E30: 20 20 4A 53 52 20 4C 46  54 0D 20 20 20 20 20 20  |  JSR LFT.      |
00002E40: 20 20 20 44 45 58 0D 20  20 20 20 20 20 20 20 20  |   DEX.         |
00002E50: 42 4E 45 20 55 4C 0D 20  20 20 20 20 20 20 20 20  |BNE UL.         |
00002E60: 4C 44 58 20 54 45 4D 50  31 0D 55 58 4C 20 20 20  |LDX TEMP1.UXL   |
00002E70: 20 20 20 4A 53 52 20 44  43 53 59 0D 20 20 20 20  |   JSR DCSY.    |
00002E80: 20 20 20 20 20 4A 53 52  20 44 43 53 58 0D 20 20  |     JSR DCSX.  |
00002E90: 20 20 20 20 20 20 20 44  45 58 0D 20 20 20 20 20  |       DEX.     |
00002EA0: 20 20 20 20 42 4E 45 20  55 58 4C 0D 20 20 20 20  |    BNE UXL.    |
00002EB0: 20 20 20 20 20 4A 4D 50  20 54 45 58 49 54 0D 4C  |     JMP TEXIT.L|
00002EC0: 54 20 20 20 20 20 20 20  4A 53 52 20 54 49 4D 45  |T       JSR TIME|
00002ED0: 52 0D 20 20 20 20 20 20  20 20 20 4A 53 52 20 4C  |R.         JSR L|
00002EE0: 46 54 0D 20 20 20 20 20  20 20 20 20 44 45 58 0D  |FT.         DEX.|
00002EF0: 20 20 20 20 20 20 20 20  20 42 4E 45 20 4C 54 0D  |         BNE LT.|
00002F00: 20 20 20 20 20 20 20 20  20 4C 44 58 20 54 45 4D  |         LDX TEM|
00002F10: 50 31 0D 4C 58 54 20 20  20 20 20 20 4A 53 52 20  |P1.LXT      JSR |
00002F20: 44 43 53 59 0D 20 20 20  20 20 20 20 20 20 44 45  |DCSY.         DE|
00002F30: 58 0D 20 20 20 20 20 20  20 20 20 42 4E 45 20 4C  |X.         BNE L|
00002F40: 58 54 0D 20 20 20 20 20  20 20 20 20 4A 4D 50 20  |XT.         JMP |
00002F50: 54 45 58 49 54 0D 44 4C  20 20 20 20 20 20 20 4A  |TEXIT.DL       J|
00002F60: 53 52 20 54 49 4D 45 52  0D 20 20 20 20 20 20 20  |SR TIMER.       |
00002F70: 20 20 4A 53 52 20 44 57  4E 4E 0D 20 20 20 20 20  |  JSR DWNN.     |
00002F80: 20 20 20 20 4A 53 52 20  4C 46 54 0D 20 20 20 20  |    JSR LFT.    |
00002F90: 20 20 20 20 20 44 45 58  0D 20 20 20 20 20 20 20  |     DEX.       |
00002FA0: 20 20 42 4E 45 20 44 4C  0D 20 20 20 20 20 20 20  |  BNE DL.       |
00002FB0: 20 20 4C 44 58 20 54 45  4D 50 31 0D 44 58 54 20  |  LDX TEMP1.DXT |
00002FC0: 20 20 20 20 20 4A 53 52  20 44 43 53 59 0D 20 20  |     JSR DCSY.  |
00002FD0: 20 20 20 20 20 20 20 4A  53 52 20 49 43 53 58 0D  |       JSR ICSX.|
00002FE0: 20 20 20 20 20 20 20 20  20 44 45 58 0D 20 20 20  |         DEX.   |
00002FF0: 20 20 20 20 20 20 42 4E  45 20 44 58 54 0D 20 20  |      BNE DXT.  |
00003000: 20 20 20 20 20 20 20 4A  4D 50 20 54 45 58 49 54  |       JMP TEXIT|
00003010: 0D 44 57 4E 20 20 20 20  20 20 4A 53 52 20 54 49  |.DWN      JSR TI|
00003020: 4D 45 52 0D 20 20 20 20  20 20 20 20 20 4A 53 52  |MER.         JSR|
00003030: 20 44 57 4E 4E 0D 20 20  20 20 20 20 20 20 20 44  | DWNN.         D|
00003040: 45 58 0D 20 20 20 20 20  20 20 20 20 42 4E 45 20  |EX.         BNE |
00003050: 44 57 4E 0D 20 20 20 20  20 20 20 20 20 4C 44 58  |DWN.         LDX|
00003060: 20 54 45 4D 50 31 0D 44  58 57 20 20 20 20 20 20  | TEMP1.DXW      |
00003070: 4A 53 52 20 49 43 53 58  0D 20 20 20 20 20 20 20  |JSR ICSX.       |
00003080: 20 20 44 45 58 0D 20 20  20 20 20 20 20 20 20 42  |  DEX.         B|
00003090: 4E 45 20 44 58 57 0D 20  20 20 20 20 20 20 20 20  |NE DXW.         |
000030A0: 4A 4D 50 20 54 45 58 49  54 0D 44 52 20 20 20 20  |JMP TEXIT.DR    |
000030B0: 20 20 20 4A 53 52 20 54  49 4D 45 52 0D 20 20 20  |   JSR TIMER.   |
000030C0: 20 20 20 20 20 20 4A 53  52 20 44 57 4E 4E 0D 20  |      JSR DWNN. |
000030D0: 20 20 20 20 20 20 20 20  4A 53 52 20 52 47 54 0D  |        JSR RGT.|
000030E0: 20 20 20 20 20 20 20 20  20 44 45 58 0D 20 20 20  |         DEX.   |
000030F0: 20 20 20 20 20 20 42 4E  45 20 44 52 0D 20 20 20  |      BNE DR.   |
00003100: 20 20 20 20 20 20 4C 44  58 20 54 45 4D 50 31 0D  |      LDX TEMP1.|
00003110: 44 58 52 20 20 20 20 20  20 4A 53 52 20 49 43 53  |DXR      JSR ICS|
00003120: 59 0D 20 20 20 20 20 20  20 20 20 4A 53 52 20 49  |Y.         JSR I|
00003130: 43 53 58 0D 20 20 20 20  20 20 20 20 20 44 45 58  |CSX.         DEX|
00003140: 0D 20 20 20 20 20 20 20  20 20 42 4E 45 20 44 58  |.         BNE DX|
00003150: 52 0D 0D 54 45 58 49 54  20 20 20 20 4C 44 41 20  |R..TEXIT    LDA |
00003160: 23 32 35 35 0D 20 20 20  20 20 20 20 20 20 53 54  |#255.         ST|
00003170: 41 20 54 49 4D 33 0D 20  20 20 20 20 20 20 20 20  |A TIM3.         |
00003180: 4A 53 52 20 45 52 41 53  45 0D 20 20 20 20 20 20  |JSR ERASE.      |
00003190: 20 20 20 4A 53 52 20 43  48 4B 49 54 20 20 3B 45  |   JSR CHKIT  ;E|
000031A0: 4E 54 45 52 50 52 49 53  45 20 41 54 54 41 43 4B  |NTERPRISE ATTACK|
000031B0: 3F 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 42  |?.         LDA B|
000031C0: 54 54 0D 20 20 20 20 20  20 20 20 20 42 45 51 20  |TT.         BEQ |
000031D0: 54 45 58 31 0D 20 20 20  20 20 20 20 20 20 4C 44  |TEX1.         LD|
000031E0: 41 20 23 3C 4C 4E 31 30  0D 20 20 20 20 20 20 20  |A #<LN10.       |
000031F0: 20 20 53 54 41 20 31 37  34 0D 20 20 20 20 20 20  |  STA 174.      |
00003200: 20 20 20 4C 44 41 20 23  3E 4C 4E 31 30 0D 20 20  |   LDA #>LN10.  |
00003210: 20 20 20 20 20 20 20 53  54 41 20 31 37 35 0D 20  |       STA 175. |
00003220: 20 20 20 20 20 20 20 20  4A 53 52 20 41 4C 45 52  |        JSR ALER|
00003230: 54 0D 20 20 20 20 20 20  20 20 20 4A 4D 50 20 52  |T.         JMP R|
00003240: 44 41 4C 0D 54 45 58 31  20 20 20 20 20 4C 44 41  |DAL.TEX1     LDA|
00003250: 20 23 3C 4C 4E 37 20 20  3B 52 45 43 4F 56 45 52  | #<LN7  ;RECOVER|
00003260: 2E 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 31  |..         STA 1|
00003270: 37 34 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |74.         LDA |
00003280: 23 3E 4C 4E 37 0D 20 20  20 20 20 20 20 20 20 53  |#>LN7.         S|
00003290: 54 41 20 31 37 35 0D 20  20 20 20 20 20 20 20 20  |TA 175.         |
000032A0: 4A 53 52 20 50 55 54 4C  4E 0D 20 20 20 20 20 20  |JSR PUTLN.      |
000032B0: 20 20 20 4C 44 41 20 47  58 0D 20 20 20 20 20 20  |   LDA GX.      |
000032C0: 20 20 20 43 4C 43 0D 20  20 20 20 20 20 20 20 20  |   CLC.         |
000032D0: 41 44 43 20 23 34 38 0D  20 20 20 20 20 20 20 20  |ADC #48.        |
000032E0: 20 53 54 41 20 24 30 37  36 32 0D 20 20 20 20 20  | STA $0762.     |
000032F0: 20 20 20 20 4C 44 41 20  23 31 0D 20 20 20 20 20  |    LDA #1.     |
00003300: 20 20 20 20 53 54 41 20  24 44 42 36 32 0D 20 20  |    STA $DB62.  |
00003310: 20 20 20 20 20 20 20 4C  44 41 20 47 59 0D 20 20  |       LDA GY.  |
00003320: 20 20 20 20 20 20 20 43  4C 43 0D 20 20 20 20 20  |       CLC.     |
00003330: 20 20 20 20 41 44 43 20  23 34 38 0D 20 20 20 20  |    ADC #48.    |
00003340: 20 20 20 20 20 53 54 41  20 24 30 37 36 34 0D 20  |     STA $0764. |
00003350: 20 20 20 20 20 20 20 20  4C 44 41 20 23 31 0D 20  |        LDA #1. |
00003360: 20 20 20 20 20 20 20 20  53 54 41 20 24 44 42 36  |        STA $DB6|
00003370: 34 0D 20 20 20 20 20 20  20 20 20 4A 53 52 20 54  |4.         JSR T|
00003380: 49 4D 45 52 0D 20 20 20  20 20 20 20 20 20 4A 53  |IMER.         JS|
00003390: 52 20 54 49 4D 45 52 0D  20 20 20 20 20 20 20 20  |R TIMER.        |
000033A0: 20 4C 44 41 20 23 30 0D  20 20 20 20 20 20 20 20  | LDA #0.        |
000033B0: 20 53 54 41 20 24 44 30  31 35 0D 20 20 20 20 20  | STA $D015.     |
000033C0: 20 20 20 20 53 54 41 20  24 44 30 31 30 0D 20 20  |    STA $D010.  |
000033D0: 20 20 20 20 20 20 20 4A  4D 50 20 47 53 54 41 52  |       JMP GSTAR|
000033E0: 54 0D 0D 44 43 53 58 20  20 20 20 20 44 45 43 20  |T..DCSX     DEC |
000033F0: 53 58 20 20 20 20 20 20  3B 4D 4F 56 45 20 4D 41  |SX      ;MOVE MA|
00003400: 54 48 2E 0D 20 20 20 20  20 20 20 20 20 42 4E 45  |TH..         BNE|
00003410: 20 4F 55 54 0D 20 20 20  20 20 20 20 20 20 4C 44  | OUT.         LD|
00003420: 41 20 23 38 0D 20 20 20  20 20 20 20 20 20 53 54  |A #8.         ST|
00003430: 41 20 53 58 0D 20 20 20  20 20 20 20 20 20 44 45  |A SX.         DE|
00003440: 43 20 47 58 0D 20 20 20  20 20 20 20 20 20 52 54  |C GX.         RT|
00003450: 53 0D 49 43 53 58 20 20  20 20 20 49 4E 43 20 53  |S.ICSX     INC S|
00003460: 58 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 53  |X.         LDA S|
00003470: 58 0D 20 20 20 20 20 20  20 20 20 43 4D 50 20 23  |X.         CMP #|
00003480: 39 0D 20 20 20 20 20 20  20 20 20 42 43 43 20 4F  |9.         BCC O|
00003490: 55 54 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |UT.         LDA |
000034A0: 23 31 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |#1.         STA |
000034B0: 53 58 0D 20 20 20 20 20  20 20 20 20 49 4E 43 20  |SX.         INC |
000034C0: 47 58 0D 20 20 20 20 20  20 20 20 20 52 54 53 0D  |GX.         RTS.|
000034D0: 44 43 53 59 20 20 20 20  20 44 45 43 20 53 59 0D  |DCSY     DEC SY.|
000034E0: 20 20 20 20 20 20 20 20  20 4C 44 41 20 53 59 0D  |         LDA SY.|
000034F0: 20 20 20 20 20 20 20 20  20 42 4E 45 20 4F 55 54  |         BNE OUT|
00003500: 0D 20 20 20 20 20 20 20  20 20 4C 44 41 20 23 38  |.         LDA #8|
00003510: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 53 59  |.         STA SY|
00003520: 0D 20 20 20 20 20 20 20  20 20 44 45 43 20 47 59  |.         DEC GY|
00003530: 0D 20 20 20 20 20 20 20  20 20 52 54 53 0D 49 43  |.         RTS.IC|
00003540: 53 59 20 20 20 20 20 49  4E 43 20 53 59 0D 20 20  |SY     INC SY.  |
00003550: 20 20 20 20 20 20 20 4C  44 41 20 53 59 0D 20 20  |       LDA SY.  |
00003560: 20 20 20 20 20 20 20 43  4D 50 20 23 39 0D 20 20  |       CMP #9.  |
00003570: 20 20 20 20 20 20 20 42  4E 45 20 4F 55 54 0D 20  |       BNE OUT. |
00003580: 20 20 20 20 20 20 20 20  4C 44 41 20 23 31 0D 20  |        LDA #1. |
00003590: 20 20 20 20 20 20 20 20  53 54 41 20 53 59 0D 20  |        STA SY. |
000035A0: 20 20 20 20 20 20 20 20  49 4E 43 20 47 59 0D 4F  |        INC GY.O|
000035B0: 55 54 20 20 20 20 20 20  52 54 53 0D 41 44 47 59  |UT      RTS.ADGY|
000035C0: 20 20 20 20 20 4C 44 41  20 47 59 0D 20 20 20 20  |     LDA GY.    |
000035D0: 20 20 20 20 20 43 4C 43  0D 20 20 20 20 20 20 20  |     CLC.       |
000035E0: 20 20 41 44 43 20 54 45  4D 50 31 0D 20 20 20 20  |  ADC TEMP1.    |
000035F0: 20 20 20 20 20 53 54 41  20 47 59 0D 20 20 20 20  |     STA GY.    |
00003600: 20 20 20 20 20 52 54 53  0D 41 44 47 58 20 20 20  |     RTS.ADGX   |
00003610: 20 20 4C 44 41 20 47 58  0D 20 20 20 20 20 20 20  |  LDA GX.       |
00003620: 20 20 43 4C 43 0D 20 20  20 20 20 20 20 20 20 41  |  CLC.         A|
00003630: 44 43 20 54 45 4D 50 31  0D 20 20 20 20 20 20 20  |DC TEMP1.       |
00003640: 20 20 53 54 41 20 47 58  0D 20 20 20 20 20 20 20  |  STA GX.       |
00003650: 20 20 52 54 53 0D 53 42  47 59 20 20 20 20 20 4C  |  RTS.SBGY     L|
00003660: 44 41 20 47 59 0D 20 20  20 20 20 20 20 20 20 53  |DA GY.         S|
00003670: 45 43 0D 20 20 20 20 20  20 20 20 20 53 42 43 20  |EC.         SBC |
00003680: 54 45 4D 50 31 0D 20 20  20 20 20 20 20 20 20 53  |TEMP1.         S|
00003690: 54 41 20 47 59 0D 20 20  20 20 20 20 20 20 20 52  |TA GY.         R|
000036A0: 54 53 0D 53 42 47 58 20  20 20 20 20 4C 44 41 20  |TS.SBGX     LDA |
000036B0: 47 58 0D 20 20 20 20 20  20 20 20 20 53 45 43 0D  |GX.         SEC.|
000036C0: 20 20 20 20 20 20 20 20  20 53 42 43 20 54 45 4D  |         SBC TEM|
000036D0: 50 31 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |P1.         STA |
000036E0: 47 58 0D 20 20 20 20 20  20 20 20 20 52 54 53 0D  |GX.         RTS.|
000036F0: 0D 52 47 54 20 20 20 20  20 20 49 4E 43 20 24 44  |.RGT      INC $D|
00003700: 30 30 30 0D 20 20 20 20  20 20 20 20 20 4A 53 52  |000.         JSR|
00003710: 20 4D 53 42 4F 4E 0D 20  20 20 20 20 20 20 20 20  | MSBON.         |
00003720: 49 4E 43 20 24 44 30 30  30 0D 20 20 20 20 20 20  |INC $D000.      |
00003730: 20 20 20 4A 53 52 20 4D  53 42 4F 4E 0D 20 20 20  |   JSR MSBON.   |
00003740: 20 20 20 20 20 20 4C 44  41 20 24 44 30 31 30 0D  |      LDA $D010.|
00003750: 20 20 20 20 20 20 20 20  20 41 4E 44 20 23 31 0D  |         AND #1.|
00003760: 20 20 20 20 20 20 20 20  20 42 45 51 20 4E 4D 53  |         BEQ NMS|
00003770: 36 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 24  |6.         LDA $|
00003780: 44 30 30 30 0D 20 20 20  20 20 20 20 20 20 43 4D  |D000.         CM|
00003790: 50 20 23 33 36 0D 20 20  20 20 20 20 20 20 20 42  |P #36.         B|
000037A0: 4E 45 20 4E 4D 53 36 0D  20 20 20 20 20 20 20 20  |NE NMS6.        |
000037B0: 20 4C 44 41 20 24 44 30  31 35 0D 20 20 20 20 20  | LDA $D015.     |
000037C0: 20 20 20 20 41 4E 44 20  23 32 35 34 0D 20 20 20  |    AND #254.   |
000037D0: 20 20 20 20 20 20 53 54  41 20 24 44 30 31 35 0D  |      STA $D015.|
000037E0: 4E 4D 53 36 20 20 20 20  20 4C 44 41 20 24 30 37  |NMS6     LDA $07|
000037F0: 46 38 0D 20 20 20 20 20  20 20 20 20 43 4D 50 20  |F8.         CMP |
00003800: 23 32 30 30 0D 20 20 20  20 20 20 20 20 20 42 45  |#200.         BE|
00003810: 51 20 4E 4F 58 0D 20 20  20 20 20 20 20 20 20 49  |Q NOX.         I|
00003820: 4E 43 20 24 30 37 46 38  0D 4E 4F 58 20 20 20 20  |NC $07F8.NOX    |
00003830: 20 20 52 54 53 0D 55 50  50 20 20 20 20 20 20 44  |  RTS.UPP      D|
00003840: 45 43 20 24 44 30 30 31  0D 20 20 20 20 20 20 20  |EC $D001.       |
00003850: 20 20 4C 44 41 20 24 44  30 30 31 0D 20 20 20 20  |  LDA $D001.    |
00003860: 20 20 20 20 20 43 4D 50  20 23 36 37 0D 20 20 20  |     CMP #67.   |
00003870: 20 20 20 20 20 20 42 4E  45 20 55 50 45 0D 20 20  |      BNE UPE.  |
00003880: 20 20 20 20 20 20 20 4C  44 41 20 24 44 30 31 35  |       LDA $D015|
00003890: 0D 20 20 20 20 20 20 20  20 20 41 4E 44 20 23 32  |.         AND #2|
000038A0: 35 34 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |54.         STA |
000038B0: 24 44 30 31 35 0D 55 50  45 20 20 20 20 20 20 52  |$D015.UPE      R|
000038C0: 54 53 0D 44 57 4E 4E 20  20 20 20 20 49 4E 43 20  |TS.DWNN     INC |
000038D0: 24 44 30 30 31 0D 20 20  20 20 20 20 20 20 20 4C  |$D001.         L|
000038E0: 44 41 20 24 44 30 30 31  0D 20 20 20 20 20 20 20  |DA $D001.       |
000038F0: 20 20 43 4D 50 20 23 31  39 32 0D 20 20 20 20 20  |  CMP #192.     |
00003900: 20 20 20 20 42 4E 45 20  44 4E 45 0D 20 20 20 20  |    BNE DNE.    |
00003910: 20 20 20 20 20 4C 44 41  20 24 44 30 31 35 0D 20  |     LDA $D015. |
00003920: 20 20 20 20 20 20 20 20  41 4E 44 20 23 32 35 34  |        AND #254|
00003930: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 24 44  |.         STA $D|
00003940: 30 31 35 0D 44 4E 45 20  20 20 20 20 20 52 54 53  |015.DNE      RTS|
00003950: 0D 4C 46 54 20 20 20 20  20 20 4C 44 41 20 24 44  |.LFT      LDA $D|
00003960: 30 30 30 0D 20 20 20 20  20 20 20 20 20 42 4E 45  |000.         BNE|
00003970: 20 4E 4D 53 33 0D 20 20  20 20 20 20 20 20 20 4A  | NMS3.         J|
00003980: 53 52 20 4D 53 42 4F 46  46 0D 4E 4D 53 33 20 20  |SR MSBOFF.NMS3  |
00003990: 20 20 20 44 45 43 20 24  44 30 30 30 0D 20 20 20  |   DEC $D000.   |
000039A0: 20 20 20 20 20 20 4C 44  41 20 24 44 30 30 30 0D  |      LDA $D000.|
000039B0: 20 20 20 20 20 20 20 20  20 42 4E 45 20 4E 4D 53  |         BNE NMS|
000039C0: 34 0D 20 20 20 20 20 20  20 20 20 4A 53 52 20 4D  |4.         JSR M|
000039D0: 53 42 4F 46 46 0D 4E 4D  53 34 20 20 20 20 20 44  |SBOFF.NMS4     D|
000039E0: 45 43 20 24 44 30 30 30  0D 20 20 20 20 20 20 20  |EC $D000.       |
000039F0: 20 20 4C 44 41 20 24 44  30 31 30 0D 20 20 20 20  |  LDA $D010.    |
00003A00: 20 20 20 20 20 41 4E 44  20 23 31 0D 20 20 20 20  |     AND #1.    |
00003A10: 20 20 20 20 20 42 4E 45  20 4E 4D 53 35 0D 20 20  |     BNE NMS5.  |
00003A20: 20 20 20 20 20 20 20 4C  44 41 20 24 44 30 30 30  |       LDA $D000|
00003A30: 0D 20 20 20 20 20 20 20  20 20 43 4D 50 20 23 33  |.         CMP #3|
00003A40: 34 0D 20 20 20 20 20 20  20 20 20 42 4E 45 20 4E  |4.         BNE N|
00003A50: 4D 53 35 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |MS5.         LDA|
00003A60: 20 24 44 30 31 35 0D 20  20 20 20 20 20 20 20 20  | $D015.         |
00003A70: 41 4E 44 20 23 32 35 34  0D 20 20 20 20 20 20 20  |AND #254.       |
00003A80: 20 20 53 54 41 20 24 44  30 31 35 0D 4E 4D 53 35  |  STA $D015.NMS5|
00003A90: 20 20 20 20 20 4C 44 41  20 24 30 37 46 38 0D 20  |     LDA $07F8. |
00003AA0: 20 20 20 20 20 20 20 20  43 4D 50 20 23 31 39 32  |        CMP #192|
00003AB0: 0D 20 20 20 20 20 20 20  20 20 42 45 51 20 4D 4F  |.         BEQ MO|
00003AC0: 58 0D 20 20 20 20 20 20  20 20 20 44 45 43 20 24  |X.         DEC $|
00003AD0: 30 37 46 38 0D 4D 4F 58  20 20 20 20 20 20 52 54  |07F8.MOX      RT|
00003AE0: 53 0D 4D 53 42 4F 4E 20  20 20 20 4C 44 41 20 24  |S.MSBON    LDA $|
00003AF0: 44 30 30 30 0D 20 20 20  20 20 20 20 20 20 43 4D  |D000.         CM|
00003B00: 50 20 23 32 35 35 0D 20  20 20 20 20 20 20 20 20  |P #255.         |
00003B10: 42 4E 45 20 4E 4F 54 4D  0D 20 20 20 20 20 20 20  |BNE NOTM.       |
00003B20: 20 20 4C 44 41 20 24 44  30 31 30 0D 20 20 20 20  |  LDA $D010.    |
00003B30: 20 20 20 20 20 4F 52 41  20 23 31 0D 20 20 20 20  |     ORA #1.    |
00003B40: 20 20 20 20 20 53 54 41  20 24 44 30 31 30 0D 4E  |     STA $D010.N|
00003B50: 4F 54 4D 20 20 20 20 20  52 54 53 0D 4D 53 42 4F  |OTM     RTS.MSBO|
00003B60: 46 46 20 20 20 4C 44 41  20 24 44 30 31 30 0D 20  |FF   LDA $D010. |
00003B70: 20 20 20 20 20 20 20 20  41 4E 44 20 23 32 35 34  |        AND #254|
00003B80: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 24 44  |.         STA $D|
00003B90: 30 31 30 0D 20 20 20 20  20 20 20 20 20 52 54 53  |010.         RTS|
00003BA0: 0D 0D 50 55 54 4C 4E 20  20 20 20 4C 44 59 20 23  |..PUTLN    LDY #|
00003BB0: 30 20 20 20 20 20 20 20  3B 54 45 58 54 20 55 54  |0       ;TEXT UT|
00003BC0: 49 4C 53 2E 0D 50 4C 30  20 20 20 20 20 20 4C 44  |ILS..PL0      LD|
00003BD0: 41 20 28 31 37 34 29 2C  59 0D 20 20 20 20 20 20  |A (174),Y.      |
00003BE0: 20 20 20 42 45 51 20 44  4F 4E 45 0D 20 20 20 20  |   BEQ DONE.    |
00003BF0: 20 20 20 20 20 53 54 41  20 24 30 37 34 41 2C 59  |     STA $074A,Y|
00003C00: 0D 20 20 20 20 20 20 20  20 20 49 4E 59 0D 20 20  |.         INY.  |
00003C10: 20 20 20 20 20 20 20 42  4E 45 20 50 4C 30 0D 44  |       BNE PL0.D|
00003C20: 4F 4E 45 20 20 20 20 20  52 54 53 0D 45 52 41 53  |ONE     RTS.ERAS|
00003C30: 45 20 20 20 20 4C 44 58  20 23 30 0D 20 20 20 20  |E    LDX #0.    |
00003C40: 20 20 20 20 20 4C 44 41  20 23 33 32 0D 4C 49 35  |     LDA #32.LI5|
00003C50: 20 20 20 20 20 20 53 54  41 20 24 30 37 34 39 2C  |      STA $0749,|
00003C60: 58 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 24  |X.         STA $|
00003C70: 30 37 37 31 2C 58 0D 20  20 20 20 20 20 20 20 20  |0771,X.         |
00003C80: 49 4E 58 0D 20 20 20 20  20 20 20 20 20 43 50 58  |INX.         CPX|
00003C90: 20 23 33 39 0D 20 20 20  20 20 20 20 20 20 42 4E  | #39.         BN|
00003CA0: 45 20 4C 49 35 0D 20 20  20 20 20 20 20 20 20 52  |E LI5.         R|
00003CB0: 54 53 0D 4C 49 4E 45 35  20 20 20 20 4C 44 58 20  |TS.LINE5    LDX |
00003CC0: 23 30 0D 4C 49 35 35 20  20 20 20 20 4C 44 41 20  |#0.LI55     LDA |
00003CD0: 4C 4E 35 2C 58 0D 20 20  20 20 20 20 20 20 20 53  |LN5,X.         S|
00003CE0: 54 41 20 24 30 37 34 39  2C 58 0D 20 20 20 20 20  |TA $0749,X.     |
00003CF0: 20 20 20 20 4C 44 41 20  23 31 34 0D 20 20 20 20  |    LDA #14.    |
00003D00: 20 20 20 20 20 53 54 41  20 24 44 42 34 39 2C 58  |     STA $DB49,X|
00003D10: 0D 20 20 20 20 20 20 20  20 20 4C 44 41 20 4C 4E  |.         LDA LN|
00003D20: 36 2C 58 0D 20 20 20 20  20 20 20 20 20 53 54 41  |6,X.         STA|
00003D30: 20 24 30 37 37 31 2C 58  0D 20 20 20 20 20 20 20  | $0771,X.       |
00003D40: 20 20 4C 44 41 20 23 31  31 0D 20 20 20 20 20 20  |  LDA #11.      |
00003D50: 20 20 20 53 54 41 20 24  44 42 37 31 2C 58 0D 20  |   STA $DB71,X. |
00003D60: 20 20 20 20 20 20 20 20  49 4E 58 0D 20 20 20 20  |        INX.    |
00003D70: 20 20 20 20 20 43 50 58  20 23 33 39 0D 20 20 20  |     CPX #39.   |
00003D80: 20 20 20 20 20 20 42 4E  45 20 4C 49 35 35 0D 20  |      BNE LI55. |
00003D90: 20 20 20 20 20 20 20 20  52 54 53 0D 0D 49 52 51  |        RTS..IRQ|
00003DA0: 31 20 20 20 20 20 4C 44  41 20 53 54 4F 50 20 20  |1     LDA STOP  |
00003DB0: 20 20 20 3B 31 53 54 20  C9 D2 D1 0D 20 20 20 20  |   ;1ST ....    |
00003DC0: 20 20 20 20 20 42 45 51  20 49 52 51 31 41 0D 20  |     BEQ IRQ1A. |
00003DD0: 20 20 20 20 20 20 20 20  4A 4D 50 20 49 52 31 39  |        JMP IR19|
00003DE0: 20 20 20 20 20 3B 41 55  54 4F 20 54 49 4D 45 52  |     ;AUTO TIMER|
00003DF0: 0D 49 52 51 31 41 20 20  20 20 44 45 43 20 43 4E  |.IRQ1A    DEC CN|
00003E00: 54 30 20 20 20 20 20 3B  53 45 51 55 45 4E 43 45  |T0     ;SEQUENCE|
00003E10: 52 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 43  |R.         LDA C|
00003E20: 4E 54 30 0D 20 20 20 20  20 20 20 20 20 42 45 51  |NT0.         BEQ|
00003E30: 20 49 52 31 30 0D 20 20  20 20 20 20 20 20 20 4A  | IR10.         J|
00003E40: 4D 50 20 49 52 31 39 0D  49 52 31 30 20 20 20 20  |MP IR19.IR10    |
00003E50: 20 4C 44 41 20 23 37 0D  20 20 20 20 20 20 20 20  | LDA #7.        |
00003E60: 20 53 54 41 20 43 4E 54  30 0D 20 20 20 20 20 20  | STA CNT0.      |
00003E70: 20 20 20 4C 44 41 20 43  4E 54 31 0D 20 20 20 20  |   LDA CNT1.    |
00003E80: 20 20 20 20 20 42 4E 45  20 49 52 31 31 0D 20 20  |     BNE IR11.  |
00003E90: 20 20 20 20 20 20 20 4C  44 41 20 23 31 0D 20 20  |       LDA #1.  |
00003EA0: 20 20 20 20 20 20 20 53  54 41 20 24 44 42 30 42  |       STA $DB0B|
00003EB0: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 24 44  |.         STA $D|
00003EC0: 42 30 43 0D 20 20 20 20  20 20 20 20 20 49 4E 43  |B0C.         INC|
00003ED0: 20 43 4E 54 31 0D 20 20  20 20 20 20 20 20 20 4A  | CNT1.         J|
00003EE0: 4D 50 20 49 52 31 39 0D  49 52 31 31 20 20 20 20  |MP IR19.IR11    |
00003EF0: 20 43 4D 50 20 23 31 0D  20 20 20 20 20 20 20 20  | CMP #1.        |
00003F00: 20 42 4E 45 20 49 52 31  32 0D 20 20 20 20 20 20  | BNE IR12.      |
00003F10: 20 20 20 4C 44 41 20 23  30 0D 20 20 20 20 20 20  |   LDA #0.      |
00003F20: 20 20 20 53 54 41 20 24  44 42 30 42 0D 20 20 20  |   STA $DB0B.   |
00003F30: 20 20 20 20 20 20 53 54  41 20 24 44 42 30 43 0D  |      STA $DB0C.|
00003F40: 20 20 20 20 20 20 20 20  20 4C 44 41 20 23 31 0D  |         LDA #1.|
00003F50: 20 20 20 20 20 20 20 20  20 53 54 41 20 24 44 42  |         STA $DB|
00003F60: 30 41 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |0A.         STA |
00003F70: 24 44 42 30 44 0D 20 20  20 20 20 20 20 20 20 49  |$DB0D.         I|
00003F80: 4E 43 20 43 4E 54 31 0D  20 20 20 20 20 20 20 20  |NC CNT1.        |
00003F90: 20 4A 4D 50 20 49 52 31  39 0D 49 52 31 32 20 20  | JMP IR19.IR12  |
00003FA0: 20 20 20 43 4D 50 20 23  32 0D 20 20 20 20 20 20  |   CMP #2.      |
00003FB0: 20 20 20 42 4E 45 20 49  52 31 33 0D 20 20 20 20  |   BNE IR13.    |
00003FC0: 20 20 20 20 20 4C 44 41  20 23 30 0D 20 20 20 20  |     LDA #0.    |
00003FD0: 20 20 20 20 20 53 54 41  20 24 44 42 30 41 0D 20  |     STA $DB0A. |
00003FE0: 20 20 20 20 20 20 20 20  53 54 41 20 24 44 42 30  |        STA $DB0|
00003FF0: 44 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 23  |D.         LDA #|
00004000: 31 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 24  |1.         STA $|
00004010: 44 42 30 39 0D 20 20 20  20 20 20 20 20 20 53 54  |DB09.         ST|
00004020: 41 20 24 44 42 30 45 0D  20 20 20 20 20 20 20 20  |A $DB0E.        |
00004030: 20 49 4E 43 20 43 4E 54  31 0D 20 20 20 20 20 20  | INC CNT1.      |
00004040: 20 20 20 4A 4D 50 20 49  52 31 39 0D 49 52 31 33  |   JMP IR19.IR13|
00004050: 20 20 20 20 20 43 4D 50  20 23 33 0D 20 20 20 20  |     CMP #3.    |
00004060: 20 20 20 20 20 42 4E 45  20 49 52 31 34 0D 20 20  |     BNE IR14.  |
00004070: 20 20 20 20 20 20 20 4C  44 41 20 23 30 0D 20 20  |       LDA #0.  |
00004080: 20 20 20 20 20 20 20 53  54 41 20 24 44 42 30 39  |       STA $DB09|
00004090: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 24 44  |.         STA $D|
000040A0: 42 30 45 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |B0E.         LDA|
000040B0: 20 23 31 0D 20 20 20 20  20 20 20 20 20 53 54 41  | #1.         STA|
000040C0: 20 24 44 42 30 38 0D 20  20 20 20 20 20 20 20 20  | $DB08.         |
000040D0: 53 54 41 20 24 44 42 30  46 0D 20 20 20 20 20 20  |STA $DB0F.      |
000040E0: 20 20 20 49 4E 43 20 43  4E 54 31 0D 20 20 20 20  |   INC CNT1.    |
000040F0: 20 20 20 20 20 4A 4D 50  20 49 52 31 39 0D 49 52  |     JMP IR19.IR|
00004100: 31 34 20 20 20 20 20 43  4D 50 20 23 34 0D 20 20  |14     CMP #4.  |
00004110: 20 20 20 20 20 20 20 42  4E 45 20 49 52 31 35 0D  |       BNE IR15.|
00004120: 20 20 20 20 20 20 20 20  20 4C 44 41 20 23 30 0D  |         LDA #0.|
00004130: 20 20 20 20 20 20 20 20  20 53 54 41 20 24 44 42  |         STA $DB|
00004140: 30 38 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |08.         STA |
00004150: 24 44 42 30 46 0D 20 20  20 20 20 20 20 20 20 4C  |$DB0F.         L|
00004160: 44 41 20 23 31 0D 20 20  20 20 20 20 20 20 20 53  |DA #1.         S|
00004170: 54 41 20 24 44 42 30 37  0D 20 20 20 20 20 20 20  |TA $DB07.       |
00004180: 20 20 53 54 41 20 24 44  42 31 30 0D 20 20 20 20  |  STA $DB10.    |
00004190: 20 20 20 20 20 49 4E 43  20 43 4E 54 31 0D 20 20  |     INC CNT1.  |
000041A0: 20 20 20 20 20 20 20 4A  4D 50 20 49 52 31 39 0D  |       JMP IR19.|
000041B0: 49 52 31 35 20 20 20 20  20 43 4D 50 20 23 35 0D  |IR15     CMP #5.|
000041C0: 20 20 20 20 20 20 20 20  20 42 4E 45 20 49 52 31  |         BNE IR1|
000041D0: 36 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 23  |6.         LDA #|
000041E0: 30 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 24  |0.         STA $|
000041F0: 44 42 30 37 0D 20 20 20  20 20 20 20 20 20 53 54  |DB07.         ST|
00004200: 41 20 24 44 42 31 30 0D  20 20 20 20 20 20 20 20  |A $DB10.        |
00004210: 20 4C 44 41 20 23 31 0D  20 20 20 20 20 20 20 20  | LDA #1.        |
00004220: 20 53 54 41 20 24 44 42  30 36 0D 20 20 20 20 20  | STA $DB06.     |
00004230: 20 20 20 20 53 54 41 20  24 44 42 31 31 0D 20 20  |    STA $DB11.  |
00004240: 20 20 20 20 20 20 20 49  4E 43 20 43 4E 54 31 0D  |       INC CNT1.|
00004250: 20 20 20 20 20 20 20 20  20 4A 4D 50 20 49 52 31  |         JMP IR1|
00004260: 39 0D 49 52 31 36 20 20  20 20 20 4C 44 41 20 23  |9.IR16     LDA #|
00004270: 30 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 24  |0.         STA $|
00004280: 44 42 30 36 0D 20 20 20  20 20 20 20 20 20 53 54  |DB06.         ST|
00004290: 41 20 24 44 42 31 31 0D  20 20 20 20 20 20 20 20  |A $DB11.        |
000042A0: 20 53 54 41 20 43 4E 54  31 0D 20 20 20 20 20 20  | STA CNT1.      |
000042B0: 20 20 20 4C 44 41 20 23  36 30 0D 20 20 20 20 20  |   LDA #60.     |
000042C0: 20 20 20 20 53 54 41 20  43 4E 54 30 0D 20 20 20  |    STA CNT0.   |
000042D0: 20 20 20 20 20 20 44 45  43 20 43 4E 54 32 0D 20  |      DEC CNT2. |
000042E0: 20 20 20 20 20 20 20 20  4C 44 41 20 43 4E 54 32  |        LDA CNT2|
000042F0: 0D 20 20 20 20 20 20 20  20 20 42 4E 45 20 49 52  |.         BNE IR|
00004300: 31 39 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |19.         LDA |
00004310: 23 32 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |#2.         STA |
00004320: 43 4E 54 32 0D 20 20 20  20 20 20 20 20 20 4A 53  |CNT2.         JS|
00004330: 52 20 54 49 4D 49 54 0D  49 52 31 39 20 20 20 20  |R TIMIT.IR19    |
00004340: 20 4C 44 41 20 53 44 31  0D 20 20 20 20 20 20 20  | LDA SD1.       |
00004350: 20 20 53 54 41 20 24 30  37 45 36 0D 20 20 20 20  |  STA $07E6.    |
00004360: 20 20 20 20 20 4C 44 41  20 53 44 32 0D 20 20 20  |     LDA SD2.   |
00004370: 20 20 20 20 20 20 53 54  41 20 24 30 37 45 34 0D  |      STA $07E4.|
00004380: 20 20 20 20 20 20 20 20  20 4C 44 41 20 53 44 33  |         LDA SD3|
00004390: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 24 30  |.         STA $0|
000043A0: 37 45 33 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |7E3.         LDA|
000043B0: 20 53 44 34 0D 20 20 20  20 20 20 20 20 20 53 54  | SD4.         ST|
000043C0: 41 20 24 30 37 45 32 0D  20 20 20 20 20 20 20 20  |A $07E2.        |
000043D0: 20 4C 44 41 20 53 44 35  0D 20 20 20 20 20 20 20  | LDA SD5.       |
000043E0: 20 20 53 54 41 20 24 30  37 45 31 0D 20 20 20 20  |  STA $07E1.    |
000043F0: 20 20 20 20 20 4C 44 41  20 23 30 0D 20 20 20 20  |     LDA #0.    |
00004400: 20 20 20 20 20 53 54 41  20 24 44 30 32 30 0D 20  |     STA $D020. |
00004410: 20 20 20 20 20 20 20 20  4C 44 41 20 23 35 30 0D  |        LDA #50.|
00004420: 20 20 20 20 20 20 20 20  20 53 54 41 20 24 44 30  |         STA $D0|
00004430: 31 32 0D 20 20 20 20 20  20 20 20 20 49 4E 43 20  |12.         INC |
00004440: 24 44 30 31 39 0D 20 20  20 20 20 20 20 20 20 4C  |$D019.         L|
00004450: 44 41 20 23 3C 49 52 51  32 0D 20 20 20 20 20 20  |DA #<IRQ2.      |
00004460: 20 20 20 53 54 41 20 24  30 33 31 34 0D 20 20 20  |   STA $0314.   |
00004470: 20 20 20 20 20 20 4C 44  41 20 23 3E 49 52 51 32  |      LDA #>IRQ2|
00004480: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 24 30  |.         STA $0|
00004490: 33 31 35 0D 20 20 20 20  20 20 20 20 20 4A 4D 50  |315.         JMP|
000044A0: 20 24 45 41 38 31 0D 54  49 4D 49 54 20 20 20 20  | $EA81.TIMIT    |
000044B0: 44 45 43 20 53 44 31 20  20 20 20 20 20 3B 44 49  |DEC SD1      ;DI|
000044C0: 53 50 4C 41 59 20 54 49  4D 45 2E 0D 20 20 20 20  |SPLAY TIME..    |
000044D0: 20 20 20 20 20 4C 44 41  20 53 44 31 0D 20 20 20  |     LDA SD1.   |
000044E0: 20 20 20 20 20 20 43 4D  50 20 23 34 37 0D 20 20  |      CMP #47.  |
000044F0: 20 20 20 20 20 20 20 42  4E 45 20 49 52 54 30 0D  |       BNE IRT0.|
00004500: 20 20 20 20 20 20 20 20  20 4C 44 41 20 23 35 37  |         LDA #57|
00004510: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 53 44  |.         STA SD|
00004520: 31 0D 20 20 20 20 20 20  20 20 20 44 45 43 20 53  |1.         DEC S|
00004530: 44 32 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |D2.         LDA |
00004540: 53 44 32 0D 20 20 20 20  20 20 20 20 20 43 4D 50  |SD2.         CMP|
00004550: 20 23 34 37 0D 20 20 20  20 20 20 20 20 20 42 4E  | #47.         BN|
00004560: 45 20 49 52 54 30 0D 20  20 20 20 20 20 20 20 20  |E IRT0.         |
00004570: 4C 44 41 20 23 35 37 0D  20 20 20 20 20 20 20 20  |LDA #57.        |
00004580: 20 53 54 41 20 53 44 32  0D 20 20 20 20 20 20 20  | STA SD2.       |
00004590: 20 20 44 45 43 20 53 44  33 0D 20 20 20 20 20 20  |  DEC SD3.      |
000045A0: 20 20 20 4C 44 41 20 53  44 33 0D 20 20 20 20 20  |   LDA SD3.     |
000045B0: 20 20 20 20 43 4D 50 20  23 34 37 0D 20 20 20 20  |    CMP #47.    |
000045C0: 20 20 20 20 20 42 4E 45  20 49 52 54 30 0D 20 20  |     BNE IRT0.  |
000045D0: 20 20 20 20 20 20 20 4C  44 41 20 23 35 37 0D 20  |       LDA #57. |
000045E0: 20 20 20 20 20 20 20 20  53 54 41 20 53 44 33 0D  |        STA SD3.|
000045F0: 20 20 20 20 20 20 20 20  20 44 45 43 20 53 44 34  |         DEC SD4|
00004600: 0D 20 20 20 20 20 20 20  20 20 4C 44 41 20 53 44  |.         LDA SD|
00004610: 34 0D 20 20 20 20 20 20  20 20 20 43 4D 50 20 23  |4.         CMP #|
00004620: 34 37 0D 20 20 20 20 20  20 20 20 20 42 4E 45 20  |47.         BNE |
00004630: 49 52 54 30 0D 20 20 20  20 20 20 20 20 20 4C 44  |IRT0.         LD|
00004640: 41 20 23 33 20 20 20 3B  54 49 4D 45 0D 20 20 20  |A #3   ;TIME.   |
00004650: 20 20 20 20 20 20 53 54  41 20 43 4F 44 0D 20 20  |      STA COD.  |
00004660: 20 20 20 20 20 20 20 4A  4D 50 20 44 45 41 44 0D  |       JMP DEAD.|
00004670: 49 52 54 30 20 20 20 20  20 52 54 53 0D 0D 49 52  |IRT0     RTS..IR|
00004680: 51 32 20 20 20 20 20 4C  44 41 20 41 54 54 31 20  |Q2     LDA ATT1 |
00004690: 20 20 20 3B 32 4E 44 20  C9 D2 D1 0D 20 20 20 20  |   ;2ND ....    |
000046A0: 20 20 20 20 20 42 4E 45  20 49 51 51 20 20 20 20  |     BNE IQQ    |
000046B0: 20 3B 4B 4C 49 4E 47 4F  4E 28 53 29 0D 20 20 20  | ;KLINGON(S).   |
000046C0: 20 20 20 20 20 20 4A 4D  50 20 49 52 32 41 20 20  |      JMP IR2A  |
000046D0: 20 20 3B 41 55 54 4F 20  41 54 54 41 43 4B 2E 0D  |  ;AUTO ATTACK..|
000046E0: 49 51 51 20 20 20 20 20  20 44 45 43 20 54 49 4D  |IQQ      DEC TIM|
000046F0: 34 0D 20 20 20 20 20 20  20 20 20 42 45 51 20 49  |4.         BEQ I|
00004700: 51 51 30 0D 20 20 20 20  20 20 20 20 20 4A 4D 50  |QQ0.         JMP|
00004710: 20 49 52 32 41 0D 49 51  51 30 20 20 20 20 20 4C  | IR2A.IQQ0     L|
00004720: 44 41 20 53 50 44 31 0D  20 20 20 20 20 20 20 20  |DA SPD1.        |
00004730: 20 53 54 41 20 54 49 4D  34 0D 20 20 20 20 20 20  | STA TIM4.      |
00004740: 20 20 20 4C 44 41 20 54  4D 50 31 0D 20 20 20 20  |   LDA TMP1.    |
00004750: 20 20 20 20 20 42 45 51  20 49 51 51 31 0D 20 20  |     BEQ IQQ1.  |
00004760: 20 20 20 20 20 20 20 4A  4D 50 20 49 52 32 37 0D  |       JMP IR27.|
00004770: 49 51 51 31 20 20 20 20  20 4C 44 41 20 58 33 0D  |IQQ1     LDA X3.|
00004780: 20 20 20 20 20 20 20 20  20 42 45 51 20 49 52 32  |         BEQ IR2|
00004790: 30 0D 20 20 20 20 20 20  20 20 20 49 4E 43 20 24  |0.         INC $|
000047A0: 44 30 30 32 0D 20 20 20  20 20 20 20 20 20 4C 44  |D002.         LD|
000047B0: 41 20 24 44 30 30 32 0D  20 20 20 20 20 20 20 20  |A $D002.        |
000047C0: 20 42 4E 45 20 49 52 32  31 0D 20 20 20 20 20 20  | BNE IR21.      |
000047D0: 20 20 20 4C 44 41 20 24  44 30 31 30 0D 20 20 20  |   LDA $D010.   |
000047E0: 20 20 20 20 20 20 4F 52  41 20 23 33 0D 20 20 20  |      ORA #3.   |
000047F0: 20 20 20 20 20 20 53 54  41 20 24 44 30 31 30 0D  |      STA $D010.|
00004800: 49 52 32 31 20 20 20 20  20 4C 44 41 20 24 44 30  |IR21     LDA $D0|
00004810: 31 30 0D 20 20 20 20 20  20 20 20 20 41 4E 44 20  |10.         AND |
00004820: 23 33 0D 20 20 20 20 20  20 20 20 20 42 45 51 20  |#3.         BEQ |
00004830: 49 52 32 32 0D 20 20 20  20 20 20 20 20 20 4C 44  |IR22.         LD|
00004840: 41 20 24 44 30 30 32 0D  20 20 20 20 20 20 20 20  |A $D002.        |
00004850: 20 43 4D 50 20 23 37 30  0D 20 20 20 20 20 20 20  | CMP #70.       |
00004860: 20 20 42 4E 45 20 49 52  32 32 0D 20 20 20 20 20  |  BNE IR22.     |
00004870: 20 20 20 20 4A 53 52 20  53 45 54 4B 31 0D 20 20  |    JSR SETK1.  |
00004880: 20 20 20 20 20 20 20 4A  4D 50 20 49 52 32 41 0D  |       JMP IR2A.|
00004890: 49 52 32 32 20 20 20 20  20 4C 44 41 20 24 30 37  |IR22     LDA $07|
000048A0: 46 39 0D 20 20 20 20 20  20 20 20 20 43 4D 50 20  |F9.         CMP |
000048B0: 23 32 30 33 0D 20 20 20  20 20 20 20 20 20 42 45  |#203.         BE|
000048C0: 51 20 49 52 32 33 0D 20  20 20 20 20 20 20 20 20  |Q IR23.         |
000048D0: 44 45 43 20 24 30 37 46  39 0D 49 52 32 33 20 20  |DEC $07F9.IR23  |
000048E0: 20 20 20 44 45 43 20 4B  4E 54 31 0D 20 20 20 20  |   DEC KNT1.    |
000048F0: 20 20 20 20 20 42 4E 45  20 49 52 32 33 41 0D 20  |     BNE IR23A. |
00004900: 20 20 20 20 20 20 20 20  4A 53 52 20 53 45 54 4B  |        JSR SETK|
00004910: 31 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 24  |1.         LDA $|
00004920: 44 30 30 32 0D 20 20 20  20 20 20 20 20 20 53 54  |D002.         ST|
00004930: 41 20 24 44 30 30 30 0D  20 20 20 20 20 20 20 20  |A $D000.        |
00004940: 20 4C 44 41 20 23 31 32  34 0D 20 20 20 20 20 20  | LDA #124.      |
00004950: 20 20 20 53 54 41 20 24  44 30 30 31 0D 20 20 20  |   STA $D001.   |
00004960: 20 20 20 20 20 20 49 4E  43 20 54 4D 50 31 0D 49  |      INC TMP1.I|
00004970: 52 32 33 41 20 20 20 20  4A 4D 50 20 49 52 32 41  |R23A    JMP IR2A|
00004980: 0D 49 52 32 30 20 20 20  20 20 44 45 43 20 24 44  |.IR20     DEC $D|
00004990: 30 30 32 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |002.         LDA|
000049A0: 20 24 44 30 30 32 0D 20  20 20 20 20 20 20 20 20  | $D002.         |
000049B0: 43 4D 50 20 23 32 35 35  0D 20 20 20 20 20 20 20  |CMP #255.       |
000049C0: 20 20 42 4E 45 20 49 52  32 35 0D 20 20 20 20 20  |  BNE IR25.     |
000049D0: 20 20 20 20 4C 44 41 20  24 44 30 31 30 0D 20 20  |    LDA $D010.  |
000049E0: 20 20 20 20 20 20 20 41  4E 44 20 23 33 0D 20 20  |       AND #3.  |
000049F0: 20 20 20 20 20 20 20 42  4E 45 20 49 52 32 34 0D  |       BNE IR24.|
00004A00: 20 20 20 20 20 20 20 20  20 49 4E 43 20 24 44 30  |         INC $D0|
00004A10: 30 32 0D 20 20 20 20 20  20 20 20 20 4A 53 52 20  |02.         JSR |
00004A20: 53 45 54 4B 31 0D 20 20  20 20 20 20 20 20 20 4A  |SETK1.         J|
00004A30: 4D 50 20 49 52 32 41 0D  49 52 32 34 20 20 20 20  |MP IR2A.IR24    |
00004A40: 20 4C 44 41 20 24 44 30  31 30 0D 20 20 20 20 20  | LDA $D010.     |
00004A50: 20 20 20 20 41 4E 44 20  23 32 35 32 0D 20 20 20  |    AND #252.   |
00004A60: 20 20 20 20 20 20 53 54  41 20 24 44 30 31 30 0D  |      STA $D010.|
00004A70: 49 52 32 35 20 20 20 20  20 4C 44 41 20 24 30 37  |IR25     LDA $07|
00004A80: 46 39 0D 20 20 20 20 20  20 20 20 20 43 4D 50 20  |F9.         CMP |
00004A90: 23 32 31 33 0D 20 20 20  20 20 20 20 20 20 42 45  |#213.         BE|
00004AA0: 51 20 49 52 32 36 0D 20  20 20 20 20 20 20 20 20  |Q IR26.         |
00004AB0: 49 4E 43 20 24 30 37 46  39 0D 49 52 32 36 20 20  |INC $07F9.IR26  |
00004AC0: 20 20 20 44 45 43 20 4B  4E 54 31 0D 20 20 20 20  |   DEC KNT1.    |
00004AD0: 20 20 20 20 20 42 4E 45  20 49 52 32 36 41 0D 20  |     BNE IR26A. |
00004AE0: 20 20 20 20 20 20 20 20  4A 53 52 20 53 45 54 4B  |        JSR SETK|
00004AF0: 31 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 24  |1.         LDA $|
00004B00: 44 30 30 32 0D 20 20 20  20 20 20 20 20 20 53 54  |D002.         ST|
00004B10: 41 20 24 44 30 30 30 0D  20 20 20 20 20 20 20 20  |A $D000.        |
00004B20: 20 4C 44 41 20 23 31 32  34 0D 20 20 20 20 20 20  | LDA #124.      |
00004B30: 20 20 20 53 54 41 20 24  44 30 30 31 0D 20 20 20  |   STA $D001.   |
00004B40: 20 20 20 20 20 20 49 4E  43 20 54 4D 50 31 0D 49  |      INC TMP1.I|
00004B50: 52 32 36 41 20 20 20 20  4A 4D 50 20 49 52 32 41  |R26A    JMP IR2A|
00004B60: 0D 49 52 32 37 20 20 20  20 20 4C 44 41 20 24 30  |.IR27     LDA $0|
00004B70: 37 46 39 0D 20 20 20 20  20 20 20 20 20 43 4D 50  |7F9.         CMP|
00004B80: 20 23 32 30 38 0D 20 20  20 20 20 20 20 20 20 42  | #208.         B|
00004B90: 45 51 20 49 32 37 42 0D  20 20 20 20 20 20 20 20  |EQ I27B.        |
00004BA0: 20 42 43 43 20 49 32 37  41 0D 20 20 20 20 20 20  | BCC I27A.      |
00004BB0: 20 20 20 44 45 43 20 24  30 37 46 39 0D 20 20 20  |   DEC $07F9.   |
00004BC0: 20 20 20 20 20 20 4A 4D  50 20 49 52 32 41 0D 49  |      JMP IR2A.I|
00004BD0: 32 37 41 20 20 20 20 20  49 4E 43 20 24 30 37 46  |27A     INC $07F|
00004BE0: 39 0D 20 20 20 20 20 20  20 20 20 4A 4D 50 20 49  |9.         JMP I|
00004BF0: 52 32 41 0D 49 32 37 42  20 20 20 20 20 4C 44 41  |R2A.I27B     LDA|
00004C00: 20 24 44 30 31 35 0D 20  20 20 20 20 20 20 20 20  | $D015.         |
00004C10: 4F 52 41 20 23 31 0D 20  20 20 20 20 20 20 20 20  |ORA #1.         |
00004C20: 53 54 41 20 24 44 30 31  35 0D 20 20 20 20 20 20  |STA $D015.      |
00004C30: 20 20 20 49 4E 43 20 24  44 30 30 31 0D 20 20 20  |   INC $D001.   |
00004C40: 20 20 20 20 20 20 4C 44  41 20 24 44 30 30 31 0D  |      LDA $D001.|
00004C50: 20 20 20 20 20 20 20 20  20 43 4D 50 20 23 31 39  |         CMP #19|
00004C60: 30 0D 20 20 20 20 20 20  20 20 20 42 4E 45 20 49  |0.         BNE I|
00004C70: 52 32 41 0D 20 20 20 20  20 20 20 20 20 44 45 43  |R2A.         DEC|
00004C80: 20 54 4D 50 31 0D 20 20  20 20 20 20 20 20 20 4C  | TMP1.         L|
00004C90: 44 41 20 24 44 30 31 35  0D 20 20 20 20 20 20 20  |DA $D015.       |
00004CA0: 20 20 41 4E 44 20 23 32  35 34 0D 20 20 20 20 20  |  AND #254.     |
00004CB0: 20 20 20 20 53 54 41 20  24 44 30 31 35 0D 20 20  |    STA $D015.  |
00004CC0: 20 20 20 20 20 20 20 4C  44 41 20 23 32 0D 20 20  |       LDA #2.  |
00004CD0: 20 20 20 20 20 20 20 53  54 41 20 24 44 30 32 30  |       STA $D020|
00004CE0: 0D 20 20 20 20 20 20 20  20 20 4C 44 41 20 23 38  |.         LDA #8|
00004CF0: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 53 49  |.         STA SI|
00004D00: 44 2B 31 39 0D 20 20 20  20 20 20 20 20 20 4C 44  |D+19.         LD|
00004D10: 41 20 23 31 31 0D 20 20  20 20 20 20 20 20 20 53  |A #11.         S|
00004D20: 54 41 20 53 49 44 2B 32  30 0D 20 20 20 20 20 20  |TA SID+20.      |
00004D30: 20 20 20 4C 44 41 20 23  31 36 0D 20 20 20 20 20  |   LDA #16.     |
00004D40: 20 20 20 20 53 54 41 20  53 49 44 2B 31 34 0D 20  |    STA SID+14. |
00004D50: 20 20 20 20 20 20 20 20  4C 44 41 20 23 32 0D 20  |        LDA #2. |
00004D60: 20 20 20 20 20 20 20 20  53 54 41 20 53 49 44 2B  |        STA SID+|
00004D70: 31 35 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |15.         LDA |
00004D80: 23 31 32 39 0D 20 20 20  20 20 20 20 20 20 53 54  |#129.         ST|
00004D90: 41 20 53 49 44 2B 31 38  0D 20 20 20 20 20 20 20  |A SID+18.       |
00004DA0: 20 20 44 45 43 20 53 49  44 2B 31 38 0D 20 20 20  |  DEC SID+18.   |
00004DB0: 20 20 20 20 20 20 4C 44  41 20 53 4C 45 56 0D 20  |      LDA SLEV. |
00004DC0: 20 20 20 20 20 20 20 20  42 45 51 20 49 52 32 41  |        BEQ IR2A|
00004DD0: 0D 20 20 20 20 20 20 20  20 20 44 45 43 20 53 4C  |.         DEC SL|
00004DE0: 45 56 0D 20 20 20 20 20  20 20 20 20 4A 53 52 20  |EV.         JSR |
00004DF0: 4C 45 56 53 0D 49 52 32  41 20 20 20 20 20 4C 44  |LEVS.IR2A     LD|
00004E00: 41 20 41 54 54 32 0D 20  20 20 20 20 20 20 20 20  |A ATT2.         |
00004E10: 42 4E 45 20 49 32 39 0D  20 20 20 20 20 20 20 20  |BNE I29.        |
00004E20: 20 4A 4D 50 20 49 52 32  39 0D 49 32 39 20 20 20  | JMP IR29.I29   |
00004E30: 20 20 20 44 45 43 20 54  49 4D 35 0D 20 20 20 20  |   DEC TIM5.    |
00004E40: 20 20 20 20 20 42 45 51  20 49 49 51 30 0D 20 20  |     BEQ IIQ0.  |
00004E50: 20 20 20 20 20 20 20 4A  4D 50 20 49 52 32 39 0D  |       JMP IR29.|
00004E60: 49 49 51 30 20 20 20 20  20 4C 44 41 20 53 50 44  |IIQ0     LDA SPD|
00004E70: 32 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 54  |2.         STA T|
00004E80: 49 4D 35 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |IM5.         LDA|
00004E90: 20 54 4D 50 32 0D 20 20  20 20 20 20 20 20 20 42  | TMP2.         B|
00004EA0: 45 51 20 49 32 39 41 0D  20 20 20 20 20 20 20 20  |EQ I29A.        |
00004EB0: 20 4A 4D 50 20 49 52 41  37 0D 49 32 39 41 20 20  | JMP IRA7.I29A  |
00004EC0: 20 20 20 4C 44 41 20 59  33 0D 20 20 20 20 20 20  |   LDA Y3.      |
00004ED0: 20 20 20 42 45 51 20 49  52 41 30 0D 20 20 20 20  |   BEQ IRA0.    |
00004EE0: 20 20 20 20 20 49 4E 43  20 24 44 30 30 34 0D 20  |     INC $D004. |
00004EF0: 20 20 20 20 20 20 20 20  4C 44 41 20 24 44 30 30  |        LDA $D00|
00004F00: 34 0D 20 20 20 20 20 20  20 20 20 42 4E 45 20 49  |4.         BNE I|
00004F10: 52 41 31 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |RA1.         LDA|
00004F20: 20 24 44 30 31 30 0D 20  20 20 20 20 20 20 20 20  | $D010.         |
00004F30: 4F 52 41 20 23 31 32 0D  20 20 20 20 20 20 20 20  |ORA #12.        |
00004F40: 20 53 54 41 20 24 44 30  31 30 0D 49 52 41 31 20  | STA $D010.IRA1 |
00004F50: 20 20 20 20 4C 44 41 20  24 44 30 31 30 0D 20 20  |    LDA $D010.  |
00004F60: 20 20 20 20 20 20 20 41  4E 44 20 23 31 32 0D 20  |       AND #12. |
00004F70: 20 20 20 20 20 20 20 20  42 45 51 20 49 52 41 32  |        BEQ IRA2|
00004F80: 0D 20 20 20 20 20 20 20  20 20 4C 44 41 20 24 44  |.         LDA $D|
00004F90: 30 30 34 0D 20 20 20 20  20 20 20 20 20 43 4D 50  |004.         CMP|
00004FA0: 20 23 37 30 0D 20 20 20  20 20 20 20 20 20 42 4E  | #70.         BN|
00004FB0: 45 20 49 52 41 32 0D 20  20 20 20 20 20 20 20 20  |E IRA2.         |
00004FC0: 4A 53 52 20 53 45 54 4B  32 0D 20 20 20 20 20 20  |JSR SETK2.      |
00004FD0: 20 20 20 4A 4D 50 20 49  52 32 39 0D 49 52 41 32  |   JMP IR29.IRA2|
00004FE0: 20 20 20 20 20 4C 44 41  20 24 30 37 46 41 0D 20  |     LDA $07FA. |
00004FF0: 20 20 20 20 20 20 20 20  43 4D 50 20 23 32 30 33  |        CMP #203|
00005000: 0D 20 20 20 20 20 20 20  20 20 42 45 51 20 49 52  |.         BEQ IR|
00005010: 41 33 0D 20 20 20 20 20  20 20 20 20 44 45 43 20  |A3.         DEC |
00005020: 24 30 37 46 41 0D 49 52  41 33 20 20 20 20 20 44  |$07FA.IRA3     D|
00005030: 45 43 20 4B 4E 54 32 0D  20 20 20 20 20 20 20 20  |EC KNT2.        |
00005040: 20 42 4E 45 20 49 52 41  33 41 0D 20 20 20 20 20  | BNE IRA3A.     |
00005050: 20 20 20 20 4A 53 52 20  53 45 54 4B 32 0D 20 20  |    JSR SETK2.  |
00005060: 20 20 20 20 20 20 20 4C  44 41 20 24 44 30 30 34  |       LDA $D004|
00005070: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 24 44  |.         STA $D|
00005080: 30 30 36 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |006.         LDA|
00005090: 20 23 31 32 34 0D 20 20  20 20 20 20 20 20 20 53  | #124.         S|
000050A0: 54 41 20 24 44 30 30 37  0D 20 20 20 20 20 20 20  |TA $D007.       |
000050B0: 20 20 49 4E 43 20 54 4D  50 32 0D 49 52 41 33 41  |  INC TMP2.IRA3A|
000050C0: 20 20 20 20 4A 4D 50 20  49 52 32 39 0D 49 52 41  |    JMP IR29.IRA|
000050D0: 30 20 20 20 20 20 44 45  43 20 24 44 30 30 34 0D  |0     DEC $D004.|
000050E0: 20 20 20 20 20 20 20 20  20 4C 44 41 20 24 44 30  |         LDA $D0|
000050F0: 30 34 0D 20 20 20 20 20  20 20 20 20 43 4D 50 20  |04.         CMP |
00005100: 23 32 35 35 0D 20 20 20  20 20 20 20 20 20 42 4E  |#255.         BN|
00005110: 45 20 49 52 41 35 0D 20  20 20 20 20 20 20 20 20  |E IRA5.         |
00005120: 4C 44 41 20 24 44 30 31  30 0D 20 20 20 20 20 20  |LDA $D010.      |
00005130: 20 20 20 41 4E 44 20 23  31 32 0D 20 20 20 20 20  |   AND #12.     |
00005140: 20 20 20 20 42 4E 45 20  49 52 41 34 0D 20 20 20  |    BNE IRA4.   |
00005150: 20 20 20 20 20 20 49 4E  43 20 24 44 30 30 34 0D  |      INC $D004.|
00005160: 20 20 20 20 20 20 20 20  20 4A 53 52 20 53 45 54  |         JSR SET|
00005170: 4B 32 0D 20 20 20 20 20  20 20 20 20 4A 4D 50 20  |K2.         JMP |
00005180: 49 52 32 39 0D 49 52 41  34 20 20 20 20 20 4C 44  |IR29.IRA4     LD|
00005190: 41 20 24 44 30 31 30 0D  20 20 20 20 20 20 20 20  |A $D010.        |
000051A0: 20 41 4E 44 20 23 32 34  33 0D 20 20 20 20 20 20  | AND #243.      |
000051B0: 20 20 20 53 54 41 20 24  44 30 31 30 0D 49 52 41  |   STA $D010.IRA|
000051C0: 35 20 20 20 20 20 4C 44  41 20 24 30 37 46 41 0D  |5     LDA $07FA.|
000051D0: 20 20 20 20 20 20 20 20  20 43 4D 50 20 23 32 31  |         CMP #21|
000051E0: 33 0D 20 20 20 20 20 20  20 20 20 42 45 51 20 49  |3.         BEQ I|
000051F0: 52 41 36 0D 20 20 20 20  20 20 20 20 20 49 4E 43  |RA6.         INC|
00005200: 20 24 30 37 46 41 0D 49  52 41 36 20 20 20 20 20  | $07FA.IRA6     |
00005210: 44 45 43 20 4B 4E 54 32  0D 20 20 20 20 20 20 20  |DEC KNT2.       |
00005220: 20 20 42 4E 45 20 49 52  41 36 41 0D 20 20 20 20  |  BNE IRA6A.    |
00005230: 20 20 20 20 20 4A 53 52  20 53 45 54 4B 32 0D 20  |     JSR SETK2. |
00005240: 20 20 20 20 20 20 20 20  4C 44 41 20 24 44 30 30  |        LDA $D00|
00005250: 34 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 24  |4.         STA $|
00005260: 44 30 30 36 0D 20 20 20  20 20 20 20 20 20 4C 44  |D006.         LD|
00005270: 41 20 23 31 32 34 0D 20  20 20 20 20 20 20 20 20  |A #124.         |
00005280: 53 54 41 20 24 44 30 30  37 0D 20 20 20 20 20 20  |STA $D007.      |
00005290: 20 20 20 49 4E 43 20 54  4D 50 32 0D 49 52 41 36  |   INC TMP2.IRA6|
000052A0: 41 20 20 20 20 4A 4D 50  20 49 52 32 39 0D 49 52  |A    JMP IR29.IR|
000052B0: 41 37 20 20 20 20 20 4C  44 41 20 24 30 37 46 41  |A7     LDA $07FA|
000052C0: 0D 20 20 20 20 20 20 20  20 20 43 4D 50 20 23 32  |.         CMP #2|
000052D0: 30 38 0D 20 20 20 20 20  20 20 20 20 42 45 51 20  |08.         BEQ |
000052E0: 49 32 41 42 0D 20 20 20  20 20 20 20 20 20 42 43  |I2AB.         BC|
000052F0: 43 20 49 32 41 41 0D 20  20 20 20 20 20 20 20 20  |C I2AA.         |
00005300: 44 45 43 20 24 30 37 46  41 0D 20 20 20 20 20 20  |DEC $07FA.      |
00005310: 20 20 20 4A 4D 50 20 49  52 32 39 0D 49 32 41 41  |   JMP IR29.I2AA|
00005320: 20 20 20 20 20 49 4E 43  20 24 30 37 46 41 0D 20  |     INC $07FA. |
00005330: 20 20 20 20 20 20 20 20  4A 4D 50 20 49 52 32 39  |        JMP IR29|
00005340: 0D 49 32 41 42 20 20 20  20 20 4C 44 41 20 24 44  |.I2AB     LDA $D|
00005350: 30 31 35 0D 20 20 20 20  20 20 20 20 20 4F 52 41  |015.         ORA|
00005360: 20 23 38 0D 20 20 20 20  20 20 20 20 20 53 54 41  | #8.         STA|
00005370: 20 24 44 30 31 35 0D 20  20 20 20 20 20 20 20 20  | $D015.         |
00005380: 49 4E 43 20 24 44 30 30  37 0D 20 20 20 20 20 20  |INC $D007.      |
00005390: 20 20 20 4C 44 41 20 24  44 30 30 37 0D 20 20 20  |   LDA $D007.   |
000053A0: 20 20 20 20 20 20 43 4D  50 20 23 31 39 30 0D 20  |      CMP #190. |
000053B0: 20 20 20 20 20 20 20 20  42 4E 45 20 49 52 32 39  |        BNE IR29|
000053C0: 0D 20 20 20 20 20 20 20  20 20 44 45 43 20 54 4D  |.         DEC TM|
000053D0: 50 32 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |P2.         LDA |
000053E0: 24 44 30 31 35 0D 20 20  20 20 20 20 20 20 20 41  |$D015.         A|
000053F0: 4E 44 20 23 32 34 37 0D  20 20 20 20 20 20 20 20  |ND #247.        |
00005400: 20 53 54 41 20 24 44 30  31 35 0D 20 20 20 20 20  | STA $D015.     |
00005410: 20 20 20 20 4C 44 41 20  23 32 0D 20 20 20 20 20  |    LDA #2.     |
00005420: 20 20 20 20 53 54 41 20  24 44 30 32 30 0D 20 20  |    STA $D020.  |
00005430: 20 20 20 20 20 20 20 4C  44 41 20 23 35 0D 20 20  |       LDA #5.  |
00005440: 20 20 20 20 20 20 20 53  54 41 20 53 49 44 2B 31  |       STA SID+1|
00005450: 32 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 23  |2.         LDA #|
00005460: 31 31 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |11.         STA |
00005470: 53 49 44 2B 31 33 0D 20  20 20 20 20 20 20 20 20  |SID+13.         |
00005480: 4C 44 41 20 23 31 36 0D  20 20 20 20 20 20 20 20  |LDA #16.        |
00005490: 20 53 54 41 20 53 49 44  2B 37 0D 20 20 20 20 20  | STA SID+7.     |
000054A0: 20 20 20 20 4C 44 41 20  23 32 0D 20 20 20 20 20  |    LDA #2.     |
000054B0: 20 20 20 20 53 54 41 20  53 49 44 2B 38 0D 20 20  |    STA SID+8.  |
000054C0: 20 20 20 20 20 20 20 4C  44 41 20 23 31 32 39 0D  |       LDA #129.|
000054D0: 20 20 20 20 20 20 20 20  20 53 54 41 20 53 49 44  |         STA SID|
000054E0: 2B 31 31 0D 20 20 20 20  20 20 20 20 20 44 45 43  |+11.         DEC|
000054F0: 20 53 49 44 2B 31 31 0D  20 20 20 20 20 20 20 20  | SID+11.        |
00005500: 20 4C 44 41 20 53 4C 45  56 0D 20 20 20 20 20 20  | LDA SLEV.      |
00005510: 20 20 20 42 45 51 20 49  52 32 39 0D 20 20 20 20  |   BEQ IR29.    |
00005520: 20 20 20 20 20 44 45 43  20 53 4C 45 56 0D 20 20  |     DEC SLEV.  |
00005530: 20 20 20 20 20 20 20 4A  53 52 20 4C 45 56 53 0D  |       JSR LEVS.|
00005540: 49 52 32 39 20 20 20 20  20 4C 44 41 20 23 30 0D  |IR29     LDA #0.|
00005550: 20 20 20 20 20 20 20 20  20 53 54 41 20 24 44 30  |         STA $D0|
00005560: 31 32 0D 20 20 20 20 20  20 20 20 20 49 4E 43 20  |12.         INC |
00005570: 24 44 30 31 39 0D 20 20  20 20 20 20 20 20 20 4C  |$D019.         L|
00005580: 44 41 20 23 3C 49 52 51  31 0D 20 20 20 20 20 20  |DA #<IRQ1.      |
00005590: 20 20 20 53 54 41 20 24  30 33 31 34 0D 20 20 20  |   STA $0314.   |
000055A0: 20 20 20 20 20 20 4C 44  41 20 23 3E 49 52 51 31  |      LDA #>IRQ1|
000055B0: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 24 30  |.         STA $0|
000055C0: 33 31 35 0D 20 20 20 20  20 20 20 20 20 4A 4D 50  |315.         JMP|
000055D0: 20 24 45 41 38 31 0D 0D  43 48 4B 49 54 20 20 20  | $EA81..CHKIT   |
000055E0: 20 4C 44 41 20 23 30 20  20 20 20 3B 57 48 4F 53  | LDA #0    ;WHOS|
000055F0: 20 41 54 54 41 43 4B 49  4E 47 20 57 48 4F 3F 0D  | ATTACKING WHO?.|
00005600: 20 20 20 20 20 20 20 20  20 53 54 41 20 42 54 54  |         STA BTT|
00005610: 0D 20 20 20 20 20 20 20  20 20 4C 44 41 20 4E 4F  |.         LDA NO|
00005620: 4B 31 0D 20 20 20 20 20  20 20 20 20 42 45 51 20  |K1.         BEQ |
00005630: 47 4E 32 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |GN2.         LDA|
00005640: 20 53 58 0D 20 20 20 20  20 20 20 20 20 43 4D 50  | SX.         CMP|
00005650: 20 58 31 0D 20 20 20 20  20 20 20 20 20 42 4E 45  | X1.         BNE|
00005660: 20 47 4E 30 0D 20 20 20  20 20 20 20 20 20 4C 44  | GN0.         LD|
00005670: 41 20 53 59 0D 20 20 20  20 20 20 20 20 20 43 4D  |A SY.         CM|
00005680: 50 20 59 31 0D 20 20 20  20 20 20 20 20 20 42 4E  |P Y1.         BN|
00005690: 45 20 47 4E 30 0D 20 20  20 20 20 20 20 20 20 49  |E GN0.         I|
000056A0: 4E 43 20 42 54 54 0D 47  4E 30 20 20 20 20 20 20  |NC BTT.GN0      |
000056B0: 4C 44 41 20 53 58 0D 20  20 20 20 20 20 20 20 20  |LDA SX.         |
000056C0: 43 4D 50 20 58 32 0D 20  20 20 20 20 20 20 20 20  |CMP X2.         |
000056D0: 42 4E 45 20 47 4E 31 0D  20 20 20 20 20 20 20 20  |BNE GN1.        |
000056E0: 20 4C 44 41 20 53 59 0D  20 20 20 20 20 20 20 20  | LDA SY.        |
000056F0: 20 43 4D 50 20 59 32 0D  20 20 20 20 20 20 20 20  | CMP Y2.        |
00005700: 20 42 4E 45 20 47 4E 31  0D 20 20 20 20 20 20 20  | BNE GN1.       |
00005710: 20 20 49 4E 43 20 42 54  54 0D 47 4E 31 20 20 20  |  INC BTT.GN1   |
00005720: 20 20 20 4C 44 41 20 53  58 0D 20 20 20 20 20 20  |   LDA SX.      |
00005730: 20 20 20 43 4D 50 20 58  33 0D 20 20 20 20 20 20  |   CMP X3.      |
00005740: 20 20 20 42 4E 45 20 47  4E 32 0D 20 20 20 20 20  |   BNE GN2.     |
00005750: 20 20 20 20 4C 44 41 20  53 59 0D 20 20 20 20 20  |    LDA SY.     |
00005760: 20 20 20 20 43 4D 50 20  59 33 0D 20 20 20 20 20  |    CMP Y3.     |
00005770: 20 20 20 20 49 4E 43 20  42 54 54 0D 47 4E 32 20  |    INC BTT.GN2 |
00005780: 20 20 20 20 20 52 54 53  0D 0D 41 4C 45 52 54 20  |     RTS..ALERT |
00005790: 20 20 20 4A 53 52 20 45  52 41 53 45 20 20 3B 47  |   JSR ERASE  ;G|
000057A0: 4F 20 54 4F 20 52 45 44  20 41 4C 45 52 54 21 0D  |O TO RED ALERT!.|
000057B0: 20 20 20 20 20 20 20 20  20 4C 44 58 20 23 30 20  |         LDX #0 |
000057C0: 20 20 20 20 3B 54 48 49  53 20 49 53 20 4E 4F 54  |    ;THIS IS NOT|
000057D0: 20 41 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  | A.         LDA |
000057E0: 23 32 20 20 20 20 20 3B  44 52 49 4C 4C 21 21 0D  |#2     ;DRILL!!.|
000057F0: 41 4C 52 31 20 20 20 20  20 53 54 41 20 24 44 42  |ALR1     STA $DB|
00005800: 34 39 2C 58 0D 20 20 20  20 20 20 20 20 20 53 54  |49,X.         ST|
00005810: 41 20 24 44 42 37 31 2C  58 0D 20 20 20 20 20 20  |A $DB71,X.      |
00005820: 20 20 20 49 4E 58 0D 20  20 20 20 20 20 20 20 20  |   INX.         |
00005830: 43 50 58 20 23 33 39 0D  20 20 20 20 20 20 20 20  |CPX #39.        |
00005840: 20 42 4E 45 20 41 4C 52  31 0D 20 20 20 20 20 20  | BNE ALR1.      |
00005850: 20 20 20 4A 53 52 20 50  55 54 4C 4E 0D 20 20 20  |   JSR PUTLN.   |
00005860: 20 20 20 20 20 20 4A 53  52 20 41 4C 41 52 4D 0D  |      JSR ALARM.|
00005870: 20 20 20 20 20 20 20 20  20 4A 53 52 20 54 49 4D  |         JSR TIM|
00005880: 45 52 0D 20 20 20 20 20  20 20 20 20 4A 53 52 20  |ER.         JSR |
00005890: 41 4C 41 52 4D 0D 20 20  20 20 20 20 20 20 20 4A  |ALARM.         J|
000058A0: 53 52 20 54 49 4D 45 52  0D 20 20 20 20 20 20 20  |SR TIMER.       |
000058B0: 20 20 4A 53 52 20 41 4C  41 52 4D 0D 20 20 20 20  |  JSR ALARM.    |
000058C0: 20 20 20 20 20 4A 53 52  20 54 49 4D 45 52 0D 20  |     JSR TIMER. |
000058D0: 20 20 20 20 20 20 20 20  52 54 53 0D 0D 52 44 41  |        RTS..RDA|
000058E0: 4C 20 20 20 20 20 4C 44  41 20 23 30 0D 20 20 20  |L     LDA #0.   |
000058F0: 20 20 20 20 20 20 53 54  41 20 24 44 30 31 35 0D  |      STA $D015.|
00005900: 20 20 20 20 20 20 20 20  20 4C 44 41 20 23 24 34  |         LDA #$4|
00005910: 30 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 32  |0.         STA 2|
00005920: 35 32 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |52.         LDA |
00005930: 23 24 34 34 0D 20 20 20  20 20 20 20 20 20 53 54  |#$44.         ST|
00005940: 41 20 31 37 35 0D 20 20  20 20 20 20 20 20 20 4A  |A 175.         J|
00005950: 53 52 20 50 49 43 0D 20  20 20 20 20 20 20 20 20  |SR PIC.         |
00005960: 4C 44 58 20 23 30 0D 41  4C 52 30 20 20 20 20 20  |LDX #0.ALR0     |
00005970: 4C 44 41 20 41 4C 54 41  42 2C 58 0D 20 20 20 20  |LDA ALTAB,X.    |
00005980: 20 20 20 20 20 53 54 41  20 24 30 37 43 45 2C 58  |     STA $07CE,X|
00005990: 0D 20 20 20 20 20 20 20  20 20 4C 44 41 20 23 32  |.         LDA #2|
000059A0: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 24 44  |.         STA $D|
000059B0: 42 43 45 2C 58 0D 20 20  20 20 20 20 20 20 20 49  |BCE,X.         I|
000059C0: 4E 58 0D 20 20 20 20 20  20 20 20 20 43 50 58 20  |NX.         CPX |
000059D0: 23 35 0D 20 20 20 20 20  20 20 20 20 42 4E 45 20  |#5.         BNE |
000059E0: 41 4C 52 30 0D 20 20 20  20 20 20 20 20 20 4A 53  |ALR0.         JS|
000059F0: 52 20 45 52 41 53 45 0D  20 20 20 20 20 20 20 20  |R ERASE.        |
00005A00: 20 4C 44 41 20 23 35 30  0D 20 20 20 20 20 20 20  | LDA #50.       |
00005A10: 20 20 53 54 41 20 52 43  4E 54 0D 20 20 20 20 20  |  STA RCNT.     |
00005A20: 20 20 20 20 4A 53 52 20  53 54 41 52 53 0D 20 20  |    JSR STARS.  |
00005A30: 20 20 20 20 20 20 20 4A  53 52 20 4D 45 54 45 52  |       JSR METER|
00005A40: 0D 20 20 20 20 20 20 20  20 20 4C 44 58 20 23 30  |.         LDX #0|
00005A50: 0D 20 20 20 20 20 20 20  20 20 4C 44 41 20 23 32  |.         LDA #2|
00005A60: 0D 41 4C 52 32 20 20 20  20 20 53 54 41 20 24 44  |.ALR2     STA $D|
00005A70: 42 34 39 2C 58 0D 20 20  20 20 20 20 20 20 20 53  |B49,X.         S|
00005A80: 54 41 20 24 44 42 37 31  2C 58 0D 20 20 20 20 20  |TA $DB71,X.     |
00005A90: 20 20 20 20 49 4E 58 0D  20 20 20 20 20 20 20 20  |    INX.        |
00005AA0: 20 43 50 58 20 23 33 39  0D 20 20 20 20 20 20 20  | CPX #39.       |
00005AB0: 20 20 42 4E 45 20 41 4C  52 32 0D 20 20 20 20 20  |  BNE ALR2.     |
00005AC0: 20 20 20 20 4C 44 41 20  23 3C 4C 4E 38 0D 20 20  |    LDA #<LN8.  |
00005AD0: 20 20 20 20 20 20 20 53  54 41 20 31 37 34 0D 20  |       STA 174. |
00005AE0: 20 20 20 20 20 20 20 20  4C 44 41 20 23 3E 4C 4E  |        LDA #>LN|
00005AF0: 38 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 31  |8.         STA 1|
00005B00: 37 35 0D 20 20 20 20 20  20 20 20 20 4A 53 52 20  |75.         JSR |
00005B10: 50 55 54 4C 4E 0D 42 41  30 30 20 20 20 20 20 4C  |PUTLN.BA00     L|
00005B20: 44 58 20 23 31 20 20 20  20 20 20 20 3B 53 45 54  |DX #1       ;SET|
00005B30: 20 55 50 20 42 41 54 54  4C 45 2E 0D 20 20 20 20  | UP BATTLE..    |
00005B40: 20 20 20 20 20 4C 44 41  20 23 33 32 0D 42 41 54  |     LDA #32.BAT|
00005B50: 20 20 20 20 20 20 53 54  41 20 24 30 35 36 38 2C  |      STA $0568,|
00005B60: 58 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 24  |X.         STA $|
00005B70: 30 35 39 30 2C 58 0D 20  20 20 20 20 20 20 20 20  |0590,X.         |
00005B80: 49 4E 58 0D 20 20 20 20  20 20 20 20 20 43 50 58  |INX.         CPX|
00005B90: 20 23 33 38 0D 20 20 20  20 20 20 20 20 20 42 4E  | #38.         BN|
00005BA0: 45 20 42 41 54 0D 20 20  20 20 20 20 20 20 20 4C  |E BAT.         L|
00005BB0: 44 41 20 23 33 0D 20 20  20 20 20 20 20 20 20 53  |DA #3.         S|
00005BC0: 54 41 20 53 50 44 31 0D  20 20 20 20 20 20 20 20  |TA SPD1.        |
00005BD0: 20 53 54 41 20 53 50 44  32 0D 20 20 20 20 20 20  | STA SPD2.      |
00005BE0: 20 20 20 49 4E 43 20 52  4E 44 58 0D 20 20 20 20  |   INC RNDX.    |
00005BF0: 20 20 20 20 20 4C 44 58  20 52 4E 44 58 0D 20 20  |     LDX RNDX.  |
00005C00: 20 20 20 20 20 20 20 4C  44 41 20 24 32 45 30 30  |       LDA $2E00|
00005C10: 2C 58 0D 20 20 20 20 20  20 20 20 20 43 4D 50 20  |,X.         CMP |
00005C20: 23 39 0D 20 20 20 20 20  20 20 20 20 42 43 43 20  |#9.         BCC |
00005C30: 53 53 50 30 0D 20 20 20  20 20 20 20 20 20 4C 44  |SSP0.         LD|
00005C40: 41 20 23 32 0D 20 20 20  20 20 20 20 20 20 53 54  |A #2.         ST|
00005C50: 41 20 53 50 44 31 0D 53  53 50 30 20 20 20 20 20  |A SPD1.SSP0     |
00005C60: 49 4E 43 20 52 4E 44 58  0D 20 20 20 20 20 20 20  |INC RNDX.       |
00005C70: 20 20 4C 44 58 20 52 4E  44 58 0D 20 20 20 20 20  |  LDX RNDX.     |
00005C80: 20 20 20 20 4C 44 41 20  24 32 45 30 30 2C 58 0D  |    LDA $2E00,X.|
00005C90: 20 20 20 20 20 20 20 20  20 43 4D 50 20 23 39 0D  |         CMP #9.|
00005CA0: 20 20 20 20 20 20 20 20  20 42 43 43 20 53 53 50  |         BCC SSP|
00005CB0: 31 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 23  |1.         LDA #|
00005CC0: 32 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 53  |2.         STA S|
00005CD0: 50 44 32 0D 53 53 50 31  20 20 20 20 20 4C 44 41  |PD2.SSP1     LDA|
00005CE0: 20 23 36 0D 20 20 20 20  20 20 20 20 20 53 54 41  | #6.         STA|
00005CF0: 20 24 44 30 31 42 0D 20  20 20 20 20 20 20 20 20  | $D01B.         |
00005D00: 4C 44 41 20 23 32 30 38  0D 20 20 20 20 20 20 20  |LDA #208.       |
00005D10: 20 20 53 54 41 20 24 30  37 46 39 0D 20 20 20 20  |  STA $07F9.    |
00005D20: 20 20 20 20 20 53 54 41  20 24 30 37 46 41 0D 20  |     STA $07FA. |
00005D30: 20 20 20 20 20 20 20 20  4C 44 41 20 23 32 31 38  |        LDA #218|
00005D40: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 24 30  |.         STA $0|
00005D50: 37 46 38 0D 20 20 20 20  20 20 20 20 20 53 54 41  |7F8.         STA|
00005D60: 20 24 30 37 46 42 0D 20  20 20 20 20 20 20 20 20  | $07FB.         |
00005D70: 4C 44 41 20 23 37 0D 20  20 20 20 20 20 20 20 20  |LDA #7.         |
00005D80: 53 54 41 20 24 44 30 32  37 0D 20 20 20 20 20 20  |STA $D027.      |
00005D90: 20 20 20 53 54 41 20 24  44 30 32 41 0D 20 20 20  |   STA $D02A.   |
00005DA0: 20 20 20 20 20 20 4C 44  41 20 23 39 0D 20 20 20  |      LDA #9.   |
00005DB0: 20 20 20 20 20 20 53 54  41 20 24 44 30 31 43 0D  |      STA $D01C.|
00005DC0: 20 20 20 20 20 20 20 20  20 4C 44 41 20 24 44 30  |         LDA $D0|
00005DD0: 31 30 0D 20 20 20 20 20  20 20 20 20 41 4E 44 20  |10.         AND |
00005DE0: 23 32 34 30 0D 20 20 20  20 20 20 20 20 20 53 54  |#240.         ST|
00005DF0: 41 20 24 44 30 31 30 0D  20 20 20 20 20 20 20 20  |A $D010.        |
00005E00: 20 4C 44 41 20 23 31 32  38 0D 20 20 20 20 20 20  | LDA #128.      |
00005E10: 20 20 20 53 54 41 20 24  44 30 30 33 0D 20 20 20  |   STA $D003.   |
00005E20: 20 20 20 20 20 20 53 54  41 20 24 44 30 30 35 0D  |      STA $D005.|
00005E30: 20 20 20 20 20 20 20 20  20 4C 44 41 20 23 31 39  |         LDA #19|
00005E40: 32 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 24  |2.         STA $|
00005E50: 44 30 31 44 0D 20 20 20  20 20 20 20 20 20 4C 44  |D01D.         LD|
00005E60: 41 20 24 44 30 31 30 0D  20 20 20 20 20 20 20 20  |A $D010.        |
00005E70: 20 41 4E 44 20 23 32 34  39 0D 20 20 20 20 20 20  | AND #249.      |
00005E80: 20 20 20 53 54 41 20 24  44 30 31 30 0D 20 20 20  |   STA $D010.   |
00005E90: 20 20 20 20 20 20 4C 44  41 20 23 30 0D 20 20 20  |      LDA #0.   |
00005EA0: 20 20 20 20 20 20 53 54  41 20 24 44 30 30 32 0D  |      STA $D002.|
00005EB0: 20 20 20 20 20 20 20 20  20 53 54 41 20 24 44 30  |         STA $D0|
00005EC0: 30 34 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |04.         LDA |
00005ED0: 23 31 39 34 0D 20 20 20  20 20 20 20 20 20 4C 44  |#194.         LD|
00005EE0: 58 20 42 54 54 0D 20 20  20 20 20 20 20 20 20 43  |X BTT.         C|
00005EF0: 50 58 20 23 32 0D 20 20  20 20 20 20 20 20 20 42  |PX #2.         B|
00005F00: 43 43 20 42 41 54 30 0D  20 20 20 20 20 20 20 20  |CC BAT0.        |
00005F10: 20 49 4E 43 20 52 4E 44  58 0D 20 20 20 20 20 20  | INC RNDX.      |
00005F20: 20 20 20 4C 44 58 20 52  4E 44 58 0D 20 20 20 20  |   LDX RNDX.    |
00005F30: 20 20 20 20 20 4C 44 41  20 24 32 46 30 30 2C 58  |     LDA $2F00,X|
00005F40: 0D 20 20 20 20 20 20 20  20 20 43 4C 43 0D 20 20  |.         CLC.  |
00005F50: 20 20 20 20 20 20 20 41  44 43 20 23 31 37 30 0D  |       ADC #170.|
00005F60: 20 20 20 20 20 20 20 20  20 53 54 41 20 24 44 30  |         STA $D0|
00005F70: 30 34 0D 20 20 20 20 20  20 20 20 20 4A 53 52 20  |04.         JSR |
00005F80: 53 45 54 4B 32 0D 20 20  20 20 20 20 20 20 20 49  |SETK2.         I|
00005F90: 4E 43 20 41 54 54 32 0D  20 20 20 20 20 20 20 20  |NC ATT2.        |
00005FA0: 20 4C 44 41 20 23 31 39  38 0D 42 41 54 30 20 20  | LDA #198.BAT0  |
00005FB0: 20 20 20 53 54 41 20 24  44 30 31 35 0D 20 20 20  |   STA $D015.   |
00005FC0: 20 20 20 20 20 20 49 4E  43 20 52 4E 44 58 0D 20  |      INC RNDX. |
00005FD0: 20 20 20 20 20 20 20 20  4C 44 58 20 52 4E 44 58  |        LDX RNDX|
00005FE0: 0D 20 20 20 20 20 20 20  20 20 4C 44 41 20 24 32  |.         LDA $2|
00005FF0: 46 30 30 2C 58 0D 20 20  20 20 20 20 20 20 20 43  |F00,X.         C|
00006000: 4C 43 0D 20 20 20 20 20  20 20 20 20 41 44 43 20  |LC.         ADC |
00006010: 23 31 34 30 0D 20 20 20  20 20 20 20 20 20 53 54  |#140.         ST|
00006020: 41 20 24 44 30 30 32 0D  20 20 20 20 20 20 20 20  |A $D002.        |
00006030: 20 4A 53 52 20 53 45 54  4B 31 0D 20 20 20 20 20  | JSR SETK1.     |
00006040: 20 20 20 20 49 4E 43 20  41 54 54 31 0D 20 20 20  |    INC ATT1.   |
00006050: 20 20 20 20 20 20 4C 44  41 20 23 32 32 36 0D 20  |      LDA #226. |
00006060: 20 20 20 20 20 20 20 20  53 54 41 20 24 30 37 46  |        STA $07F|
00006070: 43 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 23  |C.         LDA #|
00006080: 32 31 34 0D 20 20 20 20  20 20 20 20 20 53 54 41  |214.         STA|
00006090: 20 24 30 37 46 44 0D 20  20 20 20 20 20 20 20 20  | $07FD.         |
000060A0: 4C 44 41 20 23 31 0D 20  20 20 20 20 20 20 20 20  |LDA #1.         |
000060B0: 53 54 41 20 24 44 30 32  42 0D 20 20 20 20 20 20  |STA $D02B.      |
000060C0: 20 20 20 4C 44 41 20 23  32 0D 20 20 20 20 20 20  |   LDA #2.      |
000060D0: 20 20 20 53 54 41 20 24  44 30 32 43 0D 20 20 20  |   STA $D02C.   |
000060E0: 20 20 20 20 20 20 4C 44  41 20 24 44 30 31 43 0D  |      LDA $D01C.|
000060F0: 20 20 20 20 20 20 20 20  20 4F 52 41 20 23 33 32  |         ORA #32|
00006100: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 24 44  |.         STA $D|
00006110: 30 31 43 0D 50 48 4F 20  20 20 20 20 20 4C 44 41  |01C.PHO      LDA|
00006120: 20 23 31 37 30 20 20 20  20 20 3B 46 49 47 48 54  | #170     ;FIGHT|
00006130: 20 4F 52 20 44 49 45 2E  2E 2E 0D 20 20 20 20 20  | OR DIE....     |
00006140: 20 20 20 20 53 54 41 20  24 44 30 30 38 0D 20 20  |    STA $D008.  |
00006150: 20 20 20 20 20 20 20 4C  44 41 20 24 44 30 31 30  |       LDA $D010|
00006160: 0D 20 20 20 20 20 20 20  20 20 41 4E 44 20 23 32  |.         AND #2|
00006170: 30 37 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |07.         STA |
00006180: 24 44 30 31 30 0D 20 20  20 20 20 20 20 20 20 4C  |$D010.         L|
00006190: 44 41 20 23 31 32 34 0D  20 20 20 20 20 20 20 20  |DA #124.        |
000061A0: 20 53 54 41 20 24 44 30  30 39 0D 20 20 20 20 20  | STA $D009.     |
000061B0: 20 20 20 20 4C 44 41 20  23 31 39 32 0D 20 20 20  |    LDA #192.   |
000061C0: 20 20 20 20 20 20 53 54  41 20 24 44 30 30 42 0D  |      STA $D00B.|
000061D0: 20 20 20 20 20 20 20 20  20 4C 44 41 20 24 44 30  |         LDA $D0|
000061E0: 31 35 0D 20 20 20 20 20  20 20 20 20 41 4E 44 20  |15.         AND |
000061F0: 23 32 30 37 0D 20 20 20  20 20 20 20 20 20 4F 52  |#207.         OR|
00006200: 41 20 23 31 36 0D 20 20  20 20 20 20 20 20 20 53  |A #16.         S|
00006210: 54 41 20 24 44 30 31 35  0D 20 20 20 20 20 20 20  |TA $D015.       |
00006220: 20 20 4C 44 41 20 23 37  0D 20 20 20 20 20 20 20  |  LDA #7.       |
00006230: 20 20 53 54 41 20 54 49  4D 33 0D 46 42 54 20 20  |  STA TIM3.FBT  |
00006240: 20 20 20 20 4A 53 52 20  54 49 4D 45 52 0D 20 20  |    JSR TIMER.  |
00006250: 20 20 20 20 20 20 20 4C  44 41 20 53 4C 45 56 0D  |       LDA SLEV.|
00006260: 20 20 20 20 20 20 20 20  20 42 4E 45 20 46 42 54  |         BNE FBT|
00006270: 41 0D 20 20 20 20 20 20  20 20 20 4A 53 52 20 41  |A.         JSR A|
00006280: 4C 41 52 4D 0D 20 20 20  20 20 20 20 20 20 4A 53  |LARM.         JS|
00006290: 52 20 4C 57 41 49 54 0D  20 20 20 20 20 20 20 20  |R LWAIT.        |
000062A0: 20 4A 53 52 20 4C 57 41  49 54 0D 20 20 20 20 20  | JSR LWAIT.     |
000062B0: 20 20 20 20 4C 44 41 20  23 32 0D 20 20 20 20 20  |    LDA #2.     |
000062C0: 20 20 20 20 53 54 41 20  43 4F 44 0D 20 20 20 20  |    STA COD.    |
000062D0: 20 20 20 20 20 4A 4D 50  20 44 45 41 44 0D 46 42  |     JMP DEAD.FB|
000062E0: 54 41 20 20 20 20 20 4C  44 41 20 24 44 43 30 30  |TA     LDA $DC00|
000062F0: 20 20 20 3B 47 4F 4E 4E  41 20 46 49 52 45 20 54  |   ;GONNA FIRE T|
00006300: 48 45 0D 20 20 20 20 20  20 20 20 20 41 4E 44 20  |HE.         AND |
00006310: 23 31 36 20 20 20 20 20  3B 57 45 41 50 4F 4E 53  |#16     ;WEAPONS|
00006320: 20 4F 52 20 4E 4F 54 3F  0D 20 20 20 20 20 20 20  | OR NOT?.       |
00006330: 20 20 42 4E 45 20 46 42  54 30 0D 20 20 20 20 20  |  BNE FBT0.     |
00006340: 20 20 20 20 4A 4D 50 20  45 46 49 52 45 0D 46 42  |    JMP EFIRE.FB|
00006350: 54 30 20 20 20 20 20 4C  44 41 20 24 44 43 30 30  |T0     LDA $DC00|
00006360: 0D 20 20 20 20 20 20 20  20 20 41 4E 44 20 23 31  |.         AND #1|
00006370: 35 0D 20 20 20 20 20 20  20 20 20 43 4D 50 20 23  |5.         CMP #|
00006380: 37 0D 20 20 20 20 20 20  20 20 20 42 4E 45 20 46  |7.         BNE F|
00006390: 42 54 31 0D 20 20 20 20  20 20 20 20 20 49 4E 43  |BT1.         INC|
000063A0: 20 24 44 30 30 38 0D 20  20 20 20 20 20 20 20 20  | $D008.         |
000063B0: 4C 44 41 20 24 44 30 30  38 0D 20 20 20 20 20 20  |LDA $D008.      |
000063C0: 20 20 20 42 45 51 20 46  42 54 30 41 0D 20 20 20  |   BEQ FBT0A.   |
000063D0: 20 20 20 20 20 20 43 4D  50 20 23 37 30 0D 20 20  |      CMP #70.  |
000063E0: 20 20 20 20 20 20 20 42  4E 45 20 46 42 54 0D 20  |       BNE FBT. |
000063F0: 20 20 20 20 20 20 20 20  4C 44 41 20 24 44 30 31  |        LDA $D01|
00006400: 30 0D 20 20 20 20 20 20  20 20 20 41 4E 44 20 23  |0.         AND #|
00006410: 31 36 0D 20 20 20 20 20  20 20 20 20 42 4E 45 20  |16.         BNE |
00006420: 46 42 54 32 0D 20 20 20  20 20 20 20 20 20 4A 4D  |FBT2.         JM|
00006430: 50 20 46 42 54 0D 46 42  54 30 41 20 20 20 20 4C  |P FBT.FBT0A    L|
00006440: 44 41 20 24 44 30 31 30  0D 20 20 20 20 20 20 20  |DA $D010.       |
00006450: 20 20 4F 52 41 20 23 31  36 0D 20 20 20 20 20 20  |  ORA #16.      |
00006460: 20 20 20 53 54 41 20 24  44 30 31 30 0D 20 20 20  |   STA $D010.   |
00006470: 20 20 20 20 20 20 4A 4D  50 20 46 42 54 0D 46 42  |      JMP FBT.FB|
00006480: 54 31 20 20 20 20 20 43  4D 50 20 23 31 31 0D 20  |T1     CMP #11. |
00006490: 20 20 20 20 20 20 20 20  42 4E 45 20 46 42 54 0D  |        BNE FBT.|
000064A0: 20 20 20 20 20 20 20 20  20 44 45 43 20 24 44 30  |         DEC $D0|
000064B0: 30 38 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |08.         LDA |
000064C0: 24 44 30 30 38 0D 20 20  20 20 20 20 20 20 20 43  |$D008.         C|
000064D0: 4D 50 20 23 32 35 35 0D  20 20 20 20 20 20 20 20  |MP #255.        |
000064E0: 20 42 4E 45 20 46 42 54  0D 20 20 20 20 20 20 20  | BNE FBT.       |
000064F0: 20 20 4C 44 41 20 24 44  30 31 30 0D 20 20 20 20  |  LDA $D010.    |
00006500: 20 20 20 20 20 41 4E 44  20 23 31 36 0D 20 20 20  |     AND #16.   |
00006510: 20 20 20 20 20 20 42 45  51 20 46 42 54 32 0D 20  |      BEQ FBT2. |
00006520: 20 20 20 20 20 20 20 20  4C 44 41 20 24 44 30 31  |        LDA $D01|
00006530: 30 0D 20 20 20 20 20 20  20 20 20 41 4E 44 20 23  |0.         AND #|
00006540: 32 30 37 0D 20 20 20 20  20 20 20 20 20 53 54 41  |207.         STA|
00006550: 20 24 44 30 31 30 0D 20  20 20 20 20 20 20 20 20  | $D010.         |
00006560: 4A 4D 50 20 46 42 54 0D  46 42 54 32 20 20 20 20  |JMP FBT.FBT2    |
00006570: 20 4C 44 41 20 23 31 37  30 0D 20 20 20 20 20 20  | LDA #170.      |
00006580: 20 20 20 53 54 41 20 24  44 30 30 38 0D 20 20 20  |   STA $D008.   |
00006590: 20 20 20 20 20 20 4C 44  41 20 24 44 30 31 30 0D  |      LDA $D010.|
000065A0: 20 20 20 20 20 20 20 20  20 41 4E 44 20 23 32 30  |         AND #20|
000065B0: 37 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 24  |7.         STA $|
000065C0: 44 30 31 30 0D 20 20 20  20 20 20 20 20 20 42 4E  |D010.         BN|
000065D0: 45 20 46 42 54 0D 45 46  49 52 45 20 20 20 20 4C  |E FBT.EFIRE    L|
000065E0: 44 41 20 24 44 30 31 35  20 20 20 20 3B 50 48 4F  |DA $D015    ;PHO|
000065F0: 54 4F 4E 20 54 4F 52 50  45 44 4F 0D 20 20 20 20  |TON TORPEDO.    |
00006600: 20 20 20 20 20 41 4E 44  20 23 32 33 39 20 20 20  |     AND #239   |
00006610: 20 20 3B 41 57 41 59 2E  2E 2E 0D 20 20 20 20 20  |  ;AWAY....     |
00006620: 20 20 20 20 53 54 41 20  24 44 30 31 35 0D 20 20  |    STA $D015.  |
00006630: 20 20 20 20 20 20 20 4C  44 41 20 24 44 30 30 38  |       LDA $D008|
00006640: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 24 44  |.         STA $D|
00006650: 30 30 41 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |00A.         LDA|
00006660: 20 24 44 30 31 30 0D 20  20 20 20 20 20 20 20 20  | $D010.         |
00006670: 41 4E 44 20 23 31 36 0D  20 20 20 20 20 20 20 20  |AND #16.        |
00006680: 20 42 45 51 20 45 46 30  0D 20 20 20 20 20 20 20  | BEQ EF0.       |
00006690: 20 20 4C 44 41 20 24 44  30 31 30 0D 20 20 20 20  |  LDA $D010.    |
000066A0: 20 20 20 20 20 4F 52 41  20 23 33 32 0D 20 20 20  |     ORA #32.   |
000066B0: 20 20 20 20 20 20 53 54  41 20 24 44 30 31 30 0D  |      STA $D010.|
000066C0: 45 46 30 20 20 20 20 20  20 4C 44 41 20 24 44 30  |EF0      LDA $D0|
000066D0: 31 35 0D 20 20 20 20 20  20 20 20 20 4F 52 41 20  |15.         ORA |
000066E0: 23 33 32 0D 20 20 20 20  20 20 20 20 20 53 54 41  |#32.         STA|
000066F0: 20 24 44 30 31 35 0D 45  46 31 20 20 20 20 20 20  | $D015.EF1      |
00006700: 4A 53 52 20 54 49 4D 45  52 0D 20 20 20 20 20 20  |JSR TIMER.      |
00006710: 20 20 20 49 4E 43 20 24  30 37 46 44 0D 20 20 20  |   INC $07FD.   |
00006720: 20 20 20 20 20 20 4C 44  41 20 24 30 37 46 44 0D  |      LDA $07FD.|
00006730: 20 20 20 20 20 20 20 20  20 43 4D 50 20 23 32 32  |         CMP #22|
00006740: 35 0D 20 20 20 20 20 20  20 20 20 42 4E 45 20 45  |5.         BNE E|
00006750: 46 31 41 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |F1A.         LDA|
00006760: 20 23 32 31 34 0D 20 20  20 20 20 20 20 20 20 53  | #214.         S|
00006770: 54 41 20 24 30 37 46 44  0D 45 46 31 41 20 20 20  |TA $07FD.EF1A   |
00006780: 20 20 44 45 43 20 24 44  30 30 42 0D 20 20 20 20  |  DEC $D00B.    |
00006790: 20 20 20 20 20 4C 44 41  20 24 44 30 30 42 0D 20  |     LDA $D00B. |
000067A0: 20 20 20 20 20 20 20 20  43 4D 50 20 24 44 30 30  |        CMP $D00|
000067B0: 39 0D 20 20 20 20 20 20  20 20 20 42 4E 45 20 45  |9.         BNE E|
000067C0: 46 31 0D 20 20 20 20 20  20 20 20 20 4C 44 58 20  |F1.         LDX |
000067D0: 24 44 30 30 41 0D 20 20  20 20 20 20 20 20 20 43  |$D00A.         C|
000067E0: 50 58 20 24 44 30 30 32  0D 20 20 20 20 20 20 20  |PX $D002.       |
000067F0: 20 20 42 45 51 20 48 49  54 31 0D 20 20 20 20 20  |  BEQ HIT1.     |
00006800: 20 20 20 20 44 45 58 0D  20 20 20 20 20 20 20 20  |    DEX.        |
00006810: 20 43 50 58 20 24 44 30  30 32 0D 20 20 20 20 20  | CPX $D002.     |
00006820: 20 20 20 20 42 45 51 20  48 49 54 31 0D 20 20 20  |    BEQ HIT1.   |
00006830: 20 20 20 20 20 20 49 4E  58 0D 20 20 20 20 20 20  |      INX.      |
00006840: 20 20 20 49 4E 58 0D 20  20 20 20 20 20 20 20 20  |   INX.         |
00006850: 43 50 58 20 24 44 30 30  32 0D 20 20 20 20 20 20  |CPX $D002.      |
00006860: 20 20 20 42 45 51 20 48  49 54 31 0D 20 20 20 20  |   BEQ HIT1.    |
00006870: 20 20 20 20 20 4C 44 58  20 24 44 30 30 41 0D 20  |     LDX $D00A. |
00006880: 20 20 20 20 20 20 20 20  43 50 58 20 24 44 30 30  |        CPX $D00|
00006890: 34 0D 20 20 20 20 20 20  20 20 20 42 45 51 20 48  |4.         BEQ H|
000068A0: 49 54 4B 32 0D 20 20 20  20 20 20 20 20 20 44 45  |ITK2.         DE|
000068B0: 58 0D 20 20 20 20 20 20  20 20 20 43 50 58 20 24  |X.         CPX $|
000068C0: 44 30 30 34 0D 20 20 20  20 20 20 20 20 20 42 45  |D004.         BE|
000068D0: 51 20 48 49 54 4B 32 0D  20 20 20 20 20 20 20 20  |Q HITK2.        |
000068E0: 20 49 4E 58 0D 20 20 20  20 20 20 20 20 20 49 4E  | INX.         IN|
000068F0: 58 0D 20 20 20 20 20 20  20 20 20 43 50 58 20 24  |X.         CPX $|
00006900: 44 30 30 34 0D 20 20 20  20 20 20 20 20 20 42 45  |D004.         BE|
00006910: 51 20 48 49 54 4B 32 0D  20 20 20 20 20 20 20 20  |Q HITK2.        |
00006920: 20 4A 4D 50 20 50 48 4F  0D 48 49 54 31 20 20 20  | JMP PHO.HIT1   |
00006930: 20 20 4A 4D 50 20 48 49  54 4B 31 20 20 20 20 3B  |  JMP HITK1    ;|
00006940: 47 4F 54 20 45 4D 21 0D  48 49 54 4B 32 20 20 20  |GOT EM!.HITK2   |
00006950: 20 4C 44 41 20 24 44 30  31 32 0D 20 20 20 20 20  | LDA $D012.     |
00006960: 20 20 20 20 42 4E 45 20  48 49 54 4B 32 0D 20 20  |    BNE HITK2.  |
00006970: 20 20 20 20 20 20 20 53  54 41 20 41 54 54 32 0D  |       STA ATT2.|
00006980: 20 20 20 20 20 20 20 20  20 4C 44 41 20 24 44 30  |         LDA $D0|
00006990: 31 43 0D 20 20 20 20 20  20 20 20 20 4F 52 41 20  |1C.         ORA |
000069A0: 23 34 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |#4.         STA |
000069B0: 24 44 30 31 43 0D 20 20  20 20 20 20 20 20 20 4C  |$D01C.         L|
000069C0: 44 41 20 23 32 33 32 0D  20 20 20 20 20 20 20 20  |DA #232.        |
000069D0: 20 53 54 41 20 24 30 37  46 41 0D 20 20 20 20 20  | STA $07FA.     |
000069E0: 20 20 20 20 4C 44 41 20  24 44 30 31 35 0D 20 20  |    LDA $D015.  |
000069F0: 20 20 20 20 20 20 20 45  4F 52 20 23 33 32 0D 20  |       EOR #32. |
00006A00: 20 20 20 20 20 20 20 20  53 54 41 20 24 44 30 31  |        STA $D01|
00006A10: 35 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 23  |5.         LDA #|
00006A20: 31 32 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |12.         STA |
00006A30: 53 49 44 2B 35 0D 20 20  20 20 20 20 20 20 20 4C  |SID+5.         L|
00006A40: 44 41 20 23 24 46 42 0D  20 20 20 20 20 20 20 20  |DA #$FB.        |
00006A50: 20 53 54 41 20 53 49 44  2B 36 0D 20 20 20 20 20  | STA SID+6.     |
00006A60: 20 20 20 20 4C 44 41 20  23 24 46 46 0D 20 20 20  |    LDA #$FF.   |
00006A70: 20 20 20 20 20 20 53 54  41 20 53 49 44 0D 20 20  |      STA SID.  |
00006A80: 20 20 20 20 20 20 20 4C  44 41 20 23 31 0D 20 20  |       LDA #1.  |
00006A90: 20 20 20 20 20 20 20 53  54 41 20 53 49 44 2B 31  |       STA SID+1|
00006AA0: 0D 20 20 20 20 20 20 20  20 20 4C 44 41 20 23 31  |.         LDA #1|
00006AB0: 32 39 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |29.         STA |
00006AC0: 53 49 44 2B 34 0D 20 20  20 20 20 20 20 20 20 44  |SID+4.         D|
00006AD0: 45 43 20 53 49 44 2B 34  0D 20 20 20 20 20 20 20  |EC SID+4.       |
00006AE0: 20 20 4C 44 41 20 23 31  0D 20 20 20 20 20 20 20  |  LDA #1.       |
00006AF0: 20 20 53 54 41 20 24 44  30 32 39 0D 20 20 20 20  |  STA $D029.    |
00006B00: 20 20 20 20 20 4C 44 41  20 23 31 30 0D 20 20 20  |     LDA #10.   |
00006B10: 20 20 20 20 20 20 53 54  41 20 54 49 4D 33 0D 20  |      STA TIM3. |
00006B20: 20 20 20 20 20 20 20 20  53 54 41 20 45 43 4E 54  |        STA ECNT|
00006B30: 0D 42 4C 4F 32 20 20 20  20 20 4A 53 52 20 54 49  |.BLO2     JSR TI|
00006B40: 4D 45 52 0D 20 20 20 20  20 20 20 20 20 49 4E 43  |MER.         INC|
00006B50: 20 24 30 37 46 41 0D 20  20 20 20 20 20 20 20 20  | $07FA.         |
00006B60: 44 45 43 20 45 43 4E 54  0D 20 20 20 20 20 20 20  |DEC ECNT.       |
00006B70: 20 20 42 4E 45 20 42 4C  4F 32 0D 20 20 20 20 20  |  BNE BLO2.     |
00006B80: 20 20 20 20 4C 44 41 20  24 44 30 31 35 0D 20 20  |    LDA $D015.  |
00006B90: 20 20 20 20 20 20 20 41  4E 44 20 23 32 31 31 0D  |       AND #211.|
00006BA0: 20 20 20 20 20 20 20 20  20 53 54 41 20 24 44 30  |         STA $D0|
00006BB0: 31 35 0D 20 20 20 20 20  20 20 20 20 44 45 43 20  |15.         DEC |
00006BC0: 42 54 54 0D 20 20 20 20  20 20 20 20 20 4C 44 58  |BTT.         LDX|
00006BD0: 20 54 45 4D 50 32 0D 20  20 20 20 20 20 20 20 20  | TEMP2.         |
00006BE0: 44 45 43 20 47 41 4C 54  41 42 2C 58 0D 20 20 20  |DEC GALTAB,X.   |
00006BF0: 20 20 20 20 20 20 4C 44  41 20 23 30 0D 20 20 20  |      LDA #0.   |
00006C00: 20 20 20 20 20 20 53 54  41 20 24 44 30 30 34 0D  |      STA $D004.|
00006C10: 20 20 20 20 20 20 20 20  20 44 45 43 20 4B 43 4E  |         DEC KCN|
00006C20: 54 0D 20 20 20 20 20 20  20 20 20 4A 4D 50 20 44  |T.         JMP D|
00006C30: 43 48 0D 0D 48 49 54 4B  31 20 20 20 20 4C 44 41  |CH..HITK1    LDA|
00006C40: 20 24 44 30 31 32 20 20  20 3B 47 4F 54 20 54 48  | $D012   ;GOT TH|
00006C50: 49 53 20 4F 4E 45 20 54  4F 4F 2E 0D 20 20 20 20  |IS ONE TOO..    |
00006C60: 20 20 20 20 20 42 4E 45  20 48 49 54 4B 31 0D 20  |     BNE HITK1. |
00006C70: 20 20 20 20 20 20 20 20  53 54 41 20 41 54 54 31  |        STA ATT1|
00006C80: 0D 20 20 20 20 20 20 20  20 20 4C 44 41 20 24 44  |.         LDA $D|
00006C90: 30 31 43 0D 20 20 20 20  20 20 20 20 20 4F 52 41  |01C.         ORA|
00006CA0: 20 23 32 0D 20 20 20 20  20 20 20 20 20 53 54 41  | #2.         STA|
00006CB0: 20 24 44 30 31 43 0D 20  20 20 20 20 20 20 20 20  | $D01C.         |
00006CC0: 4C 44 41 20 23 32 33 32  0D 20 20 20 20 20 20 20  |LDA #232.       |
00006CD0: 20 20 53 54 41 20 24 30  37 46 39 0D 20 20 20 20  |  STA $07F9.    |
00006CE0: 20 20 20 20 20 4C 44 41  20 24 44 30 31 35 0D 20  |     LDA $D015. |
00006CF0: 20 20 20 20 20 20 20 20  45 4F 52 20 23 33 32 0D  |        EOR #32.|
00006D00: 20 20 20 20 20 20 20 20  20 53 54 41 20 24 44 30  |         STA $D0|
00006D10: 31 35 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |15.         LDA |
00006D20: 23 31 32 0D 20 20 20 20  20 20 20 20 20 53 54 41  |#12.         STA|
00006D30: 20 53 49 44 2B 35 0D 20  20 20 20 20 20 20 20 20  | SID+5.         |
00006D40: 4C 44 41 20 23 24 46 42  0D 20 20 20 20 20 20 20  |LDA #$FB.       |
00006D50: 20 20 53 54 41 20 53 49  44 2B 36 0D 20 20 20 20  |  STA SID+6.    |
00006D60: 20 20 20 20 20 4C 44 41  20 23 24 46 46 0D 20 20  |     LDA #$FF.  |
00006D70: 20 20 20 20 20 20 20 53  54 41 20 53 49 44 0D 20  |       STA SID. |
00006D80: 20 20 20 20 20 20 20 20  4C 44 41 20 23 31 0D 20  |        LDA #1. |
00006D90: 20 20 20 20 20 20 20 20  53 54 41 20 53 49 44 2B  |        STA SID+|
00006DA0: 31 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 23  |1.         LDA #|
00006DB0: 31 32 39 0D 20 20 20 20  20 20 20 20 20 53 54 41  |129.         STA|
00006DC0: 20 53 49 44 2B 34 0D 20  20 20 20 20 20 20 20 20  | SID+4.         |
00006DD0: 44 45 43 20 53 49 44 2B  34 0D 20 20 20 20 20 20  |DEC SID+4.      |
00006DE0: 20 20 20 4C 44 41 20 23  31 0D 20 20 20 20 20 20  |   LDA #1.      |
00006DF0: 20 20 20 53 54 41 20 24  44 30 32 38 0D 20 20 20  |   STA $D028.   |
00006E00: 20 20 20 20 20 20 4C 44  41 20 23 31 30 0D 20 20  |      LDA #10.  |
00006E10: 20 20 20 20 20 20 20 53  54 41 20 54 49 4D 33 0D  |       STA TIM3.|
00006E20: 20 20 20 20 20 20 20 20  20 53 54 41 20 45 43 4E  |         STA ECN|
00006E30: 54 0D 42 4C 4F 31 20 20  20 20 20 4A 53 52 20 54  |T.BLO1     JSR T|
00006E40: 49 4D 45 52 0D 20 20 20  20 20 20 20 20 20 49 4E  |IMER.         IN|
00006E50: 43 20 24 30 37 46 39 0D  20 20 20 20 20 20 20 20  |C $07F9.        |
00006E60: 20 44 45 43 20 45 43 4E  54 0D 20 20 20 20 20 20  | DEC ECNT.      |
00006E70: 20 20 20 42 4E 45 20 42  4C 4F 31 0D 20 20 20 20  |   BNE BLO1.    |
00006E80: 20 20 20 20 20 4C 44 41  20 24 44 30 31 35 0D 20  |     LDA $D015. |
00006E90: 20 20 20 20 20 20 20 20  41 4E 44 20 23 32 35 32  |        AND #252|
00006EA0: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 24 44  |.         STA $D|
00006EB0: 30 31 35 0D 20 20 20 20  20 20 20 20 20 44 45 43  |015.         DEC|
00006EC0: 20 42 54 54 0D 20 20 20  20 20 20 20 20 20 4C 44  | BTT.         LD|
00006ED0: 58 20 54 45 4D 50 32 0D  20 20 20 20 20 20 20 20  |X TEMP2.        |
00006EE0: 20 44 45 43 20 47 41 4C  54 41 42 2C 58 0D 20 20  | DEC GALTAB,X.  |
00006EF0: 20 20 20 20 20 20 20 4C  44 41 20 23 30 0D 20 20  |       LDA #0.  |
00006F00: 20 20 20 20 20 20 20 53  54 41 20 24 44 30 30 32  |       STA $D002|
00006F10: 0D 20 20 20 20 20 20 20  20 20 44 45 43 20 4B 43  |.         DEC KC|
00006F20: 4E 54 0D 44 43 48 20 20  20 20 20 20 4C 44 41 20  |NT.DCH      LDA |
00006F30: 42 54 54 0D 20 20 20 20  20 20 20 20 20 42 45 51  |BTT.         BEQ|
00006F40: 20 52 43 56 0D 20 20 20  20 20 20 20 20 20 4A 4D  | RCV.         JM|
00006F50: 50 20 50 48 4F 0D 0D 52  43 56 20 20 20 20 20 20  |P PHO..RCV      |
00006F60: 4C 44 41 20 23 30 20 20  20 20 20 20 3B 52 45 43  |LDA #0      ;REC|
00006F70: 4F 56 45 52 2E 0D 20 20  20 20 20 20 20 20 20 53  |OVER..         S|
00006F80: 54 41 20 58 31 0D 20 20  20 20 20 20 20 20 20 53  |TA X1.         S|
00006F90: 54 41 20 58 32 0D 20 20  20 20 20 20 20 20 20 53  |TA X2.         S|
00006FA0: 54 41 20 58 33 0D 20 20  20 20 20 20 20 20 20 53  |TA X3.         S|
00006FB0: 54 41 20 24 44 30 31 35  0D 20 20 20 20 20 20 20  |TA $D015.       |
00006FC0: 20 20 4C 44 41 20 23 32  35 35 0D 20 20 20 20 20  |  LDA #255.     |
00006FD0: 20 20 20 20 53 54 41 20  54 49 4D 33 0D 20 20 20  |    STA TIM3.   |
00006FE0: 20 20 20 20 20 20 4A 53  52 20 54 49 4D 45 52 0D  |      JSR TIMER.|
00006FF0: 20 20 20 20 20 20 20 20  20 4C 44 41 20 4B 43 4E  |         LDA KCN|
00007000: 54 0D 20 20 20 20 20 20  20 20 20 42 45 51 20 57  |T.         BEQ W|
00007010: 49 4E 0D 20 20 20 20 20  20 20 20 20 4A 4D 50 20  |IN.         JMP |
00007020: 52 53 45 54 0D 57 49 4E  20 20 20 20 20 20 4A 4D  |RSET.WIN      JM|
00007030: 50 20 44 45 41 44 20 20  20 20 3B 47 4F 54 20 45  |P DEAD    ;GOT E|
00007040: 4D 20 41 4C 4C 21 21 0D  53 45 54 4B 31 20 20 20  |M ALL!!.SETK1   |
00007050: 20 4C 44 41 20 23 30 0D  20 20 20 20 20 20 20 20  | LDA #0.        |
00007060: 20 53 54 41 20 54 4D 50  31 20 20 20 20 3B 4B 4C  | STA TMP1    ;KL|
00007070: 49 4E 47 4F 4E 20 53 45  54 20 55 50 2E 0D 20 20  |INGON SET UP..  |
00007080: 20 20 20 20 20 20 20 49  4E 43 20 52 4E 44 58 0D  |       INC RNDX.|
00007090: 20 20 20 20 20 20 20 20  20 4C 44 58 20 52 4E 44  |         LDX RND|
000070A0: 58 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 24  |X.         LDA $|
000070B0: 32 46 30 30 2C 58 0D 20  20 20 20 20 20 20 20 20  |2F00,X.         |
000070C0: 43 4C 43 0D 20 20 20 20  20 20 20 20 20 41 44 43  |CLC.         ADC|
000070D0: 20 23 34 38 0D 20 20 20  20 20 20 20 20 20 53 54  | #48.         ST|
000070E0: 41 20 4B 4E 54 31 0D 20  20 20 20 20 20 20 20 20  |A KNT1.         |
000070F0: 4C 44 41 20 58 33 0D 20  20 20 20 20 20 20 20 20  |LDA X3.         |
00007100: 42 45 51 20 53 4B 30 0D  20 20 20 20 20 20 20 20  |BEQ SK0.        |
00007110: 20 4C 44 41 20 23 30 0D  20 20 20 20 20 20 20 20  | LDA #0.        |
00007120: 20 53 54 41 20 58 33 0D  20 20 20 20 20 20 20 20  | STA X3.        |
00007130: 20 52 54 53 0D 53 4B 30  20 20 20 20 20 20 49 4E  | RTS.SK0      IN|
00007140: 43 20 58 33 0D 20 20 20  20 20 20 20 20 20 52 54  |C X3.         RT|
00007150: 53 0D 53 45 54 4B 32 20  20 20 20 4C 44 41 20 23  |S.SETK2    LDA #|
00007160: 30 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 54  |0.         STA T|
00007170: 4D 50 32 0D 20 20 20 20  20 20 20 20 20 49 4E 43  |MP2.         INC|
00007180: 20 52 4E 44 58 0D 20 20  20 20 20 20 20 20 20 4C  | RNDX.         L|
00007190: 44 58 20 52 4E 44 58 0D  20 20 20 20 20 20 20 20  |DX RNDX.        |
000071A0: 20 4C 44 41 20 24 32 46  30 30 2C 58 0D 20 20 20  | LDA $2F00,X.   |
000071B0: 20 20 20 20 20 20 43 4C  43 0D 20 20 20 20 20 20  |      CLC.      |
000071C0: 20 20 20 41 44 43 20 23  34 38 0D 20 20 20 20 20  |   ADC #48.     |
000071D0: 20 20 20 20 53 54 41 20  4B 4E 54 32 0D 20 20 20  |    STA KNT2.   |
000071E0: 20 20 20 20 20 20 4C 44  41 20 59 33 0D 20 20 20  |      LDA Y3.   |
000071F0: 20 20 20 20 20 20 42 45  51 20 53 4B 31 0D 20 20  |      BEQ SK1.  |
00007200: 20 20 20 20 20 20 20 4C  44 41 20 23 30 0D 20 20  |       LDA #0.  |
00007210: 20 20 20 20 20 20 20 53  54 41 20 59 33 0D 20 20  |       STA Y3.  |
00007220: 20 20 20 20 20 20 20 52  54 53 0D 53 4B 31 20 20  |       RTS.SK1  |
00007230: 20 20 20 20 49 4E 43 20  59 33 0D 20 20 20 20 20  |    INC Y3.     |
00007240: 20 20 20 20 52 54 53 0D  0D 4D 45 54 45 52 20 20  |    RTS..METER  |
00007250: 20 20 4C 44 58 20 23 32  34 33 20 20 20 20 3B 50  |  LDX #243    ;P|
00007260: 4F 57 45 52 2F 53 48 49  45 4C 44 0D 20 20 20 20  |OWER/SHIELD.    |
00007270: 20 20 20 20 20 53 54 58  20 24 30 37 46 45 20 20  |     STX $07FE  |
00007280: 20 3B 4D 45 54 45 52 53  2E 0D 20 20 20 20 20 20  | ;METERS..      |
00007290: 20 20 20 49 4E 58 0D 20  20 20 20 20 20 20 20 20  |   INX.         |
000072A0: 53 54 58 20 24 30 37 46  46 0D 20 20 20 20 20 20  |STX $07FF.      |
000072B0: 20 20 20 4C 44 41 20 23  31 30 0D 20 20 20 20 20  |   LDA #10.     |
000072C0: 20 20 20 20 53 54 41 20  24 44 30 32 44 0D 20 20  |    STA $D02D.  |
000072D0: 20 20 20 20 20 20 20 53  54 41 20 24 44 30 32 45  |       STA $D02E|
000072E0: 0D 20 20 20 20 20 20 20  20 20 4C 44 41 20 23 32  |.         LDA #2|
000072F0: 32 34 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |24.         STA |
00007300: 24 44 30 31 44 0D 20 20  20 20 20 20 20 20 20 4C  |$D01D.         L|
00007310: 44 41 20 23 33 32 0D 20  20 20 20 20 20 20 20 20  |DA #32.         |
00007320: 53 54 41 20 24 44 30 30  43 0D 20 20 20 20 20 20  |STA $D00C.      |
00007330: 20 20 20 53 54 41 20 24  44 30 30 45 0D 20 20 20  |   STA $D00E.   |
00007340: 20 20 20 20 20 20 4C 44  41 20 23 36 30 0D 20 20  |      LDA #60.  |
00007350: 20 20 20 20 20 20 20 53  54 41 20 24 44 30 30 44  |       STA $D00D|
00007360: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 24 44  |.         STA $D|
00007370: 30 30 46 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |00F.         LDA|
00007380: 20 24 44 30 31 30 0D 20  20 20 20 20 20 20 20 20  | $D010.         |
00007390: 4F 52 41 20 23 31 32 38  0D 20 20 20 20 20 20 20  |ORA #128.       |
000073A0: 20 20 53 54 41 20 24 44  30 31 30 0D 20 20 20 20  |  STA $D010.    |
000073B0: 20 20 20 20 20 4C 44 41  20 24 44 30 31 35 0D 20  |     LDA $D015. |
000073C0: 20 20 20 20 20 20 20 20  4F 52 41 20 23 31 39 32  |        ORA #192|
000073D0: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 24 44  |.         STA $D|
000073E0: 30 31 35 0D 20 20 20 20  20 20 20 20 20 4A 53 52  |015.         JSR|
000073F0: 20 4C 45 56 50 0D 20 20  20 20 20 20 20 20 20 4A  | LEVP.         J|
00007400: 53 52 20 4C 45 56 53 0D  20 20 20 20 20 20 20 20  |SR LEVS.        |
00007410: 20 52 54 53 0D 0D 50 49  43 20 20 20 20 20 20 4C  | RTS..PIC      L|
00007420: 44 58 20 23 30 20 20 20  20 20 20 3B 53 43 52 45  |DX #0      ;SCRE|
00007430: 45 4E 20 58 46 45 52 0D  53 4D 4F 31 20 20 20 20  |EN XFER.SMO1    |
00007440: 20 4C 44 41 20 24 30 37  46 38 2C 58 0D 20 20 20  | LDA $07F8,X.   |
00007450: 20 20 20 20 20 20 53 54  41 20 53 50 53 54 52 2C  |      STA SPSTR,|
00007460: 58 0D 20 20 20 20 20 20  20 20 20 49 4E 58 0D 20  |X.         INX. |
00007470: 20 20 20 20 20 20 20 20  43 50 58 20 23 38 0D 20  |        CPX #8. |
00007480: 20 20 20 20 20 20 20 20  42 4E 45 20 53 4D 4F 31  |        BNE SMO1|
00007490: 0D 20 20 20 20 20 20 20  20 20 4C 44 41 20 23 24  |.         LDA #$|
000074A0: 30 34 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |04.         STA |
000074B0: 32 35 34 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |254.         LDA|
000074C0: 20 23 24 44 38 0D 20 20  20 20 20 20 20 20 20 53  | #$D8.         S|
000074D0: 54 41 20 31 37 37 0D 20  20 20 20 20 20 20 20 20  |TA 177.         |
000074E0: 4C 44 41 20 23 30 0D 20  20 20 20 20 20 20 20 20  |LDA #0.         |
000074F0: 53 54 41 20 32 35 31 0D  20 20 20 20 20 20 20 20  |STA 251.        |
00007500: 20 53 54 41 20 32 35 33  0D 20 20 20 20 20 20 20  | STA 253.       |
00007510: 20 20 53 54 41 20 31 37  34 0D 20 20 20 20 20 20  |  STA 174.      |
00007520: 20 20 20 53 54 41 20 31  37 36 0D 20 20 20 20 20  |   STA 176.     |
00007530: 20 20 20 20 4C 44 58 20  23 34 0D 20 20 20 20 20  |    LDX #4.     |
00007540: 20 20 20 20 4C 44 59 20  23 30 0D 50 54 50 43 31  |    LDY #0.PTPC1|
00007550: 20 20 20 20 4C 44 41 20  28 32 35 31 29 2C 59 0D  |    LDA (251),Y.|
00007560: 20 20 20 20 20 20 20 20  20 53 54 41 20 28 32 35  |         STA (25|
00007570: 33 29 2C 59 0D 20 20 20  20 20 20 20 20 20 4C 44  |3),Y.         LD|
00007580: 41 20 28 31 37 34 29 2C  59 0D 20 20 20 20 20 20  |A (174),Y.      |
00007590: 20 20 20 53 54 41 20 28  31 37 36 29 2C 59 0D 20  |   STA (176),Y. |
000075A0: 20 20 20 20 20 20 20 20  49 4E 59 0D 20 20 20 20  |        INY.    |
000075B0: 20 20 20 20 20 42 4E 45  20 50 54 50 43 31 0D 20  |     BNE PTPC1. |
000075C0: 20 20 20 20 20 20 20 20  49 4E 43 20 32 35 32 0D  |        INC 252.|
000075D0: 20 20 20 20 20 20 20 20  20 49 4E 43 20 32 35 34  |         INC 254|
000075E0: 0D 20 20 20 20 20 20 20  20 20 49 4E 43 20 31 37  |.         INC 17|
000075F0: 35 0D 20 20 20 20 20 20  20 20 20 49 4E 43 20 31  |5.         INC 1|
00007600: 37 37 0D 20 20 20 20 20  20 20 20 20 44 45 58 0D  |77.         DEX.|
00007610: 20 20 20 20 20 20 20 20  20 42 4E 45 20 50 54 50  |         BNE PTP|
00007620: 43 31 0D 53 4D 4F 32 20  20 20 20 20 4C 44 41 20  |C1.SMO2     LDA |
00007630: 53 50 53 54 52 2C 58 0D  20 20 20 20 20 20 20 20  |SPSTR,X.        |
00007640: 20 53 54 41 20 24 30 37  46 38 2C 58 0D 20 20 20  | STA $07F8,X.   |
00007650: 20 20 20 20 20 20 49 4E  58 0D 20 20 20 20 20 20  |      INX.      |
00007660: 20 20 20 43 50 58 20 23  38 0D 20 20 20 20 20 20  |   CPX #8.      |
00007670: 20 20 20 42 4E 45 20 53  4D 4F 32 0D 20 20 20 20  |   BNE SMO2.    |
00007680: 20 20 20 20 20 52 54 53  0D 0D 53 54 41 52 53 20  |     RTS..STARS |
00007690: 20 20 20 4C 44 41 20 23  34 31 20 20 20 20 20 3B  |   LDA #41     ;|
000076A0: 53 54 41 52 20 55 54 49  4C 53 2E 0D 20 20 20 20  |STAR UTILS..    |
000076B0: 20 20 20 20 20 53 54 41  20 32 35 31 0D 20 20 20  |     STA 251.   |
000076C0: 20 20 20 20 20 20 4C 44  41 20 23 34 0D 20 20 20  |      LDA #4.   |
000076D0: 20 20 20 20 20 20 53 54  41 20 32 35 32 0D 20 20  |      STA 252.  |
000076E0: 20 20 20 20 20 20 20 4C  44 58 20 52 4E 44 58 0D  |       LDX RNDX.|
000076F0: 20 20 20 20 20 20 20 20  20 49 4E 43 20 52 4E 44  |         INC RND|
00007700: 58 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 24  |X.         LDA $|
00007710: 32 45 30 30 2C 58 0D 20  20 20 20 20 20 20 20 20  |2E00,X.         |
00007720: 53 54 41 20 52 43 4F 4C  0D 20 20 20 20 20 20 20  |STA RCOL.       |
00007730: 20 20 54 41 58 0D 52 41  44 31 20 20 20 20 20 43  |  TAX.RAD1     C|
00007740: 4C 43 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |LC.         LDA |
00007750: 32 35 31 0D 20 20 20 20  20 20 20 20 20 41 44 43  |251.         ADC|
00007760: 20 23 34 30 0D 20 20 20  20 20 20 20 20 20 53 54  | #40.         ST|
00007770: 41 20 32 35 31 0D 20 20  20 20 20 20 20 20 20 42  |A 251.         B|
00007780: 43 43 20 52 44 4E 31 0D  20 20 20 20 20 20 20 20  |CC RDN1.        |
00007790: 20 49 4E 43 20 32 35 32  0D 52 44 4E 31 20 20 20  | INC 252.RDN1   |
000077A0: 20 20 44 45 58 0D 20 20  20 20 20 20 20 20 20 42  |  DEX.         B|
000077B0: 4E 45 20 52 41 44 31 0D  20 20 20 20 20 20 20 20  |NE RAD1.        |
000077C0: 20 4C 44 58 20 52 4E 44  58 0D 20 20 20 20 20 20  | LDX RNDX.      |
000077D0: 20 20 20 4C 44 41 20 24  32 46 30 30 2C 58 0D 20  |   LDA $2F00,X. |
000077E0: 20 20 20 20 20 20 20 20  54 41 59 0D 20 20 20 20  |        TAY.    |
000077F0: 20 20 20 20 20 4C 44 41  20 28 32 35 31 29 2C 59  |     LDA (251),Y|
00007800: 0D 20 20 20 20 20 20 20  20 20 43 4D 50 20 23 33  |.         CMP #3|
00007810: 32 0D 20 20 20 20 20 20  20 20 20 42 4E 45 20 4E  |2.         BNE N|
00007820: 54 48 52 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |THR.         LDA|
00007830: 20 23 37 36 0D 20 20 20  20 20 20 20 20 20 53 54  | #76.         ST|
00007840: 41 20 28 32 35 31 29 2C  59 0D 20 20 20 20 20 20  |A (251),Y.      |
00007850: 20 20 20 43 4C 43 0D 20  20 20 20 20 20 20 20 20  |   CLC.         |
00007860: 4C 44 41 20 32 35 32 0D  20 20 20 20 20 20 20 20  |LDA 252.        |
00007870: 20 41 44 43 20 23 32 31  32 0D 20 20 20 20 20 20  | ADC #212.      |
00007880: 20 20 20 53 54 41 20 32  35 32 0D 20 20 20 20 20  |   STA 252.     |
00007890: 20 20 20 20 4C 44 41 20  52 43 4F 4C 0D 20 20 20  |    LDA RCOL.   |
000078A0: 20 20 20 20 20 20 41 4E  44 20 23 31 35 0D 20 20  |      AND #15.  |
000078B0: 20 20 20 20 20 20 20 53  54 41 20 28 32 35 31 29  |       STA (251)|
000078C0: 2C 59 0D 4E 54 48 52 20  20 20 20 20 49 4E 43 20  |,Y.NTHR     INC |
000078D0: 52 4E 44 58 0D 20 20 20  20 20 20 20 20 20 49 4E  |RNDX.         IN|
000078E0: 43 20 52 4E 44 58 0D 20  20 20 20 20 20 20 20 20  |C RNDX.         |
000078F0: 44 45 43 20 52 43 4E 54  0D 20 20 20 20 20 20 20  |DEC RCNT.       |
00007900: 20 20 4C 44 41 20 52 43  4E 54 0D 20 20 20 20 20  |  LDA RCNT.     |
00007910: 20 20 20 20 42 4E 45 20  53 54 41 52 53 0D 20 20  |    BNE STARS.  |
00007920: 20 20 20 20 20 20 20 52  54 53 0D 0D 0D 52 4E 44  |       RTS...RND|
00007930: 47 45 4E 20 20 20 4A 53  52 20 43 4C 52 53 49 44  |GEN   JSR CLRSID|
00007940: 20 20 3B 52 41 4E 44 4F  4D 20 47 45 4E 45 52 41  |  ;RANDOM GENERA|
00007950: 54 4F 52 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |TOR.         LDA|
00007960: 20 23 24 46 46 0D 20 20  20 20 20 20 20 20 20 53  | #$FF.         S|
00007970: 54 41 20 24 44 34 30 46  0D 20 20 20 20 20 20 20  |TA $D40F.       |
00007980: 20 20 4C 44 41 20 23 31  32 38 0D 20 20 20 20 20  |  LDA #128.     |
00007990: 20 20 20 20 53 54 41 20  24 44 34 31 32 0D 20 20  |    STA $D412.  |
000079A0: 20 20 20 20 20 20 20 53  54 41 20 24 44 34 31 38  |       STA $D418|
000079B0: 0D 20 20 20 20 20 20 20  20 20 4C 44 58 20 23 30  |.         LDX #0|
000079C0: 0D 52 47 30 20 20 20 20  20 20 4C 44 41 20 24 44  |.RG0      LDA $D|
000079D0: 34 31 42 0D 20 20 20 20  20 20 20 20 20 43 4D 50  |41B.         CMP|
000079E0: 20 23 31 38 0D 20 20 20  20 20 20 20 20 20 42 43  | #18.         BC|
000079F0: 53 20 52 47 30 0D 20 20  20 20 20 20 20 20 20 53  |S RG0.         S|
00007A00: 54 41 20 24 32 45 30 30  2C 58 0D 52 47 31 20 20  |TA $2E00,X.RG1  |
00007A10: 20 20 20 20 4C 44 41 20  24 44 34 31 42 0D 20 20  |    LDA $D41B.  |
00007A20: 20 20 20 20 20 20 20 42  45 51 20 52 47 31 0D 20  |       BEQ RG1. |
00007A30: 20 20 20 20 20 20 20 20  43 4D 50 20 23 33 38 0D  |        CMP #38.|
00007A40: 20 20 20 20 20 20 20 20  20 42 43 53 20 52 47 31  |         BCS RG1|
00007A50: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 24 32  |.         STA $2|
00007A60: 46 30 30 2C 58 0D 52 47  32 20 20 20 20 20 20 4C  |F00,X.RG2      L|
00007A70: 44 41 20 24 44 34 31 42  0D 20 20 20 20 20 20 20  |DA $D41B.       |
00007A80: 20 20 43 4D 50 20 23 38  0D 20 20 20 20 20 20 20  |  CMP #8.       |
00007A90: 20 20 42 43 53 20 52 47  32 0D 20 20 20 20 20 20  |  BCS RG2.      |
00007AA0: 20 20 20 53 54 41 20 24  36 30 30 30 2C 58 0D 52  |   STA $6000,X.R|
00007AB0: 47 33 20 20 20 20 20 20  4C 44 41 20 24 44 34 31  |G3      LDA $D41|
00007AC0: 42 0D 20 20 20 20 20 20  20 20 20 43 4D 50 20 23  |B.         CMP #|
00007AD0: 39 0D 20 20 20 20 20 20  20 20 20 42 43 53 20 52  |9.         BCS R|
00007AE0: 47 33 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |G3.         STA |
00007AF0: 24 36 31 30 30 2C 58 0D  20 20 20 20 20 20 20 20  |$6100,X.        |
00007B00: 20 44 45 58 0D 20 20 20  20 20 20 20 20 20 42 4E  | DEX.         BN|
00007B10: 45 20 52 47 30 0D 43 4C  52 53 49 44 20 20 20 4C  |E RG0.CLRSID   L|
00007B20: 44 58 20 23 30 20 20 20  20 20 20 20 3B 44 55 48  |DX #0       ;DUH|
00007B30: 2E 2E 2E 0D 20 20 20 20  20 20 20 20 20 54 58 41  |....         TXA|
00007B40: 0D 53 49 44 43 4C 52 20  20 20 53 54 41 20 53 49  |.SIDCLR   STA SI|
00007B50: 44 2C 58 0D 20 20 20 20  20 20 20 20 20 49 4E 58  |D,X.         INX|
00007B60: 0D 20 20 20 20 20 20 20  20 20 43 50 58 20 23 32  |.         CPX #2|
00007B70: 34 0D 20 20 20 20 20 20  20 20 20 42 4E 45 20 53  |4.         BNE S|
00007B80: 49 44 43 4C 52 0D 20 20  20 20 20 20 20 20 20 4C  |IDCLR.         L|
00007B90: 44 41 20 23 24 30 46 0D  20 20 20 20 20 20 20 20  |DA #$0F.        |
00007BA0: 20 53 54 41 20 53 49 44  2B 32 34 0D 20 20 20 20  | STA SID+24.    |
00007BB0: 20 20 20 20 20 52 54 53  0D 0D 53 45 54 55 50 20  |     RTS..SETUP |
00007BC0: 20 20 20 4C 44 58 20 23  30 20 20 20 20 20 20 20  |   LDX #0       |
00007BD0: 3B 43 4C 45 41 52 20 54  48 45 20 47 41 4C 41 58  |;CLEAR THE GALAX|
00007BE0: 59 2E 0D 20 20 20 20 20  20 20 20 20 54 58 41 0D  |Y..         TXA.|
00007BF0: 53 54 50 30 20 20 20 20  20 53 54 41 20 47 41 4C  |STP0     STA GAL|
00007C00: 54 41 42 2C 58 0D 20 20  20 20 20 20 20 20 20 49  |TAB,X.         I|
00007C10: 4E 58 0D 20 20 20 20 20  20 20 20 20 43 50 58 20  |NX.         CPX |
00007C20: 23 31 31 31 0D 20 20 20  20 20 20 20 20 20 42 4E  |#111.         BN|
00007C30: 45 20 53 54 50 30 0D 20  20 20 20 20 20 20 20 20  |E STP0.         |
00007C40: 4A 53 52 20 47 45 54 58  0D 20 20 20 20 20 20 20  |JSR GETX.       |
00007C50: 20 20 4C 44 41 20 23 34  0D 20 20 20 20 20 20 20  |  LDA #4.       |
00007C60: 20 20 53 54 41 20 47 41  4C 54 41 42 2B 31 32 20  |  STA GALTAB+12 |
00007C70: 20 20 3B 50 55 54 20 49  4E 20 53 4F 4D 45 0D 20  |  ;PUT IN SOME. |
00007C80: 20 20 20 20 20 20 20 20  53 54 41 20 47 41 4C 54  |        STA GALT|
00007C90: 41 42 2B 34 35 2C 58 20  3B 53 54 41 52 20 42 41  |AB+45,X ;STAR BA|
00007CA0: 53 45 53 2E 0D 20 20 20  20 20 20 20 20 20 49 4E  |SES..         IN|
00007CB0: 58 0D 20 20 20 20 20 20  20 20 20 53 54 58 20 53  |X.         STX S|
00007CC0: 42 32 59 0D 20 20 20 20  20 20 20 20 20 4A 53 52  |B2Y.         JSR|
00007CD0: 20 47 45 54 58 0D 20 20  20 20 20 20 20 20 20 4C  | GETX.         L|
00007CE0: 44 41 20 23 34 0D 20 20  20 20 20 20 20 20 20 53  |DA #4.         S|
00007CF0: 54 41 20 47 41 4C 54 41  42 2B 37 38 2C 58 0D 20  |TA GALTAB+78,X. |
00007D00: 20 20 20 20 20 20 20 20  49 4E 58 0D 20 20 20 20  |        INX.    |
00007D10: 20 20 20 20 20 53 54 58  20 53 42 33 59 0D 20 20  |     STX SB3Y.  |
00007D20: 20 20 20 20 20 20 20 4C  44 59 20 23 31 34 20 20  |       LDY #14  |
00007D30: 20 20 20 20 20 20 20 3B  41 4E 44 20 41 20 57 48  |       ;AND A WH|
00007D40: 4F 4C 45 0D 44 4F 55 4D  20 20 20 20 20 4A 53 52  |OLE.DOUM     JSR|
00007D50: 20 47 45 54 58 20 20 20  20 20 20 20 20 3B 4C 4F  | GETX        ;LO|
00007D60: 54 54 41 20 4B 4C 49 4E  47 4F 4E 53 0D 20 20 20  |TTA KLINGONS.   |
00007D70: 20 20 20 20 20 20 4C 44  41 20 47 41 4C 54 41 42  |      LDA GALTAB|
00007D80: 2B 31 32 2C 58 0D 20 20  20 20 20 20 20 20 20 43  |+12,X.         C|
00007D90: 4D 50 20 23 33 0D 20 20  20 20 20 20 20 20 20 42  |MP #3.         B|
00007DA0: 43 53 20 44 4F 55 4D 0D  20 20 20 20 20 20 20 20  |CS DOUM.        |
00007DB0: 20 49 4E 43 20 47 41 4C  54 41 42 2B 31 32 2C 58  | INC GALTAB+12,X|
00007DC0: 0D 44 31 20 20 20 20 20  20 20 4A 53 52 20 47 45  |.D1       JSR GE|
00007DD0: 54 58 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |TX.         LDA |
00007DE0: 47 41 4C 54 41 42 2B 32  33 2C 58 0D 20 20 20 20  |GALTAB+23,X.    |
00007DF0: 20 20 20 20 20 43 4D 50  20 23 33 0D 20 20 20 20  |     CMP #3.    |
00007E00: 20 20 20 20 20 42 43 53  20 44 31 0D 20 20 20 20  |     BCS D1.    |
00007E10: 20 20 20 20 20 49 4E 43  20 47 41 4C 54 41 42 2B  |     INC GALTAB+|
00007E20: 32 33 2C 58 0D 44 32 20  20 20 20 20 20 20 4A 53  |23,X.D2       JS|
00007E30: 52 20 47 45 54 58 0D 20  20 20 20 20 20 20 20 20  |R GETX.         |
00007E40: 4C 44 41 20 47 41 4C 54  41 42 2B 33 34 2C 58 0D  |LDA GALTAB+34,X.|
00007E50: 20 20 20 20 20 20 20 20  20 43 4D 50 20 23 33 0D  |         CMP #3.|
00007E60: 20 20 20 20 20 20 20 20  20 42 43 53 20 44 32 0D  |         BCS D2.|
00007E70: 20 20 20 20 20 20 20 20  20 49 4E 43 20 47 41 4C  |         INC GAL|
00007E80: 54 41 42 2B 33 34 2C 58  0D 44 33 20 20 20 20 20  |TAB+34,X.D3     |
00007E90: 20 20 4A 53 52 20 47 45  54 58 0D 20 20 20 20 20  |  JSR GETX.     |
00007EA0: 20 20 20 20 4C 44 41 20  47 41 4C 54 41 42 2B 34  |    LDA GALTAB+4|
00007EB0: 35 2C 58 0D 20 20 20 20  20 20 20 20 20 43 4D 50  |5,X.         CMP|
00007EC0: 20 23 33 0D 20 20 20 20  20 20 20 20 20 42 43 53  | #3.         BCS|
00007ED0: 20 44 33 0D 20 20 20 20  20 20 20 20 20 49 4E 43  | D3.         INC|
00007EE0: 20 47 41 4C 54 41 42 2B  34 35 2C 58 0D 44 34 20  | GALTAB+45,X.D4 |
00007EF0: 20 20 20 20 20 20 4A 53  52 20 47 45 54 58 0D 20  |      JSR GETX. |
00007F00: 20 20 20 20 20 20 20 20  4C 44 41 20 47 41 4C 54  |        LDA GALT|
00007F10: 41 42 2B 35 36 2C 58 0D  20 20 20 20 20 20 20 20  |AB+56,X.        |
00007F20: 20 43 4D 50 20 23 33 0D  20 20 20 20 20 20 20 20  | CMP #3.        |
00007F30: 20 42 43 53 20 44 34 0D  20 20 20 20 20 20 20 20  | BCS D4.        |
00007F40: 20 49 4E 43 20 47 41 4C  54 41 42 2B 35 36 2C 58  | INC GALTAB+56,X|
00007F50: 0D 44 35 20 20 20 20 20  20 20 4A 53 52 20 47 45  |.D5       JSR GE|
00007F60: 54 58 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |TX.         LDA |
00007F70: 47 41 4C 54 41 42 2B 36  37 2C 58 0D 20 20 20 20  |GALTAB+67,X.    |
00007F80: 20 20 20 20 20 43 4D 50  20 23 33 0D 20 20 20 20  |     CMP #3.    |
00007F90: 20 20 20 20 20 42 43 53  20 44 35 0D 20 20 20 20  |     BCS D5.    |
00007FA0: 20 20 20 20 20 49 4E 43  20 47 41 4C 54 41 42 2B  |     INC GALTAB+|
00007FB0: 36 37 2C 58 0D 44 36 20  20 20 20 20 20 20 4A 53  |67,X.D6       JS|
00007FC0: 52 20 47 45 54 58 0D 20  20 20 20 20 20 20 20 20  |R GETX.         |
00007FD0: 4C 44 41 20 47 41 4C 54  41 42 2B 37 38 2C 58 0D  |LDA GALTAB+78,X.|
00007FE0: 20 20 20 20 20 20 20 20  20 43 4D 50 20 23 33 0D  |         CMP #3.|
00007FF0: 20 20 20 20 20 20 20 20  20 42 43 53 20 44 36 0D  |         BCS D6.|
00008000: 20 20 20 20 20 20 20 20  20 49 4E 43 20 47 41 4C  |         INC GAL|
00008010: 54 41 42 2B 37 38 2C 58  0D 44 37 20 20 20 20 20  |TAB+78,X.D7     |
00008020: 20 20 4A 53 52 20 47 45  54 58 0D 20 20 20 20 20  |  JSR GETX.     |
00008030: 20 20 20 20 4C 44 41 20  47 41 4C 54 41 42 2B 38  |    LDA GALTAB+8|
00008040: 39 2C 58 0D 20 20 20 20  20 20 20 20 20 43 4D 50  |9,X.         CMP|
00008050: 20 23 33 0D 20 20 20 20  20 20 20 20 20 42 43 53  | #3.         BCS|
00008060: 20 44 37 0D 20 20 20 20  20 20 20 20 20 49 4E 43  | D7.         INC|
00008070: 20 47 41 4C 54 41 42 2B  38 39 2C 58 0D 20 20 20  | GALTAB+89,X.   |
00008080: 20 20 20 20 20 20 44 45  59 0D 20 20 20 20 20 20  |      DEY.      |
00008090: 20 20 20 42 4E 45 20 44  4F 55 4D 0D 0D 20 20 20  |   BNE DOUM..   |
000080A0: 20 20 20 20 20 20 4A 53  52 20 47 45 54 58 0D 20  |      JSR GETX. |
000080B0: 20 20 20 20 20 20 20 20  4C 44 41 20 47 41 4C 54  |        LDA GALT|
000080C0: 41 42 2B 35 36 2C 58 20  20 3B 50 55 54 20 49 4E  |AB+56,X  ;PUT IN|
000080D0: 20 53 4F 4D 45 0D 20 20  20 20 20 20 20 20 20 4F  | SOME.         O|
000080E0: 52 41 20 23 38 20 20 20  20 20 20 20 20 20 20 20  |RA #8           |
000080F0: 3B 54 49 4D 45 20 52 49  46 54 53 2E 0D 20 20 20  |;TIME RIFTS..   |
00008100: 20 20 20 20 20 20 53 54  41 20 47 41 4C 54 41 42  |      STA GALTAB|
00008110: 2B 35 36 2C 58 0D 20 20  20 20 20 20 20 20 20 4A  |+56,X.         J|
00008120: 53 52 20 47 45 54 58 0D  20 20 20 20 20 20 20 20  |SR GETX.        |
00008130: 20 4C 44 41 20 47 41 4C  54 41 42 2B 38 39 2C 58  | LDA GALTAB+89,X|
00008140: 0D 20 20 20 20 20 20 20  20 20 4F 52 41 20 23 38  |.         ORA #8|
00008150: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 47 41  |.         STA GA|
00008160: 4C 54 41 42 2B 38 39 2C  58 0D 20 20 20 20 20 20  |LTAB+89,X.      |
00008170: 20 20 20 4A 53 52 20 47  45 54 58 0D 20 20 20 20  |   JSR GETX.    |
00008180: 20 20 20 20 20 4C 44 41  20 47 41 4C 54 41 42 2B  |     LDA GALTAB+|
00008190: 32 33 2C 58 20 20 3B 41  4E 44 20 41 4E 20 49 4F  |23,X  ;AND AN IO|
000081A0: 4E 0D 20 20 20 20 20 20  20 20 20 4F 52 41 20 23  |N.         ORA #|
000081B0: 31 36 20 20 20 20 20 20  20 20 20 20 3B 53 54 4F  |16          ;STO|
000081C0: 52 4D 2E 2E 2E 0D 20 20  20 20 20 20 20 20 20 53  |RM....         S|
000081D0: 54 41 20 47 41 4C 54 41  42 2B 32 33 2C 58 0D 20  |TA GALTAB+23,X. |
000081E0: 20 20 20 20 20 20 20 20  52 54 53 0D 47 45 54 58  |        RTS.GETX|
000081F0: 20 20 20 20 20 4C 44 58  20 52 4E 44 58 0D 20 20  |     LDX RNDX.  |
00008200: 20 20 20 20 20 20 20 4C  44 41 20 24 36 31 30 30  |       LDA $6100|
00008210: 2C 58 0D 20 20 20 20 20  20 20 20 20 54 41 58 0D  |,X.         TAX.|
00008220: 20 20 20 20 20 20 20 20  20 49 4E 43 20 52 4E 44  |         INC RND|
00008230: 58 0D 20 20 20 20 20 20  20 20 20 52 54 53 0D 0D  |X.         RTS..|
00008240: 4C 45 56 50 20 20 20 20  20 4C 44 41 20 23 30 20  |LEVP     LDA #0 |
00008250: 20 20 20 20 20 20 20 20  20 3B 41 44 4A 55 53 54  |         ;ADJUST|
00008260: 20 4D 45 54 45 52 2E 0D  20 20 20 20 20 20 20 20  | METER..        |
00008270: 20 54 41 58 0D 43 4C 45  56 20 20 20 20 20 53 54  | TAX.CLEV     ST|
00008280: 41 20 24 33 43 43 30 2C  58 0D 20 20 20 20 20 20  |A $3CC0,X.      |
00008290: 20 20 20 49 4E 58 0D 20  20 20 20 20 20 20 20 20  |   INX.         |
000082A0: 43 50 58 20 23 36 0D 20  20 20 20 20 20 20 20 20  |CPX #6.         |
000082B0: 42 4E 45 20 43 4C 45 56  0D 20 20 20 20 20 20 20  |BNE CLEV.       |
000082C0: 20 20 4C 44 41 20 50 4C  45 56 0D 20 20 20 20 20  |  LDA PLEV.     |
000082D0: 20 20 20 20 43 4D 50 20  23 38 0D 20 20 20 20 20  |    CMP #8.     |
000082E0: 20 20 20 20 42 43 53 20  4C 45 50 30 0D 20 20 20  |    BCS LEP0.   |
000082F0: 20 20 20 20 20 20 54 41  58 0D 20 20 20 20 20 20  |      TAX.      |
00008300: 20 20 20 4C 44 41 20 24  33 43 43 30 0D 20 20 20  |   LDA $3CC0.   |
00008310: 20 20 20 20 20 20 4F 52  41 20 44 54 41 42 2C 58  |      ORA DTAB,X|
00008320: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 24 33  |.         STA $3|
00008330: 43 43 30 0D 20 20 20 20  20 20 20 20 20 53 54 41  |CC0.         STA|
00008340: 20 24 33 43 43 33 0D 20  20 20 20 20 20 20 20 20  | $3CC3.         |
00008350: 52 54 53 0D 4C 45 50 30  20 20 20 20 20 4C 44 41  |RTS.LEP0     LDA|
00008360: 20 23 24 46 46 0D 20 20  20 20 20 20 20 20 20 53  | #$FF.         S|
00008370: 54 41 20 24 33 43 43 30  0D 20 20 20 20 20 20 20  |TA $3CC0.       |
00008380: 20 20 53 54 41 20 24 33  43 43 33 0D 20 20 20 20  |  STA $3CC3.    |
00008390: 20 20 20 20 20 4C 44 41  20 50 4C 45 56 0D 20 20  |     LDA PLEV.  |
000083A0: 20 20 20 20 20 20 20 43  4D 50 20 23 31 36 0D 20  |       CMP #16. |
000083B0: 20 20 20 20 20 20 20 20  42 43 53 20 4C 45 50 31  |        BCS LEP1|
000083C0: 0D 20 20 20 20 20 20 20  20 20 41 4E 44 20 23 37  |.         AND #7|
000083D0: 0D 20 20 20 20 20 20 20  20 20 54 41 58 0D 20 20  |.         TAX.  |
000083E0: 20 20 20 20 20 20 20 4C  44 41 20 24 33 43 43 31  |       LDA $3CC1|
000083F0: 0D 20 20 20 20 20 20 20  20 20 4F 52 41 20 44 54  |.         ORA DT|
00008400: 41 42 2C 58 0D 20 20 20  20 20 20 20 20 20 53 54  |AB,X.         ST|
00008410: 41 20 24 33 43 43 31 0D  20 20 20 20 20 20 20 20  |A $3CC1.        |
00008420: 20 53 54 41 20 24 33 43  43 34 0D 20 20 20 20 20  | STA $3CC4.     |
00008430: 20 20 20 20 52 54 53 0D  4C 45 50 31 20 20 20 20  |    RTS.LEP1    |
00008440: 20 4C 44 41 20 23 24 46  46 0D 20 20 20 20 20 20  | LDA #$FF.      |
00008450: 20 20 20 53 54 41 20 24  33 43 43 31 0D 20 20 20  |   STA $3CC1.   |
00008460: 20 20 20 20 20 20 53 54  41 20 24 33 43 43 34 0D  |      STA $3CC4.|
00008470: 20 20 20 20 20 20 20 20  20 4C 44 41 20 50 4C 45  |         LDA PLE|
00008480: 56 0D 20 20 20 20 20 20  20 20 20 41 4E 44 20 23  |V.         AND #|
00008490: 37 0D 20 20 20 20 20 20  20 20 20 54 41 58 0D 20  |7.         TAX. |
000084A0: 20 20 20 20 20 20 20 20  4C 44 41 20 24 33 43 43  |        LDA $3CC|
000084B0: 32 0D 20 20 20 20 20 20  20 20 20 4F 52 41 20 44  |2.         ORA D|
000084C0: 54 41 42 2C 58 0D 20 20  20 20 20 20 20 20 20 53  |TAB,X.         S|
000084D0: 54 41 20 24 33 43 43 32  0D 20 20 20 20 20 20 20  |TA $3CC2.       |
000084E0: 20 20 53 54 41 20 24 33  43 43 35 0D 20 20 20 20  |  STA $3CC5.    |
000084F0: 20 20 20 20 20 52 54 53  0D 0D 4C 45 56 53 20 20  |     RTS..LEVS  |
00008500: 20 20 20 4C 44 41 20 23  30 20 20 20 20 20 20 20  |   LDA #0       |
00008510: 20 20 3B 41 44 4A 55 53  54 20 4F 54 48 45 52 0D  |  ;ADJUST OTHER.|
00008520: 20 20 20 20 20 20 20 20  20 54 41 58 20 20 20 20  |         TAX    |
00008530: 20 20 20 20 20 20 20 20  3B 4D 45 54 45 52 2E 0D  |        ;METER..|
00008540: 43 4C 45 53 20 20 20 20  20 53 54 41 20 24 33 44  |CLES     STA $3D|
00008550: 30 30 2C 58 0D 20 20 20  20 20 20 20 20 20 49 4E  |00,X.         IN|
00008560: 58 0D 20 20 20 20 20 20  20 20 20 43 50 58 20 23  |X.         CPX #|
00008570: 36 0D 20 20 20 20 20 20  20 20 20 42 4E 45 20 43  |6.         BNE C|
00008580: 4C 45 53 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |LES.         LDA|
00008590: 20 53 4C 45 56 0D 20 20  20 20 20 20 20 20 20 43  | SLEV.         C|
000085A0: 4D 50 20 23 38 0D 20 20  20 20 20 20 20 20 20 42  |MP #8.         B|
000085B0: 43 53 20 4C 45 50 32 0D  20 20 20 20 20 20 20 20  |CS LEP2.        |
000085C0: 20 54 41 58 0D 20 20 20  20 20 20 20 20 20 4C 44  | TAX.         LD|
000085D0: 41 20 24 33 44 30 30 0D  20 20 20 20 20 20 20 20  |A $3D00.        |
000085E0: 20 4F 52 41 20 44 54 41  42 2C 58 0D 20 20 20 20  | ORA DTAB,X.    |
000085F0: 20 20 20 20 20 53 54 41  20 24 33 44 30 30 0D 20  |     STA $3D00. |
00008600: 20 20 20 20 20 20 20 20  53 54 41 20 24 33 44 30  |        STA $3D0|
00008610: 33 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 53  |3.         LDA S|
00008620: 4C 45 56 0D 20 20 20 20  20 20 20 20 20 42 45 51  |LEV.         BEQ|
00008630: 20 4C 45 50 34 0D 20 20  20 20 20 20 20 20 20 52  | LEP4.         R|
00008640: 54 53 0D 4C 45 50 34 20  20 20 20 20 4C 44 59 20  |TS.LEP4     LDY |
00008650: 23 30 0D 50 50 4C 20 20  20 20 20 20 4C 44 41 20  |#0.PPL      LDA |
00008660: 4C 4E 31 35 2C 59 0D 20  20 20 20 20 20 20 20 20  |LN15,Y.         |
00008670: 42 45 51 20 4C 4F 55 54  0D 20 20 20 20 20 20 20  |BEQ LOUT.       |
00008680: 20 20 53 54 41 20 24 30  37 37 32 2C 59 0D 20 20  |  STA $0772,Y.  |
00008690: 20 20 20 20 20 20 20 49  4E 59 0D 20 20 20 20 20  |       INY.     |
000086A0: 20 20 20 20 42 4E 45 20  50 50 4C 0D 4C 4F 55 54  |    BNE PPL.LOUT|
000086B0: 20 20 20 20 20 52 54 53  0D 4C 45 50 32 20 20 20  |     RTS.LEP2   |
000086C0: 20 20 4C 44 41 20 23 24  46 46 0D 20 20 20 20 20  |  LDA #$FF.     |
000086D0: 20 20 20 20 53 54 41 20  24 33 44 30 30 0D 20 20  |    STA $3D00.  |
000086E0: 20 20 20 20 20 20 20 53  54 41 20 24 33 44 30 33  |       STA $3D03|
000086F0: 0D 20 20 20 20 20 20 20  20 20 4C 44 41 20 53 4C  |.         LDA SL|
00008700: 45 56 0D 20 20 20 20 20  20 20 20 20 43 4D 50 20  |EV.         CMP |
00008710: 23 31 36 0D 20 20 20 20  20 20 20 20 20 42 43 53  |#16.         BCS|
00008720: 20 4C 45 50 33 0D 20 20  20 20 20 20 20 20 20 41  | LEP3.         A|
00008730: 4E 44 20 23 37 0D 20 20  20 20 20 20 20 20 20 54  |ND #7.         T|
00008740: 41 58 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |AX.         LDA |
00008750: 24 33 44 30 31 0D 20 20  20 20 20 20 20 20 20 4F  |$3D01.         O|
00008760: 52 41 20 44 54 41 42 2C  58 0D 20 20 20 20 20 20  |RA DTAB,X.      |
00008770: 20 20 20 53 54 41 20 24  33 44 30 31 0D 20 20 20  |   STA $3D01.   |
00008780: 20 20 20 20 20 20 53 54  41 20 24 33 44 30 34 0D  |      STA $3D04.|
00008790: 20 20 20 20 20 20 20 20  20 52 54 53 0D 4C 45 50  |         RTS.LEP|
000087A0: 33 20 20 20 20 20 4C 44  41 20 23 24 46 46 0D 20  |3     LDA #$FF. |
000087B0: 20 20 20 20 20 20 20 20  53 54 41 20 24 33 44 30  |        STA $3D0|
000087C0: 31 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 24  |1.         STA $|
000087D0: 33 44 30 34 0D 20 20 20  20 20 20 20 20 20 4C 44  |3D04.         LD|
000087E0: 41 20 53 4C 45 56 0D 20  20 20 20 20 20 20 20 20  |A SLEV.         |
000087F0: 41 4E 44 20 23 37 0D 20  20 20 20 20 20 20 20 20  |AND #7.         |
00008800: 54 41 58 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |TAX.         LDA|
00008810: 20 24 33 44 30 32 0D 20  20 20 20 20 20 20 20 20  | $3D02.         |
00008820: 4F 52 41 20 44 54 41 42  2C 58 0D 20 20 20 20 20  |ORA DTAB,X.     |
00008830: 20 20 20 20 53 54 41 20  24 33 44 30 32 0D 20 20  |    STA $3D02.  |
00008840: 20 20 20 20 20 20 20 53  54 41 20 24 33 44 30 35  |       STA $3D05|
00008850: 0D 20 20 20 20 20 20 20  20 20 52 54 53 0D 0D 0D  |.         RTS...|
00008860: 53 48 4F 52 54 20 20 20  20 4C 44 41 20 23 24 35  |SHORT    LDA #$5|
00008870: 30 20 20 20 20 20 3B 53  48 4F 52 54 20 52 41 4E  |0     ;SHORT RAN|
00008880: 47 45 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |GE.         STA |
00008890: 32 35 32 20 20 20 20 20  20 3B 53 45 4E 53 4F 52  |252      ;SENSOR|
000088A0: 20 53 43 41 4E 2E 0D 20  20 20 20 20 20 20 20 20  | SCAN..         |
000088B0: 4C 44 41 20 23 24 35 34  0D 20 20 20 20 20 20 20  |LDA #$54.       |
000088C0: 20 20 53 54 41 20 31 37  35 0D 20 20 20 20 20 20  |  STA 175.      |
000088D0: 20 20 20 4A 53 52 20 50  49 43 0D 20 20 20 20 20  |   JSR PIC.     |
000088E0: 20 20 20 20 4C 44 41 20  47 58 0D 20 20 20 20 20  |    LDA GX.     |
000088F0: 20 20 20 20 43 4D 50 20  23 31 0D 20 20 20 20 20  |    CMP #1.     |
00008900: 20 20 20 20 42 4E 45 20  53 48 30 30 0D 20 20 20  |    BNE SH00.   |
00008910: 20 20 20 20 20 20 4C 44  58 20 23 30 0D 50 56 44  |      LDX #0.PVD|
00008920: 31 20 20 20 20 20 4C 44  41 20 56 4C 4E 2C 58 0D  |1     LDA VLN,X.|
00008930: 20 20 20 20 20 20 20 20  20 53 54 41 20 24 30 34  |         STA $04|
00008940: 41 35 2C 58 0D 20 20 20  20 20 20 20 20 20 53 54  |A5,X.         ST|
00008950: 41 20 24 30 34 42 32 2C  58 0D 20 20 20 20 20 20  |A $04B2,X.      |
00008960: 20 20 20 53 54 41 20 24  30 34 42 46 2C 58 0D 20  |   STA $04BF,X. |
00008970: 20 20 20 20 20 20 20 20  4C 44 41 20 23 31 31 0D  |        LDA #11.|
00008980: 20 20 20 20 20 20 20 20  20 53 54 41 20 24 44 38  |         STA $D8|
00008990: 41 35 2C 58 0D 20 20 20  20 20 20 20 20 20 53 54  |A5,X.         ST|
000089A0: 41 20 24 44 38 42 32 2C  58 0D 20 20 20 20 20 20  |A $D8B2,X.      |
000089B0: 20 20 20 53 54 41 20 24  44 38 42 46 2C 58 0D 20  |   STA $D8BF,X. |
000089C0: 20 20 20 20 20 20 20 20  49 4E 58 0D 20 20 20 20  |        INX.    |
000089D0: 20 20 20 20 20 43 50 58  20 23 34 0D 20 20 20 20  |     CPX #4.    |
000089E0: 20 20 20 20 20 42 43 43  20 50 56 44 31 0D 20 20  |     BCC PVD1.  |
000089F0: 20 20 20 20 20 20 20 4A  4D 50 20 53 48 30 0D 53  |       JMP SH0.S|
00008A00: 48 30 30 20 20 20 20 20  4C 44 41 20 47 58 0D 20  |H00     LDA GX. |
00008A10: 20 20 20 20 20 20 20 20  43 4D 50 20 23 38 0D 20  |        CMP #8. |
00008A20: 20 20 20 20 20 20 20 20  42 4E 45 20 53 48 30 0D  |        BNE SH0.|
00008A30: 20 20 20 20 20 20 20 20  20 4C 44 58 20 23 30 0D  |         LDX #0.|
00008A40: 50 56 44 31 41 20 20 20  20 4C 44 41 20 56 4C 4E  |PVD1A    LDA VLN|
00008A50: 2C 58 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |,X.         STA |
00008A60: 24 30 36 38 35 2C 58 0D  20 20 20 20 20 20 20 20  |$0685,X.        |
00008A70: 20 53 54 41 20 24 30 36  39 32 2C 58 0D 20 20 20  | STA $0692,X.   |
00008A80: 20 20 20 20 20 20 53 54  41 20 24 30 36 39 46 2C  |      STA $069F,|
00008A90: 58 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 23  |X.         LDA #|
00008AA0: 31 31 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |11.         STA |
00008AB0: 24 44 41 38 35 2C 58 0D  20 20 20 20 20 20 20 20  |$DA85,X.        |
00008AC0: 20 53 54 41 20 24 44 41  39 32 2C 58 0D 20 20 20  | STA $DA92,X.   |
00008AD0: 20 20 20 20 20 20 53 54  41 20 24 44 41 39 46 2C  |      STA $DA9F,|
00008AE0: 58 0D 20 20 20 20 20 20  20 20 20 49 4E 58 0D 20  |X.         INX. |
00008AF0: 20 20 20 20 20 20 20 20  43 50 58 20 23 34 0D 20  |        CPX #4. |
00008B00: 20 20 20 20 20 20 20 20  42 43 43 20 50 56 44 31  |        BCC PVD1|
00008B10: 41 0D 53 48 30 20 20 20  20 20 20 4C 44 41 20 47  |A.SH0      LDA G|
00008B20: 59 0D 20 20 20 20 20 20  20 20 20 43 4D 50 20 23  |Y.         CMP #|
00008B30: 31 0D 20 20 20 20 20 20  20 20 20 42 4E 45 20 53  |1.         BNE S|
00008B40: 48 31 0D 20 20 20 20 20  20 20 20 20 4C 44 58 20  |H1.         LDX |
00008B50: 23 30 0D 50 56 44 32 20  20 20 20 20 4C 44 41 20  |#0.PVD2     LDA |
00008B60: 56 4C 4E 2C 58 0D 20 20  20 20 20 20 20 20 20 53  |VLN,X.         S|
00008B70: 54 41 20 24 30 34 41 35  2C 58 0D 20 20 20 20 20  |TA $04A5,X.     |
00008B80: 20 20 20 20 53 54 41 20  24 30 35 39 35 2C 58 0D  |    STA $0595,X.|
00008B90: 20 20 20 20 20 20 20 20  20 53 54 41 20 24 30 36  |         STA $06|
00008BA0: 38 35 2C 58 0D 20 20 20  20 20 20 20 20 20 4C 44  |85,X.         LD|
00008BB0: 41 20 23 31 31 0D 20 20  20 20 20 20 20 20 20 53  |A #11.         S|
00008BC0: 54 41 20 24 44 38 41 35  2C 58 0D 20 20 20 20 20  |TA $D8A5,X.     |
00008BD0: 20 20 20 20 53 54 41 20  24 44 39 39 35 2C 58 0D  |    STA $D995,X.|
00008BE0: 20 20 20 20 20 20 20 20  20 53 54 41 20 24 44 41  |         STA $DA|
00008BF0: 38 35 2C 58 0D 20 20 20  20 20 20 20 20 20 49 4E  |85,X.         IN|
00008C00: 58 0D 20 20 20 20 20 20  20 20 20 43 50 58 20 23  |X.         CPX #|
00008C10: 34 0D 20 20 20 20 20 20  20 20 20 42 43 43 20 50  |4.         BCC P|
00008C20: 56 44 32 0D 20 20 20 20  20 20 20 20 20 4A 4D 50  |VD2.         JMP|
00008C30: 20 43 4F 4E 54 30 0D 53  48 31 20 20 20 20 20 20  | CONT0.SH1      |
00008C40: 4C 44 41 20 47 59 0D 20  20 20 20 20 20 20 20 20  |LDA GY.         |
00008C50: 43 4D 50 20 23 39 0D 20  20 20 20 20 20 20 20 20  |CMP #9.         |
00008C60: 42 4E 45 20 43 4F 4E 54  30 0D 20 20 20 20 20 20  |BNE CONT0.      |
00008C70: 20 20 20 4C 44 58 20 23  30 0D 50 56 44 32 41 20  |   LDX #0.PVD2A |
00008C80: 20 20 20 4C 44 41 20 56  4C 4E 2C 58 0D 20 20 20  |   LDA VLN,X.   |
00008C90: 20 20 20 20 20 20 53 54  41 20 24 30 34 42 46 2C  |      STA $04BF,|
00008CA0: 58 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 24  |X.         STA $|
00008CB0: 30 35 41 46 2C 58 0D 20  20 20 20 20 20 20 20 20  |05AF,X.         |
00008CC0: 53 54 41 20 24 30 36 39  46 2C 58 0D 20 20 20 20  |STA $069F,X.    |
00008CD0: 20 20 20 20 20 4C 44 41  20 23 31 31 0D 20 20 20  |     LDA #11.   |
00008CE0: 20 20 20 20 20 20 53 54  41 20 24 44 38 42 46 2C  |      STA $D8BF,|
00008CF0: 58 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 24  |X.         STA $|
00008D00: 44 39 41 46 2C 58 0D 20  20 20 20 20 20 20 20 20  |D9AF,X.         |
00008D10: 53 54 41 20 24 44 41 39  46 2C 58 0D 20 20 20 20  |STA $DA9F,X.    |
00008D20: 20 20 20 20 20 49 4E 58  0D 20 20 20 20 20 20 20  |     INX.       |
00008D30: 20 20 43 50 58 20 23 34  0D 20 20 20 20 20 20 20  |  CPX #4.       |
00008D40: 20 20 42 43 43 20 50 56  44 32 41 0D 43 4F 4E 54  |  BCC PVD2A.CONT|
00008D50: 30 20 20 20 20 4A 53 52  20 54 49 4D 45 52 0D 20  |0    JSR TIMER. |
00008D60: 20 20 20 20 20 20 20 20  4C 44 41 20 23 3C 4C 4E  |        LDA #<LN|
00008D70: 31 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 31  |1.         STA 1|
00008D80: 37 34 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |74.         LDA |
00008D90: 23 3E 4C 4E 31 0D 20 20  20 20 20 20 20 20 20 53  |#>LN1.         S|
00008DA0: 54 41 20 31 37 35 0D 20  20 20 20 20 20 20 20 20  |TA 175.         |
00008DB0: 4A 53 52 20 50 55 54 4C  4E 0D 20 20 20 20 20 20  |JSR PUTLN.      |
00008DC0: 20 20 20 4A 53 52 20 42  42 4F 4F 50 0D 20 20 20  |   JSR BBOOP.   |
00008DD0: 20 20 20 20 20 20 4C 44  41 20 47 58 0D 20 20 20  |      LDA GX.   |
00008DE0: 20 20 20 20 20 20 43 4C  43 0D 20 20 20 20 20 20  |      CLC.      |
00008DF0: 20 20 20 41 44 43 20 23  34 38 0D 20 20 20 20 20  |   ADC #48.     |
00008E00: 20 20 20 20 53 54 41 20  24 30 37 36 38 0D 20 20  |    STA $0768.  |
00008E10: 20 20 20 20 20 20 20 4C  44 41 20 47 59 0D 20 20  |       LDA GY.  |
00008E20: 20 20 20 20 20 20 20 43  4C 43 0D 20 20 20 20 20  |       CLC.     |
00008E30: 20 20 20 20 41 44 43 20  23 34 38 0D 20 20 20 20  |    ADC #48.    |
00008E40: 20 20 20 20 20 53 54 41  20 24 30 37 36 41 0D 20  |     STA $076A. |
00008E50: 20 20 20 20 20 20 20 20  4A 53 52 20 54 49 4D 45  |        JSR TIME|
00008E60: 52 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 23  |R.         LDA #|
00008E70: 31 37 30 0D 20 20 20 20  20 20 20 20 20 53 54 41  |170.         STA|
00008E80: 20 24 44 30 30 30 0D 20  20 20 20 20 20 20 20 20  | $D000.         |
00008E90: 4C 44 41 20 23 31 32 34  0D 20 20 20 20 20 20 20  |LDA #124.       |
00008EA0: 20 20 53 54 41 20 24 44  30 30 31 0D 20 20 20 20  |  STA $D001.    |
00008EB0: 20 20 20 20 20 4C 44 41  20 23 31 0D 20 20 20 20  |     LDA #1.    |
00008EC0: 20 20 20 20 20 53 54 41  20 24 44 30 31 35 0D 20  |     STA $D015. |
00008ED0: 20 20 20 20 20 20 20 20  4A 53 52 20 54 49 4D 45  |        JSR TIME|
00008EE0: 52 0D 20 20 20 20 20 20  20 20 20 4A 53 52 20 45  |R.         JSR E|
00008EF0: 52 41 53 45 0D 20 20 20  20 20 20 20 20 20 4A 53  |RASE.         JS|
00008F00: 52 20 54 49 4D 45 52 0D  20 20 20 20 20 20 20 20  |R TIMER.        |
00008F10: 20 4C 44 41 20 23 3C 4C  4E 32 0D 20 20 20 20 20  | LDA #<LN2.     |
00008F20: 20 20 20 20 53 54 41 20  31 37 34 0D 20 20 20 20  |    STA 174.    |
00008F30: 20 20 20 20 20 4C 44 41  20 23 3E 4C 4E 32 0D 20  |     LDA #>LN2. |
00008F40: 20 20 20 20 20 20 20 20  53 54 41 20 31 37 35 0D  |        STA 175.|
00008F50: 20 20 20 20 20 20 20 20  20 4A 53 52 20 50 55 54  |         JSR PUT|
00008F60: 4C 4E 0D 20 20 20 20 20  20 20 20 20 4A 53 52 20  |LN.         JSR |
00008F70: 42 42 4F 4F 50 0D 20 20  20 20 20 20 20 20 20 4C  |BBOOP.         L|
00008F80: 44 58 20 47 58 0D 20 20  20 20 20 20 20 20 20 44  |DX GX.         D|
00008F90: 45 58 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |EX.         LDA |
00008FA0: 4D 54 41 42 2C 58 0D 20  20 20 20 20 20 20 20 20  |MTAB,X.         |
00008FB0: 43 4C 43 0D 20 20 20 20  20 20 20 20 20 41 44 43  |CLC.         ADC|
00008FC0: 20 47 59 0D 20 20 20 20  20 20 20 20 20 54 41 58  | GY.         TAX|
00008FD0: 0D 20 20 20 20 20 20 20  20 20 44 45 58 0D 20 20  |.         DEX.  |
00008FE0: 20 20 20 20 20 20 20 4C  44 41 20 47 41 4C 54 41  |       LDA GALTA|
00008FF0: 42 2C 58 0D 20 20 20 20  20 20 20 20 20 53 54 41  |B,X.         STA|
00009000: 20 53 45 43 54 0D 20 20  20 20 20 20 20 20 20 4F  | SECT.         O|
00009010: 52 41 20 23 31 32 38 0D  20 20 20 20 20 20 20 20  |RA #128.        |
00009020: 20 53 54 41 20 47 41 4C  54 41 42 2C 58 0D 20 20  | STA GALTAB,X.  |
00009030: 20 20 20 20 20 20 20 4C  44 41 20 47 41 4C 54 41  |       LDA GALTA|
00009040: 42 2B 31 2C 58 0D 20 20  20 20 20 20 20 20 20 53  |B+1,X.         S|
00009050: 54 41 20 53 45 43 54 2B  31 0D 20 20 20 20 20 20  |TA SECT+1.      |
00009060: 20 20 20 4F 52 41 20 23  31 32 38 0D 20 20 20 20  |   ORA #128.    |
00009070: 20 20 20 20 20 53 54 41  20 47 41 4C 54 41 42 2B  |     STA GALTAB+|
00009080: 31 2C 58 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |1,X.         LDA|
00009090: 20 47 41 4C 54 41 42 2B  32 2C 58 0D 20 20 20 20  | GALTAB+2,X.    |
000090A0: 20 20 20 20 20 53 54 41  20 53 45 43 54 2B 32 0D  |     STA SECT+2.|
000090B0: 20 20 20 20 20 20 20 20  20 4F 52 41 20 23 31 32  |         ORA #12|
000090C0: 38 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 47  |8.         STA G|
000090D0: 41 4C 54 41 42 2B 32 2C  58 0D 20 20 20 20 20 20  |ALTAB+2,X.      |
000090E0: 20 20 20 4C 44 41 20 47  41 4C 54 41 42 2B 31 31  |   LDA GALTAB+11|
000090F0: 2C 58 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |,X.         STA |
00009100: 53 45 43 54 2B 33 0D 20  20 20 20 20 20 20 20 20  |SECT+3.         |
00009110: 4F 52 41 20 23 31 32 38  0D 20 20 20 20 20 20 20  |ORA #128.       |
00009120: 20 20 53 54 41 20 47 41  4C 54 41 42 2B 31 31 2C  |  STA GALTAB+11,|
00009130: 58 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 47  |X.         LDA G|
00009140: 41 4C 54 41 42 2B 31 32  2C 58 0D 20 20 20 20 20  |ALTAB+12,X.     |
00009150: 20 20 20 20 53 54 41 20  53 45 43 54 2B 34 0D 20  |    STA SECT+4. |
00009160: 20 20 20 20 20 20 20 20  4F 52 41 20 23 31 32 38  |        ORA #128|
00009170: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 47 41  |.         STA GA|
00009180: 4C 54 41 42 2B 31 32 2C  58 0D 20 20 20 20 20 20  |LTAB+12,X.      |
00009190: 20 20 20 4C 44 41 20 47  41 4C 54 41 42 2B 31 33  |   LDA GALTAB+13|
000091A0: 2C 58 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |,X.         STA |
000091B0: 53 45 43 54 2B 35 0D 20  20 20 20 20 20 20 20 20  |SECT+5.         |
000091C0: 4F 52 41 20 23 31 32 38  0D 20 20 20 20 20 20 20  |ORA #128.       |
000091D0: 20 20 53 54 41 20 47 41  4C 54 41 42 2B 31 33 2C  |  STA GALTAB+13,|
000091E0: 58 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 47  |X.         LDA G|
000091F0: 41 4C 54 41 42 2B 32 32  2C 58 0D 20 20 20 20 20  |ALTAB+22,X.     |
00009200: 20 20 20 20 53 54 41 20  53 45 43 54 2B 36 0D 20  |    STA SECT+6. |
00009210: 20 20 20 20 20 20 20 20  4F 52 41 20 23 31 32 38  |        ORA #128|
00009220: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 47 41  |.         STA GA|
00009230: 4C 54 41 42 2B 32 32 2C  58 0D 20 20 20 20 20 20  |LTAB+22,X.      |
00009240: 20 20 20 4C 44 41 20 47  41 4C 54 41 42 2B 32 33  |   LDA GALTAB+23|
00009250: 2C 58 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |,X.         STA |
00009260: 53 45 43 54 2B 37 0D 20  20 20 20 20 20 20 20 20  |SECT+7.         |
00009270: 4F 52 41 20 23 31 32 38  0D 20 20 20 20 20 20 20  |ORA #128.       |
00009280: 20 20 53 54 41 20 47 41  4C 54 41 42 2B 32 33 2C  |  STA GALTAB+23,|
00009290: 58 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 47  |X.         LDA G|
000092A0: 41 4C 54 41 42 2B 32 34  2C 58 0D 20 20 20 20 20  |ALTAB+24,X.     |
000092B0: 20 20 20 20 53 54 41 20  53 45 43 54 2B 38 0D 20  |    STA SECT+8. |
000092C0: 20 20 20 20 20 20 20 20  4F 52 41 20 23 31 32 38  |        ORA #128|
000092D0: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 47 41  |.         STA GA|
000092E0: 4C 54 41 42 2B 32 34 2C  58 0D 20 20 20 20 20 20  |LTAB+24,X.      |
000092F0: 20 20 20 4C 44 58 20 23  30 0D 4E 4F 54 54 31 20  |   LDX #0.NOTT1 |
00009300: 20 20 20 4C 44 41 20 53  45 43 54 2C 58 0D 20 20  |   LDA SECT,X.  |
00009310: 20 20 20 20 20 20 20 41  4E 44 20 23 34 0D 20 20  |       AND #4.  |
00009320: 20 20 20 20 20 20 20 42  4E 45 20 46 4E 44 53 42  |       BNE FNDSB|
00009330: 0D 20 20 20 20 20 20 20  20 20 49 4E 58 0D 20 20  |.         INX.  |
00009340: 20 20 20 20 20 20 20 43  50 58 20 23 39 0D 20 20  |       CPX #9.  |
00009350: 20 20 20 20 20 20 20 42  43 43 20 4E 4F 54 54 31  |       BCC NOTT1|
00009360: 0D 20 20 20 20 20 20 20  20 20 4A 4D 50 20 43 4F  |.         JMP CO|
00009370: 4E 54 31 0D 46 4E 44 53  42 20 20 20 20 4C 44 41  |NT1.FNDSB    LDA|
00009380: 20 53 50 58 2C 58 0D 20  20 20 20 20 20 20 20 20  | SPX,X.         |
00009390: 53 54 41 20 24 44 30 30  41 0D 20 20 20 20 20 20  |STA $D00A.      |
000093A0: 20 20 20 4C 44 41 20 53  50 59 2C 58 0D 20 20 20  |   LDA SPY,X.   |
000093B0: 20 20 20 20 20 20 53 54  41 20 24 44 30 30 42 0D  |      STA $D00B.|
000093C0: 20 20 20 20 20 20 20 20  20 4C 44 41 20 23 32 30  |         LDA #20|
000093D0: 31 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 24  |1.         STA $|
000093E0: 30 37 46 44 0D 20 20 20  20 20 20 20 20 20 4C 44  |07FD.         LD|
000093F0: 41 20 23 33 33 0D 20 20  20 20 20 20 20 20 20 53  |A #33.         S|
00009400: 54 41 20 24 44 30 31 35  0D 20 20 20 20 20 20 20  |TA $D015.       |
00009410: 20 20 4A 53 52 20 54 49  4D 45 52 0D 43 4F 4E 54  |  JSR TIMER.CONT|
00009420: 31 20 20 20 20 4A 53 52  20 45 52 41 53 45 0D 20  |1    JSR ERASE. |
00009430: 20 20 20 20 20 20 20 20  4A 53 52 20 54 49 4D 45  |        JSR TIME|
00009440: 52 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 23  |R.         LDA #|
00009450: 3C 4C 4E 33 0D 20 20 20  20 20 20 20 20 20 53 54  |<LN3.         ST|
00009460: 41 20 31 37 34 0D 20 20  20 20 20 20 20 20 20 4C  |A 174.         L|
00009470: 44 41 20 23 3E 4C 4E 33  0D 20 20 20 20 20 20 20  |DA #>LN3.       |
00009480: 20 20 53 54 41 20 31 37  35 0D 20 20 20 20 20 20  |  STA 175.      |
00009490: 20 20 20 4A 53 52 20 50  55 54 4C 4E 0D 20 20 20  |   JSR PUTLN.   |
000094A0: 20 20 20 20 20 20 4A 53  52 20 42 42 4F 4F 50 0D  |      JSR BBOOP.|
000094B0: 20 20 20 20 20 20 20 20  20 4A 53 52 20 54 49 4D  |         JSR TIM|
000094C0: 45 52 0D 20 20 20 20 20  20 20 20 20 4A 53 52 20  |ER.         JSR |
000094D0: 45 52 41 53 45 0D 20 20  20 20 20 20 20 20 20 4C  |ERASE.         L|
000094E0: 44 41 20 23 3C 4C 4E 34  0D 20 20 20 20 20 20 20  |DA #<LN4.       |
000094F0: 20 20 53 54 41 20 31 37  34 0D 20 20 20 20 20 20  |  STA 174.      |
00009500: 20 20 20 4C 44 41 20 23  3E 4C 4E 34 0D 20 20 20  |   LDA #>LN4.   |
00009510: 20 20 20 20 20 20 53 54  41 20 31 37 35 0D 20 20  |      STA 175.  |
00009520: 20 20 20 20 20 20 20 4A  53 52 20 50 55 54 4C 4E  |       JSR PUTLN|
00009530: 0D 20 20 20 20 20 20 20  20 20 4C 44 58 20 23 30  |.         LDX #0|
00009540: 0D 43 4B 4D 52 20 20 20  20 20 4C 44 41 20 53 45  |.CKMR     LDA SE|
00009550: 43 54 2C 58 0D 20 20 20  20 20 20 20 20 20 41 4E  |CT,X.         AN|
00009560: 44 20 23 33 0D 20 20 20  20 20 20 20 20 20 42 4E  |D #3.         BN|
00009570: 45 20 50 41 43 54 0D 52  54 52 4E 20 20 20 20 20  |E PACT.RTRN     |
00009580: 49 4E 58 0D 20 20 20 20  20 20 20 20 20 43 50 58  |INX.         CPX|
00009590: 20 23 39 0D 20 20 20 20  20 20 20 20 20 42 43 43  | #9.         BCC|
000095A0: 20 43 4B 4D 52 0D 20 20  20 20 20 20 20 20 20 4A  | CKMR.         J|
000095B0: 4D 50 20 57 41 49 54 30  30 0D 50 41 43 54 20 20  |MP WAIT00.PACT  |
000095C0: 20 20 20 4C 44 41 20 41  4C 4F 2C 58 0D 20 20 20  |   LDA ALO,X.   |
000095D0: 20 20 20 20 20 20 53 54  41 20 32 30 0D 20 20 20  |      STA 20.   |
000095E0: 20 20 20 20 20 20 4C 44  41 20 41 48 49 2C 58 0D  |      LDA AHI,X.|
000095F0: 20 20 20 20 20 20 20 20  20 53 54 41 20 32 31 0D  |         STA 21.|
00009600: 20 20 20 20 20 20 20 20  20 4C 44 59 20 23 30 0D  |         LDY #0.|
00009610: 50 4B 30 20 20 20 20 20  20 4C 44 41 20 41 4C 4E  |PK0      LDA ALN|
00009620: 2C 59 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |,Y.         STA |
00009630: 28 32 30 29 2C 59 0D 20  20 20 20 20 20 20 20 20  |(20),Y.         |
00009640: 49 4E 59 0D 20 20 20 20  20 20 20 20 20 43 50 59  |INY.         CPY|
00009650: 20 23 36 0D 20 20 20 20  20 20 20 20 20 42 45 51  | #6.         BEQ|
00009660: 20 52 54 52 4E 0D 20 20  20 20 20 20 20 20 20 42  | RTRN.         B|
00009670: 4E 45 20 50 4B 30 0D 57  41 49 54 30 30 20 20 20  |NE PK0.WAIT00   |
00009680: 4C 44 41 20 23 31 30 30  20 20 20 20 20 3B 46 4C  |LDA #100     ;FL|
00009690: 41 53 48 0D 20 20 20 20  20 20 20 20 20 53 54 41  |ASH.         STA|
000096A0: 20 54 49 4D 33 0D 20 20  20 20 20 20 20 20 20 4C  | TIM3.         L|
000096B0: 44 58 20 23 30 0D 20 20  20 20 20 20 20 20 20 4C  |DX #0.         L|
000096C0: 44 41 20 23 32 0D 43 4F  4C 55 4D 20 20 20 20 53  |DA #2.COLUM    S|
000096D0: 54 41 20 24 44 38 43 43  2C 58 0D 20 20 20 20 20  |TA $D8CC,X.     |
000096E0: 20 20 20 20 53 54 41 20  24 44 38 44 39 2C 58 0D  |    STA $D8D9,X.|
000096F0: 20 20 20 20 20 20 20 20  20 53 54 41 20 24 44 38  |         STA $D8|
00009700: 45 36 2C 58 0D 20 20 20  20 20 20 20 20 20 53 54  |E6,X.         ST|
00009710: 41 20 24 44 39 42 43 2C  58 0D 20 20 20 20 20 20  |A $D9BC,X.      |
00009720: 20 20 20 53 54 41 20 24  44 39 43 39 2C 58 0D 20  |   STA $D9C9,X. |
00009730: 20 20 20 20 20 20 20 20  53 54 41 20 24 44 39 44  |        STA $D9D|
00009740: 36 2C 58 0D 20 20 20 20  20 20 20 20 20 53 54 41  |6,X.         STA|
00009750: 20 24 44 41 41 43 2C 58  0D 20 20 20 20 20 20 20  | $DAAC,X.       |
00009760: 20 20 53 54 41 20 24 44  41 42 39 2C 58 0D 20 20  |  STA $DAB9,X.  |
00009770: 20 20 20 20 20 20 20 53  54 41 20 24 44 41 43 36  |       STA $DAC6|
00009780: 2C 58 0D 20 20 20 20 20  20 20 20 20 49 4E 58 0D  |,X.         INX.|
00009790: 20 20 20 20 20 20 20 20  20 43 50 58 20 23 36 0D  |         CPX #6.|
000097A0: 20 20 20 20 20 20 20 20  20 42 43 43 20 43 4F 4C  |         BCC COL|
000097B0: 55 4D 0D 20 20 20 20 20  20 20 20 20 4A 53 52 20  |UM.         JSR |
000097C0: 54 49 4D 45 52 0D 20 20  20 20 20 20 20 20 20 4C  |TIMER.         L|
000097D0: 44 41 20 24 44 43 30 30  0D 20 20 20 20 20 20 20  |DA $DC00.       |
000097E0: 20 20 41 4E 44 20 23 31  36 0D 20 20 20 20 20 20  |  AND #16.      |
000097F0: 20 20 20 42 45 51 20 53  52 4F 55 54 0D 20 20 20  |   BEQ SROUT.   |
00009800: 20 20 20 20 20 20 4C 44  41 20 23 36 30 0D 20 20  |      LDA #60.  |
00009810: 20 20 20 20 20 20 20 53  54 41 20 54 49 4D 33 0D  |       STA TIM3.|
00009820: 20 20 20 20 20 20 20 20  20 4C 44 58 20 23 30 0D  |         LDX #0.|
00009830: 20 20 20 20 20 20 20 20  20 54 58 41 0D 55 4E 44  |         TXA.UND|
00009840: 55 4D 20 20 20 20 53 54  41 20 24 44 38 43 43 2C  |UM    STA $D8CC,|
00009850: 58 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 24  |X.         STA $|
00009860: 44 38 44 39 2C 58 0D 20  20 20 20 20 20 20 20 20  |D8D9,X.         |
00009870: 53 54 41 20 24 44 38 45  36 2C 58 0D 20 20 20 20  |STA $D8E6,X.    |
00009880: 20 20 20 20 20 53 54 41  20 24 44 39 42 43 2C 58  |     STA $D9BC,X|
00009890: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 24 44  |.         STA $D|
000098A0: 39 43 39 2C 58 0D 20 20  20 20 20 20 20 20 20 53  |9C9,X.         S|
000098B0: 54 41 20 24 44 39 44 36  2C 58 0D 20 20 20 20 20  |TA $D9D6,X.     |
000098C0: 20 20 20 20 53 54 41 20  24 44 41 41 43 2C 58 0D  |    STA $DAAC,X.|
000098D0: 20 20 20 20 20 20 20 20  20 53 54 41 20 24 44 41  |         STA $DA|
000098E0: 42 39 2C 58 0D 20 20 20  20 20 20 20 20 20 53 54  |B9,X.         ST|
000098F0: 41 20 24 44 41 43 36 2C  58 0D 20 20 20 20 20 20  |A $DAC6,X.      |
00009900: 20 20 20 49 4E 58 0D 20  20 20 20 20 20 20 20 20  |   INX.         |
00009910: 43 50 58 20 23 36 0D 20  20 20 20 20 20 20 20 20  |CPX #6.         |
00009920: 42 43 43 20 55 4E 44 55  4D 0D 20 20 20 20 20 20  |BCC UNDUM.      |
00009930: 20 20 20 4A 53 52 20 54  49 4D 45 52 0D 20 20 20  |   JSR TIMER.   |
00009940: 20 20 20 20 20 20 4C 44  41 20 24 44 43 30 30 0D  |      LDA $DC00.|
00009950: 20 20 20 20 20 20 20 20  20 41 4E 44 20 23 31 36  |         AND #16|
00009960: 0D 20 20 20 20 20 20 20  20 20 42 45 51 20 53 52  |.         BEQ SR|
00009970: 4F 55 54 0D 20 20 20 20  20 20 20 20 20 4A 4D 50  |OUT.         JMP|
00009980: 20 57 41 49 54 30 30 0D  53 52 4F 55 54 20 20 20  | WAIT00.SROUT   |
00009990: 20 4A 53 52 20 42 42 45  45 50 0D 20 20 20 20 20  | JSR BBEEP.     |
000099A0: 20 20 20 20 4C 44 41 20  23 30 0D 20 20 20 20 20  |    LDA #0.     |
000099B0: 20 20 20 20 53 54 41 20  24 44 30 31 35 0D 20 20  |    STA $D015.  |
000099C0: 20 20 20 20 20 20 20 4A  4D 50 20 47 53 54 41 52  |       JMP GSTAR|
000099D0: 54 0D 0D 4C 4F 4E 47 20  20 20 20 20 4C 44 41 20  |T..LONG     LDA |
000099E0: 23 24 35 38 20 20 20 20  20 3B 4C 4F 4E 47 20 52  |#$58     ;LONG R|
000099F0: 41 4E 47 45 0D 20 20 20  20 20 20 20 20 20 53 54  |ANGE.         ST|
00009A00: 41 20 32 35 32 20 20 20  20 20 20 3B 53 45 4E 53  |A 252      ;SENS|
00009A10: 4F 52 20 53 43 41 4E 2E  0D 20 20 20 20 20 20 20  |OR SCAN..       |
00009A20: 20 20 4C 44 41 20 23 24  35 43 0D 20 20 20 20 20  |  LDA #$5C.     |
00009A30: 20 20 20 20 53 54 41 20  31 37 35 0D 20 20 20 20  |    STA 175.    |
00009A40: 20 20 20 20 20 4A 53 52  20 50 49 43 0D 20 20 20  |     JSR PIC.   |
00009A50: 20 20 20 20 20 20 4C 44  41 20 23 32 35 35 0D 20  |      LDA #255. |
00009A60: 20 20 20 20 20 20 20 20  53 54 41 20 54 49 4D 33  |        STA TIM3|
00009A70: 0D 20 20 20 20 20 20 20  20 20 4A 53 52 20 54 49  |.         JSR TI|
00009A80: 4D 45 52 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |MER.         LDA|
00009A90: 20 23 3C 4C 4E 31 0D 20  20 20 20 20 20 20 20 20  | #<LN1.         |
00009AA0: 53 54 41 20 31 37 34 0D  20 20 20 20 20 20 20 20  |STA 174.        |
00009AB0: 20 4C 44 41 20 23 3E 4C  4E 31 0D 20 20 20 20 20  | LDA #>LN1.     |
00009AC0: 20 20 20 20 53 54 41 20  31 37 35 0D 20 20 20 20  |    STA 175.    |
00009AD0: 20 20 20 20 20 4A 53 52  20 50 55 54 4C 4E 0D 20  |     JSR PUTLN. |
00009AE0: 20 20 20 20 20 20 20 20  4A 53 52 20 42 42 4F 4F  |        JSR BBOO|
00009AF0: 50 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 47  |P.         LDA G|
00009B00: 58 0D 20 20 20 20 20 20  20 20 20 43 4C 43 0D 20  |X.         CLC. |
00009B10: 20 20 20 20 20 20 20 20  41 44 43 20 23 34 38 0D  |        ADC #48.|
00009B20: 20 20 20 20 20 20 20 20  20 53 54 41 20 24 30 37  |         STA $07|
00009B30: 36 38 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |68.         LDA |
00009B40: 47 59 0D 20 20 20 20 20  20 20 20 20 43 4C 43 0D  |GY.         CLC.|
00009B50: 20 20 20 20 20 20 20 20  20 41 44 43 20 23 34 38  |         ADC #48|
00009B60: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 24 30  |.         STA $0|
00009B70: 37 36 41 0D 20 20 20 20  20 20 20 20 20 4A 53 52  |76A.         JSR|
00009B80: 20 54 49 4D 45 52 0D 20  20 20 20 20 20 20 20 20  | TIMER.         |
00009B90: 4C 44 58 20 47 58 0D 20  20 20 20 20 20 20 20 20  |LDX GX.         |
00009BA0: 4C 44 41 20 53 59 54 41  42 2C 58 0D 20 20 20 20  |LDA SYTAB,X.    |
00009BB0: 20 20 20 20 20 53 54 41  20 24 44 30 30 31 0D 20  |     STA $D001. |
00009BC0: 20 20 20 20 20 20 20 20  4C 44 58 20 47 59 0D 20  |        LDX GY. |
00009BD0: 20 20 20 20 20 20 20 20  4C 44 41 20 53 58 54 41  |        LDA SXTA|
00009BE0: 42 2C 58 0D 20 20 20 20  20 20 20 20 20 53 54 41  |B,X.         STA|
00009BF0: 20 24 44 30 30 30 0D 20  20 20 20 20 20 20 20 20  | $D000.         |
00009C00: 4C 44 41 20 53 4D 53 42  2C 58 0D 20 20 20 20 20  |LDA SMSB,X.     |
00009C10: 20 20 20 20 53 54 41 20  24 44 30 31 30 0D 20 20  |    STA $D010.  |
00009C20: 20 20 20 20 20 20 20 4C  44 41 20 23 31 0D 20 20  |       LDA #1.  |
00009C30: 20 20 20 20 20 20 20 53  54 41 20 24 44 30 31 35  |       STA $D015|
00009C40: 0D 20 20 20 20 20 20 20  20 20 4A 53 52 20 54 49  |.         JSR TI|
00009C50: 4D 45 52 0D 20 20 20 20  20 20 20 20 20 4A 53 52  |MER.         JSR|
00009C60: 20 45 52 41 53 45 0D 20  20 20 20 20 20 20 20 20  | ERASE.         |
00009C70: 4C 44 41 20 23 3C 4C 4E  32 0D 20 20 20 20 20 20  |LDA #<LN2.      |
00009C80: 20 20 20 53 54 41 20 31  37 34 0D 20 20 20 20 20  |   STA 174.     |
00009C90: 20 20 20 20 4C 44 41 20  23 3E 4C 4E 32 0D 20 20  |    LDA #>LN2.  |
00009CA0: 20 20 20 20 20 20 20 53  54 41 20 31 37 35 0D 20  |       STA 175. |
00009CB0: 20 20 20 20 20 20 20 20  4A 53 52 20 50 55 54 4C  |        JSR PUTL|
00009CC0: 4E 0D 20 20 20 20 20 20  20 20 20 4A 53 52 20 42  |N.         JSR B|
00009CD0: 42 4F 4F 50 0D 20 20 20  20 20 20 20 20 20 4A 53  |BOOP.         JS|
00009CE0: 52 20 54 49 4D 45 52 0D  20 20 20 20 20 20 20 20  |R TIMER.        |
00009CF0: 20 4C 44 41 20 23 33 30  0D 20 20 20 20 20 20 20  | LDA #30.       |
00009D00: 20 20 53 54 41 20 54 49  4D 33 0D 20 20 20 20 20  |  STA TIM3.     |
00009D10: 20 20 20 20 4C 44 41 20  23 31 34 0D 20 20 20 20  |    LDA #14.    |
00009D20: 20 20 20 20 20 53 54 41  20 43 4F 4C 49 0D 20 20  |     STA COLI.  |
00009D30: 20 20 20 20 20 20 20 53  54 41 20 24 44 38 37 42  |       STA $D87B|
00009D40: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 24 44  |.         STA $D|
00009D50: 38 37 43 0D 20 20 20 20  20 20 20 20 20 53 54 41  |87C.         STA|
00009D60: 20 24 44 38 37 44 0D 20  20 20 20 20 20 20 20 20  | $D87D.         |
00009D70: 4A 53 52 20 54 49 4D 45  52 0D 20 20 20 20 20 20  |JSR TIMER.      |
00009D80: 20 20 20 4C 44 58 20 23  34 0D 20 20 20 20 20 20  |   LDX #4.      |
00009D90: 20 20 20 4C 44 41 20 47  53 48 49 2C 58 0D 20 20  |   LDA GSHI,X.  |
00009DA0: 20 20 20 20 20 20 20 53  54 41 20 32 30 0D 20 20  |       STA 20.  |
00009DB0: 20 20 20 20 20 20 20 4C  44 41 20 47 53 4C 4F 2C  |       LDA GSLO,|
00009DC0: 58 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 32  |X.         STA 2|
00009DD0: 31 0D 20 20 20 20 20 20  20 20 20 4C 44 58 20 53  |1.         LDX S|
00009DE0: 42 32 59 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |B2Y.         LDA|
00009DF0: 20 59 54 41 42 2C 58 0D  20 20 20 20 20 20 20 20  | YTAB,X.        |
00009E00: 20 54 41 59 0D 20 20 20  20 20 20 20 20 20 4A 53  | TAY.         JS|
00009E10: 52 20 54 52 4E 49 54 0D  20 20 20 20 20 20 20 20  |R TRNIT.        |
00009E20: 20 4C 44 58 20 23 37 0D  20 20 20 20 20 20 20 20  | LDX #7.        |
00009E30: 20 4C 44 41 20 47 53 48  49 2C 58 0D 20 20 20 20  | LDA GSHI,X.    |
00009E40: 20 20 20 20 20 53 54 41  20 32 30 0D 20 20 20 20  |     STA 20.    |
00009E50: 20 20 20 20 20 4C 44 41  20 47 53 4C 4F 2C 58 0D  |     LDA GSLO,X.|
00009E60: 20 20 20 20 20 20 20 20  20 53 54 41 20 32 31 0D  |         STA 21.|
00009E70: 20 20 20 20 20 20 20 20  20 4C 44 58 20 53 42 33  |         LDX SB3|
00009E80: 59 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 59  |Y.         LDA Y|
00009E90: 54 41 42 2C 58 0D 20 20  20 20 20 20 20 20 20 54  |TAB,X.         T|
00009EA0: 41 59 0D 20 20 20 20 20  20 20 20 20 4A 53 52 20  |AY.         JSR |
00009EB0: 54 52 4E 49 54 0D 20 20  20 20 20 20 20 20 20 4C  |TRNIT.         L|
00009EC0: 44 41 20 23 32 35 35 0D  20 20 20 20 20 20 20 20  |DA #255.        |
00009ED0: 20 53 54 41 20 54 49 4D  33 0D 20 20 20 20 20 20  | STA TIM3.      |
00009EE0: 20 20 20 4A 53 52 20 45  52 41 53 45 0D 20 20 20  |   JSR ERASE.   |
00009EF0: 20 20 20 20 20 20 4A 53  52 20 54 49 4D 45 52 0D  |      JSR TIMER.|
00009F00: 20 20 20 20 20 20 20 20  20 4C 44 41 20 23 3C 4C  |         LDA #<L|
00009F10: 4E 33 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |N3.         STA |
00009F20: 31 37 34 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |174.         LDA|
00009F30: 20 23 3E 4C 4E 33 0D 20  20 20 20 20 20 20 20 20  | #>LN3.         |
00009F40: 53 54 41 20 31 37 35 0D  20 20 20 20 20 20 20 20  |STA 175.        |
00009F50: 20 4A 53 52 20 50 55 54  4C 4E 0D 20 20 20 20 20  | JSR PUTLN.     |
00009F60: 20 20 20 20 4A 53 52 20  42 42 4F 4F 50 0D 20 20  |    JSR BBOOP.  |
00009F70: 20 20 20 20 20 20 20 4A  53 52 20 54 49 4D 45 52  |       JSR TIMER|
00009F80: 0D 20 20 20 20 20 20 20  20 20 4C 44 41 20 23 32  |.         LDA #2|
00009F90: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 43 4F  |.         STA CO|
00009FA0: 4C 49 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |LI.         LDA |
00009FB0: 23 31 30 0D 20 20 20 20  20 20 20 20 20 53 54 41  |#10.         STA|
00009FC0: 20 54 49 4D 33 0D 20 20  20 20 20 20 20 20 20 4C  | TIM3.         L|
00009FD0: 44 58 20 23 31 0D 4E 45  58 58 20 20 20 20 20 4C  |DX #1.NEXX     L|
00009FE0: 44 41 20 23 3C 47 41 4C  54 41 42 0D 20 20 20 20  |DA #<GALTAB.    |
00009FF0: 20 20 20 20 20 53 54 41  20 31 37 34 0D 20 20 20  |     STA 174.   |
0000A000: 20 20 20 20 20 20 4C 44  41 20 23 3E 47 41 4C 54  |      LDA #>GALT|
0000A010: 41 42 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |AB.         STA |
0000A020: 31 37 35 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |175.         LDA|
0000A030: 20 4D 54 41 42 2C 58 0D  20 20 20 20 20 20 20 20  | MTAB,X.        |
0000A040: 20 43 4C 43 0D 20 20 20  20 20 20 20 20 20 41 44  | CLC.         AD|
0000A050: 43 20 31 37 34 0D 20 20  20 20 20 20 20 20 20 53  |C 174.         S|
0000A060: 54 41 20 31 37 34 0D 20  20 20 20 20 20 20 20 20  |TA 174.         |
0000A070: 42 43 43 20 4E 58 30 0D  20 20 20 20 20 20 20 20  |BCC NX0.        |
0000A080: 20 49 4E 43 20 31 37 35  0D 4E 58 30 20 20 20 20  | INC 175.NX0    |
0000A090: 20 20 4C 44 59 20 23 31  0D 4E 45 58 31 20 20 20  |  LDY #1.NEX1   |
0000A0A0: 20 20 4C 44 41 20 28 31  37 34 29 2C 59 0D 20 20  |  LDA (174),Y.  |
0000A0B0: 20 20 20 20 20 20 20 43  4D 50 20 23 31 32 38 0D  |       CMP #128.|
0000A0C0: 20 20 20 20 20 20 20 20  20 42 43 43 20 4E 45 58  |         BCC NEX|
0000A0D0: 30 0D 20 20 20 20 20 20  20 20 20 41 4E 44 20 23  |0.         AND #|
0000A0E0: 33 0D 20 20 20 20 20 20  20 20 20 42 45 51 20 4E  |3.         BEQ N|
0000A0F0: 45 58 30 0D 20 20 20 20  20 20 20 20 20 4A 53 52  |EX0.         JSR|
0000A100: 20 42 52 4E 49 54 0D 4E  45 58 30 20 20 20 20 20  | BRNIT.NEX0     |
0000A110: 49 4E 59 0D 20 20 20 20  20 20 20 20 20 43 50 59  |INY.         CPY|
0000A120: 20 23 31 30 0D 20 20 20  20 20 20 20 20 20 42 4E  | #10.         BN|
0000A130: 45 20 4E 45 58 31 0D 20  20 20 20 20 20 20 20 20  |E NEX1.         |
0000A140: 49 4E 58 0D 20 20 20 20  20 20 20 20 20 43 50 58  |INX.         CPX|
0000A150: 20 23 39 0D 20 20 20 20  20 20 20 20 20 42 4E 45  | #9.         BNE|
0000A160: 20 4E 45 58 58 0D 20 20  20 20 20 20 20 20 20 4A  | NEXX.         J|
0000A170: 53 52 20 45 52 41 53 45  0D 20 20 20 20 20 20 20  |SR ERASE.       |
0000A180: 20 20 4C 44 41 20 23 3C  4C 4E 34 0D 20 20 20 20  |  LDA #<LN4.    |
0000A190: 20 20 20 20 20 53 54 41  20 31 37 34 0D 20 20 20  |     STA 174.   |
0000A1A0: 20 20 20 20 20 20 4C 44  41 20 23 3E 4C 4E 34 0D  |      LDA #>LN4.|
0000A1B0: 20 20 20 20 20 20 20 20  20 53 54 41 20 31 37 35  |         STA 175|
0000A1C0: 0D 20 20 20 20 20 20 20  20 20 4A 53 52 20 50 55  |.         JSR PU|
0000A1D0: 54 4C 4E 0D 20 20 20 20  20 20 20 20 20 4A 53 52  |TLN.         JSR|
0000A1E0: 20 42 42 4F 4F 50 0D 57  41 49 54 30 31 20 20 20  | BBOOP.WAIT01   |
0000A1F0: 4C 44 41 20 24 44 43 30  30 0D 20 20 20 20 20 20  |LDA $DC00.      |
0000A200: 20 20 20 41 4E 44 20 23  31 36 0D 20 20 20 20 20  |   AND #16.     |
0000A210: 20 20 20 20 42 45 51 20  4C 52 4F 55 54 0D 20 20  |    BEQ LROUT.  |
0000A220: 20 20 20 20 20 20 20 4A  4D 50 20 57 41 49 54 30  |       JMP WAIT0|
0000A230: 31 0D 4C 52 4F 55 54 20  20 20 20 4A 53 52 20 42  |1.LROUT    JSR B|
0000A240: 42 45 45 50 0D 20 20 20  20 20 20 20 20 20 4C 44  |BEEP.         LD|
0000A250: 41 20 23 30 0D 20 20 20  20 20 20 20 20 20 53 54  |A #0.         ST|
0000A260: 41 20 24 44 30 31 35 0D  20 20 20 20 20 20 20 20  |A $D015.        |
0000A270: 20 4A 4D 50 20 47 53 54  41 52 54 0D 0D 42 52 4E  | JMP GSTART..BRN|
0000A280: 49 54 20 20 20 20 4C 44  41 20 47 53 48 49 2C 58  |IT    LDA GSHI,X|
0000A290: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 32 30  |.         STA 20|
0000A2A0: 0D 20 20 20 20 20 20 20  20 20 4C 44 41 20 47 53  |.         LDA GS|
0000A2B0: 4C 4F 2C 58 0D 20 20 20  20 20 20 20 20 20 53 54  |LO,X.         ST|
0000A2C0: 41 20 32 31 0D 20 20 20  20 20 20 20 20 20 4C 44  |A 21.         LD|
0000A2D0: 41 20 59 54 41 42 2C 59  0D 20 20 20 20 20 20 20  |A YTAB,Y.       |
0000A2E0: 20 20 53 54 59 20 53 54  52 59 0D 20 20 20 20 20  |  STY STRY.     |
0000A2F0: 20 20 20 20 54 41 59 0D  54 52 4E 49 54 20 20 20  |    TAY.TRNIT   |
0000A300: 20 4C 44 41 20 43 4F 4C  49 0D 20 20 20 20 20 20  | LDA COLI.      |
0000A310: 20 20 20 53 54 41 20 28  32 30 29 2C 59 0D 20 20  |   STA (20),Y.  |
0000A320: 20 20 20 20 20 20 20 49  4E 59 0D 20 20 20 20 20  |       INY.     |
0000A330: 20 20 20 20 53 54 41 20  28 32 30 29 2C 59 0D 20  |    STA (20),Y. |
0000A340: 20 20 20 20 20 20 20 20  49 4E 59 0D 20 20 20 20  |        INY.    |
0000A350: 20 20 20 20 20 53 54 41  20 28 32 30 29 2C 59 0D  |     STA (20),Y.|
0000A360: 20 20 20 20 20 20 20 20  20 4C 44 59 20 53 54 52  |         LDY STR|
0000A370: 59 0D 20 20 20 20 20 20  20 20 20 4A 53 52 20 54  |Y.         JSR T|
0000A380: 49 4D 45 52 0D 20 20 20  20 20 20 20 20 20 52 54  |IMER.         RT|
0000A390: 53 0D 0D 52 49 46 54 20  20 20 20 20 4C 44 41 20  |S..RIFT     LDA |
0000A3A0: 23 32 30 32 20 20 20 20  3B 44 4F 20 54 48 45 20  |#202    ;DO THE |
0000A3B0: 54 45 4D 50 4F 52 41 4C  0D 20 20 20 20 20 20 20  |TEMPORAL.       |
0000A3C0: 20 20 53 54 41 20 24 30  37 46 44 20 20 20 3B 52  |  STA $07FD   ;R|
0000A3D0: 49 46 54 20 54 48 49 4E  47 2E 0D 20 20 20 20 20  |IFT THING..     |
0000A3E0: 20 20 20 20 4C 44 41 20  23 31 36 30 0D 20 20 20  |    LDA #160.   |
0000A3F0: 20 20 20 20 20 20 53 54  41 20 24 44 30 30 41 0D  |      STA $D00A.|
0000A400: 20 20 20 20 20 20 20 20  20 4C 44 41 20 23 31 31  |         LDA #11|
0000A410: 38 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 24  |8.         STA $|
0000A420: 44 30 30 42 0D 20 20 20  20 20 20 20 20 20 4C 44  |D00B.         LD|
0000A430: 41 20 23 33 32 0D 20 20  20 20 20 20 20 20 20 53  |A #32.         S|
0000A440: 54 41 20 24 44 30 31 37  0D 20 20 20 20 20 20 20  |TA $D017.       |
0000A450: 20 20 53 54 41 20 24 44  30 31 44 0D 20 20 20 20  |  STA $D01D.    |
0000A460: 20 20 20 20 20 4C 44 41  20 24 44 30 31 35 0D 20  |     LDA $D015. |
0000A470: 20 20 20 20 20 20 20 20  4F 52 41 20 23 33 32 0D  |        ORA #32.|
0000A480: 20 20 20 20 20 20 20 20  20 53 54 41 20 24 44 30  |         STA $D0|
0000A490: 31 35 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |15.         LDA |
0000A4A0: 23 3C 4C 4E 31 31 0D 20  20 20 20 20 20 20 20 20  |#<LN11.         |
0000A4B0: 53 54 41 20 31 37 34 0D  20 20 20 20 20 20 20 20  |STA 174.        |
0000A4C0: 20 4C 44 41 20 23 3E 4C  4E 31 31 0D 20 20 20 20  | LDA #>LN11.    |
0000A4D0: 20 20 20 20 20 53 54 41  20 31 37 35 0D 20 20 20  |     STA 175.   |
0000A4E0: 20 20 20 20 20 20 4A 53  52 20 41 4C 45 52 54 0D  |      JSR ALERT.|
0000A4F0: 20 20 20 20 20 20 20 20  20 4A 53 52 20 4C 57 41  |         JSR LWA|
0000A500: 49 54 0D 20 20 20 20 20  20 20 20 20 4A 53 52 20  |IT.         JSR |
0000A510: 45 52 41 53 45 0D 20 20  20 20 20 20 20 20 20 4C  |ERASE.         L|
0000A520: 44 41 20 23 3C 4C 4E 31  32 0D 20 20 20 20 20 20  |DA #<LN12.      |
0000A530: 20 20 20 53 54 41 20 31  37 34 0D 20 20 20 20 20  |   STA 174.     |
0000A540: 20 20 20 20 4C 44 41 20  23 3E 4C 4E 31 32 0D 20  |    LDA #>LN12. |
0000A550: 20 20 20 20 20 20 20 20  53 54 41 20 31 37 35 0D  |        STA 175.|
0000A560: 20 20 20 20 20 20 20 20  20 4A 53 52 20 50 55 54  |         JSR PUT|
0000A570: 4C 4E 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |LN.         LDA |
0000A580: 23 31 30 0D 20 20 20 20  20 20 20 20 20 53 54 41  |#10.         STA|
0000A590: 20 43 4E 54 32 0D 20 20  20 20 20 20 20 20 20 4C  | CNT2.         L|
0000A5A0: 44 58 20 52 4E 44 58 0D  20 20 20 20 20 20 20 20  |DX RNDX.        |
0000A5B0: 20 4C 44 41 20 24 32 46  30 30 2C 58 0D 20 20 20  | LDA $2F00,X.   |
0000A5C0: 20 20 20 20 20 20 41 53  4C 20 41 0D 20 20 20 20  |      ASL A.    |
0000A5D0: 20 20 20 20 20 43 4C 43  0D 20 20 20 20 20 20 20  |     CLC.       |
0000A5E0: 20 20 41 44 43 20 23 37  35 0D 20 20 20 20 20 20  |  ADC #75.      |
0000A5F0: 20 20 20 54 41 59 0D 20  20 20 20 20 20 20 20 20  |   TAY.         |
0000A600: 4C 44 41 20 23 33 30 0D  20 20 20 20 20 20 20 20  |LDA #30.        |
0000A610: 20 53 54 41 20 54 49 4D  33 0D 4C 4F 53 49 54 20  | STA TIM3.LOSIT |
0000A620: 20 20 20 4A 53 52 20 54  49 4D 45 52 0D 20 20 20  |   JSR TIMER.   |
0000A630: 20 20 20 20 20 20 4A 53  52 20 54 49 4D 49 54 0D  |      JSR TIMIT.|
0000A640: 20 20 20 20 20 20 20 20  20 44 45 59 0D 20 20 20  |         DEY.   |
0000A650: 20 20 20 20 20 20 42 4E  45 20 4C 4F 53 49 54 0D  |      BNE LOSIT.|
0000A660: 20 20 20 20 20 20 20 20  20 4A 53 52 20 4C 57 41  |         JSR LWA|
0000A670: 49 54 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |IT.         LDA |
0000A680: 23 30 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |#0.         STA |
0000A690: 24 44 30 31 35 0D 20 20  20 20 20 20 20 20 20 4C  |$D015.         L|
0000A6A0: 44 58 20 54 45 4D 50 32  0D 20 20 20 20 20 20 20  |DX TEMP2.       |
0000A6B0: 20 20 4C 44 41 20 47 41  4C 54 41 42 2C 58 0D 20  |  LDA GALTAB,X. |
0000A6C0: 20 20 20 20 20 20 20 20  41 4E 44 20 23 32 34 37  |        AND #247|
0000A6D0: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 47 41  |.         STA GA|
0000A6E0: 4C 54 41 42 2C 58 0D 20  20 20 20 20 20 20 20 20  |LTAB,X.         |
0000A6F0: 4A 4D 50 20 47 53 54 41  52 54 0D 0D 53 54 4F 52  |JMP GSTART..STOR|
0000A700: 4D 20 20 20 20 4C 44 41  20 23 3C 4C 4E 31 33 20  |M    LDA #<LN13 |
0000A710: 20 20 3B 57 48 49 50 20  55 50 20 41 4E 0D 20 20  |  ;WHIP UP AN.  |
0000A720: 20 20 20 20 20 20 20 53  54 41 20 31 37 34 20 20  |       STA 174  |
0000A730: 20 20 20 20 3B 49 4F 4E  20 53 54 4F 52 4D 2E 0D  |    ;ION STORM..|
0000A740: 20 20 20 20 20 20 20 20  20 4C 44 41 20 23 3E 4C  |         LDA #>L|
0000A750: 4E 31 33 0D 20 20 20 20  20 20 20 20 20 53 54 41  |N13.         STA|
0000A760: 20 31 37 35 0D 20 20 20  20 20 20 20 20 20 4A 53  | 175.         JS|
0000A770: 52 20 41 4C 45 52 54 0D  20 20 20 20 20 20 20 20  |R ALERT.        |
0000A780: 20 4A 53 52 20 4C 57 41  49 54 0D 20 20 20 20 20  | JSR LWAIT.     |
0000A790: 20 20 20 20 4A 53 52 20  45 52 41 53 45 0D 20 20  |    JSR ERASE.  |
0000A7A0: 20 20 20 20 20 20 20 4C  44 41 20 23 3C 4C 4E 31  |       LDA #<LN1|
0000A7B0: 34 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 31  |4.         STA 1|
0000A7C0: 37 34 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |74.         LDA |
0000A7D0: 23 3E 4C 4E 31 34 0D 20  20 20 20 20 20 20 20 20  |#>LN14.         |
0000A7E0: 53 54 41 20 31 37 35 0D  20 20 20 20 20 20 20 20  |STA 175.        |
0000A7F0: 20 4A 53 52 20 50 55 54  4C 4E 0D 20 20 20 20 20  | JSR PUTLN.     |
0000A800: 20 20 20 20 4A 53 52 20  4D 45 54 45 52 0D 20 20  |    JSR METER.  |
0000A810: 20 20 20 20 20 20 20 4C  44 41 20 23 37 30 0D 20  |       LDA #70. |
0000A820: 20 20 20 20 20 20 20 20  53 54 41 20 54 49 4D 33  |        STA TIM3|
0000A830: 0D 4C 4F 53 53 48 20 20  20 20 4A 53 52 20 54 49  |.LOSSH    JSR TI|
0000A840: 4D 45 52 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |MER.         LDA|
0000A850: 20 53 4C 45 56 0D 20 20  20 20 20 20 20 20 20 43  | SLEV.         C|
0000A860: 4D 50 20 23 32 0D 20 20  20 20 20 20 20 20 20 42  |MP #2.         B|
0000A870: 43 43 20 4C 4F 53 31 0D  20 20 20 20 20 20 20 20  |CC LOS1.        |
0000A880: 20 44 45 43 20 53 4C 45  56 0D 20 20 20 20 20 20  | DEC SLEV.      |
0000A890: 20 20 20 4A 53 52 20 4C  45 56 53 0D 20 20 20 20  |   JSR LEVS.    |
0000A8A0: 20 20 20 20 20 42 4E 45  20 4C 4F 53 53 48 0D 4C  |     BNE LOSSH.L|
0000A8B0: 4F 53 31 20 20 20 20 20  4A 53 52 20 4C 57 41 49  |OS1     JSR LWAI|
0000A8C0: 54 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 23  |T.         LDA #|
0000A8D0: 30 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 24  |0.         STA $|
0000A8E0: 44 30 31 35 0D 20 20 20  20 20 20 20 20 20 4C 44  |D015.         LD|
0000A8F0: 58 20 54 45 4D 50 32 0D  20 20 20 20 20 20 20 20  |X TEMP2.        |
0000A900: 20 4C 44 41 20 47 41 4C  54 41 42 2C 58 0D 20 20  | LDA GALTAB,X.  |
0000A910: 20 20 20 20 20 20 20 41  4E 44 20 23 32 33 39 0D  |       AND #239.|
0000A920: 20 20 20 20 20 20 20 20  20 53 54 41 20 47 41 4C  |         STA GAL|
0000A930: 54 41 42 2C 58 0D 20 20  20 20 20 20 20 20 20 4A  |TAB,X.         J|
0000A940: 4D 50 20 47 53 54 41 52  54 0D 0D 44 45 41 44 20  |MP GSTART..DEAD |
0000A950: 20 20 20 20 53 45 49 20  20 20 20 20 20 20 20 20  |    SEI         |
0000A960: 20 3B 47 41 4D 45 53 20  44 4F 4E 45 2E 2E 2E 0D  | ;GAMES DONE....|
0000A970: 20 20 20 20 20 20 20 20  20 4C 44 41 20 23 24 38  |         LDA #$8|
0000A980: 31 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 24  |1.         STA $|
0000A990: 44 43 30 44 0D 20 20 20  20 20 20 20 20 20 4C 44  |DC0D.         LD|
0000A9A0: 41 20 23 24 31 42 0D 20  20 20 20 20 20 20 20 20  |A #$1B.         |
0000A9B0: 53 54 41 20 24 44 30 31  31 0D 20 20 20 20 20 20  |STA $D011.      |
0000A9C0: 20 20 20 4C 44 41 20 23  24 30 30 0D 20 20 20 20  |   LDA #$00.    |
0000A9D0: 20 20 20 20 20 53 54 41  20 24 44 30 31 41 0D 20  |     STA $D01A. |
0000A9E0: 20 20 20 20 20 20 20 20  4C 44 41 20 23 24 33 31  |        LDA #$31|
0000A9F0: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 24 30  |.         STA $0|
0000AA00: 33 31 34 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |314.         LDA|
0000AA10: 20 23 24 45 41 0D 20 20  20 20 20 20 20 20 20 53  | #$EA.         S|
0000AA20: 54 41 20 24 30 33 31 35  0D 20 20 20 20 20 20 20  |TA $0315.       |
0000AA30: 20 20 43 4C 49 0D 20 20  20 20 20 20 20 20 20 4C  |  CLI.         L|
0000AA40: 44 41 20 23 30 0D 20 20  20 20 20 20 20 20 20 53  |DA #0.         S|
0000AA50: 54 41 20 24 44 30 31 35  0D 20 20 20 20 20 20 20  |TA $D015.       |
0000AA60: 20 20 4C 44 41 20 23 31  31 0D 20 20 20 20 20 20  |  LDA #11.      |
0000AA70: 20 20 20 53 54 41 20 24  30 32 38 36 0D 20 20 20  |   STA $0286.   |
0000AA80: 20 20 20 20 20 20 4C 44  41 20 23 24 39 33 0D 20  |      LDA #$93. |
0000AA90: 20 20 20 20 20 20 20 20  4A 53 52 20 24 46 46 44  |        JSR $FFD|
0000AAA0: 32 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 23  |2.         LDA #|
0000AAB0: 24 34 30 0D 20 20 20 20  20 20 20 20 20 53 54 41  |$40.         STA|
0000AAC0: 20 32 35 32 0D 20 20 20  20 20 20 20 20 20 4C 44  | 252.         LD|
0000AAD0: 41 20 23 24 44 38 0D 20  20 20 20 20 20 20 20 20  |A #$D8.         |
0000AAE0: 53 54 41 20 31 37 35 0D  20 20 20 20 20 20 20 20  |STA 175.        |
0000AAF0: 20 4A 53 52 20 50 49 43  0D 20 20 20 20 20 20 20  | JSR PIC.       |
0000AB00: 20 20 4C 44 41 20 43 4F  44 20 20 20 20 20 20 3B  |  LDA COD      ;|
0000AB10: 42 55 54 20 57 48 59 2E  2E 2E 3F 0D 20 20 20 20  |BUT WHY...?.    |
0000AB20: 20 20 20 20 20 42 4E 45  20 43 4F 44 31 0D 20 20  |     BNE COD1.  |
0000AB30: 20 20 20 20 20 20 20 4C  44 41 20 23 24 34 30 0D  |       LDA #$40.|
0000AB40: 20 20 20 20 20 20 20 20  20 53 54 41 20 32 35 32  |         STA 252|
0000AB50: 0D 20 20 20 20 20 20 20  20 20 4C 44 41 20 23 24  |.         LDA #$|
0000AB60: 34 34 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |44.         STA |
0000AB70: 31 37 35 0D 20 20 20 20  20 20 20 20 20 4A 53 52  |175.         JSR|
0000AB80: 20 50 49 43 0D 20 20 20  20 20 20 20 20 20 4C 44  | PIC.         LD|
0000AB90: 58 20 23 30 0D 50 44 30  20 20 20 20 20 20 4C 44  |X #0.PD0      LD|
0000ABA0: 41 20 4C 4E 32 32 2C 58  0D 20 20 20 20 20 20 20  |A LN22,X.       |
0000ABB0: 20 20 42 45 51 20 48 45  52 45 0D 20 20 20 20 20  |  BEQ HERE.     |
0000ABC0: 20 20 20 20 53 54 41 20  24 30 35 34 32 2C 58 0D  |    STA $0542,X.|
0000ABD0: 20 20 20 20 20 20 20 20  20 4C 44 41 20 23 31 0D  |         LDA #1.|
0000ABE0: 20 20 20 20 20 20 20 20  20 53 54 41 20 24 44 39  |         STA $D9|
0000ABF0: 34 32 2C 58 0D 20 20 20  20 20 20 20 20 20 49 4E  |42,X.         IN|
0000AC00: 58 0D 20 20 20 20 20 20  20 20 20 4A 4D 50 20 50  |X.         JMP P|
0000AC10: 44 30 0D 43 4F 44 31 20  20 20 20 20 43 4D 50 20  |D0.COD1     CMP |
0000AC20: 23 31 0D 20 20 20 20 20  20 20 20 20 42 4E 45 20  |#1.         BNE |
0000AC30: 43 4F 44 32 0D 20 20 20  20 20 20 20 20 20 4C 44  |COD2.         LD|
0000AC40: 58 20 23 30 0D 50 44 31  20 20 20 20 20 20 4C 44  |X #0.PD1      LD|
0000AC50: 41 20 4C 4E 31 38 2C 58  0D 20 20 20 20 20 20 20  |A LN18,X.       |
0000AC60: 20 20 42 45 51 20 48 45  52 45 0D 20 20 20 20 20  |  BEQ HERE.     |
0000AC70: 20 20 20 20 53 54 41 20  24 30 35 34 32 2C 58 0D  |    STA $0542,X.|
0000AC80: 20 20 20 20 20 20 20 20  20 49 4E 58 0D 20 20 20  |         INX.   |
0000AC90: 20 20 20 20 20 20 4A 4D  50 20 50 44 31 0D 43 4F  |      JMP PD1.CO|
0000ACA0: 44 32 20 20 20 20 20 43  4D 50 20 23 32 0D 20 20  |D2     CMP #2.  |
0000ACB0: 20 20 20 20 20 20 20 42  4E 45 20 43 4F 44 33 0D  |       BNE COD3.|
0000ACC0: 20 20 20 20 20 20 20 20  20 4C 44 58 20 23 30 0D  |         LDX #0.|
0000ACD0: 50 44 32 20 20 20 20 20  20 4C 44 41 20 4C 4E 31  |PD2      LDA LN1|
0000ACE0: 39 2C 58 0D 20 20 20 20  20 20 20 20 20 42 45 51  |9,X.         BEQ|
0000ACF0: 20 48 45 52 45 0D 20 20  20 20 20 20 20 20 20 53  | HERE.         S|
0000AD00: 54 41 20 24 30 35 34 32  2C 58 0D 20 20 20 20 20  |TA $0542,X.     |
0000AD10: 20 20 20 20 49 4E 58 0D  20 20 20 20 20 20 20 20  |    INX.        |
0000AD20: 20 4A 4D 50 20 50 44 32  0D 43 4F 44 33 20 20 20  | JMP PD2.COD3   |
0000AD30: 20 20 4C 44 58 20 23 30  0D 50 44 33 20 20 20 20  |  LDX #0.PD3    |
0000AD40: 20 20 4C 44 41 20 4C 4E  32 30 2C 58 0D 20 20 20  |  LDA LN20,X.   |
0000AD50: 20 20 20 20 20 20 42 45  51 20 48 45 52 45 0D 20  |      BEQ HERE. |
0000AD60: 20 20 20 20 20 20 20 20  53 54 41 20 24 30 35 34  |        STA $054|
0000AD70: 32 2C 58 0D 20 20 20 20  20 20 20 20 20 49 4E 58  |2,X.         INX|
0000AD80: 0D 20 20 20 20 20 20 20  20 20 4A 4D 50 20 50 44  |.         JMP PD|
0000AD90: 33 0D 48 45 52 45 20 20  20 20 20 4C 44 58 20 23  |3.HERE     LDX #|
0000ADA0: 30 0D 50 44 34 20 20 20  20 20 20 4C 44 41 20 4C  |0.PD4      LDA L|
0000ADB0: 4E 32 33 2C 58 0D 20 20  20 20 20 20 20 20 20 42  |N23,X.         B|
0000ADC0: 45 51 20 4E 45 57 0D 20  20 20 20 20 20 20 20 20  |EQ NEW.         |
0000ADD0: 53 54 41 20 24 30 35 36  42 2C 58 0D 20 20 20 20  |STA $056B,X.    |
0000ADE0: 20 20 20 20 20 4C 44 41  20 23 31 35 0D 20 20 20  |     LDA #15.   |
0000ADF0: 20 20 20 20 20 20 53 54  41 20 24 44 39 36 42 2C  |      STA $D96B,|
0000AE00: 58 0D 20 20 20 20 20 20  20 20 20 49 4E 58 0D 20  |X.         INX. |
0000AE10: 20 20 20 20 20 20 20 20  4A 4D 50 20 50 44 34 0D  |        JMP PD4.|
0000AE20: 4E 45 57 20 20 20 20 20  20 4C 44 41 20 24 44 43  |NEW      LDA $DC|
0000AE30: 30 30 20 20 20 20 3B 4C  45 54 53 20 53 54 41 52  |00    ;LETS STAR|
0000AE40: 54 20 4F 56 45 52 2E 0D  20 20 20 20 20 20 20 20  |T OVER..        |
0000AE50: 20 41 4E 44 20 23 31 36  0D 20 20 20 20 20 20 20  | AND #16.       |
0000AE60: 20 20 42 4E 45 20 4E 45  57 0D 20 20 20 20 20 20  |  BNE NEW.      |
0000AE70: 20 20 20 4A 4D 50 20 24  39 30 30 30 0D 20 20 20  |   JMP $9000.   |
0000AE80: 20 20 20 20 20 20 4C 44  41 20 23 30 0D 20 20 20  |      LDA #0.   |
0000AE90: 20 20 20 20 20 20 53 54  41 20 24 30 32 38 36 0D  |      STA $0286.|
0000AEA0: 20 20 20 20 20 20 20 20  20 4C 44 41 20 23 24 39  |         LDA #$9|
0000AEB0: 33 0D 20 20 20 20 20 20  20 20 20 4A 53 52 20 24  |3.         JSR $|
0000AEC0: 46 46 44 32 0D 20 20 20  20 20 20 20 20 20 4C 44  |FFD2.         LD|
0000AED0: 41 20 23 34 38 0D 20 20  20 20 20 20 20 20 20 53  |A #48.         S|
0000AEE0: 54 41 20 53 44 31 0D 20  20 20 20 20 20 20 20 20  |TA SD1.         |
0000AEF0: 53 54 41 20 53 44 32 0D  20 20 20 20 20 20 20 20  |STA SD2.        |
0000AF00: 20 53 54 41 20 53 44 33  0D 20 20 20 20 20 20 20  | STA SD3.       |
0000AF10: 20 20 4C 44 41 20 23 35  30 0D 20 20 20 20 20 20  |  LDA #50.      |
0000AF20: 20 20 20 53 54 41 20 53  44 34 0D 20 20 20 20 20  |   STA SD4.     |
0000AF30: 20 20 20 20 4C 44 41 20  23 31 31 32 0D 20 20 20  |    LDA #112.   |
0000AF40: 20 20 20 20 20 20 53 54  41 20 4B 43 4E 54 0D 20  |      STA KCNT. |
0000AF50: 20 20 20 20 20 20 20 20  4A 4D 50 20 41 4E 45 57  |        JMP ANEW|
0000AF60: 0D 0D 4C 57 41 49 54 20  20 20 20 4C 44 41 20 23  |..LWAIT    LDA #|
0000AF70: 32 35 35 0D 20 20 20 20  20 20 20 20 20 53 54 41  |255.         STA|
0000AF80: 20 54 49 4D 33 0D 20 20  20 20 20 20 20 20 20 4A  | TIM3.         J|
0000AF90: 53 52 20 54 49 4D 45 52  0D 20 20 20 20 20 20 20  |SR TIMER.       |
0000AFA0: 20 20 4A 53 52 20 54 49  4D 45 52 0D 20 20 20 20  |  JSR TIMER.    |
0000AFB0: 20 20 20 20 20 4A 53 52  20 54 49 4D 45 52 0D 20  |     JSR TIMER. |
0000AFC0: 20 20 20 20 20 20 20 20  52 54 53 0D 0D 42 42 4F  |        RTS..BBO|
0000AFD0: 4F 50 20 20 20 20 4C 44  41 20 23 30 20 20 20 20  |OP    LDA #0    |
0000AFE0: 20 20 20 3B 53 4F 55 4E  44 20 45 46 58 0D 20 20  |   ;SOUND EFX.  |
0000AFF0: 20 20 20 20 20 20 20 53  54 41 20 53 49 44 2B 31  |       STA SID+1|
0000B000: 32 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 23  |2.         LDA #|
0000B010: 32 34 30 0D 20 20 20 20  20 20 20 20 20 53 54 41  |240.         STA|
0000B020: 20 53 49 44 2B 31 33 0D  20 20 20 20 20 20 20 20  | SID+13.        |
0000B030: 20 4C 44 41 20 23 32 35  30 0D 20 20 20 20 20 20  | LDA #250.      |
0000B040: 20 20 20 53 54 41 20 53  49 44 2B 37 0D 20 20 20  |   STA SID+7.   |
0000B050: 20 20 20 20 20 20 4C 44  41 20 23 34 31 0D 20 20  |      LDA #41.  |
0000B060: 20 20 20 20 20 20 20 53  54 41 20 53 49 44 2B 38  |       STA SID+8|
0000B070: 0D 20 20 20 20 20 20 20  20 20 4C 44 41 20 23 31  |.         LDA #1|
0000B080: 37 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 53  |7.         STA S|
0000B090: 49 44 2B 31 31 0D 20 20  20 20 20 20 20 20 20 4C  |ID+11.         L|
0000B0A0: 44 41 20 23 32 30 0D 20  20 20 20 20 20 20 20 20  |DA #20.         |
0000B0B0: 53 54 41 20 54 49 4D 33  0D 20 20 20 20 20 20 20  |STA TIM3.       |
0000B0C0: 20 20 4A 53 52 20 54 49  4D 45 52 0D 20 20 20 20  |  JSR TIMER.    |
0000B0D0: 20 20 20 20 20 4C 44 41  20 23 31 36 0D 20 20 20  |     LDA #16.   |
0000B0E0: 20 20 20 20 20 20 53 54  41 20 53 49 44 2B 31 31  |      STA SID+11|
0000B0F0: 0D 20 20 20 20 20 20 20  20 20 4A 53 52 20 54 49  |.         JSR TI|
0000B100: 4D 45 52 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |MER.         LDA|
0000B110: 20 23 31 37 0D 20 20 20  20 20 20 20 20 20 53 54  | #17.         ST|
0000B120: 41 20 53 49 44 2B 31 31  0D 20 20 20 20 20 20 20  |A SID+11.       |
0000B130: 20 20 4C 44 41 20 23 31  30 0D 20 20 20 20 20 20  |  LDA #10.      |
0000B140: 20 20 20 53 54 41 20 54  49 4D 33 0D 20 20 20 20  |   STA TIM3.    |
0000B150: 20 20 20 20 20 4A 53 52  20 54 49 4D 45 52 0D 20  |     JSR TIMER. |
0000B160: 20 20 20 20 20 20 20 20  4C 44 41 20 23 31 36 0D  |        LDA #16.|
0000B170: 20 20 20 20 20 20 20 20  20 53 54 41 20 53 49 44  |         STA SID|
0000B180: 2B 31 31 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |+11.         LDA|
0000B190: 20 23 32 35 35 0D 20 20  20 20 20 20 20 20 20 53  | #255.         S|
0000B1A0: 54 41 20 54 49 4D 33 0D  20 20 20 20 20 20 20 20  |TA TIM3.        |
0000B1B0: 20 52 54 53 0D 42 42 45  45 50 20 20 20 20 4C 44  | RTS.BBEEP    LD|
0000B1C0: 41 20 23 30 0D 20 20 20  20 20 20 20 20 20 53 54  |A #0.         ST|
0000B1D0: 41 20 53 49 44 2B 31 32  0D 20 20 20 20 20 20 20  |A SID+12.       |
0000B1E0: 20 20 4C 44 41 20 23 31  31 32 0D 20 20 20 20 20  |  LDA #112.     |
0000B1F0: 20 20 20 20 53 54 41 20  53 49 44 2B 31 33 0D 20  |    STA SID+13. |
0000B200: 20 20 20 20 20 20 20 20  4C 44 41 20 23 32 35 30  |        LDA #250|
0000B210: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 53 49  |.         STA SI|
0000B220: 44 2B 37 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |D+7.         LDA|
0000B230: 20 23 37 35 0D 20 20 20  20 20 20 20 20 20 53 54  | #75.         ST|
0000B240: 41 20 53 49 44 2B 38 0D  20 20 20 20 20 20 20 20  |A SID+8.        |
0000B250: 20 4C 44 41 20 23 33 33  0D 20 20 20 20 20 20 20  | LDA #33.       |
0000B260: 20 20 53 54 41 20 53 49  44 2B 31 31 0D 20 20 20  |  STA SID+11.   |
0000B270: 20 20 20 20 20 20 4C 44  41 20 23 32 30 0D 20 20  |      LDA #20.  |
0000B280: 20 20 20 20 20 20 20 53  54 41 20 54 49 4D 33 0D  |       STA TIM3.|
0000B290: 20 20 20 20 20 20 20 20  20 4A 53 52 20 54 49 4D  |         JSR TIM|
0000B2A0: 45 52 0D 20 20 20 20 20  20 20 20 20 4C 44 41 20  |ER.         LDA |
0000B2B0: 23 33 32 0D 20 20 20 20  20 20 20 20 20 53 54 41  |#32.         STA|
0000B2C0: 20 53 49 44 2B 31 31 0D  20 20 20 20 20 20 20 20  | SID+11.        |
0000B2D0: 20 4A 53 52 20 54 49 4D  45 52 0D 20 20 20 20 20  | JSR TIMER.     |
0000B2E0: 20 20 20 20 4C 44 41 20  23 33 33 0D 20 20 20 20  |    LDA #33.    |
0000B2F0: 20 20 20 20 20 53 54 41  20 53 49 44 2B 31 31 0D  |     STA SID+11.|
0000B300: 20 20 20 20 20 20 20 20  20 4C 44 41 20 23 31 30  |         LDA #10|
0000B310: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 54 49  |.         STA TI|
0000B320: 4D 33 0D 20 20 20 20 20  20 20 20 20 4A 53 52 20  |M3.         JSR |
0000B330: 54 49 4D 45 52 0D 20 20  20 20 20 20 20 20 20 4C  |TIMER.         L|
0000B340: 44 41 20 23 33 32 0D 20  20 20 20 20 20 20 20 20  |DA #32.         |
0000B350: 53 54 41 20 53 49 44 2B  31 31 0D 20 20 20 20 20  |STA SID+11.     |
0000B360: 20 20 20 20 4C 44 41 20  23 32 35 35 0D 20 20 20  |    LDA #255.   |
0000B370: 20 20 20 20 20 20 53 54  41 20 54 49 4D 33 0D 20  |      STA TIM3. |
0000B380: 20 20 20 20 20 20 20 20  52 54 53 0D 41 4C 41 52  |        RTS.ALAR|
0000B390: 4D 20 20 20 20 4C 44 41  20 23 30 0D 20 20 20 20  |M    LDA #0.    |
0000B3A0: 20 20 20 20 20 53 54 41  20 53 49 44 2B 35 0D 20  |     STA SID+5. |
0000B3B0: 20 20 20 20 20 20 20 20  4C 44 41 20 23 32 34 30  |        LDA #240|
0000B3C0: 0D 20 20 20 20 20 20 20  20 20 53 54 41 20 53 49  |.         STA SI|
0000B3D0: 44 2B 36 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |D+6.         LDA|
0000B3E0: 20 23 30 0D 20 20 20 20  20 20 20 20 20 53 54 41  | #0.         STA|
0000B3F0: 20 53 49 44 0D 20 20 20  20 20 20 20 20 20 4C 44  | SID.         LD|
0000B400: 41 20 23 34 36 0D 20 20  20 20 20 20 20 20 20 53  |A #46.         S|
0000B410: 54 41 20 53 49 44 2B 31  0D 20 20 20 20 20 20 20  |TA SID+1.       |
0000B420: 20 20 4C 44 41 20 23 31  34 30 0D 20 20 20 20 20  |  LDA #140.     |
0000B430: 20 20 20 20 53 54 41 20  53 49 44 2B 32 0D 20 20  |    STA SID+2.  |
0000B440: 20 20 20 20 20 20 20 4C  44 41 20 23 38 30 0D 20  |       LDA #80. |
0000B450: 20 20 20 20 20 20 20 20  53 54 41 20 53 49 44 2B  |        STA SID+|
0000B460: 33 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 23  |3.         LDA #|
0000B470: 36 35 0D 20 20 20 20 20  20 20 20 20 53 54 41 20  |65.         STA |
0000B480: 53 49 44 2B 34 0D 20 20  20 20 20 20 20 20 20 4C  |SID+4.         L|
0000B490: 44 41 20 23 37 30 0D 20  20 20 20 20 20 20 20 20  |DA #70.         |
0000B4A0: 53 54 41 20 54 49 4D 33  0D 20 20 20 20 20 20 20  |STA TIM3.       |
0000B4B0: 20 20 4A 53 52 20 54 49  4D 45 52 0D 20 20 20 20  |  JSR TIMER.    |
0000B4C0: 20 20 20 20 20 4C 44 41  20 23 36 34 0D 20 20 20  |     LDA #64.   |
0000B4D0: 20 20 20 20 20 20 53 54  41 20 53 49 44 2B 34 0D  |      STA SID+4.|
0000B4E0: 20 20 20 20 20 20 20 20  20 4C 44 41 20 23 31 36  |         LDA #16|
0000B4F0: 30 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 54  |0.         STA T|
0000B500: 49 4D 33 0D 20 20 20 20  20 20 20 20 20 52 54 53  |IM3.         RTS|
0000B510: 0D 0D 54 49 4D 45 52 20  20 20 20 44 45 43 20 54  |..TIMER    DEC T|
0000B520: 49 4D 31 0D 20 20 20 20  20 20 20 20 20 4C 44 41  |IM1.         LDA|
0000B530: 20 54 49 4D 31 0D 20 20  20 20 20 20 20 20 20 42  | TIM1.         B|
0000B540: 4E 45 20 54 49 4D 45 52  0D 20 20 20 20 20 20 20  |NE TIMER.       |
0000B550: 20 20 49 4E 43 20 54 49  4D 32 0D 20 20 20 20 20  |  INC TIM2.     |
0000B560: 20 20 20 20 4C 44 41 20  54 49 4D 32 0D 20 20 20  |    LDA TIM2.   |
0000B570: 20 20 20 20 20 20 43 4D  50 20 54 49 4D 33 0D 20  |      CMP TIM3. |
0000B580: 20 20 20 20 20 20 20 20  42 4E 45 20 54 49 4D 45  |        BNE TIME|
0000B590: 52 0D 20 20 20 20 20 20  20 20 20 4C 44 41 20 23  |R.         LDA #|
0000B5A0: 30 0D 20 20 20 20 20 20  20 20 20 53 54 41 20 54  |0.         STA T|
0000B5B0: 49 4D 32 0D 20 20 20 20  20 20 20 20 20 52 54 53  |IM2.         RTS|
0000B5C0: 0D 0D 54 49 4D 31 20 20  20 20 20 2E 42 59 54 45  |..TIM1     .BYTE|
0000B5D0: 20 30 0D 54 49 4D 32 20  20 20 20 20 2E 42 59 54  | 0.TIM2     .BYT|
0000B5E0: 45 20 30 0D 54 49 4D 33  20 20 20 20 20 2E 42 59  |E 0.TIM3     .BY|
0000B5F0: 54 45 20 30 0D 47 58 20  20 20 20 20 20 20 2E 42  |TE 0.GX       .B|
0000B600: 59 54 45 20 30 0D 47 59  20 20 20 20 20 20 20 2E  |YTE 0.GY       .|
0000B610: 42 59 54 45 20 30 0D 53  58 20 20 20 20 20 20 20  |BYTE 0.SX       |
0000B620: 2E 42 59 54 45 20 30 0D  53 59 20 20 20 20 20 20  |.BYTE 0.SY      |
0000B630: 20 2E 42 59 54 45 20 30  0D 58 31 20 20 20 20 20  | .BYTE 0.X1     |
0000B640: 20 20 2E 42 59 54 45 20  30 0D 59 31 20 20 20 20  |  .BYTE 0.Y1    |
0000B650: 20 20 20 2E 42 59 54 45  20 30 0D 58 32 20 20 20  |   .BYTE 0.X2   |
0000B660: 20 20 20 20 2E 42 59 54  45 20 30 0D 59 32 20 20  |    .BYTE 0.Y2  |
0000B670: 20 20 20 20 20 2E 42 59  54 45 20 30 0D 58 33 20  |     .BYTE 0.X3 |
0000B680: 20 20 20 20 20 20 2E 42  59 54 45 20 30 0D 59 33  |      .BYTE 0.Y3|
0000B690: 20 20 20 20 20 20 20 2E  42 59 54 45 20 30 0D 52  |       .BYTE 0.R|
0000B6A0: 58 20 20 20 20 20 20 20  2E 42 59 54 45 20 30 0D  |X       .BYTE 0.|
0000B6B0: 49 58 20 20 20 20 20 20  20 2E 42 59 54 45 20 30  |IX       .BYTE 0|
0000B6C0: 0D 53 54 4D 50 20 20 20  20 20 2E 42 59 54 45 20  |.STMP     .BYTE |
0000B6D0: 30 0D 53 43 4F 4C 20 20  20 20 20 2E 42 59 54 45  |0.SCOL     .BYTE|
0000B6E0: 20 30 0D 53 54 52 58 20  20 20 20 20 2E 42 59 54  | 0.STRX     .BYT|
0000B6F0: 45 20 30 0D 53 54 52 59  20 20 20 20 20 2E 42 59  |E 0.STRY     .BY|
0000B700: 54 45 20 30 0D 42 54 54  20 20 20 20 20 20 2E 42  |TE 0.BTT      .B|
0000B710: 59 54 45 20 30 0D 43 4F  44 20 20 20 20 20 20 2E  |YTE 0.COD      .|
0000B720: 42 59 54 45 20 30 0D 53  44 31 20 20 20 20 20 20  |BYTE 0.SD1      |
0000B730: 2E 42 59 54 45 20 34 38  0D 53 44 32 20 20 20 20  |.BYTE 48.SD2    |
0000B740: 20 20 2E 42 59 54 45 20  34 38 0D 53 44 33 20 20  |  .BYTE 48.SD3  |
0000B750: 20 20 20 20 2E 42 59 54  45 20 34 38 0D 53 44 34  |    .BYTE 48.SD4|
0000B760: 20 20 20 20 20 20 2E 42  59 54 45 20 35 30 0D 53  |      .BYTE 50.S|
0000B770: 44 35 20 20 20 20 20 20  2E 42 59 54 45 20 34 38  |D5      .BYTE 48|
0000B780: 0D 43 4E 54 30 20 20 20  20 20 2E 42 59 54 45 20  |.CNT0     .BYTE |
0000B790: 35 30 0D 43 4E 54 31 20  20 20 20 20 2E 42 59 54  |50.CNT1     .BYT|
0000B7A0: 45 20 30 0D 43 4E 54 32  20 20 20 20 20 2E 42 59  |E 0.CNT2     .BY|
0000B7B0: 54 45 20 36 0D 53 50 44  31 20 20 20 20 20 2E 42  |TE 6.SPD1     .B|
0000B7C0: 59 54 45 20 33 0D 53 50  44 32 20 20 20 20 20 2E  |YTE 3.SPD2     .|
0000B7D0: 42 59 54 45 20 33 0D 43  4F 4C 49 20 20 20 20 20  |BYTE 3.COLI     |
0000B7E0: 2E 42 59 54 45 20 30 0D  52 43 4F 4C 20 20 20 20  |.BYTE 0.RCOL    |
0000B7F0: 20 2E 42 59 54 45 20 30  0D 52 43 4E 54 20 20 20  | .BYTE 0.RCNT   |
0000B800: 20 20 2E 42 59 54 45 20  30 0D 53 42 32 59 20 20  |  .BYTE 0.SB2Y  |
0000B810: 20 20 20 2E 42 59 54 45  20 30 0D 53 42 33 59 20  |   .BYTE 0.SB3Y |
0000B820: 20 20 20 20 2E 42 59 54  45 20 30 0D 4A 53 54 52  |    .BYTE 0.JSTR|
0000B830: 20 20 20 20 20 2E 42 59  54 45 20 30 0D 50 4C 45  |     .BYTE 0.PLE|
0000B840: 56 20 20 20 20 20 2E 42  59 54 45 20 31 0D 53 4C  |V     .BYTE 1.SL|
0000B850: 45 56 20 20 20 20 20 2E  42 59 54 45 20 31 0D 4B  |EV     .BYTE 1.K|
0000B860: 43 4E 54 20 20 20 20 20  2E 42 59 54 45 20 31 31  |CNT     .BYTE 11|
0000B870: 32 0D 53 54 4F 50 20 20  20 20 20 2E 42 59 54 45  |2.STOP     .BYTE|
0000B880: 20 30 0D 54 45 4D 50 31  20 20 20 20 2E 42 59 54  | 0.TEMP1    .BYT|
0000B890: 45 20 30 0D 54 45 4D 50  32 20 20 20 20 2E 42 59  |E 0.TEMP2    .BY|
0000B8A0: 54 45 20 30 0D 53 50 53  54 52 20 20 20 20 2E 42  |TE 0.SPSTR    .B|
0000B8B0: 59 54 45 20 30 2C 30 2C  30 2C 30 2C 30 2C 30 2C  |YTE 0,0,0,0,0,0,|
0000B8C0: 30 2C 30 0D 56 4C 4E 20  20 20 20 20 20 2E 42 59  |0,0.VLN      .BY|
0000B8D0: 54 45 20 32 32 2C 31 35  2C 39 2C 34 0D 41 4C 4E  |TE 22,15,9,4.ALN|
0000B8E0: 20 20 20 20 20 20 2E 42  59 54 45 20 31 2C 33 2C  |      .BYTE 1,3,|
0000B8F0: 32 30 2C 39 2C 32 32 2C  35 0D 53 50 4E 4F 20 20  |20,9,22,5.SPNO  |
0000B900: 20 20 20 2E 42 59 54 45  20 32 30 30 2C 32 30 31  |   .BYTE 200,201|
0000B910: 2C 32 34 33 2C 32 34 34  0D 20 20 20 20 20 20 20  |,243,244.       |
0000B920: 20 20 2E 42 59 54 45 20  32 30 30 2C 32 30 31 2C  |  .BYTE 200,201,|
0000B930: 32 32 36 2C 32 31 34 0D  41 4C 54 41 42 20 20 20  |226,214.ALTAB   |
0000B940: 20 2E 42 59 54 45 20 33  32 2C 31 38 2C 35 2C 34  | .BYTE 32,18,5,4|
0000B950: 2C 33 32 0D 44 54 41 42  20 20 20 20 20 2E 42 59  |,32.DTAB     .BY|
0000B960: 54 45 20 31 32 38 2C 31  39 32 2C 32 32 34 2C 32  |TE 128,192,224,2|
0000B970: 34 30 0D 20 20 20 20 20  20 20 20 20 2E 42 59 54  |40.         .BYT|
0000B980: 45 20 32 34 38 2C 32 35  32 2C 32 35 34 2C 32 35  |E 248,252,254,25|
0000B990: 35 0D 4D 54 41 42 20 20  20 20 20 2E 42 59 54 45  |5.MTAB     .BYTE|
0000B9A0: 20 30 2C 31 31 2C 32 32  2C 33 33 2C 34 34 2C 35  | 0,11,22,33,44,5|
0000B9B0: 35 2C 36 36 2C 37 37 2C  38 38 0D 53 50 58 20 20  |5,66,77,88.SPX  |
0000B9C0: 20 20 20 20 2E 42 59 54  45 20 34 36 2C 31 34 30  |    .BYTE 46,140|
0000B9D0: 2C 32 34 34 2C 34 36 2C  31 34 30 2C 32 34 34 2C  |,244,46,140,244,|
0000B9E0: 34 36 0D 20 20 20 20 20  20 20 20 20 2E 42 59 54  |46.         .BYT|
0000B9F0: 45 20 31 34 30 2C 32 34  34 0D 53 50 59 20 20 20  |E 140,244.SPY   |
0000BA00: 20 20 20 2E 42 59 54 45  20 37 38 2C 37 38 2C 37  |   .BYTE 78,78,7|
0000BA10: 38 2C 31 32 34 2C 31 32  34 2C 31 32 34 2C 31 36  |8,124,124,124,16|
0000BA20: 38 0D 20 20 20 20 20 20  20 20 20 2E 42 59 54 45  |8.         .BYTE|
0000BA30: 20 31 36 38 2C 31 36 38  0D 41 48 49 20 20 20 20  | 168,168.AHI    |
0000BA40: 20 20 2E 42 59 54 45 20  24 30 34 2C 24 30 34 2C  |  .BYTE $04,$04,|
0000BA50: 24 30 34 2C 24 30 35 2C  24 30 35 2C 24 30 35 0D  |$04,$05,$05,$05.|
0000BA60: 20 20 20 20 20 20 20 20  20 2E 42 59 54 45 20 24  |         .BYTE $|
0000BA70: 30 36 2C 24 30 36 2C 24  30 36 0D 41 4C 4F 20 20  |06,$06,$06.ALO  |
0000BA80: 20 20 20 20 2E 42 59 54  45 20 24 43 43 2C 24 44  |    .BYTE $CC,$D|
0000BA90: 39 2C 24 45 36 2C 24 42  43 2C 24 43 39 2C 24 44  |9,$E6,$BC,$C9,$D|
0000BAA0: 36 0D 20 20 20 20 20 20  20 20 20 2E 42 59 54 45  |6.         .BYTE|
0000BAB0: 20 24 41 43 2C 24 42 39  2C 24 43 36 0D 44 49 53  | $AC,$B9,$C6.DIS|
0000BAC0: 54 41 42 20 20 20 2E 42  59 54 45 20 30 2C 31 36  |TAB   .BYTE 0,16|
0000BAD0: 2C 33 32 2C 34 38 2C 36  34 2C 38 30 2C 39 36 0D  |,32,48,64,80,96.|
0000BAE0: 20 20 20 20 20 20 20 20  20 2E 42 59 54 45 20 31  |         .BYTE 1|
0000BAF0: 31 32 2C 31 32 38 2C 31  34 34 0D 53 45 4E 54 58  |12,128,144.SENTX|
0000BB00: 20 20 20 20 2E 42 59 54  45 20 30 2C 37 36 2C 39  |    .BYTE 0,76,9|
0000BB10: 32 2C 31 30 38 2C 31 32  34 2C 31 34 30 2C 31 35  |2,108,124,140,15|
0000BB20: 36 0D 20 20 20 20 20 20  20 20 20 2E 42 59 54 45  |6.         .BYTE|
0000BB30: 20 31 37 32 2C 31 38 38  0D 53 45 4E 54 59 20 20  | 172,188.SENTY  |
0000BB40: 20 20 2E 42 59 54 45 20  30 2C 35 36 2C 38 38 2C  |  .BYTE 0,56,88,|
0000BB50: 31 32 30 2C 31 35 32 2C  31 38 34 2C 32 31 36 0D  |120,152,184,216.|
0000BB60: 20 20 20 20 20 20 20 20  20 2E 42 59 54 45 20 32  |         .BYTE 2|
0000BB70: 34 38 2C 32 34 0D 53 4D  53 42 20 20 20 20 20 2E  |48,24.SMSB     .|
0000BB80: 42 59 54 45 20 30 2C 30  2C 30 2C 30 2C 30 2C 30  |BYTE 0,0,0,0,0,0|
0000BB90: 2C 30 2C 30 2C 31 2C 31  0D 59 54 41 42 20 20 20  |,0,0,1,1.YTAB   |
0000BBA0: 20 20 2E 42 59 54 45 20  30 2C 33 2C 37 2C 31 31  |  .BYTE 0,3,7,11|
0000BBB0: 2C 31 35 2C 31 39 2C 32  33 2C 32 37 2C 33 31 0D  |,15,19,23,27,31.|
0000BBC0: 20 20 20 20 20 20 20 20  20 2E 42 59 54 45 20 33  |         .BYTE 3|
0000BBD0: 35 0D 53 59 54 41 42 20  20 20 20 2E 42 59 54 45  |5.SYTAB    .BYTE|
0000BBE0: 20 30 2C 37 34 2C 39 30  2C 31 30 36 2C 31 32 32  | 0,74,90,106,122|
0000BBF0: 2C 31 33 38 2C 31 35 34  0D 20 20 20 20 20 20 20  |,138,154.       |
0000BC00: 20 20 2E 42 59 54 45 20  31 37 30 2C 31 38 36 0D  |  .BYTE 170,186.|
0000BC10: 53 58 54 41 42 20 20 20  20 2E 42 59 54 45 20 30  |SXTAB    .BYTE 0|
0000BC20: 2C 34 38 2C 38 30 2C 31  31 32 2C 31 34 34 2C 31  |,48,80,112,144,1|
0000BC30: 37 36 2C 32 30 38 0D 20  20 20 20 20 20 20 20 20  |76,208.         |
0000BC40: 2E 42 59 54 45 20 32 34  30 2C 31 36 2C 34 38 0D  |.BYTE 240,16,48.|
0000BC50: 47 53 48 49 20 20 20 20  20 2E 42 59 54 45 20 24  |GSHI     .BYTE $|
0000BC60: 30 30 2C 24 37 38 2C 24  43 38 2C 24 31 38 2C 24  |00,$78,$C8,$18,$|
0000BC70: 36 38 2C 24 42 38 0D 20  20 20 20 20 20 20 20 20  |68,$B8.         |
0000BC80: 2E 42 59 54 45 20 24 30  38 2C 24 35 38 2C 24 41  |.BYTE $08,$58,$A|
0000BC90: 38 0D 47 53 4C 4F 20 20  20 20 20 2E 42 59 54 45  |8.GSLO     .BYTE|
0000BCA0: 20 24 30 30 2C 24 44 38  2C 24 44 38 2C 24 44 39  | $00,$D8,$D8,$D9|
0000BCB0: 2C 24 44 39 2C 24 44 39  0D 20 20 20 20 20 20 20  |,$D9,$D9.       |
0000BCC0: 20 20 2E 42 59 54 45 20  24 44 41 2C 24 44 41 2C  |  .BYTE $DA,$DA,|
0000BCD0: 24 44 41 0D 4C 4E 31 20  20 20 20 20 20 2E 42 59  |$DA.LN1      .BY|
0000BCE0: 54 45 20 31 32 2C 31 35  2C 33 2C 31 2C 32 30 2C  |TE 12,15,3,1,20,|
0000BCF0: 39 2C 31 34 2C 37 2C 33  32 0D 20 20 20 20 20 20  |9,14,7,32.      |
0000BD00: 20 20 20 2E 42 59 54 45  20 35 2C 31 34 2C 32 30  |   .BYTE 5,14,20|
0000BD10: 2C 35 2C 31 38 2C 31 36  2C 31 38 2C 39 0D 20 20  |,5,18,16,18,9.  |
0000BD20: 20 20 20 20 20 20 20 2E  42 59 54 45 20 31 39 2C  |       .BYTE 19,|
0000BD30: 35 2C 33 32 2C 39 2C 31  34 2C 33 32 2C 31 39 2C  |5,32,9,14,32,19,|
0000BD40: 35 2C 33 0D 20 20 20 20  20 20 20 20 20 2E 42 59  |5,3.         .BY|
0000BD50: 54 45 20 32 30 2C 31 35  2C 31 38 2C 33 32 2C 33  |TE 20,15,18,32,3|
0000BD60: 32 2C 34 34 2C 30 0D 4C  4E 32 20 20 20 20 20 20  |2,44,0.LN2      |
0000BD70: 2E 42 59 54 45 20 31 32  2C 31 35 2C 33 2C 31 2C  |.BYTE 12,15,3,1,|
0000BD80: 32 30 2C 39 2C 31 34 2C  37 2C 33 32 0D 20 20 20  |20,9,14,7,32.   |
0000BD90: 20 20 20 20 20 20 2E 42  59 54 45 20 31 39 2C 32  |      .BYTE 19,2|
0000BDA0: 30 2C 31 2C 31 38 2C 32  2C 31 2C 31 39 2C 35 2C  |0,1,18,2,1,19,5,|
0000BDB0: 34 30 0D 20 20 20 20 20  20 20 20 20 2E 42 59 54  |40.         .BYT|
0000BDC0: 45 20 31 39 2C 34 31 2C  30 0D 4C 4E 33 20 20 20  |E 19,41,0.LN3   |
0000BDD0: 20 20 20 2E 42 59 54 45  20 31 32 2C 31 35 2C 33  |   .BYTE 12,15,3|
0000BDE0: 2C 31 2C 32 30 2C 39 2C  31 34 2C 37 2C 33 32 0D  |,1,20,9,14,7,32.|
0000BDF0: 20 20 20 20 20 20 20 20  20 2E 42 59 54 45 20 31  |         .BYTE 1|
0000BE00: 31 2C 31 32 2C 39 2C 31  34 2C 37 2C 31 35 2C 31  |1,12,9,14,7,15,1|
0000BE10: 34 2C 33 32 0D 20 20 20  20 20 20 20 20 20 2E 42  |4,32.         .B|
0000BE20: 59 54 45 20 31 2C 33 2C  32 30 2C 39 2C 32 32 2C  |YTE 1,3,20,9,22,|
0000BE30: 39 2C 32 30 2C 32 35 2C  30 0D 4C 4E 34 20 20 20  |9,20,25,0.LN4   |
0000BE40: 20 20 20 2E 42 59 54 45  20 31 39 2C 35 2C 31 34  |   .BYTE 19,5,14|
0000BE50: 2C 31 39 2C 31 35 2C 31  38 2C 31 39 2C 33 32 0D  |,19,15,18,19,32.|
0000BE60: 20 20 20 20 20 20 20 20  20 2E 42 59 54 45 20 31  |         .BYTE 1|
0000BE70: 35 2C 31 34 2C 33 32 2C  31 39 2C 32 30 2C 31 2C  |5,14,32,19,20,1,|
0000BE80: 31 34 2C 34 0D 20 20 20  20 20 20 20 20 20 2E 42  |14,4.         .B|
0000BE90: 59 54 45 20 34 35 2C 32  2C 32 35 2C 33 32 2C 33  |YTE 45,2,25,32,3|
0000BEA0: 32 2C 33 32 2C 33 32 2C  33 32 0D 20 20 20 20 20  |2,32,32,32.     |
0000BEB0: 20 20 20 20 2E 42 59 54  45 20 34 30 2C 36 2C 32  |    .BYTE 40,6,2|
0000BEC0: 2C 34 35 2C 35 2C 32 34  2C 39 2C 32 30 2C 34 31  |,45,5,24,9,20,41|
0000BED0: 2C 30 0D 4C 4E 35 20 20  20 20 20 20 2E 42 59 54  |,0.LN5      .BYT|
0000BEE0: 45 20 33 32 2C 34 2C 39  2C 31 38 2C 35 2C 33 2C  |E 32,4,9,18,5,3,|
0000BEF0: 32 30 2C 39 2C 31 35 2C  31 34 0D 20 20 20 20 20  |20,9,15,14.     |
0000BF00: 20 20 20 20 2E 42 59 54  45 20 33 32 2C 31 32 38  |    .BYTE 32,128|
0000BF10: 2C 37 37 2C 31 32 38 2C  33 32 2C 33 32 2C 33 32  |,77,128,32,32,32|
0000BF20: 0D 20 20 20 20 20 20 20  20 20 2E 42 59 54 45 20  |.         .BYTE |
0000BF30: 33 32 2C 33 32 2C 33 32  2C 33 32 2C 33 32 2C 33  |32,32,32,32,32,3|
0000BF40: 32 2C 33 32 2C 33 32 0D  20 20 20 20 20 20 20 20  |2,32,32.        |
0000BF50: 20 2E 42 59 54 45 20 32  33 2C 31 2C 31 38 2C 31  | .BYTE 23,1,18,1|
0000BF60: 36 2C 33 32 2C 36 2C 31  2C 33 2C 32 30 0D 20 20  |6,32,6,1,3,20.  |
0000BF70: 20 20 20 20 20 20 20 2E  42 59 54 45 20 31 35 2C  |       .BYTE 15,|
0000BF80: 31 38 2C 33 32 2C 34 36  2C 34 38 2C 30 0D 4C 4E  |18,32,46,48,0.LN|
0000BF90: 36 20 20 20 20 20 20 2E  42 59 54 45 20 34 30 2C  |6      .BYTE 40,|
0000BFA0: 31 30 2C 31 35 2C 32 35  2C 31 39 2C 32 30 2C 39  |10,15,25,19,20,9|
0000BFB0: 2C 33 0D 20 20 20 20 20  20 20 20 20 2E 42 59 54  |,3.         .BYT|
0000BFC0: 45 20 31 31 2C 33 32 2C  31 32 2C 35 2C 36 2C 32  |E 11,32,12,5,6,2|
0000BFD0: 30 2C 34 37 2C 31 38 0D  20 20 20 20 20 20 20 20  |0,47,18.        |
0000BFE0: 20 2E 42 59 54 45 20 39  2C 37 2C 38 2C 32 30 2C  | .BYTE 9,7,8,20,|
0000BFF0: 33 32 2C 32 31 2C 31 36  2C 34 37 2C 34 0D 20 20  |32,21,16,47,4.  |
0000C000: 20 20 20 20 20 20 20 2E  42 59 54 45 20 31 35 2C  |       .BYTE 15,|
0000C010: 32 33 2C 31 34 2C 33 32  2C 36 2C 32 2C 34 35 2C  |23,14,32,6,2,45,|
0000C020: 35 2C 31 34 0D 20 20 20  20 20 20 20 20 20 2E 42  |5,14.         .B|
0000C030: 59 54 45 20 37 2C 31 2C  37 2C 35 2C 34 31 2C 30  |YTE 7,1,7,5,41,0|
0000C040: 0D 4C 4E 37 20 20 20 20  20 20 2E 42 59 54 45 20  |.LN7      .BYTE |
0000C050: 35 2C 31 34 2C 32 30 2C  35 2C 31 38 2C 31 36 2C  |5,14,20,5,18,16,|
0000C060: 31 38 2C 39 2C 31 39 0D  20 20 20 20 20 20 20 20  |18,9,19.        |
0000C070: 20 2E 42 59 54 45 20 35  2C 33 32 2C 39 2C 31 39  | .BYTE 5,32,9,19|
0000C080: 2C 33 32 2C 39 2C 31 34  2C 33 32 2C 31 39 0D 20  |,32,9,14,32,19. |
0000C090: 20 20 20 20 20 20 20 20  2E 42 59 54 45 20 35 2C  |        .BYTE 5,|
0000C0A0: 33 2C 32 30 2C 31 35 2C  31 38 2C 33 32 2C 33 32  |3,20,15,18,32,32|
0000C0B0: 2C 34 34 2C 30 0D 4C 4E  38 20 20 20 20 20 20 2E  |,44,0.LN8      .|
0000C0C0: 42 59 54 45 20 32 30 2C  31 35 2C 31 38 2C 31 36  |BYTE 20,15,18,16|
0000C0D0: 2C 35 2C 34 2C 31 35 2C  31 39 2C 33 32 0D 20 20  |,5,4,15,19,32.  |
0000C0E0: 20 20 20 20 20 20 20 2E  42 59 54 45 20 31 35 2C  |       .BYTE 15,|
0000C0F0: 31 34 2C 33 32 2C 31 32  2C 39 2C 31 34 2C 35 2C  |14,32,12,9,14,5,|
0000C100: 33 32 2C 33 32 0D 20 20  20 20 20 20 20 20 20 2E  |32,32.         .|
0000C110: 42 59 54 45 20 33 32 2C  34 30 2C 31 32 2C 35 2C  |BYTE 32,40,12,5,|
0000C120: 36 2C 32 30 2C 34 37 2C  31 38 2C 39 0D 20 20 20  |6,20,47,18,9.   |
0000C130: 20 20 20 20 20 20 2E 42  59 54 45 20 37 2C 38 2C  |      .BYTE 7,8,|
0000C140: 32 30 2C 34 37 2C 36 2C  39 2C 31 38 2C 35 2C 34  |20,47,6,9,18,5,4|
0000C150: 31 2C 30 0D 4C 4E 39 20  20 20 20 20 20 2E 42 59  |1,0.LN9      .BY|
0000C160: 54 45 20 32 33 2C 35 2C  33 32 2C 31 2C 31 38 2C  |TE 23,5,32,1,18,|
0000C170: 35 2C 33 32 2C 32 31 2C  31 34 0D 20 20 20 20 20  |5,32,21,14.     |
0000C180: 20 20 20 20 2E 42 59 54  45 20 34 2C 35 2C 31 38  |    .BYTE 4,5,18|
0000C190: 2C 33 32 2C 31 2C 32 30  2C 32 30 2C 31 2C 33 0D  |,32,1,20,20,1,3.|
0000C1A0: 20 20 20 20 20 20 20 20  20 2E 42 59 54 45 20 31  |         .BYTE 1|
0000C1B0: 31 2C 33 33 2C 30 0D 4C  4E 31 30 20 20 20 20 20  |1,33,0.LN10     |
0000C1C0: 2E 42 59 54 45 20 31 38  2C 35 2C 34 2C 33 32 2C  |.BYTE 18,5,4,32,|
0000C1D0: 31 2C 31 32 2C 35 2C 31  38 2C 32 30 0D 20 20 20  |1,12,5,18,20.   |
0000C1E0: 20 20 20 20 20 20 2E 42  59 54 45 20 33 33 2C 33  |      .BYTE 33,3|
0000C1F0: 32 2C 32 2C 31 2C 32 30  2C 32 30 2C 31 32 2C 35  |2,2,1,20,20,12,5|
0000C200: 2C 31 39 0D 20 20 20 20  20 20 20 20 20 2E 42 59  |,19.         .BY|
0000C210: 54 45 20 32 30 2C 31 2C  32 30 2C 39 2C 31 35 2C  |TE 20,1,20,9,15,|
0000C220: 31 34 2C 31 39 2C 30 0D  4C 4E 31 31 20 20 20 20  |14,19,0.LN11    |
0000C230: 20 2E 42 59 54 45 20 32  33 2C 35 2C 33 32 2C 31  | .BYTE 23,5,32,1|
0000C240: 2C 31 38 2C 35 2C 33 32  2C 39 2C 31 34 0D 20 20  |,18,5,32,9,14.  |
0000C250: 20 20 20 20 20 20 20 2E  42 59 54 45 20 33 32 2C  |       .BYTE 32,|
0000C260: 31 2C 33 32 2C 32 30 2C  35 2C 31 33 2C 31 36 2C  |1,32,20,5,13,16,|
0000C270: 31 35 2C 31 38 0D 20 20  20 20 20 20 20 20 20 2E  |15,18.         .|
0000C280: 42 59 54 45 20 31 2C 31  32 2C 33 32 2C 31 38 2C  |BYTE 1,12,32,18,|
0000C290: 39 2C 36 2C 32 30 2C 33  32 2C 33 2C 31 0D 20 20  |9,6,20,32,3,1.  |
0000C2A0: 20 20 20 20 20 20 20 2E  42 59 54 45 20 31 36 2C  |       .BYTE 16,|
0000C2B0: 32 30 2C 31 2C 39 2C 31  34 2C 33 33 2C 30 0D 4C  |20,1,9,14,33,0.L|
0000C2C0: 4E 31 32 20 20 20 20 20  2E 42 59 54 45 20 32 33  |N12     .BYTE 23|
0000C2D0: 2C 35 2C 33 32 2C 31 2C  31 38 2C 35 2C 33 32 2C  |,5,32,1,18,5,32,|
0000C2E0: 31 32 2C 31 35 0D 20 20  20 20 20 20 20 20 20 2E  |12,15.         .|
0000C2F0: 42 59 54 45 20 31 39 2C  39 2C 31 34 2C 37 2C 33  |BYTE 19,9,14,7,3|
0000C300: 32 2C 32 30 2C 39 2C 31  33 2C 35 2C 33 32 0D 20  |2,20,9,13,5,32. |
0000C310: 20 20 20 20 20 20 20 20  2E 42 59 54 45 20 39 2C  |        .BYTE 9,|
0000C320: 31 34 2C 33 32 2C 31 2C  33 32 2C 33 2C 31 2C 32  |14,32,1,32,3,1,2|
0000C330: 31 2C 31 39 2C 31 0D 20  20 20 20 20 20 20 20 20  |1,19,1.         |
0000C340: 2E 42 59 54 45 20 31 32  2C 39 2C 32 30 2C 32 35  |.BYTE 12,9,20,25|
0000C350: 2C 33 32 2C 31 32 2C 31  35 2C 31 35 0D 20 20 20  |,32,12,15,15.   |
0000C360: 20 20 20 20 20 20 2E 42  59 54 45 20 31 36 2C 30  |      .BYTE 16,0|
0000C370: 0D 4C 4E 31 33 20 20 20  20 20 2E 42 59 54 45 20  |.LN13     .BYTE |
0000C380: 32 33 2C 35 2C 33 32 2C  31 2C 31 38 2C 35 2C 33  |23,5,32,1,18,5,3|
0000C390: 32 2C 33 2C 31 2C 32 31  0D 20 20 20 20 20 20 20  |2,3,1,21.       |
0000C3A0: 20 20 2E 42 59 54 45 20  37 2C 38 2C 32 30 2C 33  |  .BYTE 7,8,20,3|
0000C3B0: 32 2C 39 2C 31 34 2C 33  32 2C 31 2C 31 34 2C 33  |2,9,14,32,1,14,3|
0000C3C0: 32 0D 20 20 20 20 20 20  20 20 20 2E 42 59 54 45  |2.         .BYTE|
0000C3D0: 20 39 2C 31 35 2C 31 34  2C 33 32 2C 31 39 2C 32  | 9,15,14,32,19,2|
0000C3E0: 30 2C 31 35 2C 31 38 2C  31 33 0D 20 20 20 20 20  |0,15,18,13.     |
0000C3F0: 20 20 20 20 2E 42 59 54  45 20 33 32 2C 33 2C 31  |    .BYTE 32,3,1|
0000C400: 2C 31 36 2C 32 30 2C 31  2C 39 2C 31 34 2C 33 33  |,16,20,1,9,14,33|
0000C410: 2C 30 0D 4C 4E 31 34 20  20 20 20 20 2E 42 59 54  |,0.LN14     .BYT|
0000C420: 45 20 31 35 2C 32 31 2C  31 38 2C 33 32 2C 31 39  |E 15,21,18,32,19|
0000C430: 2C 38 2C 39 2C 35 2C 31  32 0D 20 20 20 20 20 20  |,8,9,5,12.      |
0000C440: 20 20 20 2E 42 59 54 45  20 34 2C 31 39 2C 33 32  |   .BYTE 4,19,32|
0000C450: 2C 31 2C 31 38 2C 35 2C  33 32 2C 32 30 2C 31 2C  |,1,18,5,32,20,1,|
0000C460: 31 31 0D 20 20 20 20 20  20 20 20 20 2E 42 59 54  |11.         .BYT|
0000C470: 45 20 39 2C 31 34 2C 37  2C 33 32 2C 31 2C 33 32  |E 9,14,7,32,1,32|
0000C480: 2C 32 2C 35 2C 31 2C 32  30 0D 20 20 20 20 20 20  |,2,5,1,20.      |
0000C490: 20 20 20 2E 42 59 54 45  20 39 2C 31 34 2C 37 2C  |   .BYTE 9,14,7,|
0000C4A0: 33 32 2C 31 39 2C 39 2C  31 38 2C 33 33 2C 30 0D  |32,19,9,18,33,0.|
0000C4B0: 4C 4E 31 35 20 20 20 20  20 2E 42 59 54 45 20 31  |LN15     .BYTE 1|
0000C4C0: 39 2C 38 2C 39 2C 35 2C  31 32 2C 34 2C 31 39 2C  |9,8,9,5,12,4,19,|
0000C4D0: 33 32 2C 31 2C 31 38 0D  20 20 20 20 20 20 20 20  |32,1,18.        |
0000C4E0: 20 2E 42 59 54 45 20 35  2C 33 32 2C 34 2C 31 35  | .BYTE 5,32,4,15|
0000C4F0: 2C 32 33 2C 31 34 2C 33  32 2C 33 2C 31 2C 31 36  |,23,14,32,3,1,16|
0000C500: 0D 20 20 20 20 20 20 20  20 20 2E 42 59 54 45 20  |.         .BYTE |
0000C510: 32 30 2C 31 2C 39 2C 31  34 2C 33 33 2C 30 0D 4C  |20,1,9,14,33,0.L|
0000C520: 4E 31 36 20 20 20 20 20  2E 42 59 54 45 20 31 34  |N16     .BYTE 14|
0000C530: 2C 31 35 2C 32 30 2C 33  32 2C 35 2C 31 34 2C 31  |,15,20,32,5,14,1|
0000C540: 35 2C 32 31 2C 37 0D 20  20 20 20 20 20 20 20 20  |5,21,7.         |
0000C550: 2E 42 59 54 45 20 38 2C  33 32 2C 31 36 2C 31 35  |.BYTE 8,32,16,15|
0000C560: 2C 32 33 2C 35 2C 31 38  2C 33 32 2C 36 0D 20 20  |,23,5,18,32,6.  |
0000C570: 20 20 20 20 20 20 20 2E  42 59 54 45 20 31 35 2C  |       .BYTE 15,|
0000C580: 31 38 2C 33 32 2C 32 33  2C 31 2C 31 38 2C 31 36  |18,32,23,1,18,16|
0000C590: 2C 33 32 2C 34 0D 20 20  20 20 20 20 20 20 20 2E  |,32,4.         .|
0000C5A0: 42 59 54 45 20 31 38 2C  39 2C 32 32 2C 35 2C 33  |BYTE 18,9,22,5,3|
0000C5B0: 32 2C 31 39 2C 39 2C 31  38 2C 33 33 2C 30 0D 4C  |2,19,9,18,33,0.L|
0000C5C0: 4E 31 37 20 20 20 20 20  2E 42 59 54 45 20 32 33  |N17     .BYTE 23|
0000C5D0: 2C 35 2C 33 32 2C 31 33  2C 32 31 2C 31 39 2C 32  |,5,32,13,21,19,2|
0000C5E0: 30 2C 33 32 2C 32 30 0D  20 20 20 20 20 20 20 20  |0,32,20.        |
0000C5F0: 20 2E 42 59 54 45 20 31  38 2C 31 2C 32 32 2C 35  | .BYTE 18,1,22,5|
0000C600: 2C 31 32 2C 33 32 2C 31  2C 32 30 2C 33 32 0D 20  |,12,32,1,20,32. |
0000C610: 20 20 20 20 20 20 20 20  2E 42 59 54 45 20 31 39  |        .BYTE 19|
0000C620: 2C 32 31 2C 32 2C 34 35  2C 31 32 2C 39 2C 37 2C  |,21,2,45,12,9,7,|
0000C630: 38 2C 32 30 2C 33 32 0D  20 20 20 20 20 20 20 20  |8,20,32.        |
0000C640: 20 2E 42 59 54 45 20 31  39 2C 31 36 2C 35 2C 35  | .BYTE 19,16,5,5|
0000C650: 2C 34 2C 30 0D 4C 4E 31  38 20 20 20 20 20 2E 42  |,4,0.LN18     .B|
0000C660: 59 54 45 20 32 35 2C 31  35 2C 32 31 2C 33 32 2C  |YTE 25,15,21,32,|
0000C670: 38 2C 31 2C 32 32 2C 35  2C 33 32 0D 20 20 20 20  |8,1,22,5,32.    |
0000C680: 20 20 20 20 20 2E 42 59  54 45 20 35 2C 31 34 2C  |     .BYTE 5,14,|
0000C690: 32 30 2C 35 2C 31 38 2C  35 2C 34 2C 33 32 2C 32  |20,5,18,5,4,32,2|
0000C6A0: 30 2C 38 0D 20 20 20 20  20 20 20 20 20 2E 42 59  |0,8.         .BY|
0000C6B0: 54 45 20 35 2C 33 32 2C  37 2C 31 2C 31 32 2C 31  |TE 5,32,7,1,12,1|
0000C6C0: 2C 33 2C 32 30 2C 39 2C  33 2C 33 32 0D 20 20 20  |,3,20,9,3,32.   |
0000C6D0: 20 20 20 20 20 20 2E 42  59 54 45 20 32 32 2C 31  |      .BYTE 22,1|
0000C6E0: 35 2C 39 2C 34 2C 33 33  2C 30 0D 4C 4E 31 39 20  |5,9,4,33,0.LN19 |
0000C6F0: 20 20 20 20 2E 42 59 54  45 20 33 32 2C 33 32 2C  |    .BYTE 32,32,|
0000C700: 32 35 2C 31 35 2C 32 31  2C 33 32 2C 32 33 2C 35  |25,15,21,32,23,5|
0000C710: 0D 20 20 20 20 20 20 20  20 20 2E 42 59 54 45 20  |.         .BYTE |
0000C720: 31 38 2C 35 2C 33 32 2C  34 2C 35 2C 31 39 2C 32  |18,5,32,4,5,19,2|
0000C730: 30 2C 31 38 2C 31 35 0D  20 20 20 20 20 20 20 20  |0,18,15.        |
0000C740: 20 2E 42 59 54 45 20 32  35 2C 35 2C 34 2C 33 32  | .BYTE 25,5,4,32|
0000C750: 2C 32 2C 32 35 2C 33 32  2C 35 2C 31 34 2C 35 0D  |,2,25,32,5,14,5.|
0000C760: 20 20 20 20 20 20 20 20  20 2E 42 59 54 45 20 31  |         .BYTE 1|
0000C770: 33 2C 32 35 2C 33 32 2C  36 2C 39 2C 31 38 2C 35  |3,25,32,6,9,18,5|
0000C780: 2C 33 33 2C 30 0D 4C 4E  32 30 20 20 20 20 20 2E  |,33,0.LN20     .|
0000C790: 42 59 54 45 20 33 32 2C  33 32 2C 33 32 2C 33 32  |BYTE 32,32,32,32|
0000C7A0: 2C 33 32 0D 20 20 20 20  20 20 20 20 20 2E 42 59  |,32.         .BY|
0000C7B0: 54 45 20 32 35 2C 31 35  2C 32 31 2C 33 32 2C 38  |TE 25,15,21,32,8|
0000C7C0: 2C 31 2C 32 32 2C 35 2C  33 32 0D 20 20 20 20 20  |,1,22,5,32.     |
0000C7D0: 20 20 20 20 2E 42 59 54  45 20 31 38 2C 32 31 2C  |    .BYTE 18,21,|
0000C7E0: 31 34 2C 33 32 2C 31 35  2C 32 31 2C 32 30 2C 33  |14,32,15,21,20,3|
0000C7F0: 32 0D 20 20 20 20 20 20  20 20 20 2E 42 59 54 45  |2.         .BYTE|
0000C800: 20 31 35 2C 36 2C 33 32  2C 32 30 2C 39 2C 31 33  | 15,6,32,20,9,13|
0000C810: 2C 35 2C 33 33 2C 30 0D  4C 4E 32 31 20 20 20 20  |,5,33,0.LN21    |
0000C820: 20 2E 42 59 54 45 20 34  32 2C 34 32 2C 34 32 2C  | .BYTE 42,42,42,|
0000C830: 33 32 2C 31 39 2C 39 2C  31 33 2C 32 31 0D 20 20  |32,19,9,13,21.  |
0000C840: 20 20 20 20 20 20 20 2E  42 59 54 45 20 31 32 2C  |       .BYTE 12,|
0000C850: 31 2C 32 30 2C 39 2C 31  35 2C 31 34 2C 33 32 2C  |1,20,9,15,14,32,|
0000C860: 31 36 2C 31 0D 20 20 20  20 20 20 20 20 20 2E 42  |16,1.         .B|
0000C870: 59 54 45 20 32 31 2C 31  39 2C 35 2C 34 2C 33 32  |YTE 21,19,5,4,32|
0000C880: 2C 34 32 2C 34 32 2C 34  32 2C 30 0D 4C 4E 32 32  |,42,42,42,0.LN22|
0000C890: 20 20 20 20 20 2E 42 59  54 45 20 33 32 2C 33 2C  |     .BYTE 32,3,|
0000C8A0: 31 35 2C 31 34 2C 37 2C  31 38 2C 31 2C 32 30 2C  |15,14,7,18,1,20,|
0000C8B0: 32 31 0D 20 20 20 20 20  20 20 20 20 2E 42 59 54  |21.         .BYT|
0000C8C0: 45 20 31 32 2C 31 2C 32  30 2C 39 2C 31 35 2C 31  |E 12,1,20,9,15,1|
0000C8D0: 34 2C 31 39 2C 33 32 2C  33 0D 20 20 20 20 20 20  |4,19,32,3.      |
0000C8E0: 20 20 20 2E 42 59 54 45  20 31 2C 31 36 2C 32 30  |   .BYTE 1,16,20|
0000C8F0: 2C 31 2C 39 2C 31 34 2C  33 33 2C 33 32 2C 37 2C  |,1,9,14,33,32,7,|
0000C900: 31 35 0D 20 20 20 20 20  20 20 20 20 2E 42 59 54  |15.         .BYT|
0000C910: 45 20 31 35 2C 34 2C 33  32 2C 32 33 2C 31 35 2C  |E 15,4,32,23,15,|
0000C920: 31 38 2C 31 31 2C 33 33  2C 30 0D 4C 4E 32 33 20  |18,11,33,0.LN23 |
0000C930: 20 20 20 20 2E 42 59 54  45 20 31 36 2C 31 38 2C  |    .BYTE 16,18,|
0000C940: 35 2C 31 39 2C 31 39 2C  33 32 2C 36 2C 39 2C 31  |5,19,19,32,6,9,1|
0000C950: 38 0D 20 20 20 20 20 20  20 20 20 2E 42 59 54 45  |8.         .BYTE|
0000C960: 20 35 2C 33 32 2C 36 2C  31 35 2C 31 38 2C 33 32  | 5,32,6,15,18,32|
0000C970: 2C 31 2C 33 32 2C 31 34  0D 20 20 20 20 20 20 20  |,1,32,14.       |
0000C980: 20 20 2E 42 59 54 45 20  35 2C 32 33 2C 33 32 2C  |  .BYTE 5,23,32,|
0000C990: 31 39 2C 39 2C 31 33 2C  32 31 2C 31 32 2C 31 0D  |19,9,13,21,12,1.|
0000C9A0: 20 20 20 20 20 20 20 20  20 2E 42 59 54 45 20 32  |         .BYTE 2|
0000C9B0: 30 2C 39 2C 31 35 2C 31  34 2C 34 36 2C 34 36 2C  |0,9,15,14,46,46,|
0000C9C0: 34 36 2C 30 0D 48 49 54  41 42 20 20 20 20 2E 42  |46,0.HITAB    .B|
0000C9D0: 59 54 45 20 24 32 39 2C  24 35 31 2C 24 37 39 2C  |YTE $29,$51,$79,|
0000C9E0: 24 41 31 2C 24 43 39 2C  24 46 31 0D 20 20 20 20  |$A1,$C9,$F1.    |
0000C9F0: 20 20 20 20 20 2E 42 59  54 45 20 24 31 39 2C 24  |     .BYTE $19,$|
0000CA00: 34 31 2C 24 36 39 2C 24  39 31 2C 24 42 39 2C 24  |41,$69,$91,$B9,$|
0000CA10: 45 31 0D 20 20 20 20 20  20 20 20 20 2E 42 59 54  |E1.         .BYT|
0000CA20: 45 20 24 30 39 2C 24 33  31 2C 24 35 39 2C 24 38  |E $09,$31,$59,$8|
0000CA30: 31 2C 24 41 39 2C 24 44  31 0D 4C 4F 54 41 42 20  |1,$A9,$D1.LOTAB |
0000CA40: 20 20 20 2E 42 59 54 45  20 24 30 34 2C 24 30 34  |   .BYTE $04,$04|
0000CA50: 2C 24 30 34 2C 24 30 34  2C 24 30 34 2C 24 30 34  |,$04,$04,$04,$04|
0000CA60: 0D 20 20 20 20 20 20 20  20 20 2E 42 59 54 45 20  |.         .BYTE |
0000CA70: 24 30 35 2C 24 30 35 2C  24 30 35 2C 24 30 35 2C  |$05,$05,$05,$05,|
0000CA80: 24 30 35 2C 24 30 35 0D  20 20 20 20 20 20 20 20  |$05,$05.        |
0000CA90: 20 2E 42 59 54 45 20 24  30 36 2C 24 30 36 2C 24  | .BYTE $06,$06,$|
0000CAA0: 30 36 2C 24 30 36 2C 24  30 36 2C 24 30 36 0D 47  |06,$06,$06,$06.G|
0000CAB0: 41 4C 54 41 42 20 20 20  2E 42 59 54 45 20 30 2C  |ALTAB   .BYTE 0,|
0000CAC0: 30 2C 30 2C 30 2C 30 2C  30 2C 30 2C 30 2C 30 2C  |0,0,0,0,0,0,0,0,|
0000CAD0: 30 2C 30 0D 20 20 20 20  20 20 20 20 20 2E 42 59  |0,0.         .BY|
0000CAE0: 54 45 20 30 2C 30 2C 30  2C 30 2C 30 2C 30 2C 30  |TE 0,0,0,0,0,0,0|
0000CAF0: 2C 30 2C 30 2C 30 2C 30  0D 20 20 20 20 20 20 20  |,0,0,0,0.       |
0000CB00: 20 20 2E 42 59 54 45 20  30 2C 30 2C 30 2C 30 2C  |  .BYTE 0,0,0,0,|
0000CB10: 30 2C 30 2C 30 2C 30 2C  30 2C 30 2C 30 0D 20 20  |0,0,0,0,0,0,0.  |
0000CB20: 20 20 20 20 20 20 20 2E  42 59 54 45 20 30 2C 30  |       .BYTE 0,0|
0000CB30: 2C 30 2C 30 2C 30 2C 30  2C 30 2C 30 2C 30 2C 30  |,0,0,0,0,0,0,0,0|
0000CB40: 2C 30 0D 20 20 20 20 20  20 20 20 20 2E 42 59 54  |,0.         .BYT|
0000CB50: 45 20 30 2C 30 2C 30 2C  30 2C 30 2C 30 2C 30 2C  |E 0,0,0,0,0,0,0,|
0000CB60: 30 2C 30 2C 30 2C 30 0D  20 20 20 20 20 20 20 20  |0,0,0,0.        |
0000CB70: 20 2E 42 59 54 45 20 30  2C 30 2C 30 2C 30 2C 30  | .BYTE 0,0,0,0,0|
0000CB80: 2C 30 2C 30 2C 30 2C 30  2C 30 2C 30 0D 20 20 20  |,0,0,0,0,0,0.   |
0000CB90: 20 20 20 20 20 20 2E 42  59 54 45 20 30 2C 30 2C  |      .BYTE 0,0,|
0000CBA0: 30 2C 30 2C 30 2C 30 2C  30 2C 30 2C 30 2C 30 2C  |0,0,0,0,0,0,0,0,|
0000CBB0: 30 0D 20 20 20 20 20 20  20 20 20 2E 42 59 54 45  |0.         .BYTE|
0000CBC0: 20 30 2C 30 2C 30 2C 30  2C 30 2C 30 2C 30 2C 30  | 0,0,0,0,0,0,0,0|
0000CBD0: 2C 30 2C 30 2C 30 0D 20  20 20 20 20 20 20 20 20  |,0,0,0.         |
0000CBE0: 2E 42 59 54 45 20 30 2C  30 2C 30 2C 30 2C 30 2C  |.BYTE 0,0,0,0,0,|
0000CBF0: 30 2C 30 2C 30 2C 30 2C  30 2C 30 0D 20 20 20 20  |0,0,0,0,0,0.    |
0000CC00: 20 20 20 20 20 2E 42 59  54 45 20 30 2C 30 2C 30  |     .BYTE 0,0,0|
0000CC10: 2C 30 2C 30 2C 30 2C 30  2C 30 2C 30 2C 30 2C 30  |,0,0,0,0,0,0,0,0|
0000CC20: 0D 53 45 43 54 20 20 20  20 20 2E 42 59 54 45 20  |.SECT     .BYTE |
0000CC30: 30 2C 30 2C 30 2C 30 2C  30 2C 30 0D 0D           |0,0,0,0,0,0..   |
;      .........................;      .
 STAR TREK SIMULATION ..;      . (SEQ. S
OURCE CODE)   ..;      . ROY BATTY  JAN.
 2001 ..;      .........................
..         *= $1000..TMP1     = $02.TMP2
     = $03.RNDX     = $04.NOK1     = $05
.KMOV     = $06.TIM4     = $07.TIM5     
= $08.ATT1     = $09.ATT2     = $0A.KNT1
     = $0B.KNT2     = $0C.JOY2     = $0D
.ECNT     = $0E.SID      = $D400..ANEW  
   LDA #0.         STA $D020.         ST
A $D021.         STA KMOV.         STA A
TT1.         STA ATT2.         LDA #1.  
       STA GX.         STA GY.         S
TA PLEV.         STA SLEV.         LDA #
4.         STA SX.         STA SY.      
   JSR RNDGEN  ;RANDOM TABLES.         J
SR SETUP   ;MAKE GALAXY.         LDA #18
.         STA $D018   ;CSET @ $0800.    
     SEI.         LDA #$7F.         STA 
$DC0D.         LDA #$01.         STA $D0
1A.         LDA #$1B.         STA $D011.
         LDA #$00.         STA $D012.   
      LDA #<IRQ1.         STA $0314.    
     LDA #>IRQ1.         STA $0315.     
    CLI.RSET     LDX #0       ;SET UP SP
RITES.ASSG     LDA SPNO,X.         STA $
07F8,X.         INX.         CPX #8.    
     BNE ASSG.         LDA #1.         S
TA $D027.         STA $D02B.         STA
 $D02C.         STA $D02D.         STA $
D02E.         LDA #5.         STA $D028.
         STA $D02A.         LDA #13.    
     STA $D029.         LDA #11.        
 STA $D025.         LDA #15.         STA
 $D026.         LDA #32.         STA $D0
1C..GSTART   LDA #$40.         STA 252. 
        LDA #$44.         STA 175.      
   JSR PIC    ;PUT MAIN SCREEN.         
LDA #160.         STA TIM3.         LDA 
#0.         STA $D01B.         LDA #50. 
        STA RCNT.         JSR STARS  ;TH
ROW SOME STARS IN.         LDA GX.      
   CMP #1.         BCC VOI1.         CMP
 #9.         BCS VOI1.         LDA GY.  
       CMP #1.         BCC VOI1.        
 CMP #10.         BCS VOI1.         JMP 
VCONT.VOI1     LDA #1     ;ARE YOU IN TH
E.         STA COD    ;VOID?.         JM
P DEAD.VCONT    LDX #0.VCO      LDY RNDX
.         LDA $6000,Y.         CLC.     
    ADC #1.         STA RX,X.         IN
C RNDX.         INX.         CPX #2.    
     BNE VCO.         LDX GX.         LD
A MTAB,X.         CLC.         ADC GY.  
       STA TEMP2.         TAX.         L
DA GALTAB,X.         AND #3.         STA
 NOK1.         BEQ PNU0.         ASL A. 
        STA TEMP1.         LDX #0.PNUM  
   LDY RNDX.         LDA $6000,Y.       
  CLC.         ADC #1.         STA X1,X.
         INC RNDX.         INX.         
CPX TEMP1.         BNE PNUM.         JSR
 CHKIT  ;KLINGON ATTACK?.         LDA BT
T.         BEQ PNU0.         LDA NOK1.  
       CMP #3.         BNE PNUU.        
 LDA #2.         STA BTT.PNUU     LDA #<
LN9.         STA 174.         LDA #>LN9.
         STA 175.         JSR ALERT.    
     JMP RDAL.PNU0     LDX TEMP2.       
  LDA GALTAB,X.         AND #8.         
BEQ PNU1.         LDA SX.         CMP RX
.         BNE PNU1.         JMP RIFT    
 ;TEMPORAL RIFT.PNU1     LDA TEMP2.     
    LDA GALTAB,X.         AND #16.      
   BEQ PNU2.         LDA SX.         CMP
 IX.         BNE PNU2.         JMP STORM
    ;ION STORM.PNU2     LDA SX.         
CMP #4.         BNE PNU3.         LDA SY
.         CMP #4.PNU3     BNE CSB7.     
    LDA GX.         CMP #1.         BNE 
CSB4.         LDA GY.         CMP #1.   
      BNE CSB4.         BEQ CSB6.CSB4   
  LDA GX.         CMP #4.         BNE CS
B5.         LDA GY.         CMP SB2Y.   
      BNE CSB5.         BEQ CSB6.CSB5   
  LDA GX     ;DOCKED @ STARBASE?.       
  CMP #7.         BNE CSB7.         LDA 
GY.         CMP SB3Y.         BNE CSB7.C
SB6     LDA #201.         STA $07FD.    
     LDA #160.         STA $D00A.       
  LDA #118.         STA $D00B.         L
DA #32.         STA $D017.         STA $
D01D.         LDA $D015.         ORA #32
.         STA $D015.         JSR METER. 
        LDA #24.         STA TIM3.LVL   
   JSR TIMER.         LDA PLEV.         
CMP #23.         BEQ LVL0.         INC P
LEV.         JSR LEVP.         JMP LVL.L
VL0     JSR TIMER.         LDA SLEV.    
     CMP #23.         BEQ CSB7.         
INC SLEV.         JSR LEVS.         JMP 
LVL0.CSB7     LDA #160.         STA TIM3
.         JSR TIMER.         LDA #40.   
      STA TIM3.         LDA #14.        
 STA JOY2.         LDY #0.         LDA #
$49.         STA 20.         LDA #$07.  
       STA 21.         JSR TG1.QUE2     
LDA $DC00  ;WHADYA WANNA DO?.         AN
D #16.         BNE QT0.         JSR BBEE
P.         JMP TASK1.QT0      JSR TIMER.
         LDA $DC00.         AND #15.    
     CMP #15.         BEQ QUE2.         
CMP #13.         BNE QT00.         CMP J
OY2.         BEQ QUE2.         STA JOY2.
         JSR TG1.         CLC.         L
DA 20.         ADC #40.         STA 20. 
        JSR TG1.         JMP QUE2.QT00  
   CMP #14.         BNE QT1.         CMP
 JOY2.         BEQ QUE2.         STA JOY
2.         JSR TG1.         SEC.        
 LDA 20.         SBC #40.         STA 20
.         JSR TG1.         JMP QUE2.QT1 
     CMP #7.         BNE QT2.         CP
Y #27.         BEQ QT0.         CPY #14.
         BNE QT11.         JSR TG1.     
    LDY #27.         JSR TG1.         JM
P QUE2.QT11     JSR TG1.         LDY #14
.         JSR TG1.         JMP QUE2.QT2 
     CMP #11.         BNE QT0.         C
PY #0.         BEQ QT0.         CPY #14.
         BNE QT22.         JSR TG1.     
    LDY #0.         JSR TG1.         JMP
 QUE2.QT22     JSR TG1.         LDY #14.
         JSR TG1.         JMP QUE2.TG1  
    STY STRY.         LDX #12.TG2      L
DA (20),Y.         CLC.         ADC #128
.         STA (20),Y.         INY.      
   DEX.         BNE TG2.         LDY STR
Y.         RTS.TASK1    LDA #0      ;TAS
K1=PAUSE.         STA $D015.         STA
 $D017.         STA $D01D.         CPY #
14.         BNE TK1.         INC STOP.  
       JSR ERASE.         LDA #<LN21.   
      STA 174.         LDA #>LN21.      
   STA 175.         JSR PUTLN.         J
SR LWAIT.MOR      LDA $DC00.         AND
 #16.         BNE MOR.         LDA #0.  
       STA STOP.         JMP GSTART..TK1
      LDA JOY2.         CMP #14.        
 BNE TK4.         CPY #27.         BNE T
K2.         JMP SHORT  ;TASK2=SHORT SCAN
.TK2      JMP NAV    ;TASK5=NAVIGATION.T
K4      CPY #27.         BNE STAT.      
   JMP LONG   ;TASK3=LONG SCAN.STAT     
JSR METER  ;TASK4=STATUS.         JSR LW
AIT.         LDA #0.         STA $D015. 
        JMP GSTART..NAV      LDA #$48  ;
LETS GET OUTTA HERE.         STA 252.   
      LDA #$4C.         STA 175.        
 JSR PIC.         LDA #35.         STA R
CNT.         JSR STARS.         LDX SX. 
        LDA SENTX,X.         STA $D001. 
        LDX SY.         LDA SENTY,X.    
     STA $D000.         JSR MSBOFF.     
    LDA SMSB,X.         BEQ NAV0.       
  LDA $D010.         ORA #1.         STA
 $D010.NAV0     LDA $D015.         ORA #
1.         STA $D015.         LDA NOK1  
  ;ANY KLINGONS?.         BNE KTST.     
    JMP NOKL.KTST     CMP #1.         BE
Q KONE.         CMP #2.         BEQ KTWO
.         LDA #203    ;YEAH, 3 OF EM!.  
       STA $07FB.         LDX X3.       
  LDA SENTX,X.         STA $D007.       
  LDX Y3.         LDA SENTY,X.         S
TA $D006.         LDA SMSB,X.         BE
Q JST1.         LDA $D010.         ORA #
8.         STA $D010.JST1     LDA $D015.
         ORA #8.         STA $D015.KTWO 
    LDA #213    ;ONLY TWO....         ST
A $07FA.         LDX X2.         LDA SEN
TX,X.         STA $D005.         LDX Y2.
         LDA SENTY,X.         STA $D004.
         LDA SMSB,X.         BEQ JST2.  
       LDA $D010.         ORA #4.       
  STA $D010.JST2     LDA $D015.         
ORA #4.         STA $D015.KONE     LDA #
203.         STA $07F9   ;JUST ONE..    
     LDX X1.         LDA SENTX,X.       
  STA $D003.         LDX Y1.         LDA
 SENTY,X.         STA $D002.         LDA
 SMSB,X.         BEQ JST3.         LDA $
D010.         ORA #2.         STA $D010.
JST3     LDA $D015.         ORA #2.     
    STA $D015.NOKL     LDA GX      ;STAR
BASE?.         CMP #1.         BNE CSB0.
         LDA GY.         CMP #1.        
 BNE CSB0.         JMP CSB2.CSB0     LDA
 GX.         CMP #4.         BNE CSB1.  
       LDA GY.         CMP SB2Y.        
 BNE CSB1.         JMP CSB2.CSB1     LDA
 GX.         CMP #7.         BNE CSB3.  
       LDA GY.         CMP SB3Y.        
 BNE CSB3.CSB2     LDA #154.         STA
 $D00A.         LDA #116.         STA $D
00B.         LDA #201.         STA $07FD
.         LDA $D015.         ORA #32.   
      STA $D015.CSB3     JSR LINE5.     
    LDA #40.         STA TIM3.ROT      J
SR TIMER     ;GET DIR/SPEED.         LDA
 $DC00.         AND #15.         CMP #11
.         BNE RQ0.         INC $0755.   
      LDA $0755.         CMP #85.       
  BCC RQ0.         LDA #77.         STA 
$0755.         LDA $DC00.RQ0      CMP #7
.         BNE RQ1.         DEC $0755.   
      LDA $0755.         CMP #76.       
  BNE RQ1.         LDA #84.         STA 
$0755.         LDA $DC00.RQ1      CMP #1
4.         BNE RQ2.         INC $076F.  
       LDA $076F.         CMP #57.      
   BNE RQ2.         LDA #48.         STA
 $076F.         LDA $076E.         CMP #
46.         BNE RQ1A.         LDA #32.  
       STA $076E.         JMP RQ3.RQ1A  
   LDA #46.         STA $076E.         L
DA $DC00.RQ2      CMP #13.         BNE R
Q3.         DEC $076F.         LDA $076F
.         CMP #47.         BNE RQ3.     
    LDA #56.         STA $076F.         
LDA $076E.         CMP #46.         BNE 
RQ2A.         LDA #32.         STA $076E
.         JMP RQ3.RQ2A     LDA #46.     
    STA $076E.RQ3      LDA $DC00.       
  AND #16.         BEQ NROUT.         JM
P ROT.NROUT    JSR BBEEP.         LDA $0
76F.         CMP #48.         BNE MOVIT.
         JMP TEXIT.MOVIT    LDA #10     
  ;WARP OUT....         STA TIM3.       
  LDA $076F.         SEC.         SBC #4
8.         STA TEMP1.         LDA $076E.
         CMP #46.         BNE AC00.     
    JMP MOV2.AC00     LDA PLEV.         
CMP #1.         BCS AC00A.         JSR E
RASE.         LDA #<LN16.         STA 17
4.         LDA #>LN16.         STA 175. 
        JSR PUTLN.         JSR LWAIT.   
      JSR ERASE.         LDA #<LN17.    
     STA 174.         LDA #>LN17.       
  STA 175.         JSR PUTLN.         JS
R LWAIT.         JMP NAV.AC00A    LDA PL
EV.         SEC.         SBC TEMP1.     
    BCS AC00B.         LDA #0.AC00B    S
TA PLEV.         DEC TEMP1.         JSR 
LEVP.         LDA $0755.         CMP #77
.         BNE AC0.         JSR ADGY.    
     JMP MOV1.AC0      CMP #78.         
BNE AC1.         JSR ADGY.         JSR S
BGX.         JMP MOV1.AC1      CMP #79. 
        BNE AC2.         JSR SBGX.      
   JMP MOV1.AC2      CMP #80.         BN
E AC3.         JSR SBGY.         JSR SBG
X.         JMP MOV1.AC3      CMP #81.   
      BNE AC4.         JSR SBGY.        
 JMP MOV1.AC4      CMP #82.         BNE 
AC5.         JSR SBGY.         JSR ADGX.
         JMP MOV1.AC5      CMP #83.     
    BNE AC6.         JSR ADGX.         J
MP MOV1.AC6      JSR ADGY.         JSR A
DGX.MOV1     LDA #8.         STA TEMP1.M
OV2     LDA TEMP1.         TAX.         
LDA DISTAB,X.         TAX.         LDA $
0755.         CMP #77.         BNE DC0. 
        JMP RT.DC0      CMP #78.        
 BNE DC1.         JMP UR.DC1      CMP #7
9.         BNE DC2.         JMP UP.DC2  
    CMP #80.         BNE DC3.         JM
P UL.DC3      CMP #81.         BNE DC4. 
        JMP LT.DC4      CMP #82.        
 BNE DC5.         JMP DL.DC5      CMP #8
3.         BNE DC6.         JMP DWN.DC6 
     JMP DR..RT       JSR TIMER.        
 JSR RGT.         DEX.         BNE RT.  
       LDX TEMP1.RXT      JSR ICSY.     
    DEX.         BNE RXT.         JMP TE
XIT.UR       JSR TIMER.         JSR UPP.
         JSR RGT.         DEX.         B
NE UR.         LDX TEMP1.UXT      JSR IC
SY.         JSR DCSX.         DEX.      
   BNE UXT.         JMP TEXIT.UP       J
SR TIMER.         JSR UPP.         DEX. 
        BNE UP.         LDX TEMP1.UXP   
   JSR DCSX.         DEX.         BNE UX
P.         JMP TEXIT.UL       JSR TIMER.
         JSR UPP.         JSR LFT.      
   DEX.         BNE UL.         LDX TEMP
1.UXL      JSR DCSY.         JSR DCSX.  
       DEX.         BNE UXL.         JMP
 TEXIT.LT       JSR TIMER.         JSR L
FT.         DEX.         BNE LT.        
 LDX TEMP1.LXT      JSR DCSY.         DE
X.         BNE LXT.         JMP TEXIT.DL
       JSR TIMER.         JSR DWNN.     
    JSR LFT.         DEX.         BNE DL
.         LDX TEMP1.DXT      JSR DCSY.  
       JSR ICSX.         DEX.         BN
E DXT.         JMP TEXIT.DWN      JSR TI
MER.         JSR DWNN.         DEX.     
    BNE DWN.         LDX TEMP1.DXW      
JSR ICSX.         DEX.         BNE DXW. 
        JMP TEXIT.DR       JSR TIMER.   
      JSR DWNN.         JSR RGT.        
 DEX.         BNE DR.         LDX TEMP1.
DXR      JSR ICSY.         JSR ICSX.    
     DEX.         BNE DXR..TEXIT    LDA 
#255.         STA TIM3.         JSR ERAS
E.         JSR CHKIT  ;ENTERPRISE ATTACK
?.         LDA BTT.         BEQ TEX1.   
      LDA #<LN10.         STA 174.      
   LDA #>LN10.         STA 175.         
JSR ALERT.         JMP RDAL.TEX1     LDA
 #<LN7  ;RECOVER..         STA 174.     
    LDA #>LN7.         STA 175.         
JSR PUTLN.         LDA GX.         CLC. 
        ADC #48.         STA $0762.     
    LDA #1.         STA $DB62.         L
DA GY.         CLC.         ADC #48.    
     STA $0764.         LDA #1.         
STA $DB64.         JSR TIMER.         JS
R TIMER.         LDA #0.         STA $D0
15.         STA $D010.         JMP GSTAR
T..DCSX     DEC SX      ;MOVE MATH..    
     BNE OUT.         LDA #8.         ST
A SX.         DEC GX.         RTS.ICSX  
   INC SX.         LDA SX.         CMP #
9.         BCC OUT.         LDA #1.     
    STA SX.         INC GX.         RTS.
DCSY     DEC SY.         LDA SY.        
 BNE OUT.         LDA #8.         STA SY
.         DEC GY.         RTS.ICSY     I
NC SY.         LDA SY.         CMP #9.  
       BNE OUT.         LDA #1.         
STA SY.         INC GY.OUT      RTS.ADGY
     LDA GY.         CLC.         ADC TE
MP1.         STA GY.         RTS.ADGX   
  LDA GX.         CLC.         ADC TEMP1
.         STA GX.         RTS.SBGY     L
DA GY.         SEC.         SBC TEMP1.  
       STA GY.         RTS.SBGX     LDA 
GX.         SEC.         SBC TEMP1.     
    STA GX.         RTS..RGT      INC $D
000.         JSR MSBON.         INC $D00
0.         JSR MSBON.         LDA $D010.
         AND #1.         BEQ NMS6.      
   LDA $D000.         CMP #36.         B
NE NMS6.         LDA $D015.         AND 
#254.         STA $D015.NMS6     LDA $07
F8.         CMP #200.         BEQ NOX.  
       INC $07F8.NOX      RTS.UPP      D
EC $D001.         LDA $D001.         CMP
 #67.         BNE UPE.         LDA $D015
.         AND #254.         STA $D015.UP
E      RTS.DWNN     INC $D001.         L
DA $D001.         CMP #192.         BNE 
DNE.         LDA $D015.         AND #254
.         STA $D015.DNE      RTS.LFT    
  LDA $D000.         BNE NMS3.         J
SR MSBOFF.NMS3     DEC $D000.         LD
A $D000.         BNE NMS4.         JSR M
SBOFF.NMS4     DEC $D000.         LDA $D
010.         AND #1.         BNE NMS5.  
       LDA $D000.         CMP #34.      
   BNE NMS5.         LDA $D015.         
AND #254.         STA $D015.NMS5     LDA
 $07F8.         CMP #192.         BEQ MO
X.         DEC $07F8.MOX      RTS.MSBON 
   LDA $D000.         CMP #255.         
BNE NOTM.         LDA $D010.         ORA
 #1.         STA $D010.NOTM     RTS.MSBO
FF   LDA $D010.         AND #254.       
  STA $D010.         RTS..PUTLN    LDY #
0       ;TEXT UTILS..PL0      LDA (174),
Y.         BEQ DONE.         STA $074A,Y
.         INY.         BNE PL0.DONE     
RTS.ERASE    LDX #0.         LDA #32.LI5
      STA $0749,X.         STA $0771,X. 
        INX.         CPX #39.         BN
E LI5.         RTS.LINE5    LDX #0.LI55 
    LDA LN5,X.         STA $0749,X.     
    LDA #14.         STA $DB49,X.       
  LDA LN6,X.         STA $0771,X.       
  LDA #11.         STA $DB71,X.         
INX.         CPX #39.         BNE LI55. 
        RTS..IRQ1     LDA STOP     ;1ST 
IRQ.         BEQ IRQ1A.         JMP IR19
     ;AUTO TIMER.IRQ1A    DEC CNT0     ;
SEQUENCER.         LDA CNT0.         BEQ
 IR10.         JMP IR19.IR10     LDA #7.
         STA CNT0.         LDA CNT1.    
     BNE IR11.         LDA #1.         S
TA $DB0B.         STA $DB0C.         INC
 CNT1.         JMP IR19.IR11     CMP #1.
         BNE IR12.         LDA #0.      
   STA $DB0B.         STA $DB0C.        
 LDA #1.         STA $DB0A.         STA 
$DB0D.         INC CNT1.         JMP IR1
9.IR12     CMP #2.         BNE IR13.    
     LDA #0.         STA $DB0A.         
STA $DB0D.         LDA #1.         STA $
DB09.         STA $DB0E.         INC CNT
1.         JMP IR19.IR13     CMP #3.    
     BNE IR14.         LDA #0.         S
TA $DB09.         STA $DB0E.         LDA
 #1.         STA $DB08.         STA $DB0
F.         INC CNT1.         JMP IR19.IR
14     CMP #4.         BNE IR15.        
 LDA #0.         STA $DB08.         STA 
$DB0F.         LDA #1.         STA $DB07
.         STA $DB10.         INC CNT1.  
       JMP IR19.IR15     CMP #5.        
 BNE IR16.         LDA #0.         STA $
DB07.         STA $DB10.         LDA #1.
         STA $DB06.         STA $DB11.  
       INC CNT1.         JMP IR19.IR16  
   LDA #0.         STA $DB06.         ST
A $DB11.         STA CNT1.         LDA #
60.         STA CNT0.         DEC CNT2. 
        LDA CNT2.         BNE IR19.     
    LDA #2.         STA CNT2.         JS
R TIMIT.IR19     LDA SD1.         STA $0
7E6.         LDA SD2.         STA $07E4.
         LDA SD3.         STA $07E3.    
     LDA SD4.         STA $07E2.        
 LDA SD5.         STA $07E1.         LDA
 #0.         STA $D020.         LDA #50.
         STA $D012.         INC $D019.  
       LDA #<IRQ2.         STA $0314.   
      LDA #>IRQ2.         STA $0315.    
     JMP $EA81.TIMIT    DEC SD1      ;DI
SPLAY TIME..         LDA SD1.         CM
P #47.         BNE IRT0.         LDA #57
.         STA SD1.         DEC SD2.     
    LDA SD2.         CMP #47.         BN
E IRT0.         LDA #57.         STA SD2
.         DEC SD3.         LDA SD3.     
    CMP #47.         BNE IRT0.         L
DA #57.         STA SD3.         DEC SD4
.         LDA SD4.         CMP #47.     
    BNE IRT0.         LDA #3   ;TIME.   
      STA COD.         JMP DEAD.IRT0    
 RTS..IRQ2     LDA ATT1    ;2ND IRQ.    
     BNE IQQ     ;KLINGON(S).         JM
P IR2A    ;AUTO ATTACK..IQQ      DEC TIM
4.         BEQ IQQ0.         JMP IR2A.IQ
Q0     LDA SPD1.         STA TIM4.      
   LDA TMP1.         BEQ IQQ1.         J
MP IR27.IQQ1     LDA X3.         BEQ IR2
0.         INC $D002.         LDA $D002.
         BNE IR21.         LDA $D010.   
      ORA #3.         STA $D010.IR21    
 LDA $D010.         AND #3.         BEQ 
IR22.         LDA $D002.         CMP #70
.         BNE IR22.         JSR SETK1.  
       JMP IR2A.IR22     LDA $07F9.     
    CMP #203.         BEQ IR23.         
DEC $07F9.IR23     DEC KNT1.         BNE
 IR23A.         JSR SETK1.         LDA $
D002.         STA $D000.         LDA #12
4.         STA $D001.         INC TMP1.I
R23A    JMP IR2A.IR20     DEC $D002.    
     LDA $D002.         CMP #255.       
  BNE IR25.         LDA $D010.         A
ND #3.         BNE IR24.         INC $D0
02.         JSR SETK1.         JMP IR2A.
IR24     LDA $D010.         AND #252.   
      STA $D010.IR25     LDA $07F9.     
    CMP #213.         BEQ IR26.         
INC $07F9.IR26     DEC KNT1.         BNE
 IR26A.         JSR SETK1.         LDA $
D002.         STA $D000.         LDA #12
4.         STA $D001.         INC TMP1.I
R26A    JMP IR2A.IR27     LDA $07F9.    
     CMP #208.         BEQ I27B.        
 BCC I27A.         DEC $07F9.         JM
P IR2A.I27A     INC $07F9.         JMP I
R2A.I27B     LDA $D015.         ORA #1. 
        STA $D015.         INC $D001.   
      LDA $D001.         CMP #190.      
   BNE IR2A.         DEC TMP1.         L
DA $D015.         AND #254.         STA 
$D015.         LDA #2.         STA $D020
.         LDA #8.         STA SID+19.   
      LDA #11.         STA SID+20.      
   LDA #16.         STA SID+14.         
LDA #2.         STA SID+15.         LDA 
#129.         STA SID+18.         DEC SI
D+18.         LDA SLEV.         BEQ IR2A
.         DEC SLEV.         JSR LEVS.IR2
A     LDA ATT2.         BNE I29.        
 JMP IR29.I29      DEC TIM5.         BEQ
 IIQ0.         JMP IR29.IIQ0     LDA SPD
2.         STA TIM5.         LDA TMP2.  
       BEQ I29A.         JMP IRA7.I29A  
   LDA Y3.         BEQ IRA0.         INC
 $D004.         LDA $D004.         BNE I
RA1.         LDA $D010.         ORA #12.
         STA $D010.IRA1     LDA $D010.  
       AND #12.         BEQ IRA2.       
  LDA $D004.         CMP #70.         BN
E IRA2.         JSR SETK2.         JMP I
R29.IRA2     LDA $07FA.         CMP #203
.         BEQ IRA3.         DEC $07FA.IR
A3     DEC KNT2.         BNE IRA3A.     
    JSR SETK2.         LDA $D004.       
  STA $D006.         LDA #124.         S
TA $D007.         INC TMP2.IRA3A    JMP 
IR29.IRA0     DEC $D004.         LDA $D0
04.         CMP #255.         BNE IRA5. 
        LDA $D010.         AND #12.     
    BNE IRA4.         INC $D004.        
 JSR SETK2.         JMP IR29.IRA4     LD
A $D010.         AND #243.         STA $
D010.IRA5     LDA $07FA.         CMP #21
3.         BEQ IRA6.         INC $07FA.I
RA6     DEC KNT2.         BNE IRA6A.    
     JSR SETK2.         LDA $D004.      
   STA $D006.         LDA #124.         
STA $D007.         INC TMP2.IRA6A    JMP
 IR29.IRA7     LDA $07FA.         CMP #2
08.         BEQ I2AB.         BCC I2AA. 
        DEC $07FA.         JMP IR29.I2AA
     INC $07FA.         JMP IR29.I2AB   
  LDA $D015.         ORA #8.         STA
 $D015.         INC $D007.         LDA $
D007.         CMP #190.         BNE IR29
.         DEC TMP2.         LDA $D015.  
       AND #247.         STA $D015.     
    LDA #2.         STA $D020.         L
DA #5.         STA SID+12.         LDA #
11.         STA SID+13.         LDA #16.
         STA SID+7.         LDA #2.     
    STA SID+8.         LDA #129.        
 STA SID+11.         DEC SID+11.        
 LDA SLEV.         BEQ IR29.         DEC
 SLEV.         JSR LEVS.IR29     LDA #0.
         STA $D012.         INC $D019.  
       LDA #<IRQ1.         STA $0314.   
      LDA #>IRQ1.         STA $0315.    
     JMP $EA81..CHKIT    LDA #0    ;WHOS
 ATTACKING WHO?.         STA BTT.       
  LDA NOK1.         BEQ GN2.         LDA
 SX.         CMP X1.         BNE GN0.   
      LDA SY.         CMP Y1.         BN
E GN0.         INC BTT.GN0      LDA SX. 
        CMP X2.         BNE GN1.        
 LDA SY.         CMP Y2.         BNE GN1
.         INC BTT.GN1      LDA SX.      
   CMP X3.         BNE GN2.         LDA 
SY.         CMP Y3.         INC BTT.GN2 
     RTS..ALERT    JSR ERASE  ;GO TO RED
 ALERT!.         LDX #0     ;THIS IS NOT
 A.         LDA #2     ;DRILL!!.ALR1    
 STA $DB49,X.         STA $DB71,X.      
   INX.         CPX #39.         BNE ALR
1.         JSR PUTLN.         JSR ALARM.
         JSR TIMER.         JSR ALARM.  
       JSR TIMER.         JSR ALARM.    
     JSR TIMER.         RTS..RDAL     LD
A #0.         STA $D015.         LDA #$4
0.         STA 252.         LDA #$44.   
      STA 175.         JSR PIC.         
LDX #0.ALR0     LDA ALTAB,X.         STA
 $07CE,X.         LDA #2.         STA $D
BCE,X.         INX.         CPX #5.     
    BNE ALR0.         JSR ERASE.        
 LDA #50.         STA RCNT.         JSR 
STARS.         JSR METER.         LDX #0
.         LDA #2.ALR2     STA $DB49,X.  
       STA $DB71,X.         INX.        
 CPX #39.         BNE ALR2.         LDA 
#<LN8.         STA 174.         LDA #>LN
8.         STA 175.         JSR PUTLN.BA
00     LDX #1       ;SET UP BATTLE..    
     LDA #32.BAT      STA $0568,X.      
   STA $0590,X.         INX.         CPX
 #38.         BNE BAT.         LDA #3.  
       STA SPD1.         STA SPD2.      
   INC RNDX.         LDX RNDX.         L
DA $2E00,X.         CMP #9.         BCC 
SSP0.         LDA #2.         STA SPD1.S
SP0     INC RNDX.         LDX RNDX.     
    LDA $2E00,X.         CMP #9.        
 BCC SSP1.         LDA #2.         STA S
PD2.SSP1     LDA #6.         STA $D01B. 
        LDA #208.         STA $07F9.    
     STA $07FA.         LDA #218.       
  STA $07F8.         STA $07FB.         
LDA #7.         STA $D027.         STA $
D02A.         LDA #9.         STA $D01C.
         LDA $D010.         AND #240.   
      STA $D010.         LDA #128.      
   STA $D003.         STA $D005.        
 LDA #192.         STA $D01D.         LD
A $D010.         AND #249.         STA $
D010.         LDA #0.         STA $D002.
         STA $D004.         LDA #194.   
      LDX BTT.         CPX #2.         B
CC BAT0.         INC RNDX.         LDX R
NDX.         LDA $2F00,X.         CLC.  
       ADC #170.         STA $D004.     
    JSR SETK2.         INC ATT2.        
 LDA #198.BAT0     STA $D015.         IN
C RNDX.         LDX RNDX.         LDA $2
F00,X.         CLC.         ADC #140.   
      STA $D002.         JSR SETK1.     
    INC ATT1.         LDA #226.         
STA $07FC.         LDA #214.         STA
 $07FD.         LDA #1.         STA $D02
B.         LDA #2.         STA $D02C.   
      LDA $D01C.         ORA #32.       
  STA $D01C.PHO      LDA #170     ;FIGHT
 OR DIE....         STA $D008.         L
DA $D010.         AND #207.         STA 
$D010.         LDA #124.         STA $D0
09.         LDA #192.         STA $D00B.
         LDA $D015.         AND #207.   
      ORA #16.         STA $D015.       
  LDA #7.         STA TIM3.FBT      JSR 
TIMER.         LDA SLEV.         BNE FBT
A.         JSR ALARM.         JSR LWAIT.
         JSR LWAIT.         LDA #2.     
    STA COD.         JMP DEAD.FBTA     L
DA $DC00   ;GONNA FIRE THE.         AND 
#16     ;WEAPONS OR NOT?.         BNE FB
T0.         JMP EFIRE.FBT0     LDA $DC00
.         AND #15.         CMP #7.      
   BNE FBT1.         INC $D008.         
LDA $D008.         BEQ FBT0A.         CM
P #70.         BNE FBT.         LDA $D01
0.         AND #16.         BNE FBT2.   
      JMP FBT.FBT0A    LDA $D010.       
  ORA #16.         STA $D010.         JM
P FBT.FBT1     CMP #11.         BNE FBT.
         DEC $D008.         LDA $D008.  
       CMP #255.         BNE FBT.       
  LDA $D010.         AND #16.         BE
Q FBT2.         LDA $D010.         AND #
207.         STA $D010.         JMP FBT.
FBT2     LDA #170.         STA $D008.   
      LDA $D010.         AND #207.      
   STA $D010.         BNE FBT.EFIRE    L
DA $D015    ;PHOTON TORPEDO.         AND
 #239     ;AWAY....         STA $D015.  
       LDA $D008.         STA $D00A.    
     LDA $D010.         AND #16.        
 BEQ EF0.         LDA $D010.         ORA
 #32.         STA $D010.EF0      LDA $D0
15.         ORA #32.         STA $D015.E
F1      JSR TIMER.         INC $07FD.   
      LDA $07FD.         CMP #225.      
   BNE EF1A.         LDA #214.         S
TA $07FD.EF1A     DEC $D00B.         LDA
 $D00B.         CMP $D009.         BNE E
F1.         LDX $D00A.         CPX $D002
.         BEQ HIT1.         DEX.        
 CPX $D002.         BEQ HIT1.         IN
X.         INX.         CPX $D002.      
   BEQ HIT1.         LDX $D00A.         
CPX $D004.         BEQ HITK2.         DE
X.         CPX $D004.         BEQ HITK2.
         INX.         INX.         CPX $
D004.         BEQ HITK2.         JMP PHO
.HIT1     JMP HITK1    ;GOT EM!.HITK2   
 LDA $D012.         BNE HITK2.         S
TA ATT2.         LDA $D01C.         ORA 
#4.         STA $D01C.         LDA #232.
         STA $07FA.         LDA $D015.  
       EOR #32.         STA $D015.      
   LDA #12.         STA SID+5.         L
DA #$FB.         STA SID+6.         LDA 
#$FF.         STA SID.         LDA #1.  
       STA SID+1.         LDA #129.     
    STA SID+4.         DEC SID+4.       
  LDA #1.         STA $D029.         LDA
 #10.         STA TIM3.         STA ECNT
.BLO2     JSR TIMER.         INC $07FA. 
        DEC ECNT.         BNE BLO2.     
    LDA $D015.         AND #211.        
 STA $D015.         DEC BTT.         LDX
 TEMP2.         DEC GALTAB,X.         LD
A #0.         STA $D004.         DEC KCN
T.         JMP DCH..HITK1    LDA $D012  
 ;GOT THIS ONE TOO..         BNE HITK1. 
        STA ATT1.         LDA $D01C.    
     ORA #2.         STA $D01C.         
LDA #232.         STA $07F9.         LDA
 $D015.         EOR #32.         STA $D0
15.         LDA #12.         STA SID+5. 
        LDA #$FB.         STA SID+6.    
     LDA #$FF.         STA SID.         
LDA #1.         STA SID+1.         LDA #
129.         STA SID+4.         DEC SID+
4.         LDA #1.         STA $D028.   
      LDA #10.         STA TIM3.        
 STA ECNT.BLO1     JSR TIMER.         IN
C $07F9.         DEC ECNT.         BNE B
LO1.         LDA $D015.         AND #252
.         STA $D015.         DEC BTT.   
      LDX TEMP2.         DEC GALTAB,X.  
       LDA #0.         STA $D002.       
  DEC KCNT.DCH      LDA BTT.         BEQ
 RCV.         JMP PHO..RCV      LDA #0  
    ;RECOVER..         STA X1.         S
TA X2.         STA X3.         STA $D015
.         LDA #255.         STA TIM3.   
      JSR TIMER.         LDA KCNT.      
   BEQ WIN.         JMP RSET.WIN      JM
P DEAD    ;GOT EM ALL!!.SETK1    LDA #0.
         STA TMP1    ;KLINGON SET UP..  
       INC RNDX.         LDX RNDX.      
   LDA $2F00,X.         CLC.         ADC
 #48.         STA KNT1.         LDA X3. 
        BEQ SK0.         LDA #0.        
 STA X3.         RTS.SK0      INC X3.   
      RTS.SETK2    LDA #0.         STA T
MP2.         INC RNDX.         LDX RNDX.
         LDA $2F00,X.         CLC.      
   ADC #48.         STA KNT2.         LD
A Y3.         BEQ SK1.         LDA #0.  
       STA Y3.         RTS.SK1      INC 
Y3.         RTS..METER    LDX #243    ;P
OWER/SHIELD.         STX $07FE   ;METERS
..         INX.         STX $07FF.      
   LDA #10.         STA $D02D.         S
TA $D02E.         LDA #224.         STA 
$D01D.         LDA #32.         STA $D00
C.         STA $D00E.         LDA #60.  
       STA $D00D.         STA $D00F.    
     LDA $D010.         ORA #128.       
  STA $D010.         LDA $D015.         
ORA #192.         STA $D015.         JSR
 LEVP.         JSR LEVS.         RTS..PI
C      LDX #0      ;SCREEN XFER.SMO1    
 LDA $07F8,X.         STA SPSTR,X.      
   INX.         CPX #8.         BNE SMO1
.         LDA #$04.         STA 254.    
     LDA #$D8.         STA 177.         
LDA #0.         STA 251.         STA 253
.         STA 174.         STA 176.     
    LDX #4.         LDY #0.PTPC1    LDA 
(251),Y.         STA (253),Y.         LD
A (174),Y.         STA (176),Y.         
INY.         BNE PTPC1.         INC 252.
         INC 254.         INC 175.      
   INC 177.         DEX.         BNE PTP
C1.SMO2     LDA SPSTR,X.         STA $07
F8,X.         INX.         CPX #8.      
   BNE SMO2.         RTS..STARS    LDA #
41     ;STAR UTILS..         STA 251.   
      LDA #4.         STA 252.         L
DX RNDX.         INC RNDX.         LDA $
2E00,X.         STA RCOL.         TAX.RA
D1     CLC.         LDA 251.         ADC
 #40.         STA 251.         BCC RDN1.
         INC 252.RDN1     DEX.         B
NE RAD1.         LDX RNDX.         LDA $
2F00,X.         TAY.         LDA (251),Y
.         CMP #32.         BNE NTHR.    
     LDA #76.         STA (251),Y.      
   CLC.         LDA 252.         ADC #21
2.         STA 252.         LDA RCOL.   
      AND #15.         STA (251),Y.NTHR 
    INC RNDX.         INC RNDX.         
DEC RCNT.         LDA RCNT.         BNE 
STARS.         RTS...RNDGEN   JSR CLRSID
  ;RANDOM GENERATOR.         LDA #$FF.  
       STA $D40F.         LDA #128.     
    STA $D412.         STA $D418.       
  LDX #0.RG0      LDA $D41B.         CMP
 #18.         BCS RG0.         STA $2E00
,X.RG1      LDA $D41B.         BEQ RG1. 
        CMP #38.         BCS RG1.       
  STA $2F00,X.RG2      LDA $D41B.       
  CMP #8.         BCS RG2.         STA $
6000,X.RG3      LDA $D41B.         CMP #
9.         BCS RG3.         STA $6100,X.
         DEX.         BNE RG0.CLRSID   L
DX #0       ;DUH....         TXA.SIDCLR 
  STA SID,X.         INX.         CPX #2
4.         BNE SIDCLR.         LDA #$0F.
         STA SID+24.         RTS..SETUP 
   LDX #0       ;CLEAR THE GALAXY..     
    TXA.STP0     STA GALTAB,X.         I
NX.         CPX #111.         BNE STP0. 
        JSR GETX.         LDA #4.       
  STA GALTAB+12   ;PUT IN SOME.         
STA GALTAB+45,X ;STAR BASES..         IN
X.         STX SB2Y.         JSR GETX.  
       LDA #4.         STA GALTAB+78,X. 
        INX.         STX SB3Y.         L
DY #14         ;AND A WHOLE.DOUM     JSR
 GETX        ;LOTTA KLINGONS.         LD
A GALTAB+12,X.         CMP #3.         B
CS DOUM.         INC GALTAB+12,X.D1     
  JSR GETX.         LDA GALTAB+23,X.    
     CMP #3.         BCS D1.         INC
 GALTAB+23,X.D2       JSR GETX.         
LDA GALTAB+34,X.         CMP #3.        
 BCS D2.         INC GALTAB+34,X.D3     
  JSR GETX.         LDA GALTAB+45,X.    
     CMP #3.         BCS D3.         INC
 GALTAB+45,X.D4       JSR GETX.         
LDA GALTAB+56,X.         CMP #3.        
 BCS D4.         INC GALTAB+56,X.D5     
  JSR GETX.         LDA GALTAB+67,X.    
     CMP #3.         BCS D5.         INC
 GALTAB+67,X.D6       JSR GETX.         
LDA GALTAB+78,X.         CMP #3.        
 BCS D6.         INC GALTAB+78,X.D7     
  JSR GETX.         LDA GALTAB+89,X.    
     CMP #3.         BCS D7.         INC
 GALTAB+89,X.         DEY.         BNE D
OUM..         JSR GETX.         LDA GALT
AB+56,X  ;PUT IN SOME.         ORA #8   
        ;TIME RIFTS..         STA GALTAB
+56,X.         JSR GETX.         LDA GAL
TAB+89,X.         ORA #8.         STA GA
LTAB+89,X.         JSR GETX.         LDA
 GALTAB+23,X  ;AND AN ION.         ORA #
16          ;STORM....         STA GALTA
B+23,X.         RTS.GETX     LDX RNDX.  
       LDA $6100,X.         TAX.        
 INC RNDX.         RTS..LEVP     LDA #0 
         ;ADJUST METER..         TAX.CLE
V     STA $3CC0,X.         INX.         
CPX #6.         BNE CLEV.         LDA PL
EV.         CMP #8.         BCS LEP0.   
      TAX.         LDA $3CC0.         OR
A DTAB,X.         STA $3CC0.         STA
 $3CC3.         RTS.LEP0     LDA #$FF.  
       STA $3CC0.         STA $3CC3.    
     LDA PLEV.         CMP #16.         
BCS LEP1.         AND #7.         TAX.  
       LDA $3CC1.         ORA DTAB,X.   
      STA $3CC1.         STA $3CC4.     
    RTS.LEP1     LDA #$FF.         STA $
3CC1.         STA $3CC4.         LDA PLE
V.         AND #7.         TAX.         
LDA $3CC2.         ORA DTAB,X.         S
TA $3CC2.         STA $3CC5.         RTS
..LEVS     LDA #0         ;ADJUST OTHER.
         TAX            ;METER..CLES    
 STA $3D00,X.         INX.         CPX #
6.         BNE CLES.         LDA SLEV.  
       CMP #8.         BCS LEP2.        
 TAX.         LDA $3D00.         ORA DTA
B,X.         STA $3D00.         STA $3D0
3.         LDA SLEV.         BEQ LEP4.  
       RTS.LEP4     LDY #0.PPL      LDA 
LN15,Y.         BEQ LOUT.         STA $0
772,Y.         INY.         BNE PPL.LOUT
     RTS.LEP2     LDA #$FF.         STA 
$3D00.         STA $3D03.         LDA SL
EV.         CMP #16.         BCS LEP3.  
       AND #7.         TAX.         LDA 
$3D01.         ORA DTAB,X.         STA $
3D01.         STA $3D04.         RTS.LEP
3     LDA #$FF.         STA $3D01.      
   STA $3D04.         LDA SLEV.         
AND #7.         TAX.         LDA $3D02. 
        ORA DTAB,X.         STA $3D02.  
       STA $3D05.         RTS...SHORT   
 LDA #$50     ;SHORT RANGE.         STA 
252      ;SENSOR SCAN..         LDA #$54
.         STA 175.         JSR PIC.     
    LDA GX.         CMP #1.         BNE 
SH00.         LDX #0.PVD1     LDA VLN,X.
         STA $04A5,X.         STA $04B2,
X.         STA $04BF,X.         LDA #11.
         STA $D8A5,X.         STA $D8B2,
X.         STA $D8BF,X.         INX.    
     CPX #4.         BCC PVD1.         J
MP SH0.SH00     LDA GX.         CMP #8. 
        BNE SH0.         LDX #0.PVD1A   
 LDA VLN,X.         STA $0685,X.        
 STA $0692,X.         STA $069F,X.      
   LDA #11.         STA $DA85,X.        
 STA $DA92,X.         STA $DA9F,X.      
   INX.         CPX #4.         BCC PVD1
A.SH0      LDA GY.         CMP #1.      
   BNE SH1.         LDX #0.PVD2     LDA 
VLN,X.         STA $04A5,X.         STA 
$0595,X.         STA $0685,X.         LD
A #11.         STA $D8A5,X.         STA 
$D995,X.         STA $DA85,X.         IN
X.         CPX #4.         BCC PVD2.    
     JMP CONT0.SH1      LDA GY.         
CMP #9.         BNE CONT0.         LDX #
0.PVD2A    LDA VLN,X.         STA $04BF,
X.         STA $05AF,X.         STA $069
F,X.         LDA #11.         STA $D8BF,
X.         STA $D9AF,X.         STA $DA9
F,X.         INX.         CPX #4.       
  BCC PVD2A.CONT0    JSR TIMER.         
LDA #<LN1.         STA 174.         LDA 
#>LN1.         STA 175.         JSR PUTL
N.         JSR BBOOP.         LDA GX.   
      CLC.         ADC #48.         STA 
$0768.         LDA GY.         CLC.     
    ADC #48.         STA $076A.         
JSR TIMER.         LDA #170.         STA
 $D000.         LDA #124.         STA $D
001.         LDA #1.         STA $D015. 
        JSR TIMER.         JSR ERASE.   
      JSR TIMER.         LDA #<LN2.     
    STA 174.         LDA #>LN2.         
STA 175.         JSR PUTLN.         JSR 
BBOOP.         LDX GX.         DEX.     
    LDA MTAB,X.         CLC.         ADC
 GY.         TAX.         DEX.         L
DA GALTAB,X.         STA SECT.         O
RA #128.         STA GALTAB,X.         L
DA GALTAB+1,X.         STA SECT+1.      
   ORA #128.         STA GALTAB+1,X.    
     LDA GALTAB+2,X.         STA SECT+2.
         ORA #128.         STA GALTAB+2,
X.         LDA GALTAB+11,X.         STA 
SECT+3.         ORA #128.         STA GA
LTAB+11,X.         LDA GALTAB+12,X.     
    STA SECT+4.         ORA #128.       
  STA GALTAB+12,X.         LDA GALTAB+13
,X.         STA SECT+5.         ORA #128
.         STA GALTAB+13,X.         LDA G
ALTAB+22,X.         STA SECT+6.         
ORA #128.         STA GALTAB+22,X.      
   LDA GALTAB+23,X.         STA SECT+7. 
        ORA #128.         STA GALTAB+23,
X.         LDA GALTAB+24,X.         STA 
SECT+8.         ORA #128.         STA GA
LTAB+24,X.         LDX #0.NOTT1    LDA S
ECT,X.         AND #4.         BNE FNDSB
.         INX.         CPX #9.         B
CC NOTT1.         JMP CONT1.FNDSB    LDA
 SPX,X.         STA $D00A.         LDA S
PY,X.         STA $D00B.         LDA #20
1.         STA $07FD.         LDA #33.  
       STA $D015.         JSR TIMER.CONT
1    JSR ERASE.         JSR TIMER.      
   LDA #<LN3.         STA 174.         L
DA #>LN3.         STA 175.         JSR P
UTLN.         JSR BBOOP.         JSR TIM
ER.         JSR ERASE.         LDA #<LN4
.         STA 174.         LDA #>LN4.   
      STA 175.         JSR PUTLN.       
  LDX #0.CKMR     LDA SECT,X.         AN
D #3.         BNE PACT.RTRN     INX.    
     CPX #9.         BCC CKMR.         J
MP WAIT00.PACT     LDA ALO,X.         ST
A 20.         LDA AHI,X.         STA 21.
         LDY #0.PK0      LDA ALN,Y.     
    STA (20),Y.         INY.         CPY
 #6.         BEQ RTRN.         BNE PK0.W
AIT00   LDA #100     ;FLASH.         STA
 TIM3.         LDX #0.         LDA #2.CO
LUM    STA $D8CC,X.         STA $D8D9,X.
         STA $D8E6,X.         STA $D9BC,
X.         STA $D9C9,X.         STA $D9D
6,X.         STA $DAAC,X.         STA $D
AB9,X.         STA $DAC6,X.         INX.
         CPX #6.         BCC COLUM.     
    JSR TIMER.         LDA $DC00.       
  AND #16.         BEQ SROUT.         LD
A #60.         STA TIM3.         LDX #0.
         TXA.UNDUM    STA $D8CC,X.      
   STA $D8D9,X.         STA $D8E6,X.    
     STA $D9BC,X.         STA $D9C9,X.  
       STA $D9D6,X.         STA $DAAC,X.
         STA $DAB9,X.         STA $DAC6,
X.         INX.         CPX #6.         
BCC UNDUM.         JSR TIMER.         LD
A $DC00.         AND #16.         BEQ SR
OUT.         JMP WAIT00.SROUT    JSR BBE
EP.         LDA #0.         STA $D015.  
       JMP GSTART..LONG     LDA #$58    
 ;LONG RANGE.         STA 252      ;SENS
OR SCAN..         LDA #$5C.         STA 
175.         JSR PIC.         LDA #255. 
        STA TIM3.         JSR TIMER.    
     LDA #<LN1.         STA 174.        
 LDA #>LN1.         STA 175.         JSR
 PUTLN.         JSR BBOOP.         LDA G
X.         CLC.         ADC #48.        
 STA $0768.         LDA GY.         CLC.
         ADC #48.         STA $076A.    
     JSR TIMER.         LDX GX.         
LDA SYTAB,X.         STA $D001.         
LDX GY.         LDA SXTAB,X.         STA
 $D000.         LDA SMSB,X.         STA 
$D010.         LDA #1.         STA $D015
.         JSR TIMER.         JSR ERASE. 
        LDA #<LN2.         STA 174.     
    LDA #>LN2.         STA 175.         
JSR PUTLN.         JSR BBOOP.         JS
R TIMER.         LDA #30.         STA TI
M3.         LDA #14.         STA COLI.  
       STA $D87B.         STA $D87C.    
     STA $D87D.         JSR TIMER.      
   LDX #4.         LDA GSHI,X.         S
TA 20.         LDA GSLO,X.         STA 2
1.         LDX SB2Y.         LDA YTAB,X.
         TAY.         JSR TRNIT.        
 LDX #7.         LDA GSHI,X.         STA
 20.         LDA GSLO,X.         STA 21.
         LDX SB3Y.         LDA YTAB,X.  
       TAY.         JSR TRNIT.         L
DA #255.         STA TIM3.         JSR E
RASE.         JSR TIMER.         LDA #<L
N3.         STA 174.         LDA #>LN3. 
        STA 175.         JSR PUTLN.     
    JSR BBOOP.         JSR TIMER.       
  LDA #2.         STA COLI.         LDA 
#10.         STA TIM3.         LDX #1.NE
XX     LDA #<GALTAB.         STA 174.   
      LDA #>GALTAB.         STA 175.    
     LDA MTAB,X.         CLC.         AD
C 174.         STA 174.         BCC NX0.
         INC 175.NX0      LDY #1.NEX1   
  LDA (174),Y.         CMP #128.        
 BCC NEX0.         AND #3.         BEQ N
EX0.         JSR BRNIT.NEX0     INY.    
     CPY #10.         BNE NEX1.         
INX.         CPX #9.         BNE NEXX.  
       JSR ERASE.         LDA #<LN4.    
     STA 174.         LDA #>LN4.        
 STA 175.         JSR PUTLN.         JSR
 BBOOP.WAIT01   LDA $DC00.         AND #
16.         BEQ LROUT.         JMP WAIT0
1.LROUT    JSR BBEEP.         LDA #0.   
      STA $D015.         JMP GSTART..BRN
IT    LDA GSHI,X.         STA 20.       
  LDA GSLO,X.         STA 21.         LD
A YTAB,Y.         STY STRY.         TAY.
TRNIT    LDA COLI.         STA (20),Y.  
       INY.         STA (20),Y.         
INY.         STA (20),Y.         LDY STR
Y.         JSR TIMER.         RTS..RIFT 
    LDA #202    ;DO THE TEMPORAL.       
  STA $07FD   ;RIFT THING..         LDA 
#160.         STA $D00A.         LDA #11
8.         STA $D00B.         LDA #32.  
       STA $D017.         STA $D01D.    
     LDA $D015.         ORA #32.        
 STA $D015.         LDA #<LN11.         
STA 174.         LDA #>LN11.         STA
 175.         JSR ALERT.         JSR LWA
IT.         JSR ERASE.         LDA #<LN1
2.         STA 174.         LDA #>LN12. 
        STA 175.         JSR PUTLN.     
    LDA #10.         STA CNT2.         L
DX RNDX.         LDA $2F00,X.         AS
L A.         CLC.         ADC #75.      
   TAY.         LDA #30.         STA TIM
3.LOSIT    JSR TIMER.         JSR TIMIT.
         DEY.         BNE LOSIT.        
 JSR LWAIT.         LDA #0.         STA 
$D015.         LDX TEMP2.         LDA GA
LTAB,X.         AND #247.         STA GA
LTAB,X.         JMP GSTART..STORM    LDA
 #<LN13   ;WHIP UP AN.         STA 174  
    ;ION STORM..         LDA #>LN13.    
     STA 175.         JSR ALERT.        
 JSR LWAIT.         JSR ERASE.         L
DA #<LN14.         STA 174.         LDA 
#>LN14.         STA 175.         JSR PUT
LN.         JSR METER.         LDA #70. 
        STA TIM3.LOSSH    JSR TIMER.    
     LDA SLEV.         CMP #2.         B
CC LOS1.         DEC SLEV.         JSR L
EVS.         BNE LOSSH.LOS1     JSR LWAI
T.         LDA #0.         STA $D015.   
      LDX TEMP2.         LDA GALTAB,X.  
       AND #239.         STA GALTAB,X.  
       JMP GSTART..DEAD     SEI         
 ;GAMES DONE....         LDA #$81.      
   STA $DC0D.         LDA #$1B.         
STA $D011.         LDA #$00.         STA
 $D01A.         LDA #$31.         STA $0
314.         LDA #$EA.         STA $0315
.         CLI.         LDA #0.         S
TA $D015.         LDA #11.         STA $
0286.         LDA #$93.         JSR $FFD
2.         LDA #$40.         STA 252.   
      LDA #$D8.         STA 175.        
 JSR PIC.         LDA COD      ;BUT WHY.
..?.         BNE COD1.         LDA #$40.
         STA 252.         LDA #$44.     
    STA 175.         JSR PIC.         LD
X #0.PD0      LDA LN22,X.         BEQ HE
RE.         STA $0542,X.         LDA #1.
         STA $D942,X.         INX.      
   JMP PD0.COD1     CMP #1.         BNE 
COD2.         LDX #0.PD1      LDA LN18,X
.         BEQ HERE.         STA $0542,X.
         INX.         JMP PD1.COD2     C
MP #2.         BNE COD3.         LDX #0.
PD2      LDA LN19,X.         BEQ HERE.  
       STA $0542,X.         INX.        
 JMP PD2.COD3     LDX #0.PD3      LDA LN
20,X.         BEQ HERE.         STA $054
2,X.         INX.         JMP PD3.HERE  
   LDX #0.PD4      LDA LN23,X.         B
EQ NEW.         STA $056B,X.         LDA
 #15.         STA $D96B,X.         INX. 
        JMP PD4.NEW      LDA $DC00    ;L
ETS START OVER..         AND #16.       
  BNE NEW.         JMP $9000.         LD
A #0.         STA $0286.         LDA #$9
3.         JSR $FFD2.         LDA #48.  
       STA SD1.         STA SD2.        
 STA SD3.         LDA #50.         STA S
D4.         LDA #112.         STA KCNT. 
        JMP ANEW..LWAIT    LDA #255.    
     STA TIM3.         JSR TIMER.       
  JSR TIMER.         JSR TIMER.         
RTS..BBOOP    LDA #0       ;SOUND EFX.  
       STA SID+12.         LDA #240.    
     STA SID+13.         LDA #250.      
   STA SID+7.         LDA #41.         S
TA SID+8.         LDA #17.         STA S
ID+11.         LDA #20.         STA TIM3
.         JSR TIMER.         LDA #16.   
      STA SID+11.         JSR TIMER.    
     LDA #17.         STA SID+11.       
  LDA #10.         STA TIM3.         JSR
 TIMER.         LDA #16.         STA SID
+11.         LDA #255.         STA TIM3.
         RTS.BBEEP    LDA #0.         ST
A SID+12.         LDA #112.         STA 
SID+13.         LDA #250.         STA SI
D+7.         LDA #75.         STA SID+8.
         LDA #33.         STA SID+11.   
      LDA #20.         STA TIM3.        
 JSR TIMER.         LDA #32.         STA
 SID+11.         JSR TIMER.         LDA 
#33.         STA SID+11.         LDA #10
.         STA TIM3.         JSR TIMER.  
       LDA #32.         STA SID+11.     
    LDA #255.         STA TIM3.         
RTS.ALARM    LDA #0.         STA SID+5. 
        LDA #240.         STA SID+6.    
     LDA #0.         STA SID.         LD
A #46.         STA SID+1.         LDA #1
40.         STA SID+2.         LDA #80. 
        STA SID+3.         LDA #65.     
    STA SID+4.         LDA #70.         
STA TIM3.         JSR TIMER.         LDA
 #64.         STA SID+4.         LDA #16
0.         STA TIM3.         RTS..TIMER 
   DEC TIM1.         LDA TIM1.         B
NE TIMER.         INC TIM2.         LDA 
TIM2.         CMP TIM3.         BNE TIME
R.         LDA #0.         STA TIM2.    
     RTS..TIM1     .BYTE 0.TIM2     .BYT
E 0.TIM3     .BYTE 0.GX       .BYTE 0.GY
       .BYTE 0.SX       .BYTE 0.SY      
 .BYTE 0.X1       .BYTE 0.Y1       .BYTE
 0.X2       .BYTE 0.Y2       .BYTE 0.X3 
      .BYTE 0.Y3       .BYTE 0.RX       
.BYTE 0.IX       .BYTE 0.STMP     .BYTE 
0.SCOL     .BYTE 0.STRX     .BYTE 0.STRY
     .BYTE 0.BTT      .BYTE 0.COD      .
BYTE 0.SD1      .BYTE 48.SD2      .BYTE 
48.SD3      .BYTE 48.SD4      .BYTE 50.S
D5      .BYTE 48.CNT0     .BYTE 50.CNT1 
    .BYTE 0.CNT2     .BYTE 6.SPD1     .B
YTE 3.SPD2     .BYTE 3.COLI     .BYTE 0.
RCOL     .BYTE 0.RCNT     .BYTE 0.SB2Y  
   .BYTE 0.SB3Y     .BYTE 0.JSTR     .BY
TE 0.PLEV     .BYTE 1.SLEV     .BYTE 1.K
CNT     .BYTE 112.STOP     .BYTE 0.TEMP1
    .BYTE 0.TEMP2    .BYTE 0.SPSTR    .B
YTE 0,0,0,0,0,0,0,0.VLN      .BYTE 22,15
,9,4.ALN      .BYTE 1,3,20,9,22,5.SPNO  
   .BYTE 200,201,243,244.         .BYTE 
200,201,226,214.ALTAB    .BYTE 32,18,5,4
,32.DTAB     .BYTE 128,192,224,240.     
    .BYTE 248,252,254,255.MTAB     .BYTE
 0,11,22,33,44,55,66,77,88.SPX      .BYT
E 46,140,244,46,140,244,46.         .BYT
E 140,244.SPY      .BYTE 78,78,78,124,12
4,124,168.         .BYTE 168,168.AHI    
  .BYTE $04,$04,$04,$05,$05,$05.        
 .BYTE $06,$06,$06.ALO      .BYTE $CC,$D
9,$E6,$BC,$C9,$D6.         .BYTE $AC,$B9
,$C6.DISTAB   .BYTE 0,16,32,48,64,80,96.
         .BYTE 112,128,144.SENTX    .BYT
E 0,76,92,108,124,140,156.         .BYTE
 172,188.SENTY    .BYTE 0,56,88,120,152,
184,216.         .BYTE 248,24.SMSB     .
BYTE 0,0,0,0,0,0,0,0,1,1.YTAB     .BYTE 
0,3,7,11,15,19,23,27,31.         .BYTE 3
5.SYTAB    .BYTE 0,74,90,106,122,138,154
.         .BYTE 170,186.SXTAB    .BYTE 0
,48,80,112,144,176,208.         .BYTE 24
0,16,48.GSHI     .BYTE $00,$78,$C8,$18,$
68,$B8.         .BYTE $08,$58,$A8.GSLO  
   .BYTE $00,$D8,$D8,$D9,$D9,$D9.       
  .BYTE $DA,$DA,$DA.LN1      .BYTE 12,15
,3,1,20,9,14,7,32.         .BYTE 5,14,20
,5,18,16,18,9.         .BYTE 19,5,32,9,1
4,32,19,5,3.         .BYTE 20,15,18,32,3
2,44,0.LN2      .BYTE 12,15,3,1,20,9,14,
7,32.         .BYTE 19,20,1,18,2,1,19,5,
40.         .BYTE 19,41,0.LN3      .BYTE
 12,15,3,1,20,9,14,7,32.         .BYTE 1
1,12,9,14,7,15,14,32.         .BYTE 1,3,
20,9,22,9,20,25,0.LN4      .BYTE 19,5,14
,19,15,18,19,32.         .BYTE 15,14,32,
19,20,1,14,4.         .BYTE 45,2,25,32,3
2,32,32,32.         .BYTE 40,6,2,45,5,24
,9,20,41,0.LN5      .BYTE 32,4,9,18,5,3,
20,9,15,14.         .BYTE 32,128,77,128,
32,32,32.         .BYTE 32,32,32,32,32,3
2,32,32.         .BYTE 23,1,18,16,32,6,1
,3,20.         .BYTE 15,18,32,46,48,0.LN
6      .BYTE 40,10,15,25,19,20,9,3.     
    .BYTE 11,32,12,5,6,20,47,18.        
 .BYTE 9,7,8,20,32,21,16,47,4.         .
BYTE 15,23,14,32,6,2,45,5,14.         .B
YTE 7,1,7,5,41,0.LN7      .BYTE 5,14,20,
5,18,16,18,9,19.         .BYTE 5,32,9,19
,32,9,14,32,19.         .BYTE 5,3,20,15,
18,32,32,44,0.LN8      .BYTE 20,15,18,16
,5,4,15,19,32.         .BYTE 15,14,32,12
,9,14,5,32,32.         .BYTE 32,40,12,5,
6,20,47,18,9.         .BYTE 7,8,20,47,6,
9,18,5,41,0.LN9      .BYTE 23,5,32,1,18,
5,32,21,14.         .BYTE 4,5,18,32,1,20
,20,1,3.         .BYTE 11,33,0.LN10     
.BYTE 18,5,4,32,1,12,5,18,20.         .B
YTE 33,32,2,1,20,20,12,5,19.         .BY
TE 20,1,20,9,15,14,19,0.LN11     .BYTE 2
3,5,32,1,18,5,32,9,14.         .BYTE 32,
1,32,20,5,13,16,15,18.         .BYTE 1,1
2,32,18,9,6,20,32,3,1.         .BYTE 16,
20,1,9,14,33,0.LN12     .BYTE 23,5,32,1,
18,5,32,12,15.         .BYTE 19,9,14,7,3
2,20,9,13,5,32.         .BYTE 9,14,32,1,
32,3,1,21,19,1.         .BYTE 12,9,20,25
,32,12,15,15.         .BYTE 16,0.LN13   
  .BYTE 23,5,32,1,18,5,32,3,1,21.       
  .BYTE 7,8,20,32,9,14,32,1,14,32.      
   .BYTE 9,15,14,32,19,20,15,18,13.     
    .BYTE 32,3,1,16,20,1,9,14,33,0.LN14 
    .BYTE 15,21,18,32,19,8,9,5,12.      
   .BYTE 4,19,32,1,18,5,32,20,1,11.     
    .BYTE 9,14,7,32,1,32,2,5,1,20.      
   .BYTE 9,14,7,32,19,9,18,33,0.LN15    
 .BYTE 19,8,9,5,12,4,19,32,1,18.        
 .BYTE 5,32,4,15,23,14,32,3,1,16.       
  .BYTE 20,1,9,14,33,0.LN16     .BYTE 14
,15,20,32,5,14,15,21,7.         .BYTE 8,
32,16,15,23,5,18,32,6.         .BYTE 15,
18,32,23,1,18,16,32,4.         .BYTE 18,
9,22,5,32,19,9,18,33,0.LN17     .BYTE 23
,5,32,13,21,19,20,32,20.         .BYTE 1
8,1,22,5,12,32,1,20,32.         .BYTE 19
,21,2,45,12,9,7,8,20,32.         .BYTE 1
9,16,5,5,4,0.LN18     .BYTE 25,15,21,32,
8,1,22,5,32.         .BYTE 5,14,20,5,18,
5,4,32,20,8.         .BYTE 5,32,7,1,12,1
,3,20,9,3,32.         .BYTE 22,15,9,4,33
,0.LN19     .BYTE 32,32,25,15,21,32,23,5
.         .BYTE 18,5,32,4,5,19,20,18,15.
         .BYTE 25,5,4,32,2,25,32,5,14,5.
         .BYTE 13,25,32,6,9,18,5,33,0.LN
20     .BYTE 32,32,32,32,32.         .BY
TE 25,15,21,32,8,1,22,5,32.         .BYT
E 18,21,14,32,15,21,20,32.         .BYTE
 15,6,32,20,9,13,5,33,0.LN21     .BYTE 4
2,42,42,32,19,9,13,21.         .BYTE 12,
1,20,9,15,14,32,16,1.         .BYTE 21,1
9,5,4,32,42,42,42,0.LN22     .BYTE 32,3,
15,14,7,18,1,20,21.         .BYTE 12,1,2
0,9,15,14,19,32,3.         .BYTE 1,16,20
,1,9,14,33,32,7,15.         .BYTE 15,4,3
2,23,15,18,11,33,0.LN23     .BYTE 16,18,
5,19,19,32,6,9,18.         .BYTE 5,32,6,
15,18,32,1,32,14.         .BYTE 5,23,32,
19,9,13,21,12,1.         .BYTE 20,9,15,1
4,46,46,46,0.HITAB    .BYTE $29,$51,$79,
$A1,$C9,$F1.         .BYTE $19,$41,$69,$
91,$B9,$E1.         .BYTE $09,$31,$59,$8
1,$A9,$D1.LOTAB    .BYTE $04,$04,$04,$04
,$04,$04.         .BYTE $05,$05,$05,$05,
$05,$05.         .BYTE $06,$06,$06,$06,$
06,$06.GALTAB   .BYTE 0,0,0,0,0,0,0,0,0,
0,0.         .BYTE 0,0,0,0,0,0,0,0,0,0,0
.         .BYTE 0,0,0,0,0,0,0,0,0,0,0.  
       .BYTE 0,0,0,0,0,0,0,0,0,0,0.     
    .BYTE 0,0,0,0,0,0,0,0,0,0,0.        
 .BYTE 0,0,0,0,0,0,0,0,0,0,0.         .B
YTE 0,0,0,0,0,0,0,0,0,0,0.         .BYTE
 0,0,0,0,0,0,0,0,0,0,0.         .BYTE 0,
0,0,0,0,0,0,0,0,0,0.         .BYTE 0,0,0
,0,0,0,0,0,0,0,0.SECT     .BYTE 0,0,0,0,
0,0..
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL