Subversion Repositories Kolibri OS

Rev

Rev 5153 | Rev 5163 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
5153 IgorA 1
 
2
proc glopClearColor uses ecx esi edi, context:dword, p:dword
3
	mov esi,[p]
4
	add esi,4
5
	mov edi,[context]
6
	add edi,offs_cont_clear_color
7
	mov ecx,4
8
	rep movsd
9
endp
10
11
 
12
proc glopClearDepth uses eax ebx, context:dword, p:dword
13
	mov eax,[context]
14
	mov ebx,[p]
15
	mov ebx,[ebx+4] ;ebx = p[1]
16
	mov dword[eax+offs_cont_clear_depth],ebx
17
	ret
18
endp
19
20
 
5159 IgorA 21
proc glopClear uses eax ebx, context:dword, p:dword
22
	mov eax,[context]
23
	mov ebx,[eax+offs_cont_clear_color+8] ;context.clear_color.v[2]
24
	shl ebx,16
25
	push ebx
26
	mov ebx,[eax+offs_cont_clear_color+4] ;context.clear_color.v[1]
27
	shl ebx,16
28
	push ebx
29
	mov ebx,[eax+offs_cont_clear_color] ;context.clear_color.v[0]
30
	shl ebx,16
31
	push ebx
32
5153 IgorA 33
 
5159 IgorA 34
	mov ebx,[ebx+4] ;ebx = p[1]
35
	and ebx,GL_COLOR_BUFFER_BIT
36
	push ebx
37
	mov ebx,[p]
38
	mov ebx,[ebx+4] ;ebx = p[1]
39
	and ebx,GL_DEPTH_BUFFER_BIT
40
41
 
42
	stdcall ZB_clear,[eax+offs_cont_zb],ebx,0 ;,...,r,g,b
43
	ret
44
endp
45