1
0
mirror of https://github.com/cc65/cc65.git synced 2024-11-17 09:07:32 +00:00
cc65/libsrc/common/copydata.s
cuz a66cf46549 Fixed a bug
git-svn-id: svn://svn.cc65.org/cc65/trunk@86 b7a2c559-68d2-44c3-8de9-860c34a00d81
2000-06-15 18:06:18 +00:00

54 lines
780 B
ArmAsm

;
; Ullrich von Bassewitz, 07.12.1998
;
; Copy the data segment from the LOAD to the RUN location
;
.export copydata
.import __DATA_LOAD__, __DATA_RUN__, __DATA_SIZE__
.importzp ptr1, ptr2
copydata:
lda #<__DATA_LOAD__ ; Source pointer
sta ptr1
lda #>__DATA_LOAD__
sta ptr1+1
lda #<__DATA_RUN__ ; Target pointer
sta ptr2
lda #>__DATA_RUN__
sta ptr2+1
ldy #$00
ldx #>__DATA_SIZE__ ; Get page count
beq @L2 ; No full pages
; Copy full pages
@L1: lda (ptr1),y
sta (ptr2),y
iny
bne @L1
inc ptr1+1
inc ptr2+1 ; Bump pointers
dex
bne @L1
; Copy last page (remember: y contains zero)
@L2: ldx #<__DATA_SIZE__ ; Get remaining bytes
beq @L4
@L3: lda (ptr1),y
sta (ptr2),y
iny
dex
bne @L3
; Done
@L4: rts