WebSVN – Kolibri OS – Diff – /programs/develop/kol_f_edit/kol_f_edit.asm


use32
	org 0x0
	db 'MENUET01'
	dd 0x1
	dd start
	dd i_end
	dd mem
	dd stacktop
	dd buf_cmd_lin
	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'
include '../../system/desktop/trunk/kglobals.inc'
include '../../system/desktop/trunk/unpacker.inc'
include 'strlen.inc'
include 'obj_codes.inc'
 
@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc, dll.Load
 
hed db 'kol_f_edit 17.04.13',0
 
sizeof.TreeList equ 20 ;need for element 'tree_list'
 
BUF_STRUCT_SIZE equ 21
buf2d_data equ dword[edi] ;¤ ­­ë¥ ¡ãä¥à  ¨§®¡à ¦¥­¨ï
buf2d_w equ dword[edi+8] ;è¨à¨­  ¡ãä¥à 
buf2d_h equ dword[edi+12] ;¢ëá®â  ¡ãä¥à 
buf2d_l equ word[edi+4] ;®âáâã¯ á«¥¢ 
buf2d_t equ word[edi+6] ;®âáâã¯ á¢¥àåã
buf2d_size_lt equ dword[edi+4] ;®âáâã¯ á«¥¢  ¨ á¯à ¢  ¤«ï ¡ãä¥à 
buf2d_color equ dword[edi+16] ;æ¢¥â ä®­  ¡ãä¥à 
buf2d_bits equ byte[edi+20] ;ª®«¨ç¥áâ¢® ¡¨â ¢ 1-© â®çª¥ ¨§®¡à ¦¥­¨ï
 
 
MAX_CED_OBJECTS equ 200
MAX_OPT_FIELDS equ 11
MAX_OBJ_TYPES equ 17 ;¬ ªá¨¬ «ì­®¥ ç¨á«® ®¡ê¥ªâ®¢
MAX_OBJ_CAPTIONS equ 1000 ;à §¬¥à ¤®¯®«­¨â¥«ì­ëå ¯®¤¯¨á¥© ¯®¤¯¨á¥©
WND_CAPT_COLOR equ 0xb0d0ff
BUF_SIZE equ 1000
 
;modif
BIT_MOD_ACI equ 0 ;¯¥à¢®­ ç «ì­ë¥ ­ áâà®©ª¨ í«¥¬¥­â®¢
BIT_MOD_ACM equ 1 ;á®¡ëâ¨ï ®â ¬ëè¨
BIT_MOD_ACD equ 2 ;¤ ­­ë¥ ®¡ê¥ªâ®¢
BIT_MOD_ABU equ 3 ;á¢ï§ë¢ ­¨¥ ª­®¯®ª
BIT_MOD_WI_CAPT equ 0 ;áâ¨«ì ®ª­  ¯®¤¯¨áì
BIT_MOD_WI_CORD_OTN_CL_OBL equ 1 ;áâ¨«ì ®ª­  ª®®à¤¨­ âë ®â­®á¨â¥«ì­® ª«¨¥­âáª®© ®¡« áâ¨
BIT_MOD_WI_REDR equ 2 ;áâ¨«ì ®ª­  ¯¥à¥à¨á®¢ª  ®ª­ 
BIT_MOD_WI_GRAD equ 3 ;áâ¨«ì ®ª­  £à ¤¨¥­â
BIT_MOD_CHE equ 0 ; ch_flag_en - ¢ë¡à ­ CheckBox
BIT_MOD_CHE_T equ 1 ;á¢¥àåã
BIT_MOD_CHE_M equ 2 ;¯® æ¥­âàã
BIT_MOD_CHE_B equ 3 ;á­¨§ã
BIT_MOD_TXT_ASCII_0 equ 0 ;â¥ªáâ § ª ­ç¨¢. 0
BIT_MOD_TXT_NO_TRAN equ 1 ;â¥ªáâ ¯à®§à ç­ë©
BIT_MOD_TXT_CHAR2 equ 2 ;â¥ªáâ 2-¬ èà¨äâ®¬
BIT_MOD_EDIT_FOC equ 0 ;EditBox ¢ ä®ªãá¥
BIT_MOD_EDIT_FIO equ 1 ;
;CPP_MOD_RE_GR equ 1 ;£à ¤¨¥­â­ë© ¯àï¬®ã£®«ì­¨ª
BIT_MOD_BUT_NFON equ 0 ;áâ¨«ì Button ­¥ à¨á®¢ âì ª­®¯ªã
BIT_MOD_BUT_NBORD equ 1 ;áâ¨«ì Button ­¥ à¨á®¢ âì £à ­¨æã
BIT_MOD_IMPORT_FUNCT_COMMENT equ 0 ;ª®¬¥­â¨à®¢ âì äã­ªæ¨î
 
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]
	@@:
}
 
struct FileInfoBlock
	Function dd ?
	Position dd ?
	Flags	 dd ?
	Count	 dd ?
	Buffer	 dd ?
	rezerv	 db ?
	FileName dd ?
ends
 
struct object
	id dd ? ;¨¤¥­â¨ä¨ª â®à ®¡ê¥ªâ 
	txt rb MAX_LEN_OBJ_TXT ;â¥ªáâ®¢ë¥ á¢®©áâ¢ 
	lvl db 0
	clo db 0
	typid dd ? ;­®¬¥à ®¡ê¥ªâ  ®¯à¥¤¥«ïîé¥£® â¨¯ ¯¥à¥¬¥­­®©
	modif dd ? ;¡¨â®¢ë¥ á¢®©áâ¢ 
ends
 
struct ObjOpt
	dd ?
	bl_type db ?
	graph db ?
	info rb 30
	caption rb MAX_OPT_CAPTION
	Col rw MAX_OPT_FIELDS
	img rw MAX_OPT_FIELDS ;¨­¤¥ªáë ª àâ¨­®ª (¢ ä ©«¥ 'icon.bmp')
	bit_prop dd 0 ;¡¨â®¢ë¥ á¢®©áâ¢  (¯®¤¯¨á¨, ­ §¢ ­¨ï)
	bit_val dd 0 ;¡¨â®¢ë¥ á¢®©áâ¢  (§­ ç¥­¨ï, ª®­áâ ­âë)
ends
 
SKIN_H equ 22
SKIN_W1 equ 5
SKIN_W2 equ 7
SKIN_W3 equ 23
fn_skin_1 db 'left.bmp',0
fn_skin_2 db 'base.bmp',0
fn_skin_3 db 'oper.bmp',0
IMAGE_FILE_SKIN1_SIZE equ 3*(SKIN_W1+3)*SKIN_H+54
IMAGE_FILE_SKIN2_SIZE equ 3*(SKIN_W2+3)*SKIN_H+54
IMAGE_FILE_SKIN3_SIZE equ 3*(SKIN_W3+3)*SKIN_H+54
 
IMAGE_FILE_FONT1_SIZE equ 96*144*3 ;à §¬¥à ä ©«  á 1-¬ á¨áâ¥¬­ë¬ èà¨äâ®¬
 
fn_icon db 'icon.bmp',0
count_main_icons equ 35 ;ç¨á«® ¨ª®­®ª ¢ ä ©«¥ icon.bmp
bmp_icon rb 0x300*count_main_icons
 
TREE_ICON_SYS16_BMP_SIZE equ 256*3*11+54 ;à §¬¥à bmp ä ©«  á á¨áâ¥¬­ë¬¨ ¨ª®­ª ¬¨
icon_tl_sys dd 0 ;ãª § â¥¥«ì ­  ¯ ¬ïâì ¤«ï åà ­¥­¨ï á¨áâ¥¬­ëå ¨ª®­®ª
icon_font_s1 dd 0 ;ãª § â¥«ì ­  ¢à¥¬¥­­ãî ¯ ¬ïâì ¤«ï § £àã§ª¨ èà¨äâ 
 
fn_syntax db 'asm.syn',0 ;¨¬ï § £àã¦ ¥¬®£® ä ©«  á¨­â ªá¨á 
 
;¬ ªà®á ¤«ï ¯à®¢¥àª¨ ¡¨â®¢®£® á¢®©áâ¢ 
macro test_bool_prop obj_reg,n_prop
{
	bt dword[obj_reg+u_object.modif-u_object],n_prop
}
 
include 'ced_wnd_m.inc'
include 'ced_wnd_prop.inc' ;ä ©« á äã­ªæ¨ï¬¨ ®ª­  á¢®©áâ¢ ®¡ê¥ªâ 
include 'ced_constr.inc' ;ä ©« á äã­ªæ¨ï¬¨ ®ª­  ª®­áâàãªâ®à 
include 'ced_code_g.inc' ;ä ©« á äã­ªæ¨ï¬¨ £¥­¥à¨à®¢ ­¨ï ª®¤®¢
 
align 4
start:
	load_libraries l_libs_start,load_lib_end
 
	;¯à®¢¥àª  ­  áª®«ìª® ã¤ ç­® § £ã§¨« áì ­ è  «¨¡ 
	mov	ebp,lib0
	cmp	dword [ebp+ll_struc_size-4],0
	jz	@f
		mcall -1 ;exit not correct
	@@:
	mov	ebp,lib1
	cmp	dword [ebp+ll_struc_size-4],0
	jz	@f
		mcall -1 ;exit not correct
	@@:
	mov	ebp,lib2
	cmp	dword [ebp+ll_struc_size-4],0
	jz	@f
		mcall -1 ;exit not correct
	@@:
	mov	ebp,lib3
	cmp	dword [ebp+ll_struc_size-4],0
	jz	@f
		mcall -1 ;exit not correct
	@@:
 
	;§ ¤ ­¨¥ à §¬¥à®¢ ¯®«¥© á® á¢®©áâ¢ ¬¨
	mov eax,prop_edits_top
	mov ebx,16+6 ;è¨à¨­  ¨ª®­ª¨ + ®âáâã¯ë
	mov edi,edit2
	@@:
		mov ed_top,eax ;®âáâã¯ á¢¥àåã
		mov ed_left,ebx ;®âáâã¯ á«¥¢ 
		add edi,ed_struc_size
		add eax,prop_edits_height
		cmp edi,prop_wnd_edits_end
		jl @b
 
	stdcall [buf2d_create], buf_fon
 
	mcall 48,3,sc,sizeof.system_colors
	mcall 40,0x27
 
	stdcall dword[tl_data_init], tree1
	stdcall dword[tl_data_init], tree2
 
	copy_path fn_icon,sys_path,file_name,0x0 ;ä®à¬¨àã¥¬ ¯®«­ë© ¯ãâì ª ä ©«ã ¨§®¡à ¦¥­¨ï, ¯®¤à §ã¬¥¢ ¥¬ çâ® ®­ ¢ ®¤­®© ¯ ¯ª¥ á ¯à®£à ¬¬®©
	mov eax,70 ;load icon file
	mov [run_file_70.Function], 0
	mov [run_file_70.Position], 54
	mov [run_file_70.Flags], 0
	mov [run_file_70.Count], 0x300*count_main_icons
	mov [run_file_70.Buffer], bmp_icon
	mov [run_file_70.rezerv], 0
	mov [run_file_70.FileName], file_name
	mov ebx,run_file_70
	int 0x40
 
	cmp ebx,-1
	mov [err_ini0],1
	je @f ;if open file
		mov [err_ini0],0
		mov dword[tree1.data_img],bmp_icon
		mov dword[tree2.data_img],bmp_icon
	@@:
 
	;á¨áâ¥¬­ë¥ ¨ª®­ª¨ 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
	mov dword[tree2.data_img_sys],eax
 
	;1-© ä ©« áª¨­ 
	load_image_file fn_skin_1, icon_font_s1,IMAGE_FILE_SKIN1_SIZE
	stdcall [buf2d_create_f_img], buf_skin1,[icon_font_s1] ;á®§¤ ¥¬ ¡ãä¥à
	stdcall mem.Free,[icon_font_s1] ;®á¢®¡®¦¤ ¥¬ ¯ ¬ïâì
	;2-© ä ©« áª¨­ 
	load_image_file fn_skin_2, icon_font_s1,IMAGE_FILE_SKIN2_SIZE
	stdcall [buf2d_create_f_img], buf_skin2,[icon_font_s1] ;á®§¤ ¥¬ ¡ãä¥à
	stdcall mem.Free,[icon_font_s1] ;®á¢®¡®¦¤ ¥¬ ¯ ¬ïâì
	;3-© ä ©« áª¨­ 
	load_image_file fn_skin_3, icon_font_s1,IMAGE_FILE_SKIN3_SIZE
	stdcall [buf2d_create_f_img], buf_skin3,[icon_font_s1] ;á®§¤ ¥¬ ¡ãä¥à
	stdcall mem.Free,[icon_font_s1] ;®á¢®¡®¦¤ ¥¬ ¯ ¬ïâì
 
	;á¨¬¢®«ë 1-£® á¨áâ¥¬­®£® èà¨äâ 
	load_image_file 'font6x9.bmp', icon_font_s1,IMAGE_FILE_FONT1_SIZE
	stdcall [buf2d_create_f_img], buf_font,[icon_font_s1] ;á®§¤ ¥¬ ¡ãä¥à
	stdcall mem.Free,[icon_font_s1] ;®á¢®¡®¦¤ ¥¬ ¯ ¬ïâì
	stdcall [buf2d_conv_24_to_8], buf_font,1 ;¤¥« ¥¬ ¡ãä¥à ¯à®§à ç­®áâ¨ 8 ¡¨â
	stdcall [buf2d_convert_text_matrix], buf_font
 
 
	copy_path fn_obj_opt,sys_path,fp_obj_opt,0x0
	;load options file
	mov eax,70
	mov [run_file_70.Position], 0
	mov [run_file_70.Count], sizeof.ObjOpt*MAX_OBJ_TYPES+MAX_OBJ_CAPTIONS
	mov [run_file_70.Buffer], obj_opt
	mov [run_file_70.FileName], fp_obj_opt
	mov ebx,run_file_70
	int 0x40
 
	cmp ebx,-1
	mov [err_ini1],1
	je .open_end ;jmp if not open file
		mov [err_ini1],0
 
		mov eax,obj_opt ;¤®¡ ¢«ï¥¬ ®¡ê¥ªâë
		@@:
			mov ebx,dword[eax]
			cmp ebx,0
			je @f
			;xor ecx,ecx ;¢ ecx ¡ã¤¥â ¨­¤¥ªá ¨ª®­ª¨
			mov cx,word[eax+obj_opt.img-obj_opt]
			cmp cx,0
			jge .zero
				xor cx,cx ;çâ®-¡ë ­¥ £«îç¨«® á ®âà¨æ â¥«ì­ë¬ ¨­¤¥ªá®¬
			.zero:
			shl ecx,16
			stdcall dword[tl_node_add], eax, ecx, tree1 ;¤®¡ ¢«ï¥¬ ­ §¢ ­¨¥ ®¡ê¥ªâ 
			stdcall dword[tl_cur_next], tree1 ;¯¥à¥­®á¨¬ ªãàá®à ¢­¨§, çâ®-¡ë ­¥ ¯®¬¥­ï«áï ¯®àï¤®ª
			add eax,sizeof.ObjOpt ;¯¥à¥å®¤ ­  á«¥¤ãîé¨© ®¡ê¥ªâ
			jmp @b
		@@:
		stdcall dword[tl_cur_beg], tree1 ;¯¥à¥­®á¨¬ ªãàá®à ¢¢¥àå
 
	.open_end:
 
	stdcall [ted_init], tedit0
	copy_path fn_syntax,sys_path,file_name,0x0
 
	; *** init syntax file ***
	; ¯à®¢¥àï¥¬ à §¬¥à ä ©«  á¨­â ªá¨á 
	mov eax,70
	mov [run_file_70.Function], 5
	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], file_name
	mov ebx,run_file_70
	int 0x40
	cmp eax,0
	jne @f
 
	mov edi,tedit0
	mov ecx,dword[open_b+32] ;+32 qword: à §¬¥à ä ©«  ¢ ¡ ©â å
	mov ted_syntax_file_size,ecx
 
	stdcall mem.Alloc,ecx ;¢ë¤¥«ï¥¬ ¯ ¬ïâì ¤«ï ä ©«  á¨­â ªá¨á 
	mov ted_syntax_file,eax
 
	;¯à®¡ã¥¬ ®âªàëâì ä ©« á¨­â ªá¨á 
 
 
 
 
 
 
 
 
 
 
 
	call open_unpac_synt_file
	jmp .end_0
	@@:
		notify_window_run txt_not_syntax_file
	.end_0:
 
	;get cmd line
	cmp [buf_cmd_lin],0
	je @f ;if file names exist
		mov esi,buf_cmd_lin
		call strlen ;eax=strlen
		mov edi,[edit1.text]
		mov [edit1.size],eax
		mov ecx,eax
		rep movsb
		call but_open_proj
	@@:
 
 
 
align 4
red_win:
	call draw_window
 
align 4
still:
	mcall 10
 
	cmp al,1
	jne @f
		call draw_window
	@@:
	cmp al,2
	jz key
	cmp al,3
	jz button
	cmp al,6
	jne @f 
		call mouse
	@@:
 
	jmp still
 
align 4
draw_window:
pushad
	mcall 12,1
 
	xor eax,eax
	mov ebx,20*65536+670
	mov ecx,20*65536+370
	mov edx,[sc.work]
	or  edx,0x33000000
	mov edi,hed
	int 0x40
 
	mov eax,8 ;button 'Open Project'
	mov esi,0x80ff
	mov ebx,230*65536+18
	mov ecx,5*65536+18
	mov edx,5
	int 0x40
	stdcall draw_icon, 22,231,6 ;22 - open
 
	;button 'Save Project'
	mov ebx,250*65536+18
	mov ecx,5*65536+18
	mov edx,6
	int 0x40
	stdcall draw_icon, 17,251,6 ;17 - save
 
	;button 'Show Constructor'
	mov ebx,310*65536+18
	mov ecx,5*65536+18
	mov edx,11
	int 0x40
	stdcall draw_icon, 12,311,6 ;12 - window
 
	;button 'Show Code'
	mov ebx,330*65536+18
	mov edx,12
	int 0x40
	stdcall draw_icon, 11,331,6 ;11 - text
 
	;button 'Update: Code, Constructor'
	mov ebx,350*65536+18
	mov edx,13
	int 0x40
	stdcall draw_icon, 32,351,6 ;32 - update
 
	;button 'Save Code'
	mov ebx,370*65536+18
	mov edx,14
	int 0x40
	stdcall draw_icon, 17,371,6 ;17 - save
 
	;button ']P'
	mov ebx,390*65536+18
	mov edx,15
	int 0x40
	stdcall draw_icon, 18,391,6 ;18 - §­ ª ª®­æ   ¡§ æ 
 
	;button 'Show color text'
	mov ebx,410*65536+18
	mov edx,16
	int 0x40
	stdcall draw_icon, 19,411,6
 
	;button 'Add Object'
	mov ebx,125*65536+18
	mov ecx,30*65536+18
	mov edx,31
	int 0x40
	stdcall draw_icon, 14,126,31 ;14 - add object
 
	;button 'Move Up'
	mov ebx,155*65536+18
	mov edx,21
	int 0x40
	stdcall draw_icon, 23,156,31 ;23 - move up
 
	;button 'Move Down'
	mov ebx,175*65536+18
	mov edx,22
	int 0x40
	stdcall draw_icon, 24,176,31 ;24 - move down
 
	;button 'Copy'
	mov ebx,195*65536+18
	mov edx,23
	int 0x40
	stdcall draw_icon, 30,196,31 ;30 - copy
 
	;button 'Paste'
	mov ebx,215*65536+18
	mov edx,24
	int 0x40
	stdcall draw_icon, 31,216,31 ;31 - paste
 
	;button 'Property'
	mov ebx,235*65536+18
	mov edx,25
	int 0x40
	stdcall draw_icon, 7,236,31 ;7 - property
 
	;button 'Undo'
	mov ebx,255*65536+18
	mov edx,26
	int 0x40
	stdcall draw_icon, 33,256,31 ;33 - undo
 
	;button 'Redo'
	mov ebx,275*65536+18
	mov edx,27
	int 0x40
	stdcall draw_icon, 34,276,31 ;34 - redo
 
; 10 30 50 70 90
 
	cmp [err_opn],1
	jne @f
		mov eax,4
		mov ebx,10*65536+35
		mov ecx,0x80ff0000
		mov edx,txtErrOpen
		int 0x40
	@@:
 
	stdcall [edit_box_draw], dword edit1
	stdcall [edit_box_draw], dword edit_sav
 
	mov dword[w_scr_t1.all_redraw],1
	;stdcall [scrollbar_ver_draw],dword w_scr_t1
	stdcall [tl_draw],dword tree1
	mov dword[w_scr_t2.all_redraw],1
	;stdcall [scrollbar_ver_draw],dword w_scr_t2
	stdcall [tl_draw],dword tree2
 
	cmp byte[show_mode],0 ;ãá«®¢¨¥ ¢¨¤¨¬®áâ¨ ®ª­  ª®­áâàãªâ®à 
	jne @f
		stdcall [buf2d_draw], buf_fon
	@@:
	cmp byte[show_mode],1 ;ãá«®¢¨¥ ¢¨¤¨¬®áâ¨ â¥ªáâ®¢®£® ®ª­ 
	jne @f
		stdcall [ted_draw], tedit0
	@@:
	mcall 12,2
popad
	ret
 
align 4
mouse:
	stdcall [edit_box_mouse], dword edit1
	stdcall [edit_box_mouse], dword edit_sav
	stdcall [tl_mouse], dword tree1
	stdcall [tl_mouse], dword tree2
	cmp byte[show_mode],1 ;ãá«®¢¨¥ ¢¨¤¨¬®áâ¨ â¥ªáâ®¢®£® ®ª­ 
	jne @f
		stdcall [ted_mouse], tedit0
	@@:
	ret
 
 
align 4
key:
	mcall 2
	stdcall [edit_box_key], dword edit1
	stdcall [edit_box_key], dword edit_sav
	stdcall [tl_key], dword tree1
	stdcall [tl_key], dword tree2
 
	jmp still
 
align 4
button:
	mcall 17
	cmp ah,5
	jne @f
		call but_open_proj
	@@:
	cmp ah,6
	jne @f
		call but_save_proj
	@@:
	;cmp ah,10
	;jne @f
		;call but_element_change
	;@@:
	cmp ah,11
	jne @f
		call but_show_constructor
	@@:
	cmp ah,12
	jne @f
		call but_show_code
	@@:
	cmp ah,13
	jne @f
		call but_update
	@@:
	cmp ah,14
	jne @f
		call but_save_asm
	@@:
	cmp ah,15
	jne @f
		call but_show_invis
	@@:
	cmp ah,16
	jne @f
		call but_show_syntax
	@@:
	cmp ah,21
	jne @f
		call but_obj_move_up
	@@:
	cmp ah,22
	jne @f
		call but_obj_move_down
	@@:
	cmp ah,23
	jne @f
		call but_obj_copy
	@@:
	cmp ah,24
	jne @f
		call but_obj_paste
	@@:
	cmp ah,25
	jne @f
		call on_file_object_select
	@@:
	cmp ah,26
	jne @f
		stdcall [tl_info_undo], tree2
		stdcall [tl_draw], tree2
	@@:
	cmp ah,27
	jne @f
		stdcall [tl_info_redo], tree2
		stdcall [tl_draw], tree2
	@@:
	cmp ah,31
	jne @f
		call on_add_object
	@@:
	cmp ah,1
	jne still
.exit:
	stdcall mem.Free,[icon_tl_sys]
	mov dword[tree1.data_img],0
	mov dword[tree2.data_img],0
	mov dword[tree1.data_img_sys],0
	mov dword[tree2.data_img_sys],0
	stdcall dword[tl_data_clear], tree1
	stdcall dword[tl_data_clear], tree2
	stdcall [buf2d_delete],buf_fon ;ã¤ «ï¥¬ ¡ãä¥à
	stdcall [buf2d_delete],buf_font ;ã¤ «ï¥¬ ¡ãä¥à  
	stdcall [buf2d_delete],buf_skin1
	stdcall [buf2d_delete],buf_skin2
	stdcall [buf2d_delete],buf_skin3
	stdcall [ted_delete], tedit0
	cmp dword[unpac_mem],0
	je @f
		stdcall mem.Free,[unpac_mem]
	@@:
	mcall -1
 
align 4
but_open_proj:
	pushad
	mov eax,70
	mov [run_file_70.Function], 0
	mov [run_file_70.Position], 0
	mov [run_file_70.Flags], 0
	mov [run_file_70.Count], sizeof.object*MAX_CED_OBJECTS
	mov [run_file_70.Buffer], ced_info
	mov [run_file_70.rezerv], 0
	push [edit1.text]
	pop [run_file_70.FileName]
	mov ebx,run_file_70
	int 0x40
 
	cmp ebx,-1
	mov [err_opn],1
	je .open_end ;if open file
		mov ecx,ced_info
		add ecx,ebx
		mov byte [ecx],0
		mov [err_opn],0
 
		stdcall dword[tl_info_clear], tree2
		mov eax,ced_info ;¤®¡ ¢«ï¥¬ ®¡ê¥ªâë
		@@:
			mov ebx,dword[eax]
			cmp ebx,0
			je @f
 
			call find_obj_in_opt ;edi = pointer to ObjOpt struct
 
			mov cx,word[edi+obj_opt.img-obj_opt]
			cmp cx,0
			jge .zero
				xor cx,cx ;çâ®-¡ë ­¥ £«îç¨«® á ®âà¨æ â¥«ì­ë¬ ¨­¤¥ªá®¬
			.zero:
			shl ecx,16 ;¢ ecx ¨­¤¥ªá ¨ª®­ª¨
			mov cl,byte[eax++u_object.lvl-u_object] ;ãà®¢¥­ì ®¡ê¥ªâ 
 
			;tl_node_close_open - ­¥ ¯®¤å®¤¨â, â.ª. ¤¥©áâ¢ã¥â ­  ã§«ë ¨¬¥îé¨¥ ¤®ç¥à­¨¥
			mov ch,byte[eax++u_object.clo-u_object] ;§ ªàëâë©/®âªàëâë©
 
			stdcall dword[tl_node_add], eax, ecx, tree2 ;¤®¡ ¢«ï¥¬ ®¡ê¥ªâ
 
			stdcall dword[tl_cur_next], tree2 ;¯¥à¥­®á¨¬ ªãàá®à ¢­¨§, çâ®-¡ë ­¥ ¯®¬¥­ï«áï ¯®àï¤®ª
			add eax,sizeof.object ;¯¥à¥å®¤ ­  á«¥¤ãîé¨© ®¡ê¥ªâ
			jmp @b
		@@:
		stdcall dword[tl_cur_beg], tree2 ;¯¥à¥­®á¨¬ ªãàá®à ¢¢¥àå
 
		mov [foc_obj],0
		call draw_constructor
		call code_gen
	.open_end:
	call draw_window ;¯¥à¥à¨á®¢ª  ®ª­  ¨¤¥â ¢ «î¡®¬ á«ãç ¥, ¤ ¦¥ ¥á«¨ ä ©« ­¥ ®âªàë«áï
	popad
	ret
 
;á®åà ­¥­¨¥ ä ©«  ¯à®íªâ  ­  ¤¨áª
align 4
but_save_proj:
	pushad
 
	mov edi,ced_info
 
	stdcall [tl_node_poi_get_info], 0,tree2
	pop edx
	@@:
		cmp edx,0
		je @f
		stdcall [tl_node_poi_get_data], edx,tree2
		pop esi ;¯®«ãç ¥¬ ¤ ­­ë¥ ã§« 
 
		mov bl,byte[edx+2] ;bl - ãà®¢¥­ì ®¡ê¥ªâ 
		mov byte[esi+u_object.lvl-u_object],bl
		mov bl,byte[edx+3] ;bl - ®âªàëâ¨¥/§ ªàëâ¨¥ ®¡ê¥ªâ 
		mov byte[esi+u_object.clo-u_object],bl
 
		;¢ëç¨á«ï¥¬ ­®¢ë© ¨­¤¥ªá ¤«ï â¨¯  ®¡ê¥ªâ 
		mov ebx,[esi+u_object.typid-u_object] ;ebx - â¨¯ ®¡ê¥ªâ 
		;á®åà ­ï¥¬ â¨¯ ®¡ê¥ªâ 
		push ebx
			imul ebx,sizeof.TreeList
			add ebx,[tree2.data_nodes] ;ebx - ãª § â¥«ì ®¡ê¥ªâ ãª §ë¢ îé¨© â¨¯
			stdcall get_obj_npp,ebx
			mov [esi+u_object.typid-u_object],eax
			mov eax,esi
			;ª®¯¨àã¥¬ ®¡ê¥ªâ ¢ ¯ ¬ïâì ¤«ï á®åà ­¥­¨ï
			xor ecx,ecx
			mov cx,word[tree2.info_size]
			cld
			rep movsb
		;¢®ááâ ­ ¢«¨¢ ¥¬ â¨¯ ®¡ê¥ªâ 
		pop dword[eax+u_object.typid-u_object]
 
		stdcall [tl_node_poi_get_next_info], edx,tree2
		pop edx ;¯¥à¥å®¤¨¬ ª á«¥¤ãé¥¬ã ã§«ã
		jmp @b
	@@:
	mov dword[edi],0 ;¬¥âª  ª®­æ  ä ©« 
	add edi,4
	mov ecx,edi
	sub ecx,ced_info ;ecx - à §¬¥à á®åà ­ï¥¬®£® ä ©«        
 
	mov eax,70
	mov [run_file_70.Function], 2
	mov [run_file_70.Position], 0
	mov [run_file_70.Flags], 0
	mov [run_file_70.Count], ecx
	mov [run_file_70.Buffer], ced_info
	mov [run_file_70.rezerv], 0
	push [edit1.text]
	pop [run_file_70.FileName]
	mov ebx,run_file_70
	int 0x40
 
	popad
	ret
 
