WebSVN – Kolibri OS – Blame – /kernel/branches/kolibri_pe/video/vga.inc

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

Subversion Repositories Kolibri OS

(root)/kernel/branches/kolibri_pe/video/vga.inc – Rev 928