mirror of
https://github.com/A2osX/A2osX.git
synced 2024-06-09 00:29:28 +00:00
37 lines
600 B
Plaintext
37 lines
600 B
Plaintext
PR#3
|
||
PREFIX /A2OSX.BUILD
|
||
LOMEM $A00
|
||
INC 1
|
||
AUTO 6
|
||
.LIST OFF
|
||
*--------------------------------------
|
||
* BitBlt
|
||
* In : YA = Ptr to CtrlBlk :
|
||
* 1 : OP
|
||
* 4 : SrcX1
|
||
* 6 : SrcY1
|
||
* 8 : SrcX2
|
||
* 10 : SrcY2
|
||
* 12 : DestX
|
||
* 14 : DestY
|
||
* 16 : SrcPtr
|
||
* 18 : DstPtr
|
||
*--------------------------------------
|
||
BITBLT >STYA ZPBase
|
||
ldy #S.CB.DstPtr+1
|
||
|
||
.1 lda (ZPBase),y
|
||
sta CB.Cache,y
|
||
dey
|
||
bpl .1
|
||
|
||
|
||
|
||
clc
|
||
rts
|
||
*--------------------------------------
|
||
MAN
|
||
SAVE /A2OSX.SRC/DRV/DHGR.DRV.S.BLT
|
||
LOAD /A2OSX.SRC/DRV/DHGR.DRV.S
|
||
ASM
|