3D-SCROLL.SRC
FILE INFORMATION
FILENAME(S): 3D-SCROLL.SRC
FILE TYPE(S): SEQ
FILE SIZE: 2.7K
FIRST SEEN: 2025-11-30 01:12:55
APPEARS ON: 1 disk(s)
FILE HASH
8830a76f85e872296f97fc3d0bce7be4fcbf7491433530ba90bbeee53c5ea9bd
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 10402 | 3D-SCROLL.SRC | SEQ | C64er | 24 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 0D 0D 2A 3D 24 38 30 30 30 0D 3B 0D 3B 20 2A 2A |..*=$8000.;.; **| 00000010: 2A 2A 20 45 58 54 45 52 4E 45 20 53 50 52 55 45 |** EXTERNE SPRUE| 00000020: 4E 47 45 20 2A 2A 2A 2A 20 0D 3B 0D 45 45 41 33 |NGE **** .;.EEA3| 00000030: 31 20 20 20 3D 24 45 41 33 31 0D 45 45 41 38 31 |1 =$EA31.EEA81| 00000040: 20 20 20 3D 24 45 41 38 31 0D 3B 0D 3B 20 2A 2A | =$EA81.;.; **| 00000050: 2A 2A 20 46 45 4C 44 45 52 20 2A 2A 2A 2A 20 0D |** FELDER **** .| 00000060: 3B 0D 46 32 30 30 30 20 20 20 3D 24 32 30 30 30 |;.F2000 =$2000| 00000070: 0D 46 32 30 38 30 20 20 20 3D 24 32 30 38 30 0D |.F2080 =$2080.| 00000080: 46 38 31 32 38 20 20 20 3D 24 38 31 32 38 0D 46 |F8128 =$8128.F| 00000090: 38 31 36 43 20 20 20 3D 24 38 31 36 43 0D 46 38 |816C =$816C.F8| 000000A0: 31 36 44 20 20 20 3D 24 38 31 36 44 0D 46 38 31 |16D =$816D.F81| 000000B0: 42 31 20 20 20 3D 24 38 31 42 31 0D 46 38 31 42 |B1 =$81B1.F81B| 000000C0: 32 20 20 20 3D 24 38 31 42 32 0D 3B 0D 3B 20 2A |2 =$81B2.;.; *| 000000D0: 2A 2A 2A 20 41 42 53 4F 4C 55 54 45 20 41 44 52 |*** ABSOLUTE ADR| 000000E0: 45 53 53 45 4E 20 2A 2A 2A 2A 20 0D 3B 0D 41 42 |ESSEN **** .;.AB| 000000F0: 30 20 20 20 20 20 3D 24 42 30 0D 41 42 31 20 20 |0 =$B0.AB1 | 00000100: 20 20 20 3D 24 42 31 0D 41 46 42 20 20 20 20 20 | =$B1.AFB | 00000110: 3D 24 46 42 0D 41 46 44 20 20 20 20 20 3D 24 46 |=$FB.AFD =$F| 00000120: 44 0D 41 46 45 20 20 20 20 20 3D 24 46 45 0D 41 |D.AFE =$FE.A| 00000130: 30 33 31 34 20 20 20 3D 24 30 33 31 34 0D 41 30 |0314 =$0314.A0| 00000140: 33 31 35 20 20 20 3D 24 30 33 31 35 0D 41 30 37 |315 =$0315.A07| 00000150: 46 38 20 20 20 3D 24 30 37 46 38 0D 41 44 30 30 |F8 =$07F8.AD00| 00000160: 30 20 20 20 3D 24 44 30 30 30 0D 41 44 30 30 31 |0 =$D000.AD001| 00000170: 20 20 20 3D 24 44 30 30 31 0D 41 44 30 31 30 20 | =$D001.AD010 | 00000180: 20 20 3D 24 44 30 31 30 0D 41 44 30 31 31 20 20 | =$D010.AD011 | 00000190: 20 3D 24 44 30 31 31 0D 41 44 30 31 32 20 20 20 | =$D011.AD012 | 000001A0: 3D 24 44 30 31 32 0D 41 44 30 31 35 20 20 20 3D |=$D012.AD015 =| 000001B0: 24 44 30 31 35 0D 41 44 30 31 39 20 20 20 3D 24 |$D015.AD019 =$| 000001C0: 44 30 31 39 0D 41 44 30 31 41 20 20 20 3D 24 44 |D019.AD01A =$D| 000001D0: 30 31 41 0D 41 44 30 31 42 20 20 20 3D 24 44 30 |01A.AD01B =$D0| 000001E0: 31 42 0D 41 44 30 31 43 20 20 20 3D 24 44 30 31 |1B.AD01C =$D01| 000001F0: 43 0D 41 44 30 32 30 20 20 20 3D 24 44 30 32 30 |C.AD020 =$D020| 00000200: 0D 41 44 30 32 31 20 20 20 3D 24 44 30 32 31 0D |.AD021 =$D021.| 00000210: 41 44 30 32 35 20 20 20 3D 24 44 30 32 35 0D 41 |AD025 =$D025.A| 00000220: 44 30 32 36 20 20 20 3D 24 44 30 32 36 0D 41 44 |D026 =$D026.AD| 00000230: 30 32 37 20 20 20 3D 24 44 30 32 37 0D 41 44 43 |027 =$D027.ADC| 00000240: 30 34 20 20 20 3D 24 44 43 30 34 0D 41 44 43 30 |04 =$DC04.ADC0| 00000250: 35 20 20 20 3D 24 44 43 30 35 0D 41 44 43 30 45 |5 =$DC05.ADC0E| 00000260: 20 20 20 3D 24 44 43 30 45 0D 3B 0D 3B 20 2A 2A | =$DC0E.;.; **| 00000270: 2A 2A 20 50 4F 49 4E 54 45 52 20 2A 2A 2A 2A 20 |** POINTER **** | 00000280: 0D 3B 0D 50 30 34 20 20 20 20 20 3D 24 30 34 0D |.;.P04 =$04.| 00000290: 3B 0D 3B 20 2A 2A 2A 2A 20 50 52 4F 47 52 41 4D |;.; **** PROGRAM| 000002A0: 4D 20 2A 2A 2A 2A 20 0D 3B 0D 3B 0D 20 20 20 20 |M **** .;.;. | 000002B0: 20 20 20 53 45 49 0D 20 20 20 20 20 20 20 4C 44 | SEI. LD| 000002C0: 41 20 41 44 30 31 42 0D 20 20 20 20 20 20 20 4F |A AD01B. O| 000002D0: 52 41 20 23 24 30 31 0D 20 20 20 20 20 20 20 53 |RA #$01. S| 000002E0: 54 41 20 41 44 30 31 42 0D 20 20 20 20 20 20 20 |TA AD01B. | 000002F0: 4C 44 59 20 23 24 30 30 0D 20 20 20 20 20 20 20 |LDY #$00. | 00000300: 53 54 59 20 41 44 30 32 30 0D 20 20 20 20 20 20 |STY AD020. | 00000310: 20 53 54 59 20 41 44 30 32 31 0D 20 20 20 20 20 | STY AD021. | 00000320: 20 20 53 54 59 20 41 46 42 0D 20 20 20 20 20 20 | STY AFB. | 00000330: 20 49 4E 59 0D 20 20 20 20 20 20 20 53 54 59 20 | INY. STY | 00000340: 41 44 43 30 45 0D 20 20 20 20 20 20 20 4C 44 41 |ADC0E. LDA| 00000350: 20 23 24 33 30 0D 49 38 30 31 39 20 20 53 54 41 | #$30.I8019 STA| 00000360: 20 41 46 45 0D 20 20 20 20 20 20 20 4C 44 41 20 | AFE. LDA | 00000370: 41 44 30 31 32 0D 20 20 20 20 20 20 20 45 4F 52 |AD012. EOR| 00000380: 20 41 44 43 30 34 0D 20 20 20 20 20 20 20 53 54 | ADC04. ST| 00000390: 41 20 46 38 31 32 37 2C 59 0D 20 20 20 20 20 20 |A F8127,Y. | 000003A0: 20 4F 52 41 20 41 44 43 30 35 0D 20 20 20 20 20 | ORA ADC05. | 000003B0: 20 20 41 4E 44 20 23 24 30 31 0D 20 20 20 20 20 | AND #$01. | 000003C0: 20 20 53 54 41 20 46 38 31 36 43 2C 59 0D 20 20 | STA F816C,Y. | 000003D0: 20 20 20 20 20 4C 44 41 20 41 46 45 0D 20 20 20 | LDA AFE. | 000003E0: 20 20 20 20 53 54 41 20 46 38 31 42 31 2C 59 0D | STA F81B1,Y.| 000003F0: 20 20 20 20 20 20 20 43 4C 43 0D 20 20 20 20 20 | CLC. | 00000400: 20 20 41 44 43 20 23 24 30 33 0D 20 20 20 20 20 | ADC #$03. | 00000410: 20 20 49 4E 59 0D 20 20 20 20 20 20 20 43 50 59 | INY. CPY| 00000420: 20 23 24 34 36 0D 20 20 20 20 20 20 20 42 4E 45 | #$46. BNE| 00000430: 20 49 38 30 31 39 0D 20 20 20 20 20 20 20 4A 53 | I8019. JS| 00000440: 52 20 49 38 31 30 36 0D 20 20 20 20 20 20 20 4C |R I8106. L| 00000450: 44 59 20 23 24 30 30 0D 20 20 20 20 20 20 20 54 |DY #$00. T| 00000460: 59 41 0D 20 20 20 20 20 20 20 53 54 41 20 41 44 |YA. STA AD| 00000470: 43 30 45 0D 49 38 30 34 32 20 20 53 54 41 20 46 |C0E.I8042 STA F| 00000480: 32 30 30 30 2C 59 0D 20 20 20 20 20 20 20 44 45 |2000,Y. DE| 00000490: 59 0D 20 20 20 20 20 20 20 42 4E 45 20 49 38 30 |Y. BNE I80| 000004A0: 34 32 0D 20 20 20 20 20 20 20 4C 44 58 20 23 24 |42. LDX #$| 000004B0: 30 30 0D 49 38 30 34 41 20 20 4C 44 41 20 46 38 |00.I804A LDA F8| 000004C0: 31 32 31 2C 59 0D 20 20 20 20 20 20 20 53 54 41 |121,Y. STA| 000004D0: 20 46 32 30 30 30 2C 58 0D 20 20 20 20 20 20 20 | F2000,X. | 000004E0: 4C 44 41 20 23 24 30 31 0D 20 20 20 20 20 20 20 |LDA #$01. | 000004F0: 53 54 41 20 46 32 30 38 30 2C 58 0D 20 20 20 20 |STA F2080,X. | 00000500: 20 20 20 54 58 41 0D 20 20 20 20 20 20 20 43 4C | TXA. CL| 00000510: 43 0D 20 20 20 20 20 20 20 41 44 43 20 23 24 30 |C. ADC #$0| 00000520: 39 0D 20 20 20 20 20 20 20 54 41 58 0D 20 20 20 |9. TAX. | 00000530: 20 20 20 20 49 4E 59 0D 20 20 20 20 20 20 20 43 | INY. C| 00000540: 50 59 20 23 24 30 37 0D 20 20 20 20 20 20 20 42 |PY #$07. B| 00000550: 4E 45 20 49 38 30 34 41 0D 20 20 20 20 20 20 20 |NE I804A. | 00000560: 49 4E 59 0D 20 20 20 20 20 20 20 53 54 59 20 41 |INY. STY A| 00000570: 42 31 0D 20 20 20 20 20 20 20 4C 44 41 20 23 24 |B1. LDA #$| 00000580: 31 42 0D 20 20 20 20 20 20 20 53 54 41 20 41 44 |1B. STA AD| 00000590: 30 31 31 0D 20 20 20 20 20 20 20 4C 44 41 20 23 |011. LDA #| 000005A0: 24 30 31 0D 20 20 20 20 20 20 20 53 54 41 20 41 |$01. STA A| 000005B0: 44 30 31 41 0D 20 20 20 20 20 20 20 4C 44 41 20 |D01A. LDA | 000005C0: 23 24 37 43 0D 20 20 20 20 20 20 20 53 54 41 20 |#$7C. STA | 000005D0: 41 30 33 31 34 0D 20 20 20 20 20 20 20 4C 44 41 |A0314. LDA| 000005E0: 20 23 24 38 30 0D 20 20 20 20 20 20 20 53 54 41 | #$80. STA| 000005F0: 20 41 30 33 31 35 0D 20 20 20 20 20 20 20 4C 44 | A0315. LD| 00000600: 41 20 23 24 34 35 0D 20 20 20 20 20 20 20 53 54 |A #$45. ST| 00000610: 41 20 41 42 30 0D 20 20 20 20 20 20 20 43 4C 49 |A AB0. CLI| 00000620: 0D 20 20 20 20 20 20 20 52 54 53 0D 20 20 20 20 |. RTS. | 00000630: 20 20 20 49 4E 43 20 41 44 30 31 39 0D 20 20 20 | INC AD019. | 00000640: 20 20 20 20 4C 44 41 20 41 42 30 0D 20 20 20 20 | LDA AB0. | 00000650: 20 20 20 43 4D 50 20 23 24 34 36 0D 20 20 20 20 | CMP #$46. | 00000660: 20 20 20 42 43 53 20 49 38 30 42 39 0D 49 38 30 | BCS I80B9.I80| 00000670: 38 35 20 20 4C 44 41 20 41 46 45 0D 20 20 20 20 |85 LDA AFE. | 00000680: 20 20 20 53 54 41 20 41 30 37 46 38 0D 20 20 20 | STA A07F8. | 00000690: 20 20 20 20 4C 44 41 20 41 44 30 31 35 0D 20 20 | LDA AD015. | 000006A0: 20 20 20 20 20 4F 52 41 20 23 24 30 31 0D 20 20 | ORA #$01. | 000006B0: 20 20 20 20 20 53 54 41 20 41 44 30 31 35 0D 20 | STA AD015. | 000006C0: 20 20 20 20 20 20 4C 44 59 20 41 46 42 0D 20 20 | LDY AFB. | 000006D0: 20 20 20 20 20 4C 44 41 20 46 38 31 32 38 2C 59 | LDA F8128,Y| 000006E0: 0D 20 20 20 20 20 20 20 53 54 41 20 41 44 30 30 |. STA AD00| 000006F0: 30 0D 20 20 20 20 20 20 20 4C 44 41 20 41 44 30 |0. LDA AD0| 00000700: 31 30 0D 20 20 20 20 20 20 20 41 4E 44 20 23 24 |10. AND #$| 00000710: 46 45 0D 20 20 20 20 20 20 20 4F 52 41 20 46 38 |FE. ORA F8| 00000720: 31 36 44 2C 59 0D 20 20 20 20 20 20 20 53 54 41 |16D,Y. STA| 00000730: 20 41 44 30 31 30 0D 20 20 20 20 20 20 20 4C 44 | AD010. LD| 00000740: 58 20 46 38 31 42 32 2C 59 0D 20 20 20 20 20 20 |X F81B2,Y. | 00000750: 20 53 54 58 20 41 44 30 31 32 0D 20 20 20 20 20 | STX AD012. | 00000760: 20 20 44 45 58 0D 20 20 20 20 20 20 20 53 54 58 | DEX. STX| 00000770: 20 41 44 30 30 31 0D 20 20 20 20 20 20 20 49 4E | AD001. IN| 00000780: 43 20 41 46 42 0D 20 20 20 20 20 20 20 49 4E 59 |C AFB. INY| 00000790: 0D 20 20 20 20 20 20 20 43 50 59 20 41 42 30 0D |. CPY AB0.| 000007A0: 20 20 20 20 20 20 20 42 45 51 20 49 38 30 43 30 | BEQ I80C0| 000007B0: 0D 20 20 20 20 20 20 20 4A 4D 50 20 45 45 41 38 |. JMP EEA8| 000007C0: 31 0D 49 38 30 42 39 20 20 4C 44 41 20 23 24 34 |1.I80B9 LDA #$4| 000007D0: 35 0D 20 20 20 20 20 20 20 53 54 41 20 41 42 30 |5. STA AB0| 000007E0: 0D 20 20 20 20 20 20 20 4A 4D 50 20 49 38 30 38 |. JMP I808| 000007F0: 35 0D 49 38 30 43 30 20 20 49 4E 43 20 41 30 37 |5.I80C0 INC A07| 00000800: 46 38 0D 20 20 20 20 20 20 20 4C 44 41 20 41 42 |F8. LDA AB| 00000810: 31 0D 20 20 20 20 20 20 20 43 4D 50 20 23 24 30 |1. CMP #$0| 00000820: 38 0D 20 20 20 20 20 20 20 42 4E 45 20 49 38 30 |8. BNE I80| 00000830: 43 46 0D 20 20 20 20 20 20 20 4A 53 52 20 49 38 |CF. JSR I8| 00000840: 31 30 36 0D 20 20 20 20 20 20 20 4A 4D 50 20 49 |106. JMP I| 00000850: 38 30 44 42 0D 49 38 30 43 46 20 20 4C 44 41 20 |80DB.I80CF LDA | 00000860: 41 44 30 31 43 0D 20 20 20 20 20 20 20 41 4E 44 |AD01C. AND| 00000870: 20 23 24 46 45 0D 20 20 20 20 20 20 20 53 54 41 | #$FE. STA| 00000880: 20 41 44 30 31 43 0D 20 20 20 20 20 20 20 4C 44 | AD01C. LD| 00000890: 41 20 23 24 38 32 0D 20 20 20 20 20 20 20 53 54 |A #$82. ST| 000008A0: 41 20 41 46 45 0D 49 38 30 44 42 20 20 4C 44 59 |A AFE.I80DB LDY| 000008B0: 20 23 24 30 30 0D 20 20 20 20 20 20 20 53 54 59 | #$00. STY| 000008C0: 20 41 46 42 0D 20 20 20 20 20 20 20 4C 44 58 20 | AFB. LDX | 000008D0: 23 24 30 31 0D 49 38 30 45 31 20 20 54 58 41 0D |#$01.I80E1 TXA.| 000008E0: 20 20 20 20 20 20 20 43 4C 43 0D 20 20 20 20 20 | CLC. | 000008F0: 20 20 41 44 43 20 46 38 31 32 38 2C 59 0D 20 20 | ADC F8128,Y. | 00000900: 20 20 20 20 20 42 43 43 20 49 38 30 46 34 0D 20 | BCC I80F4. | 00000910: 20 20 20 20 20 20 53 54 41 20 41 46 44 0D 20 20 | STA AFD. | 00000920: 20 20 20 20 20 4C 44 41 20 46 38 31 36 44 2C 59 | LDA F816D,Y| 00000930: 0D 20 20 20 20 20 20 20 45 4F 52 20 23 24 30 31 |. EOR #$01| 00000940: 0D 20 20 20 20 20 20 20 53 54 41 20 46 38 31 36 |. STA F816| 00000950: 44 2C 59 0D 20 20 20 20 20 20 20 4C 44 41 20 41 |D,Y. LDA A| 00000960: 46 44 0D 49 38 30 46 34 20 20 53 54 41 20 46 38 |FD.I80F4 STA F8| 00000970: 31 32 38 2C 59 0D 20 20 20 20 20 20 20 49 4E 58 |128,Y. INX| 00000980: 0D 20 20 20 20 20 20 20 43 50 58 20 41 42 31 0D |. CPX AB1.| 00000990: 20 20 20 20 20 20 20 42 4E 45 20 49 38 30 46 45 | BNE I80FE| 000009A0: 0D 20 20 20 20 20 20 20 4C 44 58 20 23 24 30 31 |. LDX #$01| 000009B0: 0D 49 38 30 46 45 20 20 49 4E 59 0D 20 20 20 20 |.I80FE INY. | 000009C0: 20 20 20 43 50 59 20 41 42 30 0D 20 20 20 20 20 | CPY AB0. | 000009D0: 20 20 42 4E 45 20 49 38 30 45 31 0D 20 20 20 20 | BNE I80E1. | 000009E0: 20 20 20 4A 4D 50 20 45 45 41 33 31 0D 49 38 31 | JMP EEA31.I81| 000009F0: 30 36 20 20 4C 44 41 20 41 44 30 31 43 0D 20 20 |06 LDA AD01C. | 00000A00: 20 20 20 20 20 4F 52 41 20 23 24 30 31 0D 20 20 | ORA #$01. | 00000A10: 20 20 20 20 20 53 54 41 20 41 44 30 31 43 0D 20 | STA AD01C. | 00000A20: 20 20 20 20 20 20 4C 44 41 20 23 24 30 46 0D 20 | LDA #$0F. | 00000A30: 20 20 20 20 20 20 53 54 41 20 41 44 30 32 37 0D | STA AD027.| 00000A40: 20 20 20 20 20 20 20 4C 44 59 20 23 24 30 43 0D | LDY #$0C.| 00000A50: 20 20 20 20 20 20 20 53 54 59 20 41 44 30 32 36 | STY AD026| 00000A60: 0D 20 20 20 20 20 20 20 44 45 59 0D 20 20 20 20 |. DEY. | 00000A70: 20 20 20 53 54 59 20 41 44 30 32 35 0D 20 20 20 | STY AD025. | 00000A80: 20 20 20 20 4C 44 41 20 23 24 38 30 0D 20 20 20 | LDA #$80. | 00000A90: 20 20 20 20 53 54 41 20 41 46 45 0D 20 20 20 20 | STA AFE. | 00000AA0: 20 20 20 52 54 53 0D 46 38 31 32 31 20 20 4F 52 | RTS.F8121 OR| 00000AB0: 41 20 28 50 30 34 2C 58 29 0D 20 20 20 20 20 20 |A (P04,X). | 00000AC0: 20 52 54 49 0D 3B 0D 20 20 20 20 20 20 20 2E 42 | RTI.;. .B| 00000AD0: 59 54 45 20 24 30 33 2C 24 33 30 2C 24 38 30 3B |YTE $03,$30,$80;| 00000AE0: 22 03 30 80 0D 46 38 31 32 37 20 20 2E 42 59 54 |".0..F8127 .BYT| 00000AF0: 45 20 24 30 38 0D |E $08. |
..*=$8000.;.; **** EXTERNE SPRUENGE ****
.;.EEA31 =$EA31.EEA81 =$EA81.;.; **
** FELDER **** .;.F2000 =$2000.F2080
=$2080.F8128 =$8128.F816C =$816C.F8
16D =$816D.F81B1 =$81B1.F81B2 =$81
B2.;.; **** ABSOLUTE ADRESSEN **** .;.AB
0 =$B0.AB1 =$B1.AFB =$FB.AFD
=$FD.AFE =$FE.A0314 =$0314.A0
315 =$0315.A07F8 =$07F8.AD000 =$D0
00.AD001 =$D001.AD010 =$D010.AD011
=$D011.AD012 =$D012.AD015 =$D015.AD
019 =$D019.AD01A =$D01A.AD01B =$D0
1B.AD01C =$D01C.AD020 =$D020.AD021
=$D021.AD025 =$D025.AD026 =$D026.AD
027 =$D027.ADC04 =$DC04.ADC05 =$DC
05.ADC0E =$DC0E.;.; **** POINTER ****
.;.P04 =$04.;.; **** PROGRAMM **** .
;.;. SEI. LDA AD01B. O
RA #$01. STA AD01B. LDY #$00
. STY AD020. STY AD021.
STY AFB. INY. STY ADC0E.
LDA #$30.I8019 STA AFE. LDA
AD012. EOR ADC04. STA F8127,
Y. ORA ADC05. AND #$01.
STA F816C,Y. LDA AFE. STA
F81B1,Y. CLC. ADC #$03.
INY. CPY #$46. BNE I8019.
JSR I8106. LDY #$00. T
YA. STA ADC0E.I8042 STA F2000,Y.
DEY. BNE I8042. LDX #$
00.I804A LDA F8121,Y. STA F2000,X
. LDA #$01. STA F2080,X.
TXA. CLC. ADC #$09.
TAX. INY. CPY #$07. B
NE I804A. INY. STY AB1.
LDA #$1B. STA AD011. LDA #
$01. STA AD01A. LDA #$7C.
STA A0314. LDA #$80. STA
A0315. LDA #$45. STA AB0.
CLI. RTS. INC AD019.
LDA AB0. CMP #$46. BCS I
80B9.I8085 LDA AFE. STA A07F8.
LDA AD015. ORA #$01. STA
AD015. LDY AFB. LDA F8128,Y
. STA AD000. LDA AD010.
AND #$FE. ORA F816D,Y. STA
AD010. LDX F81B2,Y. STX AD0
12. DEX. STX AD001. IN
C AFB. INY. CPY AB0. B
EQ I80C0. JMP EEA81.I80B9 LDA #$4
5. STA AB0. JMP I8085.I80C0
INC A07F8. LDA AB1. CMP #$0
8. BNE I80CF. JSR I8106.
JMP I80DB.I80CF LDA AD01C. AND
#$FE. STA AD01C. LDA #$82.
STA AFE.I80DB LDY #$00. STY
AFB. LDX #$01.I80E1 TXA. C
LC. ADC F8128,Y. BCC I80F4.
STA AFD. LDA F816D,Y.
EOR #$01. STA F816D,Y. LDA A
FD.I80F4 STA F8128,Y. INX.
CPX AB1. BNE I80FE. LDX #$01
.I80FE INY. CPY AB0. BNE I8
0E1. JMP EEA31.I8106 LDA AD01C.
ORA #$01. STA AD01C. LD
A #$0F. STA AD027. LDY #$0C.
STY AD026. DEY. STY A
D025. LDA #$80. STA AFE.
RTS.F8121 ORA (P04,X). RTI.;.
.BYTE $03,$30,$80;".0..F8127 .BYT
E $08.
> CLICK IMAGE PREVIEW FOR FULL MODAL