Subversion Repositories Kolibri OS

Rev

Rev 5163 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5163 Rev 6523
Line 2... Line 2...
2 
proc glopClearColor uses ecx esi edi, context:dword, p:dword
 2 
proc glopClearColor uses ecx esi edi, context:dword, p:dword
3 
	mov esi,[p]
 3 
	mov esi,[p]
4 
	add esi,4
 4 
	add esi,4
5 
	mov edi,[context]
 5 
	mov edi,[context]
6 
	add edi,offs_cont_clear_color
 6 
	add edi,GLContext.clear_color
7 
	mov ecx,4
 7 
	mov ecx,4
8 
	rep movsd
 8 
	rep movsd
9 
	ret
 9 
	ret
10 
endp
 10 
endp
11 
 
 11 
 
Line 12... Line 12...
12 
align 4
 12 
align 4
13 
proc glopClearDepth uses eax ebx, context:dword, p:dword
 13 
proc glopClearDepth uses eax ebx, context:dword, p:dword
14 
	mov eax,[context]
 14 
	mov eax,[context]
15 
	mov ebx,[p]
 15 
	mov ebx,[p]
16 
	mov ebx,[ebx+4] ;ebx = p[1]
 16 
	mov ebx,[ebx+4] ;ebx = p[1]
17 
	mov dword[eax+offs_cont_clear_depth],ebx
 17 
	mov dword[eax+GLContext.clear_depth],ebx
18 
	ret
 18 
	ret
19 
endp
 19 
endp
Line 20... Line 20...
20 
 
 20 
 
21 
align 4
 21 
align 4
Line 22... Line 22...
22 
fl_65535 dd 65535.0
 22 
fl_65535 dd 65535.0
23 
 
 23 
 
24 
align 4
 24 
align 4
25 
proc glopClear uses eax ebx, context:dword, p:dword
 25 
proc glopClear uses eax ebx, context:dword, p:dword
26 
	mov eax,[context]
 26 
	mov eax,[context]
27 
	fld dword[eax+offs_cont_clear_color+8] ;context.clear_color.v[2]
 27 
	fld dword[eax+GLContext.clear_color+8] ;context.clear_color.v[2]
28 
	fmul dword[fl_65535]
 28 
	fmul dword[fl_65535]
29 
	fistp dword[esp-4]
 29 
	fistp dword[esp-4]
30 
	fld dword[eax+offs_cont_clear_color+4] ;context.clear_color.v[1]
 30 
	fld dword[eax+GLContext.clear_color+4] ;context.clear_color.v[1]
31 
	fmul dword[fl_65535]
 31 
	fmul dword[fl_65535]
32 
	fistp dword[esp-8]
 32 
	fistp dword[esp-8]
33 
	fld dword[eax+offs_cont_clear_color] ;context.clear_color.v[0]
 33 
	fld dword[eax+GLContext.clear_color] ;context.clear_color.v[0]
34 
	fmul dword[fl_65535]
 34 
	fmul dword[fl_65535]
Line 35... Line 35...
35 
	fistp dword[esp-12]
 35 
	fistp dword[esp-12]
Line 43... Line 43...
43 
	mov ebx,[ebx+4] ;ebx = p[1]
 43 
	mov ebx,[ebx+4] ;ebx = p[1]
44 
	and ebx,GL_DEPTH_BUFFER_BIT
 44 
	and ebx,GL_DEPTH_BUFFER_BIT
45 
 
 45 
 
Line 46... Line 46...
46 
	; TODO : correct value of Z
 46 
	; TODO : correct value of Z
47 
	stdcall ZB_clear,[eax+offs_cont_zb],ebx,0 ;,...,r,g,b
 47 
	stdcall ZB_clear,[eax+GLContext.zb],ebx,0 ;,...,r,g,b
48 
	ret
 48 
	ret
49 
endp
 49 
endp