WebSVN – Kolibri OS – Blame – /kernel/trunk/video/vesa20.inc

Rev	Author	Line No.	Line
2288	clevermous	1	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
		2	;; ;;
5154	hidnplayr	3	;; Copyright (C) KolibriOS team 2004-2014. All rights reserved. ;;
2288	clevermous	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	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
		19
		20	$Revision: 5154 $
		21
5154	hidnplayr	22	uglobal
		23	align 4
		24	bgr_cur_line rd 1920 ; maximum width of screen
		25	bgr_next_line rd 1920
		26	endg
2288	clevermous	27
5154	hidnplayr	28	iglobal
		29	align 4
		30	overlapping_of_points_ptr dd overlapping_of_points
		31	endg
2288	clevermous	32
		33
5154	hidnplayr	34	;-----------------------------------------------------------------------------
		35	; eax = x
		36	; ebx = y
2288	clevermous	37
5154	hidnplayr	38	align 4
		39	Vesa20_getpixel16:
2288	clevermous	40
5154	hidnplayr	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, [eax2] ; edi = x2
		59	add edi, ebx ; edi = x2+(yy 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
2288	clevermous	70	ret
5154	hidnplayr	71
2430	mario79	72	;-----------------------------------------------------------------------------
5154	hidnplayr	73	; eax = x
		74	; ebx = y
		75
2430	mario79	76	align 4
2288	clevermous	77	Vesa20_getpixel24:
5154	hidnplayr	78
		79	; check for hardware cursor
2451	mario79	80	cmp [_display.select_cursor], select_cursor
		81	je @f
2448	mario79	82	cmp [_display.select_cursor], 0
		83	jne .no_mouseunder
5154	hidnplayr	84	@@:
		85
		86	; check mouse area for putpixel
		87	test ecx, 0x04000000 ; don't load to mouseunder area
2430	mario79	88	jnz .no_mouseunder
		89	call [_display.check_m_pixel]
5154	hidnplayr	90	test ecx, ecx ; 0xff000000
2430	mario79	91	jnz @f
5154	hidnplayr	92
		93	.no_mouseunder:
2446	mario79	94	; imul ebx, [BytesPerScanLine] ; ebx = y * y multiplier
2480	mario79	95	mov ebx, [BPSLine_calc_area+ebx*4]
5154	hidnplayr	96	lea edi, [eax+eax2] ; edi = x3
		97	add edi, ebx ; edi = x3+(yy multiplier)
		98
2288	clevermous	99	mov ecx, [LFB_BASE+edi]
5154	hidnplayr	100	@@:
		101	and ecx, 0x00ffffff
2288	clevermous	102	ret
5154	hidnplayr	103
2430	mario79	104	;-----------------------------------------------------------------------------
5154	hidnplayr	105	; eax = x
		106	; ebx = y
		107
2430	mario79	108	align 4
2288	clevermous	109	Vesa20_getpixel32:
5154	hidnplayr	110
		111	; check for hardware cursor
2451	mario79	112	cmp [_display.select_cursor], select_cursor
		113	je @f
2448	mario79	114	cmp [_display.select_cursor], 0
		115	jne .no_mouseunder
5154	hidnplayr	116	@@:
		117
		118	; check mouse area for putpixel
		119	test ecx, 0x04000000 ; don't load to mouseunder area
2430	mario79	120	jnz .no_mouseunder
		121	call [_display.check_m_pixel]
5154	hidnplayr	122	test ecx, ecx ; 0xff000000
2430	mario79	123	jnz @f
5154	hidnplayr	124
		125	.no_mouseunder:
2446	mario79	126	; imul ebx, [BytesPerScanLine] ; ebx = y * y multiplier
2480	mario79	127	mov ebx, [BPSLine_calc_area+ebx*4]
5154	hidnplayr	128	lea edi, [ebx+eax4] ; edi = x4+(y*y multiplier)
		129
2288	clevermous	130	mov ecx, [LFB_BASE+edi]
5154	hidnplayr	131	@@:
		132	and ecx, 0x00ffffff
2288	clevermous	133	ret
5154	hidnplayr	134
2430	mario79	135	;-----------------------------------------------------------------------------
5154	hidnplayr	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
2288	clevermous	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 ?
2430	mario79	160	.real_sx_and_abs_cx dd ?
		161	.real_sy_and_abs_cy dd ?
		162	.stack_data = 4*14
2288	clevermous	163	.edi dd ?
		164	.esi dd ?
		165	.ebp dd ?
		166	.esp dd ?
		167	.ebx dd ?
		168	.edx dd ?
		169	.ecx dd ?
		170	.eax dd ?
		171	.ret_addr dd ?
		172	.arg_0 dd ?
		173	end virtual
5154	hidnplayr	174
2288	clevermous	175	pushad
		176	sub esp, putimg.stack_data
		177	; save pointer to image
		178	mov [putimg.pti], ebx
		179	; unpack the size
		180	mov eax, ecx
		181	and ecx, 0xFFFF
		182	shr eax, 16
		183	mov [putimg.image_sx], eax
		184	mov [putimg.image_sy], ecx
		185	; unpack the coordinates
		186	mov eax, edx
		187	and edx, 0xFFFF
		188	shr eax, 16
		189	mov [putimg.image_cx], eax
		190	mov [putimg.image_cy], edx
		191	; calculate absolute (i.e. screen) coordinates
		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
		199	; real_sx = MIN(wnd_sx-image_cx, image_sx);
5154	hidnplayr	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
2288	clevermous	202	sub ebx, [putimg.image_cx]
		203	ja @f
		204	add esp, putimg.stack_data
		205	popad
		206	ret
5154	hidnplayr	207
		208	@@:
2288	clevermous	209	cmp ebx, [putimg.image_sx]
		210	jbe .end_x
		211	mov ebx, [putimg.image_sx]
5154	hidnplayr	212	.end_x:
2288	clevermous	213	mov [putimg.real_sx], ebx
		214	; init real_sy
5154	hidnplayr	215	mov ebx, [eax-twdw + WDATA.box.height] ; ebx = wnd_sy
2288	clevermous	216	inc ebx
		217	sub ebx, [putimg.image_cy]
		218	ja @f
		219	add esp, putimg.stack_data
		220	popad
		221	ret
5154	hidnplayr	222
		223	@@:
2288	clevermous	224	cmp ebx, [putimg.image_sy]
		225	jbe .end_y
		226	mov ebx, [putimg.image_sy]
5154	hidnplayr	227	.end_y:
2288	clevermous	228	mov [putimg.real_sy], ebx
		229	; line increment
		230	mov eax, [putimg.image_sx]
		231	mov ecx, [putimg.real_sx]
		232	sub eax, ecx
		233	;; imul eax, [putimg.source_bpp]
		234	; lea eax, [eax + eax * 2]
		235	call esi
		236	add eax, [putimg.arg_0]
		237	mov [putimg.line_increment], eax
		238	; winmap new line increment
		239	mov eax, [Screen_Max_X]
		240	inc eax
		241	sub eax, [putimg.real_sx]
		242	mov [putimg.winmap_newline], eax
		243	; screen new line increment
3606	Serge	244	mov eax, [_display.pitch]
5154	hidnplayr	245	mov ebx, [_display.bytes_per_pixel]
2288	clevermous	246	imul ecx, ebx
		247	sub eax, ecx
		248	mov [putimg.screen_newline], eax
		249	; pointer to image
		250	mov esi, [putimg.pti]
		251	; pointer to screen
		252	mov edx, [putimg.abs_cy]
2446	mario79	253	; imul edx, [BytesPerScanLine]
2480	mario79	254	mov edx, [BPSLine_calc_area+edx*4]
2288	clevermous	255	mov eax, [putimg.abs_cx]
		256	imul eax, ebx
		257	add edx, eax
		258	; pointer to pixel map
		259	mov eax, [putimg.abs_cy]
2446	mario79	260	; imul eax, [Screen_Max_X]
		261	; add eax, [putimg.abs_cy]
		262	mov eax, [d_width_calc_area + eax*4]
		263
2288	clevermous	264	add eax, [putimg.abs_cx]
		265	add eax, [_WinMapAddress]
		266	xchg eax, ebp
5154	hidnplayr	267
2430	mario79	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
5154	hidnplayr	274
2288	clevermous	275	; get process number
		276	mov ebx, [CURRENT_TASK]
5154	hidnplayr	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
2288	clevermous	283	je put_image_end_32
5154	hidnplayr	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
2435	mario79	485	put_image_end_24:
5154	hidnplayr	486
2288	clevermous	487	mov edi, [putimg.real_sy]
5154	hidnplayr	488
2453	mario79	489	; check for hardware cursor
2455	mario79	490	mov ecx, [_display.select_cursor]
		491	cmp ecx, select_cursor
		492	je put_image_end_24_new
		493	cmp ecx, 0
2453	mario79	494	je put_image_end_24_old
5154	hidnplayr	495	.new_line:
2288	clevermous	496	mov ecx, [putimg.real_sx]
5154	hidnplayr	497	.new_x:
2288	clevermous	498	push [putimg.edi]
		499	mov eax, [putimg.ebp+4]
		500	call eax
		501	cmp [ebp], bl
		502	jne .skip
5154	hidnplayr	503
		504	; store to LFB
2453	mario79	505	mov [LFB_BASE+edx], ax
		506	shr eax, 16
		507	mov [LFB_BASE+edx+2], al
5154	hidnplayr	508
		509	.skip:
2453	mario79	510	add edx, 3
		511	inc ebp
		512	dec ecx
		513	jnz .new_x
		514
		515	add esi, [putimg.line_increment]
5154	hidnplayr	516	add edx, [putimg.screen_newline]
		517	add ebp, [putimg.winmap_newline]
2453	mario79	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
5154	hidnplayr	525	.correct:
2453	mario79	526	mov eax, [putimg.edi]
		527	mov byte [eax], 80h
5154	hidnplayr	528	@@:
2453	mario79	529	dec edi
		530	jnz .new_line
5154	hidnplayr	531	.finish:
2453	mario79	532	add esp, putimg.stack_data
		533	popad
		534	ret
5154	hidnplayr	535
2453	mario79	536	;------------------------------------------------------------------------------
5154	hidnplayr	537
2453	mario79	538	align 4
		539	put_image_end_24_old:
5154	hidnplayr	540
		541	.new_line:
2453	mario79	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
5154	hidnplayr	551
2430	mario79	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
2435	mario79	560	call check_mouse_area_for_putpixel
2430	mario79	561	pop ecx
5154	hidnplayr	562	; store to LFB
2288	clevermous	563	mov [LFB_BASE+edx], ax
		564	shr eax, 16
		565	mov [LFB_BASE+edx+2], al
5154	hidnplayr	566
		567	.skip:
2288	clevermous	568	add edx, 3
		569	inc ebp
		570	dec ecx
		571	jnz .new_x
2435	mario79	572
2288	clevermous	573	add esi, [putimg.line_increment]
5154	hidnplayr	574	add edx, [putimg.screen_newline]
		575	add ebp, [putimg.winmap_newline]
2435	mario79	576
2288	clevermous	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
5154	hidnplayr	583
		584	.correct:
2288	clevermous	585	mov eax, [putimg.edi]
		586	mov byte [eax], 80h
5154	hidnplayr	587
		588	@@:
2288	clevermous	589	dec edi
		590	jnz .new_line
2453	mario79	591	jmp put_image_end_24.finish
5154	hidnplayr	592
2453	mario79	593	;------------------------------------------------------------------------------
5154	hidnplayr	594
2430	mario79	595	align 4
2435	mario79	596	put_image_end_24_new:
5154	hidnplayr	597
		598	.new_line:
2435	mario79	599	mov ecx, [putimg.real_sx]
5154	hidnplayr	600
		601	.new_x:
2435	mario79	602	push [putimg.edi]
		603	mov eax, [putimg.ebp+4]
		604	call eax
		605	cmp [ebp], bl
		606	jne .skip
5154	hidnplayr	607
2435	mario79	608	push ecx
5154	hidnplayr	609	.sh:
2575	mario79	610	neg ecx
		611	add ecx, [putimg.real_sx_and_abs_cx + 4]
5154	hidnplayr	612
2575	mario79	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]
2435	mario79	623	sub ecx, edi
5154	hidnplayr	624
2435	mario79	625	; check for Y
		626	cmp cx, [Y_UNDER_sub_CUR_hot_y_add_curh]
		627	jae .no_mouse_area
		628
