Subversion Repositories Kolibri OS

Rev

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

Rev 5290 Rev 6108
Line 73... Line 73...
73 
	jmp .err_q
 73 
	jmp .err_q
74 
	@@:
 74 
	@@:
75 
		mov dword[eax+offs_qobj_DrawStyle],ebx
 75 
		mov dword[eax+offs_qobj_DrawStyle],ebx
76 
		jmp @f
 76 
		jmp @f
77 
	.err_q:
 77 
	.err_q:
78 
		;quadric_error(qobj, GLU_INVALID_ENUM, "qluQuadricDrawStyle")
 78 
		stdcall dbg_print,sz_gluQuadricDrawStyle,err_9
79 
	@@:
 79 
	@@:
80 
	ret
 80 
	ret
81 
endp
 81 
endp
Line 82... Line 82...
82 
 
 82 
 
Line 96... Line 96...
96 
	jmp .err_q
 96 
	jmp .err_q
97 
	@@:
 97 
	@@:
98 
		mov dword[eax+offs_qobj_Orientation],ebx
 98 
		mov dword[eax+offs_qobj_Orientation],ebx
99 
		jmp @f
 99 
		jmp @f
100 
	.err_q:
 100 
	.err_q:
101 
		;quadric_error(qobj, GLU_INVALID_ENUM, "qluQuadricOrientation")
 101 
		stdcall dbg_print,sz_gluQuadricOrientation,err_9
- 
 
 102 
	@@:
- 
 
 103 
	ret
- 
 
 104 
endp
- 
 
 105 
 
- 
 
 106 
align 4
- 
 
 107 
proc gluQuadricTexture uses eax ebx, qobj:dword, texture:dword
- 
 
 108 
	mov eax,[qobj]
- 
 
 109 
	or eax,eax
- 
 
 110 
	jz .err_q
- 
 
 111 
	mov ebx,[texture]
- 
 
 112 
	cmp ebx,GL_TRUE
- 
 
 113 
	je @f
- 
 
 114 
	cmp ebx,GL_FALSE
- 
 
 115 
	je @f
- 
 
 116 
	@@:
- 
 
 117 
		mov dword[eax+offs_qobj_TextureFlag],ebx
- 
 
 118 
		jmp @f
- 
 
 119 
	.err_q:
- 
 
 120 
		stdcall dbg_print,sz_gluQuadricTexture,err_9
102 
	@@:
 121 
	@@:
103 
	ret
 122 
	ret
104 
endp
 123 
endp
Line 105... Line 124...
105 
 
 124 
 
Line 177... Line 196...
177 
	jne @f
 196 
	jne @f
178 
		stdcall glNormal3f, 0.0, 0.0, 1.0
 197 
		stdcall glNormal3f, 0.0, 0.0, 1.0
179 
	@@:
 198 
	@@:
180 
	cmp dword[eax+offs_qobj_TextureFlag],0 ;if (qobj.TextureFlag)
 199 
	cmp dword[eax+offs_qobj_TextureFlag],0 ;if (qobj.TextureFlag)
181 
	je @f
 200 
	je @f
182 
;glTexCoord2f(0.5,0.0)
 201 
		stdcall glTexCoord2f, 0.5,0.0
183 
	@@:
 202 
	@@:
184 
	sub esp,4
 203 
	sub esp,4
185 
	fld dword[nsign]
 204 
	fld dword[nsign]
186 
	fmul dword[radius]
 205 
	fmul dword[radius]
187 
	fstp dword[esp]
 206 
	fstp dword[esp]
Line 318... Line 337...
318 
			sub esp,12
 337 
			sub esp,12
319 
			stdcall glNormal3f ;x*nsign, y*nsign, z*nsign
 338 
			stdcall glNormal3f ;x*nsign, y*nsign, z*nsign
320 
		@@:
 339 
		@@:
321 
		cmp dword[eax+offs_qobj_TextureFlag],0 ;if (qobj.TextureFlag)
 340 
		cmp dword[eax+offs_qobj_TextureFlag],0 ;if (qobj.TextureFlag)
322 
		je @f
 341 
		je @f
