Rev 4423 | Rev 5565 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
431 | serge | 1 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
2 | ;; ;; |
||
5201 | serge | 3 | ;; Copyright (C) KolibriOS team 2004-2014. All rights reserved. ;; |
431 | serge | 4 | ;; Distributed under terms of the GNU General Public License ;; |
5 | ;; ;; |
||
6 | ;; VESA20.INC ;; |
||
7 | ;; ;; |
||
8 | ;; Vesa 2.0 functions for MenuetOS ;; |
||
9 | ;; ;; |
||
10 | ;; Copyright 2002 Ville Turjanmaa ;; |
||
11 | ;; Alexey, kgaz@crosswindws.net ;; |
||
12 | ;; - Voodoo compatible graphics ;; |
||
13 | ;; Juan M. Caravaca ;; |
||
14 | ;; - Graphics optimimizations eg. drawline ;; |
||
15 | ;; ;; |
||
16 | ;; See file COPYING for details ;; |
||
17 | ;; ;; |
||
18 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
||
1 | ha | 19 | |
593 | mikedld | 20 | $Revision: 5201 $ |
21 | |||
5201 | serge | 22 | uglobal |
23 | align 4 |
||
24 | bgr_cur_line rd 1920 ; maximum width of screen |
||
25 | bgr_next_line rd 1920 |
||
26 | endg |
||
593 | mikedld | 27 | |
5201 | serge | 28 | iglobal |
29 | align 4 |
||
30 | overlapping_of_points_ptr dd overlapping_of_points |
||
31 | endg |
||
1 | ha | 32 | |
33 | |||
2434 | Serge | 34 | ;----------------------------------------------------------------------------- |
5201 | serge | 35 | ; eax = x |
36 | ; ebx = y |
||
37 | |||
2434 | Serge | 38 | align 4 |
5201 | serge | 39 | Vesa20_getpixel16: |
40 | |||
41 | ; check for hardware cursor |
||
42 | cmp [_display.select_cursor], select_cursor |
||
43 | je @f |
||
44 | cmp [_display.select_cursor], 0 |
||
45 | jne .no_mouseunder |
||
46 | @@: |
||
47 | |||
48 | ; check mouse area for putpixel |
||
49 | test ecx, 0x04000000 ; don't load to mouseunder area |
||
50 | jnz .no_mouseunder |
||
51 | call [_display.check_m_pixel] |
||
52 | test ecx, ecx ; 0xff000000 |
||
53 | jnz @f |
||
54 | |||
55 | .no_mouseunder: |
||
56 | ; imul ebx, [BytesPerScanLine] ; ebx = y * y multiplier |
||
57 | mov ebx, [BPSLine_calc_area+ebx*4] |
||
58 | lea edi, [eax*2] ; edi = x*2 |
||
59 | add edi, ebx ; edi = x*2+(y*y multiplier) |
||
60 | |||
61 | movzx ecx, word[LFB_BASE+edi] |
||
62 | shl ecx, 3 |
||
63 | ror ecx, 8 |
||
64 | shl cx, 2 |
||
65 | ror ecx, 8 |
||
66 | shl cl, 3 |
||
67 | rol ecx, 16 |
||
68 | @@: |
||
69 | and ecx, 0x00ffffff |
||
2434 | Serge | 70 | ret |
5201 | serge | 71 | |
2434 | Serge | 72 | ;----------------------------------------------------------------------------- |
5201 | serge | 73 | ; eax = x |
74 | ; ebx = y |
||
75 | |||
2434 | Serge | 76 | align 4 |
1 | ha | 77 | Vesa20_getpixel24: |
5201 | serge | 78 | |
79 | ; check for hardware cursor |
||
2465 | Serge | 80 | cmp [_display.select_cursor], select_cursor |
81 | je @f |
||
82 | cmp [_display.select_cursor], 0 |
||
83 | jne .no_mouseunder |
||
5201 | serge | 84 | @@: |
85 | |||
86 | ; check mouse area for putpixel |
||
2434 | Serge | 87 | test ecx, 0x04000000 ; don't load to mouseunder area |
88 | jnz .no_mouseunder |
||
89 | call [_display.check_m_pixel] |
||
5201 | serge | 90 | test ecx, ecx ; 0xff000000 |
2434 | Serge | 91 | jnz @f |
5201 | serge | 92 | |
93 | .no_mouseunder: |
||
2465 | Serge | 94 | ; imul ebx, [BytesPerScanLine] ; ebx = y * y multiplier |
2987 | Serge | 95 | mov ebx, [BPSLine_calc_area+ebx*4] |
5201 | serge | 96 | lea edi, [eax+eax*2] ; edi = x*3 |
2434 | Serge | 97 | add edi, ebx ; edi = x*3+(y*y multiplier) |
5201 | serge | 98 | |
2434 | Serge | 99 | mov ecx, [LFB_BASE+edi] |
5201 | serge | 100 | @@: |
101 | and ecx, 0x00ffffff |
||
2434 | Serge | 102 | ret |
5201 | serge | 103 | |
2434 | Serge | 104 | ;----------------------------------------------------------------------------- |
5201 | serge | 105 | ; eax = x |
106 | ; ebx = y |
||
107 | |||
2434 | Serge | 108 | align 4 |
1 | ha | 109 | Vesa20_getpixel32: |
5201 | serge | 110 | |
111 | ; check for hardware cursor |
||
2465 | Serge | 112 | cmp [_display.select_cursor], select_cursor |
113 | je @f |
||
114 | cmp [_display.select_cursor], 0 |
||
115 | jne .no_mouseunder |
||
5201 | serge | 116 | @@: |
117 | |||
118 | ; check mouse area for putpixel |
||
2434 | Serge | 119 | test ecx, 0x04000000 ; don't load to mouseunder area |
120 | jnz .no_mouseunder |
||
121 | call [_display.check_m_pixel] |
||
5201 | serge | 122 | test ecx, ecx ; 0xff000000 |
2434 | Serge | 123 | jnz @f |
5201 | serge | 124 | |
125 | .no_mouseunder: |
||
2465 | Serge | 126 | ; imul ebx, [BytesPerScanLine] ; ebx = y * y multiplier |
2987 | Serge | 127 | mov ebx, [BPSLine_calc_area+ebx*4] |
5201 | serge | 128 | lea edi, [ebx+eax*4] ; edi = x*4+(y*y multiplier) |
129 | |||
2434 | Serge | 130 | mov ecx, [LFB_BASE+edi] |
5201 | serge | 131 | @@: |
132 | and ecx, 0x00ffffff |
||
2434 | Serge | 133 | ret |
5201 | serge | 134 | |
2434 | Serge | 135 | ;----------------------------------------------------------------------------- |
5201 | serge | 136 | ; ebx = pointer |
137 | ; ecx = size [x|y] |
||
138 | ; edx = coordinates [x|y] |
||
139 | ; ebp = pointer to 'get' function |
||
140 | ; esi = pointer to 'init' function |
||
141 | ; edi = parameter for 'get' function |
||
142 | |||
143 | align 16 |
||
144 | vesa20_putimage: |
||
145 | |||
1 | ha | 146 | virtual at esp |
147 | putimg: |
||
148 | .real_sx dd ? |
||
149 | .real_sy dd ? |
||
150 | .image_sx dd ? |
||
151 | .image_sy dd ? |
||
152 | .image_cx dd ? |
||
153 | .image_cy dd ? |
||
154 | .pti dd ? |
||
155 | .abs_cx dd ? |
||
156 | .abs_cy dd ? |
||
157 | .line_increment dd ? |
||
158 | .winmap_newline dd ? |
||
159 | .screen_newline dd ? |
||
2434 | Serge | 160 | .real_sx_and_abs_cx dd ? |
161 | .real_sy_and_abs_cy dd ? |
||
162 | .stack_data = 4*14 |
||
283 | diamond | 163 | .edi dd ? |
164 | .esi dd ? |
||
165 | .ebp dd ? |
||
314 | diamond | 166 | .esp dd ? |
167 | .ebx dd ? |
||
168 | .edx dd ? |
||
169 | .ecx dd ? |
||
170 | .eax dd ? |
||
171 | .ret_addr dd ? |
||
172 | .arg_0 dd ? |
||
1 | ha | 173 | end virtual |
5201 | serge | 174 | |
2434 | Serge | 175 | pushad |
176 | sub esp, putimg.stack_data |
||
469 | serge | 177 | ; save pointer to image |
2434 | Serge | 178 | mov [putimg.pti], ebx |
469 | serge | 179 | ; unpack the size |
2434 | Serge | 180 | mov eax, ecx |
181 | and ecx, 0xFFFF |
||
182 | shr eax, 16 |
||
183 | mov [putimg.image_sx], eax |
||
184 | mov [putimg.image_sy], ecx |
||
469 | serge | 185 | ; unpack the coordinates |
2434 | Serge | 186 | mov eax, edx |
187 | and edx, 0xFFFF |
||
188 | shr eax, 16 |
||
189 | mov [putimg.image_cx], eax |
||
190 | mov [putimg.image_cy], edx |
||
469 | serge | 191 | ; calculate absolute (i.e. screen) coordinates |
2434 | Serge | 192 | mov eax, [TASK_BASE] |
193 | mov ebx, [eax-twdw + WDATA.box.left] |
||
194 | add ebx, [putimg.image_cx] |
||
195 | mov [putimg.abs_cx], ebx |
||
196 | mov ebx, [eax-twdw + WDATA.box.top] |
||
197 | add ebx, [putimg.image_cy] |
||
198 | mov [putimg.abs_cy], ebx |
||
469 | serge | 199 | ; real_sx = MIN(wnd_sx-image_cx, image_sx); |
5201 | serge | 200 | mov ebx, [eax-twdw + WDATA.box.width] ; ebx = wnd_sx |
201 | inc ebx ; WDATA.box.width is one pixel less than real window x-size |
||
2434 | Serge | 202 | sub ebx, [putimg.image_cx] |
203 | ja @f |
||
204 | add esp, putimg.stack_data |
||
205 | popad |
||
206 | ret |
||
5201 | serge | 207 | |
208 | @@: |
||
2434 | Serge | 209 | cmp ebx, [putimg.image_sx] |
210 | jbe .end_x |
||
211 | mov ebx, [putimg.image_sx] |
||
5201 | serge | 212 | .end_x: |
2434 | Serge | 213 | mov [putimg.real_sx], ebx |
469 | serge | 214 | ; init real_sy |
5201 | serge | 215 | mov ebx, [eax-twdw + WDATA.box.height] ; ebx = wnd_sy |
2434 | Serge | 216 | inc ebx |
217 | sub ebx, [putimg.image_cy] |
||
218 | ja @f |
||
219 | add esp, putimg.stack_data |
||
220 | popad |
||
221 | ret |
||
5201 | serge | 222 | |
223 | @@: |
||
2434 | Serge | 224 | cmp ebx, [putimg.image_sy] |
225 | jbe .end_y |
||
226 | mov ebx, [putimg.image_sy] |
||
5201 | serge | 227 | .end_y: |
2434 | Serge | 228 | mov [putimg.real_sy], ebx |
469 | serge | 229 | ; line increment |
2434 | Serge | 230 | mov eax, [putimg.image_sx] |
231 | mov ecx, [putimg.real_sx] |
||
232 | sub eax, ecx |
||
469 | serge | 233 | ;; imul eax, [putimg.source_bpp] |
234 | ; lea eax, [eax + eax * 2] |
||
2434 | Serge | 235 | call esi |
236 | add eax, [putimg.arg_0] |
||
237 | mov [putimg.line_increment], eax |
||
469 | serge | 238 | ; winmap new line increment |
5201 | serge | 239 | mov eax, [Screen_Max_X] |
240 | inc eax |
||
2434 | Serge | 241 | sub eax, [putimg.real_sx] |
242 | mov [putimg.winmap_newline], eax |
||
469 | serge | 243 | ; screen new line increment |
3626 | Serge | 244 | mov eax, [_display.pitch] |
5201 | serge | 245 | mov ebx, [_display.bytes_per_pixel] |
2434 | Serge | 246 | imul ecx, ebx |
247 | sub eax, ecx |
||
248 | mov [putimg.screen_newline], eax |
||
469 | serge | 249 | ; pointer to image |
2434 | Serge | 250 | mov esi, [putimg.pti] |
469 | serge | 251 | ; pointer to screen |
2434 | Serge | 252 | mov edx, [putimg.abs_cy] |
2465 | Serge | 253 | ; imul edx, [BytesPerScanLine] |
2987 | Serge | 254 | mov edx, [BPSLine_calc_area+edx*4] |
2434 | Serge | 255 | mov eax, [putimg.abs_cx] |
256 | imul eax, ebx |
||
257 | add edx, eax |
||
469 | serge | 258 | ; pointer to pixel map |
2434 | Serge | 259 | mov eax, [putimg.abs_cy] |
5201 | serge | 260 | ; imul eax, [Screen_Max_X] |
261 | ; add eax, [putimg.abs_cy] |
||
2465 | Serge | 262 | mov eax, [d_width_calc_area + eax*4] |
263 | |||
2434 | Serge | 264 | add eax, [putimg.abs_cx] |
265 | add eax, [_WinMapAddress] |
||
266 | xchg eax, ebp |
||
5201 | serge | 267 | |
2434 | Serge | 268 | mov ecx, [putimg.real_sx] |
269 | add ecx, [putimg.abs_cx] |
||
270 | mov [putimg.real_sx_and_abs_cx], ecx |
||
271 | mov ecx, [putimg.real_sy] |
||
272 | add ecx, [putimg.abs_cy] |
||
273 | mov [putimg.real_sy_and_abs_cy], ecx |
||
5201 | serge | 274 | |
469 | serge | 275 | ; get process number |
2434 | Serge | 276 | mov ebx, [CURRENT_TASK] |
5201 | serge | 277 | |
278 | cmp byte [_display.bits_per_pixel], 16 |
||
279 | je put_image_end_16 |
||
280 | cmp byte [_display.bits_per_pixel], 24 |
||
281 | je put_image_end_24 |
||
282 | cmp byte [_display.bits_per_pixel], 32 |
||
2434 | Serge | 283 | je put_image_end_32 |
5201 | serge | 284 | |
285 | ;------------------------------------------------------------------------------ |
||
286 | |||
287 | put_image_end_16: |
||
288 | |||
289 | mov edi, [putimg.real_sy] |
||
290 | |||
291 | ; check for hardware cursor |
||
292 | mov ecx, [_display.select_cursor] |
||
293 | cmp ecx, select_cursor |
||
294 | je put_image_end_16_new |
||
295 | cmp ecx, 0 |
||
296 | je put_image_end_16_old |
||
297 | .new_line: |
||
298 | mov ecx, [putimg.real_sx] |
||
299 | .new_x: |
||
300 | push [putimg.edi] |
||
301 | mov eax, [putimg.ebp+4] |
||
302 | call eax |
||
303 | cmp [ebp], bl |
||
304 | jne .skip |
||
305 | ; convert to 16 bpp and store to LFB |
||
306 | and eax, 00000000111110001111110011111000b |
||
307 | shr ah, 2 |
||
308 | shr ax, 3 |
||
309 | ror eax, 8 |
||
310 | add al, ah |
||
311 | rol eax, 8 |
||
312 | mov [LFB_BASE+edx], ax |
||
313 | .skip: |
||
314 | add edx, 2 |
||
315 | inc ebp |
||
316 | dec ecx |
||
317 | jnz .new_x |
||
318 | |||
319 | add esi, [putimg.line_increment] |
||
320 | add edx, [putimg.screen_newline] |
||
321 | add ebp, [putimg.winmap_newline] |
||
322 | |||
323 | cmp [putimg.ebp], putimage_get1bpp |
||
324 | jz .correct |
||
325 | cmp [putimg.ebp], putimage_get2bpp |
||
326 | jz .correct |
||
327 | cmp [putimg.ebp], putimage_get4bpp |
||
328 | jnz @f |
||
329 | .correct: |
||
330 | mov eax, [putimg.edi] |
||
331 | mov byte [eax], 80h |
||
332 | @@: |
||
333 | dec edi |
||
334 | jnz .new_line |
||
335 | .finish: |
||
336 | add esp, putimg.stack_data |
||
337 | popad |
||
338 | ret |
||
339 | |||
340 | ;------------------------------------------------------------------------------ |
||
341 | |||
342 | align 4 |
||
343 | put_image_end_16_old: |
||
344 | |||
345 | .new_line: |
||
346 | mov ecx, [putimg.real_sx] |
||
347 | .new_x: |
||
348 | push [putimg.edi] |
||
349 | mov eax, [putimg.ebp+4] |
||
350 | call eax |
||
351 | cmp [ebp], bl |
||
352 | jne .skip |
||
353 | |||
354 | push ecx |
||
355 | neg ecx |
||
356 | add ecx, [putimg.real_sx_and_abs_cx + 4] |
||
357 | shl ecx, 16 |
||
358 | add ecx, [putimg.real_sy_and_abs_cy + 4] |
||
359 | sub ecx, edi |
||
360 | |||
361 | ; check mouse area for putpixel |
||
362 | call check_mouse_area_for_putpixel |
||
363 | pop ecx |
||
364 | |||
365 | ; convert to 16 bpp and store to LFB |
||
366 | ;; and eax, 00000000111110001111110011111000b |
||
367 | ;; shr ah, 2 |
||
368 | ;; shr ax, 3 |
||
369 | ;; ror eax, 8 |
||
370 | ;; add al, ah |
||
371 | ;; rol eax, 8 |
||
372 | mov [LFB_BASE+edx], ax |
||
373 | .skip: |
||
374 | inc edx |
||
375 | inc edx |
||
376 | inc ebp |
||
377 | dec ecx |
||
378 | jnz .new_x |
||
379 | |||
380 | add esi, [putimg.line_increment] |
||
381 | add edx, [putimg.screen_newline] |
||
382 | add ebp, [putimg.winmap_newline] |
||
383 | |||
384 | cmp [putimg.ebp], putimage_get1bpp |
||
385 | jz .correct |
||
386 | cmp [putimg.ebp], putimage_get2bpp |
||
387 | jz .correct |
||
388 | cmp [putimg.ebp], putimage_get4bpp |
||
389 | jnz @f |
||
390 | .correct: |
||
391 | mov eax, [putimg.edi] |
||
392 | mov byte [eax], 80h |
||
393 | @@: |
||
394 | dec edi |
||
395 | jnz .new_line |
||
396 | jmp put_image_end_16.finish |
||
397 | |||
398 | ;------------------------------------------------------------------------------ |
||
399 | |||
400 | align 4 |
||
401 | put_image_end_16_new: |
||
402 | |||
403 | .new_line: |
||
404 | mov ecx, [putimg.real_sx] |
||
405 | |||
406 | .new_x: |
||
407 | push [putimg.edi] |
||
408 | mov eax, [putimg.ebp+4] |
||
409 | call eax |
||
410 | |||
411 | cmp [ebp], bl |
||
412 | jne .skip |
||
413 | |||
414 | push ecx |
||
415 | .sh: |
||
416 | neg ecx |
||
417 | add ecx, [putimg.real_sx_and_abs_cx + 4] |
||
418 | |||
419 | ; check for X |
||
420 | cmp cx, [X_UNDER_sub_CUR_hot_x_add_curh] |
||
421 | jae .no_mouse_area |
||
422 | |||
423 | sub cx, [X_UNDER_subtraction_CUR_hot_x] |
||
424 | jb .no_mouse_area |
||
425 | |||
426 | shl ecx, 16 |
||
427 | add ecx, [putimg.real_sy_and_abs_cy + 4] |
||
428 | sub ecx, edi |
||
429 | |||
430 | ; check for Y |
||
431 | cmp cx, [Y_UNDER_sub_CUR_hot_y_add_curh] |
||
432 | jae .no_mouse_area |
||
433 | |||
434 | sub cx, [Y_UNDER_subtraction_CUR_hot_y] |
||
435 | jb .no_mouse_area |
||
436 | |||
437 | ; check mouse area for putpixel |
||
438 | call check_mouse_area_for_putpixel_new.1 |
||
439 | cmp ecx, -1 ; SHIT HAPPENS? |
||
440 | jne .no_mouse_area |
||
441 | |||
442 | mov ecx, [esp] |
||
443 | jmp .sh |
||
444 | |||
445 | .no_mouse_area: |
||
446 | pop ecx |
||
447 | ; convert to 16 bpp and store to LFB |
||
448 | and eax, 00000000111110001111110011111000b |
||
449 | shr ah, 2 |
||
450 | shr ax, 3 |
||
451 | ror eax, 8 |
||
452 | add al, ah |
||
453 | rol eax, 8 |
||
454 | mov [LFB_BASE+edx], ax |
||
455 | |||
456 | .skip: |
||
457 | add edx, 2 |
||
458 | inc ebp |
||
459 | dec ecx |
||
460 | jnz .new_x |
||
461 | |||
462 | add esi, [putimg.line_increment] |
||
463 | add edx, [putimg.screen_newline] |
||
464 | add ebp, [putimg.winmap_newline] |
||
465 | |||
466 | cmp [putimg.ebp], putimage_get1bpp |
||
467 | jz .correct |
||
468 | cmp [putimg.ebp], putimage_get2bpp |
||
469 | jz .correct |
||
470 | cmp [putimg.ebp], putimage_get4bpp |
||
471 | jnz @f |
||
472 | |||
473 | .correct: |
||
474 | mov eax, [putimg.edi] |
||
475 | mov byte [eax], 80h |
||
476 | |||
477 | @@: |
||
478 | dec edi |
||
479 | jnz .new_line |
||
480 | jmp put_image_end_16.finish |
||
481 | |||
482 | ;------------------------------------------------------------------------------ |
||
483 | |||
484 | align 4 |
||
2439 | Serge | 485 | put_image_end_24: |
5201 | serge | 486 | |
2434 | Serge | 487 | mov edi, [putimg.real_sy] |
5201 | serge | 488 | |
2465 | Serge | 489 | ; check for hardware cursor |
490 | mov ecx, [_display.select_cursor] |
||
491 | cmp ecx, select_cursor |
||
492 | je put_image_end_24_new |
||
493 | cmp ecx, 0 |
||
494 | je put_image_end_24_old |
||
5201 | serge | 495 | .new_line: |
2434 | Serge | 496 | mov ecx, [putimg.real_sx] |
5201 | serge | 497 | .new_x: |
2434 | Serge | 498 | push [putimg.edi] |
499 | mov eax, [putimg.ebp+4] |
||
500 | call eax |
||
501 | cmp [ebp], bl |
||
502 | jne .skip |
||
5201 | serge | 503 | |
504 | ; store to LFB |
||
2465 | Serge | 505 | mov [LFB_BASE+edx], ax |
506 | shr eax, 16 |
||
507 | mov [LFB_BASE+edx+2], al |
||
5201 | serge | 508 | |
509 | .skip: |
||
2465 | Serge | 510 | add edx, 3 |
511 | inc ebp |
||
512 | dec ecx |
||
513 | jnz .new_x |
||
514 | |||
515 | add esi, [putimg.line_increment] |
||
5201 | serge | 516 | add edx, [putimg.screen_newline] |
517 | add ebp, [putimg.winmap_newline] |
||
2465 | Serge | 518 | |
519 | cmp [putimg.ebp], putimage_get1bpp |
||
520 | jz .correct |
||
521 | cmp [putimg.ebp], putimage_get2bpp |
||
522 | jz .correct |
||
523 | cmp [putimg.ebp], putimage_get4bpp |
||
524 | jnz @f |
||
5201 | serge | 525 | .correct: |
2465 | Serge | 526 | mov eax, [putimg.edi] |
527 | mov byte [eax], 80h |
||
5201 | serge | 528 | @@: |
2465 | Serge | 529 | dec edi |
530 | jnz .new_line |
||
5201 | serge | 531 | .finish: |
2465 | Serge | 532 | add esp, putimg.stack_data |
533 | popad |
||
534 | ret |
||
5201 | serge | 535 | |
2465 | Serge | 536 | ;------------------------------------------------------------------------------ |
5201 | serge | 537 | |
2465 | Serge | 538 | align 4 |
539 | put_image_end_24_old: |
||
5201 | serge | 540 | |
541 | .new_line: |
||
2465 | Serge | 542 | mov ecx, [putimg.real_sx] |
543 | ;-------------------------------------- |
||
544 | align 4 |
||
545 | .new_x: |
||
546 | push [putimg.edi] |
||
547 | mov eax, [putimg.ebp+4] |
||
548 | call eax |
||
549 | cmp [ebp], bl |
||
550 | jne .skip |
||
5201 | serge | 551 | |
2434 | Serge | 552 | push ecx |
553 | neg ecx |
||
554 | add ecx, [putimg.real_sx_and_abs_cx + 4] |
||
555 | shl ecx, 16 |
||
556 | add ecx, [putimg.real_sy_and_abs_cy + 4] |
||
557 | sub ecx, edi |
||
558 | |||
559 | ; check mouse area for putpixel |
||
2439 | Serge | 560 | call check_mouse_area_for_putpixel |
2434 | Serge | 561 | pop ecx |
5201 | serge | 562 | ; store to LFB |
2434 | Serge | 563 | mov [LFB_BASE+edx], ax |
564 | shr eax, 16 |
||
565 | mov [LFB_BASE+edx+2], al |
||
5201 | serge | 566 | |
567 | .skip: |
||
2434 | Serge | 568 | add edx, 3 |
569 | inc ebp |
||
570 | dec ecx |
||
571 | jnz .new_x |
||
2439 | Serge | 572 | |
2434 | Serge | 573 | add esi, [putimg.line_increment] |
5201 | serge | 574 | add edx, [putimg.screen_newline] |
575 | add ebp, [putimg.winmap_newline] |
||
2439 | Serge | 576 | |
2434 | Serge | 577 | cmp [putimg.ebp], putimage_get1bpp |
578 | jz .correct |
||
579 | cmp [putimg.ebp], putimage_get2bpp |
||
580 | jz .correct |
||
581 | cmp [putimg.ebp], putimage_get4bpp |
||
582 | jnz @f |
||
5201 | serge | 583 | |
584 | .correct: |
||
2434 | Serge | 585 | mov eax, [putimg.edi] |
586 | mov byte [eax], 80h |
||
5201 | serge | 587 | |
588 | @@: |
||
2434 | Serge | 589 | dec edi |
590 | jnz .new_line |
||
2465 | Serge | 591 | jmp put_image_end_24.finish |
5201 | serge | 592 | |
2465 | Serge | 593 | ;------------------------------------------------------------------------------ |
5201 | serge | 594 | |
2434 | Serge | 595 | align 4 |
2439 | Serge | 596 | put_image_end_24_new: |
5201 | serge | 597 | |
598 | .new_line: |
||
2439 | Serge | 599 | mov ecx, [putimg.real_sx] |
5201 | serge | 600 | |
601 | .new_x: |
||
2439 | Serge | 602 | push [putimg.edi] |
603 | mov eax, [putimg.ebp+4] |
||
604 | call eax |
||
605 | cmp [ebp], bl |
||
606 | jne .skip |
||
5201 | serge | 607 | |
2439 | Serge | 608 | push ecx |
5201 | serge | 609 | .sh: |
2987 | Serge | 610 | neg ecx |
611 | add ecx, [putimg.real_sx_and_abs_cx + 4] |
||
5201 | serge | 612 | |
2987 | Serge | 613 | ; check for X |
614 | cmp cx, [X_UNDER_sub_CUR_hot_x_add_curh] |
||
615 | jae .no_mouse_area |
||
616 | |||
617 | sub cx, [X_UNDER_subtraction_CUR_hot_x] |
||
618 | jb .no_mouse_area |
||
619 | |||
620 | shl ecx, 16 |
||
621 | |||
622 | add ecx, [putimg.real_sy_and_abs_cy + 4] |
||
2439 | Serge | 623 | sub ecx, edi |
5201 | serge | 624 | |
2439 | Serge | 625 | ; check for Y |
626 | cmp cx, [Y_UNDER_sub_CUR_hot_y_add_curh] |
||
627 | jae .no_mouse_area |
||
628 | |||
2987 | Serge | 629 | sub cx, [Y_UNDER_subtraction_CUR_hot_y] |
2439 | Serge | 630 | jb .no_mouse_area |
5201 | serge | 631 | |
2439 | Serge | 632 | ; check mouse area for putpixel |
633 | call check_mouse_area_for_putpixel_new.1 |
||
5201 | serge | 634 | cmp ecx, -1 ; SHIT HAPPENS? |
2987 | Serge | 635 | jne .no_mouse_area |
636 | |||
637 | mov ecx, [esp] |
||
638 | jmp .sh |
||
5201 | serge | 639 | |
640 | .no_mouse_area: |
||
2439 | Serge | 641 | pop ecx |
5201 | serge | 642 | |
643 | ; store to LFB |
||
2439 | Serge | 644 | mov [LFB_BASE+edx], ax |
645 | shr eax, 16 |
||
646 | mov [LFB_BASE+edx+2], al |
||
5201 | serge | 647 | |
648 | .skip: |
||
2439 | Serge | 649 | add edx, 3 |
650 | inc ebp |
||
651 | dec ecx |
||
652 | jnz .new_x |
||
653 | |||
654 | add esi, [putimg.line_increment] |
||
5201 | serge | 655 | add edx, [putimg.screen_newline] |
656 | add ebp, [putimg.winmap_newline] |
||
2439 | Serge | 657 | |
658 | cmp [putimg.ebp], putimage_get1bpp |
||
659 | jz .correct |
||
660 | cmp [putimg.ebp], putimage_get2bpp |
||
661 | jz .correct |
||
662 | cmp [putimg.ebp], putimage_get4bpp |
||
663 | jnz @f |
||
5201 | serge | 664 | |
665 | .correct: |
||
2439 | Serge | 666 | mov eax, [putimg.edi] |
667 | mov byte [eax], 80h |
||
5201 | serge | 668 | |
669 | @@: |
||
2439 | Serge | 670 | dec edi |
671 | jnz .new_line |
||
672 | jmp put_image_end_24.finish |
||
5201 | serge | 673 | |
2434 | Serge | 674 | ;------------------------------------------------------------------------------ |
5201 | serge | 675 | |
2434 | Serge | 676 | align 4 |
1 | ha | 677 | put_image_end_32: |
5201 | serge | 678 | |
2434 | Serge | 679 | mov edi, [putimg.real_sy] |
5201 | serge | 680 | |
2465 | Serge | 681 | ; check for hardware cursor |
682 | mov ecx, [_display.select_cursor] |
||
683 | cmp ecx, select_cursor |
||
684 | je put_image_end_32_new |
||
685 | cmp ecx, 0 |
||
686 | je put_image_end_32_old |
||
5201 | serge | 687 | |
688 | .new_line: |
||
2434 | Serge | 689 | mov ecx, [putimg.real_sx] |
5201 | serge | 690 | |
691 | .new_x: |
||
2434 | Serge | 692 | push [putimg.edi] |
693 | mov eax, [putimg.ebp+4] |
||
694 | call eax |
||
695 | cmp [ebp], bl |
||
696 | jne .skip |
||
5201 | serge | 697 | |
698 | ; store to LFB |
||
2434 | Serge | 699 | mov [LFB_BASE+edx], eax |
5201 | serge | 700 | |
701 | .skip: |
||
2434 | Serge | 702 | add edx, 4 |
703 | inc ebp |
||
704 | dec ecx |
||
705 | jnz .new_x |
||
2439 | Serge | 706 | |
2434 | Serge | 707 | add esi, [putimg.line_increment] |
5201 | serge | 708 | add edx, [putimg.screen_newline] |
709 | add ebp, [putimg.winmap_newline] |
||
2439 | Serge | 710 | |
2434 | Serge | 711 | cmp [putimg.ebp], putimage_get1bpp |
712 | jz .correct |
||
713 | cmp [putimg.ebp], putimage_get2bpp |
||
714 | jz .correct |
||
715 | cmp [putimg.ebp], putimage_get4bpp |
||
716 | jnz @f |
||
5201 | serge | 717 | |
718 | .correct: |
||
2434 | Serge | 719 | mov eax, [putimg.edi] |
720 | mov byte [eax], 80h |
||
5201 | serge | 721 | |
722 | @@: |
||
2434 | Serge | 723 | dec edi |
724 | jnz .new_line |
||
5201 | serge | 725 | |
726 | .finish: |
||
2434 | Serge | 727 | add esp, putimg.stack_data |
728 | popad |
||
3555 | Serge | 729 | cmp [SCR_MODE], 0x12 |
2439 | Serge | 730 | jne @f |
2434 | Serge | 731 | call VGA__putimage |
5201 | serge | 732 | @@: |
2434 | Serge | 733 | mov [EGA_counter], 1 |
734 | ret |
||
5201 | serge | 735 | |
2465 | Serge | 736 | ;------------------------------------------------------------------------------ |
5201 | serge | 737 | |
2465 | Serge | 738 | align 4 |
739 | put_image_end_32_old: |
||
5201 | serge | 740 | |
741 | .new_line: |
||
2465 | Serge | 742 | mov ecx, [putimg.real_sx] |
5201 | serge | 743 | .new_x: |
2465 | Serge | 744 | push [putimg.edi] |
745 | mov eax, [putimg.ebp+4] |
||
746 | call eax |
||
747 | cmp [ebp], bl |
||
748 | jne .skip |
||
5201 | serge | 749 | |
2465 | Serge | 750 | push ecx |
751 | neg ecx |
||
752 | add ecx, [putimg.real_sx_and_abs_cx + 4] |
||
753 | shl ecx, 16 |
||
754 | add ecx, [putimg.real_sy_and_abs_cy + 4] |
||
755 | sub ecx, edi |
||
756 | |||
757 | ; check mouse area for putpixel |
||
758 | call check_mouse_area_for_putpixel |
||
759 | pop ecx |
||
5201 | serge | 760 | ; store to LFB |
2465 | Serge | 761 | mov [LFB_BASE+edx], eax |
5201 | serge | 762 | |
763 | .skip: |
||
2465 | Serge | 764 | add edx, 4 |
765 | inc ebp |
||
766 | dec ecx |
||
767 | jnz .new_x |
||
768 | |||
769 | add esi, [putimg.line_increment] |
||
5201 | serge | 770 | add edx, [putimg.screen_newline] |
771 | add ebp, [putimg.winmap_newline] |
||
2465 | Serge | 772 | |
773 | cmp [putimg.ebp], putimage_get1bpp |
||
774 | jz .correct |
||
775 | cmp [putimg.ebp], putimage_get2bpp |
||
776 | jz .correct |
||
777 | cmp [putimg.ebp], putimage_get4bpp |
||
778 | jnz @f |
||
5201 | serge | 779 | |
780 | .correct: |
||
2465 | Serge | 781 | mov eax, [putimg.edi] |
782 | mov byte [eax], 80h |
||
5201 | serge | 783 | |
784 | @@: |
||
2465 | Serge | 785 | dec edi |
786 | jnz .new_line |
||
787 | jmp put_image_end_32.finish |
||
5201 | serge | 788 | |
2465 | Serge | 789 | ;------------------------------------------------------------------------------ |
5201 | serge | 790 | |
2465 | Serge | 791 | align 4 |
2439 | Serge | 792 | put_image_end_32_new: |
5201 | serge | 793 | |
794 | .new_line: |
||
2439 | Serge | 795 | mov ecx, [putimg.real_sx] |
5201 | serge | 796 | |
797 | .new_x: |
||
2439 | Serge | 798 | push [putimg.edi] |
799 | mov eax, [putimg.ebp+4] |
||
800 | call eax |
||
801 | cmp [ebp], bl |
||
802 | jne .skip |
||
5201 | serge | 803 | |
2439 | Serge | 804 | push ecx |
5201 | serge | 805 | |
806 | .sh: |
||
2987 | Serge | 807 | neg ecx |
808 | add ecx, [putimg.real_sx_and_abs_cx + 4] |
||
5201 | serge | 809 | |
2987 | Serge | 810 | ; check for X |
811 | cmp cx, [X_UNDER_sub_CUR_hot_x_add_curh] |
||
812 | jae .no_mouse_area |
||
813 | sub cx, [X_UNDER_subtraction_CUR_hot_x] |
||
814 | jb .no_mouse_area |
||
815 | shl ecx, 16 |
||
816 | |||
817 | add ecx, [putimg.real_sy_and_abs_cy + 4] |
||
2439 | Serge | 818 | sub ecx, edi |
5201 | serge | 819 | |
2439 | Serge | 820 | ; check for Y |
821 | cmp cx, [Y_UNDER_sub_CUR_hot_y_add_curh] |
||
822 | jae .no_mouse_area |
||
2987 | Serge | 823 | sub cx, [Y_UNDER_subtraction_CUR_hot_y] |
2439 | Serge | 824 | jb .no_mouse_area |
5201 | serge | 825 | |
2439 | Serge | 826 | ; check mouse area for putpixel |
827 | call check_mouse_area_for_putpixel_new.1 |
||
5201 | serge | 828 | cmp ecx, -1 ; SHIT HAPPENS? |
2987 | Serge | 829 | jne .no_mouse_area |
830 | |||
831 | mov ecx, [esp] |
||
832 | jmp .sh |
||
5201 | serge | 833 | |
834 | .no_mouse_area: |
||
2439 | Serge | 835 | pop ecx |
5201 | serge | 836 | |
837 | ; store to LFB |
||
2439 | Serge | 838 | mov [LFB_BASE+edx], eax |
5201 | serge | 839 | |
840 | .skip: |
||
2439 | Serge | 841 | add edx, 4 |
842 | inc ebp |
||
843 | dec ecx |
||
844 | jnz .new_x |
||
845 | |||
846 | add esi, [putimg.line_increment] |
||
5201 | serge | 847 | add edx, [putimg.screen_newline] |
848 | add ebp, [putimg.winmap_newline] |
||
2439 | Serge | 849 | |
850 | cmp [putimg.ebp], putimage_get1bpp |
||
851 | jz .correct |
||
852 | cmp [putimg.ebp], putimage_get2bpp |
||
853 | jz .correct |
||
854 | cmp [putimg.ebp], putimage_get4bpp |
||
855 | jnz @f |
||
5201 | serge | 856 | |
857 | .correct: |
||
2439 | Serge | 858 | mov eax, [putimg.edi] |
859 | mov byte [eax], 80h |
||
5201 | serge | 860 | |
861 | @@: |
||
2439 | Serge | 862 | dec edi |
863 | jnz .new_line |
||
864 | jmp put_image_end_32.finish |
||
5201 | serge | 865 | |
2434 | Serge | 866 | ;------------------------------------------------------------------------------ |
1 | ha | 867 | ; eax = x coordinate |
868 | ; ebx = y coordinate |
||
5201 | serge | 869 | ; ecx = xx RR GG BB |
870 | ; xx flags: |
||
871 | ; 0x01000000 color inversion |
||
872 | ; 0x02000000 used for draw_rectangle without top line (for drawwindow_III and drawwindow_IV) |
||
1 | ha | 873 | ; edi = 0x00000001 force |
874 | |||
5201 | serge | 875 | align 4 |
876 | __sys_putpixel: |
||
877 | |||
2434 | Serge | 878 | pushad |
5201 | serge | 879 | cmp [Screen_Max_X], eax |
880 | jb .exit |
||
881 | cmp [Screen_Max_Y], ebx |
||
882 | jb .exit |
||
2434 | Serge | 883 | test edi, 1 ; force ? |
884 | jnz .forced |
||
1300 | serge | 885 | |
5201 | serge | 886 | ; not forced |
2439 | Serge | 887 | mov edx, [d_width_calc_area + ebx*4] |
888 | add edx, [_WinMapAddress] |
||
2434 | Serge | 889 | movzx edx, byte [eax+edx] |
890 | cmp edx, [CURRENT_TASK] |
||
891 | jne .exit |
||
5201 | serge | 892 | |
893 | .forced: |
||
894 | ; check for color inversion |
||
2434 | Serge | 895 | test ecx, 0x01000000 |
5201 | serge | 896 | jz .no_inv |
2434 | Serge | 897 | |
5201 | serge | 898 | push eax ebx edx edi |
899 | call [GETPIXEL] |
||
900 | pop edi edx ebx eax |
||
901 | |||
2434 | Serge | 902 | not ecx |
903 | rol ecx, 8 |
||
904 | mov cl, [esp+32-8+3] |
||
905 | ror ecx, 8 |
||
906 | mov [esp+32-8], ecx |
||
5201 | serge | 907 | .no_inv: |
908 | call [PUTPIXEL] ; call the real put_pixel function |
||
909 | .exit: |
||
2434 | Serge | 910 | popad |
911 | ret |
||
5201 | serge | 912 | |
2434 | Serge | 913 | ;----------------------------------------------------------------------------- |
5201 | serge | 914 | ; eax = x |
915 | ; ebx = y |
||
916 | |||
1 | ha | 917 | align 4 |
5201 | serge | 918 | Vesa20_putpixel16: |
919 | |||
920 | mov ecx, eax |
||
921 | shl ecx, 16 |
||
922 | mov cx, bx |
||
923 | |||
924 | ; imul ebx, [BytesPerScanLine] ; ebx = y * y multiplier |
||
925 | mov ebx, [BPSLine_calc_area+ebx*4] |
||
926 | lea edi, [eax*2]; edi = x*2 |
||
927 | mov eax, [esp+32-8+4] |
||
928 | |||
929 | ; check for hardware cursor |
||
930 | cmp [_display.select_cursor], 0 |
||
931 | jne @f |
||
932 | ; check mouse area for putpixel |
||
933 | test eax, 0x04000000 |
||
934 | jnz @f |
||
935 | call check_mouse_area_for_putpixel |
||
936 | @@: |
||
937 | ; store to LFB |
||
938 | and eax, 00000000111110001111110011111000b |
||
939 | shr ah, 2 |
||
940 | shr ax, 3 |
||
941 | ror eax, 8 |
||
942 | add al, ah |
||
943 | rol eax, 8 |
||
944 | |||
945 | mov [LFB_BASE+ebx+edi], ax |
||
946 | ret |
||
947 | |||
948 | ;----------------------------------------------------------------------------- |
||
469 | serge | 949 | ; eax = x |
950 | ; ebx = y |
||
5201 | serge | 951 | |
952 | align 4 |
||
953 | Vesa20_putpixel16_new: |
||
954 | |||
2434 | Serge | 955 | mov ecx, eax |
956 | shl ecx, 16 |
||
957 | mov cx, bx |
||
1 | ha | 958 | |
2465 | Serge | 959 | ; imul ebx, [BytesPerScanLine] ; ebx = y * y multiplier |
2987 | Serge | 960 | mov ebx, [BPSLine_calc_area+ebx*4] |
5201 | serge | 961 | lea edi, [eax*2]; edi = x*2 |
962 | mov eax, [esp+32-8+4] |
||
963 | |||
964 | ; check for hardware cursor |
||
965 | cmp [_display.select_cursor], select_cursor |
||
966 | jne @f |
||
967 | ; check mouse area for putpixel |
||
968 | test eax, 0x04000000 |
||
969 | jnz @f |
||
970 | |||
971 | ; check for Y |
||
972 | cmp cx, [Y_UNDER_sub_CUR_hot_y_add_curh] |
||
973 | jae @f |
||
974 | sub cx, [Y_UNDER_subtraction_CUR_hot_y] |
||
975 | jb @f |
||
976 | rol ecx, 16 |
||
977 | |||
978 | ; check for X |
||
979 | cmp cx, [X_UNDER_sub_CUR_hot_x_add_curh] |
||
980 | jae @f |
||
981 | sub cx, [X_UNDER_subtraction_CUR_hot_x] |
||
982 | jb @f |
||
983 | ror ecx, 16 |
||
984 | |||
985 | call check_mouse_area_for_putpixel_new.1 |
||
986 | @@: |
||
987 | ; store to LFB |
||
988 | and eax, 00000000111110001111110011111000b |
||
989 | shr ah, 2 |
||
990 | shr ax, 3 |
||
991 | ror eax, 8 |
||
992 | add al, ah |
||
993 | rol eax, 8 |
||
994 | |||
995 | mov [LFB_BASE+ebx+edi], ax |
||
996 | ret |
||
997 | |||
998 | ;----------------------------------------------------------------------------- |
||
999 | ; eax = x |
||
1000 | ; ebx = y |
||
1001 | |||
1002 | align 4 |
||
1003 | Vesa20_putpixel24: |
||
1004 | |||
1005 | mov ecx, eax |
||
1006 | shl ecx, 16 |
||
1007 | mov cx, bx |
||
1008 | |||
1009 | ; imul ebx, [BytesPerScanLine] ; ebx = y * y multiplier |
||
1010 | mov ebx, [BPSLine_calc_area+ebx*4] |
||
2434 | Serge | 1011 | lea edi, [eax+eax*2]; edi = x*3 |
1012 | mov eax, [esp+32-8+4] |
||
5201 | serge | 1013 | |
2465 | Serge | 1014 | ; check for hardware cursor |
1015 | cmp [_display.select_cursor], 0 |
||
1016 | jne @f |
||
2434 | Serge | 1017 | ; check mouse area for putpixel |
1018 | test eax, 0x04000000 |
||
1019 | jnz @f |
||
2439 | Serge | 1020 | call check_mouse_area_for_putpixel |
5201 | serge | 1021 | @@: |
1022 | |||
1023 | ; store to LFB |
||
2434 | Serge | 1024 | mov [LFB_BASE+ebx+edi], ax |
1025 | shr eax, 16 |
||
1026 | mov [LFB_BASE+ebx+edi+2], al |
||
2439 | Serge | 1027 | ret |
5201 | serge | 1028 | |
2439 | Serge | 1029 | ;----------------------------------------------------------------------------- |
5201 | serge | 1030 | ; eax = x |
1031 | ; ebx = y |
||
1032 | |||
2439 | Serge | 1033 | align 4 |
1034 | Vesa20_putpixel24_new: |
||
5201 | serge | 1035 | |
2439 | Serge | 1036 | mov ecx, eax |
1037 | shl ecx, 16 |
||
1038 | mov cx, bx |
||
1039 | |||
2465 | Serge | 1040 | ; imul ebx, [BytesPerScanLine] ; ebx = y * y multiplier |
2987 | Serge | 1041 | mov ebx, [BPSLine_calc_area+ebx*4] |
2439 | Serge | 1042 | lea edi, [eax+eax*2]; edi = x*3 |
1043 | mov eax, [esp+32-8+4] |
||
5201 | serge | 1044 | |
2465 | Serge | 1045 | ; check for hardware cursor |
1046 | cmp [_display.select_cursor], select_cursor |
||
1047 | jne @f |
||
2439 | Serge | 1048 | ; check mouse area for putpixel |
1049 | test eax, 0x04000000 |
||
1050 | jnz @f |
||
5201 | serge | 1051 | |
2439 | Serge | 1052 | ; check for Y |
1053 | cmp cx, [Y_UNDER_sub_CUR_hot_y_add_curh] |
||
1054 | jae @f |
||
2987 | Serge | 1055 | sub cx, [Y_UNDER_subtraction_CUR_hot_y] |
1056 | jb @f |
||
5201 | serge | 1057 | rol ecx, 16 |
2987 | Serge | 1058 | |
2439 | Serge | 1059 | ; check for X |
1060 | cmp cx, [X_UNDER_sub_CUR_hot_x_add_curh] |
||
1061 | jae @f |
||
2987 | Serge | 1062 | sub cx, [X_UNDER_subtraction_CUR_hot_x] |
1063 | jb @f |
||
1064 | ror ecx, 16 |
||
1065 | |||
2439 | Serge | 1066 | call check_mouse_area_for_putpixel_new.1 |
5201 | serge | 1067 | @@: |
1068 | ; store to LFB |
||
2439 | Serge | 1069 | mov [LFB_BASE+ebx+edi], ax |
1070 | shr eax, 16 |
||
1071 | mov [LFB_BASE+ebx+edi+2], al |
||
2434 | Serge | 1072 | ret |
5201 | serge | 1073 | |
2434 | Serge | 1074 | ;----------------------------------------------------------------------------- |
5201 | serge | 1075 | ; eax = x |
1076 | ; ebx = y |
||
1077 | |||
2434 | Serge | 1078 | align 4 |
1 | ha | 1079 | Vesa20_putpixel32: |
5201 | serge | 1080 | |
2434 | Serge | 1081 | mov ecx, eax |
1082 | shl ecx, 16 |
||
1083 | mov cx, bx |
||
1 | ha | 1084 | |
2465 | Serge | 1085 | ; imul ebx, [BytesPerScanLine] ; ebx = y * y multiplier |
2987 | Serge | 1086 | mov ebx, [BPSLine_calc_area+ebx*4] |
5201 | serge | 1087 | lea edi, [ebx+eax*4] ; edi = x*4+(y*y multiplier) |
1088 | mov eax, [esp+32-8+4] ; eax = color |
||
1089 | |||
2465 | Serge | 1090 | ; check for hardware cursor |
1091 | cmp [_display.select_cursor], 0 |
||
1092 | jne @f |
||
2434 | Serge | 1093 | ; check mouse area for putpixel |
1094 | test eax, 0x04000000 |
||
1095 | jnz @f |
||
2439 | Serge | 1096 | call check_mouse_area_for_putpixel |
5201 | serge | 1097 | @@: |
2434 | Serge | 1098 | and eax, 0xffffff |
5201 | serge | 1099 | ; store to LFB |
2434 | Serge | 1100 | mov [LFB_BASE+edi], eax |
2439 | Serge | 1101 | ret |
5201 | serge | 1102 | |
2439 | Serge | 1103 | ;----------------------------------------------------------------------------- |
5201 | serge | 1104 | ; eax = x |
1105 | ; ebx = y |
||
1106 | |||
2439 | Serge | 1107 | align 4 |
1108 | Vesa20_putpixel32_new: |
||
5201 | serge | 1109 | |
2439 | Serge | 1110 | mov ecx, eax |
1111 | shl ecx, 16 |
||
1112 | mov cx, bx |
||
1113 | |||
2465 | Serge | 1114 | ; imul ebx, [BytesPerScanLine] ; ebx = y * y multiplier |
2987 | Serge | 1115 | mov ebx, [BPSLine_calc_area+ebx*4] |
5201 | serge | 1116 | lea edi, [ebx+eax*4] ; edi = x*4+(y*y multiplier) |
1117 | mov eax, [esp+32-8+4] ; eax = color |
||
1118 | |||
2465 | Serge | 1119 | ; check for hardware cursor |
1120 | cmp [_display.select_cursor], select_cursor |
||
1121 | jne @f |
||
2439 | Serge | 1122 | ; check mouse area for putpixel |
1123 | test eax, 0x04000000 |
||
1124 | jnz @f |
||
5201 | serge | 1125 | |
2439 | Serge | 1126 | ; check for Y |
1127 | cmp cx, [Y_UNDER_sub_CUR_hot_y_add_curh] |
||
1128 | jae @f |
||
2987 | Serge | 1129 | sub cx, [Y_UNDER_subtraction_CUR_hot_y] |
1130 | jb @f |
||
5201 | serge | 1131 | rol ecx, 16 |
2987 | Serge | 1132 | |
2439 | Serge | 1133 | ; check for X |
1134 | cmp cx, [X_UNDER_sub_CUR_hot_x_add_curh] |
||
1135 | jae @f |
||
2987 | Serge | 1136 | sub cx, [X_UNDER_subtraction_CUR_hot_x] |
1137 | jb @f |
||
1138 | ror ecx, 16 |
||
1139 | |||
2439 | Serge | 1140 | call check_mouse_area_for_putpixel_new.1 |
5201 | serge | 1141 | @@: |
1142 | and eax, 0x00ffffff |
||
1143 | ; store to LFB |
||
2439 | Serge | 1144 | mov [LFB_BASE+edi], eax |
2434 | Serge | 1145 | ret |
5201 | serge | 1146 | |
2434 | Serge | 1147 | ;----------------------------------------------------------------------------- |
5201 | serge | 1148 | |
2434 | Serge | 1149 | align 4 |
1 | ha | 1150 | calculate_edi: |
5201 | serge | 1151 | ; mov edi, ebx |
1152 | ; imul edi, [Screen_Max_X] |
||
1153 | ; add edi, ebx |
||
2465 | Serge | 1154 | mov edi, [d_width_calc_area + ebx*4] |
2434 | Serge | 1155 | add edi, eax |
1156 | ret |
||
5201 | serge | 1157 | |
1158 | |||
2434 | Serge | 1159 | ;----------------------------------------------------------------------------- |
1 | ha | 1160 | ; DRAWLINE |
2434 | Serge | 1161 | ;----------------------------------------------------------------------------- |
5201 | serge | 1162 | ; eax = x1 shl 16 + x2 |
1163 | ; ebx = y1 shl 16 + y2 |
||
1 | ha | 1164 | ; ecx = color |
1165 | ; edi = force ? |
||
1166 | |||
5201 | serge | 1167 | align 4 |
1168 | __sys_draw_line: |
||
1169 | |||
1 | ha | 1170 | dl_x1 equ esp+20 |
1171 | dl_y1 equ esp+16 |
||
1172 | dl_x2 equ esp+12 |
||
1173 | dl_y2 equ esp+8 |
||
1174 | dl_dx equ esp+4 |
||
1175 | dl_dy equ esp+0 |
||
1176 | |||
5201 | serge | 1177 | pusha |
1178 | |||
2434 | Serge | 1179 | xor edx, edx ; clear edx |
1180 | xor esi, esi ; unpack arguments |
||
1181 | xor ebp, ebp |
||
1182 | mov si, ax ; esi = x2 |
||
1183 | mov bp, bx ; ebp = y2 |
||
1184 | shr eax, 16 ; eax = x1 |
||
1185 | shr ebx, 16 ; ebx = y1 |
||
1186 | push eax ; save x1 |
||
1187 | push ebx ; save y1 |
||
1188 | push esi ; save x2 |
||
1189 | push ebp ; save y2 |
||
469 | serge | 1190 | ; checking x-axis... |
2434 | Serge | 1191 | sub esi, eax ; esi = x2-x1 |
1192 | push esi ; save y2-y1 |
||
1193 | jl .x2lx1 ; is x2 less than x1 ? |
||
1194 | jg .no_vline ; x1 > x2 ? |
||
1195 | mov edx, ebp ; else (if x1=x2) |
||
1196 | call vline |
||
1197 | push edx ; necessary to rightly restore stack frame at .exit |
||
1198 | jmp .exit |
||
5201 | serge | 1199 | |
1200 | .x2lx1: |
||
2434 | Serge | 1201 | neg esi ; get esi absolute value |
5201 | serge | 1202 | |
1203 | .no_vline: |
||
469 | serge | 1204 | ; checking y-axis... |
2434 | Serge | 1205 | sub ebp, ebx ; ebp = y2-y1 |
1206 | push ebp ; save y2-y1 |
||
1207 | jl .y2ly1 ; is y2 less than y1 ? |
||
1208 | jg .no_hline ; y1 > y2 ? |
||
5201 | serge | 1209 | mov edx, [dl_x2] ; else (if y1=y2) |
2434 | Serge | 1210 | call hline |
1211 | jmp .exit |
||
5201 | serge | 1212 | |
1213 | .y2ly1: |
||
2434 | Serge | 1214 | neg ebp ; get ebp absolute value |
5201 | serge | 1215 | |
1216 | .no_hline: |
||
2434 | Serge | 1217 | cmp ebp, esi |
1218 | jle .x_rules ; |y2-y1| < |x2-x1| ? |
||
5201 | serge | 1219 | cmp [dl_y2], ebx ; make sure y1 is at the begining |
2434 | Serge | 1220 | jge .no_reverse1 |
1221 | neg dword [dl_dx] |
||
1222 | mov edx, [dl_x2] |
||
1223 | mov [dl_x2], eax |
||
1224 | mov [dl_x1], edx |
||
1225 | mov edx, [dl_y2] |
||
1226 | mov [dl_y2], ebx |
||
1227 | mov [dl_y1], edx |
||
5201 | serge | 1228 | |
1229 | .no_reverse1: |
||
2434 | Serge | 1230 | mov eax, [dl_dx] |
1231 | cdq ; extend eax sing to edx |
||
1232 | shl eax, 16 ; using 16bit fix-point maths |
||
1233 | idiv ebp ; eax = ((x2-x1)*65536)/(y2-y1) |
||
5201 | serge | 1234 | |
2434 | Serge | 1235 | ; correction for the remainder of the division |
1236 | shl edx, 1 |
||
1237 | cmp ebp, edx |
||
1238 | jb @f |
||
1239 | inc eax |
||
5201 | serge | 1240 | @@: |
2434 | Serge | 1241 | mov edx, ebp ; edx = counter (number of pixels to draw) |
5201 | serge | 1242 | mov ebp, 1 shl 16 ; ebp = dy = 1.0 |
2434 | Serge | 1243 | mov esi, eax ; esi = dx |
1244 | jmp .y_rules |
||
5201 | serge | 1245 | .x_rules: |
2434 | Serge | 1246 | cmp [dl_x2], eax ; make sure x1 is at the begining |
1247 | jge .no_reverse2 |
||
1248 | neg dword [dl_dy] |
||
1249 | mov edx, [dl_x2] |
||
1250 | mov [dl_x2], eax |
||
1251 | mov [dl_x1], edx |
||
1252 | mov edx, [dl_y2] |
||
1253 | mov [dl_y2], ebx |
||
1254 | mov [dl_y1], edx |
||
5201 | serge | 1255 | .no_reverse2: |
2434 | Serge | 1256 | xor edx, edx |
1257 | mov eax, [dl_dy] |
||
1258 | cdq ; extend eax sing to edx |
||
1259 | shl eax, 16 ; using 16bit fix-point maths |
||
1260 | idiv esi ; eax = ((y2-y1)*65536)/(x2-x1) |
||
1261 | ; correction for the remainder of the division |
||
1262 | shl edx, 1 |
||
1263 | cmp esi, edx |
||
1264 | jb @f |
||
1265 | inc eax |
||
5201 | serge | 1266 | @@: |
2434 | Serge | 1267 | mov edx, esi ; edx = counter (number of pixels to draw) |
5201 | serge | 1268 | mov esi, 1 shl 16 ; esi = dx = 1.0 |
2434 | Serge | 1269 | mov ebp, eax ; ebp = dy |
5201 | serge | 1270 | |
1271 | .y_rules: |
||
2434 | Serge | 1272 | mov eax, [dl_x1] |
1273 | mov ebx, [dl_y1] |
||
1274 | shl eax, 16 |
||
1275 | shl ebx, 16 |
||
2465 | Serge | 1276 | |
5201 | serge | 1277 | and ecx, 0xFBFFFFFF ; negate 0x04000000 save to mouseunder area |
1278 | .draw: |
||
2434 | Serge | 1279 | push eax ebx |
5201 | serge | 1280 | |
2434 | Serge | 1281 | ; correction for the remainder of the division |
1282 | test ah, 0x80 |
||
1283 | jz @f |
||
1284 | add eax, 1 shl 16 |
||
5201 | serge | 1285 | @@: |
2434 | Serge | 1286 | shr eax, 16 |
1287 | ; correction for the remainder of the division |
||
1288 | test bh, 0x80 |
||
1289 | jz @f |
||
1290 | add ebx, 1 shl 16 |
||
5201 | serge | 1291 | @@: |
2434 | Serge | 1292 | shr ebx, 16 |
5201 | serge | 1293 | ; and ecx, 0xFBFFFFFF ; negate 0x04000000 save to mouseunder area |
2465 | Serge | 1294 | ; call [putpixel] |
1295 | call __sys_putpixel |
||
2434 | Serge | 1296 | pop ebx eax |
1297 | add ebx, ebp ; y = y+dy |
||
1298 | add eax, esi ; x = x+dx |
||
1299 | dec edx |
||
1300 | jnz .draw |
||
469 | serge | 1301 | ; force last drawn pixel to be at (x2,y2) |
2434 | Serge | 1302 | mov eax, [dl_x2] |
1303 | mov ebx, [dl_y2] |
||
5201 | serge | 1304 | ; and ecx, 0xFBFFFFFF ;n egate 0x04000000 save to mouseunder area |
2465 | Serge | 1305 | ; call [putpixel] |
1306 | call __sys_putpixel |
||
5201 | serge | 1307 | |
1308 | .exit: |
||
2434 | Serge | 1309 | add esp, 6*4 |
1310 | popa |
||
1311 | ; call [draw_pointer] |
||
1312 | ret |
||
5201 | serge | 1313 | |
2434 | Serge | 1314 | ;------------------------------------------------------------------------------ |
1 | ha | 1315 | ; draw an horizontal line |
1316 | ; eax = x1 |
||
1317 | ; edx = x2 |
||
1318 | ; ebx = y |
||
1319 | ; ecx = color |
||
1320 | ; edi = force ? |
||
5201 | serge | 1321 | |
1322 | align 4 |
||
1323 | hline: |
||
1324 | |||
2434 | Serge | 1325 | push eax edx |
1326 | cmp edx, eax ; make sure x2 is above x1 |
||
1327 | jge @f |
||
1328 | xchg eax, edx |
||
5201 | serge | 1329 | @@: |
2434 | Serge | 1330 | and ecx, 0xFBFFFFFF ;negate 0x04000000 save to mouseunder area |
5201 | serge | 1331 | @@: |
2465 | Serge | 1332 | ; call [putpixel] |
1333 | call __sys_putpixel |
||
2434 | Serge | 1334 | inc eax |
1335 | cmp eax, edx |
||
1336 | jle @b |
||
1337 | pop edx eax |
||
1338 | ret |
||
5201 | serge | 1339 | |
2434 | Serge | 1340 | ;------------------------------------------------------------------------------ |
1 | ha | 1341 | ; draw a vertical line |
1342 | ; eax = x |
||
1343 | ; ebx = y1 |
||
1344 | ; edx = y2 |
||
1345 | ; ecx = color |
||
1346 | ; edi = force ? |
||
5201 | serge | 1347 | |
1348 | align 4 |
||
1349 | vline: |
||
1350 | |||
2434 | Serge | 1351 | push ebx edx |
1352 | cmp edx, ebx ; make sure y2 is above y1 |
||
1353 | jge @f |
||
1354 | xchg ebx, edx |
||
5201 | serge | 1355 | @@: |
2434 | Serge | 1356 | and ecx, 0xFBFFFFFF ;negate 0x04000000 save to mouseunder area |
5201 | serge | 1357 | @@: |
2465 | Serge | 1358 | ; call [putpixel] |
1359 | call __sys_putpixel |
||
2434 | Serge | 1360 | inc ebx |
1361 | cmp ebx, edx |
||
1362 | jle @b |
||
1363 | pop edx ebx |
||
1364 | ret |
||
5201 | serge | 1365 | |
2434 | Serge | 1366 | ;------------------------------------------------------------------------------ |
5201 | serge | 1367 | ; eax cx |
1368 | ; ebx cy |
||
1369 | ; ecx xe |
||
1370 | ; edx ye |
||
1371 | ; edi color |
||
1372 | |||
2434 | Serge | 1373 | align 4 |
5201 | serge | 1374 | vesa20_drawbar: |
1375 | |||
1 | ha | 1376 | virtual at esp |
469 | serge | 1377 | drbar: |
1378 | .bar_sx dd ? |
||
1379 | .bar_sy dd ? |
||
1380 | .bar_cx dd ? |
||
1381 | .bar_cy dd ? |
||
1382 | .abs_cx dd ? |
||
1383 | .abs_cy dd ? |
||
1384 | .real_sx dd ? |
||
1385 | .real_sy dd ? |
||
1386 | .color dd ? |
||
1387 | .line_inc_scr dd ? |
||
1388 | .line_inc_map dd ? |
||
2434 | Serge | 1389 | .real_sx_and_abs_cx dd ? |
1390 | .real_sy_and_abs_cy dd ? |
||
1391 | .stack_data = 4*13 |
||
1 | ha | 1392 | end virtual |
5201 | serge | 1393 | |
2434 | Serge | 1394 | pushad |
1395 | sub esp, drbar.stack_data |
||
1396 | mov [drbar.color], edi |
||
1397 | sub edx, ebx |
||
5201 | serge | 1398 | jle .exit |
2434 | Serge | 1399 | sub ecx, eax |
5201 | serge | 1400 | jle .exit |
2434 | Serge | 1401 | mov [drbar.bar_sy], edx |
1402 | mov [drbar.bar_sx], ecx |
||
1403 | mov [drbar.bar_cx], eax |
||
1404 | mov [drbar.bar_cy], ebx |
||
1405 | mov edi, [TASK_BASE] |
||
5201 | serge | 1406 | add eax, [edi-twdw + WDATA.box.left] ; win_cx |
1407 | add ebx, [edi-twdw + WDATA.box.top] ; win_cy |
||
2434 | Serge | 1408 | mov [drbar.abs_cx], eax |
1409 | mov [drbar.abs_cy], ebx |
||
469 | serge | 1410 | ; real_sx = MIN(wnd_sx-bar_cx, bar_sx); |
5201 | serge | 1411 | mov ebx, [edi-twdw + WDATA.box.width] ; ebx = wnd_sx |
1412 | inc ebx ; WDATA.box.width is one pixel less than real window x-size |
||
2434 | Serge | 1413 | sub ebx, [drbar.bar_cx] |
1414 | ja @f |
||
5201 | serge | 1415 | .exit: |
2434 | Serge | 1416 | add esp, drbar.stack_data |
1417 | popad |
||
1418 | xor eax, eax |
||
1419 | inc eax |
||
1420 | ret |
||
5201 | serge | 1421 | @@: |
2434 | Serge | 1422 | cmp ebx, [drbar.bar_sx] |
1423 | jbe .end_x |
||
1424 | mov ebx, [drbar.bar_sx] |
||
5201 | serge | 1425 | .end_x: |
2434 | Serge | 1426 | mov [drbar.real_sx], ebx |
469 | serge | 1427 | ; real_sy = MIN(wnd_sy-bar_cy, bar_sy); |
5201 | serge | 1428 | mov ebx, [edi-twdw + WDATA.box.height] ; ebx = wnd_sy |
2434 | Serge | 1429 | inc ebx |
1430 | sub ebx, [drbar.bar_cy] |
||
1431 | ja @f |
||
1432 | add esp, drbar.stack_data |
||
1433 | popad |
||
1434 | xor eax, eax |
||
1435 | inc eax |
||
1436 | ret |
||
5201 | serge | 1437 | @@: |
2434 | Serge | 1438 | cmp ebx, [drbar.bar_sy] |
1439 | jbe .end_y |
||
1440 | mov ebx, [drbar.bar_sy] |
||
5201 | serge | 1441 | .end_y: |
2434 | Serge | 1442 | mov [drbar.real_sy], ebx |
469 | serge | 1443 | ; line_inc_map |
5201 | serge | 1444 | mov eax, [Screen_Max_X] |
2434 | Serge | 1445 | sub eax, [drbar.real_sx] |
5201 | serge | 1446 | inc eax |
2434 | Serge | 1447 | mov [drbar.line_inc_map], eax |
469 | serge | 1448 | ; line_inc_scr |
2434 | Serge | 1449 | mov eax, [drbar.real_sx] |
5201 | serge | 1450 | mov ebx, [_display.bytes_per_pixel] |
2434 | Serge | 1451 | imul eax, ebx |
1452 | neg eax |
||
3626 | Serge | 1453 | add eax, [_display.pitch] |
2434 | Serge | 1454 | mov [drbar.line_inc_scr], eax |
469 | serge | 1455 | ; pointer to screen |
2434 | Serge | 1456 | mov edx, [drbar.abs_cy] |
2465 | Serge | 1457 | ; imul edx, [BytesPerScanLine] |
2987 | Serge | 1458 | mov edx, [BPSLine_calc_area+edx*4] |
2434 | Serge | 1459 | mov eax, [drbar.abs_cx] |
1460 | imul eax, ebx |
||
1461 | add edx, eax |
||
469 | serge | 1462 | ; pointer to pixel map |
2434 | Serge | 1463 | mov eax, [drbar.abs_cy] |
5201 | serge | 1464 | ; imul eax, [Screen_Max_X] |
1465 | ; add eax, [drbar.abs_cy] |
||
2465 | Serge | 1466 | mov eax, [d_width_calc_area + eax*4] |
1467 | |||
2434 | Serge | 1468 | add eax, [drbar.abs_cx] |
1469 | add eax, [_WinMapAddress] |
||
1470 | xchg eax, ebp |
||
5201 | serge | 1471 | |
2434 | Serge | 1472 | mov ebx, [drbar.real_sx] |
1473 | add ebx, [drbar.abs_cx] |
||
1474 | mov [drbar.real_sx_and_abs_cx], ebx |
||
1475 | mov ebx, [drbar.real_sy] |
||
1476 | add ebx, [drbar.abs_cy] |
||
1477 | mov [drbar.real_sy_and_abs_cy], ebx |
||
1478 | |||
1479 | add edx, LFB_BASE |
||
5201 | serge | 1480 | |
469 | serge | 1481 | ; get process number |
2465 | Serge | 1482 | mov ebx, [CURRENT_TASK] ; bl - process num |
1483 | mov esi, [drbar.real_sy] |
||
1484 | mov eax, [drbar.color] ; BBGGRR00 |
||
1485 | rol eax, 8 |
||
1486 | mov bh, al ; 0x80 drawing gradient bars |
||
1487 | ror eax, 8 |
||
5201 | serge | 1488 | |
1489 | cmp byte [_display.bits_per_pixel], 16 |
||
1490 | je draw_bar_end_16 |
||
1491 | cmp byte [_display.bits_per_pixel], 24 |
||
1492 | je draw_bar_end_24 |
||
1493 | cmp byte [_display.bits_per_pixel], 32 |
||
1494 | je draw_bar_end_32 |
||
1495 | |||
2434 | Serge | 1496 | ;-------------------------------------- |
2465 | Serge | 1497 | ; eax - color high RRGGBB |
1 | ha | 1498 | ; bl - process num |
1499 | ; ecx - temp |
||
1500 | ; edx - pointer to screen |
||
1501 | ; esi - counter |
||
1502 | ; edi - counter |
||
5201 | serge | 1503 | |
1504 | align 4 |
||
1505 | draw_bar_end_24: |
||
1506 | |||
2465 | Serge | 1507 | ; check for hardware cursor |
1508 | mov ecx, [_display.select_cursor] |
||
1509 | cmp ecx, select_cursor |
||
1510 | je draw_bar_end_24_new |
||
1511 | cmp ecx, 0 |
||
1512 | je draw_bar_end_24_old |
||
5201 | serge | 1513 | .new_y: |
2434 | Serge | 1514 | mov edi, [drbar.real_sx] |
5201 | serge | 1515 | .new_x: |
2434 | Serge | 1516 | cmp byte [ebp], bl |
1517 | jne .skip |
||
5201 | serge | 1518 | |
1519 | ; store to LFB |
||
2434 | Serge | 1520 | mov [edx], ax |
1521 | shr eax, 16 |
||
1522 | mov [edx + 2], al |
||
5201 | serge | 1523 | .skip: |
469 | serge | 1524 | ; add pixel |
2434 | Serge | 1525 | add edx, 3 |
1526 | inc ebp |
||
1527 | dec edi |
||
1528 | jnz .new_x |
||
469 | serge | 1529 | ; add line |
2434 | Serge | 1530 | add edx, [drbar.line_inc_scr] |
1531 | add ebp, [drbar.line_inc_map] |
||
2465 | Serge | 1532 | ; drawing gradient bars |
1533 | test bh, 0x80 |
||
2434 | Serge | 1534 | jz @f |
2465 | Serge | 1535 | test al, al |
2434 | Serge | 1536 | jz @f |
2465 | Serge | 1537 | dec al |
5201 | serge | 1538 | @@: |
2434 | Serge | 1539 | dec esi |
1540 | jnz .new_y |
||
5201 | serge | 1541 | .end: |
2434 | Serge | 1542 | add esp, drbar.stack_data |
1543 | popad |
||
1544 | xor eax, eax |
||
1545 | ret |
||
5201 | serge | 1546 | |
2465 | Serge | 1547 | ;------------------------------------------------------------------------------ |
5201 | serge | 1548 | |
2465 | Serge | 1549 | align 4 |
1550 | draw_bar_end_24_old: |
||
5201 | serge | 1551 | |
1552 | .new_y: |
||
2465 | Serge | 1553 | mov edi, [drbar.real_sx] |
5201 | serge | 1554 | .new_x: |
2465 | Serge | 1555 | cmp byte [ebp], bl |
1556 | jne .skip |
||
5201 | serge | 1557 | |
2465 | Serge | 1558 | mov ecx, [drbar.real_sx_and_abs_cx] |
1559 | sub ecx, edi |
||
1560 | shl ecx, 16 |
||
1561 | add ecx, [drbar.real_sy_and_abs_cy] |
||
1562 | sub ecx, esi |
||
1563 | ; check mouse area for putpixel |
||
1564 | call check_mouse_area_for_putpixel |
||
5201 | serge | 1565 | ; store to LFB |
2465 | Serge | 1566 | mov [edx], ax |
1567 | shr eax, 16 |
||
1568 | mov [edx + 2], al |
||
1569 | mov eax, [drbar.color] |
||
5201 | serge | 1570 | .skip: |
2465 | Serge | 1571 | ; add pixel |
1572 | add edx, 3 |
||
1573 | inc ebp |
||
1574 | dec edi |
||
1575 | jnz .new_x |
||
1576 | ; add line |
||
1577 | add edx, [drbar.line_inc_scr] |
||
1578 | add ebp, [drbar.line_inc_map] |
||
1579 | ; drawing gradient bars |
||
1580 | test bh, 0x80 |
||
1581 | jz @f |
||
1582 | test al, al |
||
1583 | jz @f |
||
1584 | dec al |
||
5201 | serge | 1585 | @@: |
2465 | Serge | 1586 | dec esi |
1587 | jnz .new_y |
||
1588 | jmp draw_bar_end_24.end |
||
5201 | serge | 1589 | |
2465 | Serge | 1590 | ;------------------------------------------------------------------------------ |
5201 | serge | 1591 | |
2465 | Serge | 1592 | align 4 |
2434 | Serge | 1593 | draw_bar_end_24_new: |
5201 | serge | 1594 | |
1595 | .new_y: |
||
2434 | Serge | 1596 | mov edi, [drbar.real_sx] |
5201 | serge | 1597 | .new_x: |
2434 | Serge | 1598 | cmp byte [ebp], bl |
1599 | jne .skip |
||
5201 | serge | 1600 | |
2434 | Serge | 1601 | mov ecx, [drbar.real_sy_and_abs_cy] |
1602 | sub ecx, esi |
||
5201 | serge | 1603 | |
2434 | Serge | 1604 | ; check for Y |
1605 | cmp cx, [Y_UNDER_sub_CUR_hot_y_add_curh] |
||
1606 | jae .no_mouse_area |
||
2987 | Serge | 1607 | sub cx, [Y_UNDER_subtraction_CUR_hot_y] |
1608 | jb .no_mouse_area |
||
2434 | Serge | 1609 | rol ecx, 16 |
1610 | add ecx, [drbar.real_sx_and_abs_cx] |
||
1611 | sub ecx, edi |
||
5201 | serge | 1612 | |
2434 | Serge | 1613 | ; check for X |
2987 | Serge | 1614 | cmp cx, [X_UNDER_sub_CUR_hot_x_add_curh] |
1615 | jae .no_mouse_area |
||
1616 | sub cx, [X_UNDER_subtraction_CUR_hot_x] |
||
2434 | Serge | 1617 | jb .no_mouse_area |
5201 | serge | 1618 | ror ecx, 16 |
2434 | Serge | 1619 | |
1620 | ; check mouse area for putpixel |
||
2987 | Serge | 1621 | push eax |
2434 | Serge | 1622 | call check_mouse_area_for_putpixel_new.1 |
1623 | mov [edx], ax |
||
1624 | shr eax, 16 |
||
1625 | mov [edx + 2], al |
||
2987 | Serge | 1626 | pop eax |
2434 | Serge | 1627 | jmp .skip |
5201 | serge | 1628 | |
1629 | .no_mouse_area: |
||
1630 | ; store to LFB |
||
2465 | Serge | 1631 | mov [edx], ax |
1632 | ror eax, 16 |
||
1633 | mov [edx + 2], al |
||
1634 | rol eax, 16 |
||
5201 | serge | 1635 | .skip: |
1636 | |||
2434 | Serge | 1637 | ; add pixel |
1638 | add edx, 3 |
||
1639 | inc ebp |
||
1640 | dec edi |
||
1641 | jnz .new_x |
||
5201 | serge | 1642 | |
2434 | Serge | 1643 | ; add line |
1644 | add edx, [drbar.line_inc_scr] |
||
1645 | add ebp, [drbar.line_inc_map] |
||
5201 | serge | 1646 | |
2465 | Serge | 1647 | ; drawing gradient bars |
1648 | test bh, 0x80 |
||
2434 | Serge | 1649 | jz @f |
2465 | Serge | 1650 | test al, al |
2434 | Serge | 1651 | jz @f |
2465 | Serge | 1652 | dec al |
5201 | serge | 1653 | @@: |
2434 | Serge | 1654 | dec esi |
1655 | jnz .new_y |
||
1656 | jmp draw_bar_end_24.end |
||
5201 | serge | 1657 | |
2465 | Serge | 1658 | ;------------------------------------------------------------------------------ |
1659 | ; eax - color high RRGGBB |
||
1660 | ; bl - process num |
||
1661 | ; ecx - temp |
||
1662 | ; edx - pointer to screen |
||
1663 | ; esi - counter |
||
1664 | ; edi - counter |
||
5201 | serge | 1665 | |
1666 | draw_bar_end_32: |
||
1667 | |||
2465 | Serge | 1668 | ; check for hardware cursor |
1669 | mov ecx, [_display.select_cursor] |
||
1670 | cmp ecx, select_cursor |
||
1671 | je draw_bar_end_32_new |
||
1672 | cmp ecx, 0 |
||
1673 | je draw_bar_end_32_old |
||
5201 | serge | 1674 | |
1675 | .new_y: |
||
2434 | Serge | 1676 | mov edi, [drbar.real_sx] |
5201 | serge | 1677 | .new_x: |
2434 | Serge | 1678 | cmp byte [ebp], bl |
1679 | jne .skip |
||
5201 | serge | 1680 | |
1681 | ; store to LFB |
||
2434 | Serge | 1682 | mov [edx], eax |
2465 | Serge | 1683 | mov eax, [drbar.color] |
5201 | serge | 1684 | .skip: |
1685 | |||
469 | serge | 1686 | ; add pixel |
2434 | Serge | 1687 | add edx, 4 |
1688 | inc ebp |
||
1689 | dec edi |
||
1690 | jnz .new_x |
||
5201 | serge | 1691 | |
469 | serge | 1692 | ; add line |
2434 | Serge | 1693 | add edx, [drbar.line_inc_scr] |
1694 | add ebp, [drbar.line_inc_map] |
||
5201 | serge | 1695 | |
2465 | Serge | 1696 | ; drawing gradient bars |
1697 | test bh, 0x80 |
||
2434 | Serge | 1698 | jz @f |
1699 | test al, al |
||
1700 | jz @f |
||
1701 | dec al |
||
5201 | serge | 1702 | @@: |
2434 | Serge | 1703 | dec esi |
1704 | jnz .new_y |
||
5201 | serge | 1705 | .end: |
2434 | Serge | 1706 | add esp, drbar.stack_data |
1707 | popad |
||
3555 | Serge | 1708 | cmp [SCR_MODE], 0x12 |
2439 | Serge | 1709 | jne @f |
2434 | Serge | 1710 | call VGA_draw_bar |
5201 | serge | 1711 | @@: |
2434 | Serge | 1712 | xor eax, eax |
1713 | mov [EGA_counter], 1 |
||
1714 | ret |
||
5201 | serge | 1715 | |
2465 | Serge | 1716 | draw_bar_end_32_old: |
5201 | serge | 1717 | |
1718 | .new_y: |
||
2465 | Serge | 1719 | mov edi, [drbar.real_sx] |
5201 | serge | 1720 | .new_x: |
2465 | Serge | 1721 | cmp byte [ebp], bl |
1722 | jne .skip |
||
5201 | serge | 1723 | |
2465 | Serge | 1724 | mov ecx, [drbar.real_sx_and_abs_cx] |
1725 | sub ecx, edi |
||
1726 | shl ecx, 16 |
||
1727 | add ecx, [drbar.real_sy_and_abs_cy] |
||
1728 | sub ecx, esi |
||
1729 | |||
1730 | ; check mouse area for putpixel |
||
1731 | call check_mouse_area_for_putpixel |
||
5201 | serge | 1732 | ; store to LFB |
2465 | Serge | 1733 | mov [edx], eax |
1734 | mov eax, [drbar.color] |
||
5201 | serge | 1735 | .skip: |
2465 | Serge | 1736 | ; add pixel |
1737 | add edx, 4 |
||
1738 | inc ebp |
||
1739 | dec edi |
||
1740 | jnz .new_x |
||
1741 | ; add line |
||
1742 | add edx, [drbar.line_inc_scr] |
||
1743 | add ebp, [drbar.line_inc_map] |
||
1744 | ; drawing gradient bars |
||
1745 | test bh, 0x80 |
||
1746 | jz @f |
||
1747 | test al, al |
||
1748 | jz @f |
||
1749 | dec al |
||
5201 | serge | 1750 | @@: |
2465 | Serge | 1751 | dec esi |
1752 | jnz .new_y |
||
1753 | jmp draw_bar_end_32.end |
||
5201 | serge | 1754 | |
2465 | Serge | 1755 | ;------------------------------------------------------------------------------ |
5201 | serge | 1756 | |
2465 | Serge | 1757 | align 4 |
2434 | Serge | 1758 | draw_bar_end_32_new: |
5201 | serge | 1759 | |
1760 | .new_y: |
||
2434 | Serge | 1761 | mov edi, [drbar.real_sx] |
5201 | serge | 1762 | .new_x: |
2434 | Serge | 1763 | cmp byte [ebp], bl |
1764 | jne .skip |
||
5201 | serge | 1765 | |
2434 | Serge | 1766 | mov ecx, [drbar.real_sy_and_abs_cy] |
1767 | sub ecx, esi |
||
5201 | serge | 1768 | |
2434 | Serge | 1769 | ; check for Y |
1770 | cmp cx, [Y_UNDER_sub_CUR_hot_y_add_curh] |
||
1771 | jae .no_mouse_area |
||
2987 | Serge | 1772 | sub cx, [Y_UNDER_subtraction_CUR_hot_y] |
1773 | jb .no_mouse_area |
||
2434 | Serge | 1774 | rol ecx, 16 |
1775 | add ecx, [drbar.real_sx_and_abs_cx] |
||
1776 | sub ecx, edi |
||
5201 | serge | 1777 | |
2434 | Serge | 1778 | ; check for X |
2987 | Serge | 1779 | cmp cx, [X_UNDER_sub_CUR_hot_x_add_curh] |
1780 | jae .no_mouse_area |
||
1781 | sub cx, [X_UNDER_subtraction_CUR_hot_x] |
||
2434 | Serge | 1782 | jb .no_mouse_area |
5201 | serge | 1783 | ror ecx, 16 |
2434 | Serge | 1784 | |
1785 | ; check mouse area for putpixel |
||
2987 | Serge | 1786 | push eax |
2434 | Serge | 1787 | call check_mouse_area_for_putpixel_new.1 |
1788 | mov [edx], eax |
||
2987 | Serge | 1789 | pop eax |
2434 | Serge | 1790 | jmp .skip |
5201 | serge | 1791 | .no_mouse_area: |
1792 | |||
1793 | ; store to LFB |
||
2434 | Serge | 1794 | mov [edx], eax |
5201 | serge | 1795 | .skip: |
1796 | |||
1797 | ; add pixel |
||
1798 | add edx, 4 |
||
1799 | inc ebp |
||
1800 | dec edi |
||
1801 | jnz .new_x |
||
1802 | |||
1803 | ; add line |
||
1804 | add edx, [drbar.line_inc_scr] |
||
1805 | add ebp, [drbar.line_inc_map] |
||
1806 | |||
1807 | ; drawing gradient bars |
||
1808 | test bh, 0x80 |
||
1809 | jz @f |
||
1810 | test al, al |
||
1811 | jz @f |
||
1812 | dec al |
||
1813 | @@: |
||
1814 | dec esi |
||
1815 | jnz .new_y |
||
1816 | jmp draw_bar_end_32.end |
||
1817 | |||
1818 | ;------------------------------------------------------------------------------ |
||
1819 | ; eax - color high RRGGBB |
||
1820 | ; bl - process num |
||
1821 | ; ecx - temp |
||
1822 | ; edx - pointer to screen |
||
1823 | ; esi - counter |
||
1824 | ; edi - counter |
||
1825 | |||
2434 | Serge | 1826 | align 4 |
5201 | serge | 1827 | draw_bar_end_16: |
1828 | |||
1829 | ; check for hardware cursor |
||
1830 | mov ecx, [_display.select_cursor] |
||
1831 | cmp ecx, select_cursor |
||
1832 | je draw_bar_end_16_new |
||
1833 | cmp ecx, 0 |
||
1834 | je draw_bar_end_16_old |
||
1835 | .new_y: |
||
1836 | mov edi, [drbar.real_sx] |
||
1837 | .new_x: |
||
1838 | cmp byte [ebp], bl |
||
1839 | jne .skip |
||
1840 | ; convert to 16 bpp and store to LFB |
||
1841 | and eax, 00000000111110001111110011111000b |
||
1842 | shr ah, 2 |
||
1843 | shr ax, 3 |
||
1844 | ror eax, 8 |
||
1845 | add al, ah |
||
1846 | rol eax, 8 |
||
1847 | mov [edx], ax |
||
1848 | mov eax, [drbar.color] |
||
1849 | .skip: |
||
1850 | |||
1851 | ; add pixel |
||
1852 | add edx, 2 |
||
1853 | inc ebp |
||
1854 | dec edi |
||
1855 | jnz .new_x |
||
1856 | ; add line |
||
1857 | add edx, [drbar.line_inc_scr] |
||
1858 | add ebp, [drbar.line_inc_map] |
||
1859 | ; drawing gradient bars |
||
1860 | test bh, 0x80 |
||
1861 | jz @f |
||
1862 | test al, al |
||
1863 | jz @f |
||
1864 | dec al |
||
1865 | @@: |
||
1866 | dec esi |
||
1867 | jnz .new_y |
||
1868 | .end: |
||
1869 | add esp, drbar.stack_data |
||
1870 | popad |
||
1871 | cmp [SCR_MODE], 0x12 |
||
1872 | jne @f |
||
1873 | call VGA_draw_bar |
||
1874 | @@: |
||
1875 | xor eax, eax |
||
1876 | mov [EGA_counter], 1 |
||
1877 | ret |
||
1878 | |||
1879 | ;------------------------------------------------------------------------------ |
||
1880 | |||
1881 | align 4 |
||
1882 | draw_bar_end_16_old: |
||
1883 | |||
1884 | .new_y: |
||
1885 | mov edi, [drbar.real_sx] |
||
1886 | .new_x: |
||
1887 | cmp byte [ebp], bl |
||
1888 | jne .skip |
||
1889 | |||
1890 | mov ecx, [drbar.real_sx_and_abs_cx] |
||
1891 | sub ecx, edi |
||
1892 | shl ecx, 16 |
||
1893 | add ecx, [drbar.real_sy_and_abs_cy] |
||
1894 | sub ecx, esi |
||
1895 | |||
1896 | ; check mouse area for putpixel |
||
1897 | call check_mouse_area_for_putpixel |
||
1898 | ; convert to 16 bpp and store to LFB |
||
1899 | and eax, 00000000111110001111110011111000b |
||
1900 | shr ah, 2 |
||
1901 | shr ax, 3 |
||
1902 | ror eax, 8 |
||
1903 | add al, ah |
||
1904 | rol eax, 8 |
||
1905 | mov [edx], ax |
||
1906 | mov eax, [drbar.color] |
||
2434 | Serge | 1907 | .skip: |
5201 | serge | 1908 | |
2434 | Serge | 1909 | ; add pixel |
5201 | serge | 1910 | add edx, 2 |
2434 | Serge | 1911 | inc ebp |
1912 | dec edi |
||
1913 | jnz .new_x |
||
5201 | serge | 1914 | |
2434 | Serge | 1915 | ; add line |
1916 | add edx, [drbar.line_inc_scr] |
||
1917 | add ebp, [drbar.line_inc_map] |
||
5201 | serge | 1918 | |
2465 | Serge | 1919 | ; drawing gradient bars |
1920 | test bh, 0x80 |
||
2434 | Serge | 1921 | jz @f |
1922 | test al, al |
||
1923 | jz @f |
||
1924 | dec al |
||
5201 | serge | 1925 | @@: |
1926 | dec esi |
||
1927 | jnz .new_y |
||
1928 | jmp draw_bar_end_16.end |
||
1929 | |||
1930 | ;------------------------------------------------------------------------------ |
||
1931 | |||
2434 | Serge | 1932 | align 4 |
5201 | serge | 1933 | draw_bar_end_16_new: |
1934 | |||
1935 | .new_y: |
||
1936 | mov edi, [drbar.real_sx] |
||
1937 | .new_x: |
||
1938 | cmp byte [ebp], bl |
||
1939 | jne .skip |
||
1940 | |||
1941 | mov ecx, [drbar.real_sy_and_abs_cy] |
||
1942 | sub ecx, esi |
||
1943 | |||
1944 | ; check for Y |
||
1945 | cmp cx, [Y_UNDER_sub_CUR_hot_y_add_curh] |
||
1946 | jae .no_mouse_area |
||
1947 | sub cx, [Y_UNDER_subtraction_CUR_hot_y] |
||
1948 | jb .no_mouse_area |
||
1949 | rol ecx, 16 |
||
1950 | add ecx, [drbar.real_sx_and_abs_cx] |
||
1951 | sub ecx, edi |
||
1952 | |||
1953 | ; check for X |
||
1954 | cmp cx, [X_UNDER_sub_CUR_hot_x_add_curh] |
||
1955 | jae .no_mouse_area |
||
1956 | sub cx, [X_UNDER_subtraction_CUR_hot_x] |
||
1957 | jb .no_mouse_area |
||
1958 | ror ecx, 16 |
||
1959 | |||
1960 | ; check mouse area for putpixel |
||
1961 | push eax |
||
1962 | call check_mouse_area_for_putpixel_new.1 |
||
1963 | push eax |
||
1964 | and eax, 00000000111110001111110011111000b |
||
1965 | shr ah, 2 |
||
1966 | shr ax, 3 |
||
1967 | ror eax, 8 |
||
1968 | add al, ah |
||
1969 | rol eax, 8 |
||
1970 | mov [edx], ax |
||
1971 | pop eax |
||
1972 | pop eax |
||
1973 | jmp .skip |
||
1974 | |||
1975 | .no_mouse_area: |
||
1976 | ; convert to 16 bpp and store to LFB |
||
1977 | push eax |
||
1978 | and eax, 00000000111110001111110011111000b |
||
1979 | shr ah, 2 |
||
1980 | shr ax, 3 |
||
1981 | ror eax, 8 |
||
1982 | add al, ah |
||
1983 | rol eax, 8 |
||
1984 | mov [edx], ax |
||
1985 | pop eax |
||
1986 | .skip: |
||
1987 | |||
1988 | ; add pixel |
||
1989 | add edx, 2 |
||
1990 | inc ebp |
||
1991 | dec edi |
||
1992 | jnz .new_x |
||
1993 | |||
1994 | ; add line |
||
1995 | add edx, [drbar.line_inc_scr] |
||
1996 | add ebp, [drbar.line_inc_map] |
||
1997 | |||
1998 | ; drawing gradient bars |
||
1999 | test bh, 0x80 |
||
2000 | jz @f |
||
2001 | test al, al |
||
2002 | jz @f |
||
2003 | dec al |
||
2004 | @@: |
||
2434 | Serge | 2005 | dec esi |
2006 | jnz .new_y |
||
5201 | serge | 2007 | jmp draw_bar_end_16.end |
2008 | |||
2434 | Serge | 2009 | ;------------------------------------------------------------------------------ |
5201 | serge | 2010 | |
2434 | Serge | 2011 | align 4 |
1 | ha | 2012 | vesa20_drawbackground_tiled: |
5201 | serge | 2013 | |
527 | diamond | 2014 | pushad |
2015 | ; External loop for all y from start to end |
||
2016 | mov ebx, [draw_data+32+RECT.top] ; y start |
||
5201 | serge | 2017 | dp2: |
527 | diamond | 2018 | mov ebp, [draw_data+32+RECT.left] ; x start |
2019 | ; 1) Calculate pointers in WinMapAddress (does pixel belong to OS thread?) [ebp] |
||
2020 | ; and LFB data (output for our function) [edi] |
||
2465 | Serge | 2021 | ; mov eax, [BytesPerScanLine] |
2022 | ; mul ebx |
||
2987 | Serge | 2023 | mov eax, [BPSLine_calc_area+ebx*4] |
527 | diamond | 2024 | xchg ebp, eax |
2025 | add ebp, eax |
||
2026 | add ebp, eax |
||
5201 | serge | 2027 | cmp byte [_display.bytes_per_pixel], 2 |
2028 | je @f |
||
527 | diamond | 2029 | add ebp, eax |
5201 | serge | 2030 | cmp byte [_display.bytes_per_pixel], 3 |
2031 | je @f |
||
527 | diamond | 2032 | add ebp, eax |
5201 | serge | 2033 | |
2034 | @@: |
||
1300 | serge | 2035 | add ebp, LFB_BASE |
469 | serge | 2036 | ; ebp:=Y*BytesPerScanLine+X*BytesPerPixel+AddrLFB |
527 | diamond | 2037 | call calculate_edi |
2038 | xchg edi, ebp |
||
2434 | Serge | 2039 | add ebp, [_WinMapAddress] |
527 | diamond | 2040 | ; Now eax=x, ebx=y, edi->output, ebp=offset in WinMapAddress |
2041 | ; 2) Calculate offset in background memory block |
||
2042 | push eax |
||
2043 | xor edx, edx |
||
2044 | mov eax, ebx |
||
784 | diamond | 2045 | div dword [BgrDataHeight] ; edx := y mod BgrDataHeight |
527 | diamond | 2046 | pop eax |
2047 | push eax |
||
784 | diamond | 2048 | mov ecx, [BgrDataWidth] |
527 | diamond | 2049 | mov esi, edx |
784 | diamond | 2050 | imul esi, ecx ; esi := (y mod BgrDataHeight) * BgrDataWidth |
527 | diamond | 2051 | xor edx, edx |
784 | diamond | 2052 | div ecx ; edx := x mod BgrDataWidth |
2053 | sub ecx, edx |
||
527 | diamond | 2054 | add esi, edx ; esi := (y mod BgrDataHeight)*BgrDataWidth + (x mod BgrDataWidth) |
2055 | pop eax |
||
2056 | lea esi, [esi*3] |
||
2057 | add esi, [img_background] |
||
2058 | xor edx, edx |
||
2059 | inc edx |
||
2060 | ; 3) Loop through redraw rectangle and copy background data |
||
2061 | ; Registers meaning: |
||
2062 | ; eax = x, ebx = y (screen coordinates) |
||
2063 | ; ecx = deltax - number of pixels left in current tile block |
||
2064 | ; edx = 1 |
||
2065 | ; esi -> bgr memory, edi -> output |
||
2066 | ; ebp = offset in WinMapAddress |
||
5201 | serge | 2067 | dp3: |
1300 | serge | 2068 | cmp [ebp], dl |
5201 | serge | 2069 | jnz .next_pix |
2070 | |||
2434 | Serge | 2071 | push eax ecx |
2072 | mov ecx, eax |
||
2073 | shl ecx, 16 |
||
2074 | add ecx, ebx |
||
2075 | |||
2076 | mov eax, [esi] |
||
2465 | Serge | 2077 | |
2078 | ; check for hardware cursor |
||
2079 | cmp [_display.select_cursor], select_cursor |
||
2080 | je @f |
||
2081 | cmp [_display.select_cursor], 0 |
||
2082 | jne .no_mouseunder |
||
5201 | serge | 2083 | @@: |
2434 | Serge | 2084 | and eax, 0xffffff |
2085 | ; check mouse area for putpixel |
||
2086 | call [_display.check_mouse] |
||
5201 | serge | 2087 | .no_mouseunder: |
2088 | |||
2089 | cmp byte [_display.bits_per_pixel], 16 |
||
2090 | je .16bpp |
||
2091 | ; store to LFB |
||
2434 | Serge | 2092 | mov [edi], ax |
2093 | shr eax, 16 |
||
2094 | mov [edi+2], al |
||
5201 | serge | 2095 | pop ecx eax |
2096 | jmp .next_pix |
||
2434 | Serge | 2097 | |
5201 | serge | 2098 | .16bpp: |
2099 | ; convert to 16 bpp and store to LFB |
||
2100 | and eax, 00000000111110001111110011111000b |
||
2101 | shr ah, 2 |
||
2102 | shr ax, 3 |
||
2103 | ror eax, 8 |
||
2104 | add al, ah |
||
2105 | rol eax, 8 |
||
2106 | mov [edi], ax |
||
2434 | Serge | 2107 | pop ecx eax |
5201 | serge | 2108 | |
2109 | ; Advance to next pixel |
||
2110 | .next_pix: |
||
527 | diamond | 2111 | add esi, 3 |
5201 | serge | 2112 | add edi, [_display.bytes_per_pixel] |
2113 | |||
527 | diamond | 2114 | add ebp, edx |
2115 | add eax, edx |
||
2116 | cmp eax, [draw_data+32+RECT.right] |
||
2117 | ja dp4 |
||
2118 | sub ecx, edx |
||
2119 | jnz dp3 |
||
5201 | serge | 2120 | |
527 | diamond | 2121 | ; next tile block on x-axis |
2122 | mov ecx, [BgrDataWidth] |
||
2123 | sub esi, ecx |
||
2124 | sub esi, ecx |
||
2125 | sub esi, ecx |
||
2126 | jmp dp3 |
||
5201 | serge | 2127 | |
2128 | dp4: |
||
527 | diamond | 2129 | ; next scan line |
2130 | inc ebx |
||
2131 | cmp ebx, [draw_data+32+RECT.bottom] |
||
2132 | jbe dp2 |
||
2133 | popad |
||
2134 | mov [EGA_counter], 1 |
||
3555 | Serge | 2135 | cmp [SCR_MODE], 0x12 |
2439 | Serge | 2136 | jne @f |
527 | diamond | 2137 | call VGA_drawbackground |
5201 | serge | 2138 | @@: |
527 | diamond | 2139 | ret |
5201 | serge | 2140 | |
2434 | Serge | 2141 | ;------------------------------------------------------------------------------ |
5201 | serge | 2142 | |
2434 | Serge | 2143 | align 4 |
1 | ha | 2144 | vesa20_drawbackground_stretch: |
5201 | serge | 2145 | |
527 | diamond | 2146 | pushad |
2147 | ; Helper variables |
||
5201 | serge | 2148 | ; calculate 2^32*(BgrDataWidth-1) mod (ScreenWidth-1) |
527 | diamond | 2149 | mov eax, [BgrDataWidth] |
5201 | serge | 2150 | dec eax |
527 | diamond | 2151 | xor edx, edx |
5201 | serge | 2152 | div dword [Screen_Max_X] |
546 | diamond | 2153 | push eax ; high |
2154 | xor eax, eax |
||
5201 | serge | 2155 | div dword [Screen_Max_X] |
546 | diamond | 2156 | push eax ; low |
5201 | serge | 2157 | |
546 | diamond | 2158 | ; the same for height |
527 | diamond | 2159 | mov eax, [BgrDataHeight] |
5201 | serge | 2160 | dec eax |
527 | diamond | 2161 | xor edx, edx |
5201 | serge | 2162 | div dword [Screen_Max_Y] |
546 | diamond | 2163 | push eax ; high |
2164 | xor eax, eax |
||
5201 | serge | 2165 | div dword [Screen_Max_Y] |
546 | diamond | 2166 | push eax ; low |
5201 | serge | 2167 | |
527 | diamond | 2168 | ; External loop for all y from start to end |
2169 | mov ebx, [draw_data+32+RECT.top] ; y start |
||
2170 | mov ebp, [draw_data+32+RECT.left] ; x start |
||
2171 | ; 1) Calculate pointers in WinMapAddress (does pixel belong to OS thread?) [ebp] |
||
2172 | ; and LFB data (output for our function) [edi] |
||
2465 | Serge | 2173 | ; mov eax, [BytesPerScanLine] |
2174 | ; mul ebx |
||
2987 | Serge | 2175 | mov eax, [BPSLine_calc_area+ebx*4] |
527 | diamond | 2176 | xchg ebp, eax |
2177 | add ebp, eax |
||
2178 | add ebp, eax |
||
5201 | serge | 2179 | cmp byte [_display.bytes_per_pixel], 2 |
2180 | jz @f |
||
527 | diamond | 2181 | add ebp, eax |
5201 | serge | 2182 | cmp byte [_display.bytes_per_pixel], 3 |
527 | diamond | 2183 | jz @f |
2184 | add ebp, eax |
||
5201 | serge | 2185 | @@: |
2186 | |||
469 | serge | 2187 | ; ebp:=Y*BytesPerScanLine+X*BytesPerPixel+AddrLFB |
527 | diamond | 2188 | call calculate_edi |
2189 | xchg edi, ebp |
||
5201 | serge | 2190 | |
527 | diamond | 2191 | ; Now eax=x, ebx=y, edi->output, ebp=offset in WinMapAddress |
2192 | push ebx |
||
546 | diamond | 2193 | push eax |
527 | diamond | 2194 | ; 2) Calculate offset in background memory block |
2195 | mov eax, ebx |
||
546 | diamond | 2196 | imul ebx, dword [esp+12] |
2197 | mul dword [esp+8] |
||
755 | diamond | 2198 | add edx, ebx ; edx:eax = y * 2^32*(BgrDataHeight-1)/(ScreenHeight-1) |
546 | diamond | 2199 | mov esi, edx |
2200 | imul esi, [BgrDataWidth] |
||
2201 | push edx |
||
527 | diamond | 2202 | push eax |
546 | diamond | 2203 | mov eax, [esp+8] |
2204 | mul dword [esp+28] |
||
2205 | push eax |
||
2206 | mov eax, [esp+12] |
||
2207 | mul dword [esp+28] |
||
2208 | add [esp], edx |
||
755 | diamond | 2209 | pop edx ; edx:eax = x * 2^32*(BgrDataWidth-1)/(ScreenWidth-1) |
546 | diamond | 2210 | add esi, edx |
527 | diamond | 2211 | lea esi, [esi*3] |
2212 | add esi, [img_background] |
||
555 | diamond | 2213 | push eax |
2214 | push edx |
||
2215 | push esi |
||
5201 | serge | 2216 | |
555 | diamond | 2217 | ; 3) Smooth horizontal |
5201 | serge | 2218 | bgr_resmooth0: |
555 | diamond | 2219 | mov ecx, [esp+8] |
2220 | mov edx, [esp+4] |
||
2221 | mov esi, [esp] |
||
2222 | push edi |
||
2223 | mov edi, bgr_cur_line |
||
2224 | call smooth_line |
||
5201 | serge | 2225 | |
2226 | bgr_resmooth1: |
||
559 | diamond | 2227 | mov eax, [esp+16+4] |
2228 | inc eax |
||
2229 | cmp eax, [BgrDataHeight] |
||
2230 | jae bgr.no2nd |
||
555 | diamond | 2231 | mov ecx, [esp+8+4] |
2232 | mov edx, [esp+4+4] |
||
2233 | mov esi, [esp+4] |
||
2234 | add esi, [BgrDataWidth] |
||
2235 | add esi, [BgrDataWidth] |
||
2236 | add esi, [BgrDataWidth] |
||
2237 | mov edi, bgr_next_line |
||
2238 | call smooth_line |
||
5201 | serge | 2239 | |
2240 | bgr.no2nd: |
||
555 | diamond | 2241 | pop edi |
5201 | serge | 2242 | |
2243 | sdp3: |
||
555 | diamond | 2244 | xor esi, esi |
2245 | mov ecx, [esp+12] |
||
5201 | serge | 2246 | |
555 | diamond | 2247 | ; 4) Loop through redraw rectangle and copy background data |
527 | diamond | 2248 | ; Registers meaning: |
555 | diamond | 2249 | ; esi = offset in current line, edi -> output |
527 | diamond | 2250 | ; ebp = offset in WinMapAddress |
555 | diamond | 2251 | ; dword [esp] = offset in bgr data |
755 | diamond | 2252 | ; qword [esp+4] = x * 2^32 * (BgrDataWidth-1) / (ScreenWidth-1) |
2253 | ; qword [esp+12] = y * 2^32 * (BgrDataHeight-1) / (ScreenHeight-1) |
||
536 | diamond | 2254 | ; dword [esp+20] = x |
546 | diamond | 2255 | ; dword [esp+24] = y |
527 | diamond | 2256 | ; precalculated constants: |
755 | diamond | 2257 | ; qword [esp+28] = 2^32*(BgrDataHeight-1)/(ScreenHeight-1) |
2258 | ; qword [esp+36] = 2^32*(BgrDataWidth-1)/(ScreenWidth-1) |
||
5201 | serge | 2259 | |
2260 | sdp3a: |
||
2434 | Serge | 2261 | mov eax, [_WinMapAddress] |
1300 | serge | 2262 | cmp [ebp+eax], byte 1 |
527 | diamond | 2263 | jnz snbgp |
555 | diamond | 2264 | mov eax, [bgr_cur_line+esi] |
546 | diamond | 2265 | test ecx, ecx |
2266 | jz .novert |
||
555 | diamond | 2267 | mov ebx, [bgr_next_line+esi] |
2268 | call [overlapping_of_points_ptr] |
||
5201 | serge | 2269 | |
2270 | .novert: |
||
2434 | Serge | 2271 | push ecx |
2465 | Serge | 2272 | ; check for hardware cursor |
2273 | cmp [_display.select_cursor], select_cursor |
||
2274 | je @f |
||
2275 | cmp [_display.select_cursor], 0 |
||
2276 | jne .no_mouseunder |
||
5201 | serge | 2277 | @@: |
2434 | Serge | 2278 | mov ecx, [esp+20+4] ;x |
2279 | shl ecx, 16 |
||
2280 | add ecx, [esp+24+4] ;y |
||
2281 | ; check mouse area for putpixel |
||
2282 | call [_display.check_mouse] |
||
5201 | serge | 2283 | .no_mouseunder: |
2284 | |||
2285 | cmp [_display.bits_per_pixel], 16 |
||
2286 | jne .not_16bpp |
||
2287 | ; convert to 16 bpp and store to LFB |
||
2288 | and eax, 00000000111110001111110011111000b |
||
2289 | shr ah, 2 |
||
2290 | shr ax, 3 |
||
2291 | ror eax, 8 |
||
2292 | add al, ah |
||
2293 | rol eax, 8 |
||
1300 | serge | 2294 | mov [LFB_BASE+edi], ax |
5201 | serge | 2295 | pop ecx |
2296 | jmp snbgp |
||
2297 | .not_16bpp: |
||
2298 | |||
2299 | ; store to LFB |
||
2300 | mov [LFB_BASE+edi], ax |
||
527 | diamond | 2301 | shr eax, 16 |
1300 | serge | 2302 | mov [LFB_BASE+edi+2], al |
2434 | Serge | 2303 | pop ecx |
5201 | serge | 2304 | |
2305 | snbgp: |
||
2306 | add edi, [_display.bytes_per_pixel] |
||
527 | diamond | 2307 | add ebp, 1 |
536 | diamond | 2308 | mov eax, [esp+20] |
527 | diamond | 2309 | add eax, 1 |
536 | diamond | 2310 | mov [esp+20], eax |
555 | diamond | 2311 | add esi, 4 |
527 | diamond | 2312 | cmp eax, [draw_data+32+RECT.right] |
555 | diamond | 2313 | jbe sdp3a |
5201 | serge | 2314 | |
2315 | sdp4: |
||
527 | diamond | 2316 | ; next y |
546 | diamond | 2317 | mov ebx, [esp+24] |
527 | diamond | 2318 | add ebx, 1 |
546 | diamond | 2319 | mov [esp+24], ebx |
527 | diamond | 2320 | cmp ebx, [draw_data+32+RECT.bottom] |
2321 | ja sdpdone |
||
5201 | serge | 2322 | |
527 | diamond | 2323 | ; advance edi, ebp to next scan line |
2324 | sub eax, [draw_data+32+RECT.left] |
||
2325 | sub ebp, eax |
||
5201 | serge | 2326 | add ebp, [Screen_Max_X] |
2327 | add ebp, 1 |
||
527 | diamond | 2328 | sub edi, eax |
2329 | sub edi, eax |
||
5201 | serge | 2330 | cmp byte [_display.bytes_per_pixel], 2 |
2331 | jz @f |
||
527 | diamond | 2332 | sub edi, eax |
5201 | serge | 2333 | cmp byte [_display.bytes_per_pixel], 3 |
527 | diamond | 2334 | jz @f |
2335 | sub edi, eax |
||
5201 | serge | 2336 | |
2337 | @@: |
||
3626 | Serge | 2338 | add edi, [_display.pitch] |
527 | diamond | 2339 | ; restore ecx,edx; advance esi to next background line |
546 | diamond | 2340 | mov eax, [esp+28] |
2341 | mov ebx, [esp+32] |
||
2342 | add [esp+12], eax |
||
2343 | mov eax, [esp+16] |
||
2344 | adc [esp+16], ebx |
||
555 | diamond | 2345 | sub eax, [esp+16] |
2346 | mov ebx, eax |
||
546 | diamond | 2347 | lea eax, [eax*3] |
2348 | imul eax, [BgrDataWidth] |
||
555 | diamond | 2349 | sub [esp], eax |
527 | diamond | 2350 | mov eax, [draw_data+32+RECT.left] |
536 | diamond | 2351 | mov [esp+20], eax |
555 | diamond | 2352 | test ebx, ebx |
2353 | jz sdp3 |
||
2354 | cmp ebx, -1 |
||
2355 | jnz bgr_resmooth0 |
||
2356 | push edi |
||
2357 | mov esi, bgr_next_line |
||
2358 | mov edi, bgr_cur_line |
||
5201 | serge | 2359 | mov ecx, [Screen_Max_X] |
2360 | inc ecx |
||
2434 | Serge | 2361 | rep movsd |
555 | diamond | 2362 | jmp bgr_resmooth1 |
5201 | serge | 2363 | |
2364 | sdpdone: |
||
546 | diamond | 2365 | add esp, 44 |
527 | diamond | 2366 | popad |
2434 | Serge | 2367 | mov [EGA_counter], 1 |
3555 | Serge | 2368 | cmp [SCR_MODE], 0x12 |
2439 | Serge | 2369 | jne @f |
527 | diamond | 2370 | call VGA_drawbackground |
5201 | serge | 2371 | @@: |
527 | diamond | 2372 | ret |
1 | ha | 2373 | |
2434 | Serge | 2374 | ;-------------------------------------- |
5201 | serge | 2375 | |
555 | diamond | 2376 | align 4 |
2377 | smooth_line: |
||
2378 | mov al, [esi+2] |
||
2379 | shl eax, 16 |
||
2380 | mov ax, [esi] |
||
2381 | test ecx, ecx |
||
2382 | jz @f |
||
2383 | mov ebx, [esi+2] |
||
2384 | shr ebx, 8 |
||
2385 | call [overlapping_of_points_ptr] |
||
5201 | serge | 2386 | @@: |
555 | diamond | 2387 | stosd |
2388 | mov eax, [esp+20+8] |
||
2389 | add eax, 1 |
||
2390 | mov [esp+20+8], eax |
||
2391 | cmp eax, [draw_data+32+RECT.right] |
||
2392 | ja @f |
||
2393 | add ecx, [esp+36+8] |
||
2394 | mov eax, edx |
||
2395 | adc edx, [esp+40+8] |
||
2396 | sub eax, edx |
||
2397 | lea eax, [eax*3] |
||
2398 | sub esi, eax |
||
2399 | jmp smooth_line |
||
5201 | serge | 2400 | @@: |
555 | diamond | 2401 | mov eax, [draw_data+32+RECT.left] |
2402 | mov [esp+20+8], eax |
||
2403 | ret |
||
5201 | serge | 2404 | |
2434 | Serge | 2405 | ;------------------------------------------------------------------------------ |
5201 | serge | 2406 | |
555 | diamond | 2407 | align 16 |
379 | serge | 2408 | overlapping_of_points: |
555 | diamond | 2409 | if 0 |
2410 | ; this version of procedure works, but is slower than next version |
||
546 | diamond | 2411 | push ecx edx |
2412 | mov edx, eax |
||
2413 | push esi |
||
2414 | shr ecx, 24 |
||
2415 | mov esi, ecx |
||
2416 | mov ecx, ebx |
||
2417 | movzx ebx, dl |
||
527 | diamond | 2418 | movzx eax, cl |
546 | diamond | 2419 | sub eax, ebx |
527 | diamond | 2420 | movzx ebx, dh |
546 | diamond | 2421 | imul eax, esi |
2422 | add dl, ah |
||
527 | diamond | 2423 | movzx eax, ch |
546 | diamond | 2424 | sub eax, ebx |
2425 | imul eax, esi |
||
2426 | add dh, ah |
||
2427 | ror ecx, 16 |
||
2428 | ror edx, 16 |
||
2429 | movzx eax, cl |
||
2430 | movzx ebx, dl |
||
2431 | sub eax, ebx |
||
2432 | imul eax, esi |
||
2433 | pop esi |
||
2434 | add dl, ah |
||
2435 | mov eax, edx |
||
2436 | pop edx |
||
527 | diamond | 2437 | ror eax, 16 |
546 | diamond | 2438 | pop ecx |
527 | diamond | 2439 | ret |
555 | diamond | 2440 | else |
2441 | push ecx edx |
||
2442 | mov edx, eax |
||
2443 | push esi |
||
2444 | shr ecx, 26 |
||
2445 | mov esi, ecx |
||
2446 | mov ecx, ebx |
||
2447 | shl esi, 9 |
||
2448 | movzx ebx, dl |
||
2449 | movzx eax, cl |
||
2450 | sub eax, ebx |
||
2451 | movzx ebx, dh |
||
2452 | add dl, [BgrAuxTable+(eax+0x100)+esi] |
||
2453 | movzx eax, ch |
||
2454 | sub eax, ebx |
||
2455 | add dh, [BgrAuxTable+(eax+0x100)+esi] |
||
2456 | ror ecx, 16 |
||
2457 | ror edx, 16 |
||
2458 | movzx eax, cl |
||
2459 | movzx ebx, dl |
||
2460 | sub eax, ebx |
||
2461 | add dl, [BgrAuxTable+(eax+0x100)+esi] |
||
2462 | pop esi |
||
2463 | mov eax, edx |
||
2464 | pop edx |
||
2465 | ror eax, 16 |
||
2466 | pop ecx |
||
2467 | ret |
||
2468 | end if |
||
2469 | |||
5201 | serge | 2470 | |
2434 | Serge | 2471 | ;------------------------------------------------------------------------------ |
5201 | serge | 2472 | |
2434 | Serge | 2473 | align 4 |
555 | diamond | 2474 | init_background: |
5201 | serge | 2475 | |
555 | diamond | 2476 | mov edi, BgrAuxTable |
2477 | xor edx, edx |
||
5201 | serge | 2478 | |
2479 | .loop2: |
||
555 | diamond | 2480 | mov eax, edx |
2481 | shl eax, 8 |
||
2482 | neg eax |
||
2483 | mov ecx, 0x200 |
||
5201 | serge | 2484 | |
2485 | .loop1: |
||
555 | diamond | 2486 | mov byte [edi], ah |
2487 | inc edi |
||
2488 | add eax, edx |
||
2489 | loop .loop1 |
||
2490 | add dl, 4 |
||
2491 | jnz .loop2 |
||
564 | diamond | 2492 | test byte [cpu_caps+(CAPS_MMX/8)], 1 shl (CAPS_MMX mod 8) |
555 | diamond | 2493 | jz @f |
2494 | mov [overlapping_of_points_ptr], overlapping_of_points_mmx |
||
5201 | serge | 2495 | @@: |
555 | diamond | 2496 | ret |
5201 | serge | 2497 | |
2434 | Serge | 2498 | ;------------------------------------------------------------------------------ |
5201 | serge | 2499 | |
555 | diamond | 2500 | align 16 |
2501 | overlapping_of_points_mmx: |
||
5201 | serge | 2502 | |
555 | diamond | 2503 | movd mm0, eax |
2504 | movd mm4, eax |
||
2505 | movd mm1, ebx |
||
2506 | pxor mm2, mm2 |
||
2507 | punpcklbw mm0, mm2 |
||
2508 | punpcklbw mm1, mm2 |
||
2509 | psubw mm1, mm0 |
||
2510 | movd mm3, ecx |
||
2511 | psrld mm3, 24 |
||
2512 | packuswb mm3, mm3 |
||
2513 | packuswb mm3, mm3 |
||
2514 | pmullw mm1, mm3 |
||
2515 | psrlw mm1, 8 |
||
2516 | packuswb mm1, mm2 |
||
2517 | paddb mm4, mm1 |
||
2518 | movd eax, mm4 |
||
5201 | serge | 2519 | |
555 | diamond | 2520 | ret |
5201 | serge | 2521 | |
2434 | Serge | 2522 | ;------------------------------------------------------------------------------> |