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

THREE/TO/ONE.S

FILE INFORMATION

FILENAME(S): THREE/TO/ONE.S

FILE TYPE(S): PRG

FILE SIZE: 328b

FIRST SEEN: 2025-12-01 19:06:54

APPEARS ON: 1 disk(s)

FILE HASH

2a82c0a1a495e9f80619cae726b009233d32fae4a227bd2925dddbcd193d0740

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
ICE DISK 28 THREE/TO/ONE.S PRG Icebreaker 20 6 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 00 0A 20 6F 72 67 20 24  38 30 30 30 0D 20 6A 73  |.. org $8000. js|
00000010: 72 20 24 65 35 34 34 0D  20 6C 64 78 20 23 30 0D  |r $e544. ldx #0.|
00000020: 6C 6F 6F 70 20 6A 73 72  20 24 66 66 63 66 0D 20  |loop jsr $ffcf. |
00000030: 73 65 63 0D 20 73 62 63  20 23 34 38 0D 20 73 74  |sec. sbc #48. st|
00000040: 61 20 62 6C 6F 63 6B 2C  78 0D 20 69 6E 78 0D 20  |a block,x. inx. |
00000050: 63 6D 70 20 23 32 32 31  0D 20 62 6E 65 20 6C 6F  |cmp #221. bne lo|
00000060: 6F 70 0D 20 6C 64 78 20  23 30 0D 20 6C 64 61 20  |op. ldx #0. lda |
00000070: 62 6C 6F 63 6B 0D 6C 6F  6F 70 31 20 63 6C 63 0D  |block.loop1 clc.|
00000080: 20 61 64 63 20 62 6C 6F  63 6B 0D 20 69 6E 78 0D  | adc block. inx.|
00000090: 20 63 70 78 20 23 39 39  0D 20 62 6E 65 20 6C 6F  | cpx #99. bne lo|
000000A0: 6F 70 31 0D 20 6C 64 78  20 23 30 0D 20 73 74 61  |op1. ldx #0. sta|
000000B0: 20 74 65 6D 70 0D 20 6C  64 61 20 62 6C 6F 63 6B  | temp. lda block|
000000C0: 2B 31 0D 6C 6F 6F 70 32  20 63 6C 63 0D 20 61 64  |+1.loop2 clc. ad|
000000D0: 63 20 62 6C 6F 63 6B 2B  31 0D 20 69 6E 78 0D 20  |c block+1. inx. |
000000E0: 63 70 78 20 23 39 0D 20  62 6E 65 20 6C 6F 6F 70  |cpx #9. bne loop|
000000F0: 32 0D 20 63 6C 63 0D 20  61 64 63 20 74 65 6D 70  |2. clc. adc temp|
00000100: 0D 20 63 6C 63 0D 20 61  64 63 20 62 6C 6F 63 6B  |. clc. adc block|
00000110: 2B 32 0D 20 73 74 61 20  62 79 74 65 0D 20 72 74  |+2. sta byte. rt|
00000120: 73 0D 62 6C 6F 63 6B 20  64 66 62 20 30 2C 30 2C  |s.block dfb 0,0,|
00000130: 30 0D 74 65 6D 70 20 64  66 62 20 30 0D 62 79 74  |0.temp dfb 0.byt|
00000140: 65 20 64 66 62 20 30 0D                           |e dfb 0.        |

.. ORG $8000. JSR $E544. LDX #0.LOOP JSR
 $FFCF. SEC. SBC #48. STA BLOCK,X. INX. 
CMP #221. BNE LOOP. LDX #0. LDA BLOCK.LO
OP1 CLC. ADC BLOCK. INX. CPX #99. BNE LO
OP1. LDX #0. STA TEMP. LDA BLOCK+1.LOOP2
 CLC. ADC BLOCK+1. INX. CPX #9. BNE LOOP
2. CLC. ADC TEMP. CLC. ADC BLOCK+2. STA 
BYTE. RTS.BLOCK DFB 0,0,0.TEMP DFB 0.BYT
E DFB 0.
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL