DISE01
FILE INFORMATION
FILENAME(S): DISE01
FILE TYPE(S): DEL
FILE SIZE: 1K
FIRST SEEN: 2025-11-30 21:11:47
APPEARS ON: 1 disk(s)
FILE HASH
9cc67f3d70d272f1278c102052c7fb2516ea76da07121822743786b9920fe8dd
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 ASSEMBLER | DISE01 | DEL | DuncanTwain | 6 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 20 20 4A 53 52 20 20 36 35 34 39 30 20 20 3B 28 | JSR 65490 ;(| 00000010: 41 29 20 4F 55 54 50 55 54 2E 0D 20 20 20 20 20 |A) OUTPUT.. | 00000020: 20 4C 44 41 20 20 30 30 32 20 20 20 20 3B 48 45 | LDA 002 ;HE| 00000030: 52 53 54 45 4C 20 28 41 29 2E 0D 20 20 20 20 20 |RSTEL (A).. | 00000040: 20 52 54 53 20 20 20 20 20 20 20 20 20 3B 4E 41 | RTS ;NA| 00000050: 41 52 20 48 4F 4F 46 44 50 52 47 52 2E 0D 52 4F |AR HOOFDPRGR..RO| 00000060: 50 55 20 20 4C 44 41 20 20 32 35 33 20 20 20 20 |PU LDA 253 | 00000070: 3B 42 45 47 49 4E 41 44 52 45 53 0D 20 20 20 20 |;BEGINADRES. | 00000080: 20 20 53 54 41 20 20 31 30 31 20 20 20 20 3B 56 | STA 101 ;V| 00000090: 41 4E 20 52 45 47 45 4C 2E 0D 20 20 20 20 20 20 |AN REGEL.. | 000000A0: 4C 44 41 20 20 32 35 34 0D 20 20 20 20 20 20 53 |LDA 254. S| 000000B0: 54 41 20 20 31 30 32 0D 20 20 20 20 20 20 4C 44 |TA 102. LD| 000000C0: 41 20 23 30 33 39 20 20 20 20 3B 50 4F 53 49 54 |A #039 ;POSIT| 000000D0: 49 45 0D 20 20 20 20 20 20 53 54 41 20 20 31 30 |IE. STA 10| 000000E0: 30 20 20 20 20 3B 41 46 54 45 4C 2E 0D 52 4F 50 |0 ;AFTEL..ROP| 000000F0: 31 20 20 4C 44 41 20 20 35 36 33 33 34 20 20 3B |1 LDA 56334 ;| 00000100: 47 45 45 4E 20 54 49 4D 45 52 2D 0D 20 20 20 20 |GEEN TIMER-. | 00000110: 20 20 41 4E 44 20 23 32 35 34 20 20 20 20 3B 49 | AND #254 ;I| 00000120: 4E 54 45 52 52 55 50 54 53 2E 0D 20 20 20 20 20 |NTERRUPTS.. | 00000130: 20 53 54 41 20 20 35 36 33 33 34 0D 20 20 20 20 | STA 56334. | 00000140: 20 20 4C 44 41 20 20 30 30 31 20 20 20 20 3B 48 | LDA 001 ;H| 00000150: 49 52 41 4D 20 4F 50 45 4E 2E 0D 20 20 20 20 20 |IRAM OPEN.. | 00000160: 20 41 4E 44 20 23 32 35 33 0D 20 20 20 20 20 20 | AND #253. | 00000170: 53 54 41 20 20 30 30 31 0D 20 20 20 20 20 20 4C |STA 001. L| 00000180: 44 59 20 23 30 30 37 20 20 20 20 3B 54 52 41 4E |DY #007 ;TRAN| 00000190: 53 50 4F 52 54 20 4E 41 41 52 0D 52 4F 50 32 20 |SPORT NAAR.ROP2 | 000001A0: 20 4C 44 41 20 28 31 30 31 29 2C 59 20 3B 28 31 | LDA (101),Y ;(1| 000001B0: 30 34 29 2E 2E 28 31 31 31 29 2E 0D 20 20 20 20 |04)..(111).. | 000001C0: 20 20 54 41 58 0D 20 20 20 20 20 20 53 54 58 20 | TAX. STX | 000001D0: 20 31 30 34 2C 59 0D 20 20 20 20 20 20 44 45 59 | 104,Y. DEY| 000001E0: 0D 20 20 20 20 20 20 42 50 4C 20 20 52 4F 50 32 |. BPL ROP2| 000001F0: 0D 20 20 20 20 20 20 4C 44 41 20 20 30 30 31 20 |. LDA 001 | 00000200: 20 20 20 3B 48 49 52 41 4D 20 44 49 43 48 54 2E | ;HIRAM DICHT.| 00000210: 0D 20 20 20 20 20 20 4F 52 41 20 23 30 30 32 0D |. ORA #002.| 00000220: 20 20 20 20 20 20 53 54 41 20 20 30 30 31 0D 20 | STA 001. | 00000230: 20 20 20 20 20 4C 44 41 20 20 35 36 33 33 34 20 | LDA 56334 | 00000240: 20 3B 57 45 4C 20 54 49 4D 45 52 2D 0D 20 20 20 | ;WEL TIMER-. | 00000250: 20 20 20 4F 52 41 20 23 30 30 31 20 20 20 20 3B | ORA #001 ;| 00000260: 49 4E 54 45 52 52 55 50 54 53 2E 0D 20 20 20 20 |INTERRUPTS.. | 00000270: 20 20 53 54 41 20 20 35 36 33 33 34 0D 20 20 20 | STA 56334. | 00000280: 20 20 20 4C 44 59 20 23 30 30 37 20 20 20 20 3B | LDY #007 ;| 00000290: 54 52 41 4E 53 50 4F 53 49 54 49 45 0D 52 4F 50 |TRANSPOSITIE.ROP| 000002A0: 33 20 20 4C 44 58 20 23 30 30 37 20 20 20 20 3B |3 LDX #007 ;| 000002B0: 45 4E 20 4F 55 54 50 55 54 2E 0D 52 4F 50 34 20 |EN OUTPUT..ROP4 | 000002C0: 20 52 4F 4C 20 20 31 30 34 2C 58 0D 20 20 20 20 | ROL 104,X. | 000002D0: 20 20 2E 42 59 54 45 20 24 36 41 0D 20 20 20 20 | .BYTE $6A. | 000002E0: 20 20 44 45 58 0D 20 20 20 20 20 20 42 50 4C 20 | DEX. BPL | 000002F0: 20 52 4F 50 34 0D 20 20 20 20 20 20 4A 53 52 20 | ROP4. JSR | 00000300: 20 36 35 34 39 30 0D 20 20 20 20 20 20 44 45 59 | 65490. DEY| 00000310: 0D 20 20 20 20 20 20 42 50 4C 20 20 52 4F 50 33 |. BPL ROP3| 00000320: 0D 20 20 20 20 20 20 43 4C 43 20 20 20 20 20 20 |. CLC | 00000330: 20 20 20 3B 56 4F 4C 47 45 4E 44 45 0D 20 20 20 | ;VOLGENDE. | 00000340: 20 20 20 4C 44 41 20 20 31 30 31 20 20 20 20 3B | LDA 101 ;| 00000350: 50 4F 53 49 54 49 45 2E 0D 20 20 20 20 20 20 41 |POSITIE.. A| 00000360: 44 43 20 23 30 30 38 0D 20 20 20 20 20 20 53 54 |DC #008. ST| 00000370: 41 20 20 31 30 31 0D 20 20 20 20 20 20 4C 44 41 |A 101. LDA| 00000380: 20 20 31 30 32 0D 20 20 20 20 20 20 41 44 43 20 | 102. ADC | 00000390: 23 30 30 30 0D 20 20 20 20 20 20 53 54 41 20 20 |#000. STA | 000003A0: 31 30 32 0D 20 20 20 20 20 20 44 45 43 20 20 31 |102. DEC 1| 000003B0: 30 30 20 20 20 20 3B 50 4F 53 49 54 49 45 0D 20 |00 ;POSITIE. | 000003C0: 20 20 20 20 20 42 50 4C 20 20 52 4F 50 31 20 20 | BPL ROP1 | 000003D0: 20 3B 41 46 54 45 4C 4C 45 4E 2E 0D 20 20 20 20 | ;AFTELLEN.. | 000003E0: 20 20 52 54 53 20 20 20 20 20 20 20 20 20 3B 4E | RTS ;N| 000003F0: 41 41 52 20 48 4F 4F 46 44 50 52 47 52 2E 0D 20 |AAR HOOFDPRGR.. | 00000400: 20 20 20 20 20 2E 42 59 54 45 20 24 46 46 2C 24 | .BYTE $FF,$| 00000410: 46 46 2C 24 46 46 2C 24 46 46 0D 20 20 20 20 20 |FF,$FF,$FF. | 00000420: 20 2E 45 4E 44 0D | .END. |
JSR 65490 ;(A) OUTPUT.. LDA 00
2 ;HERSTEL (A).. RTS ;NA
AR HOOFDPRGR..ROPU LDA 253 ;BEGINAD
RES. STA 101 ;VAN REGEL..
LDA 254. STA 102. LDA #039
;POSITIE. STA 100 ;AFTEL..ROP
1 LDA 56334 ;GEEN TIMER-. AND #2
54 ;INTERRUPTS.. STA 56334.
LDA 001 ;HIRAM OPEN.. AND #25
3. STA 001. LDY #007 ;TRAN
SPORT NAAR.ROP2 LDA (101),Y ;(104)..(11
1).. TAX. STX 104,Y. DEY
. BPL ROP2. LDA 001 ;HIRA
M DICHT.. ORA #002. STA 001.
LDA 56334 ;WEL TIMER-. ORA #
001 ;INTERRUPTS.. STA 56334.
LDY #007 ;TRANSPOSITIE.ROP3 LDX #
007 ;EN OUTPUT..ROP4 ROL 104,X.
.BYTE $6A. DEX. BPL ROP4.
JSR 65490. DEY. BPL ROP3
. CLC ;VOLGENDE. LDA
101 ;POSITIE.. ADC #008. ST
A 101. LDA 102. ADC #000.
STA 102. DEC 100 ;POSITIE.
BPL ROP1 ;AFTELLEN.. RTS
;NAAR HOOFDPRGR.. .BYTE $FF,$
FF,$FF,$FF. .END.
> CLICK IMAGE PREVIEW FOR FULL MODAL