Subversion Repositories Kolibri OS

	mcall SF_REDRAW,SSF_BEGIN_DRAW

	mov edx,[sc.work]

	mcall SF_CREATE_WINDOW,dword[wnd_s_pos],dword[wnd_s_pos+4],,,hed

	mcall SF_THREAD_INFO,procinfo,-1

	call EvSize

	movzx ebx,word[procinfo.client_box.width]

	mcall SF_DRAW_RECT,,ted_wnd_t ;âåðõíèé ïðÿìîóãîëüíèê, äëÿ î÷èñòêè âåðõíåé ïàíåëè

	call draw_but_toolbar

	stdcall [kmainmenu_draw], [main_menu]

	stdcall [ted_draw], tedit0

	mcall SF_REDRAW,SSF_END_DRAW

align 4

	pushad

	mov edi,tedit0

	mov ecx,0x40000000+ID_BUT_NEW

	bt word[panel_but],0

	jnc @f

		call draw_but_icon ;New

	@@:

	mov cx,ID_BUT_OPEN

	jnc @f

		add edx,25 shl 16

		call draw_but_icon ;Open

	@@:

	stdcall [ted_can_save],edi

	je @f

		and ecx,0xffff

	@@:

	mov cx,ID_BUT_SAVE

	bt word[panel_but+2],0

	jnc @f

		add edx,25 shl 16

		call draw_but_icon ;Save

	@@:

	or ecx,0x40000000

	mov cx,ID_BUT_SAVE_AS

	jnc @f

		add edx,25 shl 16

		call draw_but_icon ;Save as

	@@:

	mov cx,ID_BUT_SELECT

	jnc @f

		add edx,30 shl 16

		call draw_but_icon ;Select word

	@@:

	call [ted_is_select]

	jnz @f

		and ecx,0xffff

	@@:

	mov cx,ID_BUT_CUT

	bt word[panel_but+5],0

	jnc @f

		add edx,25 shl 16

		call draw_but_icon ;Cut

	@@:

	mov cx,ID_BUT_COPY

	jnc @f

		add edx,25 shl 16

		call draw_but_icon ;Copy

	@@:

	or ecx,0x40000000

	cmp dword[buf],0

		and ecx,0xffff

	@@:

	mov cx,ID_BUT_PASTE

	bt word[panel_but+7],0

	jnc @f

		add edx,25 shl 16

		call draw_but_icon ;Paste

	@@:

	or ecx,0x40000000

	mov cx,ID_BUT_FIND

	jnc @f

		add edx,25 shl 16

		call draw_but_icon ;Found

	@@:

	mov cx,ID_BUT_REPLACE

	jnc @f

		add edx,25 shl 16

		call draw_but_icon ;Replace

	@@:

	mov cx,ID_BUT_KEY_WORDS

	jnc @f

		add edx,25 shl 16

		call draw_but_icon ;Key words

	@@:

	call [ted_is_select]

	jnz @f

		and ecx,0xffff

	@@:

	mov cx,ID_BUT_UPPER

	bt word[panel_but+11],0

	jnc @f

		add edx,30 shl 16

		call draw_but_icon ;Upper

	@@:

	mov cx,ID_BUT_LOWER

	jnc @f

		add edx,25 shl 16

		call draw_but_icon ;Lower

	@@:

	mov cx,ID_BUT_REVERSE

	jnc @f

		add edx,25 shl 16

		call draw_but_icon ;Reverse

	@@:

	or ecx,0x40000000

	mov ebx,ted_tim_undo

	jg @f

		and ecx,0xffff

	@@:

	mov cx,ID_BUT_UNDO

	bt word[panel_but+14],0

	jnc @f

		add edx,30 shl 16

		call draw_but_icon ;Undo

	@@:

	or ecx,0x40000000

	cmp ted_tim_undo,1

		and ecx,0xffff

	@@:

	mov cx,ID_BUT_REDO

	bt word[panel_but+15],0

	jnc @f

		add edx,25 shl 16

		call draw_but_icon ;Redo

	@@:

	or ecx,0x40000000

	mov cx,ID_BUT_INVISIBLE

	jnc @f

		add edx,30 shl 16

		call draw_but_icon ;Invisible on|off

	@@:

	mov cx,ID_BUT_SYNTAX_LIST

	jnc @f

		add edx,25 shl 16

		call draw_but_icon ;Âûáîð ôàéëà ïîäñâåòêè

	@@:

	mov cx,ID_BUT_SYNTAX_MODE

	jnc @f

		add edx,25 shl 16

		call draw_but_icon ;Ïîäñâåòêà âêë|âûêë

	@@:

	mov cx,ID_BUT_CONVERT_1251_866

	jnc @f

		add edx,30 shl 16

		call draw_but_icon ;cp 1251 -> 866

	@@:

	mov cx,ID_BUT_CONVERT_866_1251

	jnc @f

		add edx,25 shl 16

		call draw_but_icon ;cp 866 -> 1251

	@@:

	popad

