Subversion Repositories Kolibri OS

Compare Revisions

No changes between revisions

Regard whitespace Rev 6889 → Rev 6888

/programs/develop/info3ds/info3ds.asm
8,7 → 8,6
include '../../macros.inc'
include '../../proc32.inc'
include '../../KOSfuncs.inc'
include '../../develop/libraries/libs-dev/libimg/libimg.inc'
include '../../load_img.inc'
include '../../develop/libraries/box_lib/trunk/box_lib.mac'
include '../../develop/libraries/TinyGL/asm_fork/opengl_const.inc'
1023,7 → 1022,7
dd Filter.end - Filter.1
.1:
db '3DS',0
db 'PNG',0
db 'TXT',0
.end:
db 0
 
1039,7 → 1038,7
lib_name_3 db 'buf2d.obj',0
system_dir_4 db '/sys/lib/'
lib_name_4 db 'kmenu.obj',0
system_dir_5 db '/sys/lib/'
system_dir_5 db '/kolibrios/lib/'
lib_name_5 db 'tinygl.obj',0
system_dir_6 db '/sys/lib/'
lib_name_6 db 'libini.obj',0
1337,8 → 1336,7
buf_ogl:
dd 0 ;㪠§ â¥«ì ­  ¡ãä¥à ¨§®¡à ¦¥­¨ï
dw 3d_wnd_l,3d_wnd_t ;+4 left,top
.w: dd 3d_wnd_w
.h: dd 3d_wnd_h
dd 3d_wnd_w,3d_wnd_h ;+8 w,h
dd 0,24 ;+16 color,bit in pixel
 
align 4
1373,9 → 1371,9
lmodel_ambient dd 0.3, 0.3, 0.3, 1.0 ;  à ¬¥âàë ä®­®¢®£® ®á¢¥é¥­¨ï
 
if lang eq ru
capt db 'info 3ds ¢¥àá¨ï 18.04.17',0 ;¯®¤¯¨áì ®ª­ 
capt db 'info 3ds ¢¥àá¨ï 05.09.16',0 ;¯®¤¯¨áì ®ª­ 
else
capt db 'info 3ds version 18.04.17',0 ;window caption
capt db 'info 3ds version 05.09.16',0 ;window caption
end if
 
align 16
/programs/develop/info3ds/info3ds_u.asm
1,5 → 1,5
use32
org 0
org 0x0
db 'MENUET01' ;¨¤¥­â¨ä. ¨á¯®«­ï¥¬®£® ä ©«  ¢á¥£¤  8 ¡ ©â
dd 1, start, i_end, mem, stacktop, file_name, sys_path
 
8,7 → 8,6
include '../../macros.inc'
include '../../proc32.inc'
include '../../KOSfuncs.inc'
include '../../develop/libraries/libs-dev/libimg/libimg.inc'
include '../../load_img.inc'
include '../../develop/libraries/box_lib/trunk/box_lib.mac'
include '../../develop/libraries/TinyGL/asm_fork/opengl_const.inc'
393,13 → 392,13
 
cmp word[eax],CHUNK_OBJBLOCK
jne .end_oblo
cmp dword[edi+obj_3d.poi_count],2
cmp dword[edi+offs_obj_poi_count],2
jl .ini_oblo
stdcall draw_3d,edi
jmp .end_f
.ini_oblo:
stdcall obj_init,edi ;¯®¯ë⪠ ­ áâநâì ¯¥à¥¬¥­­ë¥ ®¡ê¥ªâ 
cmp dword[edi+obj_3d.poi_count],2
cmp dword[edi+offs_obj_poi_count],2
jl .end_f
call mnu_reset_settings ;á¡à®á 㣫®¢ ¯®¢®à®â  ¨ ०¨¬®¢ à¨á®¢ ­¨ï
jmp .end_f
407,13 → 406,13
 
cmp word[eax],CHUNK_MATERIAL
jne .end_mblo
cmp dword[edi+material.name],0
cmp dword[edi+offs_mat_name],0
je .ini_mblo
stdcall draw_material,edi
jmp .end_f
.ini_mblo:
stdcall mat_init,edi,eax ;¯®¯ë⪠ ­ áâநâì ¤ ­­ë¥ ¬ â¥à¨ « 
cmp dword[edi+material.name],0
cmp dword[edi+offs_mat_name],0
je .end_f
stdcall draw_material,edi
jmp .end_f
462,7 → 461,6
mcall ,((3d_wnd_l+100) shl 16)+20,,0x40000009 ;ᢥ⠢ª«./¢ëª«.
mcall ,((3d_wnd_l+125) shl 16)+20,,0x4000000a ;ᣫ ¦¨¢ ­¨¥
mcall ,((3d_wnd_l+150) shl 16)+20,,0x4000000b ;á¡à®á
mcall ,((3d_wnd_l+175) shl 16)+20,,0x4000000c ;áªà¨­ ¨§ 3d ®ª­ 
 
mcall SF_PUT_IMAGE,[image_data_toolbar],(21 shl 16)+21,(5 shl 16)+24 ;new
add ebx,IMAGE_TOOLBAR_ICON_SIZE
481,8 → 479,6
mcall ,,,((3d_wnd_l+75) shl 16)+24 ;£à ­¨ ¯® ¬ â¥à¨ « ¬ ¢ª«.
add ebx,IMAGE_TOOLBAR_ICON_SIZE
mcall ,,,((3d_wnd_l+125) shl 16)+24 ;ᣫ ¦¨¢ ­¨¥
add ebx,IMAGE_TOOLBAR_ICON_SIZE
mcall ,,,((3d_wnd_l+175) shl 16)+24 ;áªà¨­ ¨§ 3d ®ª­ 
 