;¡¥à¥â ­®¬¥à ¯® ¯®àï¤ªã ¯® ãª § â¥«î ­  áâàãªâãàã ®¡ê¥ªâ 
;output:
; eax - ­®¬¥à ®¡ê¥ªâ 
align 4
proc get_obj_npp, p_obj_str:dword
	mov eax,2
	push ebx edx
	mov ebx,[p_obj_str]
 
	stdcall [tl_node_poi_get_info], 0,tree2
	pop edx
	@@:
		cmp edx,0
		je .no_exist
		cmp edx,ebx
		je @f
 
		inc eax
		stdcall [tl_node_poi_get_next_info], edx,tree2
		pop edx ;¯¥à¥å®¤¨¬ ª á«¥¤ãé¥¬ã ã§«ã
		jmp @b
	.no_exist: ;ª®£¤  ¨¤¥â ááë«ª  ­  ­¥ áãé¥áâ¢ãîé¨© ®¡ê¥ªâ
		xor eax,eax ;®¡­ã«ï¥¬ ãª § â¥«ì, çâ®-¡ë ­¥ á®åà ­ïâì ¢ ä ©« ¬ãá®à
	@@:
	pop edx ebx
	ret
endp
 
;äã­ªæ¨ï ¤«ï á®åà ­¥­¨ï á®§¤ ­­®£® asm ä ©« 
align 4
but_save_asm:
	;stdcall [ted_but_save_file], tedit0,run_file_70,[edit_sav.text]
	push edi
	mov edi, tedit0
 
	stdcall [ted_but_save_file],edi,run_file_70,[edit_sav.text]
	cmp ted_err_save,0
	jne @f
		stdcall [mb_create],msgbox_1,thread ;message:  ©« ¡ë« á®åà ­¥­
	@@:
	pop edi
	ret
 
;äã­ªæ¨ï ¤«ï ¯®ª § /áªàëâ¨ï ­¥¢¨¤¨¬ëå á¨¬¢®«®¢
align 4
but_show_invis:
	push edi
	mov edi,tedit0
 
	xor ted_mode_invis,1
	cmp byte[show_mode],1 ;ãá«®¢¨¥ ¢¨¤¨¬®áâ¨ â¥ªáâ®¢®£® ®ª­ 
	jne @f
		stdcall [ted_draw],edi
	@@:
	pop edi
	ret
 
;
align 4
but_show_syntax:
	push edi
	mov edi,tedit0
 
	xor ted_mode_color,1
	cmp byte[show_mode],1 ;ãá«®¢¨¥ ¢¨¤¨¬®áâ¨ â¥ªáâ®¢®£® ®ª­ 
	jne @f
		stdcall [ted_draw],edi
	@@:
	pop edi
	ret
 
align 4
ted_save_err_msg:
	mov byte[msgbox_0.err],al
	stdcall [mb_create],msgbox_0,thread ;message: Can-t save text file!
	ret
 
;äã­ªæ¨ï ¢ë§ë¢ ¥¬ ï ¯à¨ ­ ¦ â¨¨ Enter ¢ ®ª­¥ tree2
;®¡­®¢«ï¥â â¥ªáâ®¢ë¥ ¯®«ï §­ ç¥­¨ï¬¨ ¯ à ¬¥âà®¢ ¢§ïâëå ¨§ ®¡ê¥ªâ®¢
;äã­ªæ¨ï ®¡à â­ ï ª ¤ ­­®© but_element_change
align 4
on_file_object_select:
	cmp byte[prop_wnd_run],0
	jne @f
		mov byte[prop_wnd_run],1
		stdcall [tl_node_get_data], tree2
		pop dword[foc_obj]
		cmp dword[foc_obj],0
		je @f
			pushad
			;¢á¥ ¤¥©áâ¢¨ï ¯® ­ áâà®©ª¥ í«¥¬¥­â®¢ ã¯à ¢«¥­¨ï ¢ë¯®«­ïîâáï ¢ ®ª­¥ á® á¢®©áâ¢ ¬¨
			mcall 51,1,prop_start,prop_thread
			popad
	@@:
	;call draw_window
	ret
 
;äã­ªæ¨ï ¢ë§ë¢ ¥¬ ï ¯à¨ ­ ¦ â¨¨ Enter ¢ ®ª­¥ tree1
;¤®¡ ¢«ï¥â ­®¢ë© ®¡ê¥ªâ ¢ ®ª­® tree2
align 4
on_add_object:
push eax ebx ecx
	stdcall [tl_node_get_data], tree1
	pop eax
	cmp eax,0
	je @f
		xor ecx,ecx
		mov cx,word[eax+obj_opt.img-obj_opt] ;cx - ¨­¤¥ªá £« ¢­®© ¨ª®­ª¨ ¤®¡ ¢«ï¥¬®£® ®¡ê¥ªâ 
 
		cmp ecx,count_main_icons ;¢ áâ àè¨å ¡¨â å ecx ¡ã¤ãâ 0, ¯®â®¬ã ®âà¨æ â¥«ì­ë¥ ç¨á«  â®¦¥ ¯à®¢¥àïîâáï
		jl .end_0
			;¥á«¨ ¨ª®­ª¨ ­¥â, ¯® ã¬®«ç ­¨î ¡¥à¥¬ 0-î
			xor cx,cx
		.end_0:
 
		shl ecx,16
		stdcall mem_clear, u_object,sizeof.object
		mov ebx,dword[eax]
		mov dword[u_object.id],ebx
		stdcall dword[tl_node_add], u_object, ecx, tree2 ;¤®¡ ¢«ï¥¬ ®¡ê¥ªâ
	@@:
pop ecx ebx eax
	call draw_window
	ret
 
align 4
but_ctrl_o:
	ret
align 4
but_ctrl_n:
	ret
align 4
but_ctrl_s:
	ret
 
;®âªàëâ¨¥ ¨ à á¯ ª®¢ª  ä ©«  ¯®¤á¢¥âª¨ á¨­â ªá¨á 
;input:
; ted_syntax_file - ¡ãä¥à ¤«ï ®âªàë¢ ¥¬®£® ä ©«  á¨­â ªá¨á 
; ted_syntax_file_size - à §¬¥à ®âªàë¢ ¥¬®£® ä ©«  á¨­â ªá¨á 
;output:
; ebx - ç¨á«® ¯à®ç¨â ­­ëå ¡ ©â ¨§ ä ©« 
align 4
open_unpac_synt_file:
push eax edi esi
	mov edi, tedit0
	mov [run_file_70.Function], 0
	mov [run_file_70.Position], 0
	mov [run_file_70.Flags], 0
	mov ecx, ted_syntax_file_size
	mov dword[run_file_70.Count], ecx
	m2m dword[run_file_70.Buffer], ted_syntax_file
	mov byte[run_file_70+20], 0
	mov [run_file_70.FileName], file_name
	mcall 70, run_file_70
	cmp ebx,-1
	jne .end_0
		;¥á«¨ ¢®§­¨ª«¨ ®è¨¡ª¨ ¯à¨ ®âªàëâ¨¨ ä ©«  á¨­â ªá¨á 
		mov byte[txt_not_syntax_file.err],'0'
		add byte[txt_not_syntax_file.err],al
		notify_window_run txt_not_syntax_file ;Can-t open color options file!
		jmp @f
	.end_0:
 
		mov eax,ted_syntax_file
		cmp dword[eax],'KPCK'
		jne .end_unpack
 
		mov ecx,dword[eax+4] ;ecx - à §¬¥à ä ©«  á¨­â ªá¨á  ¯®á«¥ à á¯ ª®¢ª¨
		cmp dword[unpac_mem],0
		jne .end_1
			;¯¥à¢®­ ç «ì­®¥ ¢ë¤¥«¥­¨¥ ¢à¥¬¥­­®© ¯ ¬ïâ¨ ¤«ï à á¯ ª®¢ª¨ ä ©« 
			stdcall mem.Alloc,ecx
			mov [unpac_mem],eax
			mov [unpac_mem_size],ecx
		.end_1:
		cmp dword[unpac_mem_size],ecx
		jge .end_2
			;¥á«¨ ¤«ï à á¯ ª®¢ ­®£® ä ©«  ­¥ å¢ â ¥â ¢à¥¬¥­­®© ¯ ¬ïâ¨
			stdcall mem.ReAlloc,[unpac_mem],ecx ;§ ­®¢® ¢ë¤¥«ï¥¬ ¢à¥¬¥­­ãî ¯ ¬ïâì
			mov [unpac_mem],eax
			mov [unpac_mem_size],ecx
		.end_2:
 
		;à á¯ ª®¢ª  ä ©«  ¢® ¢à¥¬¥­­ãî ¯ ¬ïâì
		stdcall unpack,ted_syntax_file,[unpac_mem]
 
		cmp ted_syntax_file_size,ecx
		jge .end_3
			;¥á«¨ ¤«ï à á¯ ª®¢ ­®£® ä ©«  ­¥ å¢ â ¥â ¯ ¬ïâ¨
			stdcall mem.ReAlloc,ted_syntax_file,ecx ;§ ­®¢® ¢ë¤¥«ï¥¬ ¯ ¬ïâì
			mov ted_syntax_file,eax
			mov ted_syntax_file_size,ecx
		.end_3:
 
		;ª®¯¨à®¢ ­¨¥ à á¯ ª®¢ ­­®£® ä ©«  ¨§ ¢à¥¬¥­­®© ¯ ¬ïâ¨ ¢ ¯ ¬ïâì í«¥¬¥­â 
		mov edi,ted_syntax_file
		mov esi,[unpac_mem]
		cld
		rep movsb
 
		.end_unpack:
		;¯à¨¬¥­¥­¨¥ ä ©«  ¯®¤á¢¥âª¨
		stdcall [ted_init_syntax_file], tedit0
	@@:
pop esi edi eax
	ret
 
align 4
txt_not_syntax_file:
	db 'è¨¡ª  ¯à¨ ®âªàëâ¨¨ ä ©«  á æ¢¥â®¢ë¬¨ ­ áâà®©ª ¬¨! (®¤ ®è¨¡ª¨ ='
	.err: db '?'
	db ')',0
 
align 4
buf_fon: ;ä®­®¢ë© ¡ãä¥à
	dd 0 ;ãª § â¥«ì ­  ¡ãä¥à ¨§®¡à ¦¥­¨ï
	dw 310 ;+4 left
	dw 50 ;+6 top
	dd 340 ;+8 w
	dd 280 ;+12 h
	dd 0xffffff ;+16 color
	db 24 ;+20 bit in pixel
 
align 4
buf_font: ;¡ãä¥à ¬ âà¨æë á® èà¨äâ®¬
	dd 0 ;ãª § â¥«ì ­  ¡ãä¥à ¨§®¡à ¦¥­¨ï
	dw 25 ;+4 left
	dw 25 ;+6 top
	dd 96 ;+8 w
	dd 144 ;+12 h
	dd 0 ;+16 color
	db 24 ;+20 bit in pixel
 
align 4
buf_skin1:
	dd 0 ;ãª § â¥«ì ­  ¡ãä¥à ¨§®¡à ¦¥­¨ï
	dw 0 ;+4 left
	dw 0 ;+6 top
	dd SKIN_W1 ;+8 w
	dd SKIN_H ;+12 h
	dd 0 ;+16 color
	db 24 ;+20 bit in pixel
align 4
buf_skin2:
	dd 0 ;ãª § â¥«ì ­  ¡ãä¥à ¨§®¡à ¦¥­¨ï
	dw 0 ;+4 left
	dw 0 ;+6 top
	dd SKIN_W2 ;+8 w
	dd SKIN_H ;+12 h
	dd 0 ;+16 color
	db 24 ;+20 bit in pixel
align 4
buf_skin3:
	dd 0 ;ãª § â¥«ì ­  ¡ãä¥à ¨§®¡à ¦¥­¨ï
	dw 0 ;+4 left
	dw 0 ;+6 top
	dd SKIN_W3 ;+8 w
	dd SKIN_H ;+12 h
	dd 0 ;+16 color
	db 24 ;+20 bit in pixel
 
show_mode db 0 ;à¥¦¨¬ ¤«ï ¯®ª §  ®¯à¥¤¥«¥­­®£® ®ª­ 
txtErrOpen db '¥ ­ ©¤¥­ ä ©«, ¯à®¢¥àìâ¥ ¯à ¢¨«ì­®áâì ¨¬¥­¨',0
txtErrIni1 db '¥ ®âªàë«áï ä ©« á ®¯æ¨ï¬¨',0
err_opn db 0 ;à¥§. ®âªàëâ¨ï ä ©«  ¯à®íªâ 
err_ini0 db 0 ;à¥§. ®âªàëâ¨ï ä ©«  á ¨ª®­ª ¬¨
err_ini1 db 0 ;à¥§. ®âªàëâ¨ï ä ©«  á ®¯æ¨ï¬¨
unpac_mem dd 0
unpac_mem_size dd 0
 
edit1 edit_box 210, 10, 5, 0xffffff, 0xff80, 0xff, 0xff0000, 0x4080, 300, ed_text1, mouse_dd, 0, 7, 7
 
edit2 edit_box 115, 32, 20, 0xffffff, 0x80ff, 0xff, 0x808080, 0, MAX_LEN_OBJ_TXT, ed_text2, mouse_dd, 0
edit3 edit_box 115, 32, 20, 0xffffff, 0x80ff, 0xff, 0x808080, 0, MAX_LEN_OBJ_TXT, ed_text3, mouse_dd, 0
edit4 edit_box 115, 32, 20, 0xffffff, 0x80ff, 0xff, 0x808080, 0, MAX_LEN_OBJ_TXT, ed_text4, mouse_dd, 0
edit5 edit_box 115, 32, 20, 0xffffff, 0x80ff, 0xff, 0x808080, 0, MAX_LEN_OBJ_TXT, ed_text5, mouse_dd, 0
edit6 edit_box 115, 32, 20, 0xffffff, 0x80ff, 0xff, 0x808080, 0, MAX_LEN_OBJ_TXT, ed_text6, mouse_dd, 0
edit7 edit_box 115, 32, 20, 0xffffff, 0x80ff, 0xff, 0x808080, 0, MAX_LEN_OBJ_TXT, ed_text7, mouse_dd, 0
edit8 edit_box 115, 32, 20, 0xffffff, 0x80ff, 0xff, 0x808080, 0, MAX_LEN_OBJ_TXT, ed_text8, mouse_dd, 0
edit9 edit_box 115, 32, 20, 0xffffff, 0x80ff, 0xff, 0x808080, 0, MAX_LEN_OBJ_TXT, ed_text9, mouse_dd, 0
edit10 edit_box 115, 32, 20, 0xffffff, 0x80ff, 0xff, 0x808080, 0, MAX_LEN_OBJ_TXT, ed_text10, mouse_dd, 0
edit11 edit_box 115, 32, 20, 0xffffff, 0x80ff, 0xff, 0x808080, 0, MAX_LEN_OBJ_TXT, ed_text11, mouse_dd, 0
edit12 edit_box 115, 32, 20, 0xffffff, 0x80ff, 0xff, 0x808080, 0, MAX_LEN_OBJ_TXT, ed_text12, mouse_dd, 0
prop_wnd_edits_end: ;ª®­¥æ â¥ªáâ®¢ëå ¯®«¥©, ®â¢¥ç îé¨å §  á¢®©áâ¢ 
 
