SPRIFI.ASM
FILE INFORMATION
FILENAME(S): SPRIFI.ASM
FILE TYPE(S): SEQ
FILE SIZE: 2.9K
FIRST SEEN: 2025-11-30 21:26:27
APPEARS ON: 1 disk(s)
FILE HASH
c0b9d9640aabbad76aec0a28fe5651090340ad877112113d47588e54f47fb732
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TESTFILES 3 | SPRIFI.ASM | SEQ | DuncanTwain | 19 | 7 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 20 20 20 20 20 20 20 20 20 2A 3D 33 32 35 31 32 | *=32512| 00000010: 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. | 00000020: 20 20 20 3B 0D 20 20 20 20 20 20 20 20 20 20 20 | ;. | 00000030: 20 20 20 20 20 20 20 3B 53 50 52 49 54 45 46 49 | ;SPRITEFI| 00000040: 58 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 |X.. | 00000050: 20 20 20 20 20 3B 4C 49 4E 4B 53 42 4F 56 45 4E | ;LINKSBOVEN| 00000060: 3A 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |:. | 00000070: 20 20 20 20 3B 59 3D 28 37 30 30 29 2E 0D 20 20 | ;Y=(700).. | 00000080: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000090: 3B 58 3D 28 37 30 32 2C 37 30 31 29 2E 0D 20 20 |;X=(702,701).. | 000000A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000000B0: 3B 53 49 4D 2E 42 41 53 2E 27 4D 4D 4F 42 27 2E |;SIM.BAS.'MMOB'.| 000000C0: 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. | 000000D0: 20 20 20 3B 53 50 52 49 54 45 4E 52 2E 28 37 30 | ;SPRITENR.(70| 000000E0: 33 29 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 |3).. | 000000F0: 20 20 20 20 20 20 3B 28 37 30 34 29 3A 0D 20 20 | ;(704):. | 00000100: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000110: 3B 20 30 20 2D 20 50 4F 45 54 53 2E 0D 20 20 20 |; 0 - POETS.. | 00000120: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3B | ;| 00000130: 20 31 20 2D 20 5A 45 54 2E 0D 20 20 20 20 20 20 | 1 - ZET.. | 00000140: 20 20 20 20 20 20 20 20 20 20 20 20 3B 0D 20 20 | ;. | 00000150: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000160: 3B 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |;. | 00000170: 20 20 20 20 3B 0D 20 20 20 20 20 20 4C 44 41 20 | ;. LDA | 00000180: 20 35 36 33 33 34 20 20 3B 47 45 45 4E 20 54 49 | 56334 ;GEEN TI| 00000190: 4D 45 52 2D 0D 20 20 20 20 20 20 41 4E 44 20 23 |MER-. AND #| 000001A0: 32 35 34 20 20 20 20 3B 49 4E 54 45 52 52 55 50 |254 ;INTERRUP| 000001B0: 54 53 2E 0D 20 20 20 20 20 20 53 54 41 20 20 35 |TS.. STA 5| 000001C0: 36 33 33 34 0D 20 20 20 20 20 20 4C 44 41 20 23 |6334. LDA #| 000001D0: 30 30 30 20 20 20 20 3B 47 30 3D 30 2E 0D 20 20 |000 ;G0=0.. | 000001E0: 20 20 20 20 53 54 41 20 20 32 35 31 0D 20 20 20 | STA 251. | 000001F0: 20 20 20 43 4C 43 20 20 20 20 20 20 20 20 20 3B | CLC ;| 00000200: 4E 55 4D 4D 45 52 20 50 4C 55 53 0D 20 20 20 20 |NUMMER PLUS. | 00000210: 20 20 4C 44 41 20 20 30 30 37 30 33 20 20 3B 4F | LDA 00703 ;O| 00000220: 46 46 53 45 54 20 28 36 37 39 29 2E 0D 20 20 20 |FFSET (679).. | 00000230: 20 20 20 41 44 43 20 20 30 30 36 37 39 20 20 3B | ADC 00679 ;| 00000240: 4D 41 41 4C 20 34 2E 0D 20 20 20 20 20 20 2E 42 |MAAL 4.. .B| 00000250: 59 54 45 20 24 36 41 20 20 20 3B 20 3D 20 52 4F |YTE $6A ; = RO| 00000260: 52 2E 0D 20 20 20 20 20 20 52 4F 52 20 20 32 35 |R.. ROR 25| 00000270: 31 0D 20 20 20 20 20 20 2E 42 59 54 45 20 24 36 |1. .BYTE $6| 00000280: 41 20 20 20 3B 20 3D 20 52 4F 52 2E 0D 20 20 20 |A ; = ROR.. | 00000290: 20 20 20 52 4F 52 20 20 32 35 31 20 20 20 20 3B | ROR 251 ;| 000002A0: 42 49 4A 54 45 4C 4C 45 4E 0D 20 20 20 20 20 20 |BIJTELLEN. | 000002B0: 41 44 43 20 20 30 30 36 38 30 20 20 3B 4D 53 20 |ADC 00680 ;MS | 000002C0: 42 45 47 49 4E 41 44 52 45 53 0D 20 20 20 20 20 |BEGINADRES. | 000002D0: 20 53 54 41 20 20 32 35 32 20 20 20 20 3B 53 50 | STA 252 ;SP| 000002E0: 52 49 54 45 42 4C 4F 4B 4B 45 4E 2E 0D 20 20 20 |RITEBLOKKEN.. | 000002F0: 20 20 20 53 45 43 0D 20 20 20 20 20 20 4C 44 41 | SEC. LDA| 00000300: 20 20 30 30 37 30 31 20 20 3B 58 20 2D 20 32 34 | 00701 ;X - 24| 00000310: 2E 0D 20 20 20 20 20 20 53 42 43 20 23 30 32 34 |.. SBC #024| 00000320: 0D 20 20 20 20 20 20 53 54 41 20 20 31 30 31 0D |. STA 101.| 00000330: 20 20 20 20 20 20 41 4E 44 20 23 30 30 37 0D 20 | AND #007. | 00000340: 20 20 20 20 20 53 54 41 20 20 31 30 36 20 20 20 | STA 106 | 00000350: 20 3B 58 49 2E 0D 20 20 20 20 20 20 45 4F 52 20 | ;XI.. EOR | 00000360: 20 31 30 31 0D 20 20 20 20 20 20 53 54 41 20 20 | 101. STA | 00000370: 32 35 33 20 20 20 20 3B 38 20 2A 20 4B 2E 0D 20 |253 ;8 * K.. | 00000380: 20 20 20 20 20 4C 44 41 20 20 30 30 37 30 32 0D | LDA 00702.| 00000390: 20 20 20 20 20 20 53 42 43 20 23 30 30 30 0D 20 | SBC #000. | 000003A0: 20 20 20 20 20 53 54 41 20 20 31 30 32 0D 20 20 | STA 102. | 000003B0: 20 20 20 20 53 45 43 0D 20 20 20 20 20 20 4C 44 | SEC. LD| 000003C0: 41 20 20 30 30 37 30 30 20 20 3B 59 20 2D 20 35 |A 00700 ;Y - 5| 000003D0: 30 2E 0D 20 20 20 20 20 20 53 42 43 20 23 30 35 |0.. SBC #05| 000003E0: 30 0D 20 20 20 20 20 20 53 54 41 20 20 31 30 30 |0. STA 100| 000003F0: 0D 20 20 20 20 20 20 41 4E 44 20 23 30 30 37 0D |. AND #007.| 00000400: 20 20 20 20 20 20 53 54 41 20 20 31 30 37 20 20 | STA 107 | 00000410: 20 20 3B 59 49 2E 0D 20 20 20 20 20 20 45 4F 52 | ;YI.. EOR| 00000420: 20 20 31 30 30 0D 20 20 20 20 20 20 2E 42 59 54 | 100. .BYT| 00000430: 45 20 24 34 41 20 20 20 3B 20 3D 20 4C 53 52 2E |E $4A ; = LSR.| 00000440: 0D 20 20 20 20 20 20 53 54 41 20 20 32 35 34 20 |. STA 254 | 00000450: 20 20 20 3B 34 20 2A 20 4C 2E 0D 20 20 20 20 20 | ;4 * L.. | 00000460: 20 2E 42 59 54 45 20 24 34 41 20 20 20 3B 20 3D | .BYTE $4A ; =| 00000470: 20 4C 53 52 2E 0D 20 20 20 20 20 20 2E 42 59 54 | LSR.. .BYT| 00000480: 45 20 24 34 41 20 20 20 3B 20 3D 20 4C 53 52 2E |E $4A ; = LSR.| 00000490: 0D 20 20 20 20 20 20 41 44 43 20 20 32 35 34 0D |. ADC 254.| 000004A0: 20 20 20 20 20 20 53 54 41 20 20 32 35 34 20 20 | STA 254 | 000004B0: 20 20 3B 35 20 2A 20 4C 2E 0D 20 20 20 20 20 20 | ;5 * L.. | 000004C0: 4C 44 41 20 23 30 30 30 0D 20 20 20 20 20 20 52 |LDA #000. R| 000004D0: 4F 52 20 20 32 35 34 0D 20 20 20 20 20 20 2E 42 |OR 254. .B| 000004E0: 59 54 45 20 24 36 41 20 20 20 3B 20 3D 20 52 4F |YTE $6A ; = RO| 000004F0: 52 2E 0D 20 20 20 20 20 20 52 4F 52 20 20 32 35 |R.. ROR 25| 00000500: 34 0D 20 20 20 20 20 20 2E 42 59 54 45 20 24 36 |4. .BYTE $6| 00000510: 41 20 20 20 3B 20 3D 20 52 4F 52 2E 0D 20 20 20 |A ; = ROR.. | 00000520: 20 20 20 41 44 43 20 20 32 35 33 0D 20 20 20 20 | ADC 253. | 00000530: 20 20 53 54 41 20 20 32 35 33 20 20 20 20 3B 42 | STA 253 ;B| 00000540: 30 2E 0D 20 20 20 20 20 20 4C 44 41 20 20 32 35 |0.. LDA 25| 00000550: 34 20 20 20 20 3B 42 31 2E 0D 20 20 20 20 20 20 |4 ;B1.. | 00000560: 41 44 43 20 20 31 30 32 20 20 20 20 3B 58 48 20 |ADC 102 ;XH | 00000570: 45 52 42 49 4A 2E 0D 20 20 20 20 20 20 41 44 43 |ERBIJ.. ADC| 00000580: 20 20 30 30 36 38 31 20 20 3B 42 45 47 49 4E 41 | 00681 ;BEGINA| 00000590: 44 52 45 53 0D 20 20 20 20 20 20 53 54 41 20 20 |DRES. STA | 000005A0: 32 35 34 20 20 20 20 3B 48 49 52 45 53 20 45 52 |254 ;HIRES ER| 000005B0: 42 49 4A 2E 0D 20 20 20 20 20 20 4C 44 41 20 20 |BIJ.. LDA | 000005C0: 30 30 31 20 20 20 20 3B 48 49 52 41 4D 20 49 4E |001 ;HIRAM IN| 000005D0: 2E 0D 20 20 20 20 20 20 41 4E 44 20 23 32 35 33 |.. AND #253| 000005E0: 0D 20 20 20 20 20 20 53 54 41 20 20 30 30 31 0D |. STA 001.| 000005F0: 20 20 20 20 20 20 4C 44 59 20 23 30 30 30 0D 53 | LDY #000.S| 00000600: 46 30 30 31 20 4C 44 58 20 23 30 30 30 20 20 20 |F001 LDX #000 | 00000610: 20 3B 4F 50 48 41 4C 45 4E 20 56 41 4E 0D 53 46 | ;OPHALEN VAN.SF| 00000620: 30 30 32 20 4C 44 41 20 28 32 35 31 29 2C 59 20 |002 LDA (251),Y | 00000630: 3B 53 50 52 49 54 45 52 45 47 45 4C 0D 20 20 20 |;SPRITEREGEL. | 00000640: 20 20 20 53 54 41 20 20 31 30 39 2C 58 20 20 3B | STA 109,X ;| 00000650: 4E 41 41 52 20 31 30 39 2E 2E 31 31 31 2E 0D 20 |NAAR 109..111.. | 00000660: 20 20 20 20 20 49 4E 59 0D 20 20 20 20 20 20 49 | INY. I| 00000670: 4E 58 0D 20 20 20 20 20 20 43 50 58 20 23 30 30 |NX. CPX #00| 00000680: 33 20 20 20 20 3B 44 52 49 45 20 53 54 55 4B 53 |3 ;DRIE STUKS| 00000690: 2E 0D 20 20 20 20 20 20 42 43 43 20 20 53 46 30 |.. BCC SF0| 000006A0: 30 32 0D 20 20 20 20 20 20 53 54 59 20 20 31 30 |02. STY 10| 000006B0: 38 20 20 20 20 3B 45 56 45 4E 20 49 4E 20 53 53 |8 ;EVEN IN SS| 000006C0: 2E 0D 20 20 20 20 20 20 4C 44 58 20 20 31 30 36 |.. LDX 106| 000006D0: 20 20 20 20 3B 58 49 20 57 45 45 52 2E 0D 20 20 | ;XI WEER.. | 000006E0: 20 20 20 20 4C 44 41 20 23 30 30 30 20 20 20 20 | LDA #000 | 000006F0: 3B 52 45 43 48 54 53 20 30 30 30 30 2E 0D 20 20 |;RECHTS 0000.. | 00000700: 20 20 20 20 42 45 51 20 20 53 46 30 30 34 20 20 | BEQ SF004 | 00000710: 3B 45 56 45 4E 20 2D 2D 3E 5B 53 46 30 30 34 5D |;EVEN -->[SF004]| 00000720: 0D 53 46 30 30 33 20 4C 53 52 20 20 31 30 39 20 |.SF003 LSR 109 | 00000730: 20 20 20 3B 53 43 48 55 49 46 20 44 45 20 48 45 | ;SCHUIF DE HE| 00000740: 4C 45 0D 20 20 20 20 20 20 52 4F 52 20 20 31 31 |LE. ROR 11| 00000750: 30 20 20 20 20 3B 52 49 4A 20 4D 45 54 20 28 41 |0 ;RIJ MET (A| 00000760: 29 20 4E 41 2E 0D 20 20 20 20 20 20 52 4F 52 20 |) NA.. ROR | 00000770: 20 31 31 31 0D 20 20 20 20 20 20 2E 42 59 54 45 | 111. .BYTE| 00000780: 20 24 36 41 20 20 20 3B 20 3D 20 52 4F 52 2E 0D | $6A ; = ROR..| 00000790: 53 46 30 30 34 20 44 45 58 0D 20 20 20 20 20 20 |SF004 DEX. | 000007A0: 42 50 4C 20 20 53 46 30 30 33 0D 20 20 20 20 20 |BPL SF003. | 000007B0: 20 53 54 41 20 20 31 31 32 20 20 20 20 3B 4C 41 | STA 112 ;LA| 000007C0: 41 54 53 54 45 20 49 4E 20 31 31 32 2E 0D 20 20 |ATSTE IN 112.. | 000007D0: 20 20 20 20 4C 44 58 20 23 30 30 30 0D 20 20 20 | LDX #000. | 000007E0: 20 20 20 4C 44 59 20 20 31 30 37 20 20 20 20 3B | LDY 107 ;| 000007F0: 59 49 20 57 45 45 52 2E 0D 53 46 30 30 35 20 4C |YI WEER..SF005 L| 00000800: 44 41 20 20 30 30 37 30 34 20 20 3B 5A 45 54 2F |DA 00704 ;ZET/| 00000810: 57 49 53 2E 0D 20 20 20 20 20 20 2E 42 59 54 45 |WIS.. .BYTE| 00000820: 20 24 34 41 20 20 20 3B 20 3D 20 4C 53 52 2E 0D | $4A ; = LSR..| 00000830: 20 20 20 20 20 20 4C 44 41 20 20 31 30 39 2C 58 | LDA 109,X| 00000840: 0D 20 20 20 20 20 20 42 43 43 20 20 53 46 30 30 |. BCC SF00| 00000850: 36 0D 20 20 20 20 20 20 4F 52 41 20 28 32 35 33 |6. ORA (253| 00000860: 29 2C 59 20 3B 31 3D 5A 45 54 2E 0D 20 20 20 20 |),Y ;1=ZET.. | 00000870: 20 20 42 43 53 20 20 53 46 30 30 37 0D 53 46 30 | BCS SF007.SF0| 00000880: 30 36 20 45 4F 52 20 23 32 35 35 20 20 20 20 3B |06 EOR #255 ;| 00000890: 30 3D 57 49 53 2E 0D 20 20 20 20 20 20 41 4E 44 |0=WIS.. AND| 000008A0: 20 28 32 35 33 29 2C 59 0D 53 46 30 30 37 20 53 | (253),Y.SF007 S| 000008B0: 54 41 20 28 32 35 33 29 2C 59 0D 20 20 20 20 20 |TA (253),Y. | 000008C0: 20 43 4C 43 20 20 20 20 20 20 20 20 20 3B 28 59 | CLC ;(Y| 000008D0: 29 20 2B 20 38 2E 0D 20 20 20 20 20 20 54 59 41 |) + 8.. TYA| 000008E0: 0D 20 20 20 20 20 20 41 44 43 20 23 30 30 38 0D |. ADC #008.| 000008F0: 20 20 20 20 20 20 54 41 59 0D 20 20 20 20 20 20 | TAY. | 00000900: 49 4E 58 20 20 20 20 20 20 20 20 20 3B 28 58 29 |INX ;(X)| 00000910: 20 2B 20 31 2E 0D 20 20 20 20 20 20 43 50 58 20 | + 1.. CPX | 00000920: 23 30 30 34 20 20 20 20 3B 30 2C 31 2C 32 2C 33 |#004 ;0,1,2,3| 00000930: 2E 0D 20 20 20 20 20 20 42 43 43 20 20 53 46 30 |.. BCC SF0| 00000940: 30 35 0D 20 20 20 20 20 20 4C 44 59 20 20 31 30 |05. LDY 10| 00000950: 37 20 20 20 20 3B 59 49 2E 0D 20 20 20 20 20 20 |7 ;YI.. | 00000960: 49 4E 59 20 20 20 20 20 20 20 20 20 3B 31 20 42 |INY ;1 B| 00000970: 49 4A 2E 0D 20 20 20 20 20 20 43 50 59 20 23 30 |IJ.. CPY #0| 00000980: 30 38 20 20 20 20 3B 30 2E 2E 2E 37 2E 0D 20 20 |08 ;0...7.. | 00000990: 20 20 20 20 42 43 43 20 20 53 46 30 30 38 0D 20 | BCC SF008. | 000009A0: 20 20 20 20 20 43 4C 43 20 20 20 20 20 20 20 20 | CLC | 000009B0: 20 3B 56 4F 4C 47 45 4E 44 45 20 52 45 47 45 4C | ;VOLGENDE REGEL| 000009C0: 2E 0D 20 20 20 20 20 20 4C 44 41 20 20 32 35 33 |.. LDA 253| 000009D0: 20 20 20 20 3B 41 44 52 45 53 20 2B 20 33 32 30 | ;ADRES + 320| 000009E0: 2E 0D 20 20 20 20 20 20 41 44 43 20 23 30 36 34 |.. ADC #064| 000009F0: 0D 20 20 20 20 20 20 53 54 41 20 20 32 35 33 0D |. STA 253.| 00000A00: 20 20 20 20 20 20 4C 44 41 20 20 32 35 34 0D 20 | LDA 254. | 00000A10: 20 20 20 20 20 41 44 43 20 23 30 30 31 0D 20 20 | ADC #001. | 00000A20: 20 20 20 20 53 54 41 20 20 32 35 34 0D 20 20 20 | STA 254. | 00000A30: 20 20 20 4C 44 59 20 23 30 30 30 20 20 20 20 3B | LDY #000 ;| 00000A40: 5A 45 54 20 59 49 3D 30 2E 0D 53 46 30 30 38 20 |ZET YI=0..SF008 | 00000A50: 53 54 59 20 20 31 30 37 0D 20 20 20 20 20 20 4C |STY 107. L| 00000A60: 44 59 20 20 31 30 38 20 20 20 20 3B 53 50 52 49 |DY 108 ;SPRI| 00000A70: 54 45 52 45 47 45 4C 0D 20 20 20 20 20 20 43 50 |TEREGEL. CP| 00000A80: 59 20 23 30 36 31 20 20 20 20 3B 4C 41 41 54 53 |Y #061 ;LAATS| 00000A90: 54 45 3F 0D 20 20 20 20 20 20 42 43 43 20 20 53 |TE?. BCC S| 00000AA0: 46 30 30 31 20 20 3B 4E 45 45 4E 3A 2D 2D 3E 5B |F001 ;NEEN:-->[| 00000AB0: 53 46 30 30 31 5D 0D 20 20 20 20 20 20 4C 44 41 |SF001]. LDA| 00000AC0: 20 20 30 30 31 20 20 20 20 3B 48 49 52 41 4D 20 | 001 ;HIRAM | 00000AD0: 55 49 54 2E 0D 20 20 20 20 20 20 4F 52 41 20 23 |UIT.. ORA #| 00000AE0: 30 30 32 0D 20 20 20 20 20 20 53 54 41 20 20 30 |002. STA 0| 00000AF0: 30 31 0D 20 20 20 20 20 20 4C 44 41 20 20 35 36 |01. LDA 56| 00000B00: 33 33 34 20 20 3B 57 45 4C 20 54 49 4D 45 52 2D |334 ;WEL TIMER-| 00000B10: 0D 20 20 20 20 20 20 4F 52 41 20 23 30 30 31 20 |. ORA #001 | 00000B20: 20 20 20 3B 49 4E 54 45 52 52 55 50 54 53 2E 0D | ;INTERRUPTS..| 00000B30: 20 20 20 20 20 20 53 54 41 20 20 35 36 33 33 34 | STA 56334| 00000B40: 0D 20 20 20 20 20 20 52 54 53 0D 20 20 20 20 20 |. RTS. | 00000B50: 20 2E 42 59 54 45 20 24 46 46 2C 24 46 46 2C 24 | .BYTE $FF,$FF,$| 00000B60: 46 46 0D 20 20 20 20 20 20 2E 45 4E 44 0D |FF. .END. |
*=32512. ;.
;SPRITEFIX..
;LINKSBOVEN:. ;Y=(
700).. ;X=(702,701)..
;SIM.BAS.'MMOB'..
;SPRITENR.(703)..
;(704):. ; 0 - PO
ETS.. ; 1 - ZET..
;. ;.
;. LDA 56334 ;GEEN TI
MER-. AND #254 ;INTERRUPTS..
STA 56334. LDA #000 ;G0=0..
STA 251. CLC ;NUMMER P
LUS. LDA 00703 ;OFFSET (679)..
ADC 00679 ;MAAL 4.. .BYTE $6A
; = ROR.. ROR 251. .BYTE $6
A ; = ROR.. ROR 251 ;BIJTELLE
N. ADC 00680 ;MS BEGINADRES.
STA 252 ;SPRITEBLOKKEN.. SEC.
LDA 00701 ;X - 24.. SBC #024
. STA 101. AND #007. STA
106 ;XI.. EOR 101. STA
253 ;8 * K.. LDA 00702. SB
C #000. STA 102. SEC. LD
A 00700 ;Y - 50.. SBC #050.
STA 100. AND #007. STA 107
;YI.. EOR 100. .BYTE $4A
; = LSR.. STA 254 ;4 * L..
.BYTE $4A ; = LSR.. .BYTE $4A
; = LSR.. ADC 254. STA 254
;5 * L.. LDA #000. ROR 254.
.BYTE $6A ; = ROR.. ROR 25
4. .BYTE $6A ; = ROR.. ADC
253. STA 253 ;B0.. LDA 25
4 ;B1.. ADC 102 ;XH ERBIJ..
ADC 00681 ;BEGINADRES. STA
254 ;HIRES ERBIJ.. LDA 001 ;
HIRAM IN.. AND #253. STA 001.
LDY #000.SF001 LDX #000 ;OPHALE
N VAN.SF002 LDA (251),Y ;SPRITEREGEL.
STA 109,X ;NAAR 109..111.. INY
. INX. CPX #003 ;DRIE STUKS
.. BCC SF002. STY 108 ;EV
EN IN SS.. LDX 106 ;XI WEER..
LDA #000 ;RECHTS 0000.. BEQ
SF004 ;EVEN -->[SF004].SF003 LSR 109
;SCHUIF DE HELE. ROR 110 ;RI
J MET (A) NA.. ROR 111. .BYTE
$6A ; = ROR..SF004 DEX. BPL SF0
03. STA 112 ;LAATSTE IN 112..
LDX #000. LDY 107 ;YI WEER.
.SF005 LDA 00704 ;ZET/WIS.. .BYTE
$4A ; = LSR.. LDA 109,X. B
CC SF006. ORA (253),Y ;1=ZET..
BCS SF007.SF006 EOR #255 ;0=WIS..
AND (253),Y.SF007 STA (253),Y.
CLC ;(Y) + 8.. TYA. A
DC #008. TAY. INX ;(X)
+ 1.. CPX #004 ;0,1,2,3..
BCC SF005. LDY 107 ;YI..
INY ;1 BIJ.. CPY #008 ;0
...7.. BCC SF008. CLC
;VOLGENDE REGEL.. LDA 253 ;ADR
ES + 320.. ADC #064. STA 253.
LDA 254. ADC #001. STA
254. LDY #000 ;ZET YI=0..SF008
STY 107. LDY 108 ;SPRITEREGEL.
CPY #061 ;LAATSTE?. BCC S
F001 ;NEEN:-->[SF001]. LDA 001
;HIRAM UIT.. ORA #002. STA 0
01. LDA 56334 ;WEL TIMER-. O
RA #001 ;INTERRUPTS.. STA 56334
. RTS. .BYTE $FF,$FF,$FF.
.END.
> CLICK IMAGE PREVIEW FOR FULL MODAL