mov dword[w_scr_t1.all_redraw],1
stdcall [tl_draw], tree1
605,11 → 601,6
call mnu_reset_settings
jmp still
@@:
cmp ah,12
jne @f
call mnu_make_scrshot
jmp still
@@:
 
cmp ah,1
jne still
1094,7 → 1085,7
dd Filter.end - Filter.1
.1:
db '3DS',0
db 'PNG',0
db 'TXT',0
.end:
db 0
 
1110,7 → 1101,7
lib_name_3 db 'buf2d.obj',0
system_dir_4 db '/sys/lib/'
lib_name_4 db 'kmenu.obj',0
system_dir_5 db '/sys/lib/'
system_dir_5 db '/kolibrios/lib/'
lib_name_5 db 'tinygl.obj',0
system_dir_6 db '/sys/lib/'
lib_name_6 db 'libini.obj',0
1402,8 → 1393,7
buf_ogl:
dd 0 ;㪠§ â¥«ì ­  ¡ãä¥à ¨§®¡à ¦¥­¨ï
dw 3d_wnd_l,3d_wnd_t ;+4 left,top
.w: dd 3d_wnd_w
.h: dd 3d_wnd_h
dd 3d_wnd_w,3d_wnd_h ;+8 w,h
.color: dd 0xffffd0
dd 24 ;+16 color,bit in pixel
 
1439,9 → 1429,9
lmodel_ambient dd 0.3, 0.3, 0.3, 1.0 ;  à ¬¥âàë ä®­®¢®£® ®á¢¥é¥­¨ï
 
if lang eq ru
capt db 'info 3ds [user] ¢¥àá¨ï 18.04.17',0 ;¯®¤¯¨áì ®ª­ 
capt db 'info 3ds [user] ¢¥àá¨ï 05.09.16',0 ;¯®¤¯¨áì ®ª­ 
else
capt db 'info 3ds [user] version 18.04.17',0 ;window caption
capt db 'info 3ds [user] version 05.09.16',0 ;window caption
end if
 
align 16
/programs/develop/info3ds/info_o3d.inc
28,6 → 28,28
mat1_data dd ? ;¤ ­­ë¥ 1-£® ¬ â¥à¨ «  ¢ ®¡ê¥ªâ¥
ends
 
offs_obj_poi_data equ 0 ;㪠§ â¥«ì ­  ª®®à¤¨­ âë ¢¥à設
offs_obj_poi_count equ 4 ;ª®««¨ç¥á⢮ ¢¥à設
offs_obj_tri_data equ 8 ;㪠§ â¥«ì ­  ¤ ­­ë¥ âà¥ã£®«ì­¨ª®¢
offs_obj_tri_count equ 12 ;ª®««¨ç¥á⢮ âà¥ã£®«ì­¨ª®¢
offs_obj_normals_poi_data equ 16
offs_obj_normals_poi_count equ 20
offs_obj_normals_tri_data equ 24
offs_obj_normals_tri_count equ 28
offs_obj_x_max equ 32
offs_obj_x_min equ 36
offs_obj_x_centr equ 40
offs_obj_x_scale equ 44
offs_obj_y_max equ 48
offs_obj_y_min equ 52
offs_obj_y_centr equ 56
offs_obj_y_scale equ 60
offs_obj_z_max equ 64
offs_obj_z_min equ 68
offs_obj_z_centr equ 72
offs_obj_z_scale equ 76
offs_obj_mat1_data equ 80
 
struct material
name dd ?
col_ambient dd ? ;梥⠬ â¥à¨ « 
35,6 → 57,11
col_specular dd ?
ends
 
offs_mat_name equ 0
offs_mat_col_ambient equ 4
offs_mat_col_diffuse equ 8
offs_mat_col_specular equ 12
 
bit_vertexes equ 0
bit_faces equ 1 ;£à ­¨ à¨áãîâáï ª®­âãà ¬¨
bit_faces_fill equ 2 ;£à ­¨ á § «¨¢ª®©
58,17 → 85,8
key_face db 'col_faces',0
key_select db 'col_select',0
 
txt_err_save_img_file:
if lang eq ru
db '¥ ¬®£ã á®åà ­¨âì ä ©«.',0
else
db 'Can',39,'t save file.',0
end if
 
align 4
rad_c dd 150 ;¤«ï ¢ëç¨á«¥­¨ï à ¤¨ãá 
png_data dd ?
png_size dd ?
 