2575	mario79	629	sub cx, [Y_UNDER_subtraction_CUR_hot_y]
2435	mario79	630	jb .no_mouse_area
5154	hidnplayr	631
2435	mario79	632	; check mouse area for putpixel
		633	call check_mouse_area_for_putpixel_new.1
5154	hidnplayr	634	cmp ecx, -1 ; SHIT HAPPENS?
2575	mario79	635	jne .no_mouse_area
		636
		637	mov ecx, [esp]
		638	jmp .sh
5154	hidnplayr	639
		640	.no_mouse_area:
2435	mario79	641	pop ecx
5154	hidnplayr	642
		643	; store to LFB
2435	mario79	644	mov [LFB_BASE+edx], ax
		645	shr eax, 16
		646	mov [LFB_BASE+edx+2], al
5154	hidnplayr	647
		648	.skip:
2435	mario79	649	add edx, 3
		650	inc ebp
		651	dec ecx
		652	jnz .new_x
		653
		654	add esi, [putimg.line_increment]
5154	hidnplayr	655	add edx, [putimg.screen_newline]
		656	add ebp, [putimg.winmap_newline]
2435	mario79	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
5154	hidnplayr	664
		665	.correct:
2435	mario79	666	mov eax, [putimg.edi]
		667	mov byte [eax], 80h
5154	hidnplayr	668
		669	@@:
2435	mario79	670	dec edi
		671	jnz .new_line
		672	jmp put_image_end_24.finish
5154	hidnplayr	673
2430	mario79	674	;------------------------------------------------------------------------------
5154	hidnplayr	675
2430	mario79	676	align 4
2288	clevermous	677	put_image_end_32:
5154	hidnplayr	678
2288	clevermous	679	mov edi, [putimg.real_sy]
5154	hidnplayr	680
2453	mario79	681	; check for hardware cursor
2455	mario79	682	mov ecx, [_display.select_cursor]
		683	cmp ecx, select_cursor
		684	je put_image_end_32_new
		685	cmp ecx, 0
2453	mario79	686	je put_image_end_32_old
5154	hidnplayr	687
		688	.new_line:
2288	clevermous	689	mov ecx, [putimg.real_sx]
5154	hidnplayr	690
		691	.new_x:
2288	clevermous	692	push [putimg.edi]
		693	mov eax, [putimg.ebp+4]
		694	call eax
		695	cmp [ebp], bl
		696	jne .skip
5154	hidnplayr	697
		698	; store to LFB
2288	clevermous	699	mov [LFB_BASE+edx], eax
5154	hidnplayr	700
		701	.skip:
2288	clevermous	702	add edx, 4
		703	inc ebp
		704	dec ecx
		705	jnz .new_x
2435	mario79	706
2288	clevermous	707	add esi, [putimg.line_increment]
5154	hidnplayr	708	add edx, [putimg.screen_newline]
		709	add ebp, [putimg.winmap_newline]
2435	mario79	710
2288	clevermous	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
5154	hidnplayr	717
		718	.correct:
2288	clevermous	719	mov eax, [putimg.edi]
		720	mov byte [eax], 80h
5154	hidnplayr	721
		722	@@:
2288	clevermous	723	dec edi
		724	jnz .new_line
5154	hidnplayr	725
		726	.finish:
2288	clevermous	727	add esp, putimg.stack_data
		728	popad
3606	Serge	729	cmp [SCR_MODE], 0x12
2436	mario79	730	jne @f
2288	clevermous	731	call VGA__putimage
5154	hidnplayr	732	@@:
2288	clevermous	733	mov [EGA_counter], 1
		734	ret
5154	hidnplayr	735
2453	mario79	736	;------------------------------------------------------------------------------
5154	hidnplayr	737
2453	mario79	738	align 4
		739	put_image_end_32_old:
5154	hidnplayr	740
		741	.new_line:
2453	mario79	742	mov ecx, [putimg.real_sx]
5154	hidnplayr	743	.new_x:
2453	mario79	744	push [putimg.edi]
		745	mov eax, [putimg.ebp+4]
		746	call eax
		747	cmp [ebp], bl
		748	jne .skip
5154	hidnplayr	749
2453	mario79	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
5154	hidnplayr	760	; store to LFB
2453	mario79	761	mov [LFB_BASE+edx], eax
5154	hidnplayr	762
		763	.skip:
2453	mario79	764	add edx, 4
		765	inc ebp
		766	dec ecx
		767	jnz .new_x
		768
		769	add esi, [putimg.line_increment]
5154	hidnplayr	770	add edx, [putimg.screen_newline]
		771	add ebp, [putimg.winmap_newline]
2453	mario79	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
5154	hidnplayr	779
		780	.correct:
2453	mario79	781	mov eax, [putimg.edi]
		782	mov byte [eax], 80h
5154	hidnplayr	783
		784	@@:
2453	mario79	785	dec edi
		786	jnz .new_line
		787	jmp put_image_end_32.finish
5154	hidnplayr	788
2453	mario79	789	;------------------------------------------------------------------------------
5154	hidnplayr	790
2453	mario79	791	align 4
2435	mario79	792	put_image_end_32_new:
5154	hidnplayr	793
		794	.new_line:
2435	mario79	795	mov ecx, [putimg.real_sx]
5154	hidnplayr	796
		797	.new_x:
2435	mario79	798	push [putimg.edi]
		799	mov eax, [putimg.ebp+4]
		800	call eax
		801	cmp [ebp], bl
		802	jne .skip
5154	hidnplayr	803
2435	mario79	804	push ecx
5154	hidnplayr	805
		806	.sh:
2575	mario79	807	neg ecx
		808	add ecx, [putimg.real_sx_and_abs_cx + 4]
5154	hidnplayr	809
2575	mario79	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]
2435	mario79	818	sub ecx, edi
5154	hidnplayr	819
2435	mario79	820	; check for Y
		821	cmp cx, [Y_UNDER_sub_CUR_hot_y_add_curh]
		822	jae .no_mouse_area
2575	mario79	823	sub cx, [Y_UNDER_subtraction_CUR_hot_y]
2435	mario79	824	jb .no_mouse_area
5154	hidnplayr	825
2435	mario79	826	; check mouse area for putpixel
		827	call check_mouse_area_for_putpixel_new.1
5154	hidnplayr	828	cmp ecx, -1 ; SHIT HAPPENS?
2575	mario79	829	jne .no_mouse_area
		830
		831	mov ecx, [esp]
		832	jmp .sh
5154	hidnplayr	833
		834	.no_mouse_area:
2435	mario79	835	pop ecx
5154	hidnplayr	836
		837	; store to LFB
2435	mario79	838	mov [LFB_BASE+edx], eax
5154	hidnplayr	839
		840	.skip:
2435	mario79	841	add edx, 4
		842	inc ebp
		843	dec ecx
		844	jnz .new_x
		845
		846	add esi, [putimg.line_increment]
5154	hidnplayr	847	add edx, [putimg.screen_newline]
		848	add ebp, [putimg.winmap_newline]
2435	mario79	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
5154	hidnplayr	856
		857	.correct:
2435	mario79	858	mov eax, [putimg.edi]
		859	mov byte [eax], 80h
5154	hidnplayr	860
		861	@@:
2435	mario79	862	dec edi
		863	jnz .new_line
		864	jmp put_image_end_32.finish
5154	hidnplayr	865
2430	mario79	866	;------------------------------------------------------------------------------
2288	clevermous	867	; eax = x coordinate
		868	; ebx = y coordinate
5154	hidnplayr	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)
2288	clevermous	873	; edi = 0x00000001 force
		874
5154	hidnplayr	875	align 4
		876	__sys_putpixel:
		877
2288	clevermous	878	pushad
		879	cmp [Screen_Max_X], eax
		880	jb .exit
		881	cmp [Screen_Max_Y], ebx
		882	jb .exit
5154	hidnplayr	883	test edi, 1 ; force ?
2288	clevermous	884	jnz .forced
		885
5154	hidnplayr	886	; not forced
2438	mario79	887	mov edx, [d_width_calc_area + ebx*4]
		888	add edx, [_WinMapAddress]
2288	clevermous	889	movzx edx, byte [eax+edx]
		890	cmp edx, [CURRENT_TASK]
		891	jne .exit
5154	hidnplayr	892
		893	.forced:
		894	; check for color inversion
2288	clevermous	895	test ecx, 0x01000000
5154	hidnplayr	896	jz .no_inv
2430	mario79	897
5154	hidnplayr	898	push eax ebx edx edi
		899	call [GETPIXEL]
		900	pop edi edx ebx eax
		901
2288	clevermous	902	not ecx
2430	mario79	903	rol ecx, 8
		904	mov cl, [esp+32-8+3]
		905	ror ecx, 8
2288	clevermous	906	mov [esp+32-8], ecx
5154	hidnplayr	907	.no_inv:
		908	call [PUTPIXEL] ; call the real put_pixel function
		909	.exit:
2288	clevermous	910	popad
		911	ret
5154	hidnplayr	912
2430	mario79	913	;-----------------------------------------------------------------------------
5154	hidnplayr	914	; eax = x
		915	; ebx = y
		916
2288	clevermous	917	align 4
5154	hidnplayr	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, [eax2]; edi = x2
		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	;-----------------------------------------------------------------------------
2288	clevermous	949	; eax = x
		950	; ebx = y
5154	hidnplayr	951
		952	align 4
		953	Vesa20_putpixel16_new:
		954
2430	mario79	955	mov ecx, eax
		956	shl ecx, 16
		957	mov cx, bx
		958
2446	mario79	959	; imul ebx, [BytesPerScanLine] ; ebx = y * y multiplier
2480	mario79	960	mov ebx, [BPSLine_calc_area+ebx*4]
5154	hidnplayr	961	lea edi, [eax2]; edi = x2
		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]
2288	clevermous	1011	lea edi, [eax+eax2]; edi = x3
		1012	mov eax, [esp+32-8+4]
5154	hidnplayr	1013
2448	mario79	1014	; check for hardware cursor
		1015	cmp [_display.select_cursor], 0
		1016	jne @f
2430	mario79	1017	; check mouse area for putpixel
		1018	test eax, 0x04000000
		1019	jnz @f
2436	mario79	1020	call check_mouse_area_for_putpixel
5154	hidnplayr	1021	@@:
		1022
		1023	; store to LFB
2288	clevermous	1024	mov [LFB_BASE+ebx+edi], ax
		1025	shr eax, 16
		1026	mov [LFB_BASE+ebx+edi+2], al
2436	mario79	1027	ret
5154	hidnplayr	1028
2436	mario79	1029	;-----------------------------------------------------------------------------
5154	hidnplayr	1030	; eax = x
		1031	; ebx = y
		1032
2436	mario79	1033	align 4
		1034	Vesa20_putpixel24_new:
5154	hidnplayr	1035
2436	mario79	1036	mov ecx, eax
		1037	shl ecx, 16
		1038	mov cx, bx
		1039
2446	mario79	1040	; imul ebx, [BytesPerScanLine] ; ebx = y * y multiplier
2480	mario79	1041	mov ebx, [BPSLine_calc_area+ebx*4]
2436	mario79	1042	lea edi, [eax+eax2]; edi = x3
		1043	mov eax, [esp+32-8+4]
5154	hidnplayr	1044
2448	mario79	1045	; check for hardware cursor
		1046	cmp [_display.select_cursor], select_cursor
		1047	jne @f
2436	mario79	1048	; check mouse area for putpixel
		1049	test eax, 0x04000000
		1050	jnz @f
5154	hidnplayr	1051
2436	mario79	1052	; check for Y
		1053	cmp cx, [Y_UNDER_sub_CUR_hot_y_add_curh]
		1054	jae @f
2575	mario79	1055	sub cx, [Y_UNDER_subtraction_CUR_hot_y]
		1056	jb @f
5154	hidnplayr	1057	rol ecx, 16
2575	mario79	1058
2436	mario79	1059	; check for X
		1060	cmp cx, [X_UNDER_sub_CUR_hot_x_add_curh]
		1061	jae @f
2575	mario79	1062	sub cx, [X_UNDER_subtraction_CUR_hot_x]
		1063	jb @f
		1064	ror ecx, 16
		1065
2436	mario79	1066	call check_mouse_area_for_putpixel_new.1
5154	hidnplayr	1067	@@:
		1068	; store to LFB
