1
FILE INFORMATION
FILENAME(S): 1
FILE TYPE(S): SEQ
FILE SIZE: 9.7K
FIRST SEEN: 2025-11-30 20:31:12
APPEARS ON: 1 disk(s)
FILE HASH
f1fe57998bd0e4a0912b6d73a6ca37368a41deb98a3a4aace8ab9cb5d0fc2394
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ACROSS | 1 | SEQ | Curtcool, Nigel | 19 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 0D 0D 0D 0D 49 4E 49 54 45 20 20 20 20 3D 20 24 |....INITE = $| 00000010: 30 41 30 30 20 20 3B 53 54 4F 52 45 20 49 4E 49 |0A00 ;STORE INI| 00000020: 54 2D 4C 44 41 2B 4A 53 52 0D 0D 50 4C 41 59 41 |T-LDA+JSR..PLAYA| 00000030: 20 20 20 20 3D 20 24 30 42 30 30 20 20 3B 53 54 | = $0B00 ;ST| 00000040: 4F 52 45 20 50 4C 41 59 2D 4A 53 52 0D 0D 0D 20 |ORE PLAY-JSR... | 00000050: 20 20 20 20 20 20 20 20 2A 3D 20 24 35 30 30 30 | *= $5000| 00000060: 0D 0D 0D 20 20 20 20 20 20 20 20 20 3B 53 54 41 |... ;STA| 00000070: 52 54 20 57 49 54 48 20 3A 20 4A 53 52 20 4D 55 |RT WITH : JSR MU| 00000080: 53 49 43 0D 0D 4D 55 53 49 43 20 20 20 20 3D 20 |SIC..MUSIC = | 00000090: 2A 0D 0D 0D 0D 4C 4F 44 33 20 20 20 20 20 3D 20 |*....LOD3 = | 000000A0: 2A 0D 20 20 20 20 20 20 20 20 20 53 45 49 0D 20 |*. SEI. | 000000B0: 20 20 20 20 20 20 20 20 4C 44 41 20 23 24 33 37 | LDA #$37| 000000C0: 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 24 30 |. STA $0| 000000D0: 31 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 24 |1. JSR $| 000000E0: 46 46 38 31 0D 20 20 20 20 20 20 20 20 20 4A 53 |FF81. JS| 000000F0: 52 20 24 46 46 38 34 0D 20 20 20 20 20 20 20 20 |R $FF84. | 00000100: 20 4A 53 52 20 24 46 46 38 41 0D 20 20 20 20 20 | JSR $FF8A. | 00000110: 20 20 20 20 4C 44 41 20 23 31 0D 20 20 20 20 20 | LDA #1. | 00000120: 20 20 20 20 53 54 41 20 24 39 44 0D 0D 4C 4F 44 | STA $9D..LOD| 00000130: 32 0D 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 |2.. LDA | 00000140: 23 30 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 |#0. STA | 00000150: 24 44 30 32 30 0D 20 20 20 20 20 20 20 20 20 53 |$D020. S| 00000160: 54 41 20 24 44 30 32 31 0D 20 20 20 20 20 20 20 |TA $D021. | 00000170: 20 20 4C 44 41 20 23 3C 4D 55 54 45 54 0D 20 20 | LDA #<MUTET. | 00000180: 20 20 20 20 20 20 20 4C 44 59 20 23 3E 4D 55 54 | LDY #>MUT| 00000190: 45 54 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 |ET. JSR | 000001A0: 24 41 42 31 45 0D 20 20 20 20 20 20 20 20 20 4C |$AB1E. L| 000001B0: 44 41 20 23 3C 4D 55 52 45 32 0D 20 20 20 20 20 |DA #<MURE2. | 000001C0: 20 20 20 20 4C 44 59 20 23 3E 4D 55 52 45 32 0D | LDY #>MURE2.| 000001D0: 20 20 20 20 20 20 20 20 20 4A 53 52 20 24 41 42 | JSR $AB| 000001E0: 31 45 0D 4D 55 47 45 54 20 20 20 20 3D 20 2A 0D |1E.MUGET = *.| 000001F0: 20 20 20 20 20 20 20 20 20 4A 53 52 20 24 46 46 | JSR $FF| 00000200: 45 34 0D 20 20 20 20 20 20 20 20 20 43 4D 50 20 |E4. CMP | 00000210: 23 22 85 22 0D 20 20 20 20 20 20 20 20 20 42 45 |#".". BE| 00000220: 51 20 4C 4F 44 0D 20 20 20 20 20 20 20 20 20 43 |Q LOD. C| 00000230: 4D 50 20 23 22 86 22 0D 20 20 20 20 20 20 20 20 |MP #".". | 00000240: 20 42 45 51 20 4C 44 41 59 58 0D 20 20 20 20 20 | BEQ LDAYX. | 00000250: 20 20 20 20 43 4D 50 20 23 22 87 22 0D 20 20 20 | CMP #".". | 00000260: 20 20 20 20 20 20 42 45 51 20 4D 55 54 45 53 54 | BEQ MUTEST| 00000270: 0D 20 20 20 20 20 20 20 20 20 43 4D 50 20 23 22 |. CMP #"| 00000280: 88 22 0D 20 20 20 20 20 20 20 20 20 42 45 51 20 |.". BEQ | 00000290: 5A 45 52 4F 46 31 0D 20 20 20 20 20 20 20 20 20 |ZEROF1. | 000002A0: 43 4D 50 20 23 22 8C 22 0D 20 20 20 20 20 20 20 |CMP #".". | 000002B0: 20 20 42 45 51 20 43 4F 4E 54 49 0D 20 20 20 20 | BEQ CONTI. | 000002C0: 20 20 20 20 20 4A 4D 50 20 4D 55 47 45 54 0D 4D | JMP MUGET.M| 000002D0: 55 54 45 53 54 20 20 20 4A 4D 50 20 54 45 53 54 |UTEST JMP TEST| 000002E0: 49 0D 4C 44 41 59 58 20 20 20 20 4A 4D 50 20 4E |I.LDAYX JMP N| 000002F0: 55 4D 52 45 53 54 0D 0D 43 4F 4E 54 49 20 20 20 |UMREST..CONTI | 00000300: 20 3D 20 2A 0D 20 20 20 20 20 20 20 20 20 52 54 | = *. RT| 00000310: 53 0D 0D 0D 5A 45 52 4F 46 31 20 20 20 3D 20 2A |S...ZEROF1 = *| 00000320: 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 5A 45 |. JSR ZE| 00000330: 52 4F 46 32 0D 20 20 20 20 20 20 20 20 20 4A 4D |ROF2. JM| 00000340: 50 20 4C 4F 44 32 0D 0D 0D 0D 5A 45 52 4F 46 32 |P LOD2....ZEROF2| 00000350: 20 20 20 3D 20 2A 0D 20 20 20 20 20 20 20 20 20 | = *. | 00000360: 4C 44 58 20 23 30 0D 4F 50 31 0D 20 20 20 20 20 |LDX #0.OP1. | 00000370: 20 20 20 20 4C 44 41 20 23 30 0D 20 20 20 20 20 | LDA #0. | 00000380: 20 20 20 20 53 54 41 20 24 31 30 30 30 2C 58 0D | STA $1000,X.| 00000390: 20 20 20 20 20 20 20 20 20 53 54 41 20 24 31 31 | STA $11| 000003A0: 30 30 2C 58 0D 20 20 20 20 20 20 20 20 20 53 54 |00,X. ST| 000003B0: 41 20 24 31 32 30 30 2C 58 0D 20 20 20 20 20 20 |A $1200,X. | 000003C0: 20 20 20 53 54 41 20 24 31 33 30 30 2C 58 0D 20 | STA $1300,X. | 000003D0: 20 20 20 20 20 20 20 20 53 54 41 20 24 31 34 30 | STA $140| 000003E0: 30 2C 58 0D 20 20 20 20 20 20 20 20 20 53 54 41 |0,X. STA| 000003F0: 20 24 31 35 30 30 2C 58 0D 20 20 20 20 20 20 20 | $1500,X. | 00000400: 20 20 53 54 41 20 24 31 36 30 30 2C 58 0D 20 20 | STA $1600,X. | 00000410: 20 20 20 20 20 20 20 53 54 41 20 24 31 37 30 30 | STA $1700| 00000420: 2C 58 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 |,X. STA | 00000430: 24 31 38 30 30 2C 58 0D 20 20 20 20 20 20 20 20 |$1800,X. | 00000440: 20 53 54 41 20 24 31 39 30 30 2C 58 0D 20 20 20 | STA $1900,X. | 00000450: 20 20 20 20 20 20 53 54 41 20 24 31 41 30 30 2C | STA $1A00,| 00000460: 58 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 24 |X. STA $| 00000470: 31 42 30 30 2C 58 0D 20 20 20 20 20 20 20 20 20 |1B00,X. | 00000480: 53 54 41 20 24 31 43 30 30 2C 58 0D 20 20 20 20 |STA $1C00,X. | 00000490: 20 20 20 20 20 53 54 41 20 24 31 44 30 30 2C 58 | STA $1D00,X| 000004A0: 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 24 31 |. STA $1| 000004B0: 45 30 30 2C 58 0D 20 20 20 20 20 20 20 20 20 53 |E00,X. S| 000004C0: 54 41 20 24 31 46 30 30 2C 58 0D 20 20 20 20 20 |TA $1F00,X. | 000004D0: 20 20 20 20 49 4E 43 20 24 44 30 32 30 0D 20 20 | INC $D020. | 000004E0: 20 20 20 20 20 20 20 49 4E 58 0D 20 20 20 20 20 | INX. | 000004F0: 20 20 20 20 42 4E 45 20 4F 50 31 0D 20 20 20 20 | BNE OP1. | 00000500: 20 20 20 20 20 52 54 53 0D 0D 0D 4C 4F 44 31 20 | RTS...LOD1 | 00000510: 20 20 20 20 3D 20 2A 0D 0D 20 20 20 20 20 20 20 | = *.. | 00000520: 20 20 4C 44 41 20 23 3C 4D 55 54 45 54 0D 20 20 | LDA #<MUTET. | 00000530: 20 20 20 20 20 20 20 4C 44 59 20 23 3E 4D 55 54 | LDY #>MUT| 00000540: 45 54 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 |ET. JSR | 00000550: 24 41 42 31 45 0D 20 20 20 20 20 20 20 20 20 4C |$AB1E. L| 00000560: 44 41 20 23 3C 4D 55 52 45 32 0D 20 20 20 20 20 |DA #<MURE2. | 00000570: 20 20 20 20 4C 44 59 20 23 3E 4D 55 52 45 32 0D | LDY #>MURE2.| 00000580: 20 20 20 20 20 20 20 20 20 4A 53 52 20 24 41 42 | JSR $AB| 00000590: 31 45 0D 4C 4F 44 20 20 20 20 20 20 3D 20 2A 0D |1E.LOD = *.| 000005A0: 20 20 20 20 20 20 20 20 20 4A 53 52 20 43 49 4E | JSR CIN| 000005B0: 50 55 54 0D 20 20 20 20 20 20 20 20 20 4C 44 41 |PUT. LDA| 000005C0: 20 43 41 4E 54 41 4C 0D 20 20 20 20 20 20 20 20 | CANTAL. | 000005D0: 20 53 54 41 20 4E 41 4D 45 31 0D 20 20 20 20 20 | STA NAME1. | 000005E0: 20 20 20 20 4C 44 58 20 23 30 0D 52 45 31 32 20 | LDX #0.RE12 | 000005F0: 20 20 20 20 4C 44 41 20 43 4E 41 4D 45 2C 58 0D | LDA CNAME,X.| 00000600: 20 20 20 20 20 20 20 20 20 53 54 41 20 4E 41 4D | STA NAM| 00000610: 45 2C 58 0D 20 20 20 20 20 20 20 20 20 49 4E 58 |E,X. INX| 00000620: 0D 20 20 20 20 20 20 20 20 20 43 50 58 20 23 31 |. CPX #1| 00000630: 36 0D 20 20 20 20 20 20 20 20 20 42 4E 45 20 52 |6. BNE R| 00000640: 45 31 32 0D 20 20 20 20 20 20 20 20 20 4C 44 41 |E12. LDA| 00000650: 20 43 4E 41 4D 45 0D 20 20 20 20 20 20 20 20 20 | CNAME. | 00000660: 43 4D 50 20 23 33 36 0D 20 20 20 20 20 20 20 20 |CMP #36. | 00000670: 20 42 45 51 20 4D 55 44 49 52 0D 20 20 20 20 20 | BEQ MUDIR. | 00000680: 20 20 20 20 4A 53 52 20 4C 4F 41 44 0D 20 20 20 | JSR LOAD. | 00000690: 20 20 20 20 20 20 4A 4D 50 20 4C 4F 44 32 0D 20 | JMP LOD2. | 000006A0: 20 20 20 20 20 20 20 20 52 54 53 0D 0D 4D 55 44 | RTS..MUD| 000006B0: 49 52 20 20 20 20 3D 20 2A 0D 20 20 20 20 20 20 |IR = *. | 000006C0: 20 20 20 4A 53 52 20 24 45 35 34 34 0D 20 20 20 | JSR $E544. | 000006D0: 20 20 20 20 20 20 4A 53 52 20 44 49 52 0D 20 20 | JSR DIR. | 000006E0: 20 20 20 20 20 20 20 4C 44 41 20 23 3C 53 50 41 | LDA #<SPA| 000006F0: 0D 20 20 20 20 20 20 20 20 20 4C 44 59 20 23 3E |. LDY #>| 00000700: 53 50 41 0D 20 20 20 20 20 20 20 20 20 4A 53 52 |SPA. JSR| 00000710: 20 24 41 42 31 45 0D 54 59 53 20 20 20 20 20 20 | $AB1E.TYS | 00000720: 4A 53 52 20 24 46 46 45 34 0D 20 20 20 20 20 20 |JSR $FFE4. | 00000730: 20 20 20 43 4D 50 20 23 24 32 30 0D 20 20 20 20 | CMP #$20. | 00000740: 20 20 20 20 20 42 4E 45 20 54 59 53 0D 0D 20 20 | BNE TYS.. | 00000750: 20 20 20 20 20 20 20 4A 53 52 20 24 45 35 34 34 | JSR $E544| 00000760: 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 24 |. LDA #$| 00000770: 32 30 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 |20. STA | 00000780: 43 4E 41 4D 45 0D 20 20 20 20 20 20 20 20 20 4A |CNAME. J| 00000790: 4D 50 20 4C 4F 44 31 0D 20 20 20 20 20 20 20 20 |MP LOD1. | 000007A0: 20 52 54 53 0D 0D 0D 43 49 4E 50 55 54 0D 20 20 | RTS...CINPUT. | 000007B0: 20 20 20 20 20 20 20 4C 44 41 20 23 30 0D 20 20 | LDA #0. | 000007C0: 20 20 20 20 20 20 20 53 54 41 20 43 41 4E 54 41 | STA CANTA| 000007D0: 4C 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 43 |L. JSR C| 000007E0: 38 0D 43 31 20 20 20 20 20 20 20 4A 53 52 20 24 |8.C1 JSR $| 000007F0: 46 46 45 34 0D 20 20 20 20 20 20 20 20 20 42 45 |FFE4. BE| 00000800: 51 20 43 31 0D 20 20 20 20 20 20 20 20 20 43 4D |Q C1. CM| 00000810: 50 20 23 22 14 22 0D 20 20 20 20 20 20 20 20 20 |P #".". | 00000820: 42 45 51 20 43 33 0D 20 20 20 20 20 20 20 20 20 |BEQ C3. | 00000830: 43 4D 50 20 23 24 30 44 0D 20 20 20 20 20 20 20 |CMP #$0D. | 00000840: 20 20 42 45 51 20 43 34 0D 20 20 20 20 20 20 20 | BEQ C4. | 00000850: 20 20 43 4D 50 20 23 22 20 22 0D 20 20 20 20 20 | CMP #" ". | 00000860: 20 20 20 20 42 43 53 20 43 32 0D 20 20 20 20 20 | BCS C2. | 00000870: 20 20 20 20 4A 4D 50 20 43 31 0D 43 32 20 20 20 | JMP C1.C2 | 00000880: 20 20 20 20 43 4D 50 20 23 22 5A 22 2B 31 0D 20 | CMP #"Z"+1. | 00000890: 20 20 20 20 20 20 20 20 42 43 53 20 43 31 0D 20 | BCS C1. | 000008A0: 20 20 20 20 20 20 20 20 4C 44 59 20 43 41 4E 54 | LDY CANT| 000008B0: 41 4C 0D 20 20 20 20 20 20 20 20 20 43 50 59 20 |AL. CPY | 000008C0: 23 31 36 0D 20 20 20 20 20 20 20 20 20 42 45 51 |#16. BEQ| 000008D0: 20 43 31 0D 20 20 20 20 20 20 20 20 20 50 48 41 | C1. PHA| 000008E0: 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 22 |. LDA #"| 000008F0: 14 22 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 |.". JSR | 00000900: 24 46 46 44 32 0D 20 20 20 20 20 20 20 20 20 50 |$FFD2. P| 00000910: 4C 41 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 |LA. JSR | 00000920: 24 46 46 44 32 0D 20 20 20 20 20 20 20 20 20 4C |$FFD2. L| 00000930: 44 59 20 43 41 4E 54 41 4C 0D 20 20 20 20 20 20 |DY CANTAL. | 00000940: 20 20 20 53 54 41 20 43 4E 41 4D 45 2C 59 0D 20 | STA CNAME,Y. | 00000950: 20 20 20 20 20 20 20 20 4A 53 52 20 43 38 0D 20 | JSR C8. | 00000960: 20 20 20 20 20 20 20 20 49 4E 43 20 43 41 4E 54 | INC CANT| 00000970: 41 4C 0D 20 20 20 20 20 20 20 20 20 4A 4D 50 20 |AL. JMP | 00000980: 43 31 0D 0D 43 33 20 20 20 20 20 20 20 4C 44 59 |C1..C3 LDY| 00000990: 20 43 41 4E 54 41 4C 0D 20 20 20 20 20 20 20 20 | CANTAL. | 000009A0: 20 43 50 59 20 23 30 0D 20 20 20 20 20 20 20 20 | CPY #0. | 000009B0: 20 42 45 51 20 43 31 0D 20 20 20 20 20 20 20 20 | BEQ C1. | 000009C0: 20 44 45 43 20 43 41 4E 54 41 4C 0D 20 20 20 20 | DEC CANTAL. | 000009D0: 20 20 20 20 20 4C 44 41 20 23 22 14 22 0D 20 20 | LDA #".". | 000009E0: 20 20 20 20 20 20 20 4A 53 52 20 24 46 46 44 32 | JSR $FFD2| 000009F0: 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 24 46 |. JSR $F| 00000A00: 46 44 32 0D 20 20 20 20 20 20 20 20 20 4A 53 52 |FD2. JSR| 00000A10: 20 43 38 0D 20 20 20 20 20 20 20 20 20 4A 4D 50 | C8. JMP| 00000A20: 20 43 31 0D 0D 43 34 20 20 20 20 20 20 20 4C 44 | C1..C4 LD| 00000A30: 41 20 23 22 14 22 0D 20 20 20 20 20 20 20 20 20 |A #".". | 00000A40: 4A 53 52 20 24 46 46 44 32 0D 20 20 20 20 20 20 |JSR $FFD2. | 00000A50: 20 20 20 4C 44 41 20 53 45 4C 49 4E 0D 20 20 20 | LDA SELIN. | 00000A60: 20 20 20 20 20 20 43 4D 50 20 23 31 0D 20 20 20 | CMP #1. | 00000A70: 20 20 20 20 20 20 42 45 51 20 43 35 0D 20 20 20 | BEQ C5. | 00000A80: 20 20 20 20 20 20 43 4D 50 20 23 32 0D 20 20 20 | CMP #2. | 00000A90: 20 20 20 20 20 20 42 45 51 20 43 37 0D 20 20 20 | BEQ C7. | 00000AA0: 20 20 20 20 20 20 52 54 53 0D 0D 43 35 20 20 20 | RTS..C5 | 00000AB0: 20 20 20 20 4C 44 58 20 43 41 4E 54 41 4C 0D 20 | LDX CANTAL. | 00000AC0: 20 20 20 20 20 20 20 20 4A 53 52 20 43 36 0D 20 | JSR C6. | 00000AD0: 20 20 20 20 20 20 20 20 4C 44 41 20 23 22 53 22 | LDA #"S"| 00000AE0: 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 43 4E |. STA CN| 00000AF0: 41 4D 45 2C 58 0D 20 20 20 20 20 20 20 20 20 49 |AME,X. I| 00000B00: 4E 58 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 |NX. JSR | 00000B10: 43 36 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 |C6. LDA | 00000B20: 23 22 52 22 0D 20 20 20 20 20 20 20 20 20 53 54 |#"R". ST| 00000B30: 41 20 43 4E 41 4D 45 2C 58 0D 20 20 20 20 20 20 |A CNAME,X. | 00000B40: 20 20 20 53 54 58 20 43 41 4E 54 41 4C 0D 20 20 | STX CANTAL. | 00000B50: 20 20 20 20 20 20 20 52 54 53 0D 0D 43 37 20 20 | RTS..C7 | 00000B60: 20 20 20 20 20 4C 44 58 20 43 41 4E 54 41 4C 0D | LDX CANTAL.| 00000B70: 20 20 20 20 20 20 20 20 20 4A 53 52 20 43 36 0D | JSR C6.| 00000B80: 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 22 53 | LDA #"S| 00000B90: 22 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 43 |". STA C| 00000BA0: 4E 41 4D 45 2C 58 0D 20 20 20 20 20 20 20 20 20 |NAME,X. | 00000BB0: 49 4E 58 0D 20 20 20 20 20 20 20 20 20 4A 53 52 |INX. JSR| 00000BC0: 20 43 36 0D 20 20 20 20 20 20 20 20 20 4C 44 41 | C6. LDA| 00000BD0: 20 23 22 57 22 0D 20 20 20 20 20 20 20 20 20 53 | #"W". S| 00000BE0: 54 41 20 43 4E 41 4D 45 2C 58 0D 20 20 20 20 20 |TA CNAME,X. | 00000BF0: 20 20 20 20 53 54 58 20 43 41 4E 54 41 4C 0D 20 | STX CANTAL. | 00000C00: 20 20 20 20 20 20 20 20 52 54 53 0D 0D 43 36 20 | RTS..C6 | 00000C10: 20 20 20 20 20 20 4C 44 41 20 23 22 2C 22 0D 20 | LDA #",". | 00000C20: 20 20 20 20 20 20 20 20 53 54 41 20 43 4E 41 4D | STA CNAM| 00000C30: 45 2C 58 0D 20 20 20 20 20 20 20 20 20 49 4E 58 |E,X. INX| 00000C40: 0D 20 20 20 20 20 20 20 20 20 52 54 53 0D 0D 43 |. RTS..C| 00000C50: 38 20 20 20 20 20 20 20 4C 44 41 20 23 22 12 22 |8 LDA #"."| 00000C60: 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 24 46 |. JSR $F| 00000C70: 46 44 32 0D 20 20 20 20 20 20 20 20 20 4C 44 41 |FD2. LDA| 00000C80: 20 23 22 20 22 0D 20 20 20 20 20 20 20 20 20 4A | #" ". J| 00000C90: 53 52 20 24 46 46 44 32 0D 20 20 20 20 20 20 20 |SR $FFD2. | 00000CA0: 20 20 4C 44 41 20 23 22 92 22 0D 20 20 20 20 20 | LDA #".". | 00000CB0: 20 20 20 20 4A 53 52 20 24 46 46 44 32 0D 20 20 | JSR $FFD2. | 00000CC0: 20 20 20 20 20 20 20 52 54 53 0D 0D 0D 0D 0D 0D | RTS......| 00000CD0: 0D 0D 44 49 52 20 20 20 20 20 20 3D 20 2A 0D 0D |..DIR = *..| 00000CE0: 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 24 30 | LDA #$0| 00000CF0: 31 0D 20 20 20 20 20 20 20 20 20 4C 44 59 20 23 |1. LDY #| 00000D00: 3E 4E 41 44 0D 20 20 20 20 20 20 20 20 20 4C 44 |>NAD. LD| 00000D10: 58 20 23 3C 4E 41 44 0D 20 20 20 20 20 20 20 20 |X #<NAD. | 00000D20: 20 4A 53 52 20 24 46 46 42 44 0D 20 20 20 20 20 | JSR $FFBD. | 00000D30: 20 20 20 20 4C 44 41 20 23 24 30 31 0D 20 20 20 | LDA #$01. | 00000D40: 20 20 20 20 20 20 4C 44 58 20 23 24 30 38 0D 20 | LDX #$08. | 00000D50: 20 20 20 20 20 20 20 20 4C 44 59 20 23 24 30 30 | LDY #$00| 00000D60: 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 24 46 |. JSR $F| 00000D70: 46 42 41 0D 20 20 20 20 20 20 20 20 20 4A 53 52 |FBA. JSR| 00000D80: 20 24 46 46 43 30 0D 20 20 20 20 20 20 20 20 20 | $FFC0. | 00000D90: 4C 44 58 20 23 24 30 31 0D 20 20 20 20 20 20 20 |LDX #$01. | 00000DA0: 20 20 4A 53 52 20 24 46 46 43 36 0D 20 20 20 20 | JSR $FFC6. | 00000DB0: 20 20 20 20 20 4C 44 59 20 23 35 0D 4E 41 44 31 | LDY #5.NAD1| 00000DC0: 20 20 20 20 20 53 54 59 20 4E 41 44 2B 31 0D 20 | STY NAD+1. | 00000DD0: 20 20 20 20 20 20 20 20 4A 53 52 20 24 46 46 43 | JSR $FFC| 00000DE0: 46 0D 20 20 20 20 20 20 20 20 20 54 41 58 0D 20 |F. TAX. | 00000DF0: 20 20 20 20 20 20 20 20 4C 44 59 20 4E 41 44 2B | LDY NAD+| 00000E00: 31 0D 20 20 20 20 20 20 20 20 20 44 45 59 0D 20 |1. DEY. | 00000E10: 20 20 20 20 20 20 20 20 42 4E 45 20 4E 41 44 31 | BNE NAD1| 00000E20: 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 24 46 |. JSR $F| 00000E30: 46 43 46 0D 20 20 20 20 20 20 20 20 20 4C 44 59 |FCF. LDY| 00000E40: 20 24 39 30 0D 20 20 20 20 20 20 20 20 20 42 4E | $90. BN| 00000E50: 45 20 4E 41 44 32 0D 20 20 20 20 20 20 20 20 20 |E NAD2. | 00000E60: 4A 53 52 20 24 42 44 43 44 0D 20 20 20 20 20 20 |JSR $BDCD. | 00000E70: 20 20 20 4C 44 41 20 23 24 32 30 0D 20 20 20 20 | LDA #$20. | 00000E80: 20 20 20 20 20 4A 53 52 20 24 46 46 44 32 0D 4E | JSR $FFD2.N| 00000E90: 41 44 34 20 20 20 20 20 4A 53 52 20 24 46 46 43 |AD4 JSR $FFC| 00000EA0: 46 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 4E |F. STA N| 00000EB0: 41 44 2B 31 0D 20 20 20 20 20 20 20 20 20 43 4D |AD+1. CM| 00000EC0: 50 20 23 30 0D 20 20 20 20 20 20 20 20 20 42 45 |P #0. BE| 00000ED0: 51 20 4E 41 44 33 0D 20 20 20 20 20 20 20 20 20 |Q NAD3. | 00000EE0: 4C 44 41 20 4E 41 44 2B 31 0D 20 20 20 20 20 20 |LDA NAD+1. | 00000EF0: 20 20 20 4A 53 52 20 24 46 46 44 32 0D 20 20 20 | JSR $FFD2. | 00000F00: 20 20 20 20 20 20 4A 4D 50 20 4E 41 44 34 0D 4E | JMP NAD4.N| 00000F10: 41 44 33 20 20 20 20 20 4C 44 41 20 23 24 30 44 |AD3 LDA #$0D| 00000F20: 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 24 46 |. JSR $F| 00000F30: 46 44 32 0D 20 20 20 20 20 20 20 20 20 4C 44 41 |FD2. LDA| 00000F40: 20 24 44 43 30 31 0D 20 20 20 20 20 20 20 20 20 | $DC01. | 00000F50: 43 4D 50 20 23 32 33 39 0D 20 20 20 20 20 20 20 |CMP #239. | 00000F60: 20 20 42 45 51 20 4E 41 44 35 0D 20 20 20 20 20 | BEQ NAD5. | 00000F70: 20 20 20 20 43 4D 50 20 23 24 37 46 0D 20 20 20 | CMP #$7F. | 00000F80: 20 20 20 20 20 20 42 45 51 20 4E 41 44 32 0D 4E | BEQ NAD2.N| 00000F90: 41 44 37 20 20 20 20 20 4C 44 59 20 23 24 30 33 |AD7 LDY #$03| 00000FA0: 0D 20 20 20 20 20 20 20 20 20 4A 4D 50 20 4E 41 |. JMP NA| 00000FB0: 44 31 0D 4E 41 44 32 20 20 20 20 20 4A 53 52 20 |D1.NAD2 JSR | 00000FC0: 24 46 46 43 43 0D 20 20 20 20 20 20 20 20 20 4C |$FFCC. L| 00000FD0: 44 41 20 23 24 30 31 0D 20 20 20 20 20 20 20 20 |DA #$01. | 00000FE0: 20 4A 53 52 20 24 46 46 43 33 0D 20 20 20 20 20 | JSR $FFC3. | 00000FF0: 20 20 20 20 52 54 53 0D 0D 4E 41 44 35 20 20 20 | RTS..NAD5 | 00001000: 20 20 4C 44 41 20 24 44 43 30 31 0D 20 20 20 20 | LDA $DC01. | 00001010: 20 20 20 20 20 43 4D 50 20 23 32 33 39 0D 20 20 | CMP #239. | 00001020: 20 20 20 20 20 20 20 42 45 51 20 4E 41 44 35 0D | BEQ NAD5.| 00001030: 0D 4E 41 44 36 20 20 20 20 20 4C 44 41 20 24 44 |.NAD6 LDA $D| 00001040: 43 30 31 0D 20 20 20 20 20 20 20 20 20 43 4D 50 |C01. CMP| 00001050: 20 23 32 33 39 0D 20 20 20 20 20 20 20 20 20 42 | #239. B| 00001060: 4E 45 20 4E 41 44 36 0D 0D 4E 41 44 38 20 20 20 |NE NAD6..NAD8 | 00001070: 20 20 4C 44 41 20 24 44 43 30 31 0D 20 20 20 20 | LDA $DC01. | 00001080: 20 20 20 20 20 43 4D 50 20 23 32 33 39 0D 20 20 | CMP #239. | 00001090: 20 20 20 20 20 20 20 42 45 51 20 4E 41 44 38 0D | BEQ NAD8.| 000010A0: 20 20 20 20 20 20 20 20 20 4A 4D 50 20 4E 41 44 | JMP NAD| 000010B0: 37 0D 0D 0D 0D 0D 0D 0D 4C 4F 41 44 20 20 20 20 |7.......LOAD | 000010C0: 20 3D 20 2A 0D 0D 20 20 20 20 20 20 20 20 20 4C | = *.. L| 000010D0: 44 58 20 23 24 30 38 0D 20 20 20 20 20 20 20 20 |DX #$08. | 000010E0: 20 4C 44 41 20 23 24 30 38 0D 20 20 20 20 20 20 | LDA #$08. | 000010F0: 20 20 20 4C 44 59 20 23 24 30 38 0D 20 20 20 20 | LDY #$08. | 00001100: 20 20 20 20 20 4A 53 52 20 24 46 46 42 41 0D 0D | JSR $FFBA..| 00001110: 20 20 20 20 20 20 20 20 20 4C 44 41 20 4E 41 4D | LDA NAM| 00001120: 45 31 0D 20 20 20 20 20 20 20 20 20 4C 44 58 20 |E1. LDX | 00001130: 23 3C 4E 41 4D 45 0D 20 20 20 20 20 20 20 20 20 |#<NAME. | 00001140: 4C 44 59 20 23 3E 4E 41 4D 45 0D 20 20 20 20 20 |LDY #>NAME. | 00001150: 20 20 20 20 4A 53 52 20 24 46 46 42 44 0D 0D 20 | JSR $FFBD.. | 00001160: 20 20 20 20 20 20 20 20 4C 44 41 20 23 24 30 30 | LDA #$00| 00001170: 0D 20 20 20 20 20 20 20 20 20 4C 44 58 20 23 24 |. LDX #$| 00001180: 46 46 0D 20 20 20 20 20 20 20 20 20 4C 44 59 20 |FF. LDY | 00001190: 23 24 46 46 0D 20 20 20 20 20 20 20 20 20 4A 53 |#$FF. JS| 000011A0: 52 20 24 46 46 44 35 0D 20 20 20 20 20 20 20 20 |R $FFD5. | 000011B0: 20 43 4D 50 20 23 24 30 34 0D 20 20 20 20 20 20 | CMP #$04. | 000011C0: 20 20 20 42 45 51 20 45 52 0D 20 20 20 20 20 20 | BEQ ER. | 000011D0: 20 20 20 52 54 53 0D 0D 45 52 0D 20 20 20 20 20 | RTS..ER. | 000011E0: 20 20 20 20 52 54 53 0D 0D 54 45 53 54 49 20 20 | RTS..TESTI | 000011F0: 20 20 3D 20 2A 0D 20 20 20 20 20 20 20 20 20 4C | = *. L| 00001200: 44 41 20 23 3C 54 45 4D 55 4E 0D 20 20 20 20 20 |DA #<TEMUN. | 00001210: 20 20 20 20 4C 44 59 20 23 3E 54 45 4D 55 4E 0D | LDY #>TEMUN.| 00001220: 20 20 20 20 20 20 20 20 20 4A 53 52 20 24 41 42 | JSR $AB| 00001230: 31 45 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 |1E. JSR | 00001240: 49 4E 49 54 31 0D 54 52 59 20 20 20 20 20 20 4A |INIT1.TRY J| 00001250: 53 52 20 24 46 46 45 34 0D 20 20 20 20 20 20 20 |SR $FFE4. | 00001260: 20 20 43 4D 50 20 23 24 32 30 0D 20 20 20 20 20 | CMP #$20. | 00001270: 20 20 20 20 42 45 51 20 54 52 59 53 0D 20 20 20 | BEQ TRYS. | 00001280: 20 20 20 20 20 20 4A 4D 50 20 54 52 59 0D 54 52 | JMP TRY.TR| 00001290: 59 53 20 20 20 20 20 3D 20 2A 0D 20 20 20 20 20 |YS = *. | 000012A0: 20 20 20 20 4A 4D 50 20 4D 55 53 49 43 0D 0D 0D | JMP MUSIC...| 000012B0: 0D 0D 0D 49 4E 49 54 31 20 20 20 20 3D 20 2A 0D |...INIT1 = *.| 000012C0: 20 20 20 20 20 20 20 20 20 53 45 49 0D 20 20 20 | SEI. | 000012D0: 20 20 20 20 20 20 4C 44 41 20 23 32 35 35 0D 20 | LDA #255. | 000012E0: 20 20 20 20 20 20 20 20 53 54 41 20 24 44 44 30 | STA $DD0| 000012F0: 33 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 |3. LDA #| 00001300: 31 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 24 |1. STA $| 00001310: 44 30 31 41 0D 20 20 20 20 20 20 20 20 20 53 54 |D01A. ST| 00001320: 41 20 24 44 43 30 44 0D 20 20 20 20 20 20 20 20 |A $DC0D. | 00001330: 20 4C 44 41 20 23 24 31 42 0D 20 20 20 20 20 20 | LDA #$1B. | 00001340: 20 20 20 53 54 41 20 24 44 30 31 31 0D 20 20 20 | STA $D011. | 00001350: 20 20 20 20 20 20 4C 44 41 20 23 3C 49 4E 54 0D | LDA #<INT.| 00001360: 20 20 20 20 20 20 20 20 20 4C 44 59 20 23 3E 49 | LDY #>I| 00001370: 4E 54 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 |NT. STA | 00001380: 24 30 33 31 34 0D 20 20 20 20 20 20 20 20 20 53 |$0314. S| 00001390: 54 59 20 24 30 33 31 35 0D 20 20 20 20 20 20 20 |TY $0315. | 000013A0: 20 20 4C 44 41 20 23 31 34 36 0D 20 20 20 20 20 | LDA #146. | 000013B0: 20 20 20 20 53 54 41 20 24 44 30 31 32 0D 49 4E | STA $D012.IN| 000013C0: 55 20 20 20 20 20 20 4C 44 41 20 23 30 0D 20 20 |U LDA #0. | 000013D0: 20 20 20 20 20 20 20 54 41 58 0D 20 20 20 20 20 | TAX. | 000013E0: 20 20 20 20 54 41 59 0D 20 20 20 20 20 20 20 20 | TAY. | 000013F0: 20 4A 53 52 20 24 31 30 30 30 0D 20 20 20 20 20 | JSR $1000. | 00001400: 20 20 20 20 4E 4F 50 0D 20 20 20 20 20 20 20 20 | NOP. | 00001410: 20 4E 4F 50 0D 20 20 20 20 20 20 20 20 20 4E 4F | NOP. NO| 00001420: 50 0D 20 20 20 20 20 20 20 20 20 4E 4F 50 0D 20 |P. NOP. | 00001430: 20 20 20 20 20 20 20 20 4E 4F 50 0D 20 20 20 20 | NOP. | 00001440: 20 20 20 20 20 43 4C 49 0D 20 20 20 20 20 20 20 | CLI. | 00001450: 20 20 52 54 53 0D 0D 49 4E 54 20 20 20 20 20 20 | RTS..INT | 00001460: 3D 20 2A 0D 20 20 20 20 20 20 20 20 20 52 4F 4C |= *. ROL| 00001470: 20 24 44 30 31 39 0D 20 20 20 20 20 20 20 20 20 | $D019. | 00001480: 4C 44 41 20 23 31 34 36 0D 20 20 20 20 20 20 20 |LDA #146. | 00001490: 20 20 53 54 41 20 24 44 30 31 32 0D 20 20 20 20 | STA $D012. | 000014A0: 20 20 20 20 20 4E 4F 50 0D 20 20 20 20 20 20 20 | NOP. | 000014B0: 20 20 4E 4F 50 0D 20 20 20 20 20 20 20 20 20 4E | NOP. N| 000014C0: 4F 50 0D 20 20 20 20 20 20 20 20 20 4E 4F 50 0D |OP. NOP.| 000014D0: 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 35 0D | LDA #5.| 000014E0: 20 20 20 20 20 20 20 20 20 53 54 41 20 24 44 30 | STA $D0| 000014F0: 32 30 0D 50 41 50 20 20 20 20 20 20 4A 53 52 20 |20.PAP JSR | 00001500: 24 31 30 30 33 0D 20 20 20 20 20 20 20 20 20 4E |$1003. N| 00001510: 4F 50 0D 20 20 20 20 20 20 20 20 20 4E 4F 50 0D |OP. NOP.| 00001520: 20 20 20 20 20 20 20 20 20 4E 4F 50 0D 20 20 20 | NOP. | 00001530: 20 20 20 20 20 20 4C 44 41 20 23 30 0D 20 20 20 | LDA #0. | 00001540: 20 20 20 20 20 20 53 54 41 20 24 44 30 32 30 0D | STA $D020.| 00001550: 20 20 20 20 20 20 20 20 20 4C 44 58 20 24 44 34 | LDX $D4| 00001560: 31 43 0D 20 20 20 20 20 20 20 20 20 53 54 58 20 |1C. STX | 00001570: 24 44 44 30 31 0D 20 20 20 20 20 20 20 20 20 4A |$DD01. J| 00001580: 4D 50 20 24 45 41 33 31 0D 0D 0D 4E 55 4D 52 45 |MP $EA31...NUMRE| 00001590: 53 54 20 20 3D 20 2A 0D 20 20 20 20 20 20 20 20 |ST = *. | 000015A0: 20 4C 44 41 20 23 3C 54 45 53 54 4D 55 0D 20 20 | LDA #<TESTMU. | 000015B0: 20 20 20 20 20 20 20 4C 44 59 20 23 3E 54 45 53 | LDY #>TES| 000015C0: 54 4D 55 0D 20 20 20 20 20 20 20 20 20 4A 53 52 |TMU. JSR| 000015D0: 20 24 41 42 31 45 0D 20 20 20 20 20 20 20 20 20 | $AB1E. | 000015E0: 4C 44 41 20 23 32 0D 20 20 20 20 20 20 20 20 20 |LDA #2. | 000015F0: 53 54 41 20 41 4E 54 41 4C 0D 20 20 20 20 20 20 |STA ANTAL. | 00001600: 20 20 20 4A 53 52 20 48 57 0D 20 20 20 20 20 20 | JSR HW. | 00001610: 20 20 20 4C 44 41 20 23 3C 54 45 53 54 4D 55 32 | LDA #<TESTMU2| 00001620: 0D 20 20 20 20 20 20 20 20 20 4C 44 59 20 23 3E |. LDY #>| 00001630: 54 45 53 54 4D 55 32 0D 20 20 20 20 20 20 20 20 |TESTMU2. | 00001640: 20 4A 53 52 20 24 41 42 31 45 0D 57 44 20 20 20 | JSR $AB1E.WD | 00001650: 20 20 20 20 4A 53 52 20 24 46 46 45 34 0D 20 20 | JSR $FFE4. | 00001660: 20 20 20 20 20 20 20 43 4D 50 20 23 22 59 22 0D | CMP #"Y".| 00001670: 20 20 20 20 20 20 20 20 20 42 45 51 20 4C 44 41 | BEQ LDA| 00001680: 54 32 0D 20 20 20 20 20 20 20 20 20 43 4D 50 20 |T2. CMP | 00001690: 23 22 4E 22 0D 20 20 20 20 20 20 20 20 20 42 45 |#"N". BE| 000016A0: 51 20 50 4C 41 59 45 0D 20 20 20 20 20 20 20 20 |Q PLAYE. | 000016B0: 20 4A 4D 50 20 57 44 0D 4C 44 41 54 32 20 20 20 | JMP WD.LDAT2 | 000016C0: 20 4A 4D 50 20 4C 44 41 54 0D 50 4C 41 59 45 20 | JMP LDAT.PLAYE | 000016D0: 20 20 20 3D 20 2A 0D 20 20 20 20 20 20 20 20 20 | = *. | 000016E0: 4C 44 41 20 46 54 0D 20 20 20 20 20 20 20 20 20 |LDA FT. | 000016F0: 53 54 41 20 49 4E 49 54 31 32 2B 31 0D 20 20 20 |STA INIT12+1. | 00001700: 20 20 20 20 20 20 4C 44 41 20 46 54 2B 31 0D 20 | LDA FT+1. | 00001710: 20 20 20 20 20 20 20 20 53 54 41 20 49 4E 49 54 | STA INIT| 00001720: 31 32 2B 32 0D 50 4C 45 57 20 20 20 20 20 4C 44 |12+2.PLEW LD| 00001730: 58 20 23 30 0D 50 4F 45 32 20 20 20 20 20 4C 44 |X #0.POE2 LD| 00001740: 41 20 49 4E 49 54 31 31 2C 58 0D 20 20 20 20 20 |A INIT11,X. | 00001750: 20 20 20 20 53 54 41 20 49 4E 55 2C 58 0D 20 20 | STA INU,X. | 00001760: 20 20 20 20 20 20 20 53 54 41 20 49 4E 49 54 45 | STA INITE| 00001770: 2C 58 0D 20 20 20 20 20 20 20 20 20 49 4E 58 0D |,X. INX.| 00001780: 20 20 20 20 20 20 20 20 20 43 50 58 20 23 37 0D | CPX #7.| 00001790: 20 20 20 20 20 20 20 20 20 42 4E 45 20 50 4F 45 | BNE POE| 000017A0: 32 0D 20 20 20 20 20 20 20 20 20 4C 44 58 20 23 |2. LDX #| 000017B0: 30 0D 52 52 31 20 20 20 20 20 20 4C 44 41 20 50 |0.RR1 LDA P| 000017C0: 4F 51 2C 58 0D 20 20 20 20 20 20 20 20 20 53 54 |OQ,X. ST| 000017D0: 41 20 50 4C 41 59 41 2C 58 0D 20 20 20 20 20 20 |A PLAYA,X. | 000017E0: 20 20 20 49 4E 58 0D 20 20 20 20 20 20 20 20 20 | INX. | 000017F0: 43 50 58 20 23 33 0D 20 20 20 20 20 20 20 20 20 |CPX #3. | 00001800: 42 4E 45 20 52 52 31 0D 20 20 20 20 20 20 20 20 |BNE RR1. | 00001810: 20 4C 44 41 20 23 3C 54 45 53 54 4D 55 34 0D 20 | LDA #<TESTMU4. | 00001820: 20 20 20 20 20 20 20 20 4C 44 59 20 23 3E 54 45 | LDY #>TE| 00001830: 53 54 4D 55 34 0D 20 20 20 20 20 20 20 20 20 4A |STMU4. J| 00001840: 53 52 20 24 41 42 31 45 0D 20 20 20 20 20 20 20 |SR $AB1E. | 00001850: 20 20 4C 44 41 20 23 32 0D 20 20 20 20 20 20 20 | LDA #2. | 00001860: 20 20 53 54 41 20 41 4E 54 41 4C 0D 20 20 20 20 | STA ANTAL. | 00001870: 20 20 20 20 20 4A 53 52 20 48 57 0D 20 20 20 20 | JSR HW. | 00001880: 20 20 20 20 20 4C 44 41 20 46 54 0D 20 20 20 20 | LDA FT. | 00001890: 20 20 20 20 20 53 54 41 20 50 4F 51 2B 31 0D 20 | STA POQ+1. | 000018A0: 20 20 20 20 20 20 20 20 53 54 41 20 50 41 50 2B | STA PAP+| 000018B0: 31 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 46 |1. LDA F| 000018C0: 54 2B 31 0D 20 20 20 20 20 20 20 20 20 53 54 41 |T+1. STA| 000018D0: 20 50 4F 51 2B 32 0D 20 20 20 20 20 20 20 20 20 | POQ+2. | 000018E0: 53 54 41 20 50 41 50 2B 32 0D 20 20 20 20 20 20 |STA PAP+2. | 000018F0: 20 20 20 4C 44 58 20 23 30 0D 47 46 52 34 35 20 | LDX #0.GFR45 | 00001900: 20 20 20 4C 44 41 20 50 4F 51 2C 58 0D 20 20 20 | LDA POQ,X. | 00001910: 20 20 20 20 20 20 53 54 41 20 50 4C 41 59 41 2C | STA PLAYA,| 00001920: 58 0D 20 20 20 20 20 20 20 20 20 49 4E 58 0D 20 |X. INX. | 00001930: 20 20 20 20 20 20 20 20 43 50 58 20 23 33 0D 20 | CPX #3. | 00001940: 20 20 20 20 20 20 20 20 42 4E 45 20 47 46 52 34 | BNE GFR4| 00001950: 35 0D 20 20 20 20 20 20 20 20 20 4C 44 58 20 23 |5. LDX #| 00001960: 30 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 |0. LDA #| 00001970: 24 32 30 0D 57 57 0D 20 20 20 20 20 20 20 20 20 |$20.WW. | 00001980: 53 54 41 20 24 30 34 30 30 2B 28 31 32 2A 34 30 |STA $0400+(12*40| 00001990: 29 2C 58 0D 20 20 20 20 20 20 20 20 20 53 54 41 |),X. STA| 000019A0: 20 24 30 34 30 30 2B 28 31 33 2A 34 30 29 2C 58 | $0400+(13*40),X| 000019B0: 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 24 30 |. STA $0| 000019C0: 34 30 30 2B 28 31 34 2A 34 30 29 2C 58 0D 20 20 |400+(14*40),X. | 000019D0: 20 20 20 20 20 20 20 53 54 41 20 24 30 34 30 30 | STA $0400| 000019E0: 2B 28 31 35 2A 34 30 29 2C 58 0D 20 20 20 20 20 |+(15*40),X. | 000019F0: 20 20 20 20 49 4E 58 0D 20 20 20 20 20 20 20 20 | INX. | 00001A00: 20 43 50 58 20 23 34 30 0D 20 20 20 20 20 20 20 | CPX #40. | 00001A10: 20 20 42 4E 45 20 57 57 0D 20 20 20 20 20 20 20 | BNE WW. | 00001A20: 20 20 4A 4D 50 20 4C 4F 44 32 0D 0D 20 20 20 20 | JMP LOD2.. | 00001A30: 20 20 20 20 20 42 52 4B 0D 20 20 20 20 20 20 20 | BRK. | 00001A40: 20 20 42 52 4B 0D 49 4E 49 54 31 31 20 20 20 4C | BRK.INIT11 L| 00001A50: 44 41 20 23 30 0D 20 20 20 20 20 20 20 20 20 54 |DA #0. T| 00001A60: 41 59 0D 20 20 20 20 20 20 20 20 20 54 41 58 0D |AY. TAX.| 00001A70: 49 4E 49 54 31 32 20 20 20 4A 53 52 20 24 31 30 |INIT12 JSR $10| 00001A80: 30 30 0D 20 20 20 20 20 20 20 20 20 42 52 4B 0D |00. BRK.| 00001A90: 0D 20 20 20 20 20 20 20 20 20 42 52 4B 0D 50 4F |. BRK.PO| 00001AA0: 51 20 20 20 20 20 20 4A 53 52 20 24 31 30 30 33 |Q JSR $1003| 00001AB0: 0D 20 20 20 20 20 20 20 20 20 42 52 4B 0D 20 20 |. BRK. | 00001AC0: 20 20 20 20 20 20 20 42 52 4B 0D 0D 4C 44 41 54 | BRK..LDAT| 00001AD0: 20 20 20 20 20 3D 20 2A 0D 20 20 20 20 20 20 20 | = *. | 00001AE0: 20 20 4C 44 41 20 46 54 0D 20 20 20 20 20 20 20 | LDA FT. | 00001AF0: 20 20 53 54 41 20 49 4E 49 54 31 32 2B 31 0D 20 | STA INIT12+1. | 00001B00: 20 20 20 20 20 20 20 20 4C 44 41 20 46 54 2B 31 | LDA FT+1| 00001B10: 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 49 4E |. STA IN| 00001B20: 49 54 31 32 2B 32 0D 0D 20 20 20 20 20 20 20 20 |IT12+2.. | 00001B30: 20 4C 44 41 20 23 31 0D 20 20 20 20 20 20 20 20 | LDA #1. | 00001B40: 20 53 54 41 20 41 4E 54 41 4C 0D 20 20 20 20 20 | STA ANTAL. | 00001B50: 20 20 20 20 4C 44 41 20 23 3C 54 45 53 54 4D 55 | LDA #<TESTMU| 00001B60: 33 0D 20 20 20 20 20 20 20 20 20 4C 44 59 20 23 |3. LDY #| 00001B70: 3E 54 45 53 54 4D 55 33 0D 20 20 20 20 20 20 20 |>TESTMU3. | 00001B80: 20 20 4A 53 52 20 24 41 42 31 45 0D 20 20 20 20 | JSR $AB1E. | 00001B90: 20 20 20 20 20 4A 53 52 20 48 57 0D 20 20 20 20 | JSR HW. | 00001BA0: 20 20 20 20 20 4C 44 41 20 46 54 0D 20 20 20 20 | LDA FT. | 00001BB0: 20 20 20 20 20 53 54 41 20 49 4E 49 54 31 31 2B | STA INIT11+| 00001BC0: 31 0D 20 20 20 20 20 20 20 20 20 4A 4D 50 20 50 |1. JMP P| 00001BD0: 4C 45 57 0D 0D 0D 0D 0D 0D 0D 0D 0D 41 4E 54 41 |LEW.........ANTA| 00001BE0: 4C 20 20 20 20 2E 42 59 54 45 20 32 0D 48 57 0D |L .BYTE 2.HW.| 00001BF0: 0D 53 53 0D 20 20 20 20 20 20 20 20 20 4C 44 41 |.SS. LDA| 00001C00: 20 41 4E 54 41 4C 0D 20 20 20 20 20 20 20 20 20 | ANTAL. | 00001C10: 53 45 43 0D 20 20 20 20 20 20 20 20 20 53 42 43 |SEC. SBC| 00001C20: 20 23 31 0D 20 20 20 20 20 20 20 20 20 53 54 41 | #1. STA| 00001C30: 20 41 4E 54 41 4C 0D 20 20 20 20 20 20 20 20 20 | ANTAL. | 00001C40: 4C 44 58 20 41 4E 54 41 4C 0D 50 4F 4F 38 20 20 |LDX ANTAL.POO8 | 00001C50: 20 20 20 4A 53 52 20 50 4F 4F 37 0D 20 20 20 20 | JSR POO7. | 00001C60: 20 20 20 20 20 43 4D 50 20 23 24 46 46 0D 20 20 | CMP #$FF. | 00001C70: 20 20 20 20 20 20 20 42 45 51 20 48 57 0D 20 20 | BEQ HW. | 00001C80: 20 20 20 20 20 20 20 41 53 4C 20 41 0D 20 20 20 | ASL A. | 00001C90: 20 20 20 20 20 20 41 53 4C 20 41 0D 20 20 20 20 | ASL A. | 00001CA0: 20 20 20 20 20 41 53 4C 20 41 0D 20 20 20 20 20 | ASL A. | 00001CB0: 20 20 20 20 41 53 4C 20 41 0D 20 20 20 20 20 20 | ASL A. | 00001CC0: 20 20 20 53 54 41 20 46 54 2C 58 0D 20 20 20 20 | STA FT,X. | 00001CD0: 20 20 20 20 20 4A 53 52 20 50 4F 4F 37 0D 20 20 | JSR POO7. | 00001CE0: 20 20 20 20 20 20 20 43 4D 50 20 23 24 46 46 0D | CMP #$FF.| 00001CF0: 20 20 20 20 20 20 20 20 20 42 45 51 20 48 57 0D | BEQ HW.| 00001D00: 20 20 20 20 20 20 20 20 20 43 4C 43 0D 20 20 20 | CLC. | 00001D10: 20 20 20 20 20 20 4C 44 41 20 46 54 2C 58 0D 20 | LDA FT,X. | 00001D20: 20 20 20 20 20 20 20 20 41 44 43 20 50 4F 4F 30 | ADC POO0| 00001D30: 2B 31 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 |+1. STA | 00001D40: 46 54 2C 58 0D 20 20 20 20 20 20 20 20 20 44 45 |FT,X. DE| 00001D50: 58 0D 20 20 20 20 20 20 20 20 20 43 50 58 20 23 |X. CPX #| 00001D60: 32 35 35 0D 20 20 20 20 20 20 20 20 20 42 4E 45 |255. BNE| 00001D70: 20 50 4F 4F 38 0D 50 4F 4F 31 31 20 20 20 20 4A | POO8.POO11 J| 00001D80: 53 52 20 24 46 46 45 34 0D 20 20 20 20 20 20 20 |SR $FFE4. | 00001D90: 20 20 42 45 51 20 50 4F 4F 31 31 0D 20 20 20 20 | BEQ POO11. | 00001DA0: 20 20 20 20 20 43 4D 50 20 23 22 14 22 0D 20 20 | CMP #".". | 00001DB0: 20 20 20 20 20 20 20 42 45 51 20 48 57 0D 20 20 | BEQ HW. | 00001DC0: 20 20 20 20 20 20 20 52 54 53 0D 0D 50 4F 4F 37 | RTS..POO7| 00001DD0: 20 20 20 20 20 53 54 58 20 50 4F 4F 30 2B 32 0D | STX POO0+2.| 00001DE0: 50 4F 4F 31 20 20 20 20 20 4C 44 59 20 23 24 30 |POO1 LDY #$0| 00001DF0: 30 0D 50 4F 4F 32 20 20 20 20 20 4A 53 52 20 24 |0.POO2 JSR $| 00001E00: 46 46 45 34 0D 20 20 20 20 20 20 20 20 20 42 45 |FFE4. BE| 00001E10: 51 20 50 4F 4F 32 0D 20 20 20 20 20 20 20 20 20 |Q POO2. | 00001E20: 53 54 41 20 50 4F 4F 30 0D 20 20 20 20 20 20 20 |STA POO0. | 00001E30: 20 20 43 4D 50 20 23 22 14 22 0D 20 20 20 20 20 | CMP #".". | 00001E40: 20 20 20 20 42 45 51 20 50 4F 4F 30 31 0D 20 20 | BEQ POO01. | 00001E50: 20 20 20 20 20 20 20 43 4D 50 20 23 22 41 22 0D | CMP #"A".| 00001E60: 20 20 20 20 20 20 20 20 20 42 43 53 20 50 4F 4F | BCS POO| 00001E70: 33 0D 20 20 20 20 20 20 20 20 20 43 4D 50 20 23 |3. CMP #| 00001E80: 22 30 22 0D 20 20 20 20 20 20 20 20 20 42 43 53 |"0". BCS| 00001E90: 20 50 4F 4F 34 0D 20 20 20 20 20 20 20 20 20 4A | POO4. J| 00001EA0: 4D 50 20 50 4F 4F 31 0D 50 4F 4F 33 20 20 20 20 |MP POO1.POO3 | 00001EB0: 20 43 4D 50 20 23 22 47 22 0D 20 20 20 20 20 20 | CMP #"G". | 00001EC0: 20 20 20 42 43 53 20 50 4F 4F 31 0D 20 20 20 20 | BCS POO1. | 00001ED0: 20 20 20 20 20 53 45 43 0D 20 20 20 20 20 20 20 | SEC. | 00001EE0: 20 20 53 42 43 20 23 36 35 2D 31 30 0D 20 20 20 | SBC #65-10. | 00001EF0: 20 20 20 20 20 20 4A 4D 50 20 50 4F 4F 35 0D 50 | JMP POO5.P| 00001F00: 4F 4F 34 20 20 20 20 20 43 4D 50 20 23 22 3A 22 |OO4 CMP #":"| 00001F10: 0D 20 20 20 20 20 20 20 20 20 42 43 53 20 50 4F |. BCS PO| 00001F20: 4F 31 0D 20 20 20 20 20 20 20 20 20 53 45 43 0D |O1. SEC.| 00001F30: 20 20 20 20 20 20 20 20 20 53 42 43 20 23 24 33 | SBC #$3| 00001F40: 30 0D 50 4F 4F 35 20 20 20 20 20 53 54 41 20 50 |0.POO5 STA P| 00001F50: 4F 4F 30 2B 31 0D 20 20 20 20 20 20 20 20 20 4C |OO0+1. L| 00001F60: 44 41 20 50 4F 4F 30 0D 20 20 20 20 20 20 20 20 |DA POO0. | 00001F70: 20 4A 53 52 20 24 46 46 44 32 0D 20 20 20 20 20 | JSR $FFD2. | 00001F80: 20 20 20 20 4C 44 41 20 50 4F 4F 30 2B 31 0D 20 | LDA POO0+1. | 00001F90: 20 20 20 20 20 20 20 20 4C 44 58 20 50 4F 4F 30 | LDX POO0| 00001FA0: 2B 32 0D 20 20 20 20 20 20 20 20 20 52 54 53 0D |+2. RTS.| 00001FB0: 0D 0D 50 4F 4F 30 31 20 20 20 20 4C 44 41 20 23 |..POO01 LDA #| 00001FC0: 24 46 46 0D 20 20 20 20 20 20 20 20 20 52 54 53 |$FF. RTS| 00001FD0: 0D 0D 50 4F 4F 30 20 20 20 20 20 2E 42 59 54 45 |..POO0 .BYTE| 00001FE0: 20 24 30 30 2C 24 30 30 2C 24 30 30 0D 0D 46 54 | $00,$00,$00..FT| 00001FF0: 20 20 20 20 20 20 20 2E 42 59 54 45 20 24 30 30 | .BYTE $00| 00002000: 2C 24 30 30 0D 0D 0D 0D 0D 53 50 41 20 20 20 20 |,$00.....SPA | 00002010: 20 20 3D 20 2A 0D 20 20 20 20 20 20 20 20 20 2E | = *. .| 00002020: 42 59 54 45 20 31 33 2C 31 33 0D 20 20 20 20 20 |BYTE 13,13. | 00002030: 20 20 20 20 2E 54 45 58 54 20 22 9E 12 50 52 45 | .TEXT "..PRE| 00002040: 53 53 20 53 50 41 43 45 21 92 1E 22 0D 20 20 20 |SS SPACE!..". | 00002050: 20 20 20 20 20 20 2E 42 59 54 45 20 30 0D 0D 0D | .BYTE 0...| 00002060: 0D 4D 55 54 45 54 20 20 20 20 3D 20 2A 0D 20 20 |.MUTET = *. | 00002070: 20 20 20 20 20 20 20 2E 54 45 58 54 20 22 13 1E | .TEXT "..| 00002080: 22 0D 20 20 20 20 20 20 20 20 20 2E 54 45 58 54 |". .TEXT| 00002090: 20 22 20 20 4D 55 53 49 43 2D 53 45 4C 45 43 54 | " MUSIC-SELECT| 000020A0: 4F 52 22 0D 20 20 20 20 20 20 20 20 20 2E 54 45 |OR". .TE| 000020B0: 58 54 20 22 20 56 31 2E 30 20 42 59 20 4E 49 47 |XT " V1.0 BY NIG| 000020C0: 45 4C 2F 41 43 52 4F 53 53 21 22 0D 20 20 20 20 |EL/ACROSS!". | 000020D0: 20 20 20 20 20 2E 42 59 54 45 20 31 33 0D 20 20 | .BYTE 13. | 000020E0: 20 20 20 20 20 20 20 2E 54 45 58 54 20 22 20 20 | .TEXT " | 000020F0: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 22 0D |..............".| 00002100: 20 20 20 20 20 20 20 20 20 2E 54 45 58 54 20 22 | .TEXT "| 00002110: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 |................| 00002120: B7 B7 B7 B7 B7 B7 22 0D 20 20 20 20 20 20 20 20 |......". | 00002130: 20 2E 42 59 54 45 20 31 33 2C 31 33 0D 20 20 20 | .BYTE 13,13. | 00002140: 20 20 20 20 20 20 2E 54 45 58 54 20 22 46 49 4C | .TEXT "FIL| 00002150: 45 4E 41 4D 45 3A 20 20 20 20 20 20 20 20 20 20 |ENAME: | 00002160: 20 20 20 22 0D 20 20 20 20 20 20 20 20 20 2E 54 | ". .T| 00002170: 45 58 54 20 22 20 20 20 20 22 0D 20 20 20 20 20 |EXT " ". | 00002180: 20 20 20 20 2E 42 59 54 45 20 31 33 0D 20 20 20 | .BYTE 13. | 00002190: 20 20 20 20 20 20 2E 54 45 58 54 20 22 20 20 20 | .TEXT " | 000021A0: 20 20 20 20 20 20 20 B7 B7 B7 B7 B7 B7 B7 B7 B7 | .........| 000021B0: B7 B7 B7 22 0D 20 20 20 20 20 20 20 20 20 2E 54 |...". .T| 000021C0: 45 58 54 20 22 B7 B7 B7 B7 22 0D 20 20 20 20 20 |EXT "....". | 000021D0: 20 20 20 20 2E 42 59 54 45 20 31 33 2C 31 33 0D | .BYTE 13,13.| 000021E0: 20 20 20 20 20 20 20 20 20 2E 54 45 58 54 20 22 | .TEXT "| 000021F0: 5B 46 31 5D 20 4C 4F 41 44 20 4D 55 53 49 43 20 |[F1] LOAD MUSIC | 00002200: 28 24 31 30 30 30 2D 22 0D 20 20 20 20 20 20 20 |($1000-". | 00002210: 20 20 2E 54 45 58 54 20 22 24 31 46 46 46 29 20 | .TEXT "$1FFF) | 00002220: 28 24 3D 44 49 52 29 22 0D 20 20 20 20 20 20 20 |($=DIR)". | 00002230: 20 20 2E 42 59 54 45 20 31 33 0D 20 20 20 20 20 | .BYTE 13. | 00002240: 20 20 20 20 2E 54 45 58 54 20 22 5B 46 33 5D 20 | .TEXT "[F3] | 00002250: 45 4E 54 45 52 20 49 4E 49 54 2D 4A 53 52 2C 20 |ENTER INIT-JSR, | 00002260: 50 4C 22 0D 20 20 20 20 20 20 20 20 20 2E 54 45 |PL". .TE| 00002270: 58 54 20 22 41 59 45 52 20 45 54 43 2E 20 45 54 |XT "AYER ETC. ET| 00002280: 43 2E 22 0D 20 20 20 20 20 20 20 20 20 2E 42 59 |C.". .BY| 00002290: 54 45 20 31 33 0D 20 20 20 20 20 20 20 20 20 2E |TE 13. .| 000022A0: 54 45 58 54 20 22 5B 46 35 5D 20 54 45 53 54 20 |TEXT "[F5] TEST | 000022B0: 4D 55 53 49 43 22 0D 20 20 20 20 20 20 20 20 20 |MUSIC". | 000022C0: 2E 42 59 54 45 20 31 33 0D 20 20 20 20 20 20 20 |.BYTE 13. | 000022D0: 20 20 2E 42 59 54 45 20 30 0D 4D 55 52 45 32 20 | .BYTE 0.MURE2 | 000022E0: 20 20 20 3D 20 2A 0D 20 20 20 20 20 20 20 20 20 | = *. | 000022F0: 2E 54 45 58 54 20 22 5B 46 37 5D 20 5A 45 52 4F |.TEXT "[F7] ZERO| 00002300: 2D 46 49 4C 4C 20 24 31 30 30 30 2D 22 0D 20 20 |-FILL $1000-". | 00002310: 20 20 20 20 20 20 20 2E 54 45 58 54 20 22 24 31 | .TEXT "$1| 00002320: 46 46 46 22 0D 20 20 20 20 20 20 20 20 20 2E 42 |FFF". .B| 00002330: 59 54 45 20 31 33 0D 20 20 20 20 20 20 20 20 20 |YTE 13. | 00002340: 2E 54 45 58 54 20 22 5B 46 38 5D 20 43 4F 4E 54 |.TEXT "[F8] CONT| 00002350: 49 4E 55 45 22 0D 20 20 20 20 20 20 20 20 20 2E |INUE". .| 00002360: 54 45 58 54 20 22 13 22 0D 20 20 20 20 20 20 20 |TEXT ".". | 00002370: 20 20 2E 42 59 54 45 20 31 33 2C 31 33 2C 31 33 | .BYTE 13,13,13| 00002380: 0D 20 20 20 20 20 20 20 20 20 2E 54 45 58 54 20 |. .TEXT | 00002390: 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 0D 20 20 20 |"..........". | 000023A0: 20 20 20 20 20 20 2E 42 59 54 45 20 30 0D 0D 0D | .BYTE 0...| 000023B0: 0D 0D 0D 0D 43 41 4E 54 41 4C 20 20 20 2E 42 59 |....CANTAL .BY| 000023C0: 54 45 20 30 0D 0D 53 45 4C 49 4E 20 20 20 20 2E |TE 0..SELIN .| 000023D0: 42 59 54 45 20 30 0D 0D 0D 0D 4E 41 4D 45 31 20 |BYTE 0....NAME1 | 000023E0: 20 20 20 2E 42 59 54 45 20 30 0D 0D 4E 41 4D 45 | .BYTE 0..NAME| 000023F0: 20 20 20 20 20 3D 20 2A 0D 20 20 20 20 20 20 20 | = *. | 00002400: 20 20 2E 54 45 58 54 20 22 20 20 20 20 20 20 20 | .TEXT " | 00002410: 20 20 20 20 20 20 20 20 20 20 22 0D 0D 54 45 4D | "..TEM| 00002420: 55 4E 20 20 20 20 3D 20 2A 0D 20 20 20 20 20 20 |UN = *. | 00002430: 20 20 20 2E 54 45 58 54 20 22 13 99 22 0D 20 20 | .TEXT "..". | 00002440: 20 20 20 20 20 20 20 2E 42 59 54 45 20 31 33 2C | .BYTE 13,| 00002450: 31 33 2C 31 33 2C 31 33 2C 31 33 2C 31 33 2C 31 |13,13,13,13,13,1| 00002460: 33 2C 31 33 0D 20 20 20 20 20 20 20 20 20 2E 42 |3,13. .B| 00002470: 59 54 45 20 31 33 2C 31 33 2C 31 33 2C 31 33 0D |YTE 13,13,13,13.| 00002480: 20 20 20 20 20 20 20 20 20 2E 54 45 58 54 20 22 | .TEXT "| 00002490: 20 20 20 20 22 0D 20 20 20 20 20 20 20 20 20 2E | ". .| 000024A0: 54 45 58 54 20 22 50 52 45 53 53 20 53 50 41 43 |TEXT "PRESS SPAC| 000024B0: 45 20 54 4F 20 51 55 49 54 22 0D 20 20 20 20 20 |E TO QUIT". | 000024C0: 20 20 20 20 2E 54 45 58 54 20 22 20 54 48 45 20 | .TEXT " THE | 000024D0: 54 45 53 54 49 4E 47 21 1E 22 0D 20 20 20 20 20 |TESTING!.". | 000024E0: 20 20 20 20 2E 42 59 54 45 20 31 33 0D 20 20 20 | .BYTE 13. | 000024F0: 20 20 20 20 20 20 2E 42 59 54 45 20 30 0D 0D 0D | .BYTE 0...| 00002500: 4E 41 44 20 20 20 20 20 20 2E 42 59 54 45 20 24 |NAD .BYTE $| 00002510: 32 34 2C 24 30 30 0D 0D 43 4E 41 4D 45 20 20 20 |24,$00..CNAME | 00002520: 20 2E 54 45 58 54 20 22 20 20 20 20 20 20 20 20 | .TEXT " | 00002530: 20 20 20 20 20 20 20 20 20 20 20 20 22 0D 0D 54 | "..T| 00002540: 45 53 54 4D 55 20 20 20 3D 20 2A 0D 20 20 20 20 |ESTMU = *. | 00002550: 20 20 20 20 20 2E 54 45 58 54 20 22 13 1E 22 0D | .TEXT "..".| 00002560: 20 20 20 20 20 20 20 20 20 2E 42 59 54 45 20 31 | .BYTE 1| 00002570: 33 2C 31 33 2C 31 33 2C 31 33 2C 31 33 2C 31 33 |3,13,13,13,13,13| 00002580: 2C 31 33 2C 31 33 0D 20 20 20 20 20 20 20 20 20 |,13,13. | 00002590: 2E 42 59 54 45 20 31 33 2C 31 33 2C 31 33 2C 31 |.BYTE 13,13,13,1| 000025A0: 33 0D 20 20 20 20 20 20 20 20 20 2E 54 45 58 54 |3. .TEXT| 000025B0: 20 22 45 4E 54 45 52 20 49 4E 49 54 20 24 3A 20 | "ENTER INIT $: | 000025C0: 22 0D 20 20 20 20 20 20 20 20 20 2E 42 59 54 45 |". .BYTE| 000025D0: 20 30 0D 0D 54 45 53 54 4D 55 32 20 20 3D 20 2A | 0..TESTMU2 = *| 000025E0: 0D 20 20 20 20 20 20 20 20 20 2E 42 59 54 45 20 |. .BYTE | 000025F0: 31 33 0D 20 20 20 20 20 20 20 20 20 2E 54 45 58 |13. .TEX| 00002600: 54 20 22 44 4F 20 59 4F 55 20 4E 45 45 44 20 4C |T "DO YOU NEED L| 00002610: 44 41 2F 4C 44 59 2F 4C 44 58 22 0D 20 20 20 20 |DA/LDY/LDX". | 00002620: 20 20 20 20 20 2E 54 45 58 54 20 22 20 42 45 46 | .TEXT " BEF| 00002630: 4F 52 45 20 4A 53 52 20 28 12 59 92 2F 12 4E 92 |ORE JSR (.Y./.N.| 00002640: 29 22 0D 20 20 20 20 20 20 20 20 20 2E 42 59 54 |)". .BYT| 00002650: 45 20 30 0D 0D 54 45 53 54 4D 55 33 20 20 3D 20 |E 0..TESTMU3 = | 00002660: 2A 0D 0D 20 20 20 20 20 20 20 20 20 2E 54 45 58 |*.. .TEX| 00002670: 54 20 22 45 4E 54 45 52 20 4C 44 41 2F 4C 44 59 |T "ENTER LDA/LDY| 00002680: 2F 4C 44 58 20 24 3A A0 22 0D 20 20 20 20 20 20 |/LDX $:.". | 00002690: 20 20 20 2E 42 59 54 45 20 30 0D 0D 54 45 53 54 | .BYTE 0..TEST| 000026A0: 4D 55 34 20 20 3D 20 2A 0D 20 20 20 20 20 20 20 |MU4 = *. | 000026B0: 20 20 2E 42 59 54 45 20 31 33 0D 20 20 20 20 20 | .BYTE 13. | 000026C0: 20 20 20 20 2E 54 45 58 54 20 22 45 4E 54 45 52 | .TEXT "ENTER| 000026D0: 20 50 4C 41 59 45 52 20 24 3A 20 22 0D 20 20 20 | PLAYER $: ". | 000026E0: 20 20 20 20 20 20 2E 42 59 54 45 20 30 0D 0D | .BYTE 0.. |
....INITE = $0A00 ;STORE INIT-LDA+JS
R..PLAYA = $0B00 ;STORE PLAY-JSR...
*= $5000... ;START WITH
: JSR MUSIC..MUSIC = *....LOD3 =
*. SEI. LDA #$37.
STA $01. JSR $FF81. JS
R $FF84. JSR $FF8A. LDA
#1. STA $9D..LOD2.. LDA
#0. STA $D020. STA $D021
. LDA #<MUTET. LDY #>MUT
ET. JSR $AB1E. LDA #<MUR
E2. LDY #>MURE2. JSR $AB
1E.MUGET = *. JSR $FFE4.
CMP #".". BEQ LOD. C
MP #".". BEQ LDAYX. CMP
#".". BEQ MUTEST. CMP #"
.". BEQ ZEROF1. CMP #"."
. BEQ CONTI. JMP MUGET.M
UTEST JMP TESTI.LDAYX JMP NUMREST..
CONTI = *. RTS...ZEROF1 = *
. JSR ZEROF2. JMP LOD2..
..ZEROF2 = *. LDX #0.OP1.
LDA #0. STA $1000,X.
STA $1100,X. STA $1200,X.
STA $1300,X. STA $1400,X.
STA $1500,X. STA $1600,X.
STA $1700,X. STA $1800,X.
STA $1900,X. STA $1A00,
X. STA $1B00,X. STA $1C0
0,X. STA $1D00,X. STA $1
E00,X. STA $1F00,X. INC
$D020. INX. BNE OP1.
RTS...LOD1 = *.. LDA #<
MUTET. LDY #>MUTET. JSR
$AB1E. LDA #<MURE2. LDY
#>MURE2. JSR $AB1E.LOD = *.
JSR CINPUT. LDA CANTAL.
STA NAME1. LDX #0.RE12
LDA CNAME,X. STA NAME,X.
INX. CPX #16. BNE R
E12. LDA CNAME. CMP #36.
BEQ MUDIR. JSR LOAD.
JMP LOD2. RTS..MUDIR =
*. JSR $E544. JSR DIR.
LDA #<SPA. LDY #>SPA.
JSR $AB1E.TYS JSR $FFE4.
CMP #$20. BNE TYS.. J
SR $E544. LDA #$20. STA
CNAME. JMP LOD1. RTS...C
INPUT. LDA #0. STA CANTA
L. JSR C8.C1 JSR $FFE4.
BEQ C1. CMP #".".
BEQ C3. CMP #$0D. BEQ C4
. CMP #" ". BCS C2.
JMP C1.C2 CMP #"Z"+1.
BCS C1. LDY CANTAL. CPY
#16. BEQ C1. PHA.
LDA #".". JSR $FFD2. P
LA. JSR $FFD2. LDY CANTA
L. STA CNAME,Y. JSR C8.
INC CANTAL. JMP C1..C3
LDY CANTAL. CPY #0.
BEQ C1. DEC CANTAL. LDA
#".". JSR $FFD2. JSR $F
FD2. JSR C8. JMP C1..C4
LDA #".". JSR $FFD2.
LDA SELIN. CMP #1. BE
Q C5. CMP #2. BEQ C7.
RTS..C5 LDX CANTAL.
JSR C6. LDA #"S". STA CN
AME,X. INX. JSR C6.
LDA #"R". STA CNAME,X.
STX CANTAL. RTS..C7 LDX
CANTAL. JSR C6. LDA #"S
". STA CNAME,X. INX.
JSR C6. LDA #"W". S
TA CNAME,X. STX CANTAL.
RTS..C6 LDA #",". STA CNAM
E,X. INX. RTS..C8
LDA #".". JSR $FFD2. LDA
#" ". JSR $FFD2. LDA #"
.". JSR $FFD2. RTS......
..DIR = *.. LDA #$01.
LDY #>NAD. LDX #<NAD.
JSR $FFBD. LDA #$01. LD
X #$08. LDY #$00. JSR $F
FBA. JSR $FFC0. LDX #$01
. JSR $FFC6. LDY #5.NAD1
STY NAD+1. JSR $FFCF.
TAX. LDY NAD+1. DEY.
BNE NAD1. JSR $FFCF.
LDY $90. BNE NAD2.
JSR $BDCD. LDA #$20. JSR
$FFD2.NAD4 JSR $FFCF. STA N
AD+1. CMP #0. BEQ NAD3.
LDA NAD+1. JSR $FFD2.
JMP NAD4.NAD3 LDA #$0D.
JSR $FFD2. LDA $DC01.
CMP #239. BEQ NAD5. CMP
#$7F. BEQ NAD2.NAD7 LDY #$03
. JMP NAD1.NAD2 JSR $FFCC.
LDA #$01. JSR $FFC3.
RTS..NAD5 LDA $DC01. CMP
#239. BEQ NAD5..NAD6 LDA $D
C01. CMP #239. BNE NAD6.
.NAD8 LDA $DC01. CMP #239.
BEQ NAD8. JMP NAD7.......
LOAD = *.. LDX #$08.
LDA #$08. LDY #$08. JSR
$FFBA.. LDA NAME1. LDX
#<NAME. LDY #>NAME. JSR
$FFBD.. LDA #$00. LDX #$
FF. LDY #$FF. JSR $FFD5.
CMP #$04. BEQ ER.
RTS..ER. RTS..TESTI = *.
LDA #<TEMUN. LDY #>TEMUN.
JSR $AB1E. JSR INIT1.TR
Y JSR $FFE4. CMP #$20.
BEQ TRYS. JMP TRY.TRYS =
*. JMP MUSIC......INIT1 = *.
SEI. LDA #255.
STA $DD03. LDA #1. STA $
D01A. STA $DC0D. LDA #$1
B. STA $D011. LDA #<INT.
LDY #>INT. STA $0314.
STY $0315. LDA #146.
STA $D012.INU LDA #0. T
AX. TAY. JSR $1000.
NOP. NOP. NOP.
NOP. NOP. CLI.
RTS..INT = *. ROL $D019.
LDA #146. STA $D012.
NOP. NOP. NOP.
NOP. LDA #5. STA $D0
20.PAP JSR $1003. NOP.
NOP. NOP. LDA #0.
STA $D020. LDX $D41C.
STX $DD01. JMP $EA31...NUMRE
ST = *. LDA #<TESTMU. L
DY #>TESTMU. JSR $AB1E.
LDA #2. STA ANTAL. JSR H
W. LDA #<TESTMU2. LDY #>
TESTMU2. JSR $AB1E.WD JSR
$FFE4. CMP #"Y". BEQ LDA
T2. CMP #"N". BEQ PLAYE.
JMP WD.LDAT2 JMP LDAT.PLAYE
= *. LDA FT. STA INIT
12+1. LDA FT+1. STA INIT
12+2.PLEW LDX #0.POE2 LDA INIT11
,X. STA INU,X. STA INITE
,X. INX. CPX #7.
BNE POE2. LDX #0.RR1 LDA P
OQ,X. STA PLAYA,X. INX.
CPX #3. BNE RR1.
LDA #<TESTMU4. LDY #>TESTMU4.
JSR $AB1E. LDA #2.
STA ANTAL. JSR HW. LDA
FT. STA POQ+1. STA PAP+
1. LDA FT+1. STA POQ+2.
STA PAP+2. LDX #0.GFR45
LDA POQ,X. STA PLAYA,X.
INX. CPX #3. BNE GFR4
5. LDX #0. LDA #$20.WW.
STA $0400+(12*40),X. STA
$0400+(13*40),X. STA $0400+(14*
40),X. STA $0400+(15*40),X.
INX. CPX #40. BNE WW
. JMP LOD2.. BRK.
BRK.INIT11 LDA #0. TAY.
TAX.INIT12 JSR $1000. BRK.
. BRK.POQ JSR $1003.
BRK. BRK..LDAT = *.
LDA FT. STA INIT12+1.
LDA FT+1. STA INIT12+2..
LDA #1. STA ANTAL. LDA
#<TESTMU3. LDY #>TESTMU3.
JSR $AB1E. JSR HW. LDA
FT. STA INIT11+1. JMP P
LEW.........ANTAL .BYTE 2.HW..SS.
LDA ANTAL. SEC. SBC
#1. STA ANTAL. LDX ANTA
L.POO8 JSR POO7. CMP #$FF.
BEQ HW. ASL A. AS
L A. ASL A. ASL A.
STA FT,X. JSR POO7. C
MP #$FF. BEQ HW. CLC.
LDA FT,X. ADC POO0+1.
STA FT,X. DEX. CPX #
255. BNE POO8.POO11 JSR $FFE4
. BEQ POO11. CMP #".".
BEQ HW. RTS..POO7 STX
POO0+2.POO1 LDY #$00.POO2 JSR $
FFE4. BEQ POO2. STA POO0
. CMP #".". BEQ POO01.
CMP #"A". BCS POO3.
CMP #"0". BCS POO4. J
MP POO1.POO3 CMP #"G". BCS P
OO1. SEC. SBC #65-10.
JMP POO5.POO4 CMP #":".
BCS POO1. SEC. SBC #$3
0.POO5 STA POO0+1. LDA POO0.
JSR $FFD2. LDA POO0+1.
LDX POO0+2. RTS...POO01
LDA #$FF. RTS..POO0 .BYTE
$00,$00,$00..FT .BYTE $00,$00....
.SPA = *. .BYTE 13,13.
.TEXT "..PRESS SPACE!..". .B
YTE 0....MUTET = *. .TEXT "..
". .TEXT " MUSIC-SELECTOR".
.TEXT " V1.0 BY NIGEL/ACROSS!".
.BYTE 13. .TEXT " ........
......". .TEXT "................
......". .BYTE 13,13. .T
EXT "FILENAME: ". .T
EXT " ". .BYTE 13. .T
EXT " ............". .T
EXT "....". .BYTE 13,13.
.TEXT "[F1] LOAD MUSIC ($1000-".
.TEXT "$1FFF) ($=DIR)". .BYTE
13. .TEXT "[F3] ENTER INIT-JSR,
PL". .TEXT "AYER ETC. ETC.".
.BYTE 13. .TEXT "[F5] TEST
MUSIC". .BYTE 13. .BYTE
0.MURE2 = *. .TEXT "[F7] ZERO
-FILL $1000-". .TEXT "$1FFF".
.BYTE 13. .TEXT "[F8] CONT
INUE". .TEXT ".". .BYTE
13,13,13. .TEXT "..........".
.BYTE 0.......CANTAL .BYTE 0..SE
LIN .BYTE 0....NAME1 .BYTE 0..NAME
= *. .TEXT "
"..TEMUN = *. .TEXT "..".
.BYTE 13,13,13,13,13,13,13,13.
.BYTE 13,13,13,13. .TEXT "
". .TEXT "PRESS SPACE TO QUI
T". .TEXT " THE TESTING!.".
.BYTE 13. .BYTE 0...NAD
.BYTE $24,$00..CNAME .TEXT "
"..TESTMU = *. .TE
XT "..". .BYTE 13,13,13,13,13,13
,13,13. .BYTE 13,13,13,13.
.TEXT "ENTER INIT $: ". .BYTE
0..TESTMU2 = *. .BYTE 13.
.TEXT "DO YOU NEED LDA/LDY/LDX".
.TEXT " BEFORE JSR (.Y./.N.)".
.BYTE 0..TESTMU3 = *.. .TEX
T "ENTER LDA/LDY/LDX $: ". .BYTE
0..TESTMU4 = *. .BYTE 13.
.TEXT "ENTER PLAYER $: ". .B
YTE 0..
> CLICK IMAGE PREVIEW FOR FULL MODAL