mirror of
https://github.com/A2osX/A2osX.git
synced 2024-08-13 06:29:03 +00:00
119 lines
1.9 KiB
Plaintext
119 lines
1.9 KiB
Plaintext
PR#3
|
||
PREFIX /A2OSX.BUILD
|
||
LOMEM $A00
|
||
INC 1
|
||
AUTO 6
|
||
.LIST OFF
|
||
*--------------------------------------
|
||
* BitBlt
|
||
* S.CB.X1 : SrcX1 in bitmap/mask
|
||
* S.CB.Y1 : SrcY1
|
||
* S.CB.X2 : SrcX2
|
||
* S.CB.Y2 : SrcY2
|
||
|
||
* S.CB.DestX : Destination X (screen)
|
||
* S.CB.DestY : Destination Y (screen)
|
||
|
||
* S.CB.SrcPtr : pointer to S.BM
|
||
* S.CB.DstPtr : pointer to Save Buffer
|
||
*--------------------------------------
|
||
BITBLT >LDYA CB.CACHE+S.CB.SrcPtr
|
||
>STYA ZPBMDataPtr
|
||
|
||
ldy #S.BM-1
|
||
|
||
.1 lda (ZPBMDataPtr),y
|
||
sta BM.Cache,y
|
||
dey
|
||
bpl .1
|
||
|
||
lda ZPBMDataPtr
|
||
clc
|
||
adc #S.BM
|
||
sta ZPBMDataPtr
|
||
bcc .2
|
||
|
||
inc ZPBMDataPtr+1
|
||
|
||
.2 >LDYA CB.Cache+S.CB.Y1
|
||
ldx BM.Cache+S.BM.RowBytes
|
||
|
||
jsr YAMultX
|
||
|
||
pha
|
||
tya
|
||
clc
|
||
adc ZPBMDataPtr
|
||
sta ZPBMDataPtr
|
||
pla
|
||
pha
|
||
adc ZPBMDataPtr+1
|
||
sta ZPBMDataPtr+1
|
||
|
||
tya
|
||
adc BM.Cache+S.BM.MASK.OFS
|
||
sta ZPBMMaskPtr
|
||
pla
|
||
adc BM.Cache+S.BM.MASK.OFS+1
|
||
sta ZPBMMaskPtr+1
|
||
|
||
lda CB.Cache+S.CB.X1
|
||
pha
|
||
and #7
|
||
sta BLT.BMBitOfs
|
||
pla
|
||
|
||
lsr CB.Cache+S.CB.X1+1
|
||
ror
|
||
lsr CB.Cache+S.CB.X1+1
|
||
ror
|
||
lsr CB.Cache+S.CB.X1+1
|
||
ror
|
||
|
||
pha
|
||
clc
|
||
adc ZPBMDataPtr
|
||
sta ZPBMDataPtr
|
||
bcc .3
|
||
|
||
inc ZPBMDataPtr+1
|
||
|
||
.3 pla
|
||
adc ZPBMMaskPtr
|
||
sta ZPBMMaskPtr
|
||
bcc .4
|
||
|
||
inc ZPBMMaskPtr+1
|
||
|
||
.4 lda S.CB.X2
|
||
sec
|
||
sbc S.CB.X1
|
||
sta BLT.DX
|
||
|
||
lda S.CB.X2+1
|
||
sbc S.CB.X1+1
|
||
sta BLT.DX+1
|
||
|
||
>LDYA S.CB.DestX
|
||
jsr LBUF.SetBounds1YA
|
||
stx BLT.SCRBitOfs
|
||
|
||
lda S.CB.DestX
|
||
clc
|
||
adc BLT.DX
|
||
tay
|
||
lda S.CB.DestX+1
|
||
adc BLT.DX+1
|
||
jsr LBUF.SetBounds2YA
|
||
|
||
|
||
clc
|
||
rts
|
||
*--------------------------------------
|
||
BLT.Get7BMBits
|
||
*--------------------------------------
|
||
MAN
|
||
SAVE /A2OSX.SRC/DRV/DHGR.DRV.S.RECT
|
||
LOAD /A2OSX.SRC/DRV/DHGR.DRV.S
|
||
ASM
|