WebSVN – Kolibri OS – Diff – /programs/other/t_edit/t_button.inc



On_NewFile:
  push eax
  mov al,1
  call Clear
  call draw_but_toolbar
  stdcall draw_main_win, tedit0
  pop eax
  ret

 
On_SaveAndNewFile:

    push thread
    push msgbox_4
    call [mb_create] ;message: Can-t open text file!
    jmp .ret_f
  @@:
 
  cmp ebx,-1
  je .ret_f
    ;if open file
    call OpenFile
    call draw_but_toolbar
    stdcall draw_main_win, tedit0
    cmp ebx,maxChars-2
    jl .ret_f
    push thread
    push msgbox_1
    call [mb_create]

      call GoToPos
      mov edx,edi
      call GetTexCoords
      mov [sel.x0],ebx
      mov [sel.y0],eax
      stdcall draw_main_win, tedit0
      jmp .end_find
    @@:
      push thread
      push msgbox_7
      call [mb_create] ;message: Can not find text

  ret

 
but_OpenSyntax:
  cmp byte[panel_id],TE_PANEL_SYNTAX
 
  jne @f
    stdcall dword[tl_node_get_data], dword tree1
    pop dword[fn_col_option]
    call InitColText
    call CmColored
    stdcall draw_main_win, tedit0
  @@:

  ret
 

      mov [sel.x1],ebx
      mov [sel.y1],eax
    @@:
  pop edx ecx ebx eax
  call draw_but_toolbar
  stdcall draw_main_win, tedit0
  jmp still

 
but_cut:
  call but_Copy

    call SelTextDel
  pop bx
  cmp al,1
  jne @f
    call draw_but_toolbar
    stdcall draw_main_win, tedit0
  @@:
  jmp still

 
;output:
; al = 1 if copy text
but_Copy:
  push ax
  stdcall IsSel, tedit0
  cmp al,0
  jne @f
    pop ax
    ret ;if not selected text

  mov byte[ebx],0

 
  cmp ecx,0
  je @f
    call draw_but_toolbar
    stdcall draw_bufer, tedit0
  @@:
  pop esi edx ecx ebx ax

  ret

      mov bx,0x0101
      call SelTextDel
      mov edi,buf
      call TextAdd
      call draw_but_toolbar
      stdcall draw_main_win, tedit0
    @@:
  pop edi esi bx eax
  jmp still

 
proc but_find, edit:dword ;¢ë§®¢/áªàëâ¨¥ ¯ ­¥«¨ ¯®¨áª 
  push edi
  mov edi,[edit]
 
  cmp byte[panel_id],TE_PANEL_NULL
  je @f
    mov byte[panel_id],TE_PANEL_NULL
    mov ted_wnd_l,0
    jmp .e_if
  @@:
    mov byte[panel_id],TE_PANEL_FIND
    mov ted_wnd_l,TE_PANEL_WIDTH
  .e_if:
  stdcall EvSize,edi
  stdcall draw_main_win,edi
  pop edi
  ret

endp
 

but_replace:

  push edi
  mov [conv_table],EvUpper
  call ConvertSelText
  cmp edi,0
  je @f
    stdcall draw_main_win, tedit0
  @@:
  pop edi
  jmp still

 
but_sumb_lover:
  push edi
  mov [conv_table],EvLover
  call ConvertSelText
  cmp edi,0
  je @f
    stdcall draw_main_win, tedit0
  @@:
  pop edi

  jmp still
 
but_reverse:
  push eax ebx
  stdcall IsSel, tedit0
  cmp al,0
  je @f
    call SelNormalize

    ;cmp eax,...
    ;je @f
    call Revers
  @@:
  pop ebx eax
  stdcall draw_main_win, tedit0
  jmp still

 
but_undo:
  mov eax,[tim_Undo]

  mov [cur_y],0
  mov [wScr.position],0
  mov [hScr.position],0

 
  call draw_but_toolbar
  stdcall draw_main_win, tedit0

  ret
 
proc but_synt_show, edit:dword
  push edi
  mov edi,[edit]
 
  cmp byte[panel_id],TE_PANEL_NULL
  je @f
    mov byte[panel_id],TE_PANEL_NULL
    mov ted_wnd_l,0
    jmp .e_if
  @@:
    mov byte[panel_id],TE_PANEL_SYNTAX
    mov ted_wnd_l,TE_PANEL_WIDTH
  .e_if:
  stdcall EvSize,edi
  stdcall draw_main_win,edi
  pop edi

  ret