;txtBUp db 24

;txtBRi db 26

;txtBLe db 27

;input:

align 4

proc draw_panel_find

	cmp ted_panel_id,TED_PANEL_FIND

	jne @f

		call p_find

		jmp .end_f

	@@:

	cmp ted_panel_id,TED_PANEL_REPLACE

	jne @f

		call p_replace

		jmp .end_f

	@@:

	push eax edx

		mcall SF_DEFINE_BUTTON,,,0x80000000+201

		mcall ,,,0x80000000+202

		mcall ,,,0x80000000+203

	pop edx eax

	.end_f:

	ret

endp

align 4

	push eax ebx ecx edx

		mov ecx,ted_wnd_t

		shl ecx,16

		mov cx,20

		mcall SF_DRAW_RECT,TED_PANEL_WIDTH,,[sc.work]

		mov ecx,ted_wnd_t

		shl ecx,16

		add ecx,ted_wnd_h

		mov edx,ted_scr_h

		add cx,word[edx+sb_offs_size_y]

		sub cx,20+15-1 ; 15 - height text box

		mcall ,,,[sc.work]

		stdcall [edit_box_draw], edit2

		mov ecx,ted_wnd_t

		add ecx,(93 shl 16)+20

		mcall SF_DEFINE_BUTTON,(5 shl 16)+85,,201,[sc.work_button] ;201 - button id

		mov ebx,(23 shl 16)+7

		mov ecx,[sc.work_text]

		or ecx,0x80000000

		mcall SF_DRAW_TEXT,,,txtFindCapt

		mov ecx,[sc.work_button_text]

		mov ebx,(15 shl 16)+100

		add ebx,ted_wnd_t

		mcall ,,,txtFindNext

		stdcall [option_box_draw], opt_grlist1

	ret

align 4

	push eax ebx ecx edx

		mov ecx,ted_wnd_t

		shl ecx,16

		mov cx,20

		mcall SF_DRAW_RECT,TED_PANEL_WIDTH,,[sc.work]

		mov ecx,ted_wnd_t

		shl ecx,16

		add ecx,ted_wnd_h

		mov edx,ted_scr_h

		add cx,word[edx+sb_offs_size_y]

		sub cx,20+15-1 ; 15 - height text box

		mcall ,,,[sc.work]

		stdcall [edit_box_draw], edit1

		mov ecx,ted_wnd_t

		add ecx,(133 shl 16)+20

		mcall SF_DEFINE_BUTTON,(5 shl 16)+95,,202,[sc.work_button] ;replace next

		add ecx,(26 shl 16)

		mov ebx,ted_wnd_t

		mov ecx,[sc.work_text]

		or ecx,0x80000000

		mcall SF_DRAW_TEXT,,,txtFindCapt

		add ebx,93

		mcall SF_DRAW_TEXT,,,txtRerlaceCapt

		mov ecx,[sc.work_button_text]

		mov ebx,ted_wnd_t

		add ebx,(15 shl 16)+140

		mcall ,,,txtRerlace

		add ebx,26

		mcall ,,,txtRerlaceAll

		stdcall [option_box_draw], opt_grlist1

	ret

;input:

align 4

proc draw_panel_syntax

	cmp ted_panel_id,TED_PANEL_SYNTAX ;if not panel

	jne @f

	pushad

	mov ecx,ted_wnd_t

	mov cx,20

	mcall SF_DRAW_RECT,TED_PANEL_WIDTH,,[sc.work] ;ðèñîâàíèå âåðõíåãî ôîíîâîãî ïðÿìîóãîëüíèêà

	stdcall dword[tl_draw], tree1

	stdcall dword[scrollbar_ver_draw], dword ws_dir_lbox

	ror ecx,16

	add ecx,20

	and ecx,0xffff

	ror ecx,16

	add ecx,ted_wnd_h

	mov esi,ted_scr_h

	add cx,word[esi+sb_offs_size_y]

	sub cx,20

	sub ecx,dword[tree1.box_height]

	inc cx

	int 0x40 ;ðèñîâàíèå íèæíåãî ôîíîâîãî ïðÿìîóãîëüíèêà

	mov ecx,ted_wnd_t

	add ecx,dword[tree1.box_height]

	shl ecx,16

	mov cx,20

	mcall SF_DEFINE_BUTTON,(5 shl 16)+65,,200,[sc.work_button] ;200 - button id

	mov ebx,(30 shl 16)+5

	mov ecx,[sc.work_text]

	or ecx,0x80000000

	mcall SF_DRAW_TEXT,,,txtFormatCapt

	mov ebx,(10 shl 16)+31

	add ebx,ted_wnd_t

	mcall ,,,txtFormatApply

	popad

	@@:

		push eax edx

		mov edx,200

		or edx,0x80000000

		mcall SF_DEFINE_BUTTON ;åñëè íåò ïàíåëè òî óäàëÿåì êíîïêó

		pop edx eax

	.end_f:

	ret