- 
 
 342 
			fld1
- 
 
 343 
			fsub dword[t]
- 
 
 344 
			fstp dword[esp-4]
- 
 
 345 
			sub esp,4
323 
;glTexCoord2f(s,1-t)
 346 
			stdcall glTexCoord2f, [s] ;,1-t
324 
		@@:
 347 
		@@:
325 
		fld dword[radius]
 348 
		fld dword[radius]
326 
		fld dword[z]
 349 
		fld dword[z]
327 
		fmul st0,st1
 350 
		fmul st0,st1
328 
		fstp dword[esp-4]
 351 
		fstp dword[esp-4]
Line 366... Line 389...
366 
			sub esp,12
 389 
			sub esp,12
367 
			stdcall glNormal3f ;x*nsign, y*nsign, z*nsign
 390 
			stdcall glNormal3f ;x*nsign, y*nsign, z*nsign
368 
		@@:
 391 
		@@:
369 
		cmp dword[eax+offs_qobj_TextureFlag],0 ;if (qobj.TextureFlag)
 392 
		cmp dword[eax+offs_qobj_TextureFlag],0 ;if (qobj.TextureFlag)
370 
		je @f
 393 
		je @f
- 
 
 394 
			fld1
- 
 
 395 
			fsub dword[t]
- 
 
 396 
			fadd dword[d_t]
- 
 
 397 
			fstp dword[esp-4]
- 
 
 398 
			sub esp,4
371 
;glTexCoord2f(s,1-(t-dt))
 399 
			stdcall glTexCoord2f, [s] ;,1-(t-dt)
372 
			fld dword[s]
 400 
			fld dword[s]
373 
			fadd dword[d_s]
 401 
			fadd dword[d_s]
374 
			fstp dword[s]
 402 
			fstp dword[s]
375 
		@@:
 403 
		@@:
376 
		fld dword[radius]
 404 
		fld dword[radius]
Line 402... Line 430...
402 
	jne @f
 430 
	jne @f
403 
		stdcall glNormal3f, 0.0, 0.0, -1.0
 431 
		stdcall glNormal3f, 0.0, 0.0, -1.0
404 
	@@:
 432 
	@@:
405 
	cmp dword[eax+offs_qobj_TextureFlag],0 ;if (qobj.TextureFlag)
 433 
	cmp dword[eax+offs_qobj_TextureFlag],0 ;if (qobj.TextureFlag)
406 
	je @f
 434 
	je @f
407 
;glTexCoord2f(0.5,1.0)
 435 
		stdcall glTexCoord2f, 0.5,1.0
408 
		mov dword[s],1.0
 436 
		mov dword[s],1.0
409 
		mov ebx,[d_t]
 437 
		mov ebx,[d_t]
410 
		mov [t],ebx
 438 
		mov [t],ebx
411 
	@@:
 439 
	@@:
412 
	sub esp,4
 440 
	sub esp,4
Line 461... Line 489...
461 
			fincstp
 489 
			fincstp
462 
			stdcall glNormal3f ;x*nsign, y*nsign, z*nsign
 490 
			stdcall glNormal3f ;x*nsign, y*nsign, z*nsign
463 
		@@:
 491 
		@@:
464 
		cmp dword[eax+offs_qobj_TextureFlag],0 ;if (qobj.TextureFlag)
 492 
		cmp dword[eax+offs_qobj_TextureFlag],0 ;if (qobj.TextureFlag)
465 
		je @f
 493 
		je @f
- 
 
 494 
			fld1
- 
 
 495 
			fsub dword[t]
- 
 
 496 
			fstp dword[esp-4]
- 
 
 497 
			sub esp,4
466 
;glTexCoord2f(s,1-t)
 498 
			stdcall glTexCoord2f, [s] ;,1-t
467 
			fld dword[s]
 499 
			fld dword[s]
468 
			fsub dword[d_s]
 500 
			fsub dword[d_s]
469 
			fstp dword[s]
 501 
			fstp dword[s]
470 
		@@:
 502 
		@@:
471 
		fld dword[radius]
 503 
		fld dword[radius]