Subversion Repositories Kolibri OS

Rev

Rev 7575 | Rev 7577 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 7575 Rev 7576
Line 85... Line 85...
85
		stdcall [ted_but_paste], tedit0
85
		stdcall [ted_but_paste], tedit0
86
		jmp still
86
		jmp still
87
	@@:
87
	@@:
88
	cmp ah,ID_BUT_FIND
88
	cmp ah,ID_BUT_FIND
89
	jne @f
89
	jne @f
90
		call ted_but_find
90
		call but_panel_find
91
		jmp still
91
		jmp still
92
	@@:
92
	@@:
93
	cmp ah,ID_BUT_REPLACE
93
	cmp ah,ID_BUT_REPLACE
94
	jne @f
94
	jne @f
95
		call but_replace
95
		call but_panel_replace
96
		jmp still
96
		jmp still
97
	@@:
97
	@@:
98
	cmp ah,ID_BUT_KEY_WORDS
98
	cmp ah,ID_BUT_KEY_WORDS
99
	jne @f
99
	jne @f
100
		call but_find_key_w
100
		call but_find_key_w
Line 135... Line 135...
135
		stdcall but_use_syntax, tedit0
135
		stdcall but_use_syntax, tedit0
136
		jmp still
136
		jmp still
137
	@@:
137
	@@:
138
	cmp ah,ID_BUT_SYNTAX_MODE
138
	cmp ah,ID_BUT_SYNTAX_MODE
139
	jne @f
139
	jne @f
140
		stdcall but_choose_syntax, tedit0
140
		stdcall but_panel_choose_syntax, tedit0
141
		jmp still
141
		jmp still
142
	@@:
142
	@@:
143
	cmp ah,ID_BUT_CONVERT_1251_866
143
	cmp ah,ID_BUT_CONVERT_1251_866
144
	jne @f
144
	jne @f
145
		stdcall [ted_but_convert_by_table],tedit0,tbl_1251_866
145
		stdcall [ted_but_convert_by_table],tedit0,tbl_1251_866
Line 154... Line 154...
154
	cmp ah,200
154
	cmp ah,200
155
	jne @f
155
	jne @f
156
		stdcall ted_but_open_syntax, tedit0
156
		stdcall ted_but_open_syntax, tedit0
157
		jmp still
157
		jmp still
158
	@@:
158
	@@:
159
	cmp ah,201
159
	cmp ah,201 ;§ ¬¥­¨âì
160
	jne @f
160
	jne .no_find
-
 
161
		call get_find_options
161
		stdcall [ted_but_find_next], tedit0
162
		stdcall [ted_but_find], tedit0, eax
-
 
163
		jmp still
-
 
164
	.no_find:
-
 
165
	cmp ah,202 ;§ ¬¥­¨âì ¢á¥
-
 
166
	jne .no_change
-
 
167
		call get_find_options
-
 
168
		stdcall [ted_but_replace], tedit0, buf_replace, eax, 1
-
 
169
		or eax,eax
-
 
170
		jz still
-
 
171
		stdcall [ted_draw], tedit0
162
		jmp still
172
		jmp still
163
	@@:
173
	.no_change:
-
 
174
	cmp ah,203
-
 
175
	jne .no_change_a
-
 
176
		call but_replace_all
-
 
177
		jmp still
-
 
178
	.no_change_a:
Line 164... Line 179...
164
 
179
 
165
	cmp ah,1
180
	cmp ah,1
166
	jne @f
181
	jne @f
167
		call ted_Exit
182
		call ted_Exit
Line 200... Line 215...
200
	stdcall [ted_delete], tedit0
215
	stdcall [ted_delete], tedit0
201
	stdcall [tl_data_clear], tree1
216
	stdcall [tl_data_clear], tree1
202
	mcall SF_TERMINATE_PROCESS ;¢ë室 ¨§ ¯à®£à ¬¬ë
217
	mcall SF_TERMINATE_PROCESS ;¢ë室 ¨§ ¯à®£à ¬¬ë
203
	;ret
218
	;ret
Line -... Line 219...
-
 
219
 
-
 
220
align 4
-
 
221
get_find_options:
-
 
222
	xor eax,eax
-
 
223
	cmp [opt_gr1],opt1
-
 
224
	je @f
-
 
225
		inc eax
-
 
226
	cmp [opt_gr1],opt2
-
 
227
	je @f
-
 
228
		inc eax
-
 
229
	@@:
-
 
230
	ret
-
 
231
 
-
 
232
align 4
-
 
233
proc but_replace_all uses ebx ecx edx
-
 
234
	call get_find_options
-
 
235
	mov ebx,eax
-
 
236
	stdcall [ted_but_replace], tedit0, buf_replace, ebx, 1
-
 
237
	xor edx,edx
-
 
238
	or eax,eax
-
 
239
	jz @f
-
 
240
	inc edx
-
 
241
	mov ecx,0x1000
-
 
242
	.cycle0:
-
 
243
		stdcall [ted_but_replace], tedit0, buf_replace, ebx, 0
-
 
244
		or eax,eax
-
 
245
		jz @f
-
 
246
		inc edx
-
 
247
		loop .cycle0
-
 
248
	@@:
-
 
249
	stdcall [ted_draw], tedit0
-
 
250
	mov eax,edx
-
 
251
	ret
-
 
252
endp
204
 
253
 
205
;input:
254
;input:
206
; al = ª®¤ ®è¨¡ª¨
255
; al = ª®¤ ®è¨¡ª¨
207
align 4
256
align 4
208
ted_on_init_synt_err:
257
ted_on_init_synt_err:
Line 551... Line 600...
551
endp
600
endp
Line 552... Line 601...
552
 
