8 ;============================================================================
\r
12 EXTRN mr_rowofs:WORD
\r
22 planepics db 8192 dup(?) ; // 4k of ceiling, 4k of floor
\r
26 ;============================================================================
\r
30 ;============================
\r
35 ;============================
\r
65 mov ax,SEG planepics
\r
69 mov ax,1111111111110b
\r
72 ; ebx scratch offset and pixel values
\r
74 ; edx packed x / y step values
\r
75 ; esi packed x / y fractional values
\r
77 ; ebp toprow to bottomrow delta
\r
85 ; mov ax,[_variable+ebx+2]
\r
89 shld ebx,esi,22 ; shift y units in
\r
90 shld ebx,esi,7 ; shift x units in and one extra bit
\r
91 and bx,63*65*2 ; mask off extra top bits and 0 low bit
\r
92 add esi,edx ; position += step
\r
95 mov [es:di],al ; write ceiling pixel
\r
98 mov [es:di+bp],al ; write floor pixel
\r