WebSVN – Kolibri OS – Diff – /programs/other/t_edit/t_edit.asm

-;£à®¬ ï ¡« £®¤ à®áâì Maxxxx32, Diamond, Heavyiron
+;£à®¬ ï ¡« £®¤ à®áâì ¢á¥¬, ªâ® ¯®¬®£ «: ª®¤®¬/á®¢¥â®¬/¤¨§ ©®¬ ...
-;¨ ¤àã£¨¬ ¯à®£à ¬¬¨áâ ¬,   â ª¦¥
-;¥¯«®¢ã «¥ªá¥î ( www.lrz.land.ru)
 use32
   org 0x0
   db 'MENUET01' ;¨¤¥â¨ä. ¨á¯®«ï¥¬®£® ä ©«  ¢á¥£¤  8 ¡ ©â
 MAX_COLOR_WORD_LEN equ 40
 maxChars equ 100002 ;(...+2)
 BUF_SIZE equ 4096 ;buffer for copy|paste
 maxSyntaxFileSize equ 410000
-TOOLBAR_ICONS_SIZE equ 1200*18
+TOOLBAR_ICONS_SIZE equ 1200*20
 include '../../proc32.inc'
 ;include '../../config.inc'
-  mov esi,file_name
+	mov esi,file_name
-  call strlen
+	call strlen
-  mov ecx,eax
+	mov ecx,eax
-  mov edi,openfile_path
+	mov edi,openfile_path
-  cld
+	cld
-  rep movsb ;ª®¯¨àã¥¬ ¨¬ï ä ©«  ¢ ¡ãä¥à edit1
+	rep movsb ;ª®¯¨àã¥¬ ¨¬ï ä ©«  ¢ ¡ãä¥à openfile_path
 load_libraries l_libs_start,load_lib_end
+;¯à®¢¥àª    áª®«ìª® ã¤ ç® § £ã§¨«¨áì ¡¨¡«¨®â¥ª¨
-;¯à®¢¥àª    áª®«ìª® ã¤ ç® § £ã§¨«¨áì ¡¨¡«¨®â¥ª¨
+mov	ebp,lib0
-	mov	ebp,lib0
+.test_lib_open:
 	cmp	dword [ebp+ll_struc_size-4],0
 	jz	@f
-	mcall -1 ;exit not correct
-@@:
+	mcall -1 ;exit not correct
-	mov	ebp,lib1 ;
-	cmp	dword [ebp+ll_struc_size-4],0
-	jz	@f
-	mcall -1 ;exit not correct
 @@:
-	cmp dword[version_text_edit],3
-	jge @f
+	add ebp,ll_struc_size
-		stdcall [mb_create],msgbox_10,thread
-		mcall -1
+	cmp ebp,load_lib_end
-	@@:
+	jl .test_lib_open
 ;---------------------------------------------------------------------
 	stdcall [ted_init], tedit0
+	stdcall dword[tl_data_init], tree1
+; OpenDialog initialisation
+	stdcall [OpenDialog_Init],OpenDialog_data
-	stdcall dword[tl_data_init], tree1
+	mov eax,[sc.work_button_text]
 	mov [PathShow_data_1.font_color],eax
-; OpenDialog initialisation
+	mov eax,[sc.work_button]
-	stdcall [OpenDialog_Init],OpenDialog_data
+	mov [PathShow_data_1.background_color],eax
 ;--- get cmd line ---
 	cmp byte[openfile_path+3],0 ;openfile_path
 	je @f ;if file names exist
 		mov esi,openfile_path
 		call strlen ;eax=strlen
-		mov [edit1.size],eax
 		call but_no_msg_OpenFile
 	@@:
 	mov ecx,[sc.work_text]
 	or  ecx,0x80000000
 	mov edx,txtFile
 	int 0x40
-  stdcall [edit_box_draw], dword edit1
+	stdcall [PathShow_draw], dword PathShow_data_1
-  stdcall [menu_bar_draw], dword menu_data_1
+	stdcall [menu_bar_draw], dword menu_data_1
-  mcall 12,2
+	mcall 12,2
-  ret
+	ret
 align 4
-mouse:
-	stdcall [edit_box_mouse], dword edit1
-	test word [edit1.flags],10b ;ed_focus ;¥á«¨ ¥ ¢ ä®ªãá¥, ¢ëå®¤¨¬
-	jne still
 mouse:
 	stdcall [ted_mouse], tedit0
 	cmp byte[tedit0.panel_id],TED_PANEL_FIND ;if not panel
 	jne .mnu_1
 	cmp dword[menu_data_1.cursor_out],4
 	je button.exit
 	cmp dword[menu_data_1.cursor_out],3
 	jne @f