edit_sav edit_box 210, 310, 30, 0xffffff, 0xff80, 0xff, 0xff0000, 0x4080, 300, ed_text_sav, mouse_dd, 0
 
 
ed_text1 db '/hd0/1/',0
	rb 295
ed_text2 rb MAX_LEN_OBJ_TXT+2
ed_text3 rb MAX_LEN_OBJ_TXT+2
ed_text4 rb MAX_LEN_OBJ_TXT+2
ed_text5 rb MAX_LEN_OBJ_TXT+2
ed_text6 rb MAX_LEN_OBJ_TXT+2
ed_text7 rb MAX_LEN_OBJ_TXT+2
ed_text8 rb MAX_LEN_OBJ_TXT+2
ed_text9 rb MAX_LEN_OBJ_TXT+2
ed_text10 rb MAX_LEN_OBJ_TXT+2
ed_text11 rb MAX_LEN_OBJ_TXT+2
ed_text12 rb MAX_LEN_OBJ_TXT+2
ed_text_sav rb 302
 
txt_null db 'null',0
mouse_dd dd ?
 
el_focus dd tree1
;¤¥à¥¢® á® á¯¨áª®¬ ¢®§¬®¦­ëå â¨¯®¢ ®¡ê¥ªâ®¢
tree1 tree_list sizeof.ObjOpt,20+2, tl_key_no_edit+tl_draw_par_line+tl_list_box_mode,\
	16,16, 0xffffff,0xb0d0ff,0xd000ff, 5,50,125,280, 0,obj_opt.info-obj_opt,0, el_focus,\
	w_scr_t1,on_add_object
;¤¥à¥¢® á ®¡ê¥ªâ ¬¨ ¢ ¯®«ì§®¢ â¥«ìáª®¬ ä ©«¥
tree2 tree_list sizeof.object,MAX_CED_OBJECTS+2, tl_draw_par_line,\
	16,16, 0xffffff,0xb0d0ff,0xd000ff, 155,50,130,280, 13,u_object.txt-u_object,MAX_LEN_OBJ_TXT, el_focus,\
	w_scr_t2,on_file_object_select
 
msgbox_0:
  db 1,0
  db 'Warning',0
  db 'Error saving file!',13,\
     'Maybe the file name is not entered correctly.',13,\
     '  (error code ='
  .err: db '?'
  db ')',0
  db 'Close',0
  db 0
 
msgbox_1:
	db 1,0
	db ':)',0
	db 'File was saved',0
	db 'Ok',0
	db 0
 
struct TexSelect
	x0 dd ?
	y0 dd ?
	x1 dd ?
	y1 dd ?
ends
;------------------------------------------------------------------------------
align 4
tedit0: ;áâàãªâãà  â¥ªáâ®¢®£® à¥¤ ªâ®à 
	.wnd BOX 310,50,325,260 ;+ 0
	.rec BOX 30,13,7,10   ;+16
	.drag_m db 0 ;+32 ¢ë¤¥«¥­¨¥ ®â ¬ëè¨
	.drag_k db 0 ;+33 ¢ë¤¥«¥­¨¥ ®â ª« ¢¨ âãàë
	.sel  TexSelect 0,0,0,0 ;+34 áâàãªâãà  ¢ë¤¥«¥­¨ï
	.seln TexSelect ;+50 ¤®¯®«­¨â¥«ì­ ï áâàãªâãà  ¢ë¤¥«¥­¨ï
	.tex	  dd 0 ;+66 text memory pointer
	.tex_1	  dd 0 ;+70 text first symbol pointer
	.tex_end  dd 0 ;+74 text end memory pointer
	.cur_x	  dd 0 ;+78 ª®®à¤¨­ â  x ªãàá®à 
	.cur_y	  dd 0 ;+82 ª®®à¤¨­ â  y ªãàá®à 
	.max_chars dd 25002 ;+86 ¬ ªá¨¬ «ì­®¥ ç¨á«® á¨¬¢®«®¢ ¢ ®¤­®¬ ¤®ªã¬¥­â¥
	.count_colors_text dd 1 ;+90 ª®««¨ç¥áâ¢® æ¢¥â®¢ â¥ªáâ 
	.count_key_words   dd 0 ;+94 ª®««¨ç¥áâ¢® ª«îç¥¢ëå á«®¢
	.color_cursor	   dd 0xff0000 ;+98 æ¢¥â ªãàá®à 
	.color_wnd_capt    dd 0x0080c0 ;+102 æ¢¥â ¯®«¥© ¢®ªàã£ ®ª­ 
	.color_wnd_work    dd	   0x0 ;+106 æ¢¥â ä®­  ®ª­ 
	.color_wnd_bord    dd 0xffffff ;+110 æ¢¥â â¥ªáâ  ­  ¯®«ïå
	.color_select	   dd 0x0000ff ;+114 æ¢¥â ¢ë¤¥«¥­¨ï
	.color_cur_text    dd 0xffff00 ;+118 æ¢¥â á¨¬¢®«  ¯®¤ ªãàá®à®¬
	.color_wnd_text    dd 0x80ffff ;+122 æ¢¥â â¥ªáâ  ¢ ®ª­¥
	.syntax_file	   dd 0 ;+126 ãª § â¥«ì ­  ­ ç «® ä ©«  á¨­â ªá¨á 
	.syntax_file_size  dd 55*1024 ;+130 ¬ ªá¨¬ «ì­ë© à §¬¥à ä ©«  á¨­â ªá¨á 
	.text_colors	   dd 0 ;+134 ãª § â¥«ì ­  ¬ áá¨¢ æ¢¥â®¢ â¥ªáâ 
	.help_text_f1	   dd 0 ;+138 ãª § â¥«ì ­  â¥ªáâ á¯à ¢ª¨ (¯® ­ ¦ â¨¨ F1)
	.help_id	   dd -1 ;+142 ¨¤¥­â¨ä¨ª â®à ¤«ï á¯à ¢ª¨
	.key_words_data    dd 0 ;+146 ãª § â¥«ì ­  áâàãªâãàë ª«îç¥¢ëå á«®¢ TexColViv
	.tim_ch      dd ? ;+150 ª®«¨ç¥áâ¢® ¨§¬¥­¥­¨© ¢ ä ©«¥
	.tim_undo    dd ? ;+154 ª®«¨ç¥áâ¢® ®â¬¥­¥­­ëå ¤¥©áâ¢¨©
	.tim_ls      dd ? ;+158 ¢à¥¬ï ¯®á«¥¤­¥£® á®åà ­¥­¨ï
	.tim_co      dd ? ;+162 ¢à¥¬ï ¯®á«¥¤­¥© æ¢¥â®¢®© à §¬¥âª¨
	.el_focus    dd el_focus ;+166 ãª § â¥«ì ­  ¯¥à¥¬¥­­ãî í«¥¬¥­â  ¢ ä®ªãá¥
	.err_save    db 0 ;+170 ®è¨¡ª  á®åà ­¥­¨ï ä ©« 
	.panel_id    db 0 ;+171 ­®¬¥à ®âªàëâ®© ¯ ­¥«¨
	.key_new     db 0 ;+172 á¨¬¢®«, ª®â®àë© ¡ã¤¥â ¤®¡ ¢«ïâáï á ª« ¢¨ âãàë
	.symbol_new_line db 20 ;+173 á¨¬¢®« § ¢¥àè¥­¨ï áâà®ª¨
	.scr_w	     dd scrol_w1 ;+174 ¢¥àâ¨ª «ì­ë© áªà®««¨­£
	.scr_h	     dd scrol_h1 ;+178 £®à¨§®­â «ì­ë© áªà®««¨­£
	.arr_key_pos dd 0 ;+182 ãª § â¥«ì ­  ¬ áá¨¢ ¯®§¨æ¨© ª«îç¥¢ëå á«®¢
	.buffer      dd text_buffer ;+186 ãª § â¥«ì ­  ¡ãä¥à ª®¯¨à®¢ ­¨ï/¢áâ ¢ª¨
	.buffer_find dd 0 ;+190 ãª § â¥«ì ­  ¡ãä¥à ¤«ï ¯®¨áª 
	.cur_ins     db 1 ;+194 à¥¦¨¬ à ¡®âë ªãàá®à  (®¡ëç­ë© ¨«¨ § ¬¥­ )
	.mode_color  db 1 ;+195 à¥¦¨¬ ¢ë¤¥«¥­¨ï á«®¢ æ¢¥â®¬ (0-¢ëª«. 1-¢ª«.)
	.mode_invis  db 0 ;+196 à¥¦¨¬ ¯®ª §  ­¥¯¥ç â ¥¬ëå á¨¬¢®«®¢
	.gp_opt      db 0 ;+197 ®¯æ¨¨ ¢®§¢à é ¥¬ë¥ äã­ªæ¨¥© ted_get_pos_by_cursor
	.fun_on_key_ctrl_o dd but_ctrl_o ;+198 ãª § â¥«ì ­  äã­ªæ¨î ¢ë§ë¢ ¥¬ãî ¯à¨ ­ ¦ â¨¨ Ctrl+O (®âªàëâ¨¥ ä ©« )
	.fun_on_key_ctrl_f dd 0 ;+202 ... Ctrl+F (¢ë§®¢ /áªàëâ¨ï ¯ ­¥«¨ ¯®¨áª )
	.fun_on_key_ctrl_n dd but_ctrl_n ;+206 ... Ctrl+N (á®§¤ ­¨¥ ­®¢®£® ¤®ªã¬¥­â )
	.fun_on_key_ctrl_s dd 0 ;+210 ... Ctrl+S
	.buffer_size	   dd BUF_SIZE ;+214 à §¬¥à ¡ãä¥à  ª®¯¨à®¢ ­¨ï/¢áâ ¢ª¨
	.fun_find_err	   dd 0 ;+218 ãª § â¥«ì ­  äã­ªæ¨î ¢ë§ë¢ ¥¬ãî ¥á«¨ ¯®¨áª § ª®­ç¨«áï ­¥ã¤ ç­®
	.fun_init_synt_err dd 0 ;+222 ãª § â¥«ì ­  äã­ªæ¨î ¢ë§ë¢ ¥¬ãî ¯à¨ ®è¨¡®ç­®¬ ®âªàëâ¨¨ ä ©«  á¨­â ªá¨á 
	.fun_draw_panel_buttons dd 0 ;+226 ãª § â¥«ì ­  äã­ªæ¨î à¨á®¢ ­¨ï ¯ ­¥«¨ á ª­®¯ª ¬¨
	.fun_draw_panel_find	dd 0 ;+230 ãª § â¥«ì ­  äã­ªæ¨î à¨á®¢ ­¨ï ¯ ­¥«¨ ¯®¨áª 
	.fun_draw_panel_syntax	dd 0 ;+234 ãª § â¥«ì ­  äã­ªæ¨î à¨á®¢ ­¨ï ¯ ­¥«¨ á¨­â ªá¨á 
	.fun_save_err		dd ted_save_err_msg ;+238 ãª § â¥«ì ­  äã­ªæ¨î ¢ë§ë¢ ¥¬ãî ¥á«¨ á®åà ­¥­¨¥ ä ©«  § ª®­ç¨«®áì ­¥ã¤ ç­®
	.increase_size dd 1000 ;+242 ç¨á«® á¨¬¢®«®¢ ­  ª®â®àë¥ ¡ã¤¥â ã¢¥ç¨¢ âìáï ¯ ¬ïâì ¯à¨ ­¥å¢ âª¥
	.ptr_free_symb dd ? ;+246 ãª § â¥«ì ­  á¢®¡®¤­ãî ¯ ¬ïâì, ¢ ª®â®àãî ¬®¦­® ¤®¡ ¢«ïâì á¨¬¢®« (¨á¯®«ì§ã¥âáï ¢­ãâà¨ í«¥¬¥­â  ¤«ï ãáª®à¥­¨ï ¢áâ ¢ª¨ â¥ªáâ )
;------------------------------------------------------------------------------
align 4
scrol_w1:
.x:
.size_x   dw 16 ;+0
.start_x  dw 85 ;+2
.y:
.size_y   dw 100 ; +4
.start_y  dw  15 ; +6
.btn_high dd  15 ; +8
.type	  dd   1 ;+12
.max_area dd 100 ;+16
rb 4+4
.bckg_col dd 0xeeeeee ;+28
.frnt_col dd 0xbbddff ;+32
.line_col dd 0x808080 ;+36
.redraw   dd   0 ;+40
.delta	  dw   0 ;+44
.delta2   dw   0 ;+46
.run_x:
 
 
rb 32
 
 
 
 
 
 
 
 
.all_redraw dd 0 ;+80
.ar_offset  dd 1 ;+84
;---------------------------------------------------------------------
align 4
scrol_h1:
.x:
.size_x     dw 85 ;+0
.start_x    dw 30 ;+2
.y:
.size_y     dw 16 ;+4
.start_y    dw 100 ;+6
.btn_high   dd 15 ;+8
.type	    dd 1  ;+12
.max_area   dd 100 ;+16
rb 4+4
.bckg_col   dd 0xeeeeee ;+28
.frnt_col   dd 0xbbddff ;+32
.line_col   dd 0x808080 ;+36
.redraw     dd 0  ;+40
.delta	    dw 0  ;+44
.delta2     dw 0  ;+46
.run_x:
 
 
rb 32
 
 
 
 
 
 
 
 
.all_redraw dd 0 ;+80
.ar_offset  dd 1 ;+84
 
 
 
align 4
w_scr_t1:
.size_x     dw 16 ;+0
rb 2+2+2
.btn_high   dd 15 ;+8
.type	    dd 1  ;+12
.max_area   dd 100  ;+16
rb 4+4
.bckg_col   dd 0xeeeeee ;+28
.frnt_col   dd 0xbbddff ;+32
.line_col   dd 0  ;+36
rb 4+2+2
.run_x:
rb 32
.all_redraw dd 0 ;+80
.ar_offset  dd 1 ;+84
 
align 4
w_scr_t2:
.size_x     dw 16 ;+0
rb 2+2+2
.btn_high   dd 15 ;+8
.type	    dd 1  ;+12
.max_area   dd 100  ;+16
rb 4+4
.bckg_col   dd 0xeeeeee ;+28
.frnt_col   dd 0xbbddff ;+32
.line_col   dd 0  ;+36
rb 4+2+2
.run_x:
rb 32
.all_redraw dd 0 ;+80
.ar_offset  dd 1 ;+84
 
data_of_code dd 0
sc system_colors
 
image_data dd 0 ;¯ ¬ïâì ¤«ï ¯à¥®¡à §®¢ ­¨ï ª àâ¨­ª¨ äã­ªæ¨ï¬¨ libimg
 
ced_info object 0 ;on start == 0
	rb sizeof.object*(MAX_CED_OBJECTS-1)
 
text_buffer db BUF_SIZE dup(0)
fn_obj_opt db 'ob_o.opt',0
obj_opt ObjOpt
	rb sizeof.ObjOpt*(MAX_OBJ_TYPES-1)+MAX_OBJ_CAPTIONS
	db 0 ;eof options
 