endp
 
sel_KeyUp:

    jne @f
      call OnInitialUpdate
    @@:
  pop dx
  call SelMove
  stdcall draw_main_win, tedit0
  ret

 
sel_KeyDown:
  cmp [dragk],1

    jne @f
      call OnInitialUpdate
    @@:
  pop dx
  call SelMove
  stdcall draw_main_win, tedit0
  ret

 
sel_KeyLeft:
  cmp [dragk],1

      mov dl,8
    @@:
    cmp dl,8
    jne @f
      call OnInitialUpdate
      stdcall draw_main_win, tedit0
      jmp .end_f
    @@:
      stdcall draw_cur_line, tedit0
    .end_f:
  pop dx
  ret

 

      mov dl,8
    @@:
    cmp dl,8
    jne @f
      call OnInitialUpdate
      stdcall draw_main_win, tedit0
      jmp .end_f
    @@:
      stdcall draw_cur_line, tedit0
    .end_f:
  pop dx
  ret


Rev 1338	Rev 1449
Line 21...	Line 21...
21	On_NewFile:	21	On_NewFile:
22	push eax	22	push eax
23	mov al,1	23	mov al,1
24	call Clear	24	call Clear
25	call draw_but_toolbar	25	call draw_but_toolbar
26	call draw_main_win	26	stdcall draw_main_win, tedit0
27	pop eax	27	pop eax
28	ret	28	ret
Line 29...	Line 29...
29		29
30	On_SaveAndNewFile:	30	On_SaveAndNewFile:
Line 81...	Line 81...
81	push thread	81	push thread
82	push msgbox_4	82	push msgbox_4
83	call [mb_create] ;message: Can-t open text file!	83	call [mb_create] ;message: Can-t open text file!
84	jmp .ret_f	84	jmp .ret_f
85	@@:	85	@@:
86	mov [err_opn],1	-
87	cmp ebx,-1	86	cmp ebx,-1
88	je .ret_f	87	je .ret_f
89	;if open file	88	;if open file
90	call OpenFile	89	call OpenFile
91	call draw_but_toolbar	90	call draw_but_toolbar
92	call draw_main_win	91	stdcall draw_main_win, tedit0
93	cmp ebx,maxChars-2	92	cmp ebx,maxChars-2
94	jl .ret_f	93	jl .ret_f
95	push thread	94	push thread
96	push msgbox_1	95	push msgbox_1
97	call [mb_create]	96	call [mb_create]
Line 192...	Line 191...
192	call GoToPos	191	call GoToPos
193	mov edx,edi	192	mov edx,edi
194	call GetTexCoords	193	call GetTexCoords
195	mov [sel.x0],ebx	194	mov [sel.x0],ebx
196	mov [sel.y0],eax	195	mov [sel.y0],eax
197	call draw_main_win	196	stdcall draw_main_win, tedit0
198	jmp .end_find	197	jmp .end_find
199	@@:	198	@@:
200	push thread	199	push thread
201	push msgbox_7	200	push msgbox_7
202	call [mb_create] ;message: Can not find text	201	call [mb_create] ;message: Can not find text
Line 239...	Line 238...
239	ret	238	ret
Line 240...	Line 239...
240		239
241	but_OpenSyntax:	240	but_OpenSyntax:
242	cmp byte[panel_id],TE_PANEL_SYNTAX	241	cmp byte[panel_id],TE_PANEL_SYNTAX
243	jne @f	-
244	push dword tree1	242	jne @f
245	call dword [tl_node_get_data]	243	stdcall dword[tl_node_get_data], dword tree1
246	pop dword [fn_col_option]	244	pop dword[fn_col_option]
247	call InitColText	245	call InitColText
248	call CmColored	246	call CmColored
249	call draw_main_win	247	stdcall draw_main_win, tedit0
250	@@:	248	@@:
Line 251...	Line 249...
251	ret	249	ret
252		250
Line 270...	Line 268...
270	mov [sel.x1],ebx	268	mov [sel.x1],ebx
271	mov [sel.y1],eax	269	mov [sel.y1],eax
272	@@:	270	@@:
273	pop edx ecx ebx eax	271	pop edx ecx ebx eax
274	call draw_but_toolbar	272	call draw_but_toolbar
275	call draw_main_win	273	stdcall draw_main_win, tedit0
276	jmp still	274	jmp still
Line 277...	Line 275...
277		275
278	but_cut:	276	but_cut:
279	call but_Copy	277	call but_Copy
Line 283...	Line 281...
283	call SelTextDel	281	call SelTextDel
284	pop bx	282	pop bx
285	cmp al,1	283	cmp al,1
286	jne @f	284	jne @f
287	call draw_but_toolbar	285	call draw_but_toolbar
288	call draw_main_win	286	stdcall draw_main_win, tedit0
289	@@:	287	@@:
290	jmp still	288	jmp still
Line 291...	Line 289...
291		289
292	;output:	290	;output:
293	; al = 1 if copy text	291	; al = 1 if copy text
294	but_Copy:	292	but_Copy:
295	push ax	293	push ax
296	call IsSel	294	stdcall IsSel, tedit0
297	cmp al,0	295	cmp al,0
298	jne @f	296	jne @f
299	pop ax	297	pop ax
300	ret ;if not selected text	298	ret ;if not selected text
Line 334...	Line 332...
334	mov byte[ebx],0	332	mov byte[ebx],0
Line 335...	Line 333...
335		333
336	cmp ecx,0	334	cmp ecx,0
337	je @f	335	je @f
338	call draw_but_toolbar	336	call draw_but_toolbar
339	call draw_bufer	337	stdcall draw_bufer, tedit0
340	@@:	338	@@:
341	pop esi edx ecx ebx ax	339	pop esi edx ecx ebx ax
Line 342...	Line 340...
342	ret	340	ret
Line 352...	Line 350...
352	mov bx,0x0101	350	mov bx,0x0101
353	call SelTextDel	351	call SelTextDel
354	mov edi,buf	352	mov edi,buf
355	call TextAdd	353	call TextAdd
356	call draw_but_toolbar	354	call draw_but_toolbar
357	call draw_main_win	355	stdcall draw_main_win, tedit0
358	@@:	356	@@:
359	pop edi esi bx eax	357	pop edi esi bx eax
360	jmp still	358	jmp still
Line -...	Line 359...
-		359
361		360	proc but_find, edit:dword ;¢ë§®¢/áªàëâ¨¥ ¯ ¥«¨ ¯®¨áª
-		361	push edi
-		362	mov edi,[edit]
362	but_find:	363
363	cmp byte[panel_id],TE_PANEL_NULL	364	cmp byte[panel_id],TE_PANEL_NULL
364	je @f	365	je @f
365	mov byte[panel_id],TE_PANEL_NULL	366	mov byte[panel_id],TE_PANEL_NULL
366	mov word[wndMain.left],0	367	mov ted_wnd_l,0
367	jmp .e_if	368	jmp .e_if
368	@@:	369	@@:
369	mov byte[panel_id],TE_PANEL_FIND	370	mov byte[panel_id],TE_PANEL_FIND
370	mov word[wndMain.left],TE_PANEL_WIDTH	371	mov ted_wnd_l,TE_PANEL_WIDTH
371	.e_if:	372	.e_if:
372	call EvSize	373	stdcall EvSize,edi
373	call draw_main_win	374	stdcall draw_main_win,edi
-		375	pop edi
-		376	ret
Line 374...	Line 377...
374	jmp still	377	endp
375		378
Line 376...	Line 379...
376	but_replace:	379	but_replace:
Line 383...	Line 386...
383	push edi	386	push edi
384	mov [conv_table],EvUpper	387	mov [conv_table],EvUpper
385	call ConvertSelText	388	call ConvertSelText
386	cmp edi,0	389	cmp edi,0
387	je @f	390	je @f
388	call draw_main_win	391	stdcall draw_main_win, tedit0
389	@@:	392	@@:
390	pop edi	393	pop edi
391	jmp still	394	jmp still
Line 392...	Line 395...
392		395
393	but_sumb_lover:	396	but_sumb_lover:
394	push edi	397	push edi
395	mov [conv_table],EvLover	398	mov [conv_table],EvLover
396	call ConvertSelText	399	call ConvertSelText
397	cmp edi,0	400	cmp edi,0
398	je @f	401	je @f
399	call draw_main_win	402	stdcall draw_main_win, tedit0
400	@@:	403	@@:
401	pop edi	404	pop edi
Line 402...	Line 405...
402	jmp still	405	jmp still
403		406
404	but_reverse:	407	but_reverse:
405	push eax ebx	408	push eax ebx
406	call IsSel	409	stdcall IsSel, tedit0
407	cmp al,0	410	cmp al,0
408	je @f	411	je @f
409	call SelNormalize	412	call SelNormalize
Line 425...	Line 428...
425	;cmp eax,...	428	;cmp eax,...
426	;je @f	429	;je @f
427	call Revers	430	call Revers
428	@@:	431	@@:
429	pop ebx eax	432	pop ebx eax
430	call draw_main_win	433	stdcall draw_main_win, tedit0
431	jmp still	434	jmp still
Line 432...	Line 435...
432		435
433	but_undo:	436	but_undo:
434	mov eax,[tim_Undo]	437	mov eax,[tim_Undo]
Line 499...	Line 502...
499	mov [cur_y],0	502	mov [cur_y],0
500	mov [wScr.position],0	503	mov [wScr.position],0
501	mov [hScr.position],0	504	mov [hScr.position],0
Line 502...	Line 505...
502		505
503	call draw_but_toolbar	506	call draw_but_toolbar
504	call draw_main_win	507	stdcall draw_main_win, tedit0
Line 505...	Line 508...
505	ret	508	ret
-		509
-		510	proc but_synt_show, edit:dword
-		511	push edi
506		512	mov edi,[edit]
507	but_synt_show:	513
508	cmp byte[panel_id],TE_PANEL_NULL	514	cmp byte[panel_id],TE_PANEL_NULL
509	je @f	515	je @f
510	mov byte[panel_id],TE_PANEL_NULL	516	mov byte[panel_id],TE_PANEL_NULL
511	mov word[wndMain.left],0	517	mov ted_wnd_l,0
512	jmp .e_if	518	jmp .e_if
513	@@:	519	@@:
514	mov byte[panel_id],TE_PANEL_SYNTAX	520	mov byte[panel_id],TE_PANEL_SYNTAX
515	mov word[wndMain.left],TE_PANEL_WIDTH	521	mov ted_wnd_l,TE_PANEL_WIDTH
516	.e_if:	522	.e_if:
517	call EvSize	523	stdcall EvSize,edi
-		524	stdcall draw_main_win,edi
-		525	pop edi
Line 518...	Line 526...
518	call draw_main_win	526	ret
519	jmp still	527	endp
520		528
521	sel_KeyUp:	529	sel_KeyUp:
Line 530...	Line 538...
530	jne @f	538	jne @f
531	call OnInitialUpdate	539	call OnInitialUpdate
532	@@:	540	@@:
533	pop dx	541	pop dx
534	call SelMove	542	call SelMove
535	call draw_main_win	543	stdcall draw_main_win, tedit0
536	ret	544	ret
Line 537...	Line 545...
537		545
538	sel_KeyDown:	546	sel_KeyDown:
539	cmp [dragk],1	547	cmp [dragk],1
Line 547...	Line 555...
547	jne @f	555	jne @f
548	call OnInitialUpdate	556	call OnInitialUpdate
549	@@:	557	@@:
550	pop dx	558	pop dx
551	call SelMove	559	call SelMove
552	call draw_main_win	560	stdcall draw_main_win, tedit0
553	ret	561	ret
Line 554...	Line 562...
554		562
555	sel_KeyLeft:	563	sel_KeyLeft:
556	cmp [dragk],1	564	cmp [dragk],1
Line 566...	Line 574...
566	mov dl,8	574	mov dl,8
567	@@:	575	@@:
568	cmp dl,8	576	cmp dl,8
569	jne @f	577	jne @f
570	call OnInitialUpdate	578	call OnInitialUpdate
571	call draw_main_win	579	stdcall draw_main_win, tedit0
572	jmp .end_f	580	jmp .end_f
573	@@:	581	@@:
574	call draw_cur_line	582	stdcall draw_cur_line, tedit0
575	.end_f:	583	.end_f:
576	pop dx	584	pop dx
577	ret	585	ret
Line 578...	Line 586...
578		586
Line 590...	Line 598...
590	mov dl,8	598	mov dl,8
591	@@:	599	@@:
592	cmp dl,8	600	cmp dl,8
593	jne @f	601	jne @f
594	call OnInitialUpdate	602	call OnInitialUpdate
595	call draw_main_win	603	stdcall draw_main_win, tedit0
596	jmp .end_f	604	jmp .end_f
597	@@:	605	@@:
598	call draw_cur_line	606	stdcall draw_cur_line, tedit0
599	.end_f:	607	.end_f:
600	pop dx	608	pop dx
601	ret	609	ret
602		610

Subversion Repositories Kolibri OS

(root)/programs/other/t_edit/t_button.inc – Rev 1338 → 1449