601
 
553
;description:
602
;description:
554
; ¢ë§®¢/áªàë⨥ ¯ ­¥«¨ ¯®¨áª 
603
; ¢ë§®¢/áªàë⨥ ¯ ­¥«¨ ¯®¨áª 
555
align 4
604
align 4
556
proc ted_but_find uses edi
605
proc but_panel_find uses edi
Line 557... Line 606...
557
	mov edi,tedit0
606
	mov edi,tedit0
558
 
607
 
559
	cmp ted_panel_id,TED_PANEL_NULL
608
	cmp ted_panel_id,TED_PANEL_NULL
Line 568... Line 617...
568
	call EvSize
617
	call EvSize
569
	stdcall [ted_draw],edi
618
	stdcall [ted_draw],edi
570
	ret
619
	ret
571
endp
620
endp
Line -... Line 621...
-
 
621
 
-
 
622
;description:
-
 
623
; ¢ë§®¢/áªàë⨥ ¯ ­¥«¨ § ¬¥­ë
-
 
624
align 4
-
 
625
proc but_panel_replace uses edi
-
 
626
	mov edi,tedit0
-
 
627
 
-
 
628
	cmp ted_panel_id,TED_PANEL_NULL
-
 
629
	je @f
-
 
630
		mov ted_panel_id,TED_PANEL_NULL
-
 
631
		mov ted_wnd_l,0
-
 
632
		jmp .e_if
-
 
633
	@@:
-
 
634
		mov ted_panel_id,TED_PANEL_REPLACE
-
 
635
		mov ted_wnd_l,TED_PANEL_WIDTH
-
 
636
	.e_if:
-
 
637
	call EvSize
-
 
638
	stdcall [ted_draw],edi
-
 
639
	ret
-
 
640
endp
-
 
641
 
-
 
642
;description:
-
 
643
; ¢ë§®¢/áªàë⨥ ¯ ­¥«¨ á ä ©« ¬¨ ᨭ⠪á¨á 
-
 
644
align 4
-
 
645
proc but_panel_choose_syntax uses edi, edit:dword
-
 
646
	mov edi,[edit]
-
 
647
 
-
 
648
	cmp ted_panel_id,TED_PANEL_NULL
-
 
649
	je @f
-
 
650
		mov ted_panel_id,TED_PANEL_NULL
-
 
651
		mov ted_wnd_l,0
-
 
652
		jmp .e_if
-
 
653
	@@:
-
 
654
		mov ted_panel_id,TED_PANEL_SYNTAX
-
 
655
		mov ted_wnd_l,TED_PANEL_WIDTH
-
 
656
	.e_if:
-
 
657
	call EvSize
-
 
658
	stdcall [ted_draw],edi
-
 
659
	ret
-
 
660
endp
572
 
661
 
573
align 4
662
align 4
574
tbl_1251_866:
663
tbl_1251_866:
575
rb 128
664
rb 128
576
db   0,  0,  0,  0,  0,  0,  0,  0,  0,0,0,0,0,0,0,0 ;128
665
db   0,  0,  0,  0,  0,  0,  0,  0,  0,0,0,0,0,0,0,0 ;128
Line 598... Line 687...
598
ted_on_find_err:
687
ted_on_find_err:
599
	stdcall [mb_create],msgbox_7,thread ;message: Can not find text
688
	stdcall [mb_create],msgbox_7,thread ;message: Can not find text
600
	ret
689
	ret
Line 601... Line 690...
601
 
690
 
602
;description:
-
 
603
; ª­®¯ª  [‡ ¬¥­¨âì] ­  ¯ ­¥«¨
-
 
604
align 4
-
 
605
but_replace:
-
 
606
	; ¯®ª  ­¥ ᤥ« ­®
-
 
607
	ret
-
 
608
 
-
 
609
;description:
691
;description:
610
; äã­ªæ¨ï ¯®¨áª  ¨­ä®à¬ æ¨¨ ¢ ᯨ᪥ ª«î祢ëå á«®¢
692
; äã­ªæ¨ï ¯®¨áª  ¨­ä®à¬ æ¨¨ ¢ ᯨ᪥ ª«î祢ëå á«®¢
611
align 4
693
align 4
612
but_find_key_w:
694
but_find_key_w:
613
	cmp dword[wnd_k_words_run],0
695
	cmp dword[wnd_k_words_run],0
Line 645... Line 727...
645
	call draw_but_toolbar
727
	call draw_but_toolbar
646
	stdcall [ted_draw],edi
728
	stdcall [ted_draw],edi
647
	ret
729
	ret
648
endp
730
endp
Line 649... Line -...
649
 
-
 
650
;description:
-
 
651
; ¢ë§®¢/áªàë⨥ ¯ ­¥«¨ á ä ©« ¬¨ ᨭ⠪á¨á 
-
 
652
align 4
-
 
653
proc but_choose_syntax uses edi, edit:dword
-
 
654
	mov edi,[edit]
-
 
655
 
-
 
656
	cmp ted_panel_id,TED_PANEL_NULL
-
 
657
	je @f
-
 
658
		mov ted_panel_id,TED_PANEL_NULL
-
 
659
		mov ted_wnd_l,0
-
 
660
		jmp .e_if
-
 
661
	@@:
-
 
662
		mov ted_panel_id,TED_PANEL_SYNTAX
-
 
663
		mov ted_wnd_l,TED_PANEL_WIDTH
-
 
664
	.e_if:
-
 
665
	call EvSize
-
 
666
	stdcall [ted_draw],edi
-
 
667
	ret
-