2) add documentation git-svn-id: svn://kolibrios.org@3330 a494cfbc-eb01-0410-851d-a64ba20cac60
637 lines
16 KiB
FASM
637 lines
16 KiB
FASM
use32
|
|
org 0x0
|
|
db 'MENUET01' ;идентиф. исполняемого файла всегда 8 байт
|
|
dd 0x1
|
|
dd start
|
|
dd i_end ;размер приложения
|
|
dd mem
|
|
dd stacktop
|
|
dd 0
|
|
dd sys_path
|
|
|
|
include '../../../../macros.inc'
|
|
include '../../../../proc32.inc'
|
|
include '../../../../develop/libraries/box_lib/load_lib.mac'
|
|
include '../../../../develop/libraries/box_lib/trunk/box_lib.mac'
|
|
include '../../../../dll.inc'
|
|
|
|
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc,dll.Load
|
|
caption db 'Шифрование алгоритмом DES 05.03.13',0 ;подпись окна
|
|
|
|
struct FileInfoBlock
|
|
Function dd ?
|
|
Position dd ?
|
|
Flags dd ?
|
|
Count dd ?
|
|
Buffer dd ?
|
|
db ?
|
|
FileName dd ?
|
|
ends
|
|
|
|
run_file_70 FileInfoBlock
|
|
image_data dd 0 ;указатель на временную память. для нужен преобразования изображения
|
|
|
|
fn_toolbar db 'toolbar.png',0
|
|
IMAGE_TOOLBAR_ICON_SIZE equ 16*16*3
|
|
IMAGE_TOOLBAR_SIZE equ IMAGE_TOOLBAR_ICON_SIZE*5
|
|
image_data_toolbar dd 0
|
|
|
|
IMAGE_FILE1_SIZE equ 128*144*3+54 ;размер файла с изображением
|
|
|
|
max_open_file_size equ 64*1024 ;64 Kb
|
|
|
|
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,0x0
|
|
else
|
|
copy_path path,[32],file_name,0x0 ;формируем полный путь к файлу изображения, подразумеваем что он в одной папке с программой
|
|
end if
|
|
|
|
stdcall mem.Alloc, dword size ;выделяем память для изображения
|
|
mov [buf],eax
|
|
|
|
mov eax,70 ;70-я функция работа с файлами
|
|
mov [run_file_70.Function], 0
|
|
mov [run_file_70.Position], 0
|
|
mov [run_file_70.Flags], 0
|
|
mov [run_file_70.Count], dword size
|
|
m2m [run_file_70.Buffer], [buf]
|
|
mov byte[run_file_70+20], 0
|
|
mov [run_file_70.FileName], file_name
|
|
mov ebx,run_file_70
|
|
int 0x40 ;загружаем файл изображения
|
|
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]
|
|
@@:
|
|
}
|
|
|
|
|
|
|
|
align 4
|
|
start:
|
|
load_libraries l_libs_start,l_libs_end
|
|
;проверка на сколько удачно загузилась библиотека
|
|
mov ebp,lib_0
|
|
cmp dword [ebp+ll_struc_size-4],0
|
|
jz @f
|
|
mcall -1 ;exit not correct
|
|
@@:
|
|
mcall 48,3,sc,sizeof.system_colors
|
|
mcall 40,0xC0000027
|
|
stdcall [OpenDialog_Init],OpenDialog_data ;подготовка диалога
|
|
|
|
stdcall [buf2d_create], buf_0 ;создание буфера
|
|
|
|
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
|
|
|
|
stdcall mem.Alloc,max_open_file_size
|
|
mov dword[open_file],eax
|
|
|
|
call but_new_file
|
|
|
|
align 4
|
|
red_win:
|
|
call draw_window
|
|
|
|
align 4
|
|
still:
|
|
mcall 10
|
|
|
|
cmp al,1
|
|
jz red_win
|
|
cmp al,2
|
|
jz key
|
|
cmp al,3
|
|
jz button
|
|
cmp al,6 ;мышь
|
|
jne @f
|
|
jmp mouse
|
|
@@:
|
|
jmp still
|
|
|
|
align 4
|
|
draw_window:
|
|
pushad
|
|
mcall 12,1
|
|
|
|
; *** рисование главного окна (выполняется 1 раз при запуске) ***
|
|
xor eax,eax
|
|
mov ebx,(20 shl 16)+480
|
|
mov ecx,(20 shl 16)+410
|
|
mov edx,[sc.work]
|
|
or edx,(3 shl 24)+0x10000000+0x20000000
|
|
mov edi,caption
|
|
int 0x40
|
|
|
|
; *** создание кнопок на панель ***
|
|
mov eax,8
|
|
mov ebx,(5 shl 16)+20
|
|
mov ecx,(5 shl 16)+20
|
|
mov edx,3
|
|
mov esi,[sc.work_button]
|
|
int 0x40
|
|
|
|
mov ebx,(30 shl 16)+20
|
|
mov edx,4
|
|
int 0x40
|
|
|
|
mov ebx,(55 shl 16)+20
|
|
mov edx,5
|
|
int 0x40
|
|
|
|
mov ebx,(85 shl 16)+20
|
|
mov edx,6
|
|
int 0x40
|
|
|
|
mov ebx,(110 shl 16)+20
|
|
mov edx,7
|
|
int 0x40
|
|
|
|
; *** рисование иконок на кнопках ***
|
|
mov eax,7
|
|
mov ebx,[image_data_toolbar]
|
|
mov ecx,(16 shl 16)+16
|
|
mov edx,(7 shl 16)+7 ;icon new
|
|
int 0x40
|
|
|
|
add ebx,IMAGE_TOOLBAR_ICON_SIZE
|
|
add edx,(25 shl 16) ;icon open
|
|
int 0x40
|
|
add ebx,IMAGE_TOOLBAR_ICON_SIZE
|
|
add edx,(25 shl 16) ;icon save
|
|
int 0x40
|
|
|
|
add ebx,IMAGE_TOOLBAR_ICON_SIZE
|
|
add edx,(30 shl 16) ;
|
|
int 0x40
|
|
add ebx,IMAGE_TOOLBAR_ICON_SIZE
|
|
add edx,(25 shl 16) ;
|
|
int 0x40
|
|
|
|
stdcall [edit_box_draw], edit1
|
|
|
|
; *** рисование буфера ***
|
|
stdcall [buf2d_draw], buf_0
|
|
|
|
mcall 12,2
|
|
popad
|
|
ret
|
|
|
|
align 4
|
|
key:
|
|
mcall 2
|
|
stdcall [edit_box_key], dword edit1
|
|
jmp still
|
|
|
|
align 4
|
|
mouse:
|
|
stdcall [edit_box_mouse], edit1
|
|
jmp still
|
|
|
|
align 4
|
|
button:
|
|
mcall 17
|
|
cmp ah,3
|
|
jne @f
|
|
call but_new_file
|
|
@@:
|
|
cmp ah,4
|
|
jne @f
|
|
call but_open_file
|
|
@@:
|
|
cmp ah,5
|
|
jne @f
|
|
call but_save_file
|
|
@@:
|
|
cmp ah,6
|
|
jne @f
|
|
call but_1
|
|
@@:
|
|
cmp ah,7
|
|
jne @f
|
|
call but_2
|
|
@@:
|
|
cmp ah,1
|
|
jne still
|
|
.exit:
|
|
stdcall [buf2d_delete],buf_0
|
|
stdcall [buf2d_delete],buf_1 ;удаляем буфер
|
|
stdcall mem.Free,[image_data_toolbar]
|
|
stdcall mem.Free,[open_file]
|
|
mcall -1
|
|
|
|
|
|
align 4
|
|
but_new_file:
|
|
mov dword[open_file_size],0
|
|
call draw_file
|
|
ret
|
|
|
|
align 4
|
|
open_file dd 0 ;указатель на память для открытия файлов
|
|
open_file_size dd 0 ;размер открытого файла (должен быть не больше max_open_file_size)
|
|
|
|
align 4
|
|
but_open_file:
|
|
pushad
|
|
copy_path open_dialog_name,communication_area_default_path,file_name,0
|
|
mov [OpenDialog_data.type],0
|
|
stdcall [OpenDialog_Start],OpenDialog_data
|
|
cmp [OpenDialog_data.status],2
|
|
je .end_open_file
|
|
;код при удачном открытии диалога
|
|
|
|
mov eax,70 ;70-я функция работа с файлами
|
|
mov [run_file_70.Function], 0
|
|
mov [run_file_70.Position], 0
|
|
mov [run_file_70.Flags], 0
|
|
mov dword[run_file_70.Count], max_open_file_size
|
|
m2m [run_file_70.Buffer], [open_file]
|
|
mov byte[run_file_70+20], 0
|
|
mov dword[run_file_70.FileName], openfile_path
|
|
mov ebx,run_file_70
|
|
int 0x40 ;загружаем файл изображения
|
|
cmp ebx,0xffffffff
|
|
je .end_open_file
|
|
|
|
mov [open_file_size],ebx
|
|
add ebx,dword[open_file]
|
|
mov byte[ebx],0 ;на случай если ранее был открыт файл большего размера чистим конец буфера с файлом
|
|
mcall 71,1,openfile_path
|
|
|
|
call draw_file
|
|
.end_open_file:
|
|
popad
|
|
ret
|
|
|
|
align 4
|
|
draw_file:
|
|
pushad
|
|
stdcall [buf2d_clear], buf_0, [buf_0.color]
|
|
cmp dword[open_file_size],0
|
|
je .open_file
|
|
mov eax,[open_file]
|
|
mov ebx,3
|
|
mov edx,dword[open_file_size]
|
|
.cycle_0:
|
|
mov edi,txt_buf
|
|
mov esi,eax
|
|
mov ecx,56
|
|
;cld
|
|
rep movsb
|
|
mov byte[edi],0
|
|
mov edi,txt_buf
|
|
mov ecx,56
|
|
.cycle_1:
|
|
cmp byte[edi],0
|
|
je @f
|
|
cmp byte[edi],13
|
|
je @f
|
|
jmp .ok
|
|
@@:
|
|
mov byte[edi],' ' ;непечатные символы заменяем на пробел
|
|
.ok:
|
|
inc edi
|
|
loop .cycle_1
|
|
stdcall [buf2d_draw_text], buf_0, buf_1,txt_buf,4,ebx,0xb0
|
|
sub edx,56
|
|
cmp edx,1
|
|
jl @f
|
|
add eax,56
|
|
add ebx,10
|
|
cmp ebx,dword[buf_0.h]
|
|
jl .cycle_0
|
|
jmp @f
|
|
.open_file:
|
|
stdcall [buf2d_draw_text], buf_0, buf_1,txt_openfile,3,3,0xb000
|
|
@@:
|
|
stdcall [buf2d_draw], buf_0
|
|
popad
|
|
ret
|
|
|
|
align 4
|
|
but_save_file:
|
|
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 eax,70 ;70-я функция работа с файлами
|
|
mov [run_file_70.Function], 2
|
|
mov [run_file_70.Position], 0
|
|
mov [run_file_70.Flags], 0
|
|
mov ebx, dword[open_file]
|
|
mov [run_file_70.Buffer], ebx
|
|
mov ebx,[open_file_size]
|
|
mov dword[run_file_70.Count], ebx ;размер файла
|
|
mov byte[run_file_70+20], 0
|
|
mov dword[run_file_70.FileName], openfile_path
|
|
mov ebx,run_file_70
|
|
int 0x40 ;сохраняем файл изображения
|
|
;cmp ebx,0xffffffff
|
|
;je .end_save_file
|
|
; ... сообщение о неудачном сохранении ...
|
|
|
|
.end_save_file:
|
|
popad
|
|
ret
|
|
|
|
align 4
|
|
but_1:
|
|
push eax
|
|
mov eax,[open_file_size]
|
|
shr eax,3
|
|
stdcall [des_encryption], txt_key,mem_key,[open_file],eax
|
|
pop eax
|
|
call draw_file
|
|
ret
|
|
|
|
align 4
|
|
but_2:
|
|
push eax
|
|
mov eax,[open_file_size]
|
|
shr eax,3
|
|
stdcall [des_decryption], txt_key,mem_key,[open_file],eax
|
|
pop eax
|
|
call draw_file
|
|
ret
|
|
|
|
;данные для диалога открытия файлов
|
|
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 'TXT',0
|
|
db 'ASM',0
|
|
.end:
|
|
db 0
|
|
|
|
|
|
|
|
head_f_i:
|
|
head_f_l db 'Системная ошибка',0
|
|
|
|
system_dir_0 db '/sys/lib/'
|
|
lib_name_0 db 'proc_lib.obj',0
|
|
err_message_found_lib_0 db 'Не найдена библиотека ',39,'proc_lib.obj',39,0
|
|
err_message_import_0 db 'Ошибка при импорте библиотеки ',39,'proc_lib.obj',39,0
|
|
|
|
system_dir_1 db '/sys/lib/'
|
|
lib_name_1 db 'libimg.obj',0
|
|
err_message_found_lib_1 db 'Не найдена библиотека ',39,'libimg.obj',39,0
|
|
err_message_import_1 db 'Ошибка при импорте библиотеки ',39,'libimg.obj',39,0
|
|
|
|
system_dir_2 db '/sys/lib/'
|
|
lib_name_2 db 'buf2d.obj',0
|
|
err_msg_found_lib_2 db 'Не найдена библиотека ',39,'buf2d.obj',39,0
|
|
err_msg_import_2 db 'Ошибка при импорте библиотеки ',39,'buf2d',39,0
|
|
|
|
system_dir_3 db '/sys/lib/'
|
|
lib_name_3 db 'crypt_des.obj',0
|
|
err_msg_found_lib_3 db 'Не найдена библиотека ',39,'crypt_des.obj',39,0
|
|
err_msg_import_3 db 'Ошибка при импорте библиотеки ',39,'crypt_des',39,0
|
|
|
|
system_dir_4 db '/sys/lib/'
|
|
lib_name_4 db 'box_lib.obj',0
|
|
err_msg_found_lib_4 db 'Не найдена библиотека ',39,'box_lib.obj',39,0
|
|
err_msg_import_4 db 'Ошибка при импорте библиотеки ',39,'box_lib',39,0
|
|
|
|
l_libs_start:
|
|
lib_0 l_libs lib_name_0, sys_path, file_name, system_dir_0,\
|
|
err_message_found_lib_0, head_f_l, proclib_import,err_message_import_0, head_f_i
|
|
lib_1 l_libs lib_name_1, sys_path, file_name, system_dir_1,\
|
|
err_message_found_lib_1, head_f_l, import_libimg, err_message_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_buf2d,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_des,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_box_lib,err_msg_import_4,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:
|
|
init dd sz_init
|
|
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_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_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_init 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_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_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_des: ;описание экспортируемых функций
|
|
des_encryption dd sz_des_encryption
|
|
des_decryption dd sz_des_decryption
|
|
dd 0,0
|
|
sz_des_encryption db 'des_encryption',0
|
|
sz_des_decryption db 'des_decryption',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
|
|
|
|
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
|
|
|
|
mouse_dd dd 0x0
|
|
sc system_colors
|
|
|
|
align 16
|
|
procinfo process_information
|
|
|
|
align 4
|
|
buf_0: dd 0 ;указатель на буфер изображения
|
|
dw 5 ;+4 left
|
|
dw 31 ;+6 top
|
|
.w: dd 456 ;+8 w
|
|
.h: dd 350 ;+12 h
|
|
.color: dd 0xffffd0 ;+16 color
|
|
db 24 ;+20 bit in pixel
|
|
|
|
align 4
|
|
buf_1:
|
|
dd 0 ;указатель на буфер изображения
|
|
dw 25 ;+4 left
|
|
dw 25 ;+6 top
|
|
dd 128 ;+8 w
|
|
dd 144 ;+12 h
|
|
dd 0 ;+16 color
|
|
db 24 ;+20 bit in pixel
|
|
|
|
edit1 edit_box 58, 140,8, 0xffffff, 0xff, 0x80ff, 0, 0x8000, 8, txt_key, mouse_dd, ed_focus+ed_always_focus,8,8
|
|
|
|
txt_openfile db 'Откройте файл для шифрования или дешифрования.',0
|
|
txt_buf rb 80
|
|
txt_key db 'des_0123',0
|
|
mem_key rb 120
|
|
|
|
i_end:
|
|
rb 2048
|
|
stacktop:
|
|
sys_path rb 1024
|
|
file_name:
|
|
rb 1024 ;4096
|
|
library_path rb 1024
|
|
plugin_path rb 4096
|
|
openfile_path rb 4096
|
|
filename_area rb 256
|
|
mem:
|