align 4
proc hex_in_str, buf:dword,val:dword,zif:dword
100,22 → 118,22
proc obj_clear_param uses edi, o_data:dword
mov edi,[o_data]
;®¡­ã«¥­¨¥ 㪠§ â¥«¥© ­  ¤ ­­ë¥ ®¡ê¥ªâ®¢
mov dword[edi+obj_3d.poi_data],0
mov dword[edi+obj_3d.poi_count],0
mov dword[edi+obj_3d.tri_data],0
mov dword[edi+obj_3d.tri_count],0
mov dword[edi+obj_3d.normals_tri_count],0
mov dword[edi+obj_3d.normals_poi_count],0
mov dword[edi+obj_3d.mat1_data],0
cmp dword[edi+obj_3d.normals_tri_data],0
mov dword[edi+offs_obj_poi_data],0
mov dword[edi+offs_obj_poi_count],0
mov dword[edi+offs_obj_tri_data],0
mov dword[edi+offs_obj_tri_count],0
mov dword[edi+offs_obj_normals_tri_count],0
mov dword[edi+offs_obj_normals_poi_count],0
mov dword[edi+offs_obj_mat1_data],0
cmp dword[edi+offs_obj_normals_tri_data],0
je @f
stdcall mem.Free,[edi+obj_3d.normals_tri_data]
mov dword[edi+obj_3d.normals_tri_data],0
stdcall mem.Free,[edi+offs_obj_normals_tri_data]
mov dword[edi+offs_obj_normals_tri_data],0
@@:
cmp dword[edi+obj_3d.normals_poi_data],0
cmp dword[edi+offs_obj_normals_poi_data],0
je @f
stdcall mem.Free,[edi+obj_3d.normals_poi_data]
mov dword[edi+obj_3d.normals_poi_data],0
stdcall mem.Free,[edi+offs_obj_normals_poi_data]
mov dword[edi+offs_obj_normals_poi_data],0
@@:
ret
endp
149,43 → 167,43
align 4
proc obj_set_sizes uses eax ebx esi edi, o_data:dword
mov edi,[o_data]
cmp dword[edi+obj_3d.poi_count],0
cmp dword[edi+offs_obj_poi_count],0
je .end
finit
mov eax,[edi+obj_3d.poi_data]
mov eax,[edi+offs_obj_poi_data]
mov ebx,dword[eax]
mov [edi+obj_3d.x_min],ebx
mov [edi+obj_3d.x_max],ebx
mov [edi+offs_obj_x_min],ebx
mov [edi+offs_obj_x_max],ebx
mov ebx,dword[eax+4]
mov [edi+obj_3d.y_min],ebx
mov [edi+obj_3d.y_max],ebx
mov [edi+offs_obj_y_min],ebx
mov [edi+offs_obj_y_max],ebx
mov ebx,dword[eax+8]
mov [edi+obj_3d.z_min],ebx
mov [edi+obj_3d.z_max],ebx
mov [edi+offs_obj_z_min],ebx
mov [edi+offs_obj_z_max],ebx
 
mov ebx,[edi+obj_3d.poi_data]
mov esi,[edi+obj_3d.poi_count]
mov ebx,[edi+offs_obj_poi_data]
mov esi,[edi+offs_obj_poi_count]
align 4
.cycle_0: ;à ¡®â  á ª®®à¤¨­ â®© x
fld dword[ebx]
fld dword[edi+obj_3d.x_min]
fld dword[edi+offs_obj_x_min]
fcomp
fstsw ax
sahf
jb @f
mov eax,[ebx]
mov [edi+obj_3d.x_min],eax
mov [edi+offs_obj_x_min],eax
ffree st0
fincstp
jmp .next_x
@@:
fld dword[edi+obj_3d.x_max]
fld dword[edi+offs_obj_x_max]
fcompp
fstsw ax
sahf
ja .next_x
mov eax,[ebx]
mov [edi+obj_3d.x_max],eax
mov [edi+offs_obj_x_max],eax
.next_x:
 
add ebx,12
193,44 → 211,44
jnz .cycle_0
 
fld1
fld dword[edi+obj_3d.x_max]
fsub dword[edi+obj_3d.x_min]
fst dword[edi+obj_3d.x_centr]
fld dword[edi+offs_obj_x_max]
fsub dword[edi+offs_obj_x_min]
fst dword[edi+offs_obj_x_centr]
fdivp ;1/size.x
fstp dword[edi+obj_3d.x_scale]
fstp dword[edi+offs_obj_x_scale]
 
fld dword[edi+obj_3d.x_centr]
fld dword[edi+offs_obj_x_centr]
fld1
fld1
faddp
fdivp ;centr.x = size.x/2
fadd dword[edi+obj_3d.x_min]
fadd dword[edi+offs_obj_x_min]
fchs
fstp dword[edi+obj_3d.x_centr]
fstp dword[edi+offs_obj_x_centr]
 
mov ebx,[edi+obj_3d.poi_data]
mov esi,[edi+obj_3d.poi_count]
mov ebx,[edi+offs_obj_poi_data]
mov esi,[edi+offs_obj_poi_count]
align 4
.cycle_1: ;à ¡®â  á ª®®à¤¨­ â®© y
fld dword[ebx+4]
fld dword[edi+obj_3d.y_min]
fld dword[edi+offs_obj_y_min]
fcomp
fstsw ax
sahf
jb @f
mov eax,[ebx+4]
mov [edi+obj_3d.y_min],eax
mov [edi+offs_obj_y_min],eax
ffree st0
fincstp
jmp .next_y
@@:
fld dword[edi+obj_3d.y_max]
fld dword[edi+offs_obj_y_max]
fcompp
fstsw ax
sahf
ja .next_y
mov eax,[ebx+4]
mov [edi+obj_3d.y_max],eax
mov [edi+offs_obj_y_max],eax
.next_y:
 
add ebx,12
238,44 → 256,44
jnz .cycle_1
 
fld1
fld dword[edi+obj_3d.y_max]
fsub dword[edi+obj_3d.y_min]
fst dword[edi+obj_3d.y_centr]
fld dword[edi+offs_obj_y_max]
fsub dword[edi+offs_obj_y_min]
fst dword[edi+offs_obj_y_centr]
fdivp ;1/size.y
fstp dword[edi+obj_3d.y_scale]
fstp dword[edi+offs_obj_y_scale]
 
fld dword[edi+obj_3d.y_centr]
fld dword[edi+offs_obj_y_centr]
fld1
fld1
faddp
fdivp ;centr.y = size.y/2
fadd dword[edi+obj_3d.y_min]
fadd dword[edi+offs_obj_y_min]
fchs
fstp dword[edi+obj_3d.y_centr]
fstp dword[edi+offs_obj_y_centr]
 
