00000000: 00 40 20 6F 72 67 20 24 38 30 30 30 0D 20 6C 64 |.@ org $8000. ld|
00000010: 61 20 23 32 35 35 0D 20 73 74 61 20 68 69 62 79 |a #255. sta hiby|
00000020: 74 65 0D 20 6C 64 78 20 23 30 0D 20 6C 64 61 20 |te. ldx #0. lda |
00000030: 23 30 0D 20 63 6C 76 0D 6C 6F 6F 70 20 63 6C 63 |#0. clv.loop clc|
00000040: 0D 20 61 64 63 20 23 36 34 0D 20 62 76 73 20 68 |. adc #64. bvs h|
00000050: 69 75 70 0D 62 61 63 6B 20 69 6E 78 0D 20 63 70 |iup.back inx. cp|
00000060: 78 20 74 69 6D 65 73 0D 20 62 6E 65 20 6C 6F 6F |x times. bne loo|
00000070: 70 0D 20 73 74 61 20 31 30 32 34 0D 20 6C 64 61 |p. sta 1024. lda|
00000080: 20 68 69 62 79 74 65 0D 20 73 74 61 20 31 30 32 | hibyte. sta 102|
00000090: 35 0D 20 72 74 73 0D 68 69 75 70 20 69 6E 63 20 |5. rts.hiup inc |
000000A0: 68 69 62 79 74 65 0D 20 63 6C 76 0D 20 6A 6D 70 |hibyte. clv. jmp|
000000B0: 20 62 61 63 6B 0D 68 69 62 79 74 65 20 64 66 62 | back.hibyte dfb|
000000C0: 20 32 35 35 0D 74 69 6D 65 73 20 64 66 62 20 31 | 255.times dfb 1|
000000D0: 39 32 0D |92. |
.@ ORG $8000. LDA #255. STA HIBYTE. LDX
#0. LDA #0. CLV.LOOP CLC. ADC #64. BVS H
IUP.BACK INX. CPX TIMES. BNE LOOP. STA 1
024. LDA HIBYTE. STA 1025. RTS.HIUP INC
HIBYTE. CLV. JMP BACK.HIBYTE DFB 255.TIM
ES DFB 192.
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL