From 7833219ec046be70e031686c326535bfd49a1305 Mon Sep 17 00:00:00 2001 From: IgorA Date: Fri, 15 Jan 2016 22:51:03 +0000 Subject: [PATCH] add a new program for users (it has a simple interface) git-svn-id: svn://kolibrios.org@6060 a494cfbc-eb01-0410-851d-a64ba20cac60 --- programs/develop/info3ds/build_en.bat | 2 + programs/develop/info3ds/build_ru.bat | 2 + programs/develop/info3ds/info3ds.asm | 42 +- programs/develop/info3ds/info3ds_u.asm | 1483 ++++++++++++++++++ programs/develop/info3ds/info_menu.inc | 2 +- programs/develop/info3ds/info_o3d.inc | 143 +- programs/develop/info3ds/info_wnd_coords.inc | 94 +- programs/develop/info3ds/toolbar.png | Bin 2125 -> 2997 bytes 8 files changed, 1645 insertions(+), 123 deletions(-) create mode 100644 programs/develop/info3ds/info3ds_u.asm diff --git a/programs/develop/info3ds/build_en.bat b/programs/develop/info3ds/build_en.bat index 9be833bbfd..8e5282954f 100644 --- a/programs/develop/info3ds/build_en.bat +++ b/programs/develop/info3ds/build_en.bat @@ -10,4 +10,6 @@ if not exist bin\font8x9.bmp @copy ..\..\fs\kfar\trunk\font8x9.bmp bin\font8x9.b @kpack bin\tinygl.obj @fasm.exe -m 16384 info3ds.asm bin\info3ds.kex @kpack bin\info3ds.kex +@fasm.exe -m 16384 info3ds_u.asm bin\info3ds_u.kex +@kpack bin\info3ds_u.kex pause \ No newline at end of file diff --git a/programs/develop/info3ds/build_ru.bat b/programs/develop/info3ds/build_ru.bat index 1abfdf76ae..5590eeabff 100644 --- a/programs/develop/info3ds/build_ru.bat +++ b/programs/develop/info3ds/build_ru.bat @@ -10,4 +10,6 @@ if not exist bin\font8x9.bmp @copy ..\..\fs\kfar\trunk\font8x9.bmp bin\font8x9.b @kpack bin\tinygl.obj @fasm.exe -m 16384 info3ds.asm bin\info3ds.kex @kpack bin\info3ds.kex +@fasm.exe -m 16384 info3ds_u.asm bin\info3ds_u.kex +@kpack bin\info3ds_u.kex pause \ No newline at end of file diff --git a/programs/develop/info3ds/info3ds.asm b/programs/develop/info3ds/info3ds.asm index 7f16803c9a..cab5ec77a5 100644 --- a/programs/develop/info3ds/info3ds.asm +++ b/programs/develop/info3ds/info3ds.asm @@ -12,6 +12,7 @@ include '../../dll.inc' include 'lang.inc' include 'info_fun_float.inc' include 'info_menu.inc' +include 'data.inc' version_edit equ 1 @@ -48,13 +49,13 @@ open_b rb 560 main_wnd_height equ 460 ;высота главного окна программы fn_toolbar db 'toolbar.png',0 IMAGE_TOOLBAR_ICON_SIZE equ 16*16*3 -IMAGE_TOOLBAR_SIZE equ IMAGE_TOOLBAR_ICON_SIZE*7 +IMAGE_TOOLBAR_SIZE equ IMAGE_TOOLBAR_ICON_SIZE*12+54 image_data_toolbar dd 0 ; TREE_ICON_SYS16_BMP_SIZE equ IMAGE_TOOLBAR_ICON_SIZE*11+54 ;размер bmp файла с системными иконками icon_tl_sys dd 0 ;указатеель на память для хранения системных иконок icon_toolbar dd 0 ;указатеель на память для хранения иконок объектов -TOOLBAR_ICON_BMP_SIZE equ IMAGE_TOOLBAR_ICON_SIZE*10+54 ;размер bmp файла с иконками объектов +IMAGE_CHUNKS_SIZE equ IMAGE_TOOLBAR_ICON_SIZE*10+54 ;размер bmp файла с иконками объектов ; IMAGE_FILE1_SIZE equ 128*144*3+54 ;размер файла с изображением @@ -96,8 +97,6 @@ macro load_image_file path,buf,size { ; } ;-------------------------------------- -include 'data.inc' - level_stack dd 0 offs_last_timer dd 0 ;последний сдвиг показаный в функции таймера @@ -184,7 +183,7 @@ start: mov eax,dword[icon_tl_sys] mov dword[tree1.data_img_sys],eax - load_image_file 'objects.png', icon_toolbar,TOOLBAR_ICON_BMP_SIZE + load_image_file 'objects.png', icon_toolbar,IMAGE_CHUNKS_SIZE mov eax,dword[icon_toolbar] mov dword[tree1.data_img],eax @@ -424,7 +423,7 @@ pushad @@: sub eax,65 mov dword[tree1.box_height],eax - mov word[w_scr_t1+4],ax ;новые размеры скроллинга + mov word[w_scr_t1.y_size],ax ;новые размеры скроллинга cmp eax,dword[buf_0.h] ;увеличиваем высоту буфера jle @f stdcall [buf2d_resize],buf_0,0,eax @@ -440,7 +439,7 @@ pushad sub eax,41 mov dword[tree1.box_width],eax add ax,word[tree1.box_left] - mov word[w_scr_t1+sb_offs_start_x],ax + mov word[w_scr_t1.x_pos],ax add ax,16+5 mov word[buf_0.l],ax @@ -708,8 +707,7 @@ block_analiz_data: jne @f stdcall add_3ds_object, ID_ICON_DATA,ebx,2,txt_count ;число граней push eax - xor eax,eax - mov ax,[esi] + movzx eax,word[esi] shl eax,3 add esi,2 sub ecx,2 @@ -768,16 +766,20 @@ block_analiz_data: ret ;вход в 1-й дочерний блок +;input: +; eax - указатель на временный стек файла file_3ds +; esi - начало родительского блока ;output: -; edx - destroy +; ebx - destroy +; esi - начало данных родительского блока align 4 block_children: push ecx ;проверка правильности размеров дочернего блока - mov ebx,esi ;смещение начала родительского блока + mov ebx,esi add ebx,6 ;переход на начало дочернего блока add ebx,dword[ebx+2] ;добавляем размер дочернего блока - mov ecx,esi ;смещение начала родительского блока + mov ecx,esi add ecx,dword[esi+2] ;добавляем размер родительского блока cmp ebx,ecx ;учитывать заголовки не нужно, т. к. сравниваются только данные блоков jle @f @@ -1228,12 +1230,10 @@ import_buf2d: buf2d_bit_blt dd sz_buf2d_bit_blt buf2d_bit_blt_transp dd sz_buf2d_bit_blt_transp buf2d_bit_blt_alpha dd sz_buf2d_bit_blt_alpha - buf2d_curve_bezier dd sz_buf2d_curve_bezier buf2d_convert_text_matrix dd sz_buf2d_convert_text_matrix buf2d_draw_text dd sz_buf2d_draw_text buf2d_crop_color dd sz_buf2d_crop_color buf2d_offset_h dd sz_buf2d_offset_h - buf2d_flood_fill dd sz_buf2d_flood_fill buf2d_set_pixel dd sz_buf2d_set_pixel dd 0,0 sz_init0 db 'lib_init',0 @@ -1254,19 +1254,15 @@ import_buf2d: sz_buf2d_bit_blt db 'buf2d_bit_blt',0 sz_buf2d_bit_blt_transp db 'buf2d_bit_blt_transp',0 sz_buf2d_bit_blt_alpha db 'buf2d_bit_blt_alpha',0 - sz_buf2d_curve_bezier db 'buf2d_curve_bezier',0 sz_buf2d_convert_text_matrix db 'buf2d_convert_text_matrix',0 sz_buf2d_draw_text db 'buf2d_draw_text',0 sz_buf2d_crop_color db 'buf2d_crop_color',0 sz_buf2d_offset_h db 'buf2d_offset_h',0 - sz_buf2d_flood_fill db 'buf2d_flood_fill',0 sz_buf2d_set_pixel db 'buf2d_set_pixel',0 align 4 import_box_lib: dd sz_init1 - init_checkbox dd sz_init_checkbox - check_box_draw dd sz_check_box_draw edit_box_draw dd sz_edit_box_draw edit_box_key dd sz_edit_box_key edit_box_mouse dd sz_edit_box_mouse @@ -1300,8 +1296,6 @@ import_box_lib: dd 0,0 sz_init1 db 'lib_init',0 - sz_init_checkbox db 'init_checkbox2',0 - sz_check_box_draw db 'check_box_draw2',0 sz_edit_box_draw db 'edit_box',0 sz_edit_box_key db 'edit_box_key',0 sz_edit_box_mouse db 'edit_box_mouse',0 @@ -1413,8 +1407,8 @@ buf_1: align 4 el_focus dd tree1 tree1 tree_list size_one_list,300+2, tl_key_no_edit+tl_draw_par_line,\ - 16,16, 0xffffff,0xb0d0ff,0x400040, 5,35,195-16,250, 16,list_offs_text,0, el_focus,\ - w_scr_t1,0 + 16,16, 0xffffff,0xb0d0ff,0x400040, 5,35,195-16,250, 16,list_offs_text,0,\ + el_focus,w_scr_t1,0 align 4 w_scr_t1 scrollbar 16,0, 3,0, 15, 100, 0,0, 0,0,0, 1 @@ -1435,9 +1429,9 @@ white_light dd 0.8, 0.8, 0.8, 1.0 ; lmodel_ambient dd 0.3, 0.3, 0.3, 1.0 ; Параметры фонового освещения if lang eq ru -capt db 'info 3ds версия 09.01.16',0 ;подпись окна +capt db 'info 3ds версия 16.01.16',0 ;подпись окна else -capt db 'info 3ds version 09.01.16',0 ;window caption +capt db 'info 3ds version 16.01.16',0 ;window caption end if align 16 diff --git a/programs/develop/info3ds/info3ds_u.asm b/programs/develop/info3ds/info3ds_u.asm new file mode 100644 index 0000000000..f8b08e2bd1 --- /dev/null +++ b/programs/develop/info3ds/info3ds_u.asm @@ -0,0 +1,1483 @@ +use32 + org 0x0 + db 'MENUET01' ;идентиф. исполняемого файла всегда 8 байт + dd 1, start, i_end, mem, stacktop, file_name, sys_path + +include '../../macros.inc' +include '../../proc32.inc' +include '../../kosfuncs.inc' +include '../../develop/libraries/box_lib/load_lib.mac' +include '../../develop/libraries/box_lib/trunk/box_lib.mac' +include '../../develop/libraries/TinyGL/asm_fork/opengl_const.inc' +include '../../dll.inc' +include 'lang.inc' +include 'info_fun_float.inc' +include 'info_menu.inc' +include 'data.inc' + +version_edit equ 0 + +3d_wnd_l equ 205 ;отступ для tinygl буфера слева +3d_wnd_t equ 47 ;отступ для tinygl буфера сверху +3d_wnd_w equ 344 +3d_wnd_h equ 312 + +@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc,dll.Load + +struct FileInfoBlock + Function dd ? + Position dd ? + Flags dd ? + Count dd ? + Buffer dd ? + db ? + FileName dd ? +ends + +ID_ICON_CHUNK_MAIN equ 0 ;иконка главного блока +ID_ICON_CHUNK_NOT_FOUND equ 1 ;иконка не известного блока +ID_ICON_DATA equ 2 ;иконка для данных блока, не определенной структуры +ID_ICON_POINT equ 8 +ID_ICON_POINT_SEL equ 9 + +FILE_ERROR_CHUNK_SIZE equ -3 ;ошибка в размере блока + +include 'info_o3d.inc' + +align 4 +fl255 dd 255.0 +image_data dd 0 ;указатель на временную память, нужен для преобразования изображения +open_file_data dd 0 ;указатель на память для открытия файлов 3ds +open_file_size dd 0 ;размер открытого файла +open_b rb 560 + +; +main_wnd_height equ 460 ;высота главного окна программы +fn_toolbar db 'toolbar.png',0 +IMAGE_TOOLBAR_ICON_SIZE equ 16*16*3 +IMAGE_TOOLBAR_SIZE equ IMAGE_TOOLBAR_ICON_SIZE*12+54 +image_data_toolbar dd 0 +; +TREE_ICON_SYS16_BMP_SIZE equ IMAGE_TOOLBAR_ICON_SIZE*11+54 ;размер bmp файла с системными иконками +icon_tl_sys dd 0 ;указатеель на память для хранения системных иконок +icon_toolbar dd 0 ;указатеель на память для хранения иконок объектов +IMAGE_CHUNKS_SIZE equ IMAGE_TOOLBAR_ICON_SIZE*10+54 ;размер bmp файла с иконками объектов +; +IMAGE_FILE1_SIZE equ 128*144*3+54 ;размер файла с изображением + +macro load_image_file path,buf,size { ;макрос для загрузки изображений + ;path - может быть переменной или строковым параметром + if path eqtype '' ;проверяем задан ли строкой параметр path + jmp @f + local .path_str + .path_str db path ;формируем локальную переменную + db 0 + @@: + ;32 - стандартный адрес по которому должен быть буфер с системным путем + copy_path .path_str,[32],file_name,0 + else + copy_path path,[32],file_name,0 ;формируем полный путь к файлу изображения, подразумеваем что он в одной папке с программой + end if + + stdcall mem.Alloc, dword size ;выделяем память для изображения + mov [buf],eax + + mov [run_file_70.Function], SSF_READ_FILE + mov [run_file_70.Position], 0 + mov [run_file_70.Flags], 0 + mov [run_file_70.Count], dword size + mov [run_file_70.Buffer], eax + mov byte[run_file_70+20], 0 + mov [run_file_70.FileName], file_name + mcall SF_FILE,run_file_70 ;загружаем файл изображения + cmp ebx,0xffffffff + je @f + ;определяем вид изображения и переводим его во временный буфер image_data + stdcall dword[img_decode], dword[buf],ebx,0 + mov dword[image_data],eax + ;преобразуем изображение к формату rgb + stdcall dword[img_to_rgb2], dword[image_data],dword[buf] + ;удаляем временный буфер image_data + stdcall dword[img_destroy], dword[image_data] + @@: +} + +;-------------------------------------- +level_stack dd 0 +offs_last_timer dd 0 ;последний сдвиг показаный в функции таймера + +align 4 +file_3ds: ;переменные используемые при открытии файла +.offs: dd 0 ;+0 указатель на начало блока +.size: dd 0 ;+4 размер блока (для 1-го параметра = размер файла 3ds) +rb 8*MAX_FILE_LEVEL + +size_one_list equ 42+sizeof.obj_3d +list_offs_chunk_del equ 8 ;может ли блок удалятся +list_offs_chunk_lev equ 9 ;уровень блока (прописан в данные узла) +list_offs_p_data equ 10 ;указатель на подпись блока +list_offs_obj3d equ 14 ;указатель на структуру данных для 3d объекта +list_offs_text equ 14+sizeof.obj_3d ;сдвиг начала текста в листе +buffer rb size_one_list ;буфер для добавления структур в список tree1 + +txt_3ds_symb db 0,0 +;-------------------------------------- + + + +align 4 +start: + ;--- copy cmd line --- + mov esi,file_name + mov edi,openfile_path +@@: + lodsd + cmp eax,0 + je @f ;выход, если 0 + stosd + jmp @b +@@: + stosd + + load_libraries l_libs_start,l_libs_end + ;проверка на сколько удачно загузились библиотеки + mov ebp,lib_0 + .test_lib_open: + cmp dword [ebp+ll_struc_size-4],0 + jz @f + mcall SF_TERMINATE_PROCESS ;exit not correct + @@: + add ebp,ll_struc_size + cmp ebp,l_libs_end + jl .test_lib_open + mcall SF_STYLE_SETTINGS,SSF_GET_COLORS,sc,sizeof.sys_colors_new + mcall SF_SET_EVENTS_MASK,0x27 + + stdcall [OpenDialog_Init],OpenDialog_data ;подготовка диалога + + ;kmenu initialisation + stdcall [kmenu_init],sc + stdcall [ksubmenu_new] + mov [main_menu], eax + + stdcall [ksubmenu_new] + mov [main_menu_view], eax + stdcall [kmenuitem_new], KMENUITEM_NORMAL, sz_main_menu_Veiw_Vertexes, 10 + stdcall [ksubmenu_add], [main_menu_view], eax + stdcall [kmenuitem_new], KMENUITEM_NORMAL, sz_main_menu_Veiw_Faces, 6 + stdcall [ksubmenu_add], [main_menu_view], eax + stdcall [kmenuitem_new], KMENUITEM_NORMAL, sz_main_menu_Veiw_Faces_Fill, 7 + stdcall [ksubmenu_add], [main_menu_view], eax + stdcall [kmenuitem_new], KMENUITEM_NORMAL, sz_main_menu_Veiw_Light, 8 + stdcall [ksubmenu_add], [main_menu_view], eax + stdcall [kmenuitem_new], KMENUITEM_SEPARATOR, 0, 0 + stdcall [ksubmenu_add], [main_menu_view], eax + stdcall [kmenuitem_new], KMENUITEM_NORMAL, sz_main_menu_Veiw_Reset, 9 + stdcall [ksubmenu_add], [main_menu_view], eax + stdcall [kmenuitem_new], KMENUITEM_SUBMENU, sz_main_menu_View, [main_menu_view] + stdcall [ksubmenu_add], [main_menu], eax + + mov dword[w_scr_t1.type],1 + stdcall dword[tl_data_init], tree1 + ;системные иконки 16*16 для tree_list + load_image_file 'tl_sys_16.png', icon_tl_sys,TREE_ICON_SYS16_BMP_SIZE + ;если изображение не открылось, то в icon_tl_sys будут + ;не инициализированные данные, но ошибки не будет, т. к. буфер нужного размера + mov eax,dword[icon_tl_sys] + mov dword[tree1.data_img_sys],eax + + load_image_file 'objects.png', icon_toolbar,IMAGE_CHUNKS_SIZE + mov eax,dword[icon_toolbar] + mov dword[tree1.data_img],eax + + load_image_file 'font8x9.bmp', image_data_toolbar,IMAGE_FILE1_SIZE + stdcall [buf2d_create_f_img], buf_1,[image_data_toolbar] ;создаем буфер + stdcall mem.Free,[image_data_toolbar] ;освобождаем память + stdcall [buf2d_conv_24_to_8], buf_1,1 ;делаем буфер прозрачности 8 бит + stdcall [buf2d_convert_text_matrix], buf_1 + + load_image_file fn_toolbar, image_data_toolbar,IMAGE_TOOLBAR_SIZE + + ;работа с файлом настроек + copy_path ini_name,sys_path,file_name,0 + mov dword[def_dr_mode],0 + stdcall dword[ini_get_int],file_name,ini_sec_w3d,key_dv,1 + or eax,eax + jz @f + or dword[def_dr_mode], 1 shl bit_vertexes + @@: + stdcall dword[ini_get_int],file_name,ini_sec_w3d,key_df,1 + or eax,eax + jz @f + or dword[def_dr_mode], 1 shl bit_faces + @@: + stdcall dword[ini_get_int],file_name,ini_sec_w3d,key_dff,1 + or eax,eax + jz @f + or dword[def_dr_mode], 1 shl bit_faces_fill + @@: + stdcall dword[ini_get_int],file_name,ini_sec_w3d,key_dl,1 + or eax,eax + jz @f + or dword[def_dr_mode], 1 shl bit_light + @@: + stdcall dword[ini_get_color],file_name,ini_sec_w3d,key_ox,0x0000ff + mov [color_ox],eax + stdcall dword[ini_get_color],file_name,ini_sec_w3d,key_oy,0xff0000 + mov [color_oy],eax + stdcall dword[ini_get_color],file_name,ini_sec_w3d,key_oz,0x00ff00 + mov [color_oz],eax + stdcall dword[ini_get_color],file_name,ini_sec_w3d,key_bk,0x000000 + mov [color_bk],eax + shr eax,8 + mov [color_bk+4],eax + shr eax,8 + mov [color_bk+8],eax + stdcall dword[ini_get_color],file_name,ini_sec_w3d,key_vert,0xffffff + mov [color_vert],eax + stdcall dword[ini_get_color],file_name,ini_sec_w3d,key_face,0x808080 + mov [color_face],eax + stdcall dword[ini_get_color],file_name,ini_sec_w3d,key_select,0xffff00 + mov [color_select],eax + finit + fild dword[color_bk+8] + fdiv dword[fl255] + fstp dword[color_bk+8] + mov eax,[color_bk+4] + and eax,0xff + mov [color_bk+4],eax + fild dword[color_bk+4] + fdiv dword[fl255] + fstp dword[color_bk+4] + mov eax,[color_bk] + and eax,0xff + mov [color_bk],eax + fild dword[color_bk] + fdiv dword[fl255] + fstp dword[color_bk] + + mcall SF_SYSTEM_GET,SSF_TIME_COUNT + mov [last_time],eax + + stdcall [kosglMakeCurrent], 3d_wnd_l,3d_wnd_t,3d_wnd_w,3d_wnd_h,ctx1 + stdcall [glEnable], GL_DEPTH_TEST + stdcall [glEnable], GL_NORMALIZE ;делам нормали одинаковой величины во избежание артефактов + stdcall [glClearColor], [color_bk+8],[color_bk+4],[color_bk],0.0 + stdcall [glShadeModel], GL_SMOOTH + stdcall [gluNewQuadric] + mov [qObj],eax + + mov eax,dword[ctx1] ;eax -> TinyGLContext.GLContext + mov eax,[eax] ;eax -> ZBuffer + mov eax,[eax+offs_zbuf_pbuf] ;eax -> ZBuffer.pbuf + mov dword[buf_ogl],eax + + ;open file from cmd line + cmp dword[openfile_path],0 + je @f + call but_open_file.no_dlg + @@: + call draw_window + +align 4 +still: + mcall SF_SYSTEM_GET,SSF_TIME_COUNT + mov ebx,[last_time] + add ebx,10 ;задержка + cmp ebx,eax + jge @f + mov ebx,eax + @@: + sub ebx,eax + mcall SF_WAIT_EVENT_TIMEOUT + cmp eax,0 + je timer_funct + + cmp al,1 + jne @f + call draw_window + jmp still + @@: + cmp al,2 + jz key + cmp al,3 + jz button + cmp al,6 + jne @f + mcall SF_THREAD_INFO,procinfo,-1 + cmp ax,word[procinfo+4] + jne @f ;окно не активно + call mouse + @@: + jmp still + +align 4 +mouse: + push eax ebx + mcall SF_MOUSE_GET,SSF_BUTTON_EXT + bt eax,0 + jnc .end_m + ;mouse l. but. move + cmp dword[mouse_drag],1 + jne .end_m + mcall SF_MOUSE_GET,SSF_WINDOW_POSITION + mov ebx,eax + shr ebx,16 ;mouse.x + cmp ebx,3d_wnd_l + jg @f + mov ebx,3d_wnd_l + @@: + sub ebx,3d_wnd_l + cmp ebx,3d_wnd_w + jle @f + mov ebx,3d_wnd_w + @@: + and eax,0xffff ;mouse.y + cmp eax,3d_wnd_t + jg @f + mov eax,3d_wnd_t + @@: + sub eax,3d_wnd_t + cmp eax,3d_wnd_h + jle @f + mov eax,3d_wnd_h + @@: + finit + fild dword[mouse_y] + mov [mouse_y],eax + fisub dword[mouse_y] + fdiv dword[angle_dxm] ;если курсор движется по оси y (вверх или вниз) то поворот делаем вокруг оси x + fadd dword[angle_x] + fstp dword[angle_x] + + fild dword[mouse_x] + mov [mouse_x],ebx + fisub dword[mouse_x] + fdiv dword[angle_dym] ;если курсор движется по оси x (вверх или вниз) то поворот делаем вокруг оси y + fadd dword[angle_y] + fstp dword[angle_y] + + stdcall [tl_node_get_data],tree1 + cmp eax,0 + je .end_d + add eax,list_offs_obj3d + stdcall draw_3d, eax + jmp .end_d + .end_m: + bt eax,16 + jnc @f + ;mouse l. but. up + mov dword[mouse_drag],0 + jmp .end_d + @@: + bt eax,8 + jnc .end_d + ;mouse l. but. press + mcall SF_MOUSE_GET,SSF_WINDOW_POSITION + mov ebx,eax + shr ebx,16 ;mouse.x + cmp ebx,3d_wnd_l + jl .end_d + sub ebx,3d_wnd_l + cmp ebx,3d_wnd_w + jg .end_d + and eax,0xffff ;mouse.y + cmp eax,3d_wnd_t + jl .end_d + sub eax,3d_wnd_t + cmp eax,3d_wnd_h + jg .end_d + mov dword[mouse_drag],1 + mov dword[mouse_x],ebx + mov dword[mouse_y],eax + .end_d: + + stdcall [tl_mouse], dword tree1 + stdcall [kmainmenu_dispatch_cursorevent], [main_menu] + pop ebx eax + ret + +align 4 +timer_funct: + pushad + mcall SF_SYSTEM_GET,SSF_TIME_COUNT + mov [last_time],eax + + ;просматриваем выделенный блок данных + stdcall [tl_node_get_data],tree1 + cmp eax,0 + je .end_f + mov edi,eax + add edi,list_offs_obj3d + mov ebx,eax + mov eax,dword[ebx] ;получаем значение сдвига выбранного блока относительно начала файла + mov ecx,dword[ebx+4] ;размер блока + stdcall hex_in_str, txt_3ds_offs.dig, eax,8 + stdcall hex_in_str, txt_3ds_offs.siz, ecx,8 + + add eax,dword[open_file_data] ;получаем значение сдвига в памяти + cmp dword[offs_last_timer],eax + je .end_f + ;если выделенный блок данных не совпадает с последним запомненным + mov dword[offs_last_timer],eax + + cmp word[eax],CHUNK_OBJBLOCK + jne .end_oblo + 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+offs_obj_poi_count],2 + jl .end_f + call mnu_reset_settings ;сброс углов поворота и режимов рисования + jmp .end_f + .end_oblo: + call buf_draw_beg + stdcall [buf2d_draw_text], buf_ogl, buf_1,txt_3ds_offs,5,35,0xb000 + mov edx,dword[ebx+list_offs_p_data] + cmp edx,0 ;смотрим есть ли описание блока + je .no_info + stdcall [buf2d_draw_text], buf_ogl, buf_1,edx,5,45,0xb000 + .no_info: + stdcall [buf2d_draw], buf_ogl ;обновляем буфер на экране + .end_f: + popad + jmp still + +align 4 +buf_draw_beg: + stdcall [buf2d_clear], buf_ogl, [buf_ogl.color] ;чистим буфер + stdcall [buf2d_draw_text], buf_ogl, buf_1,txt_open_3ds,5,5,0xff + stdcall [buf2d_draw_text], buf_ogl, buf_1,openfile_path,5,15,0xff + cmp dword[level_stack],FILE_ERROR_CHUNK_SIZE ;возможна ошибка файла + jne @f + stdcall [buf2d_draw_text], buf_ogl, buf_1,txt_3ds_err_sizes,5,25,0xff0000 + @@: + ret + +align 4 +draw_window: +pushad + mcall SF_REDRAW,SSF_BEGIN_DRAW + mov edx,[sc.work] + or edx,0x33000000 + mcall SF_CREATE_WINDOW, (20 shl 16)+560, (20 shl 16)+main_wnd_height,,, capt + + mcall SF_THREAD_INFO,procinfo,-1 + mov eax,dword[procinfo.box.height] + cmp eax,250 + jge @f + mov eax,250 + @@: + sub eax,30 + sub eax,[tree1.box_top] + mov [tree1.box_height],eax + mov word[w_scr_t1.y_size],ax ;новые размеры скроллинга + + stdcall [kmainmenu_draw], [main_menu] + + mov esi,[sc.work_button] + mcall SF_DEFINE_BUTTON,(5 shl 16)+20,(24 shl 16)+20,3 + mcall ,(30 shl 16)+20,,4 ;open + mcall ,(3d_wnd_l shl 16)+20,,5 ;вершины вкл./выкл. + mcall ,((3d_wnd_l+25) shl 16)+20,,6 ;грани вкл./выкл. + mcall ,((3d_wnd_l+50) shl 16)+20,,7 ;заливка граней вкл./выкл. + mcall ,((3d_wnd_l+75) shl 16)+20,,8 ;свет вкл./выкл. + mcall ,((3d_wnd_l+100) shl 16)+20,,9 ;сброс + + mcall SF_PUT_IMAGE,[image_data_toolbar],(16 shl 16)+16,(7 shl 16)+26 ;new + add ebx,IMAGE_TOOLBAR_ICON_SIZE + mcall ,,,(32 shl 16)+26 ;open + add ebx,IMAGE_TOOLBAR_ICON_SIZE*6 + mcall ,,,((3d_wnd_l+2) shl 16)+26 ;вершины вкл./выкл. + add ebx,IMAGE_TOOLBAR_ICON_SIZE + mcall ,,,((3d_wnd_l+27) shl 16)+26 ;грани вкл./выкл. + add ebx,IMAGE_TOOLBAR_ICON_SIZE + mcall ,,,((3d_wnd_l+52) shl 16)+26 ;заливка граней вкл./выкл. + add ebx,IMAGE_TOOLBAR_ICON_SIZE + mcall ,,,((3d_wnd_l+77) shl 16)+26 ;свет вкл./выкл. + add ebx,IMAGE_TOOLBAR_ICON_SIZE + mcall ,,,((3d_wnd_l+102) shl 16)+26 ;сброс + + mov dword[w_scr_t1.all_redraw],1 + stdcall [tl_draw], tree1 + stdcall [buf2d_draw], buf_ogl + + mcall SF_REDRAW,SSF_END_DRAW +popad + ret + +align 4 +key: + mcall SF_GET_KEY + + cmp dword[el_focus], tree1 + jne @f + stdcall [tl_key], tree1 + jmp .end + @@: + + cmp ah,178 ;Up + jne @f + fld dword[angle_x] + fadd dword[delt_size] + fstp dword[angle_x] + stdcall [tl_node_get_data],tree1 + cmp eax,0 + je .end + add eax,list_offs_obj3d + stdcall draw_3d, eax + jmp .end + @@: + cmp ah,177 ;Down + jne @f + fld dword[angle_x] + fsub dword[delt_size] + fstp dword[angle_x] + stdcall [tl_node_get_data],tree1 + cmp eax,0 + je .end + add eax,list_offs_obj3d + stdcall draw_3d, eax + jmp .end + @@: + cmp ah,176 ;Left + jne @f + fld dword[angle_y] + fadd dword[delt_size] + fstp dword[angle_y] + stdcall [tl_node_get_data],tree1 + cmp eax,0 + je .end + add eax,list_offs_obj3d + stdcall draw_3d, eax + jmp .end + @@: + cmp ah,179 ;Right + jne @f + fld dword[angle_y] + fsub dword[delt_size] + fstp dword[angle_y] + stdcall [tl_node_get_data],tree1 + cmp eax,0 + je .end + add eax,list_offs_obj3d + stdcall draw_3d, eax + ;jmp .end + @@: + + .end: + jmp still + + +align 4 +button: + mcall SF_GET_BUTTON + cmp ah,3 + jne @f + call but_new_file + jmp still + @@: + cmp ah,4 + jne @f + call but_open_file + jmp still + @@: + + ;menu functions + cmp ah,5 + jne @f + call mnu_vertexes_on + jmp still + @@: + cmp ah,6 + jne @f + call mnu_edges_on + jmp still + @@: + cmp ah,7 + jne @f + call mnu_faces_on + jmp still + @@: + cmp ah,8 + jne @f + call mnu_light_on_off + jmp still + @@: + cmp ah,9 + jne @f + call mnu_reset_settings + jmp still + @@: + + cmp ah,1 + jne still +.exit: + mov dword[tree1.data_img],0 + mov dword[tree1.data_img_sys],0 + stdcall [tl_data_clear], tree1 + stdcall [buf2d_delete],buf_1 ;удаляем буфер + stdcall mem.Free,[image_data_toolbar] + stdcall mem.Free,[open_file_data] + stdcall [gluDeleteQuadric], [qObj] + mcall SF_TERMINATE_PROCESS + + +align 4 +but_new_file: +push eax ebx + stdcall dword[tl_node_poi_get_info], tree1,0 + @@: + cmp eax,0 + je @f + mov ebx,eax + stdcall [tl_node_poi_get_data], tree1,ebx + add eax,list_offs_obj3d + stdcall obj_clear_param, eax + stdcall dword[tl_node_poi_get_next_info], tree1,ebx + cmp eax,0 + jne @b + @@: +pop ebx eax + stdcall [tl_info_clear], tree1 ;очистка списка объектов + stdcall [buf2d_clear], buf_ogl, [buf_ogl.color] ;чистим буфер + stdcall [tl_draw], tree1 + stdcall [buf2d_draw], buf_ogl ;обновляем буфер на экране + ret + +align 4 +but_open_file: + copy_path open_dialog_name,communication_area_default_path,file_name,0 + pushad + mov [OpenDialog_data.type],0 + stdcall [OpenDialog_Start],OpenDialog_data + cmp [OpenDialog_data.status],2 + je .end_open_file + ;код при удачном открытии диалога + jmp @f +.no_dlg: ;если минуем диалог открытия файла + pushad + @@: + mov [run_file_70.Function], SSF_GET_INFO + mov [run_file_70.Position], 0 + mov [run_file_70.Flags], 0 + mov dword[run_file_70.Count], 0 + mov dword[run_file_70.Buffer], open_b + mov byte[run_file_70+20], 0 + mov dword[run_file_70.FileName], openfile_path + mcall SF_FILE,run_file_70 + + mov ecx,dword[open_b+32] ;+32 qword: размер файла в байтах + stdcall mem.ReAlloc,[open_file_data],ecx + mov [open_file_data],eax + + mov [run_file_70.Function], SSF_READ_FILE + mov [run_file_70.Position], 0 + mov [run_file_70.Flags], 0 + mov dword[run_file_70.Count], ecx + m2m dword[run_file_70.Buffer], dword[open_file_data] + mov byte[run_file_70+20], 0 + mov dword[run_file_70.FileName], openfile_path + mcall SF_FILE,run_file_70 ;загружаем файл 3ds + cmp ebx,0xffffffff + je .end_open_file + mov [open_file_size],ebx + ;mcall SF_SET_CAPTION,1,openfile_path + + call init_tree + stdcall [buf2d_draw], buf_ogl ;обновляем буфер на экране + .end_open_file: + popad + ret + +align 4 +init_tree: + ;чистим память занятую объектами + stdcall dword[tl_node_poi_get_info], tree1,0 + @@: + cmp eax,0 + je @f + mov ebx,eax + stdcall [tl_node_poi_get_data], tree1,ebx + cmp eax,0 + je @f + add eax,list_offs_obj3d + stdcall obj_clear_param, eax + stdcall dword[tl_node_poi_get_next_info], tree1,ebx + cmp eax,0 + jne @b + @@: + stdcall [tl_info_clear], tree1 ;очистка списка объектов + + mov esi,dword[open_file_data] + cmp word[esi],CHUNK_MAIN + je @f + call buf_draw_beg + stdcall [buf2d_draw_text], buf_ogl, buf_1,txt_no_3ds,5,25,0xff0000 ;рисуем строку с текстом + jmp .end_open + @@: + ;--- обработка открытого *.3ds файла + mov eax,file_3ds + mov dword[level_stack],0 ;обнуляем уровень стека + mov dword[offs_last_timer],0 + ;--- добавление главного блока в список + stdcall add_3ds_object, ID_ICON_CHUNK_MAIN,0,dword[esi+2],0 + call block_children ;вход в дочерний блок + + mov edi,dword[file_3ds.offs] + add edi,dword[file_3ds.size] + .cycle_main: + cmp dword[level_stack],0 + jle .end_cycle + + cmp esi,edi ;если конец файла + jge .end_cycle + + mov edx,dword[esi+2] ;размер блока + call block_analiz +;cmp word[esi],CHUNK_MATERIAL +;je @f +cmp word[esi],CHUNK_OBJMESH +je @f +cmp word[esi],CHUNK_OBJBLOCK +je @f +mov dword[bl_found],0 +@@: + cmp dword[bl_found],0 + jne @f + ;объект не известного вида + call block_next + jmp .cycle_main + @@: + ;объект известного вида + mov ecx,dword[bl_found] + mov bx,word[ecx+2] ;номер иконки для объекта + cmp word[esi],CHUNK_OBJBLOCK + jne .pod1 + add esi,6 + push esi + sub esi,6 + jmp .pod2 + .pod1: + push dword[ecx+5] ;стандартное название блока + .pod2: + stdcall add_3ds_object, ebx,dword[level_stack],edx + cmp byte[ecx+4],1 + je .bl_data + ;блок содержит дочерние блоки + call block_children ;вход в дочерний блок + jmp .cycle_main + .bl_data: + ;блок содержит данные + call block_analiz_data + jmp .cycle_main + .end_cycle: + stdcall [tl_cur_beg], tree1 + stdcall [tl_draw], tree1 + .end_open: + ret + +;анализ данных блока +;input: +; esi - memory pointer +;output: +; eax - new stack pointer +; esi - new memory pointer +align 4 +proc block_analiz_data uses ebx ecx edx edi + mov dx,word[esi] + mov ecx,dword[esi+2] + sub ecx,6 ;размер данных в блоке + add esi,6 + mov ebx,dword[level_stack] + inc ebx + ; *** анализ блоков с разными данными и выделением подблоков + cmp dx,CHUNK_OBJBLOCK ;объект + jne @f + push ax + cld + xor al,al + mov edi,esi + repne scasb + pop ax + sub edi,esi ;edi - strlen + add esi,edi + ;sub ecx,edi ;уже сделано в repne + jmp .next_bl + @@: + cmp dx,CHUNK_VERTLIST ;список вершин + je .vertexes + cmp dx,0x4111 ;флаги вершин + je .vertexes + cmp dx,CHUNK_MAPLIST ;текстурные координаты + je .vertexes + jmp @f + .vertexes: ;обработка блоков, содержащих данные вершин + add esi,2 + sub ecx,2 + sub esi,8 ;восстановление esi + call block_next + jmp .end_f + @@: + cmp dx,CHUNK_FACELIST ;список граней + jne @f + push eax + movzx eax,word[esi] + shl eax,3 + add esi,2 + sub ecx,2 + + sub ecx,eax + cmp ecx,1 + jl .data_3 ;проверяем есть ли блок описывающий материал, применяемый к объекту + add esi,eax + pop eax + jmp .next_bl + .data_3: + + sub esi,8 ;восстановление esi + pop eax + call block_next + jmp .end_f + @@: + cmp dx,CHUNK_FACEMAT ;материалы граней + jne @f + push ax + cld + xor al,al + mov edi,esi + repne scasb + pop ax + sub edi,esi ;edi - strlen + stdcall add_3ds_object, ID_ICON_DATA,ebx,edi,0 ;название объекта + add esi,edi + add esi,2 + sub ecx,2 + sub esi,edi ;восстановление esi (1) + sub esi,8 ;восстановление esi (2) + call block_next + jmp .end_f + @@: + ; *** анализ блока с данными по умолчанию (без выделения подблоков) + sub esi,6 ;восстановление esi + call block_next + jmp .end_f + .next_bl: + ; *** настройки для анализа оставшихся подблоков + mov dword[eax],esi ;указатель на начало блока + mov ebx,dword[esi+2] + mov dword[eax+4],ebx ;размер блока + inc dword[level_stack] + add eax,8 + .end_f: + ret +endp + +;вход в 1-й дочерний блок +;input: +; eax - указатель на временный стек файла file_3ds +; esi - начало родительского блока +;output: +; ebx - destroy +; esi - начало данных родительского блока +align 4 +block_children: + push ecx + ;проверка правильности размеров дочернего блока + mov ebx,esi + add ebx,6 ;переход на начало дочернего блока + add ebx,dword[ebx+2] ;добавляем размер дочернего блока + mov ecx,esi + add ecx,dword[esi+2] ;добавляем размер родительского блока + cmp ebx,ecx ;учитывать заголовки не нужно, т. к. сравниваются только данные блоков + jle @f + ;диагностировали ошибку файла, дочерний блок выходит за пределы родительского + mov dword[level_stack],FILE_ERROR_CHUNK_SIZE + jmp .end_f + @@: + mov dword[eax],esi ;указатель на начало блока + mov ebx,dword[esi+2] + mov dword[eax+4],ebx ;размер блока + add esi,6 ;переходим к данным блока + inc dword[level_stack] + add eax,8 + .end_f: + pop ecx + ret + +;переход к следущему блоку текущего уровня +;input: +; eax - адрес структуры с переменными +align 4 +block_next: +push ebx + add esi,dword[esi+2] ;пропускаем данные блока + + ;проверка размеров родительского блока, для возможного выхода на верхний уровень если конец блока + @@: + mov ebx,dword[eax-8] + add ebx,dword[eax-4] + cmp esi,ebx + jl @f + dec dword[level_stack] + sub eax,8 + cmp dword[level_stack],0 + jg @b + @@: +pop ebx + ret + +;функция поиска структуры описывающей блок +;input: +;esi - memory pointer +;output: +;dword[bl_found] - pointer to chunk struct (= 0 if not found) +align 4 +bl_found dd 0 +block_analiz: +pushad + mov dword[bl_found],0 + mov ecx,type_bloks + @@: + mov bx,word[ecx] + cmp word[esi],bx + je .found + add ecx,sizeof.block_3ds + cmp ecx,type_bloks.end + jl @b + jmp .no_found + .found: + mov dword[bl_found],ecx + .no_found: +popad + ret + +;input: +; esi - указатель на анализируемые данные +; level - уровень вложенности узла +; size_bl - размер блока +align 4 +proc add_3ds_object, icon:dword,level:dword,size_bl:dword,info_bl:dword + pushad + mov bx,word[icon] + shl ebx,16 + mov bx,word[level] + + mov eax,esi + sub eax,dword[open_file_data] + mov dword[buffer],eax ;смещение блока + mov ecx,dword[size_bl] + mov dword[buffer+4],ecx ;размер блока (используется в функции buf_draw_hex_table для рисования линии) + mov ecx,dword[bl_found] + cmp ecx,0 + je @f + ;... здесь нужен другой алгоритм защиты от удаления + mov cl,byte[ecx+4] + @@: + mov byte[buffer+list_offs_chunk_del],cl + mov ecx,[level] + mov byte[buffer+list_offs_chunk_lev],cl + mov ecx,dword[info_bl] + mov dword[buffer+list_offs_p_data],ecx + stdcall hex_in_str, buffer+list_offs_text,dword[esi+1],2 + stdcall hex_in_str, buffer+list_offs_text+2,dword[esi],2 ;код 3ds блока + cmp ecx,0 + jne @f + mov byte[buffer+list_offs_text+4],0 ;0 - символ конца строки + jmp .no_capt + @@: + mov byte[buffer+list_offs_text+4],' ' + mov esi,ecx + mov edi,buffer+list_offs_text+5 + mov ecx,size_one_list-(list_offs_text+5) + cld + rep movsb + mov byte[buffer+size_one_list-1],0 ;0 - символ конца строки + .no_capt: + mov ecx,(sizeof.obj_3d)/4 + xor eax,eax + mov edi,buffer + add edi,list_offs_obj3d + rep stosd + stdcall [tl_node_add], tree1, ebx, buffer + stdcall [tl_cur_next], tree1 + popad + ret +endp + +;input: +; eax - value +; buf - string buffer +; len - buffer len +;output: +align 4 +proc convert_int_to_str, buf:dword, len:dword +pushad + mov edi,[buf] + mov esi,[len] + add esi,edi + dec esi + call .str +popad + ret +endp + +align 4 +.str: + mov ecx,0x0a + cmp eax,ecx + jb @f + xor edx,edx + div ecx + push edx + call .str + pop eax + @@: + cmp edi,esi + jge @f + or al,0x30 + stosb + mov byte[edi],0 + @@: + ret + +align 4 +proc hex_in_str, buf:dword,val:dword,zif:dword + pushad + mov edi,dword[buf] + mov ecx,dword[zif] + add edi,ecx + dec edi + mov ebx,dword[val] + + .cycle: + mov al,bl + and al,0xf + cmp al,10 + jl @f + add al,'a'-'0'-10 + @@: + add al,'0' + mov byte[edi],al + dec edi + shr ebx,4 + loop .cycle + popad + ret +endp + +;данные для диалога открытия файлов +align 4 +OpenDialog_data: +.type dd 0 ;0 - открыть, 1 - сохранить, 2 - выбрать дтректорию +.procinfo dd procinfo ;+4 +.com_area_name dd communication_area_name ;+8 +.com_area dd 0 ;+12 +.opendir_path dd plugin_path ;+16 +.dir_default_path dd default_dir ;+20 +.start_path dd file_name ;+24 путь к диалогу открытия файлов +.draw_window dd draw_window ;+28 +.status dd 0 ;+32 +.openfile_path dd openfile_path ;+36 путь к открываемому файлу +.filename_area dd filename_area ;+40 +.filter_area dd Filter +.x: +.x_size dw 420 ;+48 ; Window X size +.x_start dw 10 ;+50 ; Window X position +.y: +.y_size dw 320 ;+52 ; Window y size +.y_start dw 10 ;+54 ; Window Y position + +default_dir db '/rd/1',0 + +communication_area_name: + db 'FFFFFFFF_open_dialog',0 +open_dialog_name: + db 'opendial',0 +communication_area_default_path: + db '/rd/1/File managers/',0 + +Filter: +dd Filter.end - Filter.1 +.1: +db '3DS',0 +db 'TXT',0 +.end: +db 0 + + +align 4 +system_dir_0 db '/sys/lib/' +lib_name_0 db 'proc_lib.obj',0 +system_dir_1 db '/sys/lib/' +lib_name_1 db 'libimg.obj',0 +system_dir_2 db '/sys/lib/' +lib_name_2 db 'box_lib.obj',0 +system_dir_3 db '/sys/lib/' +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/' +lib_name_5 db 'tinygl.obj',0 +system_dir_6 db '/sys/lib/' +lib_name_6 db 'libini.obj',0 + +if lang eq ru + head_f_i: + head_f_l db 'Системная ошибка',0 + err_msg_found_lib_0 db 'Не найдена библиотека ',39,'proc_lib.obj',39,0 + err_msg_import_0 db 'Ошибка при импорте библиотеки ',39,'proc_lib.obj',39,0 + err_msg_found_lib_1 db 'Не найдена библиотека ',39,'libimg.obj',39,0 + err_msg_import_1 db 'Ошибка при импорте библиотеки ',39,'libimg.obj',39,0 + err_msg_found_lib_2 db 'Не найдена библиотека ',39,'box_lib.obj',39,0 + err_msg_import_2 db 'Ошибка при импорте библиотеки ',39,'box_lib',39,0 + err_msg_found_lib_3 db 'Не найдена библиотека ',39,'buf2d.obj',39,0 + err_msg_import_3 db 'Ошибка при импорте библиотеки ',39,'buf2d',39,0 + err_msg_found_lib_4 db 'Не найдена библиотека ',39,'kmenu.obj',39,0 + err_msg_import_4 db 'Ошибка при импорте библиотеки ',39,'kmenu',39,0 + err_msg_found_lib_5 db 'Не найдена библиотека ',39,'tinygl.obj',39,0 + err_msg_import_5 db 'Ошибка при импорте библиотеки ',39,'tinygl',39,0 + err_msg_found_lib_6 db 'Не найдена библиотека ',39,'libini.obj',39,0 + err_msg_import_6 db 'Ошибка при импорте библиотеки ',39,'libini',39,0 +else + head_f_i: + head_f_l db 'System error',0 + err_msg_found_lib_0 db 'Sorry I cannot found library ',39,'proc_lib.obj',39,0 + err_msg_import_0 db 'Error on load import library ',39,'proc_lib.obj',39,0 + err_msg_found_lib_1 db 'Sorry I cannot found library ',39,'libimg.obj',39,0 + err_msg_import_1 db 'Error on load import library ',39,'libimg.obj',39,0 + err_msg_found_lib_2 db 'Sorry I cannot found library ',39,'box_lib.obj',39,0 + err_msg_import_2 db 'Error on load import library ',39,'box_lib.obj',39,0 + err_msg_found_lib_3 db 'Sorry I cannot found library ',39,'buf2d.obj',39,0 + err_msg_import_3 db 'Error on load import library ',39,'buf2d.obj',39,0 + err_msg_found_lib_4 db 'Sorry I cannot found library ',39,'kmenu.obj',39,0 + err_msg_import_4 db 'Error on load import library ',39,'kmenu.obj',39,0 + err_msg_found_lib_5 db 'Sorry I cannot found library ',39,'tinygl.obj',39,0 + err_msg_import_5 db 'Error on load import library ',39,'tinygl',39,0 + err_msg_found_lib_6 db 'Sorry I cannot found library ',39,'libini.obj',39,0 + err_msg_import_6 db 'Error on load import library ',39,'libini',39,0 +end if + +align 4 +l_libs_start: + lib_0 l_libs lib_name_0, sys_path, file_name, system_dir_0,\ + err_msg_found_lib_0, head_f_l, proclib_import,err_msg_import_0, head_f_i + lib_1 l_libs lib_name_1, sys_path, file_name, system_dir_1,\ + err_msg_found_lib_1, head_f_l, import_libimg, err_msg_import_1, head_f_i + lib_2 l_libs lib_name_2, sys_path, library_path, system_dir_2,\ + err_msg_found_lib_2, head_f_l, import_box_lib,err_msg_import_2,head_f_i + lib_3 l_libs lib_name_3, sys_path, library_path, system_dir_3,\ + err_msg_found_lib_3, head_f_l, import_buf2d, err_msg_import_3,head_f_i + lib_4 l_libs lib_name_4, sys_path, library_path, system_dir_4,\ + err_msg_found_lib_4, head_f_l, import_libkmenu,err_msg_import_4,head_f_i + lib_5 l_libs lib_name_5, sys_path, library_path, system_dir_5,\ + err_msg_found_lib_5, head_f_l, import_lib_tinygl,err_msg_import_5,head_f_i + lib_6 l_libs lib_name_6, sys_path, library_path, system_dir_6,\ + err_msg_found_lib_6, head_f_l, import_libini, err_msg_import_6,head_f_i +l_libs_end: + +align 4 +import_libimg: + dd alib_init1 + img_is_img dd aimg_is_img + img_info dd aimg_info + img_from_file dd aimg_from_file + img_to_file dd aimg_to_file + img_from_rgb dd aimg_from_rgb + img_to_rgb dd aimg_to_rgb + img_to_rgb2 dd aimg_to_rgb2 + img_decode dd aimg_decode + img_encode dd aimg_encode + img_create dd aimg_create + img_destroy dd aimg_destroy + img_destroy_layer dd aimg_destroy_layer + img_count dd aimg_count + img_lock_bits dd aimg_lock_bits + img_unlock_bits dd aimg_unlock_bits + img_flip dd aimg_flip + img_flip_layer dd aimg_flip_layer + img_rotate dd aimg_rotate + img_rotate_layer dd aimg_rotate_layer + img_draw dd aimg_draw + + dd 0,0 + alib_init1 db 'lib_init',0 + aimg_is_img db 'img_is_img',0 ;определяет по данным, может ли библиотека сделать из них изображение + aimg_info db 'img_info',0 + aimg_from_file db 'img_from_file',0 + aimg_to_file db 'img_to_file',0 + aimg_from_rgb db 'img_from_rgb',0 + aimg_to_rgb db 'img_to_rgb',0 ;преобразование изображения в данные RGB + aimg_to_rgb2 db 'img_to_rgb2',0 + aimg_decode db 'img_decode',0 ;автоматически определяет формат графических данных + aimg_encode db 'img_encode',0 + aimg_create db 'img_create',0 + aimg_destroy db 'img_destroy',0 + aimg_destroy_layer db 'img_destroy_layer',0 + aimg_count db 'img_count',0 + aimg_lock_bits db 'img_lock_bits',0 + aimg_unlock_bits db 'img_unlock_bits',0 + aimg_flip db 'img_flip',0 + aimg_flip_layer db 'img_flip_layer',0 + aimg_rotate db 'img_rotate',0 + aimg_rotate_layer db 'img_rotate_layer',0 + aimg_draw db 'img_draw',0 + +align 4 +proclib_import: ;описание экспортируемых функций + OpenDialog_Init dd aOpenDialog_Init + OpenDialog_Start dd aOpenDialog_Start +dd 0,0 + aOpenDialog_Init db 'OpenDialog_init',0 + aOpenDialog_Start db 'OpenDialog_start',0 + +align 4 +import_buf2d: + dd sz_init0 + buf2d_create dd sz_buf2d_create + buf2d_create_f_img dd sz_buf2d_create_f_img + buf2d_clear dd sz_buf2d_clear + buf2d_draw dd sz_buf2d_draw + buf2d_delete dd sz_buf2d_delete + buf2d_resize dd sz_buf2d_resize + buf2d_line dd sz_buf2d_line + buf2d_rect_by_size dd sz_buf2d_rect_by_size + buf2d_filled_rect_by_size dd sz_buf2d_filled_rect_by_size + buf2d_circle dd sz_buf2d_circle + buf2d_img_hdiv2 dd sz_buf2d_img_hdiv2 + buf2d_img_wdiv2 dd sz_buf2d_img_wdiv2 + buf2d_conv_24_to_8 dd sz_buf2d_conv_24_to_8 + buf2d_conv_24_to_32 dd sz_buf2d_conv_24_to_32 + buf2d_bit_blt dd sz_buf2d_bit_blt + buf2d_bit_blt_transp dd sz_buf2d_bit_blt_transp + buf2d_bit_blt_alpha dd sz_buf2d_bit_blt_alpha + buf2d_convert_text_matrix dd sz_buf2d_convert_text_matrix + buf2d_draw_text dd sz_buf2d_draw_text + buf2d_crop_color dd sz_buf2d_crop_color + buf2d_offset_h dd sz_buf2d_offset_h + buf2d_set_pixel dd sz_buf2d_set_pixel + dd 0,0 + sz_init0 db 'lib_init',0 + sz_buf2d_create db 'buf2d_create',0 + sz_buf2d_create_f_img db 'buf2d_create_f_img',0 + sz_buf2d_clear db 'buf2d_clear',0 + sz_buf2d_draw db 'buf2d_draw',0 + sz_buf2d_delete db 'buf2d_delete',0 + sz_buf2d_resize db 'buf2d_resize',0 + sz_buf2d_line db 'buf2d_line',0 + sz_buf2d_rect_by_size db 'buf2d_rect_by_size',0 + sz_buf2d_filled_rect_by_size db 'buf2d_filled_rect_by_size',0 + sz_buf2d_circle db 'buf2d_circle',0 + sz_buf2d_img_hdiv2 db 'buf2d_img_hdiv2',0 + sz_buf2d_img_wdiv2 db 'buf2d_img_wdiv2',0 + sz_buf2d_conv_24_to_8 db 'buf2d_conv_24_to_8',0 + sz_buf2d_conv_24_to_32 db 'buf2d_conv_24_to_32',0 + sz_buf2d_bit_blt db 'buf2d_bit_blt',0 + sz_buf2d_bit_blt_transp db 'buf2d_bit_blt_transp',0 + sz_buf2d_bit_blt_alpha db 'buf2d_bit_blt_alpha',0 + sz_buf2d_convert_text_matrix db 'buf2d_convert_text_matrix',0 + sz_buf2d_draw_text db 'buf2d_draw_text',0 + sz_buf2d_crop_color db 'buf2d_crop_color',0 + sz_buf2d_offset_h db 'buf2d_offset_h',0 + sz_buf2d_set_pixel db 'buf2d_set_pixel',0 + +align 4 +import_box_lib: + dd sz_init1 + edit_box_draw dd sz_edit_box_draw + edit_box_key dd sz_edit_box_key + edit_box_mouse dd sz_edit_box_mouse + edit_box_set_text dd sz_edit_box_set_text + scrollbar_ver_draw dd sz_scrollbar_ver_draw + scrollbar_hor_draw dd sz_scrollbar_hor_draw + + tl_data_init dd sz_tl_data_init + tl_data_clear dd sz_tl_data_clear + tl_info_clear dd sz_tl_info_clear + tl_key dd sz_tl_key + tl_mouse dd sz_tl_mouse + tl_draw dd sz_tl_draw + tl_info_undo dd sz_tl_info_undo + tl_info_redo dd sz_tl_info_redo + tl_node_add dd sz_tl_node_add + tl_node_set_data dd sz_tl_node_set_data + tl_node_get_data dd sz_tl_node_get_data + tl_node_delete dd sz_tl_node_delete + tl_node_move_up dd sz_tl_node_move_up + tl_node_move_down dd sz_tl_node_move_down + tl_cur_beg dd sz_tl_cur_beg + tl_cur_next dd sz_tl_cur_next + tl_cur_perv dd sz_tl_cur_perv + tl_node_close_open dd sz_tl_node_close_open + tl_node_lev_inc dd sz_tl_node_lev_inc + tl_node_lev_dec dd sz_tl_node_lev_dec + tl_node_poi_get_info dd sz_tl_node_poi_get_info + tl_node_poi_get_next_info dd sz_tl_node_poi_get_next_info + tl_node_poi_get_data dd sz_tl_node_poi_get_data + + dd 0,0 + sz_init1 db 'lib_init',0 + sz_edit_box_draw db 'edit_box',0 + sz_edit_box_key db 'edit_box_key',0 + sz_edit_box_mouse db 'edit_box_mouse',0 + sz_edit_box_set_text db 'edit_box_set_text',0 + sz_scrollbar_ver_draw db 'scrollbar_v_draw',0 + sz_scrollbar_hor_draw db 'scrollbar_h_draw',0 + + sz_tl_data_init db 'tl_data_init',0 + sz_tl_data_clear db 'tl_data_clear',0 + sz_tl_info_clear db 'tl_info_clear',0 + sz_tl_key db 'tl_key',0 + sz_tl_mouse db 'tl_mouse',0 + sz_tl_draw db 'tl_draw',0 + sz_tl_info_undo db 'tl_info_undo',0 + sz_tl_info_redo db 'tl_info_redo',0 + sz_tl_node_add db 'tl_node_add',0 + sz_tl_node_set_data db 'tl_node_set_data',0 + sz_tl_node_get_data db 'tl_node_get_data',0 + sz_tl_node_delete db 'tl_node_delete',0 + sz_tl_node_move_up db 'tl_node_move_up',0 + sz_tl_node_move_down db 'tl_node_move_down',0 + sz_tl_cur_beg db 'tl_cur_beg',0 + sz_tl_cur_next db 'tl_cur_next',0 + sz_tl_cur_perv db 'tl_cur_perv',0 + sz_tl_node_close_open db 'tl_node_close_open',0 + sz_tl_node_lev_inc db 'tl_node_lev_inc',0 + sz_tl_node_lev_dec db 'tl_node_lev_dec',0 + sz_tl_node_poi_get_info db 'tl_node_poi_get_info',0 + sz_tl_node_poi_get_next_info db 'tl_node_poi_get_next_info',0 + sz_tl_node_poi_get_data db 'tl_node_poi_get_data',0 + +align 4 +import_libkmenu: + kmenu_init dd akmenu_init + kmainmenu_draw dd akmainmenu_draw + kmainmenu_dispatch_cursorevent dd akmainmenu_dispatch_cursorevent + ksubmenu_new dd aksubmenu_new + ksubmenu_delete dd aksubmenu_delete + ksubmenu_draw dd aksubmenu_draw + ksubmenu_add dd aksubmenu_add + kmenuitem_new dd akmenuitem_new + kmenuitem_delete dd akmenuitem_delete + kmenuitem_draw dd akmenuitem_draw +dd 0,0 + akmenu_init db 'kmenu_init',0 + akmainmenu_draw db 'kmainmenu_draw',0 + akmainmenu_dispatch_cursorevent db 'kmainmenu_dispatch_cursorevent',0 + aksubmenu_new db 'ksubmenu_new',0 + aksubmenu_delete db 'ksubmenu_delete',0 + aksubmenu_draw db 'ksubmenu_draw',0 + aksubmenu_add db 'ksubmenu_add',0 + akmenuitem_new db 'kmenuitem_new',0 + akmenuitem_delete db 'kmenuitem_delete',0 + akmenuitem_draw db 'kmenuitem_draw',0 + +align 4 +import_lib_tinygl: +macro E_LIB n +{ + n dd sz_#n +} +include '../../develop/libraries/TinyGL/asm_fork/export.inc' + dd 0,0 +macro E_LIB n +{ + sz_#n db `n,0 +} +include '../../develop/libraries/TinyGL/asm_fork/export.inc' + +align 4 +import_libini: + dd alib_init0 + ini_get_str dd aini_get_str + ini_get_int dd aini_get_int + ini_get_color dd aini_get_color +dd 0,0 + alib_init0 db 'lib_init',0 + aini_get_str db 'ini_get_str',0 + aini_get_int db 'ini_get_int',0 + aini_get_color db 'ini_get_color',0 + +align 4 +mouse_dd dd 0 +last_time dd 0 +angle_dxm dd 1.9111 ;~ 3d_wnd_w/180 - прибавление углов поворота сцены при вращении мышей +angle_dym dd 1.7333 ;~ 3d_wnd_h/180 +ratio dd 1.1025 ;~ 3d_wnd_w/3d_wnd_h + +align 4 +buf_ogl: + dd 0 ;указатель на буфер изображения + dw 3d_wnd_l,3d_wnd_t ;+4 left,top + dd 3d_wnd_w,3d_wnd_h ;+8 w,h +.color: dd 0xffffd0 + dd 24 ;+16 color,bit in pixel + +align 4 +buf_1: + dd 0 ;указатель на буфер изображения + dw 25,25 ;+4 left,top + dd 128,144 ;+8 w,h + dd 0,24 ;+16 color,bit in pixel + +align 4 +el_focus dd tree1 +tree1 tree_list size_one_list,300+2, tl_key_no_edit+tl_draw_par_line,\ + 16,16, 0xffffff,0xb0d0ff,0x400040, 5,47,195-16,250, 16,list_offs_text,0, el_focus,\ + w_scr_t1,0 + +align 4 +w_scr_t1 scrollbar 16,0, 3,0, 15, 100, 0,0, 0,0,0, 1 + +align 4 +ctx1 db 28 dup (0) ;TinyGLContext or KOSGLContext +;sizeof.TinyGLContext = 28 + +qObj dd 0 + +light_position dd 0.0, 0.0, -2.0, 1.0 ; Расположение источника [0][1][2] + ;[3] = (0.0 - бесконечно удаленный источник, 1.0 - источник света на определенном расстоянии) +light_dir dd 0.0,0.0,0.0 ;направление лампы + +mat_specular dd 0.3, 0.3, 0.3, 1.0 ; Цвет блика +mat_shininess dd 3.0 ; Размер блика (обратная пропорция) +white_light dd 0.8, 0.8, 0.8, 1.0 ; Цвет и интенсивность освещения, генерируемого источником +lmodel_ambient dd 0.3, 0.3, 0.3, 1.0 ; Параметры фонового освещения + +if lang eq ru +capt db 'info 3ds [user] версия 16.01.16',0 ;подпись окна +else +capt db 'info 3ds [user] version 16.01.16',0 ;window caption +end if + +align 16 +i_end: + procinfo process_information + run_file_70 FileInfoBlock + sc system_colors + rb sizeof.sys_colors_new-sizeof.system_colors + angle_x rd 1 ;углы поворота сцены + angle_y rd 1 + angle_z rd 1 + color_ox rd 1 + color_oy rd 1 + color_oz rd 1 + color_bk rd 3 + color_vert rd 1 + color_face rd 1 + color_select rd 1 + rb 2048 +align 16 +thread_coords: + rb 2048 +stacktop: + sys_path rb 2048 + file_name rb 4096 + library_path rb 2048 + plugin_path rb 4096 + openfile_path rb 4096 + filename_area rb 256 +mem: diff --git a/programs/develop/info3ds/info_menu.inc b/programs/develop/info3ds/info_menu.inc index 7d339eaec6..a83bd9738e 100644 --- a/programs/develop/info3ds/info_menu.inc +++ b/programs/develop/info3ds/info_menu.inc @@ -1 +1 @@ - if lang eq ru sz_main_menu_View db 'Вид', 0 sz_main_menu_Veiw_Vertexes db 'Вершины вкл./выкл.', 0 sz_main_menu_Veiw_Faces db 'Грани вкл./выкл.', 0 sz_main_menu_Veiw_Faces_Fill db 'Заливка граней вкл./выкл.', 0 sz_main_menu_Veiw_Light db 'Свет вкл./выкл.', 0 sz_main_menu_Veiw_Reset db 'Сброс настроек', 0 sz_main_menu_Vertexes db 'Вершины', 0 sz_main_menu_Vertexes_Select db 'Выделить вершину', 0 sz_main_menu_Vertexes_Deselect db 'Отменить всё выделение', 0 sz_main_menu_Average_x db 'Среднее x',0 sz_main_menu_Average_y db 'Среднее y',0 sz_main_menu_Average_z db 'Среднее z',0 else sz_main_menu_View db 'View', 0 sz_main_menu_Veiw_Vertexes db 'Vertexes on/off', 0 sz_main_menu_Veiw_Faces db 'Faces on/off', 0 sz_main_menu_Veiw_Faces_Fill db 'Faces fill on/off', 0 sz_main_menu_Veiw_Light db 'Light on/off', 0 sz_main_menu_Veiw_Reset db 'Reset settings', 0 sz_main_menu_Vertexes db 'Vertexes', 0 sz_main_menu_Vertexes_Select db 'Select vertex', 0 sz_main_menu_Vertexes_Deselect db 'Deselect all', 0 sz_main_menu_Average_x db 'Average x',0 sz_main_menu_Average_y db 'Average y',0 sz_main_menu_Average_z db 'Average z',0 end if main_menu dd 0 main_menu_file dd 0 main_menu_view dd 0 main_menu_vertexes dd 0 KMENUITEM_NORMAL equ 0 KMENUITEM_SUBMENU equ 1 KMENUITEM_SEPARATOR equ 2 \ No newline at end of file + if lang eq ru sz_main_menu_View db 'Вид', 0 sz_main_menu_Veiw_Vertexes db 'Вершины вкл.', 0 sz_main_menu_Veiw_Faces db 'Каркасные грани вкл.', 0 sz_main_menu_Veiw_Faces_Fill db 'Сплошные грани вкл.', 0 sz_main_menu_Veiw_Light db 'Свет вкл./выкл.', 0 sz_main_menu_Veiw_Reset db 'Сброс настроек', 0 sz_main_menu_Vertexes db 'Вершины', 0 sz_main_menu_Vertexes_Select db 'Выделить вершину', 0 sz_main_menu_Vertexes_Deselect db 'Отменить всё выделение', 0 sz_main_menu_Average_x db 'Среднее x',0 sz_main_menu_Average_y db 'Среднее y',0 sz_main_menu_Average_z db 'Среднее z',0 else sz_main_menu_View db 'View', 0 sz_main_menu_Veiw_Vertexes db 'Vertexes on', 0 sz_main_menu_Veiw_Faces db 'Edges on', 0 sz_main_menu_Veiw_Faces_Fill db 'Faces on', 0 sz_main_menu_Veiw_Light db 'Light on/off', 0 sz_main_menu_Veiw_Reset db 'Reset settings', 0 sz_main_menu_Vertexes db 'Vertexes', 0 sz_main_menu_Vertexes_Select db 'Select vertex', 0 sz_main_menu_Vertexes_Deselect db 'Deselect all', 0 sz_main_menu_Average_x db 'Average x',0 sz_main_menu_Average_y db 'Average y',0 sz_main_menu_Average_z db 'Average z',0 end if main_menu dd 0 main_menu_file dd 0 main_menu_view dd 0 main_menu_vertexes dd 0 KMENUITEM_NORMAL equ 0 KMENUITEM_SUBMENU equ 1 KMENUITEM_SEPARATOR equ 2 \ No newline at end of file diff --git a/programs/develop/info3ds/info_o3d.inc b/programs/develop/info3ds/info_o3d.inc index b441991241..e44ddd3ea5 100644 --- a/programs/develop/info3ds/info_o3d.inc +++ b/programs/develop/info3ds/info_o3d.inc @@ -83,13 +83,16 @@ proc obj_clear_param uses edi, o_data:dword 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 - 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 - - ;установка параметров отображения - call mnu_reset_settings + cmp dword[edi+offs_obj_normals_tri_data],0 + je @f + stdcall mem.Free,[edi+offs_obj_normals_tri_data] + mov dword[edi+offs_obj_normals_tri_data],0 + @@: + cmp dword[edi+offs_obj_normals_poi_data],0 + je @f + stdcall mem.Free,[edi+offs_obj_normals_poi_data] + mov dword[edi+offs_obj_normals_poi_data],0 + @@: ret endp @@ -435,10 +438,83 @@ popad ret endp +;настройка структуры 3d объекта +align 4 +proc obj_init, o_data:dword + pushad + mov edi,[o_data] + stdcall obj_clear_param, edi + stdcall [tl_node_get_data],tree1 + xor edx,edx + cmp eax,0 + je .no_points + mov ebx,[eax] ;получаем значение сдвига выбранного блока + add ebx,[open_file_data] + xor ecx,ecx + cmp word[ebx],CHUNK_OBJBLOCK + jne @f + mov ecx,ebx + add ecx,dword[ecx+2] ;граница блока + push eax edi + mov edi,ebx + add edi,6 + cld + xor al,al + repne scasb ;пропуск имени объекта + mov ebx,edi + pop edi eax + @@: + cmp word[ebx],CHUNK_TRIMESH + jne @f + mov ecx,ebx + add ecx,dword[ecx+2] ;граница блока + add ebx,6 + @@: + cmp word[ebx],CHUNK_VERTLIST + jne .no_points + mov esi,ebx + movzx edx,word[ebx+6] ;колличество точек + add ebx,8 + mov [edi+offs_obj_poi_data],ebx + mov [edi+offs_obj_poi_count],edx + + .cycle_0: ;цикл для поиска треугольников + add esi,dword[esi+2] + cmp word[esi],CHUNK_FACELIST + je @f + cmp ecx,esi + jg .cycle_0 ;пока не достигнута грница старшего блока + jmp .end_points ;если не нашли треугольники + @@: + ;если нашли треугольники + movzx edx,word[esi+6] + mov [edi+offs_obj_tri_count],edx + add esi,8 ;2+4+2 (chunk+size+count) + mov [edi+offs_obj_tri_data],esi + .end_points: + + stdcall obj_set_sizes, edi + stdcall obj_set_normals, edi +if version_edit eq 0 + stdcall draw_3d, edi +end if + .no_points: + popad + ret +endp + ;рисование точек в 3d align 4 proc draw_3d uses eax ebx ecx edi, o_data:dword mov edi,[o_data] +if 0 ;debug + stdcall [glClear], GL_COLOR_BUFFER_BIT + GL_DEPTH_BUFFER_BIT + mov eax,[edi+offs_obj_poi_data] + stdcall convert_int_to_str, txt_select_vert.count,16 + stdcall [buf2d_draw_text], buf_ogl, buf_1,txt_select_vert,5,3,[color_select] + stdcall [kosglSwapBuffers] + jmp .end_f +end if cmp dword[edi+offs_obj_poi_count],2 jl .end_f stdcall [glClear], GL_COLOR_BUFFER_BIT + GL_DEPTH_BUFFER_BIT ;очистим буфер цвета и глубины @@ -603,33 +679,35 @@ SetLight: stdcall [glEnable],GL_LIGHT0 ret -;изменяем режим рисования вершин +;включаем режим рисования вершин align 4 -mnu_vertexes_on_off: - xor dword[draw_mode], 1 shl bit_vertexes - stdcall draw_3d, o3d +mnu_vertexes_on: + or dword[draw_mode], 1 shl bit_vertexes + and dword[draw_mode], not (1 shl bit_faces) ;выключаем режим рисования граней (что-бы не мешали) + call update_obj ret -;изменяем режим рисования граней +;включаем режим рисования каркасных граней align 4 -mnu_faces_on_off: - xor dword[draw_mode], 1 shl bit_faces - stdcall draw_3d, o3d +mnu_edges_on: + or dword[draw_mode], 1 shl bit_faces + and dword[draw_mode], not ((1 shl bit_vertexes)+(1 shl bit_faces_fill)) + call update_obj ret -;изменяем каркасные или сплошные грани +;включаем режим рисования сплошных граней align 4 -mnu_faces_fill_on_off: - xor dword[draw_mode], 1 shl bit_faces_fill - or dword[draw_mode], 1 shl bit_faces ;включаем режим рисования граней (если вдруг был отключен) - stdcall draw_3d, o3d +mnu_faces_on: + or dword[draw_mode], (1 shl bit_faces)+(1 shl bit_faces_fill) + and dword[draw_mode], not (1 shl bit_vertexes) + call update_obj ret ;включаем или отключаем освещение align 4 mnu_light_on_off: xor dword[draw_mode], 1 shl bit_light - stdcall draw_3d, o3d + call update_obj ret align 4 @@ -638,9 +716,32 @@ mnu_reset_settings: mov dword[angle_y],0.0 mov dword[angle_z],0.0 m2m dword[draw_mode],dword[def_dr_mode] + call update_obj + ret + +if version_edit eq 1 + +align 4 +update_obj: stdcall draw_3d, o3d ret +else + +align 4 +update_obj: +push eax + stdcall [tl_node_get_data],tree1 + cmp eax,0 + je @f + add eax,14 ;14=list_offs_obj3d + stdcall draw_3d, eax + @@: +pop eax + ret + +end if + align 4 draw_mode dd 0 ;режим рисования объекта def_dr_mode dd 0 ;режим рисования по умолчанию diff --git a/programs/develop/info3ds/info_wnd_coords.inc b/programs/develop/info3ds/info_wnd_coords.inc index 6be1b0e062..fb0a0e405b 100644 --- a/programs/develop/info3ds/info_wnd_coords.inc +++ b/programs/develop/info3ds/info_wnd_coords.inc @@ -42,6 +42,12 @@ pushad mov dword[w_scr_t3.type],1 mov edi,o3d stdcall obj_clear_param, edi + call mnu_reset_settings + + mov eax,dword[ctx1] ;eax -> TinyGLContext.GLContext + mov eax,[eax] ;eax -> ZBuffer + mov eax,[eax+offs_zbuf_pbuf] ;eax -> ZBuffer.pbuf + mov dword[buf_ogl],eax stdcall [tl_node_get_data],tree1 xor edx,edx @@ -54,84 +60,20 @@ pushad cmp word[ebx],CHUNK_OBJBLOCK jne .end_oblo mov dword[capt_p],txt_4000 - stdcall found_block_data, tree1 - cmp eax,0 - je .no_points - mov esi,eax - movzx ecx,byte[esi+2] ;cl - уровень выбранного узла - .cycle_0: - stdcall [tl_node_poi_get_next_info], tree1,esi - cmp eax,0 - je .no_points - cmp byte[eax+2],cl - jle .no_points - mov esi,eax - stdcall [tl_node_poi_get_data], tree1,esi - mov ebx,[eax] - add ebx,[open_file_data] - cmp word[ebx],CHUNK_VERTLIST - je .ini_vlist - jmp .cycle_0 + stdcall obj_init,edi jmp .no_points .end_oblo: cmp word[ebx],CHUNK_TRIMESH jne .end_trim mov dword[capt_p],txt_4100 - stdcall found_block_data, tree1 - cmp eax,0 - je .no_points - mov esi,eax - movzx ecx,byte[esi+2] ;cl - уровень выбранного узла - .cycle_1: - stdcall [tl_node_poi_get_next_info], tree1,esi - cmp eax,0 - je .no_points - cmp byte[eax+2],cl - jle .no_points - mov esi,eax - stdcall [tl_node_poi_get_data], tree1,esi - mov ebx,[eax] - add ebx,[open_file_data] - cmp word[ebx],CHUNK_VERTLIST - je .ini_vlist - jmp .cycle_1 + stdcall obj_init,edi jmp .no_points .end_trim: cmp word[ebx],CHUNK_VERTLIST jne .end_vlist mov dword[capt_p],txt_4110 - .ini_vlist: - movzx edx,word[ebx+6] ;колличество точек - add ebx,8 - ;поиск данных для треугольков - stdcall found_block_data, tree1 - cmp eax,0 - je .set_points - mov esi,eax - ;если нашли выбранный узел, то далее пытаемся найти узел с треугольниками - movzx ecx,byte[esi+2] ;cl - уровень выбранного узла - .cycle_2: - stdcall [tl_node_poi_get_next_info], tree1,esi - cmp eax,0 - je .set_points - mov esi,eax - stdcall [tl_node_poi_get_data], tree1,esi - cmp byte[esi+2],cl - jl .set_points - je .found - jmp .cycle_2 - .found: ;если нашли узел тогоже уровня что и выбранный узел - cmp eax,0 - je .set_points - mov eax,[eax] - add eax,[open_file_data] - cmp word[eax],CHUNK_FACELIST - jne .cycle_2 - movzx ecx,word[eax+6] - mov [edi+offs_obj_tri_count],ecx - add eax,8 ;2+4+2 (chunk+size+count) - mov [edi+offs_obj_tri_data],eax - jmp .set_points + stdcall obj_init,edi + jmp .no_points .end_vlist: cmp word[ebx],CHUNK_TRACKPIVOT jne @f @@ -153,7 +95,9 @@ pushad .no_points: ;настройка списка объектов + mov ebx,[edi+offs_obj_poi_data] mov dword[tree3.info_max_count],2 + 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] @@ -165,6 +109,7 @@ pushad je .no_object mov word[NumberSymbolsAD],5 finit + mov dword[w_scr_t3.redraw],0 .new_point: mov dword[obj_point],ebx mov dword[obj_point.text],0 @@ -190,6 +135,7 @@ pushad dec edx cmp edx,0 jg .new_point + mov dword[w_scr_t3.redraw],1 stdcall dword[tl_cur_beg], tree3 .no_object: stdcall obj_set_sizes, o3d @@ -216,13 +162,7 @@ pushad and ebx,0x3f3f3f add eax,ebx mov [edit3.color],eax - - mov eax,dword[ctx1] ;eax -> TinyGLContext.GLContext - mov eax,[eax] ;eax -> ZBuffer - mov eax,[eax+offs_zbuf_pbuf] ;eax -> ZBuffer.pbuf - mov dword[buf_ogl],eax popad - call prop_red_win ;не отрывать эту функцию от предыдущей @@ -527,17 +467,17 @@ prop_button: @@: cmp ah,5 jne @f - call mnu_vertexes_on_off + call mnu_vertexes_on jmp prop_still.end @@: cmp ah,6 jne @f - call mnu_faces_on_off + call mnu_edges_on jmp prop_still.end @@: cmp ah,7 jne @f - call mnu_faces_fill_on_off + call mnu_faces_on jmp prop_still.end @@: cmp ah,8 diff --git a/programs/develop/info3ds/toolbar.png b/programs/develop/info3ds/toolbar.png index e815f353263ce837daa5fa85568cf4e8cf80ce46..ac2aa66271395697fb59baa45196edf3ce1fd379 100644 GIT binary patch delta 2989 zcmV;e3sUsW5VaSO7Ye`#0ssI2g0FNLks%X*32;bRa{vGi!vFvd!vV){sAK>D02p*d zSaefwW^{L9a%BK;VQFr3E^cLXAT%y8E;t)BPS^kd3o}VXK~!i%)tPBf8|N9v^{tbc zPCsPwq0`QEnsm}58QWY9K4NE*QsXAmq@D!ZO*7Ma;wE-%XNn!;B*u+nJ2A!>FgF-~ zgSZcI2?P>CAcVMt#C-`Q0T%ZmkU-qV^uO$~TCEPFxYIPx{O9$f=lTEkefM4M!eUNU z|K{+pUg0>jS{*#J2msZ`jzcb&GZ_nDwvMT-Kppcl87qK=kpP*~jMb7VBoe5kq?orA zsi|pXoebF605iw~lMBPDP_YAGUIaOR2|W*jT-y_7AcLF-f!q#&1VPV3%OPMlNH@X` z(7hG-NCxI1N7rVc!w!H;1CjGEEFAZE=>_25z|LxI2Cu|mgFwHlu z&xzJ%c&iilmxqIwhOR7W&%(NY(EZjzr;in&N!Sly%}~5LnPPR|-uK|1Z`)^T-i^b- zwhcrdz$)#yJAFvEQTZYPL?564ZQNlj+N{eoYaU>u7SwmKSM!}$AXA6GsqL((_4LY= z%mNq`DWgS~G+_t(f<2sQLUfY?T+;Uf;5kR$+=K>(Na60mO@}TU!2KnEkt_9vb!f^& zXx_ZKv`Tyr?B8*CVyE&dYMc8?%PTg??YiFshK1BAzCl}T0Uxg~i5;yGC< zl{GcD4Nn>^fV_43aKLzW&1QMaW@goVRG}f3KO3E`_YYSexu}jxBc8KXKr~nQjE^$E zW^Q<>9}6WlJvoB4J@@B-&Ra?CSe|BN)(Uv`tril%&Jg3)wmirX1NbJf89yu9wNn-# zhARTVubm-g*w*Bz2Efmbb^ypLECSHeKWG7d`cB)8lyNNgPEsSO$aLlDYr^N>A0&XH z;)bqKE8v%YEe9_ce)D(z8v%1j-n>HScciXO{g`fOHzNgi;)P%U1jWlD!-GXaA)FL|lYZeu=b?brqo1TTD{G*4FDTzWmw)10^UJ5r zDy`LpqGotzAOGj?sP?}bnvYcBy2fzG&15Ubs)CSOx8n7Y2u<_&%Tv7>X z!m4^T(+v@TOZr}afO5^!M|=ZDR-F_ZfbYYCsrb=NjCL6-K&W0gnKu%ne|)831tW4) zmk4J>3Q>sM8*Z0*X5fe@)fGfz>k=+_Q!{x>f)_zjwbkO!MfA zx<%-$&~Q9$5WbW7x({-7m*vyw(hLCv7HaeaPA0lRu^Ief4Cv_=Fk2jZPK&QfSlEZ*ubHy<-Zav|Ae=Q z5jm?1v4I1h3!W1_{!s}bcwyiE-IG4W~E`RxU^!0Z626A|d=8f3DMM=hmhX5(p9y6p|dytWG?NLbz zKCIrZ8?pm9mlZJ6S+32wLbmncyuRQ zORa!Gm8d!Xlrr(mqu%t2AU}-L(va?Se_j5Uqr#hiGtv-r2>`!^Rcr-6`K~zV-IcZn za2x9)Fd`op-|Ei^7%IA|&h)PdJ;9O5WUZ~O8jYr&f4?&L*kWUJ^0|G}lH0kLeK3N- zsLuRM^vzLTz#Bc16pm0R#IeiE%i})WW2y;D_dghO>Al;>UYHQx1cR~Q%8{s#_uo8! zj9fN_6W%*)HeNGEt_ zMI8p%D1gi5;4h`VIm%3LyX4xhP=s=y8ay(z2}+ z09oDSa9BOM$gFPz9L_cL7>wN_#8?ue?Z^#TPTI=kzztadh-MtQp{D?7H(_iq*EQumK1S+HG60131@H0BbWm z@{a{b=%TGG0Ia6w-4GJGXe(!c-8r2t3Ayc@&Q988;0a6Gp`HS;y8v5R09b8L(N@lY zC!Dlx8@cVA&Q988;0a6Gq5hY^=IOJ4wCJL(tN}HLl4FbwP&or*)*<@nCM*t}b+Y()L2H4gAHDKA3o!<`|+8?iu{TA8?bck62uo^ed zLn~7rG)BnLm8JnUwnKo_O70H|z_y~jRB>*n02&Yra|kd+W01pbwG}xbDZ1!?46v)G z2IfcFMjE*TRd;ojA^L_S<8TYhU@hGkKU$chnzKWokfkxV90S06-hM|(><@&`%nb|CzoV?%H_s_w> z%j25NZs8r;W&yfOzFJ;tFqE6lgLDCnn-> zY`FXSKJM!~rPqHwZ<5rdo~LaVKwTL%*cJl^R)S-z)u#prznGp*9BSjL__t^qhSY$L7NHael?5JiL*ucu7 zF*nE$t1_ARY1iLbHqWsPYyjf%cmjbSEG+EInKP^wWFOG!v;_rX7XXE#F*!M7rvP5) zeSLj*?b?NRbyf?q11KMVuD1-0w>+FsJ+#_TQr19MJ6{pVt?^B7d_BG4^%VJ=e8shz z-d?7M0vZRFByG{z%GZiI_hu+O((2uyOoa!(YhR|~wY>T`S>KGbgYg$EUhS6!?FZ5t z+>&Z`-z)P7Q%1PFRA(n1(d1svsL?3>h>gmR_}=xoT%&5kVioh zRdO6f94K4m87}Z9fM)$hV&&WEjqb_v-O&QSdL8jUjkFrHgSYd&lI6RSYIfZ%_96he z#uy@^;Qt1)uI1>v!Ry)mVp@nZLD*)LW1bTQpk>d7dfZ&s5RSLPMQKio3> zm=jhK8d-QCy2LZS+�wJF?8Tuu0NAYU&!9%U6^~2@mIgC|^maa0@ALD^(GHXy=3$ zhlJ(4`c>+o&_cKS6&|@N?@Xn4w8Ra{Qtr)Z@=mC54=r#{65l50qhfW#MXW%;B_ jt~6?i|J|e*)W7*32VoNybIBU900000NkvXXu0mjfA`hlQ delta 2110 zcmV-E2*LNY7tIim7Yc9)1^@s67YFb=ks%X*8FWQhbW?9;ba!ELWdKlNX>N2bPDNB8 zb~7$DE;u(kfL#Cp2j59VK~z{r#h80cTh|@Oy}zpdvp?GWF?CY4Fjdo3soNS=Thb+e zbWv6{>N=EXyGm2ks7>>zM6%Fs5UnHWl9J`oK$4O)3GWsR1PIhNk5EHMLTp~)<=Uoy zP=f*E7=vxVJiooapK~wQPjK95SNiJsocsHI&hPxrx#wKppDZpe!fG8<3=It{mb;#Q zdX*wBZneJ|0h*ecK;?33XlQ`h-0NqjkOMp(4+1qhItmim4GdTi2nhm^VJL{aT@LXB zkWqC_4eQ2@awwHbR(5ty(D1}z2LS?q^B_he4uysxA9fIc!Xt@M$RnX>#C)tc0x=?a zULr<7WRg4*F)vgSC?X)zS`eKh0=l}oKoTPnqY=xPB9KQHHi@)UNn#{{<>QZFVa~nm zLq$>e4S`k{HQc(}95#9KWYTYOMe<6FML!OpU%M0E*Y65a-_31Um>mPDN0)LD2{z$NuUa zGC#FVW`8oRuA zF#__DhG5KDE9F2;7?pEw6TH@cbC|ZIVCuU=m^AK&$M84IyE`EIa0FCg2iHB!In|hb zpv26`WlRsGVyZt0Q|5i_=z72EiMTh0+z;qb zscF!`;+SKNPWa^V%wTH9w*f`mk?1teR#xLy^S7wfR5OgWyO#D&bo3Y*MiEKtATS36 zIGgb$zOK_Fx9|pvDtt$Oer=r=_nO-o-bG_=~WDRCHI)dQLqApfQd>DL{&ST=_9 zUs;fF)__+J8IYdiJGFxV=QCA!a-$B#^-c`*8+m-9?6yH3&Z^ftaQtdJ56Lt*<{tq8 zp4!|Z0VwMPqHz-FN?sKMKKY`V-(1?w!VJlCa3NF8fU;W;d=bchWV4zW@J#%D1{7T{ zWk9#FZz+ic_}Lq6IGQ!g<2-rwuB5bF9rk>z!s@sBe1Ot&-08Fi1Aeis1?vww@Tf2Jw4y(5$OxZ8@mJU-lPc=YKtTevb!wGlI?! z22cb~t}VmQ-_T>-meVN6zlN;LYxwBMN&Gt{705WhYToj|#BTM>*`_8Z#i~A;g?S`7}PIdW30zjCmo&yp&^pn4*51W8P4f-O_|z zIpUTk?u(DSsftTCrfpq>#B{KTkeH4(IpmQK*Qg$61Y8d~G%yz&URGpBmm(0*o&5pk z4SDFjo(%n!y%0!TAFfTssP;6Rx6|O!XMpT%t(C!mKD`>v8M~qT;(g5bot-yxjY6y;FzNt zLa2nTB#AVRn5Izz$QO%{Ao?6Yl6OEIiS5Bjlr2>