2436	mario79	1069	mov [LFB_BASE+ebx+edi], ax
		1070	shr eax, 16
		1071	mov [LFB_BASE+ebx+edi+2], al
2288	clevermous	1072	ret
5154	hidnplayr	1073
2430	mario79	1074	;-----------------------------------------------------------------------------
5154	hidnplayr	1075	; eax = x
		1076	; ebx = y
		1077
2288	clevermous	1078	align 4
		1079	Vesa20_putpixel32:
5154	hidnplayr	1080
2430	mario79	1081	mov ecx, eax
		1082	shl ecx, 16
		1083	mov cx, bx
		1084
2446	mario79	1085	; imul ebx, [BytesPerScanLine] ; ebx = y * y multiplier
2480	mario79	1086	mov ebx, [BPSLine_calc_area+ebx*4]
5154	hidnplayr	1087	lea edi, [ebx+eax4] ; edi = x4+(y*y multiplier)
		1088	mov eax, [esp+32-8+4] ; eax = color
		1089
2448	mario79	1090	; check for hardware cursor
		1091	cmp [_display.select_cursor], 0
		1092	jne @f
2430	mario79	1093	; check mouse area for putpixel
		1094	test eax, 0x04000000
		1095	jnz @f
2436	mario79	1096	call check_mouse_area_for_putpixel
5154	hidnplayr	1097	@@:
2430	mario79	1098	and eax, 0xffffff
5154	hidnplayr	1099	; store to LFB
2288	clevermous	1100	mov [LFB_BASE+edi], eax
2436	mario79	1101	ret
5154	hidnplayr	1102
2436	mario79	1103	;-----------------------------------------------------------------------------
5154	hidnplayr	1104	; eax = x
		1105	; ebx = y
		1106
2436	mario79	1107	align 4
		1108	Vesa20_putpixel32_new:
5154	hidnplayr	1109
2436	mario79	1110	mov ecx, eax
		1111	shl ecx, 16
		1112	mov cx, bx
		1113
2446	mario79	1114	; imul ebx, [BytesPerScanLine] ; ebx = y * y multiplier
2480	mario79	1115	mov ebx, [BPSLine_calc_area+ebx*4]
5154	hidnplayr	1116	lea edi, [ebx+eax4] ; edi = x4+(y*y multiplier)
		1117	mov eax, [esp+32-8+4] ; eax = color
		1118
2448	mario79	1119	; check for hardware cursor
		1120	cmp [_display.select_cursor], select_cursor
		1121	jne @f
2436	mario79	1122	; check mouse area for putpixel
		1123	test eax, 0x04000000
		1124	jnz @f
5154	hidnplayr	1125
2436	mario79	1126	; check for Y
		1127	cmp cx, [Y_UNDER_sub_CUR_hot_y_add_curh]
		1128	jae @f
2575	mario79	1129	sub cx, [Y_UNDER_subtraction_CUR_hot_y]
		1130	jb @f
5154	hidnplayr	1131	rol ecx, 16
2575	mario79	1132
2436	mario79	1133	; check for X
		1134	cmp cx, [X_UNDER_sub_CUR_hot_x_add_curh]
		1135	jae @f
2575	mario79	1136	sub cx, [X_UNDER_subtraction_CUR_hot_x]
		1137	jb @f
		1138	ror ecx, 16
		1139
2436	mario79	1140	call check_mouse_area_for_putpixel_new.1
5154	hidnplayr	1141	@@:
		1142	and eax, 0x00ffffff
		1143	; store to LFB
2436	mario79	1144	mov [LFB_BASE+edi], eax
2288	clevermous	1145	ret
5154	hidnplayr	1146
2430	mario79	1147	;-----------------------------------------------------------------------------
5154	hidnplayr	1148
2430	mario79	1149	align 4
2288	clevermous	1150	calculate_edi:
2446	mario79	1151	; mov edi, ebx
		1152	; imul edi, [Screen_Max_X]
		1153	; add edi, ebx
		1154	mov edi, [d_width_calc_area + ebx*4]
2288	clevermous	1155	add edi, eax
		1156	ret
5154	hidnplayr	1157
		1158
2430	mario79	1159	;-----------------------------------------------------------------------------
2288	clevermous	1160	; DRAWLINE
2430	mario79	1161	;-----------------------------------------------------------------------------
5154	hidnplayr	1162	; eax = x1 shl 16 + x2
		1163	; ebx = y1 shl 16 + y2
2288	clevermous	1164	; ecx = color
		1165	; edi = force ?
		1166
5154	hidnplayr	1167	align 4
		1168	__sys_draw_line:
		1169
2288	clevermous	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
5154	hidnplayr	1177	pusha
		1178
		1179	xor edx, edx ; clear edx
		1180	xor esi, esi ; unpack arguments
2288	clevermous	1181	xor ebp, ebp
5154	hidnplayr	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
2288	clevermous	1190	; checking x-axis...
5154	hidnplayr	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)
2288	clevermous	1196	call vline
5154	hidnplayr	1197	push edx ; necessary to rightly restore stack frame at .exit
2288	clevermous	1198	jmp .exit
5154	hidnplayr	1199
		1200	.x2lx1:
		1201	neg esi ; get esi absolute value
		1202
		1203	.no_vline:
2288	clevermous	1204	; checking y-axis...
5154	hidnplayr	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 ?
		1209	mov edx, [dl_x2] ; else (if y1=y2)
2288	clevermous	1210	call hline
		1211	jmp .exit
5154	hidnplayr	1212
		1213	.y2ly1:
		1214	neg ebp ; get ebp absolute value
		1215
		1216	.no_hline:
2288	clevermous	1217	cmp ebp, esi
5154	hidnplayr	1218	jle .x_rules ; \|y2-y1\| < \|x2-x1\| ?
		1219	cmp [dl_y2], ebx ; make sure y1 is at the begining
2288	clevermous	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
5154	hidnplayr	1228
		1229	.no_reverse1:
2288	clevermous	1230	mov eax, [dl_dx]
5154	hidnplayr	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)
		1234
2353	mario79	1235	; correction for the remainder of the division
		1236	shl edx, 1
		1237	cmp ebp, edx
		1238	jb @f
		1239	inc eax
5154	hidnplayr	1240	@@:
		1241	mov edx, ebp ; edx = counter (number of pixels to draw)
		1242	mov ebp, 1 shl 16 ; ebp = dy = 1.0
		1243	mov esi, eax ; esi = dx
2288	clevermous	1244	jmp .y_rules
5154	hidnplayr	1245	.x_rules:
		1246	cmp [dl_x2], eax ; make sure x1 is at the begining
2288	clevermous	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
5154	hidnplayr	1255	.no_reverse2:
2288	clevermous	1256	xor edx, edx
		1257	mov eax, [dl_dy]
5154	hidnplayr	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)
2353	mario79	1261	; correction for the remainder of the division
		1262	shl edx, 1
		1263	cmp esi, edx
		1264	jb @f
		1265	inc eax
5154	hidnplayr	1266	@@:
		1267	mov edx, esi ; edx = counter (number of pixels to draw)
		1268	mov esi, 1 shl 16 ; esi = dx = 1.0
		1269	mov ebp, eax ; ebp = dy
		1270
		1271	.y_rules:
2288	clevermous	1272	mov eax, [dl_x1]
		1273	mov ebx, [dl_y1]
		1274	shl eax, 16
		1275	shl ebx, 16
2455	mario79	1276
5154	hidnplayr	1277	and ecx, 0xFBFFFFFF ; negate 0x04000000 save to mouseunder area
		1278	.draw:
2288	clevermous	1279	push eax ebx
5154	hidnplayr	1280
2353	mario79	1281	; correction for the remainder of the division
		1282	test ah, 0x80
		1283	jz @f
		1284	add eax, 1 shl 16
5154	hidnplayr	1285	@@:
2288	clevermous	1286	shr eax, 16
2353	mario79	1287	; correction for the remainder of the division
		1288	test bh, 0x80
		1289	jz @f
		1290	add ebx, 1 shl 16
5154	hidnplayr	1291	@@:
2288	clevermous	1292	shr ebx, 16
5154	hidnplayr	1293	; and ecx, 0xFBFFFFFF ; negate 0x04000000 save to mouseunder area
2453	mario79	1294	; call [putpixel]
		1295	call __sys_putpixel
