Ray Demo: uploaded to svn, added to autobuid img
git-svn-id: svn://kolibrios.org@6387 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
Kirill Lipatov (Leency)
parent
10ba3b881d
commit
2ff79e3b7b
@ -340,6 +340,7 @@ tup.append_table(img_files, {
|
|||||||
{"3D/3DWAV", PROGS .. "/demos/3dwav/trunk/3dwav"},
|
{"3D/3DWAV", PROGS .. "/demos/3dwav/trunk/3dwav"},
|
||||||
{"3D/CROWNSCR", PROGS .. "/demos/crownscr/trunk/crownscr"},
|
{"3D/CROWNSCR", PROGS .. "/demos/crownscr/trunk/crownscr"},
|
||||||
{"3D/FREE3D04", PROGS .. "/demos/free3d04/trunk/free3d04"},
|
{"3D/FREE3D04", PROGS .. "/demos/free3d04/trunk/free3d04"},
|
||||||
|
{"3D/RAY", PROGS .. "/demos/ray/ray"},
|
||||||
{"3D/VIEW3DS", PROGS .. "/demos/3DS/VIEW3DS"},
|
{"3D/VIEW3DS", PROGS .. "/demos/3DS/VIEW3DS"},
|
||||||
{"DEMOS/BCDCLK", PROGS .. "/demos/bcdclk/trunk/bcdclk"},
|
{"DEMOS/BCDCLK", PROGS .. "/demos/bcdclk/trunk/bcdclk"},
|
||||||
{"DEMOS/CIRCLE", PROGS .. "/develop/examples/circle/trunk/circle"},
|
{"DEMOS/CIRCLE", PROGS .. "/develop/examples/circle/trunk/circle"},
|
||||||
|
|||||||
80
programs/demos/ray/DATARAY.INC
Normal file
80
programs/demos/ray/DATARAY.INC
Normal file
@ -0,0 +1,80 @@
|
|||||||
|
non_rot_light:
|
||||||
|
;light:
|
||||||
|
dd 0.9, 0.9, 1.0
|
||||||
|
;light2:
|
||||||
|
dd 0.1, 0.05, 0.5
|
||||||
|
;light3:
|
||||||
|
dd 0.9, 0.1, 0.3
|
||||||
|
|
||||||
|
|
||||||
|
;sph_max dd 2
|
||||||
|
non_rot_sphere:
|
||||||
|
dd 0.7
|
||||||
|
dd 0.3
|
||||||
|
dd 0.4 ;, 0.0
|
||||||
|
|
||||||
|
dd 0.2
|
||||||
|
dd 0.7
|
||||||
|
dd 0.3 ;, 0.0
|
||||||
|
|
||||||
|
dd 0.1
|
||||||
|
dd 0.1
|
||||||
|
dd 0.1 ;, 0.0
|
||||||
|
|
||||||
|
dd 0.7
|
||||||
|
dd 0.7
|
||||||
|
dd 0.1 ;, 0.0
|
||||||
|
|
||||||
|
dd 0.5
|
||||||
|
dd 0.2
|
||||||
|
dd 0.1 ;, 0.0
|
||||||
|
|
||||||
|
|
||||||
|
sph_radius:
|
||||||
|
R dd 0.25
|
||||||
|
R2 dd 0.22
|
||||||
|
r3 dd 0.1
|
||||||
|
r4 dd 0.25
|
||||||
|
r5 dd 0.1
|
||||||
|
|
||||||
|
align 16
|
||||||
|
camera:
|
||||||
|
x0 dd 0.5
|
||||||
|
y0 dd 0.5
|
||||||
|
z0 dd - 12.0 , 0.0
|
||||||
|
|
||||||
|
;x1 dd
|
||||||
|
;y1 dd
|
||||||
|
;z1 dd
|
||||||
|
float2:
|
||||||
|
dd 2.0, 2.0, 2.0, 2.0
|
||||||
|
float4:
|
||||||
|
dd 4.0, 4.0, 4.0, 4.0
|
||||||
|
float255:
|
||||||
|
dd 255.0, 255.0, 255.0, 255.0
|
||||||
|
;correct_tex:
|
||||||
|
;dd 64.0, 64.0, 64.0, 64.0
|
||||||
|
;light:
|
||||||
|
;dd 0.9, 0.9, 1.0, 0.0
|
||||||
|
;light2:
|
||||||
|
;dd 0.1, 0.05, 0.5, 0.0
|
||||||
|
;light3:
|
||||||
|
;dd 0.9, 0.1, 0.3, 0.0
|
||||||
|
lights_color:
|
||||||
|
dd 250.0, 255.0, 255.0, 0.0
|
||||||
|
dd 232.0, 254.0, 220.0, 0.0
|
||||||
|
dd 225.0,37.0, 247.0, 0.0
|
||||||
|
|
||||||
|
light_factor dd 0.33
|
||||||
|
tex_x dd 128
|
||||||
|
align 16
|
||||||
|
nearest_sphere:
|
||||||
|
rd 4
|
||||||
|
nearest_radius dd ?
|
||||||
|
smalest_t dd ?
|
||||||
|
align 16
|
||||||
|
light:
|
||||||
|
rd 4 * MAX_LIGHTS
|
||||||
|
sphere:
|
||||||
|
rd 4 * MAX_SPHERES
|
||||||
|
;bitmap file '128x128.raw'
|
||||||
216
programs/demos/ray/RAY.ASM
Normal file
216
programs/demos/ray/RAY.ASM
Normal file
@ -0,0 +1,216 @@
|
|||||||
|
;
|
||||||
|
; application : Tiny ray tracer
|
||||||
|
; compilator : Fasm
|
||||||
|
; system : MenuetOS64/KolibriOS
|
||||||
|
; author : Maciej Guba aka macgub
|
||||||
|
; email : macgub3@wp.pl
|
||||||
|
; web : http://macgub.hekko.pl
|
||||||
|
|
||||||
|
include "../../macros.inc"
|
||||||
|
|
||||||
|
timeout equ 3
|
||||||
|
XRES equ 500 ; window size
|
||||||
|
YRES equ 500
|
||||||
|
maxx = XRES
|
||||||
|
maxy = YRES
|
||||||
|
use32
|
||||||
|
|
||||||
|
org 0x0
|
||||||
|
|
||||||
|
db 'MENUET01' ; 8 byte id
|
||||||
|
dd 0x01 ; header version
|
||||||
|
dd START ; start of code
|
||||||
|
dd I_END ; size of image
|
||||||
|
dd I_END ; memory for app
|
||||||
|
dd I_END ; esp
|
||||||
|
dd 0x0 , 0x0 ; I_Param , I_Icon
|
||||||
|
|
||||||
|
START: ; start of execution
|
||||||
|
|
||||||
|
call draw_window
|
||||||
|
|
||||||
|
still:
|
||||||
|
|
||||||
|
mov eax,23 ; wait here for event
|
||||||
|
mov ebx,timeout
|
||||||
|
int 0x40
|
||||||
|
; mov eax,11 ; check for event no wait
|
||||||
|
; int 0x40
|
||||||
|
|
||||||
|
cmp eax,1 ; redraw request ?
|
||||||
|
je red
|
||||||
|
cmp eax,2 ; key in buffer ?
|
||||||
|
je key
|
||||||
|
cmp eax,3 ; button in buffer ?
|
||||||
|
je button
|
||||||
|
|
||||||
|
jmp noclose
|
||||||
|
|
||||||
|
red: ; redraw
|
||||||
|
call draw_window
|
||||||
|
jmp still
|
||||||
|
|
||||||
|
key: ; key
|
||||||
|
mov eax,2 ; just read it and ignore
|
||||||
|
int 0x40
|
||||||
|
jmp still
|
||||||
|
|
||||||
|
button: ; button
|
||||||
|
mov eax,17 ; get id
|
||||||
|
int 0x40
|
||||||
|
|
||||||
|
cmp ah,1 ; button id=1 ?
|
||||||
|
jne noclose
|
||||||
|
|
||||||
|
mov eax,-1 ; close this program
|
||||||
|
int 0x40
|
||||||
|
noclose:
|
||||||
|
|
||||||
|
; mov eax,13
|
||||||
|
; mov ebx,20*65536+maxx-25
|
||||||
|
; mov ecx,20*65536+maxy-25
|
||||||
|
; xor edx,edx
|
||||||
|
; int 0x40
|
||||||
|
|
||||||
|
mov edi,screen
|
||||||
|
mov ecx,maxx*maxy*3/4
|
||||||
|
xor eax,eax
|
||||||
|
cld
|
||||||
|
rep stosd
|
||||||
|
|
||||||
|
add [deg_counter],1
|
||||||
|
cmp [deg_counter],360
|
||||||
|
jne @f
|
||||||
|
mov [deg_counter],0
|
||||||
|
@@:
|
||||||
|
fninit
|
||||||
|
fld [one_deg]
|
||||||
|
fimul [deg_counter]
|
||||||
|
fsincos
|
||||||
|
fstp [sin]
|
||||||
|
fstp [cos]
|
||||||
|
|
||||||
|
mov ecx,MAX_SPHERES ;MAX_LIGHTS
|
||||||
|
mov esi,non_rot_sphere ;light
|
||||||
|
mov edi,sphere
|
||||||
|
|
||||||
|
.rotary:
|
||||||
|
|
||||||
|
|
||||||
|
fld dword[esi]
|
||||||
|
fsub [xo]
|
||||||
|
fmul [cos]
|
||||||
|
fld dword[esi+8]
|
||||||
|
fsub [zo]
|
||||||
|
fmul [sin]
|
||||||
|
fchs
|
||||||
|
faddp
|
||||||
|
fadd [xo] ; top of stack - new 'x'
|
||||||
|
fstp dword[edi]
|
||||||
|
|
||||||
|
fld dword[esi+8]
|
||||||
|
fsub [zo]
|
||||||
|
fmul [cos]
|
||||||
|
fld dword[esi]
|
||||||
|
fsub dword[xo]
|
||||||
|
fmul [sin]
|
||||||
|
faddp
|
||||||
|
fadd [zo]
|
||||||
|
fstp dword[edi+8]
|
||||||
|
; fld dword[esi+4]
|
||||||
|
; fstp dword[edi+4]
|
||||||
|
push dword[esi+4]
|
||||||
|
pop dword[edi+4]
|
||||||
|
mov dword[edi+12],0.0
|
||||||
|
|
||||||
|
add esi,12
|
||||||
|
add edi,16
|
||||||
|
sub ecx,1
|
||||||
|
jnz .rotary
|
||||||
|
|
||||||
|
mov ecx,MAX_LIGHTS
|
||||||
|
mov esi,non_rot_light
|
||||||
|
mov edi,light
|
||||||
|
|
||||||
|
.rotary_lights:
|
||||||
|
|
||||||
|
|
||||||
|
fld dword[esi]
|
||||||
|
fsub [xo]
|
||||||
|
fmul [cos]
|
||||||
|
fld dword[esi+4]
|
||||||
|
fsub [yo]
|
||||||
|
fmul [sin]
|
||||||
|
fchs
|
||||||
|
faddp
|
||||||
|
fadd [xo] ; top of stack - new 'x'
|
||||||
|
fstp dword[edi]
|
||||||
|
|
||||||
|
fld dword[esi]
|
||||||
|
fsub [xo]
|
||||||
|
fmul [sin]
|
||||||
|
fchs
|
||||||
|
fld dword[esi+4]
|
||||||
|
fsub dword[yo]
|
||||||
|
fmul [cos]
|
||||||
|
faddp
|
||||||
|
fadd [yo]
|
||||||
|
fstp dword[edi+4]
|
||||||
|
; fld dword[esi+8]
|
||||||
|
; fstp dword[edi+8]
|
||||||
|
push dword[esi+8]
|
||||||
|
pop dword[edi+8]
|
||||||
|
mov dword[edi+12],0.0
|
||||||
|
|
||||||
|
add esi,12
|
||||||
|
add edi,16
|
||||||
|
sub ecx,1
|
||||||
|
jnz .rotary_lights
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
call main_loop
|
||||||
|
|
||||||
|
mcall 7,screen,<maxx,maxy>,<0,0>
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
jmp still
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
include 'RAY.INC'
|
||||||
|
|
||||||
|
; *********************************************
|
||||||
|
; ******* WINDOW DEFINITIONS AND DRAW ********
|
||||||
|
; *********************************************
|
||||||
|
draw_window:
|
||||||
|
|
||||||
|
mcall 12,1
|
||||||
|
|
||||||
|
mcall 48,4 ; get skin height
|
||||||
|
lea ecx,[eax + (100 shl 16) + maxy+4]
|
||||||
|
mov edi,title
|
||||||
|
mcall 0,<100,maxx+9>,,0x74000000
|
||||||
|
|
||||||
|
mcall 12,2
|
||||||
|
|
||||||
|
ret
|
||||||
|
|
||||||
|
title db 'Ray tracing',0
|
||||||
|
xo dd 0.5
|
||||||
|
yo dd 0.5
|
||||||
|
zo dd 0.1
|
||||||
|
deg_counter dw 0
|
||||||
|
one_deg dd 0.017453
|
||||||
|
include 'dataray.inc'
|
||||||
|
sin dd ?
|
||||||
|
cos dd ?
|
||||||
|
screen rb XRES * YRES * 3
|
||||||
|
mem_stack:
|
||||||
|
rb 65536
|
||||||
|
I_END:
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
288
programs/demos/ray/RAY.INC
Normal file
288
programs/demos/ray/RAY.INC
Normal file
@ -0,0 +1,288 @@
|
|||||||
|
MAX_SPHERES = 5
|
||||||
|
MAX_LIGHTS = 3
|
||||||
|
;ray
|
||||||
|
|
||||||
|
main_loop:
|
||||||
|
xor eax,eax ; y
|
||||||
|
.next_line:
|
||||||
|
xor ebx,ebx ; x
|
||||||
|
|
||||||
|
@@:
|
||||||
|
push eax
|
||||||
|
push ebx
|
||||||
|
call find_intersection
|
||||||
|
pop ebx
|
||||||
|
pop eax
|
||||||
|
add ebx,1
|
||||||
|
cmp ebx,XRES
|
||||||
|
jnz @b
|
||||||
|
|
||||||
|
add eax,1
|
||||||
|
cmp eax,YRES
|
||||||
|
jnz .next_line
|
||||||
|
|
||||||
|
ret
|
||||||
|
init_calc: ; do some intial calculations
|
||||||
|
|
||||||
|
ret
|
||||||
|
|
||||||
|
find_intersection: ;with for now single sphere
|
||||||
|
; eax - y
|
||||||
|
; ebx - x
|
||||||
|
push ebp
|
||||||
|
mov ebp,esp
|
||||||
|
sub esp,128
|
||||||
|
and ebp,0xfffffff0
|
||||||
|
.dz equ dword[ebp-8]
|
||||||
|
.dy equ dword[ebp-12]
|
||||||
|
.dx equ [ebp-16]
|
||||||
|
.a equ dword[ebp-20]
|
||||||
|
.b equ dword[ebp-24]
|
||||||
|
.c equ dword[ebp-28]
|
||||||
|
.delta equ dword[ebp-32]
|
||||||
|
.iy equ dword[ebp-36]
|
||||||
|
.ix equ [ebp-40]
|
||||||
|
.t1 equ [ebp-44]
|
||||||
|
.t2 equ [ebp-48]
|
||||||
|
.n equ [ebp-64]
|
||||||
|
.sph_xyz equ [ebp-80]
|
||||||
|
.one_write equ byte [ebp-81] ;tells if sth written in 'nearest' data
|
||||||
|
.sph_counter equ dword [ebp-85]
|
||||||
|
|
||||||
|
|
||||||
|
mov .iy,eax
|
||||||
|
mov .ix,ebx
|
||||||
|
|
||||||
|
mov .one_write,0
|
||||||
|
xorps xmm0,xmm0
|
||||||
|
cvtpi2ps xmm0,.ix
|
||||||
|
mov ecx,XRES
|
||||||
|
cvtsi2ss xmm2,ecx
|
||||||
|
shufps xmm2,xmm2,0
|
||||||
|
divps xmm0,xmm2
|
||||||
|
subps xmm0,[camera]
|
||||||
|
movaps .dx,xmm0
|
||||||
|
movaps xmm1,xmm0
|
||||||
|
mulps xmm1,xmm0
|
||||||
|
haddps xmm1,xmm1
|
||||||
|
haddps xmm1,xmm1
|
||||||
|
movss .a,xmm1
|
||||||
|
mov .sph_counter,0
|
||||||
|
.next_sph:
|
||||||
|
xorps xmm5,xmm5
|
||||||
|
movaps xmm5,[camera]
|
||||||
|
mov edx,.sph_counter
|
||||||
|
shl edx,4
|
||||||
|
add edx,sphere
|
||||||
|
subps xmm5,[edx] ;[sphere] ;;[edx]
|
||||||
|
mulps xmm5,[float2]
|
||||||
|
movaps xmm0,.dx
|
||||||
|
mulps xmm5,xmm0
|
||||||
|
haddps xmm5,xmm5
|
||||||
|
haddps xmm5,xmm5
|
||||||
|
movss .b,xmm5
|
||||||
|
|
||||||
|
|
||||||
|
movaps xmm4,[edx] ;[sphere] ; [edx]
|
||||||
|
mulps xmm4,xmm4
|
||||||
|
; haddps xmm4,xmm4
|
||||||
|
; haddps xmm4,xmm4
|
||||||
|
movaps xmm5,[camera]
|
||||||
|
mulps xmm5,xmm5
|
||||||
|
addps xmm4,xmm5
|
||||||
|
haddps xmm4,xmm4
|
||||||
|
haddps xmm4,xmm4
|
||||||
|
; addss xmm4,xmm5
|
||||||
|
movaps xmm5,[edx] ;;[sphere] ;; [edx]
|
||||||
|
mulps xmm5,[camera]
|
||||||
|
haddps xmm5,xmm5
|
||||||
|
haddps xmm5,xmm5
|
||||||
|
mulss xmm5,[float2]
|
||||||
|
subss xmm4,xmm5
|
||||||
|
mov ebx,.sph_counter
|
||||||
|
shl ebx,2
|
||||||
|
add ebx,sph_radius
|
||||||
|
movss xmm5,[ebx] ;[R] ; [ebx]
|
||||||
|
mulss xmm5,xmm5
|
||||||
|
subss xmm4,xmm5
|
||||||
|
movss .c,xmm4
|
||||||
|
|
||||||
|
movss xmm5,.b
|
||||||
|
mulss xmm5,xmm5
|
||||||
|
mulss xmm4,.a
|
||||||
|
mulss xmm4,[float4]
|
||||||
|
subss xmm5,xmm4
|
||||||
|
movss .delta,xmm5
|
||||||
|
xorps xmm6,xmm6
|
||||||
|
cmpnltss xmm5,xmm6
|
||||||
|
movd ecx,xmm5 ; ecx = -1 greater than 0.0
|
||||||
|
cmp ecx,0
|
||||||
|
jnz @f
|
||||||
|
jmp .next_s ; no intersection
|
||||||
|
; add .sph_counter,1
|
||||||
|
; cmp .sph_counter,MAX_SPHERES
|
||||||
|
; jnz .next_sph
|
||||||
|
; jmp .put_pixel
|
||||||
|
|
||||||
|
|
||||||
|
@@:
|
||||||
|
movss xmm5,.delta
|
||||||
|
sqrtss xmm5,xmm5
|
||||||
|
movss xmm4,xmm5
|
||||||
|
subss xmm6,.b
|
||||||
|
movss xmm7,xmm6
|
||||||
|
subss xmm6,xmm5
|
||||||
|
divss xmm6,[float2]
|
||||||
|
divss xmm6,.a
|
||||||
|
movss .t1,xmm6
|
||||||
|
addss xmm4,xmm7
|
||||||
|
divss xmm4,[float2]
|
||||||
|
divss xmm4,.a
|
||||||
|
movss .t2,xmm4
|
||||||
|
movss xmm5,xmm4
|
||||||
|
|
||||||
|
cmpnltss xmm4,.t1
|
||||||
|
movd ecx,xmm4
|
||||||
|
or ecx,ecx
|
||||||
|
jne @f
|
||||||
|
movss xmm5,.t2
|
||||||
|
@@:
|
||||||
|
cmp .one_write,0 ; test if sth in 'nearest' data is written
|
||||||
|
jz @f
|
||||||
|
movss xmm4,xmm5
|
||||||
|
cmpnltss xmm4,[smalest_t]
|
||||||
|
movd ecx,xmm4
|
||||||
|
or ecx,ecx
|
||||||
|
jz .next_s
|
||||||
|
@@:
|
||||||
|
movss [smalest_t],xmm5
|
||||||
|
; push .a
|
||||||
|
; pop [smalest_a]
|
||||||
|
; push .b
|
||||||
|
; pop [smalest_b]
|
||||||
|
; push .c
|
||||||
|
; pop [smalest_c]
|
||||||
|
; push .delta
|
||||||
|
; pop [smalest_delta]
|
||||||
|
movaps xmm0,[edx]
|
||||||
|
movaps [nearest_sphere],xmm0
|
||||||
|
push dword[ebx]
|
||||||
|
pop dword[nearest_radius]
|
||||||
|
mov .one_write,1
|
||||||
|
|
||||||
|
.next_s:
|
||||||
|
add .sph_counter,1
|
||||||
|
cmp .sph_counter,MAX_SPHERES
|
||||||
|
jnz .next_sph
|
||||||
|
|
||||||
|
.put_pixel:
|
||||||
|
cmp .one_write,0
|
||||||
|
je .end
|
||||||
|
|
||||||
|
movss xmm5,[smalest_t]
|
||||||
|
shufps xmm5,xmm5,0 ; calc and put pixel
|
||||||
|
movaps xmm6,.dx
|
||||||
|
mulps xmm6,xmm5
|
||||||
|
movaps xmm4,[camera]
|
||||||
|
addps xmm4,xmm6 ; xmm4 - x,y,z on the sphere
|
||||||
|
movaps xmm7,xmm4
|
||||||
|
subps xmm4,[nearest_sphere]
|
||||||
|
; movaps xmm6,xmm7
|
||||||
|
; addps xmm6,[nearest_sphere]
|
||||||
|
; movaps .sph_xyz,xmm6
|
||||||
|
|
||||||
|
movss xmm0,[nearest_radius]
|
||||||
|
shufps xmm0,xmm0,0
|
||||||
|
divps xmm4,xmm0 ; xmm4 - normal to surface vector
|
||||||
|
movaps xmm1,xmm4 ; copy of normal in xmm1
|
||||||
|
xor eax,eax
|
||||||
|
xorps xmm3,xmm3
|
||||||
|
movss xmm2,[light_factor]
|
||||||
|
shufps xmm2,xmm2,0
|
||||||
|
|
||||||
|
.next_light:
|
||||||
|
; push eax
|
||||||
|
mov ebx,eax
|
||||||
|
shl ebx,4
|
||||||
|
;add eax,light
|
||||||
|
movaps xmm5,[light+ebx];[light] ;; [eax]
|
||||||
|
subps xmm5,xmm7 ; calc light unit vector
|
||||||
|
movaps xmm6,xmm5
|
||||||
|
mulps xmm5,xmm5
|
||||||
|
haddps xmm5,xmm5
|
||||||
|
haddps xmm5,xmm5
|
||||||
|
sqrtss xmm5,xmm5
|
||||||
|
divps xmm6,xmm5 ; xmm6 - normalized light vector
|
||||||
|
; dot_product
|
||||||
|
movaps xmm4,xmm1 ; xmm4 - normal to surface
|
||||||
|
mulps xmm4,xmm6
|
||||||
|
haddps xmm4,xmm4
|
||||||
|
haddps xmm4,xmm4
|
||||||
|
shufps xmm4,xmm4,0
|
||||||
|
; movaps xmm5,xmm4
|
||||||
|
; mulps xmm5,xmm5
|
||||||
|
; mulps xmm5,xmm5
|
||||||
|
; mulps xmm5,[color]
|
||||||
|
mulps xmm4,[lights_color+ebx] ; xmm4 - computed col. light vector dep.
|
||||||
|
; addps xmm4,xmm5
|
||||||
|
mulps xmm4,xmm2
|
||||||
|
addps xmm3,xmm4
|
||||||
|
; pop eax
|
||||||
|
add eax,1
|
||||||
|
cmp eax,MAX_LIGHTS
|
||||||
|
jnz .next_light
|
||||||
|
if 0
|
||||||
|
; mix with texture
|
||||||
|
movaps xmm0,.sph_xyz
|
||||||
|
movss xmm1,[nearest_radius]
|
||||||
|
shufps xmm1,xmm1,0
|
||||||
|
divps xmm0,xmm1
|
||||||
|
mulps xmm0,[correct_tex] ; f64
|
||||||
|
; addps xmm0,[correct_tex]
|
||||||
|
cvtss2si eax,xmm0
|
||||||
|
psrldq xmm0,4
|
||||||
|
cvtss2si ebx,xmm0
|
||||||
|
imul ebx,[tex_x]
|
||||||
|
add ebx,eax
|
||||||
|
lea ebx,[ebx*3]
|
||||||
|
add ebx,bitmap
|
||||||
|
;mov eax,[ebx]
|
||||||
|
movd xmm1,[ebx]
|
||||||
|
xorps xmm7,xmm7
|
||||||
|
punpcklbw xmm1,xmm7
|
||||||
|
punpcklwd xmm1,xmm7
|
||||||
|
cvtdq2ps xmm1,xmm1
|
||||||
|
mulps xmm3,xmm1
|
||||||
|
divps xmm3,[float255]
|
||||||
|
; divps xmm1,[float2]
|
||||||
|
; divps xmm3,[float2]
|
||||||
|
; addps xmm3,xmm1
|
||||||
|
end if
|
||||||
|
|
||||||
|
|
||||||
|
minps xmm3,[float255]
|
||||||
|
cvtps2dq xmm3,xmm3
|
||||||
|
packssdw xmm3,xmm3
|
||||||
|
packuswb xmm3,xmm3
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
mov edi,screen
|
||||||
|
mov ecx,XRES
|
||||||
|
imul ecx,.iy
|
||||||
|
add ecx,.ix
|
||||||
|
lea ecx,[ecx*3]
|
||||||
|
add edi,ecx
|
||||||
|
movd [edi],xmm3
|
||||||
|
|
||||||
|
.end:
|
||||||
|
add esp,128
|
||||||
|
pop ebp
|
||||||
|
|
||||||
|
ret
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
3
programs/demos/ray/Tupfile.lua
Normal file
3
programs/demos/ray/Tupfile.lua
Normal file
@ -0,0 +1,3 @@
|
|||||||
|
if tup.getconfig("NO_FASM") ~= "" then return end
|
||||||
|
tup.rule("echo lang fix " .. ((tup.getconfig("LANG") == "") and "en" or tup.getconfig("LANG")) .. " > lang.inc", {"lang.inc"})
|
||||||
|
tup.rule({"ray.asm", extra_inputs = {"lang.inc"}}, "fasm %f %o " .. tup.getconfig("KPACK_CMD"), "ray")
|
||||||
2
programs/demos/ray/build.bat
Normal file
2
programs/demos/ray/build.bat
Normal file
@ -0,0 +1,2 @@
|
|||||||
|
@fasm ray.asm ray
|
||||||
|
@pause
|
||||||
Loading…
Reference in New Issue
Block a user