Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 2085 → Rev 2086

/programs/other/t_edit_synt/te_syntax.asm
6,12 → 6,13
dd i_end ; à §¬¥à ¯à¨«®¦¥­¨ï
dd mem
dd stacktop
dd file_name;buf_cmd_lin
dd file_name
dd sys_path
 
MAX_COLOR_WORD_LEN equ 40
BUF_SIZE equ 1000 ;buffer for copy|paste
maxSyntaxFileSize equ 310000
CAPT_PATH_WIDTH equ 50 ;è¨à¨­  ¯®¤¯¨á¨ ¯¥à¥¤ ⥪áâ®¢ë¬ ¯®«¥¬
 
include '../../macros.inc'
include '../../proc32.inc'
128,19 → 129,37
 
;--- load color option file ---
stdcall [ted_init], tedit0
mov byte[file_name],0
 
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
jz mouse
 
jmp still
 
 
align 4
draw_window:
pushad
mcall 12,1
 
xor eax,eax
mov ebx,10*65536+555
mov ecx,10*65536+333
mov edx,[sc.work]
or edx,0x33000000
mov edi,hed
mcall
mcall 0,<10,555>,<10,333>
 
mcall 9,procinfo,-1
 
174,9 → 193,17
mov ebx,195*65536+10
mov ecx,[sc.work_text]
or ecx,0x80000000
mov edx,txt_inp_file
int 0x40
 
add ebx,20
mov edx,txt_out_file
mcall
int 0x40
 
mov ebx,(215+CAPT_PATH_WIDTH) shl 16 + 10
mov edx,file_name
int 0x40
 
stdcall [edit_box_draw],dword edit1
stdcall [tl_draw],dword tree1
 
187,24 → 214,9
 
mcall 12,2
popad
ret
 
align 4
still:
mcall 10
 
cmp al,1 ;¨§¬. ¯®«®¦¥­¨¥ ®ª­ 
jz red_win
cmp al,2
jz key
cmp al,3
jz button
cmp al,6
jz mouse
 
jmp still
 
 
align 4
mouse:
stdcall [tl_mouse],tree1
stdcall [edit_box_mouse],edit1
300,18 → 312,14
;@@:
ret
 
hed db 'TextEditor syntax file converter 09.06.10',0 ;¯®¤¯¨áì ®ª­ 
hed db 'TextEditor syntax file converter 20.08.11',0 ;¯®¤¯¨áì ®ª­ 
 
txtErrOpen db '¥ ­ ©¤¥­ ä ©«, ¯à®¢¥àì⥠¯à ¢¨«ì­®áâì ¨¬¥­¨',0
txtErrIni0 db '¥ ®âªàë«áï ä ©« á ¨ª®­ª ¬¨',0
err_ini0 db 0
 
txt122 db '‡ £à. ä ©«',0
txt148 db '‘®åà. ä ©«',0
txt_inp_file db 'ˆáå. ä ©«:',0
txt_out_file db '‚ëå. ä ©«:',0
 
CAPT_PATH_WIDTH equ 50
edit1 edit_box 305+16-CAPT_PATH_WIDTH, 215+CAPT_PATH_WIDTH, 5, 0xffffff, 0xff, 0xff0000, 0, 0x80, MAX_COLOR_WORD_LEN, ed_buffer.127, mouse_dd, 0
edit1 edit_box 305+16-CAPT_PATH_WIDTH, 215+CAPT_PATH_WIDTH, 25, 0xffffff, 0xff, 0xff0000, 0, 0x80, MAX_COLOR_WORD_LEN, ed_buffer.127, mouse_dd, 0
 
ed_buffer: ;⥪áâ ¤«ï edit
.127: rb MAX_COLOR_WORD_LEN+2