2288	clevermous	1296	pop ebx eax
		1297	add ebx, ebp ; y = y+dy
		1298	add eax, esi ; x = x+dx
		1299	dec edx
		1300	jnz .draw
		1301	; force last drawn pixel to be at (x2,y2)
		1302	mov eax, [dl_x2]
		1303	mov ebx, [dl_y2]
5154	hidnplayr	1304	; and ecx, 0xFBFFFFFF ;n egate 0x04000000 save to mouseunder area
2453	mario79	1305	; call [putpixel]
		1306	call __sys_putpixel
5154	hidnplayr	1307
		1308	.exit:
2288	clevermous	1309	add esp, 6*4
		1310	popa
2430	mario79	1311	; call [draw_pointer]
2288	clevermous	1312	ret
5154	hidnplayr	1313
2430	mario79	1314	;------------------------------------------------------------------------------
2288	clevermous	1315	; draw an horizontal line
		1316	; eax = x1
		1317	; edx = x2
		1318	; ebx = y
		1319	; ecx = color
		1320	; edi = force ?
5154	hidnplayr	1321
		1322	align 4
		1323	hline:
		1324
2288	clevermous	1325	push eax edx
		1326	cmp edx, eax ; make sure x2 is above x1
		1327	jge @f
		1328	xchg eax, edx
5154	hidnplayr	1329	@@:
2430	mario79	1330	and ecx, 0xFBFFFFFF ;negate 0x04000000 save to mouseunder area
5154	hidnplayr	1331	@@:
2453	mario79	1332	; call [putpixel]
		1333	call __sys_putpixel
2288	clevermous	1334	inc eax
		1335	cmp eax, edx
		1336	jle @b
		1337	pop edx eax
		1338	ret
5154	hidnplayr	1339
2430	mario79	1340	;------------------------------------------------------------------------------
2288	clevermous	1341	; draw a vertical line
		1342	; eax = x
		1343	; ebx = y1
		1344	; edx = y2
		1345	; ecx = color
		1346	; edi = force ?
5154	hidnplayr	1347
		1348	align 4
		1349	vline:
		1350
2288	clevermous	1351	push ebx edx
		1352	cmp edx, ebx ; make sure y2 is above y1
		1353	jge @f
		1354	xchg ebx, edx
5154	hidnplayr	1355	@@:
2430	mario79	1356	and ecx, 0xFBFFFFFF ;negate 0x04000000 save to mouseunder area
5154	hidnplayr	1357	@@:
2453	mario79	1358	; call [putpixel]
		1359	call __sys_putpixel
2288	clevermous	1360	inc ebx
		1361	cmp ebx, edx
		1362	jle @b
		1363	pop edx ebx
		1364	ret
5154	hidnplayr	1365
2430	mario79	1366	;------------------------------------------------------------------------------
5154	hidnplayr	1367	; eax cx
		1368	; ebx cy
		1369	; ecx xe
		1370	; edx ye
		1371	; edi color
		1372
2430	mario79	1373	align 4
5154	hidnplayr	1374	vesa20_drawbar:
		1375
2288	clevermous	1376	virtual at esp
		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 ?
2430	mario79	1389	.real_sx_and_abs_cx dd ?
		1390	.real_sy_and_abs_cy dd ?
		1391	.stack_data = 4*13
2288	clevermous	1392	end virtual
5154	hidnplayr	1393
2288	clevermous	1394	pushad
		1395	sub esp, drbar.stack_data
		1396	mov [drbar.color], edi
		1397	sub edx, ebx
5154	hidnplayr	1398	jle .exit
2288	clevermous	1399	sub ecx, eax
5154	hidnplayr	1400	jle .exit
2288	clevermous	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]
5154	hidnplayr	1406	add eax, [edi-twdw + WDATA.box.left] ; win_cx
		1407	add ebx, [edi-twdw + WDATA.box.top] ; win_cy
2288	clevermous	1408	mov [drbar.abs_cx], eax
		1409	mov [drbar.abs_cy], ebx
		1410	; real_sx = MIN(wnd_sx-bar_cx, bar_sx);
5154	hidnplayr	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
2288	clevermous	1413	sub ebx, [drbar.bar_cx]
		1414	ja @f
5154	hidnplayr	1415	.exit:
2288	clevermous	1416	add esp, drbar.stack_data
		1417	popad
		1418	xor eax, eax
		1419	inc eax
		1420	ret
5154	hidnplayr	1421	@@:
2288	clevermous	1422	cmp ebx, [drbar.bar_sx]
		1423	jbe .end_x
		1424	mov ebx, [drbar.bar_sx]
5154	hidnplayr	1425	.end_x:
2288	clevermous	1426	mov [drbar.real_sx], ebx
		1427	; real_sy = MIN(wnd_sy-bar_cy, bar_sy);
5154	hidnplayr	1428	mov ebx, [edi-twdw + WDATA.box.height] ; ebx = wnd_sy
2288	clevermous	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
5154	hidnplayr	1437	@@:
2288	clevermous	1438	cmp ebx, [drbar.bar_sy]
		1439	jbe .end_y
		1440	mov ebx, [drbar.bar_sy]
5154	hidnplayr	1441	.end_y:
2288	clevermous	1442	mov [drbar.real_sy], ebx
		1443	; line_inc_map
		1444	mov eax, [Screen_Max_X]
		1445	sub eax, [drbar.real_sx]
		1446	inc eax
		1447	mov [drbar.line_inc_map], eax
		1448	; line_inc_scr
		1449	mov eax, [drbar.real_sx]
5154	hidnplayr	1450	mov ebx, [_display.bytes_per_pixel]
2288	clevermous	1451	imul eax, ebx
		1452	neg eax
3606	Serge	1453	add eax, [_display.pitch]
2288	clevermous	1454	mov [drbar.line_inc_scr], eax
		1455	; pointer to screen
		1456	mov edx, [drbar.abs_cy]
2446	mario79	1457	; imul edx, [BytesPerScanLine]
2480	mario79	1458	mov edx, [BPSLine_calc_area+edx*4]
2288	clevermous	1459	mov eax, [drbar.abs_cx]
		1460	imul eax, ebx
		1461	add edx, eax
		1462	; pointer to pixel map
		1463	mov eax, [drbar.abs_cy]
2446	mario79	1464	; imul eax, [Screen_Max_X]
		1465	; add eax, [drbar.abs_cy]
		1466	mov eax, [d_width_calc_area + eax*4]
		1467
2288	clevermous	1468	add eax, [drbar.abs_cx]
		1469	add eax, [_WinMapAddress]
		1470	xchg eax, ebp
5154	hidnplayr	1471
2430	mario79	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
5154	hidnplayr	1480
2288	clevermous	1481	; get process number
2446	mario79	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
5154	hidnplayr	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
2430	mario79	1496	;--------------------------------------
2446	mario79	1497	; eax - color high RRGGBB
2288	clevermous	1498	; bl - process num
		1499	; ecx - temp
		1500	; edx - pointer to screen
		1501	; esi - counter
		1502	; edi - counter
5154	hidnplayr	1503
		1504	align 4
		1505	draw_bar_end_24:
		1506
2453	mario79	1507	; check for hardware cursor
2455	mario79	1508	mov ecx, [_display.select_cursor]
		1509	cmp ecx, select_cursor
		1510	je draw_bar_end_24_new
		1511	cmp ecx, 0
2453	mario79	1512	je draw_bar_end_24_old
5154	hidnplayr	1513	.new_y:
2288	clevermous	1514	mov edi, [drbar.real_sx]
5154	hidnplayr	1515	.new_x:
2288	clevermous	1516	cmp byte [ebp], bl
		1517	jne .skip
5154	hidnplayr	1518
		1519	; store to LFB
2453	mario79	1520	mov [edx], ax
		1521	shr eax, 16
		1522	mov [edx + 2], al
5154	hidnplayr	1523	.skip:
2453	mario79	1524	; add pixel
		1525	add edx, 3
		1526	inc ebp
		1527	dec edi
		1528	jnz .new_x
		1529	; add line
		1530	add edx, [drbar.line_inc_scr]
		1531	add ebp, [drbar.line_inc_map]
		1532	; drawing gradient bars
		1533	test bh, 0x80
		1534	jz @f
		1535	test al, al
		1536	jz @f
		1537	dec al
