0,0 → 1,3671 |
|
; application : View3ds ver. 0.072 - tiny .3ds and .asc files viewer |
; with a few graphics effects demonstration. |
; compiler : FASM |
; system : KolibriOS |
; author : Macgub aka Maciej Guba |
; email : macgub3@wp.pl |
; web : http://macgub.j.pl, http://macgub.co.pl |
; Fell free to use this intro in your own distribution of KolibriOS. |
; Special greetings to KolibriOS team . |
; I hope because my demos Christian Belive will be near to each of You. |
|
|
; Some adjustments made by Madis Kalme |
; madis.kalme@mail.ee |
; I tried optimizing it a bit, but don't know if it was successful. The objects |
; can be: |
; 1) Read from a file (*.3DS standard) |
; 2) Written in manually (at the end of the code) ; now not exist |
|
|
SIZE_X equ 500 |
SIZE_Y equ 600 ; ///// I want definitely |
TIMEOUT equ 10 ; ------ say: |
ROUND equ 10 ; \ @ @/ keep smiling every |
TEX_X equ 512 ; texture width ; \ ./ / day. |
TEX_Y equ 512 ; height ; \/ / |
TEX_SHIFT equ 9 ; texture width shifting ; __||__ / |
TEXTURE_SIZE EQU (TEX_X * TEX_Y)-1 ; /| | |
TEX equ SHIFTING ; TEX={SHIFTING | FLUENTLY} ; / \ / |
FLUENTLY = 0 ; / | | |
SHIFTING = 1 ; ------ |
CATMULL_SHIFT equ 8 ; | | |
LIGHT_SIZE equ 22 ; | | |
NON = 0 ; -/ \- |
MMX = 1 |
SSE = 2 |
SSE2 = 3 |
SSE3 = 4 |
Ext = SSE3 ;Ext={ NON | MMX | SSE | SSE2 | SSE3 } |
|
; 0 for short names (Menuet-compatible), 1 for long names (Kolibri features) |
USE_LFN = 1 ; App is Kolibri only now. |
|
use32 |
org 0x0 |
db 'MENUET01' ; 8 byte id |
dd 0x01 ; header version |
dd START ; start of code |
dd I_END ; size of image |
dd MEM_END ; memory for app |
dd MEM_END ; esp |
dd I_Param ; I_Param |
dd 0x0 ; I_Icon |
|
START: ; start of execution |
cld |
push dword (SIZE_Y shr 3) * 3 |
fninit |
fild dword[esp] |
fstp [rsscale] |
pop ebx |
|
mov [x_start],dword 20 shl 16 + 20 ;eax |
|
|
call alloc_buffer_mem |
call read_param |
call read_from_disk ; read, if all is ok eax = 0 |
cmp eax,0 |
jne .gen |
mov esi,[fptr] |
cmp [esi],word 4D4Dh |
jne .asc |
call read_tp_variables ; init points and triangles count variables |
cmp eax,0 |
je .gen |
jmp .malloc |
.gen: |
call generate_object |
jmp .opt |
.asc: |
mov [triangles_count_var],10000 ; to do: read asc header |
mov [points_count_var],10000 |
call alloc_mem_for_tp |
call read_asc |
jmp .opt |
.malloc: |
if USE_LFN |
call alloc_mem_for_tp |
end if |
call read_from_file |
.opt: |
|
|
|
call optimize_object1 ; proc in file b_procs.asm |
; set point(0,0,0) in center and calc all coords |
; to be in <-1.0,1.0> |
call normalize_all_light_vectors |
if Ext >= SSE3 |
call copy_lights ; to aligned float |
end if |
call init_triangles_normals2 |
call init_point_normals |
call init_envmap2 |
call init_envmap_cub |
call generate_texture2 |
call init_sincos_tab |
call do_color_buffer ; intit color_map |
mov edi,bumpmap |
call calc_bumpmap |
call calc_bumpmap_coords ; bump and texture mapping |
call draw_window |
;mov [draw_win_at_first],0 |
;mov eax,40 ; set events mask |
;mov ebx,1100000000000000000000000100111b |
;int 0x40 |
if Ext >= SSE3 |
mov eax,1 |
cpuid |
bt ecx,0 ; is sse3 on board? |
jc @f |
mov [max_dr_flg],12 |
@@: |
end if |
|
still: |
cmp [edit_flag],1 |
jne @f |
mov eax,40 ; set events mask |
mov ebx,1100000000000000000000000100111b |
jmp .int |
@@: |
mov eax,40 ; set events mask |
mov ebx,111b |
.int: |
int 0x40 |
|
mov eax,23 |
mov ebx,TIMEOUT |
cmp [speed_flag],0 |
je .skip |
mov eax,11 |
.skip: |
cmp [edit_flag],1 |
jne @f |
mov eax,10 |
|
@@: |
int 0x40 |
|
cmp eax,1 ; redraw event ? |
je red |
cmp eax,2 ; key event ? |
je key |
cmp eax,3 ; button event ? |
je button |
cmp eax,6 ; mouse event ? |
jne @f |
cmp [edit_flag],1 ; handle mouse only when edit is active |
jne @f |
|
mov eax,37 |
mov ebx,7 ; get mouse scroll |
int 0x40 |
and eax, 0xFFFF ; check only vertial |
cmp eax, 65535 |
je button.zoom_in |
cmp eax, 1 |
je button.zoom_out |
|
mov eax,37 |
mov ebx,3 ;read mouse state |
int 0x40 |
mov [mouse_state],eax |
call edit |
@@: |
jmp noclose |
|
red: ; redraw |
mov eax,9 ; get process info |
mov ebx,procinfo |
mov ecx,-1 |
int 0x40 |
mov eax,[procinfo+42] ; read params of window |
sub eax,115 |
mov [size_x_var],ax |
shr ax,1 |
mov [vect_x],ax |
; |
mov eax,[procinfo+46] |
sub eax,30 |
mov [size_y_var],ax |
shr ax,1 |
mov [vect_y],ax |
|
mov eax,[procinfo+34] |
mov [x_start],ax |
mov eax,[procinfo+38] |
mov [y_start],ax |
call alloc_buffer_mem ;realloc mem for scr & z buffs |
call draw_window |
|
jmp noclose |
|
key: ; key |
mov eax,2 ; just read it and ignore |
int 0x40 |
|
cmp ah, '+' |
je button.zoom_in |
cmp ah, '=' |
je button.zoom_in |
cmp ah, '-' |
je button.zoom_out |
cmp ah, 176 ;left |
je add_vec_buttons.x_minus |
cmp ah, 179 ;right |
je add_vec_buttons.x_plus |
cmp ah, 178 ;up |
je add_vec_buttons.y_minus |
cmp ah, 177 ;down |
je add_vec_buttons.y_plus |
|
jmp noclose |
|
button: ; button |
mov eax,17 ; get id |
int 0x40 |
|
cmp ah,1 ; button id=1 ? |
jne @f |
|
mov eax,-1 ; close this program |
int 0x40 |
@@: |
cmp ah,30 |
jge add_vec_buttons |
call update_flags ; update flags and write labels of flags |
|
; do other operations according to flag |
cmp ah,3 ; ah = 3 -> shading model |
jne .next_m6 |
cmp [dr_flag],2 |
jne @f |
; call init_envmap2 ; <----! this don't works in env mode |
; and more than ~18 kb objects |
; call init_envmap_cub2 |
@@: |
cmp [dr_flag],4 |
jne @f |
call generate_texture2 |
|
@@: |
.next_m6: |
; ah = 5 -> scale- |
cmp ah,5 |
jne @f |
.zoom_out: |
mov dword[scale],0.7 |
movss xmm0,[rsscale] |
mulss xmm0,[scale] |
movss [rsscale],xmm0 |
; fninit |
; fld [rsscale] |
; fmul [scale] |
; fstp [rsscale] |
|
|
@@: |
cmp ah,6 ; ah = 6 -> scale+ |
jne @f |
.zoom_in: |
mov dword[scale],1.3 |
movss xmm0,[rsscale] |
mulss xmm0,[scale] |
movss [rsscale],xmm0 |
|
; fninit |
; fld [rsscale] |
; fmul [scale] |
; fstp [rsscale] |
|
@@: |
cmp ah,9 ; lights random ; 'flat' 0 |
jne .next_m5 ; 'grd ' 1 |
call make_random_lights ; 'env ' 2 |
call normalize_all_light_vectors ; 'bump' 3 |
if Ext >= SSE3 |
call copy_lights |
end if |
call do_color_buffer ; intit color_map ; 'tex ' 4 |
; cmp [emboss_flag],1 ; 'pos ' 5 |
; je @f ; 'dots' 6 |
; cmp [dr_flag],8 |
; jge @f |
; cmp [dr_flag],2 ; 'txgr' 7 |
; jl .next_m5 ; '2tex' 8 |
; cmp [dr_flag],3 ; 'btex' 9 |
; jg .next_m5 |
; @@: |
call init_envmap2 ; update env map if shading model = environment or bump |
.next_m5: |
cmp ah,11 |
je @f |
cmp ah,12 |
je @f |
cmp ah,13 |
jne .next_m4 |
@@: |
call mirror |
.next_m4: |
cmp ah,14 |
jne @f |
call exchange |
@@: |
cmp ah,15 |
jne @f |
cmp [emboss_flag],1 |
; call init_envmap2 |
call do_emboss |
@@: |
; cmp ah,17 |
; jne .next_m |
; cmp [move_flag],2 |
; jne @f |
; call draw_window ; redraw other labels to navigation buttons |
; @@: |
; cmp [move_flag],0 |
; jne .next_m |
; call draw_window ; redraw other labels to navigation buttons |
.next_m: |
cmp ah,18 |
jne .next_m2 |
|
mov [re_alloc_flag],1 ; reallocate memory |
mov [triangles_count_var],20000 |
mov [points_count_var],20000 |
call alloc_mem_for_tp |
mov [re_alloc_flag],0 |
|
mov bl,[generator_flag] |
; or bl,bl |
; jz .next_m2 |
cmp bl,1 |
jne @f |
call generate_object |
jmp .calc_norm |
@@: |
cmp bl,4 |
jg @f |
movzx eax,bl ; eax < - object number |
call generate_object2 |
jmp .calc_norm |
@@: |
call generate_object3 |
.calc_norm: |
call optimize_object1 |
call init_triangles_normals2 |
call init_point_normals |
call calc_bumpmap_coords ; bump and texture mapping |
|
.next_m2: |
cmp ah,19 |
je @f |
cmp ah,20 |
jne .next_m3 |
@@: |
mov edi,bumpmap |
call calc_bumpmap |
.next_m3: |
cmp ah,21 ; re map bumps, texture coordinates |
jne @f |
call calc_bumpmap_coords |
@@: |
jmp noclose |
|
|
; there are 6 navigation buttons each |
add_vec_buttons: ; can move: object, camera,.. list is open |
; |
cmp ah,30 |
jne .next |
cmp [move_flag],0 |
jne @f |
; cmp [move_flag],2 |
; je .set_light1 |
.y_minus: |
sub [vect_y],10 |
jmp .next |
@@: |
cmp [move_flag],1 |
jne @f |
sub [yobs],10 ; observator = camera position |
jmp .next |
@@: |
sub [sin_amplitude],10 |
;-------------------------------------------------- |
; .set_light1: ; r - |
; movzx ebx,[light_no_flag] ; * 22 |
; mov ecx,ebx |
; shl ebx,4 |
; shl ecx,1 |
; add ebx,ecx |
; shl ecx,1 |
; add ebx,ecx |
; add ebx,lights+6 ; 6 -> light vector size |
; |
; movzx ecx,[light_comp_flag] |
; lea ecx,[ecx*3} |
; add ebx,ecx ; ebx -> color to set |
|
;--------------------------------------------------- |
.next: |
cmp ah,31 |
jne .next1 |
cmp [move_flag],1 |
je @f |
add [vect_z],10 |
jmp .next1 |
@@: |
add [zobs],10 ; observator = camera position |
.next1: |
cmp ah,33 |
jne .next2 |
cmp [move_flag],0 |
jne @f |
.x_minus: |
sub [vect_x],10 |
jmp .next2 |
@@: |
cmp [move_flag],1 |
jne @f |
sub [xobs],10 ; observator = camera position |
jmp .next2 |
@@: |
fninit |
fld [sin_frq] |
fsub [sin_delta] |
fstp [sin_frq] |
.next2: |
cmp ah,32 |
jne .next3 |
cmp [move_flag],0 |
jne @f |
.x_plus: |
add [vect_x],10 |
jmp .next3 |
@@: |
cmp [move_flag],1 |
jne @f |
add [xobs],10 ; observator = camera position |
jmp .next3 |
@@: |
fninit |
fld [sin_frq] ; change wave effect frequency |
fadd [sin_delta] |
fstp [sin_frq] |
.next3: |
cmp ah,34 |
jne .next4 |
cmp [move_flag],1 |
je @f |
|
sub [vect_z],10 |
jmp .next4 |
@@: |
sub [zobs],10 ; observator = camera position |
.next4: |
cmp ah,35 |
jne .next5 |
cmp [move_flag],0 |
jne @f |
; call add_vector |
.y_plus: |
add [vect_y],10 |
jmp .next5 |
@@: |
cmp [move_flag],1 |
jne @f |
add [yobs],10 ; observator = camera position |
jmp .next5 |
@@: |
add [sin_amplitude],10 |
.next5: |
|
|
|
noclose: |
|
cmp [edit_flag],1 |
jz .end_rot |
cmp [r_flag],2 |
jne .no_x |
inc [angle_x] |
and [angle_x],0xff |
mov [angle_z],0 |
jmp .end_rot |
|
.no_x: |
cmp [r_flag],0 |
jne .no_y |
inc [angle_y] |
and [angle_y],0xff |
mov [angle_z],0 |
jmp .end_rot |
|
.no_y: |
cmp [r_flag],1 |
jne .end_rot |
mov cx,[angle_x] |
inc cx |
and cx,0xff |
mov [angle_z],0 |
mov [angle_y],cx |
mov [angle_x],cx |
.end_rot: |
|
mov esi,angle_x |
mov edi,matrix |
call make_rotation_matrix |
RDTSC |
push eax |
mov esi,[points_normals_ptr] |
mov edi,[points_normals_rot_ptr] |
mov ebx,matrix |
mov ecx,[points_count_var] |
call rotary |
|
mov esi,matrix |
call add_scale_to_matrix |
|
mov esi,[points_ptr] |
mov edi,[points_rotated_ptr] |
mov ebx,matrix |
mov ecx,[points_count_var] |
call rotary |
|
|
mov esi,[points_rotated_ptr] |
mov edi,[points_translated_ptr] |
mov ecx,[points_count_var] |
call translate_points |
|
cmp [fire_flag],0 |
jne @f |
call clrscr ; clear the screen |
@@: |
cmp [dr_flag],7 ; fill if 2tex and texgrd |
jge @f |
cmp [catmull_flag],0 ;non fill if Catmull = off |
je .non_f |
cmp [dr_flag],6 ; non fill if dots |
je .non_f |
@@: |
call fill_Z_buffer ; make background |
.non_f: |
cmp [dr_flag],6 |
jne @f |
call draw_dots |
jmp .blurrr |
@@: |
call draw_triangles ; draw all triangles from the list |
cmp [edit_flag],0 |
jz .no_edit |
call clear_vertices_index |
call draw_handlers |
; call edit |
|
.no_edit: |
|
.blurrr: |
cmp [sinus_flag],0 |
je @f |
call do_sinus |
@@: |
cmp [fire_flag],0 |
jne @f |
cmp [blur_flag],0 |
je .no_blur ; no blur, no fire |
movzx ecx,[blur_flag] |
call blur_screen ; blur and fire |
jmp .no_blur |
@@: |
cmp [emboss_flag],0 |
jne .emb ; if emboss=true -> no fire |
movzx ecx,[fire_flag] |
call blur_screen ; blur and fire |
.no_blur: ; no blur, no fire |
cmp [emboss_flag],0 |
je @f |
.emb: |
call do_emboss |
|
@@: |
|
cmp [inc_bright_flag],0 ; increase brightness |
je .no_inc_bright |
movzx ebx,[inc_bright_flag] |
shl ebx,4 |
mov esi,[screen_ptr] |
movzx ecx,word[size_y_var] |
movzx eax,word[size_x_var] |
mul ecx |
lea ecx,[eax*4] |
|
if (Ext = MMX)|(Ext = SSE) |
mov bh,bl |
push bx |
shl ebx,16 |
pop bx |
push ebx |
push ebx |
movq mm0,[esp] |
add esp,8 |
else if Ext >= SSE2 |
mov bh,bl |
push bx |
shl ebx,16 |
pop bx |
movd xmm0,ebx |
shufps xmm0,xmm0,0 |
end if |
.oop: |
if Ext=NON |
lodsb |
add al,bl |
jnc @f |
mov byte[esi-1],255 |
loop .oop |
@@: |
mov [esi-1],al |
loop .oop |
else if (Ext=MMX)|(Ext=SSE) |
movq mm1,[esi] |
movq mm2,[esi+8] |
paddusb mm1,mm0 |
paddusb mm2,mm0 |
movq [esi],mm1 |
movq [esi+8],mm2 |
add esi,16 |
sub ecx,16 |
jnz .oop |
else |
movaps xmm1,[esi] |
paddusb xmm1,xmm0 |
movaps [esi],xmm1 |
add esi,16 |
sub ecx,16 |
jnc .oop |
end if |
|
.no_inc_bright: |
|
|
cmp [dec_bright_flag],0 |
je .no_dec_bright |
movzx ebx,[dec_bright_flag] |
shl ebx,4 |
mov esi,[screen_ptr] |
movzx eax,word[size_x_var] |
movzx ecx,word[size_y_var] |
mul ecx |
lea ecx,[eax*4] |
if (Ext = MMX)|(Ext = SSE) |
mov bh,bl |
push bx |
shl ebx,16 |
pop bx |
push ebx |
push ebx |
movq mm0,[esp] |
add esp,8 |
else if Ext >=SSE2 |
mov bh,bl |
push bx |
shl ebx,16 |
pop bx |
movd xmm0,ebx |
shufps xmm0,xmm0,0 |
end if |
.oop1: |
if Ext=NON |
lodsb |
sub al,bl |
jb @f |
mov [esi-1],al |
loop .oop1 |
@@: |
mov byte[esi-1],0 |
loop .oop1 |
else if (Ext = MMX)|(Ext=SSE) |
movq mm1,[esi] |
psubusb mm1,mm0 |
movq [esi],mm1 |
add esi,8 |
sub ecx,8 |
jnz .oop1 |
else |
movaps xmm1,[esi] |
psubusb xmm1,xmm0 |
movaps [esi],xmm1 |
add esi,16 |
sub ecx,16 |
jnc .oop1 |
end if |
.no_dec_bright: |
|
|
RDTSC |
sub eax,[esp] |
sub eax,41 |
; pop eax |
|
mov ecx,10 |
.dc: |
xor edx,edx |
mov edi,10 |
div edi |
add dl,30h |
mov [STRdata+ecx-1],dl |
loop .dc |
pop eax |
|
|
mov eax,7 ; put image |
mov ebx,[screen_ptr] |
mov ecx,[size_y_var] |
; mov ecx,SIZE_X shl 16 + SIZE_Y |
mov edx,[offset_y] ;5 shl 16 + 25 |
cmp [dr_flag],12 |
jge .ff |
int 0x40 |
jmp .f |
.ff: |
mov eax,65 |
mov esi,32 |
xor ebp,ebp |
int 0x40 |
.f: |
mov eax,13 |
mov bx,[size_x_var] |
add ebx,18 |
shl ebx,16 |
mov bx,60 |
mov cx,[size_y_var] |
sub cx,2 |
shl ecx,16 |
mov cx,9 |
xor edx,edx |
int 40h |
|
mov eax,4 ; function 4 : write text to window |
mov bx,[size_x_var] |
add ebx,18 |
shl ebx,16 |
mov bx,[size_y_var] |
sub bx,2 ; [x start] *65536 + [y start] |
mov ecx,0x00888888 |
mov edx,STRdata ; pointer to text beginning |
mov esi,10 ; text length |
int 40h |
|
|
|
jmp still |
|
;-------------------------------------------------------------------------------- |
;-------------------------PROCEDURES--------------------------------------------- |
;-------------------------------------------------------------------------------- |
include "flat_cat.inc" |
include "tex_cat.inc" |
include "bump_cat.inc" |
include "3dmath.inc" |
include "grd_line.inc" |
include "b_procs.inc" |
include "a_procs.inc" |
include "grd_cat.inc" |
include "bump_tex.inc" |
include "grd_tex.inc" |
include "two_tex.inc" |
include "asc.inc" |
if Ext >= SSE3 |
include "3r_phg.inc" |
include '3stencil.inc' |
include '3glass.inc' |
include '3glass_tex.inc' |
end if |
clear_vertices_index: |
mov edi,[vertices_index_ptr] |
movzx eax,word[size_x_var] |
movzx ecx,word[size_y_var] |
imul ecx,eax |
xor eax,eax |
shr ecx,1 |
rep stosd |
ret |
edit: ; mmx required, edit mesh by vertex |
push ebp |
mov ebp,esp |
sub esp,128 |
|
.y_coord equ ebp-2 |
.x_coord equ ebp-4 |
.points_translated equ ebp-10 |
.points equ ebp-22 |
.points_rotated equ ebp-34 |
.mx equ ebp-70 |
|
macro check_bar |
{ |
movzx ebx,word[.x_coord] |
movzx ecx,word[.y_coord] |
movzx edx,word[size_x_var] |
imul edx,ecx |
add ebx,edx |
push ebx |
lea ecx,[ebx*2] |
lea ebx,[ebx*3] |
|
cmp [dr_flag],12 |
jl @f |
add ebx,[esp] |
@@: |
add esp,4 |
add ebx,[screen_ptr] |
mov ebx,[ebx] |
and ebx,0x00ffffff |
cmp ebx,0x00ff0000 ; is handle bar ? |
} |
|
emms |
mov eax,37 ; get mouse state |
mov ebx,1 ; x = 5, y = 25 - offsets |
int 0x40 |
|
mov ebx,[offset_y] ;5 shl 16 + 25 |
movd mm0,ebx |
movd mm1,eax |
movd mm3,[size_y_var] |
pcmpgtw mm0,mm1 |
pcmpgtw mm3,mm1 |
pxor mm3,mm0 |
movd eax,mm3 |
mov cx,ax |
shr eax,16 |
and ax,cx |
or ax,ax |
jz .no_edit |
|
|
movd mm0,ebx |
psubw mm1,mm0 |
movd eax,mm1 |
|
; store both x and y coordinates |
ror eax,16 |
; push eax |
; sub esp,256 |
mov [.x_coord],eax |
test word[mouse_state],100000000b |
jz .not_press ; check if left mouse button press |
|
; left button pressed |
|
|
check_bar |
jne .no_edit |
add ecx,[vertices_index_ptr] |
mov cx,word[ecx] |
inc cx |
|
|
mov [vertex_edit_no],cx ;if vert_edit_no = 0, no vertex selected |
|
mov eax,dword[.x_coord] |
mov dword[edit_end_x],eax |
mov dword[edit_start_x],eax |
jmp .end |
.not_press: |
test byte[mouse_state],1b ; check if left button is held |
jz .not_held |
; check_bar |
; jne .no_edit |
; add ecx,[vertices_index_ptr] |
; mov cx,[ecx] |
; inc cx |
cmp [vertex_edit_no],0 ; cx ; vertex number |
je .end |
push dword[.x_coord] |
pop dword[edit_end_x] |
jmp .end |
.not_held: |
shr [mouse_state],16 |
test byte[mouse_state],1b ; test if left button released |
jz .end |
check_bar |
jne .end |
|
movzx esi,[vertex_edit_no] |
dec esi |
lea esi,[esi*3] |
add esi,esi |
add esi,[points_translated_ptr] |
emms |
|
movd mm1,dword[esi] |
paddw mm1,mm0 |
psubw mm1,qword[vect_x] |
movd dword[esi],mm1 |
|
lea edi,[.points] |
; detranslate |
fninit |
fild word[esi+4] |
fstp dword[edi+8] |
fild word[esi+2] |
fisub word[offset_x] |
fstp dword[edi+4] |
fild word[esi] |
fisub word[offset_y] ; proteza |
fstp dword[edi] |
|
mov esi,matrix |
lea edi,[.mx] |
call reverse_mx_3x3 |
|
lea esi,[.points] |
lea edi,[.points_rotated] |
lea ebx,[.mx] |
mov ecx,1 |
call rotary |
|
; inject into vertex list |
movzx edi,[vertex_edit_no] |
dec edi |
lea edi,[edi*3] |
shl edi,2 |
add edi,[points_ptr] |
lea esi,[.points_rotated] |
cld |
movsd |
movsd |
movsd |
; mov ecx,3 |
; cld |
; rep movsd |
|
|
mov dword[edit_end_x],0 |
mov [vertex_edit_no],0 |
|
.no_edit: |
.end: |
mov esp,ebp |
pop ebp |
ret |
|
alloc_buffer_mem: |
push ebp |
mov ebp,esp |
.temp equ ebp-4 |
push dword 0 |
|
mov eax, 68 |
mov ebx, 11 |
int 0x40 ; -> create heap, to be sure |
|
|
movzx ecx,word[size_x_var] |
movzx eax,word[size_y_var] |
mul ecx |
|
mov [.temp],eax |
lea ecx,[eax*4] ; more mem for r_phg cause |
add ecx,256 |
mov eax,68 |
mov ebx,20 |
mov edx,[screen_ptr] |
int 0x40 |
mov [screen_ptr],eax |
|
mov ecx,[.temp] |
shl ecx,2 |
add ecx,256 |
mov eax,68 |
mov ebx,20 |
mov edx,[Zbuffer_ptr] |
int 0x40 |
mov [Zbuffer_ptr],eax |
|
|
mov ecx,[.temp] |
add ecx,ecx |
add ecx,256 |
mov eax,68 |
mov ebx,20 |
mov edx,[vertices_index_ptr] |
int 0x40 |
mov [vertices_index_ptr],eax |
|
mov esp,ebp |
pop ebp |
|
|
|
|
update_flags: |
; updates flags and writing flag description |
; in ah - button number |
push ax |
mov edi,menu |
.ch_another: |
cmp ah,byte[edi] ; ah = button id |
jne @f |
mov bl,byte[edi+11] ; max_flag + 1 |
cmp bl,255 |
je .no_write |
inc byte[edi+12] ; flag |
cmp byte[edi+12],bl |
jne .write |
mov byte[edi+12],0 |
jmp .write |
@@: |
add edi,17 |
cmp byte[edi],-1 |
jne .ch_another |
jmp .no_write |
.write: |
; clreol {pascal never dies} |
; * eax = 13 - function number |
; * ebx = [coordinate on axis x]*65536 + [size on axis x] |
; * ecx = [coordinate on axis y]*65536 + [size on axis y] |
; * edx = color 0xRRGGBB or 0x80RRGGBB for gradient fill |
|
mov eax,13 ; function 13 write rectangle |
movzx ecx,byte[edi] |
sub cl,2 |
lea ecx,[ecx*3] |
lea ecx,[ecx*5] |
add ecx,28 |
shl ecx,16 |
add ecx,14 ; ecx = [coord y]*65536 + [size y] |
mov bx,[size_x_var] |
shl ebx,16 |
add ebx,(12+70)*65536+25 ; [x start] *65536 + [size x] |
mov edx,0x00000000 ; color 0x00RRGGBB |
int 0x40 |
|
mov eax,4 ; function 4 : write text to window |
movzx ebx,byte[edi] |
sub bl,2 |
lea ebx,[ebx*3] |
lea ebx,[ebx*5] |
mov cx,[size_x_var] |
shl ecx,16 |
add ebx,ecx |
add ebx,(12+70)*65536+28 ; [x start] *65536 + [y start] |
mov ecx,0x00ddeeff ; font 1 & color ( 0xF0RRGGBB ) |
movzx edx,byte[edi+12] ; current flag |
shl edx,2 ; * 4 = text length |
add edx,dword[edi+13] ; pointer to text beginning |
mov esi,4 ; text length - |
; flag description 4 characters |
int 0x40 |
|
.no_write: |
pop ax |
ret |
normalize_all_light_vectors: |
mov edi,lights |
@@: |
call normalize_vector ; 3dmath.inc |
add edi,LIGHT_SIZE |
cmp edi,lightsend ;ecx |
jl @b |
ret |
|
calc_bumpmap_coords: ; map texture, bump |
;macro .comment222 |
; ; planar mapping |
; mov esi,points |
; mov edi,tex_points |
; @@: |
; add esi,2 |
; movsd |
; cmp dword[esi],dword -1 |
; jne @b |
|
; .Pi2 equ dword[ebp-4] |
|
; mov ebp,esp |
; sub esp,4 |
|
fninit |
fldpi |
fadd st,st |
mov esi,[points_ptr] |
mov edi,tex_points |
mov ecx,[points_count_var] |
inc ecx |
; cmp [map_tex_flag],1 |
; jne .cylindric |
; spherical mapping around y axle |
|
@@: |
fld dword[esi] ; x coord |
fld dword[esi+8] ; z coord |
fpatan ; arctg(st1/st) |
; fdiv .Pi2 |
fdiv st0,st1 |
fimul [tex_x_div2] |
fiadd [tex_x_div2] |
fistp word[edi] ; x |
|
fld dword[esi+4] ; y coord |
fld dword[esi] ; x |
fmul st,st0 |
fld dword[esi+4] ; y |
fmul st,st0 |
fld dword[esi+8] ; z |
fmul st,st0 |
faddp |
faddp |
fsqrt |
fpatan |
fldpi |
fdivp |
fimul [tex_y_div2] |
fiadd [tex_y_div2] |
fistp word[edi+2] ; y |
|
add esi,12 |
add edi,4 |
loop @b |
ffree st0 |
; jmp .end_map |
; .cylindric: |
; fld dword[esi] ; around y axle |
; fld dword[esi+8] |
; fpatan |
; fdiv st0,st1 |
; fimul [tex_x_div2] |
; fiadd [tex_x_div2] |
; fistp word[edi] |
|
; fld dword[esi+4] |
; fimul [tex_y_div2] |
; fiadd [tex_y_div2] |
; fistp word[edi+2] |
|
; add esi,12 |
; add edi,4 |
; loop .cylindric |
; ffree st0 |
;; mov esp,ebp |
; .end_map: |
ret |
|
|
init_envmap2: ; do env_map using many light sources |
;env_map 512 x 512 x 3 bytes |
.temp equ word [ebp-2] |
.nEy equ word [ebp-4] |
.nEx equ word [ebp-6] |
.col_r equ [ebp-8] |
.col_g equ [ebp-9] |
.col_b equ [ebp-10] |
|
push ebp |
mov ebp,esp |
sub esp,20 |
mov edi,envmap |
fninit |
|
mov dx,- TEX_Y / 2 ;256 ; dx - vertical coordinate = y |
.ie_ver: |
mov cx,- TEX_X / 2 ;256 ; cx - horizontal coord = x |
.ie_hor: |
xor ebx,ebx |
mov dword .col_b, 0 |
.light: |
lea esi,[lights+ebx] |
fld dword[esi] ; light vector x cooficient |
fimul [tex_x_div2] ;[i256] |
mov .temp,cx |
fisubr .temp |
fistp .nEx |
fld dword[esi+4] ; light vector y cooficient |
fimul [tex_y_div2] ;[i256] |
mov .temp,dx |
fisubr .temp |
fistp .nEy |
|
cmp .nEx,- TEX_X / 2 ;256 |
jl .update_counters |
cmp .nEy,- TEX_Y / 2 ;256 |
jl .update_counters |
cmp .nEx,TEX_X / 2 ;256 |
jg .update_counters |
cmp .nEy,TEX_Y / 2 ;256 |
jg .update_counters |
|
fild .nEx |
fmul st,st0 |
fild .nEy |
fmul st,st0 |
faddp |
fsqrt |
fisubr [i256] |
fmul [env_const] |
fidiv [i256] ; st - 'virtual' dot product |
|
fcom [dot_max] |
fstsw ax |
sahf |
jb @f |
ffree st |
fld1 ;[dot_max] |
@@: |
fcom [dot_min] |
fstsw ax |
sahf |
ja @f |
ffree st |
fldz ;[dot_min] |
@@: |
push ebp |
movzx ax,byte[esi+21] |
push ax ;- shines |
mov al,byte[esi+14] ; b orginal color |
push ax |
mov al,byte[esi+13] ; g |
push ax |
mov al,byte[esi+12] ; r |
push ax |
; pxor xmm1,xmm1 |
; movd xmm0,[esi+12] |
; punpckhbw xmm0,xmm1 |
; sub esp,8 |
; movq [esp],xmm0 |
|
|
mov al,byte[esi+20] ; b max color |
push ax |
mov al,byte[esi+19] ; g |
push ax |
mov al,byte[esi+18] ; r |
push ax |
mov al,byte[esi+17] ; b min col |
push ax |
mov al,byte[esi+16] ; g |
push ax |
mov al,byte[esi+15] ; r |
push ax |
push eax ; earlier - dot pr |
; fstp .dot_product |
; push .dot_product |
call calc_one_col |
pop ebp |
; eax-0x00rrggbb |
cmp al,.col_b |
jbe @f |
mov .col_b,al |
@@: ; eax - ggbb00rr |
shr ax,8 |
cmp al,.col_g |
jbe @f |
mov .col_g,al |
@@: ; eax - bb0000gg |
shr eax,16 |
cmp al,.col_r |
jbe @f |
mov .col_r,al |
@@: |
.update_counters: ; update and jump when neccesery |
add ebx,LIGHT_SIZE |
cmp bx,[all_lights_size] |
jl .light ; next_light |
mov eax,dword .col_b |
stosd |
dec edi |
|
inc cx |
cmp cx,TEX_X / 2 ;256 |
jne .ie_hor |
|
inc dx |
cmp dx,TEX_Y / 2 ;256 |
jne .ie_ver |
|
mov esp,ebp |
pop ebp |
ret |
|
|
|
do_color_buffer: ; do color buffer for Gouraud, flat shading |
;env_map 512 x 512 x 3 bytes ; many lights using |
.temp equ word [ebp-2] |
.nz equ dword [ebp-6] ; dword |
.ny equ dword [ebp-10] |
.nx equ dword [ebp-14] |
.col_r equ [ebp-16] |
.col_g equ [ebp-17] |
.col_b equ [ebp-18] |
|
push ebp |
mov ebp,esp |
sub esp,20 |
mov edi,color_map |
fninit |
|
mov dx,- TEX_Y / 2 ;-256 ; dx - vertical coordinate = y |
.ie_ver: |
mov cx,- TEX_X / 2 ;256 ; cx - horizontal coord = x |
.ie_hor: |
mov .temp,cx |
fild .temp |
fidiv [i256] ;st = Nx - vector normal x cooficient |
fst .nx |
fmul st,st0 |
mov .temp,dx |
fild .temp |
fidiv [i256] ; st = Ny - vector normal y coeficient |
fst .ny |
fmul st,st0 |
faddp |
fld1 |
fchs |
faddp |
fabs |
fsqrt |
fchs |
fstp .nz ; st - Nz - vect normal z coeficient |
xor ebx,ebx |
mov dword .col_b, 0 |
.light: |
push edi ;env_map |
lea esi,[lights+ebx] |
lea edi,.nx |
call dot_product |
pop edi |
fcom [dot_min] |
fstsw ax |
sahf |
ja .env_ok1 ;compare with dot_max |
ffree st |
|
jmp .update_counters |
.env_ok1: |
fcom [dot_max] |
fstsw ax |
sahf |
jb .env_ok2 ; calc col |
ffree st |
jmp .update_counters |
.env_ok2: ;calc col |
push ebp |
movzx ax,byte[esi+21] |
push ax ;- shines |
mov al,byte[esi+14] ; b orginal color |
push ax |
mov al,byte[esi+13] ; g |
push ax |
mov al,byte[esi+12] ; r |
push ax |
mov al,byte[esi+20] ; b max color |
push ax |
mov al,byte[esi+19] ; g |
push ax |
mov al,byte[esi+18] ; r |
push ax |
mov al,byte[esi+17] ; b min col |
push ax |
mov al,byte[esi+16] ; g |
push ax |
mov al,byte[esi+15] ; r |
push ax |
push eax ; earlier - dot pr |
; fstp .dot_product |
; push .dot_product |
call calc_one_col |
pop ebp |
; eax-0x00rrggbb |
cmp al,.col_b |
jbe @f |
mov .col_b,al |
@@: |
shr ax,8 |
cmp al,.col_g |
jbe @f |
mov .col_g,al |
@@: |
shr eax,16 |
cmp al,.col_r |
jbe @f |
mov .col_r,al |
@@: |
.update_counters: ; update and jump when neccesery |
add ebx,LIGHT_SIZE |
cmp bx,[all_lights_size] |
jl .light ; next_light |
mov eax,dword .col_b |
stosd |
dec edi |
|
inc cx |
cmp cx,TEX_X / 2 ;256 |
jne .ie_hor |
|
inc dx |
cmp dx,TEX_X / 2 ;256 |
jne .ie_ver |
|
.env_done: |
mov esp,ebp |
pop ebp |
ret |
if Ext >= SSE2 |
init_point_normals: |
.z equ dword [ebp-8] |
.y equ dword [ebp-12] |
.x equ [ebp-16] |
.point_number equ dword [ebp-28] |
.hit_faces equ dword [ebp-32] |
|
push ebp |
mov ebp,esp |
sub esp,64 |
and ebp,-16 |
mov edi,[points_normals_ptr] |
mov .point_number,0 |
.ipn_loop: |
movd xmm0,.point_number |
pshufd xmm0,xmm0,0 |
mov .hit_faces,0 |
mov .x,dword 0 |
mov .y,0 |
mov .z,0 |
mov esi,[triangles_ptr] |
xor ecx,ecx ; ecx - triangle number |
.ipn_check_face: |
movdqu xmm1,[esi] |
pcmpeqd xmm1,xmm0 |
pmovmskb eax,xmm1 |
and eax,0xfff |
or eax,eax |
jz .ipn_next_face |
push esi |
mov esi,ecx |
lea esi,[esi*3] |
shl esi,2 |
add esi,[triangles_normals_ptr] |
movups xmm7,[esi] |
addps xmm7,.x |
movaps .x,xmm7 |
pop esi |
inc .hit_faces |
|
.ipn_next_face: |
add esi,12 |
inc ecx |
cmp ecx,[triangles_count_var] |
jne .ipn_check_face |
cvtsi2ss xmm6,.hit_faces |
movaps xmm7,.x |
|
rcpss xmm6,xmm6 |
shufps xmm6,xmm6,11000000b |
mulps xmm7,xmm6 |
movlps [edi],xmm7 |
movhlps xmm7,xmm7 |
movss [edi+8],xmm7 |
call normalize_vector |
; movaps xmm6,xmm7 |
; mulps xmm6,xmm6 |
; andps xmm6,[zero_hgst_dd] |
; haddps xmm6,xmm6 |
; haddps xmm6,xmm6 |
; rsqrtps xmm6,xmm6 |
; mulps xmm7,xmm6 |
; movlps [edi],xmm7 |
; movhlps xmm7,xmm7 |
; movss [edi+8],xmm7 |
|
add edi,12 |
inc .point_number |
mov edx,.point_number |
cmp edx,[points_count_var] |
jne .ipn_loop |
|
add esp,64 |
pop ebp |
ret |
else |
init_point_normals: |
.x equ dword [ebp-4] |
.y equ dword [ebp-8] |
.z equ dword [ebp-12] |
.point_number equ dword [ebp-28] |
.hit_faces equ dword [ebp-32] |
|
fninit |
mov ebp,esp |
sub esp,32 |
mov edi,[points_normals_ptr] |
mov .point_number,0 |
.ipn_loop: |
mov .hit_faces,0 |
mov .x,0 |
mov .y,0 |
mov .z,0 |
mov esi,[triangles_ptr] |
xor ecx,ecx ; ecx - triangle number |
.ipn_check_face: |
xor ebx,ebx ; ebx - 'position' in one triangle |
.ipn_check_vertex: |
mov eax,dword[esi+ebx] ; eax - point_number |
cmp eax,.point_number |
jne .ipn_next_vertex |
push esi |
mov esi,ecx |
lea esi,[esi*3] |
; lea esi,[triangles_normals+esi*4] |
shl esi,2 |
add esi,[triangles_normals_ptr] |
|
fld .x |
fadd dword[esi+vec_x] ; vec_x this defined in 3dmath.asm - x cooficient |
fstp .x ; of normal vactor |
fld .y |
fadd dword[esi+vec_y] |
fstp .y |
fld .z |
fadd dword[esi+vec_z] |
fstp .z |
pop esi |
inc .hit_faces |
jmp .ipn_next_face |
.ipn_next_vertex: |
add ebx,4 |
cmp ebx,12 |
jne .ipn_check_vertex |
.ipn_next_face: |
add esi,12 |
inc ecx |
cmp ecx,[triangles_count_var] |
jne .ipn_check_face |
|
fld .x |
fidiv .hit_faces |
fstp dword[edi+vec_x] |
fld .y |
fidiv .hit_faces |
fstp dword[edi+vec_y] |
fld .z |
fidiv .hit_faces |
fstp dword[edi+vec_z] |
call normalize_vector |
add edi,12 ;type vector 3d |
inc .point_number |
mov edx,.point_number |
cmp edx,[points_count_var] |
jne .ipn_loop |
|
mov esp,ebp |
ret |
;=============================================================== |
end if |
init_triangles_normals2: |
mov ebx,[triangles_normals_ptr] |
mov ebp,[triangles_ptr] |
mov ecx,[triangles_count_var] |
@@: |
push ecx |
push ebx |
mov ebx,vectors |
mov esi,dword[ebp] ; first point index |
lea esi,[esi*3] |
; lea esi,[points+esi*2] ; esi - pointer to 1st 3d point |
shl esi,2 |
add esi,[points_ptr] |
mov edi,dword[ebp+4] ; first point index |
lea edi,[edi*3] |
shl edi,2 |
add edi,[points_ptr] |
; movzx edi,word[ebp+2] ; second point index |
; lea edi,[edi*3] |
; lea edi,[points+edi*2] ; edi - pointer to 2nd 3d point |
call make_vector_r |
add ebx,12 |
mov esi,edi |
mov edi,dword[ebp+8] ; third point index |
lea edi,[edi*3] |
shl edi,2 |
add edi,[points_ptr] |
; lea edi,[points+edi*2] |
call make_vector_r |
mov edi,ebx ; edi - pointer to 2nd vector |
mov esi,ebx |
sub esi,12 ; esi - pointer to 1st vector |
pop ebx |
call cross_product |
mov edi,ebx |
call normalize_vector |
add ebp,12 |
add ebx,12 |
pop ecx |
sub ecx,1 |
jnz @b |
; cmp dword[ebp],-1 |
; jne @b |
ret |
|
if Ext >= SSE3 |
copy_lights: ; after normalising ! |
mov esi,lights |
mov edi,lights_aligned |
mov ecx,3 |
.again: |
push ecx |
mov ecx,3 |
cld |
rep movsd |
xor eax,eax |
stosd |
mov ecx,3 |
.b: |
push ecx |
mov ecx,3 |
@@: |
movzx ebx,byte[esi] |
cvtsi2ss xmm0,ebx |
movss [edi],xmm0 |
inc esi |
add edi,4 |
loop @b |
stosd |
pop ecx |
loop .b |
inc esi ; skip shiness |
pop ecx |
loop .again |
ret |
end if |
|
clrscr: |
mov edi,[screen_ptr] |
movzx ecx,word[size_x_var] |
movzx eax,word[size_y_var] |
imul ecx,eax |
|
|
xor eax,eax |
if Ext=NON |
rep stosd |
else if Ext = MMX |
pxor mm0,mm0 |
@@: |
movq [edi+00],mm0 |
movq [edi+08],mm0 |
movq [edi+16],mm0 |
movq [edi+24],mm0 |
add edi,32 |
sub ecx,8 |
jnc @b |
else |
push ecx |
mov ecx,edi |
and ecx,0x0000000f |
rep stosb |
pop ecx |
and ecx,0xfffffff0 |
xorps xmm0,xmm0 |
@@: |
movaps [edi],xmm0 |
movaps [edi+16],xmm0 |
movaps [edi+32],xmm0 |
movaps [edi+48],xmm0 |
add edi,64 |
sub ecx,16 |
jnz @b |
end if |
|
ret |
|
|
draw_triangles: |
|
emms |
; update translated list MMX required |
cmp [vertex_edit_no],0 |
je @f |
movzx eax,[vertex_edit_no] |
dec eax |
movd mm0,[edit_end_x] |
psubw mm0,[edit_start_x] |
lea eax,[eax*3] |
add eax,eax |
add eax,[points_translated_ptr] |
movd mm1,dword[eax] |
paddw mm1,mm0 |
movd dword[eax],mm1 |
@@: |
if Ext >= SSE3 |
cmp [dr_flag],13 |
jnge .no_stencil |
mov esi,[triangles_ptr] |
mov ecx,[triangles_count_var] |
@@: |
push esi |
push ecx |
|
mov eax,[esi] |
mov ebx,[esi+4] |
mov ecx,[esi+8] |
imul eax,[i12] |
imul ebx,[i12] |
imul ecx,[i12] |
add eax,[points_rotated_ptr] |
add ebx,[points_rotated_ptr] |
add ecx,[points_rotated_ptr] |
push dword[ecx+8] |
push dword[ebx+8] |
push dword[eax+8] |
movups xmm0,[esp] |
add esp,12 |
andps xmm0,[zero_hgst_dd] |
|
|
mov eax,[esi] |
mov ebx,[esi+4] |
mov ecx,[esi+8] |
shl eax,1 |
shl ebx,1 |
shl ecx,1 |
lea eax,[eax*3] |
lea ebx,[ebx*3] |
lea ecx,[ecx*3] |
add eax,[points_translated_ptr] |
add ebx,[points_translated_ptr] |
add ecx,[points_translated_ptr] |
mov eax,[eax] |
mov ebx,[ebx] |
mov ecx,[ecx] |
ror eax,16 |
ror ebx,16 |
ror ecx,16 |
|
|
mov esi,[Zbuffer_ptr] |
|
call stencil_tri |
|
pop ecx |
pop esi |
add esi,12 |
dec ecx |
jnz @b |
|
.no_stencil: |
end if |
|
|
|
mov esi,[triangles_ptr] |
mov ecx,[triangles_count_var] |
.again_dts: |
push ecx |
mov ebp,[points_translated_ptr] |
if Ext = NON |
mov eax,dword[esi] |
mov [point_index1],eax |
lea eax,[eax*3] |
add eax,eax |
push ebp |
add ebp,eax |
mov eax,[ebp] |
; cmp [vertex_edit_no],0 |
; jne @f |
; |
; @@: |
mov dword[xx1],eax |
mov eax,[ebp+4] |
mov [zz1],ax |
|
pop ebp |
|
|
mov eax,dword[esi+4] |
mov [point_index2],eax |
lea eax,[eax*3] |
add eax,eax |
push ebp |
add ebp,eax |
mov eax,[ebp] |
mov dword[xx2],eax |
mov eax,[ebp+4] |
mov [zz2],ax |
pop ebp |
|
|
mov eax,dword[esi+8] ; xyz3 = [ebp+[esi+4]*6] |
mov [point_index3],eax |
lea eax,[eax*3] |
add eax,eax |
; push ebp |
add ebp,eax |
mov eax,[ebp] |
mov dword[xx3],eax |
mov eax,[ebp+4] |
mov [zz3],ax |
else |
movq mm0,[esi] ; don't know MMX |
movq qword[point_index1],mm0 |
; shr eax,16 |
; mov [point_index2],ax |
mov eax,dword[esi+8] |
mov [point_index3],eax |
movdqu xmm0,[esi] |
paddd xmm0,xmm0 |
movdqa xmm1,xmm0 |
paddd xmm0,xmm0 |
paddd xmm0,xmm1 |
movd eax,xmm0 |
psrldq xmm0,4 |
movd ebx,xmm0 |
psrldq xmm0,4 |
movd ecx,xmm0 |
and eax,0FFFFh |
and ebx,0FFFFh |
and ecx,0FFFFh |
movq mm0,[ebp+eax] |
movq mm1,[ebp+ebx] |
movq mm2,[ebp+ecx] |
movq qword[xx1],mm0 |
movq qword[xx2],mm1 |
movq qword[xx3],mm2 |
; emms |
end if ; ********************************* |
if 0 |
cmp [vertex_edit_no],0 |
jne .no_edit |
mov ax,[vertex_edit_no] |
dec ax |
cmp ax,[point_index1] |
jne @f |
movd mm0,[edit_start_x] |
psubw mm0,[edit_end_x] |
movd mm1,dword[xx1] |
paddw mm1,mm0 |
movd dword[xx1],mm1 |
jmp .no_edit |
@@: |
|
cmp ax,[point_index2] |
jne @f |
movd mm0,[edit_start_x] |
psubw mm0,[edit_end_x] |
movd mm1,dword[xx2] |
paddw mm1,mm0 |
movd dword[xx2],mm1 |
jmp .no_edit |
@@: |
|
cmp ax,[point_index3] |
jne @f |
movd mm0,[edit_start_x] |
psubw mm0,[edit_end_x] |
movd mm1,dword[xx3] |
paddw mm1,mm0 |
movd dword[xx3],mm1 |
jmp .no_edit |
@@: |
|
|
.no_edit: |
end if |
|
push esi ; |
fninit ; DO culling AT FIRST |
cmp [culling_flag],1 ; (if culling_flag = 1) |
jne .no_culling |
mov esi,point_index1 ; ********************************* |
mov ecx,3 ; |
@@: |
mov eax,dword[esi] |
lea eax,[eax*3] |
shl eax,2 |
add eax,[points_normals_rot_ptr] |
bt dword[eax+8],+31 |
jc .no_culling |
; lea eax,[eax+point_normals_rotated] |
; fld dword[eax+8] ; ***************************** |
; ftst ; CHECKING OF Z COOFICIENT OF |
; fstsw ax ; NORMAL VECTOR |
; sahf |
; jb @f |
; ffree st |
loop @b |
jmp .end_draw ; non visable |
; @@: |
; ffree st ;is visable |
.no_culling: |
cmp [dr_flag],0 ; draw type flag |
je .flat_draw |
cmp [dr_flag],2 |
je .env_mapping |
cmp [dr_flag],3 |
je .bump_mapping |
cmp [dr_flag],4 |
je .tex_mapping |
cmp [dr_flag],5 |
je .rainbow |
cmp [dr_flag],7 |
je .grd_tex |
cmp [dr_flag],8 |
je .two_tex |
cmp [dr_flag],9 |
je .bump_tex |
cmp [dr_flag],10 |
je .cubic_env_mapping |
cmp [dr_flag],11 |
je .draw_smooth_line |
if Ext >= SSE3 |
cmp [dr_flag],12 |
je .r_phg |
cmp [dr_flag],13 |
je .glass |
cmp [dr_flag],14 |
je .glass_tex |
|
end if ; **************** |
mov esi,point_index3 ; do Gouraud shading |
mov ecx,3 |
.again_grd_draw: |
mov eax,dword[esi] |
shl eax,2 |
lea eax,[eax*3] |
add eax,[points_normals_rot_ptr] |
if Ext < SSE |
; texture x=(rotated point normal -> x * 255)+255 |
fld dword[eax] ; x cooficient of normal vector |
fmul dword[correct_texf] |
fadd dword[correct_texf] |
fistp [temp1] |
; texture y=(rotated point normal -> y * 255)+255 |
fld dword[eax+4] ; y cooficient |
fmul dword[correct_texf] |
fadd dword[correct_texf] |
fistp [temp2] |
mov eax,[temp2] |
mov ebx,[temp1] |
else |
movlps xmm0,[eax] |
mulps xmm0,[correct_texf] |
addps xmm0,[correct_texf] |
cvtps2dq xmm0,xmm0 |
movd eax,xmm0 |
psrldq xmm0,4 |
movd ebx,xmm0 |
end if |
and ebx,0xfffffff |
shl eax,TEX_SHIFT |
add eax,ebx |
lea eax,[eax*3+color_map] |
mov eax,dword[eax] |
; cmp [catmull_flag],1 ; put on stack z coordinate if necessary |
; jne @f |
lea edx,[ecx*3] |
push word[edx*2+xx1-2] ; zz1 ,2 ,3 |
; @@: |
ror eax,16 ; eax -0xxxrrggbb -> 0xggbbxxrr |
xor ah,ah |
push ax ;r |
rol eax,8 ; eax-0xggbb00rr -> 0xbb00rrgg |
xor ah,ah |
push ax ;g |
shr eax,24 |
push ax ;b |
|
sub esi,4 |
dec cx |
jnz .again_grd_draw |
jmp .both_draw |
|
; movzx edi,[point_index3] ;gouraud shading according to light vector |
; lea edi,[edi*3] |
; lea edi,[4*edi+point_normals_rotated] ; edi - normal |
; mov esi,light_vector |
; call dot_product |
; fabs |
; fimul [orginal_color_r] |
; fistp [temp_col] |
; and [temp_col],0x00ff |
; push [temp_col] |
; push [temp_col] |
; push [temp_col] |
|
; movzx edi,[point_index2] |
; lea edi,[edi*3] |
; lea edi,[4*edi+point_normals_rotated] ; edi - normal |
; mov esi,light_vector |
; call dot_product |
; fabs |
; fimul [orginal_color_r] |
; fistp [temp_col] |
; and [temp_col],0x00ff |
; push [temp_col] |
; push [temp_col] |
; push [temp_col] |
|
; movzx edi,[point_index1] |
; lea edi,[edi*3] |
; lea edi,[4*edi+point_normals_rotated] ; edi - normal |
; mov esi,light_vector |
; call dot_product |
; fabs |
; fimul [orginal_color_r] |
; fistp [temp_col] |
; and [temp_col],0x00ff |
; push [temp_col] |
; push [temp_col] |
; push [temp_col] |
.rainbow: |
; cmp [catmull_flag],1 ; put on stack z coordinate if necessary |
; jne @f |
push [zz3] |
@@: |
mov eax,dword[yy3] |
mov ebx,0x00ff00ff |
and eax,ebx |
push eax |
neg al |
push ax |
push [zz2] |
|
mov eax,dword[yy2] |
and eax,ebx |
push eax |
neg al |
push ax |
push [zz1] |
|
mov eax,dword[yy1] |
and eax,ebx |
push eax |
neg al |
push ax |
.both_draw: |
mov eax,dword[xx1] |
ror eax,16 |
mov ebx,dword[xx2] |
ror ebx,16 |
mov ecx,dword[xx3] |
ror ecx,16 |
mov edi,[screen_ptr] |
mov esi,[Zbuffer_ptr] |
call gouraud_triangle_z |
jmp .end_draw |
|
.flat_draw: ;************************** |
fninit ; FLAT DRAWING |
mov eax,[point_index1] |
mov ebx,[point_index2] |
mov ecx,[point_index3] |
; shl eax,2 |
imul eax,[i12] |
imul ebx,[i12] |
imul ecx,[i12] |
; shl ebx,2 |
; shl ecx,2 |
; lea eax,[eax*3] ;+point_normals_rotated] |
add eax,[points_normals_rot_ptr] |
; lea ebx,[ebx*3] ;+point_normals_rotated] |
add ebx,[points_normals_rot_ptr] |
; lea ecx,[ecx*3] ;+point_normals_rotated] |
add ecx,[points_normals_rot_ptr] |
fld dword[eax] ; x cooficient of normal vector |
fadd dword[ebx] |
fadd dword[ecx] |
fidiv [i3] |
fmul dword[correct_texf] |
fadd dword[correct_texf] |
fistp [temp1] ;dword[esp-4] ; x temp variables |
fld dword[eax+4] ; y cooficient of normal vector |
fadd dword[ebx+4] |
fadd dword[ecx+4] |
fidiv [i3] |
fmul dword[correct_texf] |
fadd dword[correct_texf] |
fistp [temp2] ;dword[esp-8] ; y |
mov edx,[temp2] ;dword[esp-8] |
and edx,0xfffffff |
and [temp1],0xfffffff |
shl edx,TEX_SHIFT |
add edx,[temp1] ;dword[esp-4] |
|
lea eax,[3*edx] |
add eax,color_map |
mov edx,dword[eax] |
|
and edx,0x00ffffff ; edx = 0x00rrggbb |
|
|
|
; mov ax,[zz1] ; z position depend draw |
; add ax,[zz2] |
; add ax,[zz3] |
; cwd |
; idiv [i3] ; = -((a+b+c)/3+130) |
; add ax,130 |
; neg al |
; xor edx,edx |
; mov ah,al ;set color according to z position |
; shl eax,8 |
; mov edx,eax |
|
mov eax,dword[xx1] |
ror eax,16 |
mov ebx,dword[xx2] |
ror ebx,16 |
mov ecx,dword[xx3] |
ror ecx,16 |
mov edi,[screen_ptr] |
|
mov esi,[Zbuffer_ptr] |
push word[zz3] |
push word[zz2] |
push word[zz1] |
call flat_triangle_z |
jmp .end_draw |
|
.env_mapping: |
push [zz3] |
push [zz2] |
push [zz1] |
|
mov esi,point_index1 |
sub esp,12 |
mov edi,esp |
mov ecx,3 |
@@: |
mov eax,dword[esi] |
lea eax,[eax*3] |
shl eax,2 |
add eax,[points_normals_rot_ptr] ;point_normals_rotated |
movlps xmm0,[eax] |
mulps xmm0,[correct_texf] |
addps xmm0,[correct_texf] |
cvtps2dq xmm0,xmm0 |
packssdw xmm0,xmm0 |
movd [edi],xmm0 |
add edi,4 |
add esi,4 |
loop @b |
|
mov eax,dword[xx1] |
ror eax,16 |
mov ebx,dword[xx2] |
ror ebx,16 |
mov ecx,dword[xx3] |
ror ecx,16 |
mov edi,[screen_ptr] |
mov esi,envmap |
|
mov edx,[Zbuffer_ptr] |
call tex_triangle_z |
|
jmp .end_draw |
;+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ |
.cubic_env_mapping: |
push [zz3] |
push [zz2] |
push [zz1] |
|
mov esi,point_index1 |
sub esp,12 |
mov edi,esp |
mov ecx,3 |
@@: |
mov eax,dword[esi] |
lea eax,[eax*3] |
shl eax,2 |
add eax,[points_normals_rot_ptr] |
|
fld dword[eax] |
fmul dword[eax+4] |
fld1 |
fld1 |
faddp |
fmulp |
fmul dword[correct_texf] |
fadd dword[correct_texf] |
fistp word[edi] |
mov word[edi+2],0 |
; fistp word[edi+2] |
; # last change |
; ; texture x=(rotated point normal -> x * 255)+255 |
; fld dword[eax] |
; fimul [correct_tex] |
; fiadd [correct_tex] |
; fistp word[edi] |
; ; texture y=(rotated point normal -> y * 255)+255 |
; fld dword[eax+4] |
; fimul [correct_tex] |
; fiadd [correct_tex] |
; fistp word[edi+2] |
; # end of last ch. |
add edi,4 |
add esi,4 |
loop @b |
|
mov eax,dword[xx1] |
ror eax,16 |
mov ebx,dword[xx2] |
ror ebx,16 |
mov ecx,dword[xx3] |
ror ecx,16 |
mov edi,[screen_ptr] |
mov esi,envmap_cub |
mov edx,[Zbuffer_ptr] |
|
call tex_triangle_z |
|
jmp .end_draw |
|
;+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ |
|
.bump_mapping: |
|
push [Zbuffer_ptr] |
push [zz3] |
push [zz2] |
push [zz1] |
|
mov esi,point_index1 |
sub esp,12 |
mov edi,esp |
mov ecx,3 |
@@: |
mov eax,dword[esi] |
lea eax,[eax*3] |
shl eax,2 |
; imul eax,[i12] |
add eax,[points_normals_rot_ptr] ;point_normals_rotated |
; texture x=(rotated point normal -> x * 255)+255 |
|
movlps xmm0,[eax] |
mulps xmm0,[correct_texf] |
addps xmm0,[correct_texf] |
cvtps2dq xmm0,xmm0 |
packssdw xmm0,xmm0 |
movd [edi],xmm0 |
add edi,4 |
add esi,4 |
loop @b |
|
mov esi,[point_index3] ; bump map coords |
shl esi,2 |
add esi,tex_points |
push dword[esi] |
mov esi,[point_index2] |
shl esi,2 |
add esi,tex_points |
push dword[esi] |
mov esi,[point_index1] |
shl esi,2 |
add esi,tex_points |
push dword[esi] |
|
mov eax,dword[xx1] |
ror eax,16 |
mov ebx,dword[xx2] |
ror ebx,16 |
mov ecx,dword[xx3] |
ror ecx,16 |
mov edi,[screen_ptr] |
mov esi,envmap |
mov edx,bumpmap ;BUMP_MAPPING |
|
call bump_triangle_z |
|
jmp .end_draw |
|
.tex_mapping: |
|
push [zz3] |
push [zz2] |
push [zz1] |
; @@: |
mov esi,[point_index3] ; tex map coords |
shl esi,2 |
add esi,tex_points |
push dword[esi] |
mov esi,[point_index2] |
shl esi,2 |
add esi,tex_points |
push dword[esi] |
mov esi,[point_index1] |
shl esi,2 |
add esi,tex_points |
push dword[esi] |
|
mov eax,dword[xx1] |
ror eax,16 |
mov ebx,dword[xx2] |
ror ebx,16 |
mov ecx,dword[xx3] |
ror ecx,16 |
mov edi,[screen_ptr] |
mov esi,texmap |
mov edx,[Zbuffer_ptr] |
|
call tex_triangle_z |
|
jmp .end_draw |
; .ray: |
; grd_triangle according to points index |
; cmp [catmull_flag],0 |
; je @f |
; push [zz3] ; spot light with attenuation |
; @@: |
; movzx eax,[point_index3] ; env_map - points color list |
; shl eax,1 ; each color as word, 0x00rr00gg00bb.. |
; lea eax,[3*eax+bumpmap] |
; push word[eax] |
; push word[eax+2] |
; push word[eax+4] |
; cmp [catmull_flag],0 |
; je @f |
; push [zz2] |
; @@: |
; movzx eax,[point_index2] ; env_map - points color list |
; shl eax,1 ; each color as word, 0x00rr00gg00bb.. |
; lea eax,[eax*3+bumpmap] |
; push word[eax] |
; push word[eax+2] |
; push word[eax+4] |
; cmp [catmull_flag],0 |
; je @f |
; push [zz1] |
; @@: |
; movzx eax,[point_index1] ; env_map - points color list |
; shl eax,1 ; each color as word, 0xrr00gg00bb00.. |
; lea eax,[eax*3+bumpmap] |
; push word[eax] |
; push word[eax+2] |
; push word[eax+4] |
; jmp .both_draw |
|
.grd_tex: ; smooth shading + texture |
push ebp |
mov ebp,esp |
sub esp,4 |
push ebp |
|
mov esi,[point_index3] ; tex map coords |
shl esi,2 |
add esi,tex_points |
push dword[esi] ; texture coords as first |
mov esi,[point_index2] ; group of parameters |
shl esi,2 |
add esi,tex_points |
push dword[esi] |
mov esi,[point_index1] |
shl esi,2 |
add esi,tex_points |
push dword[esi] |
|
mov esi,point_index3 |
mov ecx,3 |
|
.aagain_grd_draw: |
|
lea edx,[ecx*3] |
push word[edx*2+xx1-2] ; zz1 ,2 ,3 |
; fninit |
mov eax,dword[esi] |
shl eax,2 |
lea eax,[eax*3] ;+point_normals_rotated] |
add eax,[points_normals_rot_ptr] |
if Ext < SSE |
; texture x=(rotated point normal -> x * 255)+255 |
fld dword[eax] ; x cooficient of normal vector |
fmul dword[correct_texf] |
fadd dword[correct_texf] |
fistp [temp1] ;word[ebp-2] |
; texture y=(rotated point normal -> y * 255)+255 |
fld dword[eax+4] ; y cooficient |
fmul dword[correct_texf] |
fadd dword[correct_texf] |
fistp [temp2] ;word[ebp-4] |
mov eax,[temp2] |
mov ebx,[temp1] |
else |
movlps xmm0,[eax] |
mulps xmm0,[correct_texf] |
addps xmm0,[correct_texf] |
cvtps2dq xmm0,xmm0 |
movd eax,xmm0 |
psrldq xmm0,4 |
movd ebx,xmm0 |
end if |
and ebx,0xfffffff ; some onjects need thid 'and' |
shl eax,TEX_SHIFT |
add eax,ebx |
lea eax,[eax*3] |
add eax,color_map |
mov eax,dword[eax] |
|
ror eax,16 ; eax -0xxxrrggbb -> 0xggbbxxrr |
xor ah,ah |
push ax ;r |
rol eax,8 ; eax-0xggbb00rr -> 0xbb00rrgg |
xor ah,ah |
push ax ;g |
shr eax,24 |
push ax ;b |
|
sub esi,4 |
dec cx |
jnz .aagain_grd_draw |
|
mov eax,dword[xx1] |
ror eax,16 |
mov ebx,dword[xx2] |
ror ebx,16 |
mov ecx,dword[xx3] |
ror ecx,16 |
mov edi,[screen_ptr] |
mov edx,texmap |
mov esi,[Zbuffer_ptr] |
|
call tex_plus_grd_triangle |
|
pop ebp |
mov esp,ebp |
pop ebp |
jmp .end_draw |
|
.two_tex: |
push [Zbuffer_ptr] |
|
push word[zz3] |
push word[zz2] |
push word[zz1] |
|
mov esi,[point_index3] ; tex map coords |
shl esi,2 |
add esi,tex_points |
push dword[esi] |
mov esi,[point_index2] |
shl esi,2 |
add esi,tex_points |
push dword[esi] |
mov esi,[point_index1] |
shl esi,2 |
add esi,tex_points |
push dword[esi] |
|
mov esi,point_index1 ; env coords |
sub esp,12 |
mov edi,esp |
mov ecx,3 |
@@: |
mov eax,dword[esi] |
lea eax,[eax*3] |
shl eax,2 |
add eax,[points_normals_rot_ptr] |
; texture x=(rotated point normal -> x * 255)+255 |
movlps xmm0,[eax] |
mulps xmm0,[correct_texf] |
addps xmm0,[correct_texf] |
cvtps2dq xmm0,xmm0 |
packssdw xmm0,xmm0 |
movd [edi],xmm0 |
; fld dword[eax] |
; fmul dword[correct_texf] |
; fadd dword[correct_texf] |
; fistp word[edi] |
|
; texture y=(rotated point normal -> y * 255)+255 |
; fld dword[eax+4] |
; fmul dword[correct_texf] |
; fadd dword[correct_texf] |
; fistp word[edi+2] |
and word[edi+2],0x7fff ; some objects need it |
add edi,4 |
add esi,4 |
loop @b |
|
mov eax,dword[xx1] |
ror eax,16 |
mov ebx,dword[xx2] |
ror ebx,16 |
mov ecx,dword[xx3] |
ror ecx,16 |
mov edi,[screen_ptr] |
mov esi,texmap |
mov edx,envmap |
|
call two_tex_triangle_z |
jmp .end_draw |
|
.bump_tex: |
mov esi,[point_index3] ; tex map coords |
shl esi,2 |
add esi,tex_points |
push dword[esi] |
mov esi,[point_index2] |
shl esi,2 |
add esi,tex_points |
push dword[esi] |
mov esi,[point_index1] |
shl esi,2 |
add esi,tex_points |
push dword[esi] |
|
push dword texmap |
|
push [Zbuffer_ptr] |
xor edi,edi |
|
push word[zz3] |
push word[zz2] |
push word[zz1] |
|
mov esi,point_index1 ; env coords |
sub esp,12 |
mov edi,esp |
mov ecx,3 |
@@: |
mov eax,dword[esi] |
lea eax,[eax*3] |
shl eax,2 |
add eax,[points_normals_rot_ptr] |
if Ext >= SSE |
; texture x=(rotated point normal -> x * 255)+255 |
movlps xmm0,[eax] |
mulps xmm0,[correct_texf] |
addps xmm0,[correct_texf] |
cvtps2dq xmm0,xmm0 |
packssdw xmm0,xmm0 |
movd [edi],xmm0 |
else |
fld dword[eax] |
fimul [correct_tex] |
fiadd [correct_tex] |
fistp word[edi] |
; texture y=(rotated point normal -> y * 255)+255 |
fld dword[eax+4] |
fimul [correct_tex] |
fiadd [correct_tex] |
fistp word[edi+2] |
end if |
add edi,4 |
add esi,4 |
loop @b |
|
; push dword 1 shl 16 + 1 ; emap coords |
; push dword 127 shl 16 + 1 |
; push dword 127 shl 16 + 127 |
|
mov esi,[point_index3] ; bump map coords |
shl esi,2 |
add esi,tex_points |
push dword[esi] |
mov esi,[point_index2] |
shl esi,2 |
add esi,tex_points |
push dword[esi] |
|
mov esi,[point_index1] |
shl esi,2 |
add esi,tex_points |
push dword[esi] |
|
; push dword 1 shl 16 + 127 |
; push dword 127 shl 16 + 127 |
; push dword 1 shl 16 + 1 ; bump coords |
|
mov eax,dword[xx1] |
ror eax,16 |
mov ebx,dword[xx2] |
ror ebx,16 |
mov ecx,dword[xx3] |
ror ecx,16 |
mov edi,[screen_ptr] |
mov esi,envmap |
mov edx,bumpmap |
|
call bump_tex_triangle_z |
|
jmp .end_draw |
|
.draw_smooth_line: |
mov esi,point_index3 |
mov ecx,3 |
.again_line_param: |
mov eax,dword[esi] |
shl eax,2 |
lea eax,[eax*3] |
add eax,[points_normals_rot_ptr] |
if Ext>=SSE2 |
movlps xmm0,[eax] |
mulps xmm0,[correct_texf] |
addps xmm0,[correct_texf] |
cvtps2dq xmm0,xmm0 |
movd eax,xmm0 |
psrldq xmm0,4 |
movd ebx,xmm0 |
else if |
; texture ;x=(rotated point normal -> x * 255)+255 |
fld dword[eax] ; x cooficient of normal vector |
fmul dword[correct_texf] |
fadd dword[correct_texf] |
fistp [temp1] ;word[esp-2] |
; texture y=(rotated point normal -> y * 255)+255 |
fld dword[eax+4] ; y cooficient |
fmul dword[correct_texf] |
fadd dword[correct_texf] |
fistp [temp2] ;word[esp-4] |
mov eax,[temp2] ;word[esp-4] |
mov ebx,[temp1] ;word[esp-2] |
end if |
and ebx,0xfffffff |
shl eax,TEX_SHIFT |
add eax,ebx |
lea eax,[eax*3+color_map] |
mov eax,dword[eax] |
lea ebx,[ecx-1] |
shl ebx,2 |
mov [ebx+col1],eax |
|
sub esi,4 |
dec ecx |
jnz .again_line_param |
|
mov edi,[screen_ptr] |
mov esi,[Zbuffer_ptr] |
|
mov eax,[col1] |
movzx bx,al |
push bx ; b |
movzx bx,ah |
push bx |
rol eax,16 |
xor ah,ah |
push ax |
push [zz1] |
push [yy1] |
push [xx1] |
|
mov eax,[col2] |
movzx bx,al |
push bx ; b |
movzx bx,ah |
push bx |
rol eax,16 |
xor ah,ah |
push ax |
push [zz2] |
push [yy2] |
push [xx2] |
|
call smooth_line |
@@: |
|
mov edi,[screen_ptr] |
mov esi,[Zbuffer_ptr] |
|
mov eax,[col1] |
movzx bx,al |
push bx ; b |
movzx bx,ah |
push bx |
rol eax,16 |
xor ah,ah |
push ax |
push [zz1] |
push [yy1] |
push [xx1] |
|
mov eax,[col3] |
movzx bx,al |
push bx ; b |
movzx bx,ah |
push bx |
rol eax,16 |
xor ah,ah |
push ax |
push [zz3] |
push [yy3] |
push [xx3] |
|
call smooth_line |
@@: |
|
|
mov edi,[screen_ptr] |
mov esi,[Zbuffer_ptr] |
|
mov eax,[col3] |
movzx bx,al |
push bx ; b |
movzx bx,ah |
push bx |
rol eax,16 |
xor ah,ah |
push ax |
push [zz3] |
push [yy3] |
push [xx3] |
|
mov eax,[col2] |
movzx bx,al |
push bx ; b |
movzx bx,ah |
push bx |
rol eax,16 |
xor ah,ah |
push ax |
push [zz2] |
push [yy2] |
push [xx2] |
|
call smooth_line |
jmp .end_draw |
@@: |
|
if Ext >= SSE3 |
.r_phg: |
|
|
movd xmm5,[size_y_var] |
punpcklwd xmm5,[the_zero] |
pshufd xmm5,xmm5,01110011b |
|
|
mov eax,[point_index1] |
mov ebx,[point_index2] |
mov ecx,[point_index3] |
imul eax,[i12] |
imul ebx,[i12] |
imul ecx,[i12] |
add eax,[points_normals_rot_ptr] |
add ebx,[points_normals_rot_ptr] |
add ecx,[points_normals_rot_ptr] |
movups xmm0,[eax] |
movups xmm1,[ebx] |
movups xmm2,[ecx] |
andps xmm0,[zero_hgst_dd] |
andps xmm1,[zero_hgst_dd] |
andps xmm2,[zero_hgst_dd] |
xorps xmm3,xmm3 |
|
mov eax,[point_index1] |
mov ebx,[point_index2] |
mov ecx,[point_index3] |
imul eax,[i12] |
imul ebx,[i12] |
imul ecx,[i12] |
add eax,[points_rotated_ptr] |
add ebx,[points_rotated_ptr] |
add ecx,[points_rotated_ptr] |
push dword[ecx+8] |
push dword[ebx+8] |
push dword[eax+8] |
movups xmm4,[esp] |
add esp,12 |
andps xmm4,[zero_hgst_dd] |
|
|
|
mov eax,dword[xx1] |
ror eax,16 |
mov ebx,dword[xx2] |
ror ebx,16 |
mov ecx,dword[xx3] |
ror ecx,16 |
mov edi,[screen_ptr] |
mov esi,[Zbuffer_ptr] |
|
call real_phong_tri_z |
|
jmp .end_draw |
|
.glass: |
|
movd xmm5,[size_y_var] |
punpcklwd xmm5,[the_zero] |
pshufd xmm5,xmm5,01110011b |
|
|
mov eax,[point_index1] |
mov ebx,[point_index2] |
mov ecx,[point_index3] |
imul eax,[i12] |
imul ebx,[i12] |
imul ecx,[i12] |
add eax,[points_normals_rot_ptr] |
add ebx,[points_normals_rot_ptr] |
add ecx,[points_normals_rot_ptr] |
movups xmm0,[eax] |
movups xmm1,[ebx] |
movups xmm2,[ecx] |
andps xmm0,[zero_hgst_dd] |
andps xmm1,[zero_hgst_dd] |
andps xmm2,[zero_hgst_dd] |
xorps xmm3,xmm3 |
|
mov eax,[point_index1] |
mov ebx,[point_index2] |
mov ecx,[point_index3] |
imul eax,[i12] |
imul ebx,[i12] |
imul ecx,[i12] |
add eax,[points_rotated_ptr] |
add ebx,[points_rotated_ptr] |
add ecx,[points_rotated_ptr] |
push dword[ecx+8] |
push dword[ebx+8] |
push dword[eax+8] |
movups xmm4,[esp] |
add esp,12 |
andps xmm4,[zero_hgst_dd] |
|
|
|
mov eax,dword[xx1] |
ror eax,16 |
mov ebx,dword[xx2] |
ror ebx,16 |
mov ecx,dword[xx3] |
ror ecx,16 |
mov edi,[screen_ptr] |
mov edx,[Zbuffer_ptr] |
mov esi,[Zbuffer_ptr] |
|
call glass_tri |
jmp .end_draw |
|
.glass_tex: |
movd xmm5,[size_y_var] |
punpcklwd xmm5,[the_zero] |
pshufd xmm5,xmm5,01110011b |
|
mov eax,[point_index1] |
mov ebx,[point_index2] |
mov ecx,[point_index3] |
imul eax,[i12] |
imul ebx,[i12] |
imul ecx,[i12] |
add eax,[points_normals_rot_ptr] |
add ebx,[points_normals_rot_ptr] |
add ecx,[points_normals_rot_ptr] |
movups xmm0,[eax] |
movups xmm1,[ebx] |
movups xmm2,[ecx] |
andps xmm0,[zero_hgst_dd] |
andps xmm1,[zero_hgst_dd] |
andps xmm2,[zero_hgst_dd] |
xorps xmm3,xmm3 |
|
mov eax,[point_index1] |
mov ebx,[point_index2] |
mov ecx,[point_index3] |
imul eax,[i12] |
imul ebx,[i12] |
imul ecx,[i12] |
add eax,[points_rotated_ptr] |
add ebx,[points_rotated_ptr] |
add ecx,[points_rotated_ptr] |
push dword[ecx+8] |
push dword[ebx+8] |
push dword[eax+8] |
movups xmm4,[esp] |
add esp,12 |
andps xmm4,[zero_hgst_dd] |
|
mov esi,[point_index3] ; tex map coords |
shl esi,2 |
add esi,tex_points |
push dword[esi] |
mov esi,[point_index2] |
shl esi,2 |
add esi,tex_points |
push dword[esi] |
mov esi,[point_index1] |
shl esi,2 |
add esi,tex_points |
push dword[esi] |
movups xmm6,[esp] |
add esp,12 |
; pshuflw xmm6,xmm6,10110001b |
; pshufhw xmm6,xmm6,10110001b |
|
movzx eax,word[size_x_var] |
andps xmm6,[zero_hgst_dd] |
movd xmm7,eax |
pslldq xmm7,12 |
por xmm6,xmm7 |
|
|
mov eax,dword[xx1] |
ror eax,16 |
mov ebx,dword[xx2] |
ror ebx,16 |
mov ecx,dword[xx3] |
ror ecx,16 |
mov edx,texmap |
mov edi,[screen_ptr] |
mov esi,[Zbuffer_ptr] |
|
call glass_tex_tri |
|
jmp .end_draw |
end if |
|
|
|
|
.end_draw: |
pop esi |
add esi,12 |
|
pop ecx |
sub ecx,1 |
|
jnz .again_dts |
ret |
|
|
|
|
|
|
|
|
|
|
|
draw_handlers: |
|
push ebp |
mov ebp,esp |
|
.counter equ ebp-16 |
.xres3m18 equ ebp-8 |
.xres2m12 equ ebp-12 |
|
|
; init counter |
sub esp,12 |
push dword 0 |
|
movzx eax,word[size_x_var] |
cmp [dr_flag],12 |
jge @f |
lea ebx,[eax*3] |
sub ebx,18 |
add eax,eax |
sub eax,12 |
mov [.xres3m18],ebx |
mov [.xres2m12],eax |
jmp .f |
@@: |
lea ebx,[eax*4] |
sub ebx,4*6 |
add eax,eax |
sub eax,3*4 |
mov [.xres3m18],ebx |
mov [.xres2m12],eax |
.f: |
|
|
|
mov esi,[points_translated_ptr] |
.loop: |
push esi |
; DO culling AT FIRST |
cmp [culling_flag],1 ; (if culling_flag = 1) |
jne .no_culling |
mov edi,[.counter] ; ********************************* |
lea edi,[edi*3] |
shl edi,2 |
add edi,[points_normals_rot_ptr] |
mov eax,[edi+8] ; check sign of z coof |
shr eax,31 |
cmp eax,1 |
jnz .skip |
.no_culling: |
mov eax,[esi] |
movzx ebx,ax ; ebx - x |
shr eax,16 ; eax - y |
cmp eax,4 ; check if markers not exceedes screen |
jle .skip |
cmp ebx,4 |
jle .skip |
movzx edx,word[size_x_var] |
sub edx,4 |
movzx ecx,word[size_y_var] |
sub ecx,4 |
cmp ebx,edx |
jge .skip |
cmp eax,ecx |
jge .skip |
|
movzx edx,word[size_x_var] |
; sub ebx,3 |
; sub eax,3 |
imul eax,edx |
add eax,ebx |
push eax |
lea edi,[eax*3] |
cmp [dr_flag],12 |
jl @f |
add edi,[esp] |
@@: |
add esp,4 |
lea eax,[eax*2] |
; draw bar 6x6 |
add edi,[screen_ptr] |
add eax,dword[vertices_index_ptr] |
|
|
|
|
mov edx,[.counter] |
mov ecx,6 |
|
.oop: |
push ecx |
mov ecx,6 |
|
.do: |
mov word[edi],0x0000 ;ax |
mov byte[edi+2],0xff ;al |
mov word[eax],dx |
add eax,2 |
cmp [dr_flag],12 |
jl @f |
add edi,4 |
loop .do |
jmp .ad |
@@: |
add edi,3 |
loop .do |
.ad: |
add edi,[.xres3m18] |
add eax,[.xres2m12] |
pop ecx |
loop .oop |
|
.skip: |
pop esi |
add esi,6 |
inc dword[.counter] |
mov ecx,[.counter] |
cmp ecx,[points_count_var] |
jng .loop |
|
mov esp,ebp |
pop ebp |
|
ret |
|
|
fill_Z_buffer: |
mov eax,0x70000000 |
cmp [dr_flag],12 |
jne @f |
mov eax,60000.1 |
@@: |
mov edi,[Zbuffer_ptr] |
movzx ecx,word[size_x_var] |
movzx ebx,word[size_y_var] |
imul ecx,ebx |
if Ext>=SSE2 |
movd xmm0,eax |
shufps xmm0,xmm0,0 |
push ecx |
mov ecx,edi |
and edi,0xffffff00 |
and ecx,0x000000ff |
mov edx,ecx |
rep stosd |
pop ecx |
sub ecx,edx |
@@: |
movaps [edi],xmm0 |
movaps [edi+16],xmm0 |
movaps [edi+32],xmm0 |
movaps [edi+48],xmm0 |
add edi,64 |
sub ecx,16 |
jnc @b |
else |
rep stosd |
end if |
ret |
|
read_tp_variables: ; read [triangles_count_var] and [points_count_var] |
; and allocate memory |
xor ebx,ebx |
xor ebp,ebp |
mov [points_count_var],ebx |
mov [triangles_count_var],ebx |
if USE_LFN = 0 |
mov esi,SourceFile |
else |
mov esi,[fptr] |
end if |
|
cmp [esi],word 4D4Dh |
je @f ;Must be legal .3DS file |
xor eax,eax |
ret |
@@: |
mov eax,dword[esi+2] |
cmp eax,[fsize] ;This must tell the length |
je @f |
xor eax,eax |
ret |
@@: |
add eax,esi |
mov [EndFile],eax ; |
|
add esi,6 |
@@: |
cmp [esi],word 3D3Dh |
je @f |
add esi,[esi+2] |
jmp @b |
@@: |
add esi,6 |
.find4k: |
cmp [esi],word 4000h |
je @f |
add esi,[esi+2] |
cmp esi,[EndFile] |
jc .find4k |
jmp .exit |
@@: |
add esi,6 |
@@: |
cmp [esi],byte 0 |
je @f |
inc esi |
jmp @b |
@@: |
inc esi |
@@: |
cmp [esi],word 4100h |
je @f |
add esi,[esi+2] |
jmp @b |
@@: |
add esi,6 |
@@: |
cmp [esi],word 4110h |
je @f |
add esi,[esi+2] |
jmp @b |
@@: |
movzx ecx,word[esi+6] |
add [points_count_var],ecx |
|
mov edx,ecx |
add esi,8 |
@@: |
|
add ebx,6 |
add esi,12 |
; dec ecx |
loop @b |
@@: |
|
@@: |
cmp [esi],word 4120h |
je @f |
add esi,[esi+2] |
jmp @b |
@@: |
movzx ecx,word[esi+6] |
add [triangles_count_var],ecx |
add esi,8 |
|
@@: |
add esi,8 |
dec ecx |
jnz @b |
; xor ecx,ecx |
add ebp,edx |
jmp .find4k |
mov eax,-1 ;<---mark if OK |
.exit: |
ret |
|
read_from_file: |
fninit |
mov edi,[triangles_ptr] |
xor ebx,ebx |
xor ebp,ebp |
mov [points_count_var],0 |
mov [triangles_count_var],0 |
if USE_LFN = 0 |
mov esi,SourceFile |
else |
mov esi,[fptr] |
end if |
cmp [esi],word 4D4Dh |
jne .exit ;Must be legal .3DS file |
; cmp dword[esi+2],EndFile-SourceFile |
; jne .exit ;This must tell the length |
mov eax,dword[esi+2] |
; cmp eax,[fsize] |
; jne .exit |
|
add eax,esi |
mov [EndFile],eax ; |
|
add esi,6 |
@@: |
cmp [esi],word 3D3Dh |
je @f |
add esi,[esi+2] |
jmp @b |
@@: |
add esi,6 |
.find4k: |
cmp [esi],word 4000h |
je @f |
add esi,[esi+2] |
cmp esi,[EndFile] |
jc .find4k |
jmp .exit |
@@: |
add esi,6 |
@@: |
cmp [esi],byte 0 |
je @f |
inc esi |
jmp @b |
@@: |
inc esi |
@@: |
cmp [esi],word 4100h |
je @f |
add esi,[esi+2] |
jmp @b |
@@: |
add esi,6 |
@@: |
cmp [esi],word 4110h |
je @f |
add esi,[esi+2] |
jmp @b |
@@: |
movzx ecx,word[esi+6] |
add [points_count_var],ecx |
|
mov edx,ecx |
add esi,8 |
@@: |
push edi |
mov edi,[points_ptr] |
push dword[esi+0] |
pop dword[edi+ebx*2+0] |
push dword[esi+4] |
pop dword[edi+ebx*2+4] |
push dword[esi+8] |
pop dword[edi+ebx*2+8] |
pop edi |
|
add ebx,6 |
add esi,12 |
dec ecx |
jnz @b |
@@: |
; mov dword[points+ebx],-1 |
push edi |
mov edi,[points_ptr] |
mov dword[edi+ebx*2],-1 ; end mark (not always in use) |
pop edi |
@@: |
cmp [esi],word 4120h |
je @f |
add esi,[esi+2] |
jmp @b |
@@: |
movzx ecx,word[esi+6] |
add [triangles_count_var],ecx |
add esi,8 |
;mov edi,triangles |
@@: |
movzx eax,word[esi] |
add eax,ebp |
stosd |
movzx eax,word[esi+2] |
add eax,ebp |
stosd |
movzx eax,word[esi+4] |
add eax,ebp |
stosd |
; add dword[edi-12],ebp |
; add dword[edi-8],ebp |
; add dword[edi-4],ebp |
add esi,8 |
dec ecx |
jnz @b |
add ebp,edx |
jmp .find4k |
mov eax,-1 ;<---mark if OK |
.exit: |
mov dword[edi],-1 |
ret |
|
alloc_mem_for_tp: |
mov eax, 68 |
cmp [re_alloc_flag],1 |
jz @f |
mov ebx, 12 |
jmp .alloc |
@@: |
mov ebx,20 |
.alloc: |
|
mov ecx,[triangles_count_var] |
add ecx,20 |
lea ecx, [ecx*3] |
shl ecx,2 |
mov edx,[triangles_ptr] |
int 0x40 ; -> allocate memory to triangles |
mov [triangles_ptr], eax ; -> eax = pointer to allocated mem |
|
; ststic memory |
|
mov eax, 68 |
mov ecx, [triangles_count_var] |
lea ecx, [3+ecx*3] |
shl ecx, 2 |
mov edx,[triangles_normals_ptr] |
int 0x40 ; -> allocate memory for triangles normals |
mov [triangles_normals_ptr], eax ; -> eax = pointer to allocated mem |
|
|
mov eax, 68 |
mov ecx, [points_count_var] |
lea ecx,[3+ecx*3] |
shl ecx, 2 |
mov edx,[points_normals_ptr] |
int 0x40 |
mov [points_normals_ptr], eax |
|
|
mov eax, 68 |
; mov ebx, 12 |
mov ecx, [points_count_var] |
lea ecx,[3+ecx*3] |
shl ecx, 2 |
mov edx,[points_normals_rot_ptr] |
int 0x40 |
mov [points_normals_rot_ptr], eax |
|
mov eax, 68 |
mov edx,[points_ptr] |
int 0x40 |
mov [points_ptr], eax |
|
mov eax, 68 |
mov edx,[points_rotated_ptr] |
int 0x40 |
mov [points_rotated_ptr], eax |
|
mov eax, 68 |
mov ecx, [points_count_var] |
inc ecx |
shl ecx, 3 |
mov edx,[points_translated_ptr] |
int 0x40 |
mov [points_translated_ptr], eax |
ret |
|
|
|
read_from_disk: |
mov eax, 68 |
mov ebx, 11 |
int 0x40 ; -> create heap |
|
;load kpacked files by Leency |
mov eax,68 |
mov ebx,27 |
mov ecx,file_name |
int 0x40 |
|
mov [fsize],edx |
mov [file_info+16],eax |
|
test eax,eax |
jnz .open_opened_well |
mov eax,6 ;otherwise => failed |
jmp @f |
.open_opened_well: |
xor eax,eax |
@@: |
; eax = 0 -> ok file loaded |
ret |
|
read_param: |
mov esi,I_Param |
cmp dword[esi],0 |
je .end |
cmp byte[esi],'/' |
je .copy |
mov edi,esi |
mov ecx,25 ; 25 - would be enought |
repe scasb |
jne .end |
dec edi |
mov esi,edi |
.copy: |
mov edi,file_name |
mov ecx,50 |
rep movsd |
.end: |
ret |
buttons: ; draw some buttons (all but navigation and close ) |
mov edi,menu |
.again: |
mov eax,8 ; function 8 : define and draw button |
mov bx,[size_x_var] |
shl ebx,16 |
add ebx,(10)*65536+62 ; [x start] *65536 + [x size] |
movzx ecx,byte[edi] ; button id = position+2 |
sub cl,2 |
lea ecx,[ecx*5] |
lea ecx,[ecx*3] |
add ecx,25 |
shl ecx,16 |
add ecx,12 |
movzx edx,byte[edi] ; button id |
mov esi,0x6688dd ; button color RRGGBB |
int 0x40 |
; BUTTON LABEL |
mov eax,4 ; function 4 : write text to window |
movzx ebx,byte[edi] |
sub bl,2 ; button id, according to position |
lea ebx,[ebx*3] |
lea ebx,[ebx*5] |
mov cx,[size_x_var] |
shl ecx,16 |
add ebx,ecx |
add ebx,(12)*65536+28 ; [x start] *65536 + [y start] |
mov ecx,0x00ddeeff ; font 1 & color ( 0xF0RRGGBB ) |
lea edx,[edi+1] ; pointer to text beginning |
mov esi,10 ; text length |
int 0x40 |
cmp byte[edi+11],255 ; if max_flag=255 |
je @f ; skip |
; flag description |
; mov eax,4 ; function 4 : write text to window |
; movzx ebx,byte[edi] |
; sub bl,2 |
; lea ebx,[ebx*3] |
; lea ebx,[ebx*5] |
; add ebx,(SIZE_X+12+70)*65536+28 ; [x start] *65536 + [y start] |
add ebx,70*65536 |
; mov ecx,0x00ddeeff ; font 1 & color ( 0xF0RRGGBB ) |
movzx edx,byte[edi+12] ; current flag |
shl edx,2 ; * 4 = text length |
add edx,dword[edi+13] ; pointer to text beginning |
mov esi,4 ; text length |
int 0x40 |
|
@@: |
add edi,17 |
cmp byte[edi],-1 |
jnz .again |
ret |
; ********************************************* |
; ******* WINDOW DEFINITIONS AND DRAW ******** |
; ********************************************* |
draw_window: |
mov eax,12 ; function 12:tell os about windowdraw |
mov ebx,1 ; 1, start of draw |
int 0x40 |
|
; DRAW WINDOW |
mov eax,0 ; function 0 : define and draw window |
mov bx,[x_start] |
shl ebx,16 |
mov cx,[y_start] |
shl ecx,16 |
;ebx - [x start] *65536 + [x size] |
;ecx - [y start] *65536 + [y size] |
mov bx,[size_x_var] |
add bx,115 |
mov cx,[size_y_var] |
add cx,30 |
; @@: |
mov edx,0x13000000 ; color of work area RRGGBB,8->color gl |
mov edi,labelt ; WINDOW LABEL |
int 0x40 |
|
call buttons ; more buttons |
|
.Y_ADD equ 2 ;-> offset of 'add vector' buttons |
|
; ADD VECTOR LABEL ; add vector buttons - 30 ++ |
mov eax,4 ; function 4 : write text to window |
movzx ebx,word[size_x_var] |
shl ebx,16 |
add ebx,(12)*65536+(168+15*(13+.Y_ADD)) ; [x start] *65536 + [y start] |
mov ecx,0x00ddeeff ; font 1 & color ( 0xF0RRGGBB ) |
mov edx,labelvector ; pointer to text beginning |
mov esi,labelvectorend-labelvector ; text length |
; cmp [move_flag],2 |
; jne @f |
; add edx,navigation_size |
; @@: |
int 0x40 |
; VECTOR Y- BUTTON |
mov eax,8 ; function 8 : define and draw button |
movzx ebx,word[size_x_var] |
shl ebx,16 |
add ebx,30*65536+20 ; [x start] *65536 + [x size] |
mov ecx,(165+15*(14+.Y_ADD))*65536+12 ; [y start] *65536 + [y size] |
mov edx,30 ; button id |
mov esi,0x6688dd ; button color RRGGBB |
int 0x40 |
;VECTOR Y- LABEL |
mov eax,4 ; function 4 : write text to window |
movzx ebx,word[size_x_var] |
shl ebx,16 |
add ebx,(32)*65536+(168+15*(14+.Y_ADD)) ; [x start] *65536 + [y start] |
mov ecx,0x00ddeeff ; font 1 & color ( 0xF0RRGGBB ) |
mov edx,labelyminus ; pointer to text beginning |
mov esi,labelyminusend-labelyminus ; text length |
cmp [move_flag],2 |
; jne @f |
; add edx,navigation_size |
; @@: |
int 0x40 |
; VECTOR Z+ BUTTON |
mov eax,8 ; function 8 : define and draw button |
movzx ebx,word[size_x_var] |
shl ebx,16 |
add ebx,(51)*65536+21 ; [x start] *65536 + [x size] |
mov ecx,(165+15*(14+.Y_ADD))*65536+12 ; [y start] *65536 + [y size] |
mov edx,31 ; button id |
mov esi,0x6688dd ; button color RRGGBB |
int 0x40 |
;VECTOR Z+ LABEL |
mov eax,4 ; function 4 : write text to window |
movzx ebx,word[size_x_var] |
shl ebx,16 |
add ebx,(53)*65536+(168+15*(14+.Y_ADD)) ; [x start] *65536 + [y start] |
mov ecx,0x00ddeeff ; font 1 & color ( 0xF0RRGGBB ) |
mov edx,labelzplus ; pointer to text beginning |
mov esi,labelzplusend-labelzplus ; text length |
; cmp [move_flag],2 |
; jne @f |
; add edx,navigation_size |
; @@: |
|
int 0x40 |
; VECTOR x- BUTTON |
mov eax,8 ; function 8 : define and draw button |
movzx ebx,word[size_x_var] |
shl ebx,16 |
add ebx,(10)*65536+21 ; [x start] *65536 + [x size] |
mov ecx,(165+15*(15+.Y_ADD))*65536+12 ; [y start] *65536 + [y size] |
mov edx,32 ; button id |
mov esi,0x6688dd ; button color RRGGBB |
int 0x40 |
;VECTOR x- LABEL |
mov eax,4 ; function 4 : write text to window |
movzx ebx,word[size_x_var] |
shl ebx,16 |
add ebx,(12)*65536+(168+15*(15+.Y_ADD)) ; [x start] *65536 + [y start] |
mov ecx,0x00ddeeff ; font 1 & color ( 0xF0RRGGBB ) |
mov edx,labelxminus ; pointer to text beginning |
mov esi,labelxminusend-labelxminus ; text length |
; cmp [move_flag],2 |
; jne @f |
; add edx,navigation_size |
; @@: |
int 0x40 |
; VECTOR x+ BUTTON |
mov eax,8 ; function 8 : define and draw button |
movzx ebx,word[size_x_var] |
shl ebx,16 |
add ebx,(51)*65536+21 ; [x start] *65536 + [x size] |
mov ecx,(165+15*(15+.Y_ADD))*65536+12 ; [y start] *65536 + [y size] |
mov edx,33 ; button id |
mov esi,0x6688dd ; button color RRGGBB |
int 0x40 |
;VECTOR x+ LABEL |
mov eax,4 ; function 4 : write text to window |
movzx ebx,word[size_x_var] |
shl ebx,16 |
add ebx,(53)*65536+(168+15*(15+.Y_ADD)) ; [x start] *65536 + [y start] |
mov ecx,0x00ddeeff ; font 1 & color ( 0xF0RRGGBB ) |
mov edx,labelxplus ; pointer to text beginning |
mov esi,labelxplusend-labelxplus ; text length |
; cmp [move_flag],2 |
; jne @f |
; add edx,navigation_size |
; @@: |
int 0x40 |
; VECTOR z- BUTTON |
mov eax,8 ; function 8 : define and draw button |
movzx ebx,word[size_x_var] |
shl ebx,16 |
add ebx,(10)*65536+62-41 ; [x start] *65536 + [x size] |
mov ecx,(25+140+15*(16+.Y_ADD))*65536+12 ; [y start] *65536 + [y size] |
mov edx,34 ; button id |
mov esi,0x6688dd ; button color RRGGBB |
int 0x40 |
;VECTOR z- LABEL |
mov eax,4 ; function 4 : write text to window |
movzx ebx,word[size_x_var] |
shl ebx,16 |
add ebx,(12)*65536+(168+15*(16+.Y_ADD)) ; [x start] *65536 + [y start] |
mov ecx,0x00ddeeff ; font 1 & color ( 0xF0RRGGBB ) |
mov edx,labelzminus ; pointer to text beginning |
mov esi,labelzminusend-labelzminus ; text length |
; cmp [move_flag],2 |
; jne @f |
; add edx,navigation_size |
; @@: |
int 0x40 |
;VECTOR Y+ BUTTON |
mov eax,8 ; function 8 : define and draw button |
movzx ebx,word[size_x_var] |
shl ebx,16 |
add ebx,(10+20)*65536+20 ; [x start] *65536 + [x size] |
mov ecx,(165+15*(16+.Y_ADD))*65536+12 ; [y start] *65536 + [y size] |
mov edx,35 ; button id |
mov esi,0x6688dd ; button color RRGGBB |
int 0x40 |
;VECTOR Y+ LABEL |
mov eax,4 ; function 4 : write text to window |
movzx ebx,word[size_x_var] |
shl ebx,16 |
add ebx,(32)*65536+(168+15*(16+.Y_ADD)) ; [x start] *65536 + [y start] |
mov ecx,0x00ddeeff ; font 1 & color ( 0xF0RRGGBB ) |
mov edx,labelyplus ; pointer to text beginning |
mov esi,labelyplusend-labelyplus ; text length |
; cmp [move_flag],2 |
; jne @f |
; add edx,navigation_size |
; @@: |
int 0x40 |
|
mov eax,12 ; function 12:tell os about windowdraw |
mov ebx,2 ; 2, end of draw |
int 0x40 |
ret |
|
|
; DATA AREA ************************************ |
|
include 'data.inc' |
align 16 |
MEM_END: |
Property changes: |
Added: svn:eol-style |
+native |
\ No newline at end of property |