mov ebx,[edi+obj_3d.poi_data]
mov esi,[edi+obj_3d.poi_count]
mov ebx,[edi+offs_obj_poi_data]
mov esi,[edi+offs_obj_poi_count]
align 4
.cycle_2: ;à ¡®â  á ª®®à¤¨­ â®© z
fld dword[ebx+8]
fld dword[edi+obj_3d.z_min]
fld dword[edi+offs_obj_z_min]
fcomp
fstsw ax
sahf
jb @f
mov eax,[ebx+8]
mov [edi+obj_3d.z_min],eax
mov [edi+offs_obj_z_min],eax
ffree st0
fincstp
jmp .next_z
@@:
fld dword[edi+obj_3d.z_max]
fld dword[edi+offs_obj_z_max]
fcompp
fstsw ax
sahf
ja .next_z
mov eax,[ebx+8]
mov [edi+obj_3d.z_max],eax
mov [edi+offs_obj_z_max],eax
.next_z:
 
add ebx,12
283,26 → 301,26
jnz .cycle_2
 
fld1
fld dword[edi+obj_3d.z_max]
fsub dword[edi+obj_3d.z_min]
fst dword[edi+obj_3d.z_centr]
fld dword[edi+offs_obj_z_max]
fsub dword[edi+offs_obj_z_min]
fst dword[edi+offs_obj_z_centr]
fdivp ;1/size.z
fstp dword[edi+obj_3d.z_scale]
fstp dword[edi+offs_obj_z_scale]
 
fld dword[edi+obj_3d.z_centr]
fld dword[edi+offs_obj_z_centr]
fld1
fld1
faddp
fdivp ;centr.z = size.z/2
fadd dword[edi+obj_3d.z_min]
fadd dword[edi+offs_obj_z_min]
fchs
fstp dword[edi+obj_3d.z_centr]
fstp dword[edi+offs_obj_z_centr]
 
;­ å®¤¨¬ à ¤¨ãá ¤«ï áä¥àë
fld dword[edi+obj_3d.x_max]
fsub dword[edi+obj_3d.x_min]
fld dword[edi+obj_3d.y_max]
fsub dword[edi+obj_3d.y_min]
fld dword[edi+offs_obj_x_max]
fsub dword[edi+offs_obj_x_min]
fld dword[edi+offs_obj_y_max]
fsub dword[edi+offs_obj_y_min]
faddp
fild dword[rad_c]
fdivp ;radius=(size.x+size.y)/rad_c
309,22 → 327,22
fstp dword[sph_radius]
 
;¤¥« ¥¬ ®¤¨­ ª®¢ë© ¬ áèâ ¡ ¯® ®áï¬ x ¨ y, çâ®-¡ë ­¥ ­ àãè «¨áì ¯à®¯®à樨 ¨§®¡à ¦¥­¨ï
fld dword[edi+obj_3d.y_scale]
fld dword[edi+offs_obj_y_scale]
fdiv dword[ratio] ;¯à¨¢¥¤¥­¨¥ ¬ áèâ ¡  ¯® ®á¨ y ãç¨â뢠ï çâ® ¯® ¢ëá®â¥ íªà ­ ¬¥­ìè¥
fcomp dword[edi+obj_3d.x_scale]
fcomp dword[edi+offs_obj_x_scale]
fstsw ax
sahf
jb @f
;ᦠ⨥ ¬ áèâ ¡  ¯® y
fld dword[edi+obj_3d.x_scale]
fld dword[edi+offs_obj_x_scale]
fmul dword[ratio]
fstp dword[edi+obj_3d.y_scale] ;¬ áèâ ¡ ¯® ®á¨ y = ¬ áèâ ¡ ¯® ®á¨ x
fstp dword[edi+offs_obj_y_scale] ;¬ áèâ ¡ ¯® ®á¨ y = ¬ áèâ ¡ ¯® ®á¨ x
jmp .end
@@:
;ᦠ⨥ ¬ áèâ ¡  ¯® x >...<
fld dword[edi+obj_3d.x_scale]
fld dword[edi+offs_obj_x_scale]
fdiv dword[ratio]
fstp dword[edi+obj_3d.x_scale]
fstp dword[edi+offs_obj_x_scale]
.end:
ret
endp
340,20 → 358,20
endl
pushad
mov ecx,[o_data]
cmp dword[ecx+obj_3d.poi_count],0
cmp dword[ecx+offs_obj_poi_count],0
je .end
mov eax,[ecx+obj_3d.tri_count]
mov [ecx+obj_3d.normals_tri_count],eax ;­  ª ¦¤ë© âà¥ã£®«ì­¨ª 1 ­®à¬ «ì
mov eax,[ecx+offs_obj_tri_count]
mov [ecx+offs_obj_normals_tri_count],eax ;­  ª ¦¤ë© âà¥ã£®«ì­¨ª 1 ­®à¬ «ì
cmp eax,0
je .end
finit
imul eax,12
stdcall mem.Alloc, eax
mov [ecx+obj_3d.normals_tri_data],eax
mov [ecx+offs_obj_normals_tri_data],eax
 
mov edx,[ecx+obj_3d.tri_data]
mov ebx,[ecx+obj_3d.tri_count]
mov ecx,[ecx+obj_3d.poi_data]
mov edx,[ecx+offs_obj_tri_data]
mov ebx,[ecx+offs_obj_tri_count]
mov ecx,[ecx+offs_obj_poi_data]
align 4
@@:
mov edi,ebp
444,13 → 462,13
 
;­®à¬ «¨ ª ¢¥à設 ¬
mov ebx,[o_data]
mov ecx,[ebx+obj_3d.poi_count]
mov [ebx+obj_3d.normals_poi_count],ecx
mov ecx,[ebx+offs_obj_poi_count]
mov [ebx+offs_obj_normals_poi_count],ecx
cmp ecx,0
je .end
imul ecx,12
stdcall mem.Alloc,ecx
mov [ebx+obj_3d.normals_poi_data],eax
mov [ebx+offs_obj_normals_poi_data],eax
 
mov edi,eax
mov eax,0.0
457,11 → 475,11
shr ecx,2
rep stosd ;®ç¨á⪠ 0-¬¨ float
 
mov edx,[ebx+obj_3d.tri_count]
mov edi,[ebx+obj_3d.tri_data]
mov eax,[ebx+obj_3d.normals_tri_data]
mov ecx,[ebx+obj_3d.poi_data]
mov ebx,[ebx+obj_3d.normals_poi_data]
mov edx,[ebx+offs_obj_tri_count]
mov edi,[ebx+offs_obj_tri_data]
mov eax,[ebx+offs_obj_normals_tri_data]
mov ecx,[ebx+offs_obj_poi_data]
mov ebx,[ebx+offs_obj_normals_poi_data]
align 4
.cycle_0: ;¯® £à ­ï¬
movzx esi,word[edi] ;1-ï ¢¥à設 
618,8 → 636,8
mov esi,ebx
movzx edx,word[ebx+6] ;ª®««¨ç¥á⢮ â®ç¥ª
add ebx,8
mov [edi+obj_3d.poi_data],ebx
mov [edi+obj_3d.poi_count],edx
mov [edi+offs_obj_poi_data],ebx
mov [edi+offs_obj_poi_count],edx
 
.cycle_0: ;横« ¤«ï ¯®¨áª  âà¥ã£®«ì­¨ª®¢
add esi,dword[esi+2]
631,9 → 649,9
@@:
;¥á«¨ ­ è«¨ âà¥ã£®«ì­¨ª¨
movzx edx,word[esi+6]
mov [edi+obj_3d.tri_count],edx
mov [edi+offs_obj_tri_count],edx
add esi,8 ;2+4+2 (chunk+size+count)
mov [edi+obj_3d.tri_data],esi
mov [edi+offs_obj_tri_data],esi
 
;¯®¨áª ¬ â¥à¨ «®¢ £à ­¥©
shl edx,3
640,7 → 658,7
add esi,edx
cmp word[esi],CHUNK_FACEMAT
jne .end_points
mov [edi+obj_3d.mat1_data],esi
mov [edi+offs_obj_mat1_data],esi
.end_points:
 
stdcall obj_set_sizes, edi
663,10 → 681,10
mov edi,[m_data]
 
;... clear edi ...
mov dword[edi+material.name],0
mov dword[edi+material.col_ambient],0
mov dword[edi+material.col_diffuse],0
mov dword[edi+material.col_specular],0
mov dword[edi+offs_mat_name],0
mov dword[edi+offs_mat_col_ambient],0
mov dword[edi+offs_mat_col_diffuse],0
mov dword[edi+offs_mat_col_specular],0
 
xor edx,edx
mov ebx,[f_data]
681,7 → 699,7
;*** (0) ***
mov esi,ebx
add ebx,6
mov [edi+material.name],ebx
mov [edi+offs_mat_name],ebx
sub ebx,6
;*** (1) ***
.cycle_0: ;横« ¤«ï ¯®¨áª  æ¢¥â  ¬ â¥à¨ « 
698,10 → 716,10
jne .end_material
add esi,6
mov dl,byte[esi]
mov byte[edi+material.col_ambient+2],dl
mov [edi+offs_mat_col_ambient+2],dl
mov dx,word[esi+1]
ror dx,8
mov word[edi+material.col_ambient],dx
mov [edi+offs_mat_col_ambient],dx
;*** (2) ***
mov esi,ebx
.cycle_1: ;横« ¤«ï ¯®¨áª  æ¢¥â  ¬ â¥à¨ « 
718,10 → 736,10
jne .end_material
add esi,6
mov dl,byte[esi]
mov byte[edi+material.col_diffuse+2],dl
mov [edi+offs_mat_col_diffuse+2],dl
mov dx,word[esi+1]
ror dx,8
mov word[edi+material.col_diffuse],dx
mov [edi+offs_mat_col_diffuse],dx
;*** (3) ***
mov esi,ebx
.cycle_2: ;横« ¤«ï ¯®¨áª  æ¢¥â  ¬ â¥à¨ « 
738,10 → 756,10
jne .end_material
add esi,6
mov dl,byte[esi]
mov byte[edi+material.col_specular+2],dl
mov [edi+offs_mat_col_specular+2],dl
mov dx,word[esi+1]
ror dx,8
mov word[edi+material.col_specular],dx
mov [edi+offs_mat_col_specular],dx
 
.end_material:
.no_material:
769,10 → 787,10
stdcall buf_draw_beg, buf_ogl
stdcall [buf2d_draw_text], buf_ogl, buf_1,txt_afff,5,35,0xff
 
stdcall [buf2d_draw_text], buf_ogl,buf_1,[edi+material.name],15,45,0 ;¨¬ï ¬ â¥à¨ « 
stdcall draw_color, [edi+material.col_ambient], txt_a010,2,55 ;®ªà㦠î騩 梥â
stdcall draw_color, [edi+material.col_diffuse], txt_a020,2,75 ;¤¨äã§­ë© æ¢¥â
stdcall draw_color, [edi+material.col_specular],txt_a030,2,95 ;§¥àª «ì­ë© 梥â
stdcall [buf2d_draw_text], buf_ogl,buf_1,[edi+offs_mat_name],15,45,0 ;¨¬ï ¬ â¥à¨ « 
stdcall draw_color, [edi+offs_mat_col_ambient], txt_a010,2,55 ;®ªà㦠î騩 梥â
stdcall draw_color, [edi+offs_mat_col_diffuse], txt_a020,2,75 ;¤¨äã§­ë© æ¢¥â
stdcall draw_color, [edi+offs_mat_col_specular],txt_a030,2,95 ;§¥àª «ì­ë© 梥â
 
stdcall [buf2d_draw], buf_ogl
ret
801,7 → 819,7
align 4
proc draw_3d uses eax ebx ecx edi, o_data:dword
mov edi,[o_data]
cmp dword[edi+obj_3d.poi_count],2
cmp dword[edi+offs_obj_poi_count],2
jl .end_f
stdcall [glClear], GL_COLOR_BUFFER_BIT + GL_DEPTH_BUFFER_BIT ;®ç¨á⨬ ¡ãä¥à æ¢¥â  ¨ £«ã¡¨­ë
stdcall [glPushMatrix]
813,18 → 831,18
stdcall [glDisable],GL_LIGHTING
.end_l:
stdcall [glTranslatef], 0.0,0.0,0.5 ;correct for z
stdcall [glScalef], [edi+obj_3d.x_scale],[edi+obj_3d.y_scale],[edi+obj_3d.z_scale]
stdcall [glScalef], [edi+offs_obj_x_scale],[edi+offs_obj_y_scale],[edi+offs_obj_z_scale]
stdcall [glScalef], 1.0,1.0,0.7 ;correct for z
stdcall [glRotatef], [angle_z],0.0,0.0,1.0
stdcall [glRotatef], [angle_y],0.0,1.0,0.0
stdcall [glRotatef], [angle_x],1.0,0.0,0.0
stdcall [glTranslatef], [edi+obj_3d.x_centr],[edi+obj_3d.y_centr],[edi+obj_3d.z_centr]
stdcall [glTranslatef], [edi+offs_obj_x_centr],[edi+offs_obj_y_centr],[edi+offs_obj_z_centr]
 
if version_edit eq 0
;à¨á®¢ ­¨¥ £à ­¥© á ¨á¯®«ì§®¢ ­¨¥¬ 梥⮢ ¬ â¥à¨ «®¢
bt dword[draw_mode],bit_faces_mat
jnc @f
mov eax,[edi+obj_3d.mat1_data]
mov eax,[edi+offs_obj_mat1_data]
.b_found:
cmp eax,0
je .end_points
839,9 → 857,9
;à¨á®¢ ­¨¥ £à ­¥© ¡¥§ 梥⮢ ¬ â¥à¨ «®¢
bt dword[draw_mode],bit_faces
jnc .end_triangles
cmp dword[edi+obj_3d.tri_count],0
cmp dword[edi+offs_obj_tri_count],0
je .end_triangles
cmp dword[edi+obj_3d.poi_count],0
cmp dword[edi+offs_obj_poi_count],0
je .end_triangles
bt dword[draw_mode],bit_faces_fill
jc @f
859,31 → 877,31
jnc .triangles_flat
;triangles smooth
stdcall [glBegin],GL_TRIANGLES
mov eax,[edi+obj_3d.tri_data]
mov ecx,[edi+obj_3d.tri_count]
mov edx,[edi+obj_3d.normals_tri_data]
mov eax,[edi+offs_obj_tri_data]
mov ecx,[edi+offs_obj_tri_count]
mov edx,[edi+offs_obj_normals_tri_data]
align 4
@@:
movzx ebx,word[eax] ;1-ï ¢¥à設 
imul ebx,12
add ebx,[edi+obj_3d.normals_poi_data]
add ebx,[edi+offs_obj_normals_poi_data]
stdcall [glNormal3fv], ebx
sub ebx,[edi+obj_3d.normals_poi_data]
add ebx,[edi+obj_3d.poi_data]
sub ebx,[edi+offs_obj_normals_poi_data]
add ebx,[edi+offs_obj_poi_data]
stdcall [glVertex3f], [ebx],[ebx+4],[ebx+8]
movzx ebx,word[eax+2] ;2-ï ¢¥à設 
imul ebx,12
add ebx,[edi+obj_3d.normals_poi_data]
add ebx,[edi+offs_obj_normals_poi_data]
stdcall [glNormal3fv], ebx
sub ebx,[edi+obj_3d.normals_poi_data]
add ebx,[edi+obj_3d.poi_data]
sub ebx,[edi+offs_obj_normals_poi_data]
add ebx,[edi+offs_obj_poi_data]
stdcall [glVertex3f], [ebx],[ebx+4],[ebx+8]
movzx ebx,word[eax+4] ;3-ï ¢¥à設 
imul ebx,12
add ebx,[edi+obj_3d.normals_poi_data]
add ebx,[edi+offs_obj_normals_poi_data]
stdcall [glNormal3fv], ebx
sub ebx,[edi+obj_3d.normals_poi_data]
add ebx,[edi+obj_3d.poi_data]
sub ebx,[edi+offs_obj_normals_poi_data]
add ebx,[edi+offs_obj_poi_data]
stdcall [glVertex3f], [ebx],[ebx+4],[ebx+8]
add eax,8 ;à §¬¥à âà¥ã£®«ì­¨ª  = (3 ¢¥à設ë (¯® 2¡) + ᢮©á⢠ (2¡))
dec ecx
893,9 → 911,9
 
