Subversion Repositories Kolibri OS

Rev

Rev 5387 | Rev 6523 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5387 Rev 5418
Line 114... Line 114...
114 
	ret
 114 
	ret
115 
endp
 115 
endp
Line 116... Line 116...
116 
 
 116 
 
117 
align 4
 117 
align 4
118 
proc glColor4fv uses eax ebx, v:dword
 - 
 
119 
locals
 - 
 
120 
	p rd 8
 - 
 
121 
endl
 - 
 
122 
	mov dword[p],OP_Color
 118 
proc glColor4fv uses eax ebx, v:dword
123 
	mov eax,[v]
 - 
 
124 
	mov ebx,[eax+8]
 - 
 
125 
	mov dword[p+4],ebx
 - 
 
126 
	mov ebx,[eax+4]
 - 
 
127 
	mov dword[p+8],ebx
 - 
 
128 
	mov ebx,[eax]
 - 
 
129 
	mov dword[p+12],ebx
 - 
 
130 
	mov ebx,[eax+12]
 - 
 
131 
	mov dword[p+16],ebx
 - 
 
132 
	; direct convertion to integer to go faster if no shading
 - 
 
133 
	mov eax,ebp
 - 
 
134 
	sub eax,4
 - 
 
135 
	push eax ;&p[7]
 - 
 
136 
	sub eax,4
 - 
 
137 
	push eax ;&p[6]
 - 
 
138 
	sub eax,4
 - 
 
139 
	push eax ;&p[5]
 119 
	mov eax,[v]
140 
	stdcall RGBFtoRGBI,[eax+8],[eax+4],[eax] ;call: v[2],v[1],v[0],p[5],p[6],p[7]
 - 
 
141 
 
 - 
 
142 
	mov eax,ebp
 - 
 
143 
	sub eax,32 ;=sizeof(dd)*8
 - 
 
144 
	stdcall gl_add_op,eax
 120 
	stdcall glColor4f,[eax],[eax+4],[eax+8],[eax+12],1.0
145 
	ret
 121 
	ret
Line 146... Line 122...
146 
endp
 122 
endp
147 
 
 123