endp

MIN_M_WND_H equ 100 ;ìèíèìàëüíàÿ âûñîòà ãëàâíîãî îêíà

; edi = pointer to tedit struct

align 4

EvSize:

	pushad

	mov ebx,ted_scr_h

	mov esi,ted_scr_w

	m2m ted_wnd_w,[procinfo.client_box.width] ;ñòàâèì øèðèíó îêíà ðåäàêòîðà ðàâíîé øèðèíå âñåãî îêíà

	sub ted_wnd_w,eax ;îòíèìàåì îòñòóï ñëåâà

	movzx eax,word[esi+sb_offs_size_x]

	sub ted_wnd_w,eax ;îòíèìàåì øèðèíó âåðò. ñêðîëëèíãà

	m2m ted_wnd_h,[procinfo.client_box.height] ;ñòàâèì âûñîòó îêíà ðåäàêòîðà ðàâíîé âûñîòå âñåãî îêíà

	jg @f

		mov ted_wnd_h,MIN_M_WND_H

	@@:

	movzx eax,word[ebx+sb_offs_size_y]

	mov eax,ted_wnd_t

	sub ted_wnd_h,eax	      ;îòíèìàåì îòñòóï ñâåðõó

	stdcall [ted_init_scroll_bars], tedit0,2

	mov eax,ted_wnd_t

	mov tl_box_top,eax ;=ted_wnd_t

	add tl_box_top,20

	mov [edit2.top],eax ;=ted_wnd_t

	mov [edit1.top],eax ;=ted_wnd_t

	add dword[edit1.top],113

	popad

	ret

;input:

;   cx = ID button

;  edx = x*2^16+y

align 4

draw_but_icon:

	push eax ebx

	mov eax,SF_DEFINE_BUTTON

		mov ebx,edx

		mov edx,ecx

		mov cx,bx

		shl ecx,16

		mov cx,19 ;=20-1

		mov bx,19 ;=20-1

		mov esi,ebx

		shr esi,16

		add esi,20

		cmp esi,[procinfo.client_box.width]

		jge @f ;êíîïêà íå âëåçëà â îêíî

			mov esi,[sc.work_button]

			int 0x40 ;ñòàâèì êíîïêó

			mov eax,SF_PUT_IMAGE

		@@:

	pop esi edx ecx

	cmp eax,SF_PUT_IMAGE

		mov ebx,[bmp_icon]

		bt ecx,30 ;if (ecx & 0x40000000)

		jc .gray

			add ebx,TOOLBAR_ICONS_SIZE ;ïåðåìåùàåìñÿ íà ñåðûå êíîïêè

		.gray:

		push ecx

		sub ecx,ID_BUT_0

		and ecx,0xffff

		imul ecx,1200

		add ebx,ecx

		mov ecx,(20 shl 16)+20

		int 0x40 ;ñòàâèì ðèñóíîê íà êíîïêó

		pop ecx

	@@:

	pop ebx eax

	ret

;descrition:

;input:

; buf_rgb - áóôåð ñ âõîäíûì 24 áèòíûì öâåòíûì èçîáðàæåíèåì

; buf_g24 - áóôåð ñ âûõîäíûì 24 áèòíûì ñåðûì èçîáðàæåíèåì

; pixels - ÷èñëî ïèêñåëåé â èçîáðàæåíèè

align 4

proc img_to_gray, buf_rgb:dword, buf_g24:dword, pixels:dword

pushad

	mov esi,[buf_rgb]

	mov edi,[buf_g24]

	mov ecx,[pixels]

	mov ebx,3

	@@:

		movzx eax,byte[esi]

		movzx edx,byte[esi+1]

		add eax,edx

		movzx edx,byte[esi+2]

		add eax,edx

		xor edx,edx

		div ebx ;shr eax,2

		mov ah,al

		mov word[edi],ax

		mov byte[edi+2],al

		add esi,3

		add edi,3

		loop @b

popad

	ret

endp