-
Notifications
You must be signed in to change notification settings - Fork 1
/
Copy pathddsd32_SrcImage8_fastloop.inc
26 lines (21 loc) · 1.15 KB
/
ddsd32_SrcImage8_fastloop.inc
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
//ddsd32_SrcImage8_fastloop
PDWord(yy)^ := PDWord(@ppalentries[PByte(topBits)^])^;
yy := yy + 4;
topBits := Pointer(integer(topBits) + 1);
{
pEntry := @ppalentries[PByte(topBits)^];
PDWord(yy)^ :=
(pEntry.peRed shl 16) or
(pEntry.peGreen shl 8) or
(pEntry.peBlue);
yy := yy + 4;
topBits := Pointer(integer(topBits) + 1);
}
{ pEntry := @SrcImage.idx_palette[PByte(topBits)^];
PDWord(yy)^ :=
(pEntry.peRed shl dest_red_fmt._rshift) or
(pEntry.peGreen shl dest_green_fmt._rshift) or
(pEntry.peBlue shl dest_blue_fmt._rshift);
yy := yy + 4;
topBits := Pointer(integer(topBits) + 1);
}