mirror of
https://github.com/deater/dos33fsprogs.git
synced 2025-01-01 05:31:52 +00:00
36 lines
328 B
ArmAsm
36 lines
328 B
ArmAsm
;=========================
|
|
; copy to 400
|
|
;=========================
|
|
copy_to_400:
|
|
|
|
|
|
ldx #119
|
|
looper1:
|
|
lda $c00,X
|
|
sta $400,X
|
|
|
|
lda $c80,X
|
|
sta $480,X
|
|
|
|
lda $d00,X
|
|
sta $500,X
|
|
|
|
lda $d80,X
|
|
sta $580,X
|
|
|
|
lda $e00,X
|
|
sta $600,X
|
|
|
|
lda $e80,X
|
|
sta $680,X
|
|
|
|
lda $f00,X
|
|
sta $700,X
|
|
|
|
lda $f80,X
|
|
sta $780,X
|
|
dex
|
|
bpl looper1
|
|
|
|
rts
|