.triangles_flat:
stdcall [glBegin],GL_TRIANGLES
mov eax,[edi+obj_3d.tri_data]
mov ecx,[edi+obj_3d.tri_count]
mov edx,[edi+obj_3d.normals_tri_data]
mov eax,[edi+offs_obj_tri_data]
mov ecx,[edi+offs_obj_tri_count]
mov edx,[edi+offs_obj_normals_tri_data]
align 4
@@:
;
906,15 → 924,15
.norm1:
movzx ebx,word[eax] ;1-ï ¢¥à設 
imul ebx,12
add ebx,[edi+obj_3d.poi_data]
add ebx,[edi+offs_obj_poi_data]
stdcall [glVertex3f], [ebx],[ebx+4],[ebx+8]
movzx ebx,word[eax+2] ;2-ï ¢¥à設 
imul ebx,12
add ebx,[edi+obj_3d.poi_data]
add ebx,[edi+offs_obj_poi_data]
stdcall [glVertex3f], [ebx],[ebx+4],[ebx+8]
movzx ebx,word[eax+4] ;3-ï ¢¥à設 
imul ebx,12
add ebx,[edi+obj_3d.poi_data]
add ebx,[edi+offs_obj_poi_data]
stdcall [glVertex3f], [ebx],[ebx+4],[ebx+8]
add eax,8 ;à §¬¥à âà¥ã£®«ì­¨ª  = (3 ¢¥à設ë (¯® 2¡) + ᢮©á⢠ (2¡))
dec ecx
928,9 → 946,9
jnc .end_points
stdcall [glColor3ub],[color_vert+2],[color_vert+1],[color_vert]
stdcall [glBegin],GL_POINTS
mov eax,[edi+obj_3d.poi_data]
mov ebx,[edi+obj_3d.poi_count]
mov edx,[edi+obj_3d.normals_poi_data]
mov eax,[edi+offs_obj_poi_data]
mov ebx,[edi+offs_obj_poi_count]
mov edx,[edi+offs_obj_normals_poi_data]
align 4
@@:
bt dword[draw_mode],bit_light
955,14 → 973,14
 
stdcall [glBegin],GL_LINES
stdcall [glColor3ub], [color_ox+2],[color_ox+1],[color_ox]
stdcall [glVertex3f], [edi+obj_3d.x_min],[eax+4],[eax+8]
stdcall [glVertex3f], [edi+obj_3d.x_max],[eax+4],[eax+8]
stdcall [glVertex3f], [edi+offs_obj_x_min],[eax+4],[eax+8]
stdcall [glVertex3f], [edi+offs_obj_x_max],[eax+4],[eax+8]
stdcall [glColor3ub], [color_oy+2],[color_oy+1],[color_oy]
stdcall [glVertex3f], [eax],[edi+obj_3d.y_min],[eax+8]
stdcall [glVertex3f], [eax],[edi+obj_3d.y_max],[eax+8]
stdcall [glVertex3f], [eax],[edi+offs_obj_y_min],[eax+8]
stdcall [glVertex3f], [eax],[edi+offs_obj_y_max],[eax+8]
stdcall [glColor3ub], [color_oz+2],[color_oz+1],[color_oz]
stdcall [glVertex3f], [eax],[eax+4],[edi+obj_3d.z_min]
stdcall [glVertex3f], [eax],[eax+4],[edi+obj_3d.z_max]
stdcall [glVertex3f], [eax],[eax+4],[edi+offs_obj_z_min]
stdcall [glVertex3f], [eax],[eax+4],[edi+offs_obj_z_max]
stdcall [glEnd]
 
stdcall [glColor3ub],[color_select+2],[color_select+1],[color_select]
1075,64 → 1093,6
call update_obj
ret
 
align 4
mnu_make_scrshot:
pushad
copy_path open_dialog_name,communication_area_default_path,file_name,0
mov [OpenDialog_data.type],1
stdcall [OpenDialog_Start],OpenDialog_data
cmp [OpenDialog_data.status],2
je .end_save_file
;ª®¤ ¯à¨ 㤠筮¬ ®âªàë⨨ ¤¨ «®£ 
mov dword[png_data],0
 
;create image struct
stdcall [img_create], [buf_ogl.w], [buf_ogl.h], Image.bpp24
mov ebx,eax
test eax,eax
jz @f
;copy foto to image buffer
mov edi,[eax+Image.Data]
mov esi,[buf_ogl]
mov ecx,[buf_ogl.w]
mov edx,[buf_ogl.h]
imul ecx,edx
imul ecx,3
shr ecx,2 ;OpenGL buffer align to 4
rep movsd
 
;encode image
stdcall [img_encode], eax, LIBIMG_FORMAT_PNG, 0
test eax,eax
jz @f
mov [png_data],eax
mov [png_size],ecx
@@:
stdcall [img_destroy],ebx
 
; § ¯®«­ï¥¬ áâàãªâãàã ¤«ï á®åà ­¥­¨ï ä ©« 
mov ebx,run_file_70
mov dword[ebx],SSF_CREATE_FILE
mov eax,[png_size]
mov [ebx+12],eax ;file size
mov eax,[png_data]
mov [ebx+16],eax
mov dword[ebx+FileInfoBlock.FileName], openfile_path
 
mcall SF_FILE,run_file_70
test eax,eax
jnz .save_error
;notify_window_run openfile_path
jmp @f
.save_error:
;á®®¡é¥­¨¥ ® ­¥ã¤ ç­®¬ á®åà ­¥­¨¨
notify_window_run txt_err_save_img_file
@@:
mcall SF_SYS_MISC, SSF_MEM_FREE, [png_data]
.end_save_file:
popad
ret
 