cur_x dd 0
cur_y dd 0
foc_obj dd 0 ;®¡ê¥ªâ ¢ ä®ªãá¥
obj_count_txt_props dd 0 ;ª®«¨ç¥áâ¢® ¨á¯®«ì§ã¥¬ëå â¥ªáâ®¢ëå á¢®©áâ¢
obj_m_win dd 0 ;áâàãªâãà  £« ¢­®£® ®ª­ 
 
 
 
;
if 1 ;lang eq ru
 
	err_message_found_lib0 db '¥ ­ ©¤¥­  ¡¨¡«¨®â¥ª  box_lib.obj',0  ;áâà®ª , ª®â®à ï ¡ã¤¥â ¢ áä®à¬¨à®¢ ­­®¬ ®ª­¥, ¥á«¨ ¡¨¡«¨®â¥ª  ­¥ ¡ã¤¥â ­ ©¤¥­ 
	err_message_import0 db 'è¨¡ª  ¯à¨ ¨¬¯®àâ¥ ¡¨¡«¨®â¥ª¨ box_lib.obj',0
	err_message_found_lib1 db '¥ ­ ©¤¥­  ¡¨¡«¨®â¥ª  proc_lib.obj',0
	err_message_import1 db 'è¨¡ª  ¯à¨ ¨¬¯®àâ¥ ¡¨¡«¨®â¥ª¨ proc_lib.obj',0
	err_message_found_lib2 db '¥ ã¤ «®áì ­ ©â¨ ¡¨¡«¨®â¥ªã buf2d.obj',0
	err_message_import2 db 'è¨¡ª  ¯à¨ ¨¬¯®àâ¥ ¡¨¡«¨®â¥ª¨ buf2d.obj',0
	err_message_found_lib3 db '¥ ã¤ «®áì ­ ©â¨ ¡¨¡«¨®â¥ªã libimg.obj',0
	err_message_import3 db 'è¨¡ª  ¯à¨ ¨¬¯®àâ¥ ¡¨¡«¨®â¥ª¨ libimg.obj',0
	err_message_found_lib4 db '¥ ã¤ «®áì ­ ©â¨ ¡¨¡«¨®â¥ªã msgbox.obj',0
	err_message_import4 db 'è¨¡ª  ¯à¨ ¨¬¯®àâ¥ ¡¨¡«¨®â¥ª¨ msgbox.obj',0
 
	head_f_i:
	head_f_l db '¨áâ¥¬­ ï ®è¨¡ª ',0 ;§ £®«®¢®ª ®ª­ , ¯à¨ ¢®§­¨ª­®¢¥­¨¨ ®è¨¡ª¨
else
 
	err_message_found_lib0 db 'Sorry I cannot found library box_lib.obj',0
	err_message_import0 db 'Error on load import library box_lib.obj',0
	err_message_found_lib1 db 'Sorry I cannot found library proc_lib.obj',0
	err_message_import1 db 'Error on load import library proc_lib.obj',0
	err_message_found_lib2 db 'Sorry I cannot found library buf2d.obj',0
	err_message_import2 db 'Error on load import library buf2d.obj',0
	err_message_found_lib3 db 'Sorry I cannot found library libimg.obj',0
	err_message_import3 db 'Error on load import library libimg.obj',0
	err_message_found_lib4 db 'Sorry I cannot found library msgbox.obj',0
	err_message_import4 db 'Error on load import library msgbox.obj',0
 
	head_f_i:
	head_f_l db 'System error',0 ;§ £®«®¢®ª ®ª­ , ¯à¨ ¢®§­¨ª­®¢¥­¨¨ ®è¨¡ª¨
end if
 
	system_dir0 db '/sys/lib/'
	lib0_name db 'box_lib.obj',0
 
	system_dir1 db '/sys/lib/'
	lib1_name db 'proc_lib.obj',0
 
	system_dir2 db '/sys/lib/'
	lib2_name db 'buf2d.obj',0
 
	system_dir3 db '/sys/lib/'
	lib3_name db 'libimg.obj',0
 
	system_dir4 db '/sys/lib/'
	lib4_name db 'msgbox.obj',0
 
align 4
import_buf2d_lib:
	dd sz_lib_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	
dd 0,0
	sz_lib_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 ;à¨á®¢ ­¨¥ ¯àï¬®ã£®«ì­¨ª , 2-ï ª®®à¤¨­ â  § ¤ ­  ¯® à §¬¥àã
	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
 
align 4
import_box_lib:
	dd alib_init2
 
	edit_box_draw dd aEdit_box_draw
	edit_box_key dd aEdit_box_key
	edit_box_mouse dd aEdit_box_mouse
	edit_box_set_text dd aEdit_box_set_text
 
	init_checkbox dd aInit_checkbox
	check_box_draw dd aCheck_box_draw
	check_box_mouse dd aCheck_box_mouse
 
	scrollbar_ver_draw dd aScrollbar_ver_draw
	scrollbar_hor_draw dd aScrollbar_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
 
	ted_but_save_file dd sz_ted_but_save_file
	ted_but_sumb_upper dd sz_ted_but_sumb_upper
	ted_but_sumb_lover dd sz_ted_but_sumb_lover
	ted_can_save dd sz_ted_can_save
	ted_clear dd sz_ted_clear
	ted_delete dd sz_ted_delete
	ted_draw dd sz_ted_draw
	ted_init dd sz_ted_init
	ted_init_scroll_bars dd sz_ted_init_scroll_bars
	ted_init_syntax_file dd sz_ted_init_syntax_file
	ted_is_select dd sz_ted_is_select
	ted_key dd sz_ted_key
	ted_mouse dd sz_ted_mouse
	ted_open_file dd sz_ted_open_file
	ted_text_add dd sz_ted_text_add
	ted_but_select_word dd sz_ted_but_select_word
	ted_but_cut dd sz_ted_but_cut
	ted_but_copy dd sz_ted_but_copy
	ted_but_paste dd sz_ted_but_paste
	ted_but_undo dd sz_ted_but_undo
	ted_but_redo dd sz_ted_but_redo
	ted_but_reverse dd sz_ted_but_reverse
	ted_but_find_next dd sz_ted_but_find_next
	ted_text_colored dd sz_ted_text_colored
	;version_text_edit dd sz_ted_version
 
dd 0,0
 
	alib_init2 db 'lib_init',0
 
	aEdit_box_draw	db 'edit_box',0
	aEdit_box_key	db 'edit_box_key',0
	aEdit_box_mouse db 'edit_box_mouse',0
	aEdit_box_set_text db 'edit_box_set_text',0
 
	aInit_checkbox db 'init_checkbox2',0
	aCheck_box_draw db 'check_box_draw2',0
	aCheck_box_mouse db 'check_box_mouse2',0
 
	aScrollbar_ver_draw  db 'scrollbar_v_draw',0
	aScrollbar_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
 
	sz_ted_but_save_file	db 'ted_but_save_file',0
	sz_ted_but_sumb_upper	db 'ted_but_sumb_upper',0
	sz_ted_but_sumb_lover	db 'ted_but_sumb_lover',0
	sz_ted_can_save 		db 'ted_can_save',0
	sz_ted_clear			db 'ted_clear',0
	sz_ted_delete			db 'ted_delete',0
	sz_ted_draw				db 'ted_draw',0
	sz_ted_init				db 'ted_init',0
	sz_ted_init_scroll_bars db 'ted_init_scroll_bars',0
	sz_ted_init_syntax_file db 'ted_init_syntax_file',0
	sz_ted_is_select		db 'ted_is_select',0
	sz_ted_key				db 'ted_key',0
	sz_ted_mouse			db 'ted_mouse',0
	sz_ted_open_file		db 'ted_open_file',0
	sz_ted_text_add 		db 'ted_text_add',0
	sz_ted_but_select_word	db 'ted_but_select_word',0
	sz_ted_but_cut			db 'ted_but_cut',0
	sz_ted_but_copy 		db 'ted_but_copy',0
	sz_ted_but_paste		db 'ted_but_paste',0
	sz_ted_but_undo 		db 'ted_but_undo',0
	sz_ted_but_redo 		db 'ted_but_redo',0
	sz_ted_but_reverse		db 'ted_but_reverse',0
	sz_ted_but_find_next	db 'ted_but_find_next',0
	sz_ted_text_colored		db 'ted_text_colored',0
	;sz_ted_version db 'version_text_edit',0
 
align 4
import_proc_lib:
	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_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
import_msgbox_lib:
	mb_create dd amb_create
	mb_reinit dd amb_reinit
	mb_setfunctions dd amb_setfunctions
dd 0,0
	amb_create db 'mb_create',0
	amb_reinit db 'mb_reinit',0
	amb_setfunctions db 'mb_setfunctions',0
 
;library structures
l_libs_start:
	lib0 l_libs lib0_name, sys_path, library_path, system_dir0, err_message_found_lib0, head_f_l, import_box_lib, err_message_import0, head_f_i
	lib1 l_libs lib1_name, sys_path, library_path, system_dir1, err_message_found_lib1, head_f_l, import_proc_lib,err_message_import1, head_f_i
	lib2 l_libs lib2_name, sys_path, library_path, system_dir2, err_message_found_lib2, head_f_l, import_buf2d_lib, err_message_import2, head_f_i
	lib3 l_libs lib3_name, sys_path, library_path, system_dir3, err_message_found_lib3, head_f_l, import_libimg, err_message_import3, head_f_i
	lib4 l_libs lib4_name, sys_path, library_path, system_dir4, err_message_found_lib4, head_f_l, import_msgbox_lib, err_message_import4, head_f_i
load_lib_end:
 
 
align 16
procinfo process_information
run_file_70 FileInfoBlock
open_b rb 560
 
IncludeIGlobals
i_end:
IncludeUGlobals
	buf_cmd_lin rb 1024
	file_name rb 1024 ;icon file path
	fp_obj_opt rb 1024 ;obj options file patch
	rb 1024
	prop_thread:
	rb 1024
	thread: ;¢¢¥àåã ¤®ç¥à­¨© áâ¥ª ¤«ï ®ª­  á®®¡é¥­¨ï
	rb 1024
stacktop: ;¢¢¥àåã áâ¥ª ®á­®¢­®© ¯à®£à ¬¬ë
	sys_path rb 1024
	library_path rb 1024
mem:

Rev 3465	Rev 3475
1	use32	1	use32
2	org 0x0	2	org 0x0
3	db 'MENUET01'	3	db 'MENUET01'
4	dd 0x1	4	dd 0x1
5	dd start	5	dd start
6	dd i_end	6	dd i_end
7	dd mem	7	dd mem
8	dd stacktop	8	dd stacktop
9	dd buf_cmd_lin	9	dd buf_cmd_lin
10	dd sys_path	10	dd sys_path
11		11
12	include '../../macros.inc'	12	include '../../macros.inc'
13	include '../../proc32.inc'	13	include '../../proc32.inc'
14	include '../../develop/libraries/box_lib/load_lib.mac'	14	include '../../develop/libraries/box_lib/load_lib.mac'
15	include '../../develop/libraries/box_lib/trunk/box_lib.mac'	15	include '../../develop/libraries/box_lib/trunk/box_lib.mac'
16	include '../../dll.inc'	16	include '../../dll.inc'
-		17	include '../../system/desktop/trunk/kglobals.inc'
-		18	include '../../system/desktop/trunk/unpacker.inc'
17	include 'strlen.inc'	19	include 'strlen.inc'
18	include 'obj_codes.inc'	20	include 'obj_codes.inc'
19		21
20	@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc, dll.Load	22	@use_library_mem mem.Alloc,mem.Free,mem.ReAlloc, dll.Load
21		23
22	hed db 'kol_f_edit 11.04.13',0	24	hed db 'kol_f_edit 17.04.13',0
23		25
24	sizeof.TreeList equ 20 ;need for element 'tree_list'	26	sizeof.TreeList equ 20 ;need for element 'tree_list'
25		27
26	BUF_STRUCT_SIZE equ 21	28	BUF_STRUCT_SIZE equ 21
27	buf2d_data equ dword[edi] ;¤ ë¥ ¡ãä¥à ¨§®¡à ¦¥¨ï	29	buf2d_data equ dword[edi] ;¤ ë¥ ¡ãä¥à ¨§®¡à ¦¥¨ï
28	buf2d_w equ dword[edi+8] ;è¨à¨ ¡ãä¥à	30	buf2d_w equ dword[edi+8] ;è¨à¨ ¡ãä¥à
29	buf2d_h equ dword[edi+12] ;¢ëá®â ¡ãä¥à	31	buf2d_h equ dword[edi+12] ;¢ëá®â ¡ãä¥à
30	buf2d_l equ word[edi+4] ;®âáâã¯ á«¥¢	32	buf2d_l equ word[edi+4] ;®âáâã¯ á«¥¢
31	buf2d_t equ word[edi+6] ;®âáâã¯ á¢¥àåã	33	buf2d_t equ word[edi+6] ;®âáâã¯ á¢¥àåã
32	buf2d_size_lt equ dword[edi+4] ;®âáâã¯ á«¥¢ ¨ á¯à ¢ ¤«ï ¡ãä¥à	34	buf2d_size_lt equ dword[edi+4] ;®âáâã¯ á«¥¢ ¨ á¯à ¢ ¤«ï ¡ãä¥à
33	buf2d_color equ dword[edi+16] ;æ¢¥â ä® ¡ãä¥à	35	buf2d_color equ dword[edi+16] ;æ¢¥â ä® ¡ãä¥à
34	buf2d_bits equ byte[edi+20] ;ª®«¨ç¥áâ¢® ¡¨â ¢ 1-© â®çª¥ ¨§®¡à ¦¥¨ï	36	buf2d_bits equ byte[edi+20] ;ª®«¨ç¥áâ¢® ¡¨â ¢ 1-© â®çª¥ ¨§®¡à ¦¥¨ï
35		37
36		38
37	MAX_CED_OBJECTS equ 200	39	MAX_CED_OBJECTS equ 200
38	MAX_OPT_FIELDS equ 11	40	MAX_OPT_FIELDS equ 11
39	MAX_OBJ_TYPES equ 17 ;¬ ªá¨¬ «ì®¥ ç¨á«® ®¡ê¥ªâ®¢	41	MAX_OBJ_TYPES equ 17 ;¬ ªá¨¬ «ì®¥ ç¨á«® ®¡ê¥ªâ®¢
40	MAX_OBJ_CAPTIONS equ 1000 ;à §¬¥à ¤®¯®«¨â¥«ìëå ¯®¤¯¨á¥© ¯®¤¯¨á¥©	42	MAX_OBJ_CAPTIONS equ 1000 ;à §¬¥à ¤®¯®«¨â¥«ìëå ¯®¤¯¨á¥© ¯®¤¯¨á¥©
41	WND_CAPT_COLOR equ 0xb0d0ff	43	WND_CAPT_COLOR equ 0xb0d0ff
42	BUF_SIZE equ 1000	44	BUF_SIZE equ 1000
43		45
44	;modif	46	;modif
45	BIT_MOD_ACI equ 0 ;¯¥à¢® ç «ìë¥ áâà®©ª¨ í«¥¬¥â®¢	47	BIT_MOD_ACI equ 0 ;¯¥à¢® ç «ìë¥ áâà®©ª¨ í«¥¬¥â®¢
46	BIT_MOD_ACM equ 1 ;á®¡ëâ¨ï ®â ¬ëè¨	48	BIT_MOD_ACM equ 1 ;á®¡ëâ¨ï ®â ¬ëè¨
47	BIT_MOD_ACD equ 2 ;¤ ë¥ ®¡ê¥ªâ®¢	49	BIT_MOD_ACD equ 2 ;¤ ë¥ ®¡ê¥ªâ®¢
48	BIT_MOD_ABU equ 3 ;á¢ï§ë¢ ¨¥ ª®¯®ª	50	BIT_MOD_ABU equ 3 ;á¢ï§ë¢ ¨¥ ª®¯®ª
49	BIT_MOD_WI_CAPT equ 0 ;áâ¨«ì ®ª ¯®¤¯¨áì	51	BIT_MOD_WI_CAPT equ 0 ;áâ¨«ì ®ª ¯®¤¯¨áì
50	BIT_MOD_WI_CORD_OTN_CL_OBL equ 1 ;áâ¨«ì ®ª ª®®à¤¨ âë ®â®á¨â¥«ì® ª«¨¥âáª®© ®¡« áâ¨	52	BIT_MOD_WI_CORD_OTN_CL_OBL equ 1 ;áâ¨«ì ®ª ª®®à¤¨ âë ®â®á¨â¥«ì® ª«¨¥âáª®© ®¡« áâ¨
51	BIT_MOD_WI_REDR equ 2 ;áâ¨«ì ®ª ¯¥à¥à¨á®¢ª ®ª	53	BIT_MOD_WI_REDR equ 2 ;áâ¨«ì ®ª ¯¥à¥à¨á®¢ª ®ª
52	BIT_MOD_WI_GRAD equ 3 ;áâ¨«ì ®ª £à ¤¨¥â	54	BIT_MOD_WI_GRAD equ 3 ;áâ¨«ì ®ª £à ¤¨¥â
53	BIT_MOD_CHE equ 0 ; ch_flag_en - ¢ë¡à CheckBox	55	BIT_MOD_CHE equ 0 ; ch_flag_en - ¢ë¡à CheckBox
54	BIT_MOD_CHE_T equ 1 ;á¢¥àåã	56	BIT_MOD_CHE_T equ 1 ;á¢¥àåã
55	BIT_MOD_CHE_M equ 2 ;¯® æ¥âàã	57	BIT_MOD_CHE_M equ 2 ;¯® æ¥âàã
56	BIT_MOD_CHE_B equ 3 ;á¨§ã	58	BIT_MOD_CHE_B equ 3 ;á¨§ã
57	BIT_MOD_TXT_ASCII_0 equ 0 ;â¥ªáâ § ª ç¨¢. 0	59	BIT_MOD_TXT_ASCII_0 equ 0 ;â¥ªáâ § ª ç¨¢. 0
58	BIT_MOD_TXT_NO_TRAN equ 1 ;â¥ªáâ ¯à®§à çë©	60	BIT_MOD_TXT_NO_TRAN equ 1 ;â¥ªáâ ¯à®§à çë©
59	BIT_MOD_TXT_CHAR2 equ 2 ;â¥ªáâ 2-¬ èà¨äâ®¬	61	BIT_MOD_TXT_CHAR2 equ 2 ;â¥ªáâ 2-¬ èà¨äâ®¬
60	BIT_MOD_EDIT_FOC equ 0 ;EditBox ¢ ä®ªãá¥	62	BIT_MOD_EDIT_FOC equ 0 ;EditBox ¢ ä®ªãá¥
61	BIT_MOD_EDIT_FIO equ 1 ;	63	BIT_MOD_EDIT_FIO equ 1 ;
62	;CPP_MOD_RE_GR equ 1 ;£à ¤¨¥âë© ¯àï¬®ã£®«ì¨ª	64	;CPP_MOD_RE_GR equ 1 ;£à ¤¨¥âë© ¯àï¬®ã£®«ì¨ª
63	BIT_MOD_BUT_NFON equ 0 ;áâ¨«ì Button ¥ à¨á®¢ âì ª®¯ªã	65	BIT_MOD_BUT_NFON equ 0 ;áâ¨«ì Button ¥ à¨á®¢ âì ª®¯ªã
64	BIT_MOD_BUT_NBORD equ 1 ;áâ¨«ì Button ¥ à¨á®¢ âì £à ¨æã	66	BIT_MOD_BUT_NBORD equ 1 ;áâ¨«ì Button ¥ à¨á®¢ âì £à ¨æã
65	BIT_MOD_IMPORT_FUNCT_COMMENT equ 0 ;ª®¬¥â¨à®¢ âì äãªæ¨î	67	BIT_MOD_IMPORT_FUNCT_COMMENT equ 0 ;ª®¬¥â¨à®¢ âì äãªæ¨î
66		68
67	macro load_image_file path,buf,size { ;¬ ªà®á ¤«ï § £àã§ª¨ ¨§®¡à ¦¥¨©	69	macro load_image_file path,buf,size { ;¬ ªà®á ¤«ï § £àã§ª¨ ¨§®¡à ¦¥¨©
68	;path - ¬®¦¥â ¡ëâì ¯¥à¥¬¥®© ¨«¨ áâà®ª®¢ë¬ ¯ à ¬¥âà®¬	70	;path - ¬®¦¥â ¡ëâì ¯¥à¥¬¥®© ¨«¨ áâà®ª®¢ë¬ ¯ à ¬¥âà®¬
69	if path eqtype '' ;¯à®¢¥àï¥¬ § ¤ «¨ áâà®ª®© ¯ à ¬¥âà path	71	if path eqtype '' ;¯à®¢¥àï¥¬ § ¤ «¨ áâà®ª®© ¯ à ¬¥âà path
70	jmp @f	72	jmp @f
71	local .path_str	73	local .path_str
72	.path_str db path ;ä®à¬¨àã¥¬ «®ª «ìãî ¯¥à¥¬¥ãî	74	.path_str db path ;ä®à¬¨àã¥¬ «®ª «ìãî ¯¥à¥¬¥ãî
73	db 0	75	db 0
74	@@:	76	@@:
75	;32 - áâ ¤ àâë© ¤à¥á ¯® ª®â®à®¬ã ¤®«¦¥ ¡ëâì ¡ãä¥à á á¨áâ¥¬ë¬ ¯ãâ¥¬	77	;32 - áâ ¤ àâë© ¤à¥á ¯® ª®â®à®¬ã ¤®«¦¥ ¡ëâì ¡ãä¥à á á¨áâ¥¬ë¬ ¯ãâ¥¬
76	copy_path .path_str,[32],file_name,0x0	78	copy_path .path_str,[32],file_name,0x0
77	else	79	else
78	copy_path path,[32],file_name,0x0 ;ä®à¬¨àã¥¬ ¯®«ë© ¯ãâì ª ä ©«ã ¨§®¡à ¦¥¨ï, ¯®¤à §ã¬¥¢ ¥¬ çâ® ® ¢ ®¤®© ¯ ¯ª¥ á ¯à®£à ¬¬®©	80	copy_path path,[32],file_name,0x0 ;ä®à¬¨àã¥¬ ¯®«ë© ¯ãâì ª ä ©«ã ¨§®¡à ¦¥¨ï, ¯®¤à §ã¬¥¢ ¥¬ çâ® ® ¢ ®¤®© ¯ ¯ª¥ á ¯à®£à ¬¬®©
79	end if	81	end if
80		82
81	stdcall mem.Alloc, dword size ;¢ë¤¥«ï¥¬ ¯ ¬ïâì ¤«ï ¨§®¡à ¦¥¨ï	83	stdcall mem.Alloc, dword size ;¢ë¤¥«ï¥¬ ¯ ¬ïâì ¤«ï ¨§®¡à ¦¥¨ï
82	mov [buf],eax	84	mov [buf],eax
83		85
84	mov eax,70 ;70-ï äãªæ¨ï à ¡®â á ä ©« ¬¨	86	mov eax,70 ;70-ï äãªæ¨ï à ¡®â á ä ©« ¬¨
85	mov [run_file_70.Function], 0	87	mov [run_file_70.Function], 0
86	mov [run_file_70.Position], 0	88	mov [run_file_70.Position], 0
87	mov [run_file_70.Flags], 0	89	mov [run_file_70.Flags], 0
88	mov [run_file_70.Count], dword size	90	mov [run_file_70.Count], dword size
89	m2m [run_file_70.Buffer], [buf]	91	m2m [run_file_70.Buffer], [buf]
90	mov byte[run_file_70+20], 0	92	mov byte[run_file_70+20], 0
91	mov [run_file_70.FileName], file_name	93	mov [run_file_70.FileName], file_name
92	mov ebx,run_file_70	94	mov ebx,run_file_70
93	int 0x40 ;§ £àã¦ ¥¬ ä ©« ¨§®¡à ¦¥¨ï	95	int 0x40 ;§ £àã¦ ¥¬ ä ©« ¨§®¡à ¦¥¨ï
94	cmp ebx,0xffffffff	96	cmp ebx,0xffffffff
95	je @f	97	je @f
96	;®¯à¥¤¥«ï¥¬ ¢¨¤ ¨§®¡à ¦¥¨ï ¨ ¯¥à¥¢®¤¨¬ ¥£® ¢® ¢à¥¬¥ë© ¡ãä¥à image_data	98	;®¯à¥¤¥«ï¥¬ ¢¨¤ ¨§®¡à ¦¥¨ï ¨ ¯¥à¥¢®¤¨¬ ¥£® ¢® ¢à¥¬¥ë© ¡ãä¥à image_data
97	stdcall dword[img_decode], dword[buf],ebx,0	99	stdcall dword[img_decode], dword[buf],ebx,0
98	mov dword[image_data],eax	100	mov dword[image_data],eax
99	;¯à¥®¡à §ã¥¬ ¨§®¡à ¦¥¨¥ ª ä®à¬ âã rgb	101	;¯à¥®¡à §ã¥¬ ¨§®¡à ¦¥¨¥ ª ä®à¬ âã rgb
100	stdcall dword[img_to_rgb2], dword[image_data],dword[buf]	102	stdcall dword[img_to_rgb2], dword[image_data],dword[buf]
101	;ã¤ «ï¥¬ ¢à¥¬¥ë© ¡ãä¥à image_data	103	;ã¤ «ï¥¬ ¢à¥¬¥ë© ¡ãä¥à image_data
102	stdcall dword[img_destroy], dword[image_data]	104	stdcall dword[img_destroy], dword[image_data]
103	@@:	105	@@:
104	}	106	}
105		107
106	struct FileInfoBlock	108	struct FileInfoBlock
107	Function dd ?	109	Function dd ?
108	Position dd ?	110	Position dd ?
109	Flags dd ?	111	Flags dd ?
110	Count dd ?	112	Count dd ?
111	Buffer dd ?	113	Buffer dd ?
112	rezerv db ?	114	rezerv db ?
113	FileName dd ?	115	FileName dd ?
114	ends	116	ends
115		117
116	struct object	118	struct object
117	id dd ? ;¨¤¥â¨ä¨ª â®à ®¡ê¥ªâ	119	id dd ? ;¨¤¥â¨ä¨ª â®à ®¡ê¥ªâ
118	txt rb MAX_LEN_OBJ_TXT ;â¥ªáâ®¢ë¥ á¢®©áâ¢	120	txt rb MAX_LEN_OBJ_TXT ;â¥ªáâ®¢ë¥ á¢®©áâ¢
119	lvl db 0	121	lvl db 0
120	clo db 0	122	clo db 0
121	typid dd ? ;®¬¥à ®¡ê¥ªâ ®¯à¥¤¥«ïîé¥£® â¨¯ ¯¥à¥¬¥®©	123	typid dd ? ;®¬¥à ®¡ê¥ªâ ®¯à¥¤¥«ïîé¥£® â¨¯ ¯¥à¥¬¥®©
122	modif dd ? ;¡¨â®¢ë¥ á¢®©áâ¢	124	modif dd ? ;¡¨â®¢ë¥ á¢®©áâ¢
123	ends	125	ends
124		126
125	struct ObjOpt	127	struct ObjOpt
126	dd ?	128	dd ?
127	bl_type db ?	129	bl_type db ?
128	graph db ?	130	graph db ?
129	info rb 30	131	info rb 30
130	caption rb MAX_OPT_CAPTION	132	caption rb MAX_OPT_CAPTION
131	Col rw MAX_OPT_FIELDS	133	Col rw MAX_OPT_FIELDS
132	img rw MAX_OPT_FIELDS ;¨¤¥ªáë ª àâ¨®ª (¢ ä ©«¥ 'icon.bmp')	134	img rw MAX_OPT_FIELDS ;¨¤¥ªáë ª àâ¨®ª (¢ ä ©«¥ 'icon.bmp')
133	bit_prop dd 0 ;¡¨â®¢ë¥ á¢®©áâ¢ (¯®¤¯¨á¨, §¢ ¨ï)	135	bit_prop dd 0 ;¡¨â®¢ë¥ á¢®©áâ¢ (¯®¤¯¨á¨, §¢ ¨ï)
134	bit_val dd 0 ;¡¨â®¢ë¥ á¢®©áâ¢ (§ ç¥¨ï, ª®áâ âë)	136	bit_val dd 0 ;¡¨â®¢ë¥ á¢®©áâ¢ (§ ç¥¨ï, ª®áâ âë)
135	ends	137	ends
136		138
137	SKIN_H equ 22	139	SKIN_H equ 22
138	SKIN_W1 equ 5	140	SKIN_W1 equ 5
139	SKIN_W2 equ 7	141	SKIN_W2 equ 7
140	SKIN_W3 equ 23	142	SKIN_W3 equ 23
141	fn_skin_1 db 'left.bmp',0	143	fn_skin_1 db 'left.bmp',0
142	fn_skin_2 db 'base.bmp',0	144	fn_skin_2 db 'base.bmp',0
143	fn_skin_3 db 'oper.bmp',0	145	fn_skin_3 db 'oper.bmp',0
144	IMAGE_FILE_SKIN1_SIZE equ 3(SKIN_W1+3)SKIN_H+54	146	IMAGE_FILE_SKIN1_SIZE equ 3(SKIN_W1+3)SKIN_H+54
145	IMAGE_FILE_SKIN2_SIZE equ 3(SKIN_W2+3)SKIN_H+54	147	IMAGE_FILE_SKIN2_SIZE equ 3(SKIN_W2+3)SKIN_H+54
146	IMAGE_FILE_SKIN3_SIZE equ 3(SKIN_W3+3)SKIN_H+54	148	IMAGE_FILE_SKIN3_SIZE equ 3(SKIN_W3+3)SKIN_H+54
147		149
148	IMAGE_FILE_FONT1_SIZE equ 961443 ;à §¬¥à ä ©« á 1-¬ á¨áâ¥¬ë¬ èà¨äâ®¬	150	IMAGE_FILE_FONT1_SIZE equ 961443 ;à §¬¥à ä ©« á 1-¬ á¨áâ¥¬ë¬ èà¨äâ®¬
149		151
150	fn_icon db 'icon.bmp',0	152	fn_icon db 'icon.bmp',0
151	count_main_icons equ 35 ;ç¨á«® ¨ª®®ª ¢ ä ©«¥ icon.bmp	153	count_main_icons equ 35 ;ç¨á«® ¨ª®®ª ¢ ä ©«¥ icon.bmp
152	bmp_icon rb 0x300*count_main_icons	154	bmp_icon rb 0x300*count_main_icons
153		155
154	TREE_ICON_SYS16_BMP_SIZE equ 256311+54 ;à §¬¥à bmp ä ©« á á¨áâ¥¬ë¬¨ ¨ª®ª ¬¨	156	TREE_ICON_SYS16_BMP_SIZE equ 256311+54 ;à §¬¥à bmp ä ©« á á¨áâ¥¬ë¬¨ ¨ª®ª ¬¨
155	icon_tl_sys dd 0 ;ãª § â¥¥«ì ¯ ¬ïâì ¤«ï åà ¥¨ï á¨áâ¥¬ëå ¨ª®®ª	157	icon_tl_sys dd 0 ;ãª § â¥¥«ì ¯ ¬ïâì ¤«ï åà ¥¨ï á¨áâ¥¬ëå ¨ª®®ª
156	icon_font_s1 dd 0 ;ãª § â¥«ì ¢à¥¬¥ãî ¯ ¬ïâì ¤«ï § £àã§ª¨ èà¨äâ	158	icon_font_s1 dd 0 ;ãª § â¥«ì ¢à¥¬¥ãî ¯ ¬ïâì ¤«ï § £àã§ª¨ èà¨äâ
157		159
158	fn_syntax db 'asm.syn',0 ;¨¬ï § £àã¦ ¥¬®£® ä ©« á¨â ªá¨á	160	fn_syntax db 'asm.syn',0 ;¨¬ï § £àã¦ ¥¬®£® ä ©« á¨â ªá¨á
159		161
160	;¬ ªà®á ¤«ï ¯à®¢¥àª¨ ¡¨â®¢®£® á¢®©áâ¢	162	;¬ ªà®á ¤«ï ¯à®¢¥àª¨ ¡¨â®¢®£® á¢®©áâ¢
161	macro test_bool_prop obj_reg,n_prop	163	macro test_bool_prop obj_reg,n_prop
162	{	164	{
163	bt dword[obj_reg+u_object.modif-u_object],n_prop	165	bt dword[obj_reg+u_object.modif-u_object],n_prop
164	}	166	}
165		167
166	include 'ced_wnd_m.inc'	168	include 'ced_wnd_m.inc'
167	include 'ced_wnd_prop.inc' ;ä ©« á äãªæ¨ï¬¨ ®ª á¢®©áâ¢ ®¡ê¥ªâ	169	include 'ced_wnd_prop.inc' ;ä ©« á äãªæ¨ï¬¨ ®ª á¢®©áâ¢ ®¡ê¥ªâ
168	include 'ced_constr.inc' ;ä ©« á äãªæ¨ï¬¨ ®ª ª®áâàãªâ®à	170	include 'ced_constr.inc' ;ä ©« á äãªæ¨ï¬¨ ®ª ª®áâàãªâ®à
169	include 'ced_code_g.inc' ;ä ©« á äãªæ¨ï¬¨ £¥¥à¨à®¢ ¨ï ª®¤®¢	171	include 'ced_code_g.inc' ;ä ©« á äãªæ¨ï¬¨ £¥¥à¨à®¢ ¨ï ª®¤®¢
170		172
171	align 4	173	align 4
172	start:	174	start:
173	load_libraries l_libs_start,load_lib_end	175	load_libraries l_libs_start,load_lib_end
174		176
175	;¯à®¢¥àª áª®«ìª® ã¤ ç® § £ã§¨« áì è «¨¡	177	;¯à®¢¥àª áª®«ìª® ã¤ ç® § £ã§¨« áì è «¨¡
176	mov ebp,lib0	178	mov ebp,lib0
177	cmp dword [ebp+ll_struc_size-4],0	179	cmp dword [ebp+ll_struc_size-4],0
178	jz @f	180	jz @f
179	mcall -1 ;exit not correct	181	mcall -1 ;exit not correct
180	@@:	182	@@:
181	mov ebp,lib1	183	mov ebp,lib1
182	cmp dword [ebp+ll_struc_size-4],0	184	cmp dword [ebp+ll_struc_size-4],0
183	jz @f	185	jz @f
184	mcall -1 ;exit not correct	186	mcall -1 ;exit not correct
185	@@:	187	@@:
186	mov ebp,lib2	188	mov ebp,lib2
187	cmp dword [ebp+ll_struc_size-4],0	189	cmp dword [ebp+ll_struc_size-4],0
188	jz @f	190	jz @f
189	mcall -1 ;exit not correct	191	mcall -1 ;exit not correct
190	@@:	192	@@:
191	mov ebp,lib3	193	mov ebp,lib3
192	cmp dword [ebp+ll_struc_size-4],0	194	cmp dword [ebp+ll_struc_size-4],0
193	jz @f	195	jz @f
194	mcall -1 ;exit not correct	196	mcall -1 ;exit not correct
195	@@:	197	@@:
196		198
197	;§ ¤ ¨¥ à §¬¥à®¢ ¯®«¥© á® á¢®©áâ¢ ¬¨	199	;§ ¤ ¨¥ à §¬¥à®¢ ¯®«¥© á® á¢®©áâ¢ ¬¨
198	mov eax,prop_edits_top	200	mov eax,prop_edits_top
199	mov ebx,16+6 ;è¨à¨ ¨ª®ª¨ + ®âáâã¯ë	201	mov ebx,16+6 ;è¨à¨ ¨ª®ª¨ + ®âáâã¯ë
200	mov edi,edit2	202	mov edi,edit2
201	@@:	203	@@:
202	mov ed_top,eax ;®âáâã¯ á¢¥àåã	204	mov ed_top,eax ;®âáâã¯ á¢¥àåã
203	mov ed_left,ebx ;®âáâã¯ á«¥¢	205	mov ed_left,ebx ;®âáâã¯ á«¥¢
204	add edi,ed_struc_size	206	add edi,ed_struc_size
205	add eax,prop_edits_height	207	add eax,prop_edits_height
206	cmp edi,prop_wnd_edits_end	208	cmp edi,prop_wnd_edits_end
207	jl @b	209	jl @b
208		210
209	stdcall [buf2d_create], buf_fon	211	stdcall [buf2d_create], buf_fon
210		212
211	mcall 48,3,sc,sizeof.system_colors	213	mcall 48,3,sc,sizeof.system_colors
212	mcall 40,0x27	214	mcall 40,0x27
213		215
214	stdcall dword[tl_data_init], tree1	216	stdcall dword[tl_data_init], tree1
215	stdcall dword[tl_data_init], tree2	217	stdcall dword[tl_data_init], tree2
216		218
217	copy_path fn_icon,sys_path,file_name,0x0 ;ä®à¬¨àã¥¬ ¯®«ë© ¯ãâì ª ä ©«ã ¨§®¡à ¦¥¨ï, ¯®¤à §ã¬¥¢ ¥¬ çâ® ® ¢ ®¤®© ¯ ¯ª¥ á ¯à®£à ¬¬®©	219	copy_path fn_icon,sys_path,file_name,0x0 ;ä®à¬¨àã¥¬ ¯®«ë© ¯ãâì ª ä ©«ã ¨§®¡à ¦¥¨ï, ¯®¤à §ã¬¥¢ ¥¬ çâ® ® ¢ ®¤®© ¯ ¯ª¥ á ¯à®£à ¬¬®©
218	mov eax,70 ;load icon file	220	mov eax,70 ;load icon file
219	mov [run_file_70.Function], 0	221	mov [run_file_70.Function], 0
220	mov [run_file_70.Position], 54	222	mov [run_file_70.Position], 54
221	mov [run_file_70.Flags], 0	223	mov [run_file_70.Flags], 0
222	mov [run_file_70.Count], 0x300*count_main_icons	224	mov [run_file_70.Count], 0x300*count_main_icons
223	mov [run_file_70.Buffer], bmp_icon	225	mov [run_file_70.Buffer], bmp_icon
224	mov [run_file_70.rezerv], 0	226	mov [run_file_70.rezerv], 0
225	mov [run_file_70.FileName], file_name	227	mov [run_file_70.FileName], file_name
226	mov ebx,run_file_70	228	mov ebx,run_file_70
227	int 0x40	229	int 0x40
228		230
229	cmp ebx,-1	231	cmp ebx,-1
230	mov [err_ini0],1	232	mov [err_ini0],1
231	je @f ;if open file	233	je @f ;if open file
232	mov [err_ini0],0	234	mov [err_ini0],0
233	mov dword[tree1.data_img],bmp_icon	235	mov dword[tree1.data_img],bmp_icon
234	mov dword[tree2.data_img],bmp_icon	236	mov dword[tree2.data_img],bmp_icon
235	@@:	237	@@:
236		238
237	;á¨áâ¥¬ë¥ ¨ª®ª¨ 16*16 ¤«ï tree_list	239	;á¨áâ¥¬ë¥ ¨ª®ª¨ 16*16 ¤«ï tree_list
238	load_image_file 'tl_sys_16.png', icon_tl_sys,TREE_ICON_SYS16_BMP_SIZE	240	load_image_file 'tl_sys_16.png', icon_tl_sys,TREE_ICON_SYS16_BMP_SIZE
239	;¥á«¨ ¨§®¡à ¦¥¨¥ ¥ ®âªàë«®áì, â® ¢ icon_tl_sys ¡ã¤ãâ	241	;¥á«¨ ¨§®¡à ¦¥¨¥ ¥ ®âªàë«®áì, â® ¢ icon_tl_sys ¡ã¤ãâ
240	;¥ ¨¨æ¨ «¨§¨à®¢ ë¥ ¤ ë¥, ® ®è¨¡ª¨ ¥ ¡ã¤¥â, â. ª. ¡ãä¥à ã¦®£® à §¬¥à	242	;¥ ¨¨æ¨ «¨§¨à®¢ ë¥ ¤ ë¥, ® ®è¨¡ª¨ ¥ ¡ã¤¥â, â. ª. ¡ãä¥à ã¦®£® à §¬¥à
241	mov eax,dword[icon_tl_sys]	243	mov eax,dword[icon_tl_sys]
242	mov dword[tree1.data_img_sys],eax	244	mov dword[tree1.data_img_sys],eax
243	mov dword[tree2.data_img_sys],eax	245	mov dword[tree2.data_img_sys],eax
244		246
245	;1-© ä ©« áª¨	247	;1-© ä ©« áª¨
246	load_image_file fn_skin_1, icon_font_s1,IMAGE_FILE_SKIN1_SIZE	248	load_image_file fn_skin_1, icon_font_s1,IMAGE_FILE_SKIN1_SIZE
247	stdcall [buf2d_create_f_img], buf_skin1,[icon_font_s1] ;á®§¤ ¥¬ ¡ãä¥à	249	stdcall [buf2d_create_f_img], buf_skin1,[icon_font_s1] ;á®§¤ ¥¬ ¡ãä¥à
248	stdcall mem.Free,[icon_font_s1] ;®á¢®¡®¦¤ ¥¬ ¯ ¬ïâì	250	stdcall mem.Free,[icon_font_s1] ;®á¢®¡®¦¤ ¥¬ ¯ ¬ïâì
249	;2-© ä ©« áª¨	251	;2-© ä ©« áª¨
250	load_image_file fn_skin_2, icon_font_s1,IMAGE_FILE_SKIN2_SIZE	252	load_image_file fn_skin_2, icon_font_s1,IMAGE_FILE_SKIN2_SIZE
251	stdcall [buf2d_create_f_img], buf_skin2,[icon_font_s1] ;á®§¤ ¥¬ ¡ãä¥à	253	stdcall [buf2d_create_f_img], buf_skin2,[icon_font_s1] ;á®§¤ ¥¬ ¡ãä¥à
252	stdcall mem.Free,[icon_font_s1] ;®á¢®¡®¦¤ ¥¬ ¯ ¬ïâì	254	stdcall mem.Free,[icon_font_s1] ;®á¢®¡®¦¤ ¥¬ ¯ ¬ïâì
253	;3-© ä ©« áª¨	255	;3-© ä ©« áª¨
254	load_image_file fn_skin_3, icon_font_s1,IMAGE_FILE_SKIN3_SIZE	256	load_image_file fn_skin_3, icon_font_s1,IMAGE_FILE_SKIN3_SIZE
255	stdcall [buf2d_create_f_img], buf_skin3,[icon_font_s1] ;á®§¤ ¥¬ ¡ãä¥à	257	stdcall [buf2d_create_f_img], buf_skin3,[icon_font_s1] ;á®§¤ ¥¬ ¡ãä¥à
256	stdcall mem.Free,[icon_font_s1] ;®á¢®¡®¦¤ ¥¬ ¯ ¬ïâì	258	stdcall mem.Free,[icon_font_s1] ;®á¢®¡®¦¤ ¥¬ ¯ ¬ïâì
257		259
258	;á¨¬¢®«ë 1-£® á¨áâ¥¬®£® èà¨äâ	260	;á¨¬¢®«ë 1-£® á¨áâ¥¬®£® èà¨äâ
259	load_image_file 'font6x9.bmp', icon_font_s1,IMAGE_FILE_FONT1_SIZE	261	load_image_file 'font6x9.bmp', icon_font_s1,IMAGE_FILE_FONT1_SIZE
260	stdcall [buf2d_create_f_img], buf_font,[icon_font_s1] ;á®§¤ ¥¬ ¡ãä¥à	262	stdcall [buf2d_create_f_img], buf_font,[icon_font_s1] ;á®§¤ ¥¬ ¡ãä¥à
261	stdcall mem.Free,[icon_font_s1] ;®á¢®¡®¦¤ ¥¬ ¯ ¬ïâì	263	stdcall mem.Free,[icon_font_s1] ;®á¢®¡®¦¤ ¥¬ ¯ ¬ïâì
262	stdcall [buf2d_conv_24_to_8], buf_font,1 ;¤¥« ¥¬ ¡ãä¥à ¯à®§à ç®áâ¨ 8 ¡¨â	264	stdcall [buf2d_conv_24_to_8], buf_font,1 ;¤¥« ¥¬ ¡ãä¥à ¯à®§à ç®áâ¨ 8 ¡¨â
263	stdcall [buf2d_convert_text_matrix], buf_font	265	stdcall [buf2d_convert_text_matrix], buf_font
264		266
265		267
266	copy_path fn_obj_opt,sys_path,fp_obj_opt,0x0	268	copy_path fn_obj_opt,sys_path,fp_obj_opt,0x0
267	;load options file	269	;load options file
268	mov eax,70	270	mov eax,70
269	mov [run_file_70.Position], 0	271	mov [run_file_70.Position], 0
270	mov [run_file_70.Count], sizeof.ObjOpt*MAX_OBJ_TYPES+MAX_OBJ_CAPTIONS	272	mov [run_file_70.Count], sizeof.ObjOpt*MAX_OBJ_TYPES+MAX_OBJ_CAPTIONS
271	mov [run_file_70.Buffer], obj_opt	273	mov [run_file_70.Buffer], obj_opt
272	mov [run_file_70.FileName], fp_obj_opt	274	mov [run_file_70.FileName], fp_obj_opt
273	mov ebx,run_file_70	275	mov ebx,run_file_70
274	int 0x40	276	int 0x40
275		277
276	cmp ebx,-1	278	cmp ebx,-1
277	mov [err_ini1],1	279	mov [err_ini1],1
278	je .open_end ;jmp if not open file	280	je .open_end ;jmp if not open file
279	mov [err_ini1],0	281	mov [err_ini1],0
280		282
281	mov eax,obj_opt ;¤®¡ ¢«ï¥¬ ®¡ê¥ªâë	283	mov eax,obj_opt ;¤®¡ ¢«ï¥¬ ®¡ê¥ªâë
282	@@:	284	@@:
283	mov ebx,dword[eax]	285	mov ebx,dword[eax]
284	cmp ebx,0	286	cmp ebx,0
285	je @f	287	je @f
286	;xor ecx,ecx ;¢ ecx ¡ã¤¥â ¨¤¥ªá ¨ª®ª¨	288	;xor ecx,ecx ;¢ ecx ¡ã¤¥â ¨¤¥ªá ¨ª®ª¨
287	mov cx,word[eax+obj_opt.img-obj_opt]	289	mov cx,word[eax+obj_opt.img-obj_opt]
288	cmp cx,0	290	cmp cx,0
289	jge .zero	291	jge .zero
290	xor cx,cx ;çâ®-¡ë ¥ £«îç¨«® á ®âà¨æ â¥«ìë¬ ¨¤¥ªá®¬	292	xor cx,cx ;çâ®-¡ë ¥ £«îç¨«® á ®âà¨æ â¥«ìë¬ ¨¤¥ªá®¬
291	.zero:	293	.zero:
292	shl ecx,16	294	shl ecx,16
293	stdcall dword[tl_node_add], eax, ecx, tree1 ;¤®¡ ¢«ï¥¬ §¢ ¨¥ ®¡ê¥ªâ	295	stdcall dword[tl_node_add], eax, ecx, tree1 ;¤®¡ ¢«ï¥¬ §¢ ¨¥ ®¡ê¥ªâ
294	stdcall dword[tl_cur_next], tree1 ;¯¥à¥®á¨¬ ªãàá®à ¢¨§, çâ®-¡ë ¥ ¯®¬¥ï«áï ¯®àï¤®ª	296	stdcall dword[tl_cur_next], tree1 ;¯¥à¥®á¨¬ ªãàá®à ¢¨§, çâ®-¡ë ¥ ¯®¬¥ï«áï ¯®àï¤®ª
295	add eax,sizeof.ObjOpt ;¯¥à¥å®¤ á«¥¤ãîé¨© ®¡ê¥ªâ	297	add eax,sizeof.ObjOpt ;¯¥à¥å®¤ á«¥¤ãîé¨© ®¡ê¥ªâ
296	jmp @b	298	jmp @b
297	@@:	299	@@:
298	stdcall dword[tl_cur_beg], tree1 ;¯¥à¥®á¨¬ ªãàá®à ¢¢¥àå	300	stdcall dword[tl_cur_beg], tree1 ;¯¥à¥®á¨¬ ªãàá®à ¢¢¥àå
299		301
300	.open_end:	302	.open_end:
301		303
302	stdcall [ted_init], tedit0	304	stdcall [ted_init], tedit0
303	copy_path fn_syntax,sys_path,file_name,0x0	305	copy_path fn_syntax,sys_path,file_name,0x0
304		306
305	; * init syntax file *	307	; * init syntax file *
306	; ¯à®¢¥àï¥¬ à §¬¥à ä ©« á¨â ªá¨á	308	; ¯à®¢¥àï¥¬ à §¬¥à ä ©« á¨â ªá¨á
307	mov eax,70	309	mov eax,70
308	mov [run_file_70.Function], 5	310	mov [run_file_70.Function], 5
309	mov [run_file_70.Position], 0	311	mov [run_file_70.Position], 0
310	mov [run_file_70.Flags], 0	312	mov [run_file_70.Flags], 0
311	mov dword[run_file_70.Count], 0	313	mov dword[run_file_70.Count], 0
312	mov dword[run_file_70.Buffer], open_b	314	mov dword[run_file_70.Buffer], open_b
313	mov byte[run_file_70+20], 0	315	mov byte[run_file_70+20], 0
314	mov dword[run_file_70.FileName], file_name	316	mov dword[run_file_70.FileName], file_name
315	mov ebx,run_file_70	317	mov ebx,run_file_70
316	int 0x40	318	int 0x40
317	cmp eax,0	319	cmp eax,0
318	jne @f	320	jne @f
319		321
320	mov edi,tedit0	322	mov edi,tedit0
321	mov ecx,dword[open_b+32] ;+32 qword: à §¬¥à ä ©« ¢ ¡ ©â å	323	mov ecx,dword[open_b+32] ;+32 qword: à §¬¥à ä ©« ¢ ¡ ©â å
322	mov ted_syntax_file_size,ecx	324	mov ted_syntax_file_size,ecx
323		325
324	stdcall mem.Alloc,ecx ;¢ë¤¥«ï¥¬ ¯ ¬ïâì ¤«ï ä ©« á¨â ªá¨á	326	stdcall mem.Alloc,ecx ;¢ë¤¥«ï¥¬ ¯ ¬ïâì ¤«ï ä ©« á¨â ªá¨á
325	mov ted_syntax_file,eax	327	mov ted_syntax_file,eax
326		328
327	;¯à®¡ã¥¬ ®âªàëâì ä ©« á¨â ªá¨á	329	;¯à®¡ã¥¬ ®âªàëâì ä ©« á¨â ªá¨á
328	mov ebx,run_file_70	-
329	mov dword[ebx], 0	-
330	mov dword[ebx+4], 0	-
331	mov dword[ebx+8], 0	-
332	mov dword[ebx+12], ecx	-
333	mov dword[ebx+16], eax ;ted_syntax_file	-
334	mov byte[ebx+20], 0	-
335	m2m dword[ebx+21], file_name	-
336	mcall 70	-
337	cmp eax,0	-
338	jne @f	-
339	stdcall [ted_init_syntax_file],edi	330	call open_unpac_synt_file
340	jmp .end_0	331	jmp .end_0
341	@@:	332	@@:
342	notify_window_run txt_not_syntax_file	333	notify_window_run txt_not_syntax_file
343	.end_0:	334	.end_0:
344		335
345	;get cmd line	336	;get cmd line
346	cmp [buf_cmd_lin],0	337	cmp [buf_cmd_lin],0
347	je @f ;if file names exist	338	je @f ;if file names exist
348	mov esi,buf_cmd_lin	339	mov esi,buf_cmd_lin
349	call strlen ;eax=strlen	340	call strlen ;eax=strlen
350	mov edi,[edit1.text]	341	mov edi,[edit1.text]
351	mov [edit1.size],eax	342	mov [edit1.size],eax
352	mov ecx,eax	343	mov ecx,eax
353	rep movsb	344	rep movsb
354	call but_open_proj	345	call but_open_proj
355	@@:	346	@@:
356		347
357		348
358		349
359	align 4	350	align 4
360	red_win:	351	red_win:
361	call draw_window	352	call draw_window
362		353
363	align 4	354	align 4
364	still:	355	still:
365	mcall 10	356	mcall 10
366		357
367	cmp al,1	358	cmp al,1
368	jne @f	359	jne @f
369	call draw_window	360	call draw_window
370	@@:	361	@@:
371	cmp al,2	362	cmp al,2
372	jz key	363	jz key
373	cmp al,3	364	cmp al,3
374	jz button	365	jz button
375	cmp al,6	366	cmp al,6
376	jne @f	367	jne @f
377	call mouse	368	call mouse
378	@@:	369	@@:
379		370
380	jmp still	371	jmp still
381		372
382	align 4	373	align 4
383	draw_window:	374	draw_window:
384	pushad	375	pushad
385	mcall 12,1	376	mcall 12,1
386		377
387	xor eax,eax	378	xor eax,eax
388	mov ebx,20*65536+670	379	mov ebx,20*65536+670
389	mov ecx,20*65536+370	380	mov ecx,20*65536+370
390	mov edx,[sc.work]	381	mov edx,[sc.work]
391	or edx,0x33000000	382	or edx,0x33000000
392	mov edi,hed	383	mov edi,hed
393	int 0x40	384	int 0x40
394		385
395	mov eax,8 ;button 'Open Project'	386	mov eax,8 ;button 'Open Project'
396	mov esi,0x80ff	387	mov esi,0x80ff
397	mov ebx,230*65536+18	388	mov ebx,230*65536+18
398	mov ecx,5*65536+18	389	mov ecx,5*65536+18
399	mov edx,5	390	mov edx,5
400	int 0x40	391	int 0x40
401	stdcall draw_icon, 22,231,6 ;22 - open	392	stdcall draw_icon, 22,231,6 ;22 - open
402		393
403	;button 'Save Project'	394	;button 'Save Project'
404	mov ebx,250*65536+18	395	mov ebx,250*65536+18
405	mov ecx,5*65536+18	396	mov ecx,5*65536+18
406	mov edx,6	397	mov edx,6
407	int 0x40	398	int 0x40
408	stdcall draw_icon, 17,251,6 ;17 - save	399	stdcall draw_icon, 17,251,6 ;17 - save
409		400
410	;button 'Show Constructor'	401	;button 'Show Constructor'
411	mov ebx,310*65536+18	402	mov ebx,310*65536+18
412	mov ecx,5*65536+18	403	mov ecx,5*65536+18
413	mov edx,11	404	mov edx,11
414	int 0x40	405	int 0x40
415	stdcall draw_icon, 12,311,6 ;12 - window	406	stdcall draw_icon, 12,311,6 ;12 - window
416		407
417	;button 'Show Code'	408	;button 'Show Code'
418	mov ebx,330*65536+18	409	mov ebx,330*65536+18
419	mov edx,12	410	mov edx,12
420	int 0x40	411	int 0x40
421	stdcall draw_icon, 11,331,6 ;11 - text	412	stdcall draw_icon, 11,331,6 ;11 - text
422		413
423	;button 'Update: Code, Constructor'	414	;button 'Update: Code, Constructor'
424	mov ebx,350*65536+18	415	mov ebx,350*65536+18
425	mov edx,13	416	mov edx,13
426	int 0x40	417	int 0x40
427	stdcall draw_icon, 32,351,6 ;32 - update	418	stdcall draw_icon, 32,351,6 ;32 - update
428		419
429	;button 'Save Code'	420	;button 'Save Code'
430	mov ebx,370*65536+18	421	mov ebx,370*65536+18
431	mov edx,14	422	mov edx,14
432	int 0x40	423	int 0x40
433	stdcall draw_icon, 17,371,6 ;17 - save	424	stdcall draw_icon, 17,371,6 ;17 - save
434		425
435	;button ']P'	426	;button ']P'
436	mov ebx,390*65536+18	427	mov ebx,390*65536+18
437	mov edx,15	428	mov edx,15
438	int 0x40	429	int 0x40
439	stdcall draw_icon, 18,391,6 ;18 - § ª ª®æ ¡§ æ	430	stdcall draw_icon, 18,391,6 ;18 - § ª ª®æ ¡§ æ
440		431
441	;button 'Show color text'	432	;button 'Show color text'
442	mov ebx,410*65536+18	433	mov ebx,410*65536+18
443	mov edx,16	434	mov edx,16
444	int 0x40	435	int 0x40
445	stdcall draw_icon, 19,411,6	436	stdcall draw_icon, 19,411,6
446		437
447	;button 'Add Object'	438	;button 'Add Object'
448	mov ebx,125*65536+18	439	mov ebx,125*65536+18
449	mov ecx,30*65536+18	440	mov ecx,30*65536+18
450	mov edx,31	441	mov edx,31
451	int 0x40	442	int 0x40
452	stdcall draw_icon, 14,126,31 ;14 - add object	443	stdcall draw_icon, 14,126,31 ;14 - add object
453		444
454	;button 'Move Up'	445	;button 'Move Up'
455	mov ebx,155*65536+18	446	mov ebx,155*65536+18
456	mov edx,21	447	mov edx,21
457	int 0x40	448	int 0x40
458	stdcall draw_icon, 23,156,31 ;23 - move up	449	stdcall draw_icon, 23,156,31 ;23 - move up
459		450
460	;button 'Move Down'	451	;button 'Move Down'
461	mov ebx,175*65536+18	452	mov ebx,175*65536+18
462	mov edx,22	453	mov edx,22
463	int 0x40	454	int 0x40
464	stdcall draw_icon, 24,176,31 ;24 - move down	455	stdcall draw_icon, 24,176,31 ;24 - move down
465		456
466	;button 'Copy'	457	;button 'Copy'
467	mov ebx,195*65536+18	458	mov ebx,195*65536+18
468	mov edx,23	459	mov edx,23
469	int 0x40	460	int 0x40
470	stdcall draw_icon, 30,196,31 ;30 - copy	461	stdcall draw_icon, 30,196,31 ;30 - copy
471		462
472	;button 'Paste'	463	;button 'Paste'
473	mov ebx,215*65536+18	464	mov ebx,215*65536+18
474	mov edx,24	465	mov edx,24
475	int 0x40	466	int 0x40
476	stdcall draw_icon, 31,216,31 ;31 - paste	467	stdcall draw_icon, 31,216,31 ;31 - paste
477		468
478	;button 'Property'	469	;button 'Property'
479	mov ebx,235*65536+18	470	mov ebx,235*65536+18
480	mov edx,25	471	mov edx,25
481	int 0x40	472	int 0x40
482	stdcall draw_icon, 7,236,31 ;7 - property	473	stdcall draw_icon, 7,236,31 ;7 - property
483		474
484	;button 'Undo'	475	;button 'Undo'
485	mov ebx,255*65536+18	476	mov ebx,255*65536+18
486	mov edx,26	477	mov edx,26
487	int 0x40	478	int 0x40
488	stdcall draw_icon, 33,256,31 ;33 - undo	479	stdcall draw_icon, 33,256,31 ;33 - undo
489		480
490	;button 'Redo'	481	;button 'Redo'
491	mov ebx,275*65536+18	482	mov ebx,275*65536+18
492	mov edx,27	483	mov edx,27
493	int 0x40	484	int 0x40
494	stdcall draw_icon, 34,276,31 ;34 - redo	485	stdcall draw_icon, 34,276,31 ;34 - redo
495		486
496	; 10 30 50 70 90	487	; 10 30 50 70 90
497		488
498	cmp [err_opn],1	489	cmp [err_opn],1

Subversion Repositories Kolibri OS

(root)/programs/develop/kol_f_edit/kol_f_edit.asm – Rev 3465 → 3475