5154	hidnplayr	1538	@@:
2453	mario79	1539	dec esi
		1540	jnz .new_y
5154	hidnplayr	1541	.end:
2453	mario79	1542	add esp, drbar.stack_data
		1543	popad
		1544	xor eax, eax
		1545	ret
5154	hidnplayr	1546
2453	mario79	1547	;------------------------------------------------------------------------------
5154	hidnplayr	1548
2453	mario79	1549	align 4
		1550	draw_bar_end_24_old:
5154	hidnplayr	1551
		1552	.new_y:
2453	mario79	1553	mov edi, [drbar.real_sx]
5154	hidnplayr	1554	.new_x:
2453	mario79	1555	cmp byte [ebp], bl
		1556	jne .skip
5154	hidnplayr	1557
2446	mario79	1558	mov ecx, [drbar.real_sx_and_abs_cx]
2430	mario79	1559	sub ecx, edi
		1560	shl ecx, 16
2446	mario79	1561	add ecx, [drbar.real_sy_and_abs_cy]
2430	mario79	1562	sub ecx, esi
		1563	; check mouse area for putpixel
		1564	call check_mouse_area_for_putpixel
5154	hidnplayr	1565	; store to LFB
2430	mario79	1566	mov [edx], ax
		1567	shr eax, 16
		1568	mov [edx + 2], al
2446	mario79	1569	mov eax, [drbar.color]
5154	hidnplayr	1570	.skip:
2288	clevermous	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]
2446	mario79	1579	; drawing gradient bars
		1580	test bh, 0x80
2288	clevermous	1581	jz @f
2446	mario79	1582	test al, al
2288	clevermous	1583	jz @f
2446	mario79	1584	dec al
5154	hidnplayr	1585	@@:
2288	clevermous	1586	dec esi
		1587	jnz .new_y
2453	mario79	1588	jmp draw_bar_end_24.end
5154	hidnplayr	1589
2453	mario79	1590	;------------------------------------------------------------------------------
5154	hidnplayr	1591
2430	mario79	1592	align 4
		1593	draw_bar_end_24_new:
5154	hidnplayr	1594
		1595	.new_y:
2430	mario79	1596	mov edi, [drbar.real_sx]
5154	hidnplayr	1597	.new_x:
2430	mario79	1598	cmp byte [ebp], bl
		1599	jne .skip
5154	hidnplayr	1600
2430	mario79	1601	mov ecx, [drbar.real_sy_and_abs_cy]
		1602	sub ecx, esi
5154	hidnplayr	1603
2430	mario79	1604	; check for Y
		1605	cmp cx, [Y_UNDER_sub_CUR_hot_y_add_curh]
		1606	jae .no_mouse_area
2575	mario79	1607	sub cx, [Y_UNDER_subtraction_CUR_hot_y]
		1608	jb .no_mouse_area
2430	mario79	1609	rol ecx, 16
		1610	add ecx, [drbar.real_sx_and_abs_cx]
		1611	sub ecx, edi
5154	hidnplayr	1612
2430	mario79	1613	; check for X
2575	mario79	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]
2430	mario79	1617	jb .no_mouse_area
5154	hidnplayr	1618	ror ecx, 16
2430	mario79	1619
		1620	; check mouse area for putpixel
2477	mario79	1621	push eax
2430	mario79	1622	call check_mouse_area_for_putpixel_new.1
		1623	mov [edx], ax
		1624	shr eax, 16
		1625	mov [edx + 2], al
2477	mario79	1626	pop eax
2430	mario79	1627	jmp .skip
5154	hidnplayr	1628
		1629	.no_mouse_area:
		1630	; store to LFB
2446	mario79	1631	mov [edx], ax
		1632	ror eax, 16
		1633	mov [edx + 2], al
		1634	rol eax, 16
5154	hidnplayr	1635	.skip:
		1636
2430	mario79	1637	; add pixel
		1638	add edx, 3
		1639	inc ebp
		1640	dec edi
		1641	jnz .new_x
5154	hidnplayr	1642
2430	mario79	1643	; add line
		1644	add edx, [drbar.line_inc_scr]
		1645	add ebp, [drbar.line_inc_map]
5154	hidnplayr	1646
2446	mario79	1647	; drawing gradient bars
		1648	test bh, 0x80
2430	mario79	1649	jz @f
2446	mario79	1650	test al, al
2430	mario79	1651	jz @f
2446	mario79	1652	dec al
5154	hidnplayr	1653	@@:
2430	mario79	1654	dec esi
		1655	jnz .new_y
		1656	jmp draw_bar_end_24.end
5154	hidnplayr	1657
2453	mario79	1658	;------------------------------------------------------------------------------
2446	mario79	1659	; eax - color high RRGGBB
		1660	; bl - process num
		1661	; ecx - temp
		1662	; edx - pointer to screen
		1663	; esi - counter
		1664	; edi - counter
5154	hidnplayr	1665
		1666	draw_bar_end_32:
		1667
2453	mario79	1668	; check for hardware cursor
2455	mario79	1669	mov ecx, [_display.select_cursor]
		1670	cmp ecx, select_cursor
		1671	je draw_bar_end_32_new
		1672	cmp ecx, 0
2453	mario79	1673	je draw_bar_end_32_old
5154	hidnplayr	1674
		1675	.new_y:
2288	clevermous	1676	mov edi, [drbar.real_sx]
5154	hidnplayr	1677	.new_x:
2288	clevermous	1678	cmp byte [ebp], bl
		1679	jne .skip
5154	hidnplayr	1680
		1681	; store to LFB
2430	mario79	1682	mov [edx], eax
2446	mario79	1683	mov eax, [drbar.color]
5154	hidnplayr	1684	.skip:
		1685
2288	clevermous	1686	; add pixel
		1687	add edx, 4
		1688	inc ebp
		1689	dec edi
		1690	jnz .new_x
5154	hidnplayr	1691
2288	clevermous	1692	; add line
		1693	add edx, [drbar.line_inc_scr]
		1694	add ebp, [drbar.line_inc_map]
5154	hidnplayr	1695
2446	mario79	1696	; drawing gradient bars
		1697	test bh, 0x80
2288	clevermous	1698	jz @f
		1699	test al, al
		1700	jz @f
		1701	dec al
5154	hidnplayr	1702	@@:
2288	clevermous	1703	dec esi
		1704	jnz .new_y
5154	hidnplayr	1705	.end:
2288	clevermous	1706	add esp, drbar.stack_data
		1707	popad
3606	Serge	1708	cmp [SCR_MODE], 0x12
2436	mario79	1709	jne @f
2288	clevermous	1710	call VGA_draw_bar
5154	hidnplayr	1711	@@:
2288	clevermous	1712	xor eax, eax
		1713	mov [EGA_counter], 1
		1714	ret
5154	hidnplayr	1715
2453	mario79	1716	draw_bar_end_32_old:
5154	hidnplayr	1717
		1718	.new_y:
2453	mario79	1719	mov edi, [drbar.real_sx]
5154	hidnplayr	1720	.new_x:
2453	mario79	1721	cmp byte [ebp], bl
		1722	jne .skip
5154	hidnplayr	1723
2453	mario79	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
5154	hidnplayr	1732	; store to LFB
2453	mario79	1733	mov [edx], eax
		1734	mov eax, [drbar.color]
5154	hidnplayr	1735	.skip:
2453	mario79	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
5154	hidnplayr	1750	@@:
2453	mario79	1751	dec esi
		1752	jnz .new_y
		1753	jmp draw_bar_end_32.end
5154	hidnplayr	1754
2453	mario79	1755	;------------------------------------------------------------------------------
5154	hidnplayr	1756
2453	mario79	1757	align 4
2430	mario79	1758	draw_bar_end_32_new:
5154	hidnplayr	1759
		1760	.new_y:
2430	mario79	1761	mov edi, [drbar.real_sx]
5154	hidnplayr	1762	.new_x:
2430	mario79	1763	cmp byte [ebp], bl
		1764	jne .skip
5154	hidnplayr	1765
2430	mario79	1766	mov ecx, [drbar.real_sy_and_abs_cy]
		1767	sub ecx, esi
5154	hidnplayr	1768
2430	mario79	1769	; check for Y
		1770	cmp cx, [Y_UNDER_sub_CUR_hot_y_add_curh]
		1771	jae .no_mouse_area
