WebSVN – Kolibri OS – Blame – /kernel/branches/kolibri-process/video/vga.inc

Rev	Author	Line No.	Line
4429	Serge	1	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
		2	;; ;;
		3	;; Copyright (C) KolibriOS team 2004-2012. All rights reserved. ;;
		4	;; Distributed under terms of the GNU General Public License ;;
		5	;; ;;
		6	;; VGA.INC ;;
		7	;; ;;
		8	;; 640x480 mode 0x12 VGA functions for MenuetOS ;;
		9	;; ;;
		10	;; Paul Butcher, paul.butcher@asa.co.uk ;;
		11	;; ;;
		12	;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
		13
		14	$Revision: 3606 $
		15
		16	;------------------------------------------------------------------------------
		17	align 4
		18	paletteVGA:
		19
		20	;16 colour palette
		21	mov dx, 0x3c8
		22	mov al, 0
		23	out dx, al
		24
		25	mov ecx, 16
		26	mov dx, 0x3c9
		27	xor eax, eax
		28	;--------------------------------------
		29	align 4
		30	palvganew:
		31	mov al, 0
		32	test ah, 4
		33	jz palvgalbl1
		34	add al, 31
		35	test ah, 8
		36	jz palvgalbl1
		37	add al, 32
		38	;--------------------------------------
		39	align 4
		40	palvgalbl1:
		41	out dx, al; red 0,31 or 63
		42	mov al, 0
		43	test ah, 2
		44	jz palvgalbl2
		45	add al, 31
		46	test ah, 8
		47	jz palvgalbl2
		48	add al, 32
		49	;--------------------------------------
		50	align 4
		51	palvgalbl2:
		52	out dx, al; blue 0,31 or 63
		53	mov al, 0
		54	test ah, 1
		55	jz palvgalbl3
		56	add al, 31
		57	test ah, 8
		58	jz palvgalbl3
		59	add al, 32
		60	;--------------------------------------
		61	align 4
		62	palvgalbl3:
		63	out dx, al; green 0,31 or 63
		64	add ah, 1
		65	loop palvganew
		66	; mov dx, 3ceh
		67	; mov ax, 0005h
		68	; out dx, ax
		69	ret
		70	;------------------------------------------------------------------------------
		71	align 4
		72	palette320x200:
		73	mov edx, 0x3c8
		74	xor eax, eax
		75	out dx, al
		76	mov ecx, 256
		77	mov edx, 0x3c9
		78	xor eax, eax
		79	;--------------------------------------
		80	align 4
		81	palnew:
		82	mov al, 0
		83	test ah, 64
		84	jz pallbl1
		85	add al, 21
		86	;--------------------------------------
		87	align 4
		88	pallbl1:
		89	test ah, 128
		90	jz pallbl2
		91	add al, 42
		92	;--------------------------------------
		93	align 4
		94	pallbl2:
		95	out dx, al
		96	mov al, 0
		97	test ah, 8
		98	jz pallbl3
		99	add al, 8
		100	;--------------------------------------
		101	align 4
		102	pallbl3:
		103	test ah, 16
		104	jz pallbl4
		105	add al, 15
		106	;--------------------------------------
		107	align 4
		108	pallbl4:
		109	test ah, 32
		110	jz pallbl5
		111	add al, 40
		112	;--------------------------------------
		113	align 4
		114	pallbl5:
		115	out dx, al
		116	mov al, 0
		117	test ah, 1
		118	jz pallbl6
		119	add al, 8
		120	;--------------------------------------
		121	align 4
		122	pallbl6:
		123	test ah, 2
		124	jz pallbl7
		125	add al, 15
		126	;--------------------------------------
		127	align 4
		128	pallbl7:
		129	test ah, 4
		130	jz pallbl8
		131	add al, 40
		132	;--------------------------------------
		133	align 4
		134	pallbl8:
		135	out dx, al
		136	add ah, 1
		137	loop palnew
		138	ret
		139	;------------------------------------------------------------------------------
		140	align 4
		141	uglobal
		142	novesachecksum dd 0x0
		143	EGA_counter db 0
		144	VGA_drawing_screen db 0
		145	VGA_8_pixels:
		146	rb 16
		147	temp:
		148	.cx dd 0
		149	endg
		150	;------------------------------------------------------------------------------
		151	align 4
		152	checkVga_N13:
		153	cmp [SCR_MODE], 0x13
		154	jne @f
		155
		156	pushad
		157	cmp [EGA_counter], 1
		158	je novesal
		159	mov ecx, [MOUSE_X]
		160	cmp ecx, [novesachecksum]
		161	jne novesal
		162	popad
		163	;--------------------------------------
		164	align 4
		165	@@:
		166	ret
		167	;--------------------------------------
		168	align 4
		169	novesal:
		170	mov [novesachecksum], ecx
		171	mov ecx, 0
		172	movzx eax, word [MOUSE_Y]
		173	cmp eax, 100
		174	jge m13l3
		175	mov eax, 100
		176	;--------------------------------------
		177	align 4
		178	m13l3:
		179	cmp eax, 480-100
		180	jbe m13l4
		181	mov eax, 480-100
		182	;--------------------------------------
		183	align 4
		184	m13l4:
		185	sub eax, 100
		186	imul eax, 640*4
		187	add ecx, eax
		188	movzx eax, word [MOUSE_X]
		189	cmp eax, 160
		190	jge m13l1
		191	mov eax, 160
		192	;--------------------------------------
		193	align 4
		194	m13l1:
		195	cmp eax, 640-160
		196	jbe m13l2
		197	mov eax, 640-160
		198	;--------------------------------------
		199	align 4
		200	m13l2:
		201	sub eax, 160
		202	shl eax, 2
		203	add ecx, eax
		204	mov esi, [LFBAddress]
		205	add esi, ecx
		206	mov edi, VGABasePtr
		207	mov edx, 200
		208	mov ecx, 320
		209	cld
		210	;--------------------------------------
		211	align 4
		212	m13pix:
		213	lodsd
		214	test eax, eax
		215	jz .save_pixel
		216	push eax
		217	mov ebx, eax
		218	and eax, (128+64+32) ; blue
		219	shr eax, 5
		220	and ebx, (128+64+32)*256; green
		221	shr ebx, 8+2
		222	add eax, ebx
		223	pop ebx
		224	and ebx, (128+64)256256; red
		225	shr ebx, 8+8
		226	add eax, ebx
		227	;--------------------------------------
		228	align 4
		229	.save_pixel:
		230	stosb
		231	loop m13pix
		232	mov ecx, 320
		233	add esi, 4*(640-320)
		234	dec edx
		235	jnz m13pix
		236	mov [EGA_counter], 0
		237	popad
		238	ret
		239	;------------------------------------------------------------------------------
		240	align 4
		241	VGA_drawbackground:
		242	; draw all
		243	pushad
		244	mov esi, [LFBAddress]
		245	mov edi, VGABasePtr
		246	mov ebx, 640/32; 640480/(84)
		247	mov edx, 480
		248	;--------------------------------------
		249	align 4
		250	@@:
		251	push ebx edx esi edi
		252	shl edx, 9
		253	lea edx, [edx+edx*4]
		254	add esi, edx
		255	shr edx, 5
		256	add edi, edx
		257	call VGA_draw_long_line
		258	pop edi esi edx ebx
		259	dec edx
		260	jnz @r
		261	call VGA_draw_long_line_1
		262	popad
		263	ret
		264	;------------------------------------------------------------------------------
		265	align 4
		266	VGA_draw_long_line:
		267	mov dx, 3ceh
		268	mov ax, 0ff08h
		269	cli
		270	out dx, ax
		271	mov ax, 0005h
		272	out dx, ax
		273	;--------------------------------------
		274	align 4
		275	m12pix:
		276	call VGA_draw_32_pixels
		277	dec ebx
		278	jnz m12pix
		279	mov dx, 3c4h
		280	mov ax, 0ff02h
		281	out dx, ax
		282	mov dx, 3ceh
		283	mov ax, 0205h
		284	out dx, ax
		285	mov dx, 3ceh
		286	mov al, 08h
		287	out dx, al
		288	sti
		289	ret
		290	;------------------------------------------------------------------------------
		291	align 4
		292	VGA_draw_32_pixels:
		293	xor eax, eax
		294	mov ebp, VGA_8_pixels
		295	mov [ebp], eax
		296	mov [ebp+4], eax
		297	mov [ebp+8], eax
		298	mov [ebp+12], eax
		299	mov ch, 4
		300	;--------------------------------------
		301	align 4
		302	.main_loop:
		303	mov cl, 8
		304	;--------------------------------------
		305	align 4
		306	.convert_pixels_to_VGA:
		307	lodsd ; eax = 24bit colour
		308	test eax, eax
		309	jz .end
		310	rol eax, 8
		311	mov al, ch
		312	ror eax, 8
		313	mov ch, 1
		314	dec cl
		315	shl ch, cl
		316	cmp al, 85
		317	jbe .p13green
		318	or [ebp], ch
		319	cmp al, 170
		320	jbe .p13green
		321	or [ebp+12], ch
		322	;--------------------------------------
		323	align 4
		324	.p13green:
		325	cmp ah, 85
		326	jbe .p13red
		327	or [ebp+4], ch
		328	cmp ah, 170
		329	jbe .p13red
		330	or [ebp+12], ch
		331	;--------------------------------------
		332	align 4
		333	.p13red:
		334	shr eax, 8
		335	cmp ah, 85
		336	jbe .p13cont
		337	or [ebp+8], ch
		338	cmp ah, 170
		339	jbe .p13cont
		340	or [ebp+12], ch
		341	;--------------------------------------
		342	align 4
		343	.p13cont:
		344	ror eax, 8
		345	mov ch, ah
		346	inc cl
		347	;--------------------------------------
		348	align 4
		349	.end:
		350	dec cl
		351	jnz .convert_pixels_to_VGA
		352	inc ebp
		353	dec ch
		354	jnz .main_loop
		355	push esi
		356	sub ebp, 4
		357	mov esi, ebp
		358	mov dx, 3c4h
		359	mov ah, 1h
		360	;--------------------------------------
		361	align 4
		362	@@:
		363	mov al, 02h
		364	out dx, ax
		365	xchg ax, bp
		366	lodsd
		367	mov [edi], eax
		368	xchg ax, bp
		369	shl ah, 1
		370	cmp ah, 10h
		371	jnz @r
		372	add edi, 4
		373	pop esi
		374	ret
		375	;------------------------------------------------------------------------------
		376	align 4
		377	VGA_putpixel:
		378	; eax = x
		379	; ebx = y
		380	mov ecx, eax
		381	mov eax, [esp+32-8+4] ; color
		382	;--------------------------------------
		383	; check for hardware cursor
		384	cmp [_display.select_cursor], select_cursor
		385	je @f
		386	cmp [_display.select_cursor], 0
		387	jne .no_mouseunder
		388	;--------------------------------------
		389	align 4
		390	@@:
		391	push ecx
		392	shl ecx, 16
		393	mov cx, bx
		394	; check mouse area for putpixel
		395	test eax, 0x04000000
		396	jnz @f
		397	call [_display.check_mouse]
		398	;--------------------------------------
		399	align 4
		400	@@:
		401	pop ecx
		402	;--------------------------------------
		403	align 4
		404	.no_mouseunder:
		405	shl ebx, 9
		406	lea ebx, [ebx+ebx*4] ; умножение на 5
		407	lea edx, [ebx+ecx4] ; + xBytesPerPixel (Vesa2.0 32)
		408	mov edi, edx
		409	add edi, [LFBAddress] ; + LFB address
		410	mov [edi], eax ; write to LFB for Vesa2.0
		411	shr edx, 5 ; change BytesPerPixel to 1/8
		412	mov edi, edx
		413	add edi, VGABasePtr ; address of pixel in VGA area
		414	and ecx, 0x07 ; bit no. (modulo 8)
		415	pushfd
		416	; edi = address, eax = 24bit colour, ecx = bit no. (modulo 8)
		417	xor edx, edx
		418	test eax, eax
		419	jz .p13cont
		420	cmp al, 85
		421	jbe .p13green
		422	or dl, 0x01
		423	cmp al, 170
		424	jbe .p13green
		425	or dl, 0x08
		426	;--------------------------------------
		427	align 4
		428	.p13green:
		429	cmp ah, 85
		430	jbe .p13red
		431	or dl, 0x02
		432	cmp ah, 170
		433	jbe .p13red
		434	or dl, 0x08
		435	;--------------------------------------
		436	align 4
		437	.p13red:
		438	shr eax, 8
		439	cmp ah, 85
		440	jbe .p13cont
		441	or dl, 0x04
		442	cmp ah, 170
		443	jbe .p13cont
		444	or dl, 0x08
		445	;--------------------------------------
		446	align 4
		447	.p13cont:
		448	ror edx, 8
		449	inc cl
		450	xor eax, eax
		451	inc ah
		452	shr ax, cl
		453	mov dx, 3cfh
		454	cli
		455	out dx, al
		456	mov al, [edi] ; dummy read
		457	rol edx, 8
		458	mov [edi], dl
		459	popfd
		460	ret
		461	;------------------------------------------------------------------------------
		462	align 4
		463	VGA__putimage:
		464	; ecx = size [x\|y]
		465	; edx = coordinates [x\|y]
		466	pushad
		467	rol edx, 16
		468	movzx eax, dx
		469	rol edx, 16
		470	movzx ebx, dx
		471	movzx edx, cx
		472	rol ecx, 16
		473	movzx ecx, cx
		474	call VGA_draw_bar_1
		475	popad
		476	ret
		477	;------------------------------------------------------------------------------
		478	align 4
		479	VGA_draw_bar:
		480	; eax cx
		481	; ebx cy
		482	; ecx xe
		483	; edx ye
		484	pushad
		485	sub ecx, eax
		486	sub edx, ebx
		487	and eax, 0xffff
		488	and ebx, 0xffff
		489	and ecx, 0xffff
		490	and edx, 0xffff
		491	call VGA_draw_bar_1
		492	popad
		493	ret
		494	;------------------------------------------------------------------------------
		495	align 4
		496	VGA_draw_bar_1:
		497	mov [temp.cx], eax
		498	mov eax, [TASK_BASE]
		499	add ebx, [eax-twdw + 4]
		500	mov eax, [eax-twdw + 0]
		501	add eax, [temp.cx]
		502	and eax, 0xfff8
		503	shl ebx, 9
		504	lea ebx, [ebx+ebx*4]; умножение на 5
		505	lea ebx, [ebx+eax4] ; + xBytesPerPixel (Vesa2.0 32)
		506	mov esi, ebx
		507	add esi, [LFBAddress] ; + LFB address
		508	shr ebx, 5 ; change BytesPerPixel to 1/8
		509	mov edi, ebx
		510	add edi, VGABasePtr ; address of pixel in VGA area
		511	mov ebx, ecx
		512	shr ebx, 5
		513	inc ebx
		514	;--------------------------------------
		515	align 4
		516	.main_loop:
		517	call VGA_draw_long_line_1
		518	dec edx
		519	jnz .main_loop
		520	call VGA_draw_long_line_1
		521	ret
		522	;------------------------------------------------------------------------------
		523	align 4
		524	VGA_draw_long_line_1:
		525	push ebx edx esi edi
		526	shl edx, 9
		527	lea edx, [edx+edx*4]
		528	add esi, edx
		529	shr edx, 5
		530	add edi, edx
		531	call VGA_draw_long_line
		532	pop edi esi edx ebx
		533	ret
		534	;------------------------------------------------------------------------------

Subversion Repositories Kolibri OS

(root)/kernel/branches/kolibri-process/video/vga.inc – Rev 4429