if version_edit eq 1
 
align 4
1191,12 → 1151,12
cmp word[ebx],CHUNK_MATERIAL
jne .end_add_p3
add eax,list_offs_obj3d
mov esi,[eax+material.name]
mov esi,[eax+offs_mat_name]
cmp esi,0
jne @f
;init material
stdcall mat_init,eax,ebx
mov esi,[eax+material.name]
mov esi,[eax+offs_mat_name]
@@:
mov edi,[p_mat]
mov eax,5
1221,7 → 1181,7
.found:
stdcall [tl_node_poi_get_data], tree1,ecx
add eax,list_offs_obj3d
mov eax,[eax+material.col_diffuse]
mov eax,[eax+offs_mat_col_diffuse]
.end_f:
ret
endp
1240,7 → 1200,7
cmp al,0
jne @b
movzx ecx,word[esi] ;ecx - ç¨á«® £à ­¥© á ¤ ­­ë¬ ¬ â¥à¨ «®¬
mov edx,[edi+obj_3d.poi_data]
mov edx,[edi+offs_obj_poi_data]
 
bt dword[draw_mode],bit_smooth
jnc @f
1253,29 → 1213,29
movzx ebx,word[esi]
 
shl ebx,3
add ebx,[edi+obj_3d.tri_data]
add ebx,[edi+offs_obj_tri_data]
movzx eax,word[ebx] ;1-ï ¢¥à設 
imul eax,12 ;float(x,y,z)
add eax,[edi+obj_3d.normals_poi_data]
add eax,[edi+offs_obj_normals_poi_data]
stdcall [glNormal3fv], eax
sub eax,[edi+obj_3d.normals_poi_data]
sub eax,[edi+offs_obj_normals_poi_data]
add eax,edx
stdcall [glVertex3f], [eax],[eax+4],[eax+8]
 
movzx eax,word[ebx+2] ;2-ï ¢¥à設 
imul eax,12 ;float(x,y,z)
add eax,[edi+obj_3d.normals_poi_data]
add eax,[edi+offs_obj_normals_poi_data]
stdcall [glNormal3fv], eax
sub eax,[edi+obj_3d.normals_poi_data]
sub eax,[edi+offs_obj_normals_poi_data]
add eax,edx
stdcall [glVertex3f], [eax],[eax+4],[eax+8]
 
movzx eax,word[ebx+4] ;3-ï ¢¥à設 
imul eax,12 ;float(x,y,z)
add eax,[edi+obj_3d.normals_poi_data]
add eax,[edi+offs_obj_normals_poi_data]
stdcall [glNormal3fv], eax
sub eax,[edi+obj_3d.normals_poi_data]
sub eax,[edi+offs_obj_normals_poi_data]
add eax,edx
stdcall [glVertex3f], [eax],[eax+4],[eax+8]
1294,12 → 1254,12
jnc .norm
mov eax,ebx
imul eax,12
add eax,[edi+obj_3d.normals_tri_data]
add eax,[edi+offs_obj_normals_tri_data]
stdcall [glNormal3fv], eax
.norm:
 
shl ebx,3
add ebx,[edi+obj_3d.tri_data]
add ebx,[edi+offs_obj_tri_data]
movzx eax,word[ebx] ;1-ï ¢¥à設 
imul eax,12 ;float(x,y,z)
/programs/develop/info3ds/info_wnd_coords.inc
85,14 → 85,14
;jmp .set_points
@@:
.set_points:
mov [edi+obj_3d.poi_data],ebx
mov [edi+obj_3d.poi_count],edx
mov [edi+offs_obj_poi_data],ebx
mov [edi+offs_obj_poi_count],edx
.no_points:
 
;­ áâனª  ᯨ᪠ ®¡ê¥ªâ®¢
mov ebx,[edi+obj_3d.poi_data]
mov ebx,[edi+offs_obj_poi_data]
mov dword[tree3.info_max_count],2
mov edx,[edi+obj_3d.poi_count]
mov edx,[edi+offs_obj_poi_count]
add dword[tree3.info_max_count],edx ;áâ ¢¨¬ ç¨á«® 㧫®¢, à ¢­®¥ ª®««¨ç¥áâ¢ã â®ç¥ª (+2 ­  ­ ç «® ¨ ª®­¥æ ᯨ᪠)
stdcall dword[tl_data_init], tree3
mov eax,dword[icon_tl_sys]
523,10 → 523,10
mov dword[tree3.data_img_sys],0 ;â. ª. ®­¨ ¥é¥ ¨á¯®«ì§ãîâìáï ¢ ¤à㣨å í«¥¬¥­â å
stdcall dword[tl_data_clear], tree3
mov edi,o3d
stdcall mem.Free,[edi+obj_3d.normals_tri_data]
stdcall mem.Free,[edi+obj_3d.normals_poi_data]
mov dword[edi+obj_3d.normals_tri_data],0
mov dword[edi+obj_3d.normals_poi_data],0
stdcall mem.Free,[edi+offs_obj_normals_tri_data]
stdcall mem.Free,[edi+offs_obj_normals_poi_data]
mov dword[edi+offs_obj_normals_tri_data],0
mov dword[edi+offs_obj_normals_poi_data],0
mov byte[prop_wnd_run],0 ;®¡­ã«ï¥¬ áç¥â稪 ®ª®­
mcall SF_TERMINATE_PROCESS ;¢ë室 ¨§ ¯à®£à ¬¬ë
 
/programs/develop/info3ds/toolbar.png
Cannot display: file marked as a binary type.
svn:mime-type = application/octet-stream