2575	mario79	1772	sub cx, [Y_UNDER_subtraction_CUR_hot_y]
		1773	jb .no_mouse_area
2430	mario79	1774	rol ecx, 16
		1775	add ecx, [drbar.real_sx_and_abs_cx]
		1776	sub ecx, edi
5154	hidnplayr	1777
2430	mario79	1778	; check for X
2575	mario79	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]
2430	mario79	1782	jb .no_mouse_area
5154	hidnplayr	1783	ror ecx, 16
2430	mario79	1784
		1785	; check mouse area for putpixel
2477	mario79	1786	push eax
2430	mario79	1787	call check_mouse_area_for_putpixel_new.1
		1788	mov [edx], eax
2477	mario79	1789	pop eax
2430	mario79	1790	jmp .skip
5154	hidnplayr	1791	.no_mouse_area:
		1792
		1793	; store to LFB
2430	mario79	1794	mov [edx], eax
5154	hidnplayr	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
2430	mario79	1826	align 4
5154	hidnplayr	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]
2430	mario79	1907	.skip:
5154	hidnplayr	1908
2430	mario79	1909	; add pixel
5154	hidnplayr	1910	add edx, 2
2430	mario79	1911	inc ebp
		1912	dec edi
		1913	jnz .new_x
5154	hidnplayr	1914
2430	mario79	1915	; add line
		1916	add edx, [drbar.line_inc_scr]
		1917	add ebp, [drbar.line_inc_map]
5154	hidnplayr	1918
2446	mario79	1919	; drawing gradient bars
		1920	test bh, 0x80
2430	mario79	1921	jz @f
		1922	test al, al
		1923	jz @f
		1924	dec al
5154	hidnplayr	1925	@@:
		1926	dec esi
		1927	jnz .new_y
		1928	jmp draw_bar_end_16.end
		1929
		1930	;------------------------------------------------------------------------------
		1931
2430	mario79	1932	align 4
5154	hidnplayr	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	@@:
2430	mario79	2005	dec esi
		2006	jnz .new_y
5154	hidnplayr	2007	jmp draw_bar_end_16.end
		2008
2430	mario79	2009	;------------------------------------------------------------------------------
5154	hidnplayr	2010
2430	mario79	2011	align 4
2288	clevermous	2012	vesa20_drawbackground_tiled:
5154	hidnplayr	2013
2288	clevermous	2014	pushad
		2015	; External loop for all y from start to end
		2016	mov ebx, [draw_data+32+RECT.top] ; y start
5154	hidnplayr	2017	dp2:
2288	clevermous	2018	mov ebp, [draw_data+32+RECT.left] ; x start
		2019	; 1) Calculate pointers in WinMapAddress (does pixel belong to OS thread?) [ebp]
5154	hidnplayr	2020	; and LFB data (output for our function) [edi]
2446	mario79	2021	; mov eax, [BytesPerScanLine]
		2022	; mul ebx
2480	mario79	2023	mov eax, [BPSLine_calc_area+ebx*4]
2288	clevermous	2024	xchg ebp, eax
		2025	add ebp, eax
		2026	add ebp, eax
5154	hidnplayr	2027	cmp byte [_display.bytes_per_pixel], 2
		2028	je @f
2288	clevermous	2029	add ebp, eax
5154	hidnplayr	2030	cmp byte [_display.bytes_per_pixel], 3
		2031	je @f
2288	clevermous	2032	add ebp, eax
5154	hidnplayr	2033
		2034	@@:
2288	clevermous	2035	add ebp, LFB_BASE
		2036	; ebp:=YBytesPerScanLine+XBytesPerPixel+AddrLFB
		2037	call calculate_edi
		2038	xchg edi, ebp
		2039	add ebp, [_WinMapAddress]
		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
		2045	div dword [BgrDataHeight] ; edx := y mod BgrDataHeight
		2046	pop eax
		2047	push eax
		2048	mov ecx, [BgrDataWidth]
		2049	mov esi, edx
		2050	imul esi, ecx ; esi := (y mod BgrDataHeight) * BgrDataWidth
		2051	xor edx, edx
		2052	div ecx ; edx := x mod BgrDataWidth
		2053	sub ecx, edx
		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
5154	hidnplayr	2067	dp3:
2288	clevermous	2068	cmp [ebp], dl
5154	hidnplayr	2069	jnz .next_pix
		2070
2430	mario79	2071	push eax ecx
		2072	mov ecx, eax
		2073	shl ecx, 16
		2074	add ecx, ebx
		2075
		2076	mov eax, [esi]
2448	mario79	2077
		2078	; check for hardware cursor
2451	mario79	2079	cmp [_display.select_cursor], select_cursor
		2080	je @f
2448	mario79	2081	cmp [_display.select_cursor], 0
		2082	jne .no_mouseunder
5154	hidnplayr	2083	@@:
2430	mario79	2084	and eax, 0xffffff
		2085	; check mouse area for putpixel
		2086	call [_display.check_mouse]
5154	hidnplayr	2087	.no_mouseunder:
		2088
		2089	cmp byte [_display.bits_per_pixel], 16
		2090	je .16bpp
		2091	; store to LFB
2430	mario79	2092	mov [edi], ax
		2093	shr eax, 16
		2094	mov [edi+2], al
5154	hidnplayr	2095	pop ecx eax
		2096	jmp .next_pix
2430	mario79	2097
5154	hidnplayr	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
2430	mario79	2107	pop ecx eax
5154	hidnplayr	2108
		2109	; Advance to next pixel
		2110	.next_pix:
2288	clevermous	2111	add esi, 3
5154	hidnplayr	2112	add edi, [_display.bytes_per_pixel]
		2113
2288	clevermous	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
5154	hidnplayr	2120
2288	clevermous	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
5154	hidnplayr	2127
		2128	dp4:
2288	clevermous	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
3606	Serge	2135	cmp [SCR_MODE], 0x12
2436	mario79	2136	jne @f
2288	clevermous	2137	call VGA_drawbackground
5154	hidnplayr	2138	@@:
2288	clevermous	2139	ret
5154	hidnplayr	2140
2430	mario79	2141	;------------------------------------------------------------------------------
5154	hidnplayr	2142
2430	mario79	2143	align 4
2288	clevermous	2144	vesa20_drawbackground_stretch:
5154	hidnplayr	2145
2288	clevermous	2146	pushad
		2147	; Helper variables
		2148	; calculate 2^32*(BgrDataWidth-1) mod (ScreenWidth-1)
		2149	mov eax, [BgrDataWidth]
		2150	dec eax
		2151	xor edx, edx
		2152	div dword [Screen_Max_X]
		2153	push eax ; high
		2154	xor eax, eax
		2155	div dword [Screen_Max_X]
		2156	push eax ; low
5154	hidnplayr	2157
2288	clevermous	2158	; the same for height
		2159	mov eax, [BgrDataHeight]
		2160	dec eax
		2161	xor edx, edx
		2162	div dword [Screen_Max_Y]
		2163	push eax ; high
		2164	xor eax, eax
		2165	div dword [Screen_Max_Y]
		2166	push eax ; low
5154	hidnplayr	2167
2288	clevermous	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]
2446	mario79	2173	; mov eax, [BytesPerScanLine]
		2174	; mul ebx
2480	mario79	2175	mov eax, [BPSLine_calc_area+ebx*4]
2288	clevermous	2176	xchg ebp, eax
		2177	add ebp, eax
		2178	add ebp, eax
5154	hidnplayr	2179	cmp byte [_display.bytes_per_pixel], 2
		2180	jz @f
2288	clevermous	2181	add ebp, eax
5154	hidnplayr	2182	cmp byte [_display.bytes_per_pixel], 3
2288	clevermous	2183	jz @f
		2184	add ebp, eax
5154	hidnplayr	2185	@@:
		2186
2288	clevermous	2187	; ebp:=YBytesPerScanLine+XBytesPerPixel+AddrLFB
		2188	call calculate_edi
		2189	xchg edi, ebp
