A2osX/DRV/DHGR.DRV.S.RECT.txt

58 lines
1.0 KiB
Plaintext
Raw Normal View History

2017-12-22 21:24:30 +00:00
NEW
2019-07-25 15:10:59 +00:00
AUTO 3,1
2017-11-14 16:57:34 +00:00
*--------------------------------------
* FILLRECT
* 1 : OP (XOR,SET,ORA)
2017-11-14 16:57:34 +00:00
* 2 : Mode
* 3 : Color
* 4 : SrcX1
* 6 : SrcY1
* 8 : SrcX2
* 10 : SrcY2
*--------------------------------------
2017-11-15 07:27:12 +00:00
FILLRECT jsr HLINE
2017-11-14 16:57:34 +00:00
2017-11-15 07:27:12 +00:00
ldy CB.Cache+S.CB.Y1
cpy CB.Cache+S.CB.Y2
beq .8
2020-07-04 19:00:47 +00:00
.2 iny
phy
jsr LBUF.DrawAtY
ply
2017-11-15 07:27:12 +00:00
cpy CB.Cache+S.CB.Y2
bne .2
2020-06-09 13:40:21 +00:00
2017-11-14 16:57:34 +00:00
.8 rts
*--------------------------------------
* 4 : SrcX1
* 6 : SrcY1
* 8 : SrcX2
* 10 : SrcY2
* 18 : S.CB.DstPtr = Size in Bytes to save this RECT
*--------------------------------------
GETRECTBUFSIZE >LDYA CB.Cache+S.CB.X1
2020-10-13 15:54:55 +00:00
jsr DIVMOD7YA
2020-10-13 15:54:55 +00:00
sta ZPTmpByte A = X1 div 7
>LDYA CB.Cache+S.CB.X2
jsr DIVMOD7YA
2020-10-13 15:54:55 +00:00
inc A = (X2 mod 7) + 1
sec
sbc ZPTmpByte (COL2+1)-COL1
tax
2020-10-13 15:54:55 +00:00
lda CB.Cache+S.CB.Y2
sec
sbc CB.Cache+S.CB.Y1
tay
lda #0
2020-07-04 19:00:47 +00:00
jmp YAMultX
*--------------------------------------
2017-11-14 16:57:34 +00:00
MAN
2020-08-25 14:54:30 +00:00
SAVE usr/src/drv/dhgr.drv.s.rect
2020-06-09 13:40:21 +00:00
LOAD usr/src/drv/dhgr.drv.s
2017-11-14 16:57:34 +00:00
ASM