-		stdcall [ted_but_save_file], tedit0,run_file_70,[edit1.text]
+		call ted_but_save_file
 	@@:
 	cmp dword[menu_data_1.cursor_out],2
 	jne @f
 		call ted_but_open_file
 	@@:
   mcall 26,2,,conv_tabl ;26.2 ¯®«ãç¨âì à áª« ¤ªã ª« ¢¨ âãàë
   mcall 2 ;¯®«ãç ¥¬ ª®¤  ¦ â®© ª« ¢¨è¨
-  stdcall [tl_key], tree1
-  test word [edit1.flags],10b;ed_focus ; ¥á«¨ ¥ ¢ ä®ªãá¥, ¢ëå®¤¨¬
-  je @f
-    cmp ah,0x80 ;if key up
-    ja still
-    cmp ah,42 ;[Shift] (left)
-    je still
-    cmp ah,54 ;[Shift] (right)
-    je still
-    cmp ah,56 ;[Alt]
-    je still
-    cmp ah,29 ;[Ctrl]
-    je still
-    cmp ah,69 ;[Pause Break]
-    je still
-    stdcall KeyConvertToASCII, dword conv_tabl
-    stdcall [edit_box_key], dword edit1
-    jmp still
-  @@:
+  stdcall [tl_key], tree1
   test word [edit2.flags],10b;ed_focus ; ¥á«¨ ¥ ¢ ä®ªãá¥, ¢ëå®¤¨¬
   je @f
     cmp ah,0x80 ;if key up
   jne @f
     call ted_but_open_file
   @@:
   cmp ah,5
   jne @f
-    stdcall [ted_but_save_file], tedit0,run_file_70,[edit1.text]
+    call ted_but_save_file
   @@:
   cmp ah,6
   jne @f
     stdcall [ted_but_select_word], tedit0
   @@:
   @@:
   cmp ah,20
   jne @f
     stdcall but_synt_show, tedit0
   @@:
+  cmp ah,21
+  jne @f
+    stdcall [ted_but_convert_by_table],tedit0,tbl_1251_866
+  @@:
+  cmp ah,22
+  jne @f
+    stdcall [ted_but_convert_by_table],tedit0,tbl_866_1251
+  @@:
   cmp ah,200
   jne @f
     stdcall ted_but_open_syntax, tedit0
 	stdcall [ted_delete], tedit0
 	stdcall dword[tl_data_clear], tree1
+	mcall -1 ;¢ëå®¤ ¨§ ¯à®£à ¬¬ë
+PathShow_data_1:
+.type			dd 0	;+0
+.start_y		dw 9	;+4
+.start_x		dw 222	;+6
+.font_size_x		dw 6	;+8	; 6 - for font 0, 8 - for font 1
+.area_size_x		dw 200	;+10
+.font_number		dd 0	;+12	; 0 - monospace, 1 - variable
+.background_flag	dd 1	;+16
+.font_color		dd 0x0	;+20
+.background_color	dd 0xffffff	;+24
+.text_pointer		dd openfile_path	;+28
-	mcall -1 ;¢ëå®¤ ¨§ ¯à®£à ¬¬ë
 .work_area_pointer	dd text_work_area	;+32
 .temp_text_length	dd 0	;+36
 edit1 edit_box 250, 220, 5, 0xffffff, 0xff80, 0xff0000, 0xff, 0x4080, 4090, openfile_path, mouse_dd, 0
 	thread:
 	rb 1024
     thread_coords:
 	rb 1024
 stacktop:
-	sys_path:
+	sys_path: ;¯ãâì ®âªã¤  § ¯ãáâ¨«áï ¨á¯®«ï¥¬ë© ä ©«
 		rb 4096
-	file_name:
+	file_name: ;¯ à ¬¥âàë § ¯ãáª
 		rb 4096
-	file_name_rez:
+	syntax_path: ;¨¬ï ¯®¤ª«îç ¥¬®£® ä ©«  á¨â ªá¨á
 		rb 4096
 	plugin_path:
 		rb 4096
+	openfile_path: ;¯®«ë© ¯ãâì ª ä ©«ã á ª®â®àë¬ ¨¤¥â à ¡®â
-	openfile_path:
+		rb 4096
+	text_work_area: ;¯ãâì ª ä ©«ã, ª®â®àë© ¯®ª §ë¢ ¥âáï ¢ ®ª¥
 		rb 4096
-	filename_area:
+	filename_area: ;¨¬ï ä ©«  ¤«ï ¤¨ «®£  ®âªàëâ¨ï/§ ªàëâ¨ï
 		rb 256
 	file_info:
 		rb 40
 mem:

Subversion Repositories Kolibri OS

(root)/programs/other/t_edit/t_edit.asm – Rev 4128 → 4308