5154	hidnplayr	2190
2288	clevermous	2191	; Now eax=x, ebx=y, edi->output, ebp=offset in WinMapAddress
		2192	push ebx
		2193	push eax
		2194	; 2) Calculate offset in background memory block
		2195	mov eax, ebx
		2196	imul ebx, dword [esp+12]
		2197	mul dword [esp+8]
		2198	add edx, ebx ; edx:eax = y * 2^32*(BgrDataHeight-1)/(ScreenHeight-1)
		2199	mov esi, edx
		2200	imul esi, [BgrDataWidth]
		2201	push edx
		2202	push eax
		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
		2209	pop edx ; edx:eax = x * 2^32*(BgrDataWidth-1)/(ScreenWidth-1)
		2210	add esi, edx
		2211	lea esi, [esi*3]
		2212	add esi, [img_background]
		2213	push eax
		2214	push edx
		2215	push esi
5154	hidnplayr	2216
2288	clevermous	2217	; 3) Smooth horizontal
5154	hidnplayr	2218	bgr_resmooth0:
2288	clevermous	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
5154	hidnplayr	2225
		2226	bgr_resmooth1:
2288	clevermous	2227	mov eax, [esp+16+4]
		2228	inc eax
		2229	cmp eax, [BgrDataHeight]
		2230	jae bgr.no2nd
		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
5154	hidnplayr	2239
		2240	bgr.no2nd:
2288	clevermous	2241	pop edi
5154	hidnplayr	2242
		2243	sdp3:
2288	clevermous	2244	xor esi, esi
		2245	mov ecx, [esp+12]
5154	hidnplayr	2246
2288	clevermous	2247	; 4) Loop through redraw rectangle and copy background data
		2248	; Registers meaning:
		2249	; esi = offset in current line, edi -> output
		2250	; ebp = offset in WinMapAddress
		2251	; dword [esp] = offset in bgr data
		2252	; qword [esp+4] = x * 2^32 * (BgrDataWidth-1) / (ScreenWidth-1)
		2253	; qword [esp+12] = y * 2^32 * (BgrDataHeight-1) / (ScreenHeight-1)
		2254	; dword [esp+20] = x
		2255	; dword [esp+24] = y
		2256	; precalculated constants:
		2257	; qword [esp+28] = 2^32*(BgrDataHeight-1)/(ScreenHeight-1)
		2258	; qword [esp+36] = 2^32*(BgrDataWidth-1)/(ScreenWidth-1)
5154	hidnplayr	2259
		2260	sdp3a:
2288	clevermous	2261	mov eax, [_WinMapAddress]
		2262	cmp [ebp+eax], byte 1
		2263	jnz snbgp
		2264	mov eax, [bgr_cur_line+esi]
		2265	test ecx, ecx
		2266	jz .novert
		2267	mov ebx, [bgr_next_line+esi]
		2268	call [overlapping_of_points_ptr]
5154	hidnplayr	2269
		2270	.novert:
2430	mario79	2271	push ecx
2448	mario79	2272	; check for hardware cursor
2451	mario79	2273	cmp [_display.select_cursor], select_cursor
2459	mario79	2274	je @f
2448	mario79	2275	cmp [_display.select_cursor], 0
		2276	jne .no_mouseunder
5154	hidnplayr	2277	@@:
2430	mario79	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]
5154	hidnplayr	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
2288	clevermous	2294	mov [LFB_BASE+edi], ax
5154	hidnplayr	2295	pop ecx
		2296	jmp snbgp
		2297	.not_16bpp:
		2298
		2299	; store to LFB
		2300	mov [LFB_BASE+edi], ax
2288	clevermous	2301	shr eax, 16
		2302	mov [LFB_BASE+edi+2], al
2430	mario79	2303	pop ecx
5154	hidnplayr	2304
		2305	snbgp:
		2306	add edi, [_display.bytes_per_pixel]
2288	clevermous	2307	add ebp, 1
		2308	mov eax, [esp+20]
		2309	add eax, 1
		2310	mov [esp+20], eax
		2311	add esi, 4
		2312	cmp eax, [draw_data+32+RECT.right]
		2313	jbe sdp3a
5154	hidnplayr	2314
		2315	sdp4:
2288	clevermous	2316	; next y
		2317	mov ebx, [esp+24]
		2318	add ebx, 1
		2319	mov [esp+24], ebx
		2320	cmp ebx, [draw_data+32+RECT.bottom]
		2321	ja sdpdone
5154	hidnplayr	2322
2288	clevermous	2323	; advance edi, ebp to next scan line
		2324	sub eax, [draw_data+32+RECT.left]
		2325	sub ebp, eax
		2326	add ebp, [Screen_Max_X]
		2327	add ebp, 1
		2328	sub edi, eax
		2329	sub edi, eax
5154	hidnplayr	2330	cmp byte [_display.bytes_per_pixel], 2
		2331	jz @f
2288	clevermous	2332	sub edi, eax
5154	hidnplayr	2333	cmp byte [_display.bytes_per_pixel], 3
2288	clevermous	2334	jz @f
		2335	sub edi, eax
5154	hidnplayr	2336
		2337	@@:
3606	Serge	2338	add edi, [_display.pitch]
2288	clevermous	2339	; restore ecx,edx; advance esi to next background line
		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
		2345	sub eax, [esp+16]
		2346	mov ebx, eax
		2347	lea eax, [eax*3]
		2348	imul eax, [BgrDataWidth]
		2349	sub [esp], eax
		2350	mov eax, [draw_data+32+RECT.left]
		2351	mov [esp+20], eax
		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
		2359	mov ecx, [Screen_Max_X]
		2360	inc ecx
		2361	rep movsd
		2362	jmp bgr_resmooth1
5154	hidnplayr	2363
		2364	sdpdone:
2288	clevermous	2365	add esp, 44
		2366	popad
		2367	mov [EGA_counter], 1
3606	Serge	2368	cmp [SCR_MODE], 0x12
2436	mario79	2369	jne @f
2288	clevermous	2370	call VGA_drawbackground
5154	hidnplayr	2371	@@:
2288	clevermous	2372	ret
		2373
2430	mario79	2374	;--------------------------------------
5154	hidnplayr	2375
2288	clevermous	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]
5154	hidnplayr	2386	@@:
2288	clevermous	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
5154	hidnplayr	2400	@@:
2288	clevermous	2401	mov eax, [draw_data+32+RECT.left]
		2402	mov [esp+20+8], eax
		2403	ret
5154	hidnplayr	2404
2430	mario79	2405	;------------------------------------------------------------------------------
5154	hidnplayr	2406
2288	clevermous	2407	align 16
		2408	overlapping_of_points:
		2409	if 0
		2410	; this version of procedure works, but is slower than next version
		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
		2418	movzx eax, cl
		2419	sub eax, ebx
		2420	movzx ebx, dh
		2421	imul eax, esi
		2422	add dl, ah
		2423	movzx eax, ch
		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
		2437	ror eax, 16
		2438	pop ecx
		2439	ret
		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
5154	hidnplayr	2470
2430	mario79	2471	;------------------------------------------------------------------------------
5154	hidnplayr	2472
2430	mario79	2473	align 4
2288	clevermous	2474	init_background:
5154	hidnplayr	2475
2288	clevermous	2476	mov edi, BgrAuxTable
		2477	xor edx, edx
5154	hidnplayr	2478
		2479	.loop2:
2288	clevermous	2480	mov eax, edx
		2481	shl eax, 8
		2482	neg eax
		2483	mov ecx, 0x200
5154	hidnplayr	2484
		2485	.loop1:
2288	clevermous	2486	mov byte [edi], ah
		2487	inc edi
		2488	add eax, edx
		2489	loop .loop1
		2490	add dl, 4
		2491	jnz .loop2
		2492	test byte [cpu_caps+(CAPS_MMX/8)], 1 shl (CAPS_MMX mod 8)
		2493	jz @f
		2494	mov [overlapping_of_points_ptr], overlapping_of_points_mmx
5154	hidnplayr	2495	@@:
2288	clevermous	2496	ret
5154	hidnplayr	2497
2430	mario79	2498	;------------------------------------------------------------------------------
5154	hidnplayr	2499
2288	clevermous	2500	align 16
		2501	overlapping_of_points_mmx:
5154	hidnplayr	2502
2288	clevermous	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
5154	hidnplayr	2519
2288	clevermous	2520	ret
5154	hidnplayr	2521
2430	mario79	2522	;------------------------------------------------------------------------------

Subversion Repositories Kolibri OS

(root)/kernel/trunk/video/vesa20.inc – Rev 5154