WebSVN – Kolibri OS – Diff – /programs/media/animage/trunk/menu_instruments.inc


macro instrument_set m_num, code
{
local no_instrument
cmp [number_menu],m_num
jne no_instrument
	mov	[Current_instrument],code
	call TakeButtonInstruments
	jmp end_menu
no_instrument:
}
 
;-----------------------------------------------------------
;-----------instruments of menu-----------------------------
;-----------------------------------------------------------
align 4
TakeInstruments:
;|||||||||||||||||||FILE||||||||||||||||||||||
	cmp	[number_panel],7
	jne	no_file
 
; <<< New >>>
	cmp	[number_menu],1
	jne	no_new
 
	call dialog2_draw
 
	mov	edx,1000000000000000000000000000000b+1000
	mcall SF_DEFINE_BUTTON,<177,40>,<115,14>,
 
	mov	edx,1000000000000000000000000000000b+1001
	mcall ,,<139,14>,
 
	mov	edx,1000000000000000000000000000000b+1002
	mcall ,,<170,15>
 
no_activate_space:
	mcall SF_SLEEP, 5 ;fix cpu use 100%
	mcall SF_WAIT_EVENT
 
	cmp eax,1 ;redraw window
	jne @f
		call dialog2_draw
		jmp no_activate_space
	@@:
 
	cmp eax,3 ;press button
	jne no_activate_space
 
	mcall SF_GET_BUTTON
	shr	eax,8
 
	cmp	eax,1000
	jl	no_activate_space
 
	cmp	eax,1000
	jne	no_picture_size_x
 
	mov	eax,180
	mov	ebx,119
	mov	ecx,5
	call	dialog_line
 
	mov	eax,string_
	mov	ebx,13
	call	find_symvol
 
	dec	eax
	mov	[length_number],eax
	mov	eax,string_
	call str_to_int
 
	mov	[Picture_SizeX],eax
	jmp	no_activate_space
;---------------------------------------------------------------------
no_picture_size_x:
	cmp	eax,1001
	jne	no_picture_size_y
 
	mov	eax,180
	mov	ebx,119+24
	mov	ecx,5
	call	dialog_line
 
	mov	eax,string_
	mov	ebx,13
	call	find_symvol
 
	dec	eax
	mov	[length_number],eax
	mov	eax,string_
	call str_to_int
 
	mov	[Picture_SizeY],eax
	jmp	no_activate_space
;---------------------------------------------------------------------
no_picture_size_y:
	cmp	eax,1002
	jne	no_activate_space
 
exit_new:
	mov	edx,11100000000000000000000000000000b+1002
	mcall SF_DEFINE_BUTTON,<177,40>,<170,15>
 
	mov	edx,11100000000000000000000000000000b+1001
	mcall	,,<139,14>
 
	mov	edx,11100000000000000000000000000000b+1000
	mcall	,,<115,14>
 
;get memory for new picture
	call GetMemory
 
	and	[save_flag],0
 
	call cleare_work_arrea
	call drawwin
	jmp	end_menu
;---------------------------------------------------------------------
no_new:
; <<< Open >>>
	cmp	[number_menu],2
	jne	no_open
 
;---------------------------------------------------------------------
	mov	[OpenDialog_data.type],0 ; open
	
	push    dword OpenDialog_data
	call    [OpenDialog_Start]
	
	cmp	[OpenDialog_data.status],1
	jne	end_menu
;---------------------------------------------------------------------
	mcall SF_SET_EVENTS_MASK,0x80000027 ;100111b
 
	call load_picture
	call drawwin
	jmp	end_menu
;---------------------------------------------------------------------
no_open:
; <<< Save >>>
	cmp	[number_menu],3
	jne	no_save_
 
	mov	al,[save_flag]
	test al,al
	jz end_menu
	jmp	save_enter
;---------------------------------------------------------------------
no_save_:
; <<< Save as >>>
	cmp	[number_menu],4
	jne	no_save
 
; savedialog drawwin,save1,save2,file_path
;---------------------------------------------------------------------
; replace extension to '.png'
	push	eax esi
	mov	esi,[OpenDialog_data.filename_area]
	xor	eax,eax
	cld
@@:
	lodsb
	test	eax,eax
	jnz	@r
	sub	esi,5
	cmp	[esi],byte '.'
	jne	@f
	mov	[esi],dword '.png'
@@:
	pop	esi eax
;---------------------------------------------------------------------
	mov	[OpenDialog_data.type],1 ; save
	stdcall [OpenDialog_Start],OpenDialog_data
 
	cmp	[OpenDialog_data.status],1
	jne	end_menu
;---------------------------------------------------------------------
save1:
save_enter:
	mcall SF_SET_EVENTS_MASK,0x80000027 ;100111b
 
	xor al,al
	mov edi,file_path
	repne scasb
	mov eax,[edi-5]
	or eax,0x20202000 ;down register
	cmp eax,'.png'
	jne .end0
		;create image struct
		stdcall [img_create], [Picture_SizeX], [Picture_SizeY], Image.bpp24
		test eax,eax
		jz @f
			;copy image
			mov edi,[eax+Image.Data]
			mov esi,[PointerToPicture]
			mov ecx,[Picture_SizeX]
			imul ecx,[Picture_SizeY]
			imul ecx,3
			rep movsb
 
			;encode image
			stdcall [img_encode], eax, LIBIMG_FORMAT_PNG, 0
			test eax,eax
			jz @f
 
			;copy output image
			mov edi,[PointerToEditBufer]
			mov esi,eax
			mov eax,ecx
			rep movsb
		@@:
		mov	ecx,eax
		mov	eax,file_path
		mov	ebx,[PointerToEditBufer]
		jmp .end1
	.end0:
 
	call analizing_picture_to_palette
 
	;eax => number of colors in picture
	mov	ebx,[PointerToPicture]
	mov	ecx,[PointerToEditBufer]
	mov	edx,[PointerToPalette]
	mov	esi,[Picture_SizeX]
	mov	edi,[Picture_SizeY]
 
	call	coding_bmp
 
	mov	eax,file_path
	mov	ecx,ebx
	mov	ebx,[PointerToEditBufer]
 
	.end1:
	call	save_file
 
	mov	[save_flag],1
	call drawwin
	jmp	end_menu
;---------------------------------------------------------------------
no_save:
; <<< Exit >>>
	cmp	[number_menu],5
	jne	no_exit_program
 
	mcall SF_TERMINATE_PROCESS
;---------------------------------------------------------------------
no_exit_program:
no_file:
;|||||||||||||||||||||||||||||EDIT|||||||||||||||||||||||||
	cmp	[number_panel],6
	jne	no_edit
 
; <<< Undo >>>
	cmp	[number_menu],1
	jne	no_undo
 
	cmp	[number_undo],2 ;2 - maximum undo count
	jge	end_menu
 
;rotate bufers -1
	inc	[number_undo]
	mov eax,[PointerToPicture]
	mov ebx,[PointerToCopyPicture]
	mov ecx,[PointerToCopyPicture2]
	mov [PointerToPicture],ebx
	mov [PointerToCopyPicture],ecx
	mov [PointerToCopyPicture2],eax
 
	call MovePictureToWorkScreen
	jmp end_menu
;---------------------------------------------------------------------
no_undo:
; <<< Redo >>>
	cmp [number_menu],2
	jne no_redo
 
	cmp [number_undo],0
	je end_menu
 
;rotate bufers +1
	dec [number_undo]
	mov eax,[PointerToPicture]
	mov ebx,[PointerToCopyPicture]
	mov ecx,[PointerToCopyPicture2]
	mov [PointerToPicture],ecx
	mov [PointerToCopyPicture],eax
	mov [PointerToCopyPicture2],ebx
 
	call MovePictureToWorkScreen
	jmp end_menu
;---------------------------------------------------------------------
no_redo:
; <<< Copy >>>
	cmp	[number_menu],3
	jne	no_copy
 
	mov	eax,[crossing_old_x]
	mov	ebx,[crossing_old_y]
 
	cmp	eax,[rectangular_shade_x]
	jl	no_remove_x_copy
 
	mov	ecx,[rectangular_shade_x]
	mov	[crossing_old_x],ecx ; crossing_old_x <-----> rectangulare_shade_x
	mov	[rectangular_shade_x],eax
 
no_remove_x_copy:
	cmp	ebx,[rectangular_shade_y]
	jl	no_remove_y_copy
 
	mov	ecx,[rectangular_shade_y]
	mov	[crossing_old_y],ecx			 ; crossing_old_y <-----> rectangulare_shade_y
	mov	[rectangular_shade_y],ebx
 
no_remove_y_copy:
	mov	eax,[crossing_old_x]
	mov	ebx,[crossing_old_y]
	mov	ecx,[rectangular_shade_x]
	mov	edx,[rectangular_shade_y]
	inc	eax
	inc	ebx
	dec	ecx
	dec	edx
 
	mov	[x],eax
	mov	[y],ebx
	mov	esi,eax
	mov	edi,ebx
	mov	[Dx_],1
	mov	[Dy_],1
 
	sub	ecx,eax
	jnz	no_signum_fill_r_x_copy
 
	mov	[Dx_],-1
 
no_signum_fill_r_x_copy:
	sub	edx,ebx
	jnz	no_signum_fill_r_y_copy
 
	mov	[Dy_],-1
 
no_signum_fill_r_y_copy:
	mov	ebx,[rectangular_shade_y]
	sub	ebx,edi
 
	mov	edx,[PointerToEditBufer]
	mov	eax,[rectangular_shade_x]
	sub eax,[crossing_old_x]
	mov [edx],eax ;image.w
	mov	eax,[rectangular_shade_y]
	sub eax,[crossing_old_y]
	mov [edx+4],eax ;image.h
	mov dword[edx+8],24 ;bit in pixel
	add edx,12 ;copy image parametrs
	mov	[y],edi
 
loop_fill_rectangle_y_copy:
	mov	[x],esi
 
loop_fill_rectangle_x_copy:
	push	esi edi
	mov	eax,[PointerToPicture]
	mov	ebx,[Picture_SizeX]
	mov	esi,[x]
	mov	edi,[y]
	call	GetColorOfPixel
	mov	[edx],ax
	shr	eax,16
	mov	[edx+2],al
	pop	edi esi
 
	add	edx,3
	mov	eax,[x]
	add	eax,[Dx_]
	mov	[x],eax
 
	cmp	eax,[rectangular_shade_x]
	jl	loop_fill_rectangle_x_copy
 
	mov	eax,[y]
	add	eax,[Dy_]
	mov	[y],eax
 
	cmp	eax,[rectangular_shade_y]
	jl	loop_fill_rectangle_y_copy
 
	;...todo use system buffer...
	;mcall SF_CLIPBOARD,SSF_WRITE_CB,,[PointerToEditBufer]
 
	call	MovePictureToWorkScreen
	mov	[DrawSprite_flag],1
	jmp	end_menu
;---------------------------------------------------------------------
no_copy:
; <<< Paste >>>
	cmp	[number_menu],4
	jne	no_paste
 
	mov	eax,[crossing_old_x]
	mov	ebx,[crossing_old_y]
 
	cmp	eax,[rectangular_shade_x]
	jl	no_remove_x_paste
 
	mov	ecx,[rectangular_shade_x]
	mov	[crossing_old_x],ecx ; crossing_old_x <-----> rectangulare_shade_x
	mov	[rectangular_shade_x],eax
 
no_remove_x_paste:
	cmp	ebx,[rectangular_shade_y]
	jl	no_remove_y_paste
 
	mov	ecx,[rectangular_shade_y]
	mov	[crossing_old_y],ecx ; crossing_old_y <-----> rectangulare_shade_y
	mov	[rectangular_shade_y],ebx
 
no_remove_y_paste:
	mov	eax,[crossing_old_x]
	mov	ebx,[crossing_old_y]
	mov	ecx,[rectangular_shade_x]
	mov	edx,[rectangular_shade_y]
	inc	eax
	inc	ebx
	dec	ecx
	dec	edx
 
	mov	[x],eax
	mov	[y],ebx
	mov	esi,eax
	mov	edi,ebx
	mov	[Dx_],1
	mov	[Dy_],1
 
	sub	ecx,eax
	jnz	no_signum_fill_r_x_paste
 
	mov	[Dx_],-1
 
no_signum_fill_r_x_paste:
	sub	edx,ebx
	jnz	no_signum_fill_r_y_paste
 
	mov	[Dy_],-1
 
no_signum_fill_r_y_paste:
	mov	edx,[PointerToEditBufer]
	cmp dword[edx+8],24
	jne	end_menu
	mov eax,[edx]
	add eax,[crossing_old_x]
	mov [paste_img_w],eax
	mov eax,[edx+4]
	add eax,[crossing_old_y]
	mov [paste_img_h],eax
	add edx,12 ;copy image parametrs
	mov	[y],edi
 
loop_fill_rectangle_y_paste:
	mov	[x],esi
 
loop_fill_rectangle_x_paste:
	push	esi edi
	mov	ecx,[edx]
	and	ecx,0xffffff ;color
	mov	eax,[PointerToPicture]
	mov	ebx,[Picture_SizeX]
	mov	esi,[x]
	mov	edi,[y]
	call	PutPixel
	pop	edi esi
 
	add	edx,3
 
	mov	eax,[x]
	add	eax,[Dx_]
	cmp eax,[paste_img_w]
	je no_paste_data_x
	mov	[x],eax
	cmp	eax,[rectangular_shade_x]
	jl	loop_fill_rectangle_x_paste
no_paste_data_x:
 
	mov	eax,[y]
	add	eax,[Dy_]
	cmp eax,[paste_img_h]
	je no_paste_data_y
	mov	[y],eax
	cmp	eax,[rectangular_shade_y]
	jl	loop_fill_rectangle_y_paste
no_paste_data_y:
 
	call	MovePictureToWorkScreen
	mov	[Paste_flag],1
	jmp	end_menu
;---------------------------------------------------------------------
no_paste:
; <<< Cut >>>
	cmp	[number_menu],5
	jne	no_cut
 
	mov	eax,[crossing_old_x]
	mov	ebx,[crossing_old_y]
 
	cmp	eax,[rectangular_shade_x]
	jl	no_remove_x_cut
 
	mov	ecx,[rectangular_shade_x]
	mov	[crossing_old_x],ecx ; crossing_old_x <-----> rectangulare_shade_x
	mov	[rectangular_shade_x],eax
 
no_remove_x_cut:
	cmp	ebx,[rectangular_shade_y]
	jl	no_remove_y_cut
 
	mov	ecx,[rectangular_shade_y]
	mov	[crossing_old_y],ecx ; crossing_old_y <-----> rectangulare_shade_y
	mov	[rectangular_shade_y],ebx
 
no_remove_y_cut:
	mov	eax,[crossing_old_x]
	mov	ebx,[crossing_old_y]
	mov	ecx,[rectangular_shade_x]
	mov	edx,[rectangular_shade_y]
	inc	eax
	inc	ebx
	dec	ecx
	dec	edx
 
	mov	[x],eax
	mov	[y],ebx
	mov	esi,eax
	mov	edi,ebx
	mov	[Dx_],1
	mov	[Dy_],1
 
	sub	ecx,eax
	jnz	no_signum_fill_r_x
 
	mov	[Dx_],-1
 
no_signum_fill_r_x:
	sub	edx,ebx
	jnz	no_signum_fill_r_y
 
	mov	[Dy_],-1
 
no_signum_fill_r_y:
	mov	[y],edi
 
loop_fill_rectangle_y:
	mov	[x],esi
 
loop_fill_rectangle_x:
	push	esi edi
	mov	eax,[PointerToPicture]
	mov	ebx,[Picture_SizeX]
	mov	ecx,dword 0xffffff
	mov	esi,[x]
	mov	edi,[y]
	call	PutPixel
	pop	edi esi
 
	mov	eax,[x]
	add	eax,[Dx_]
	mov	[x],eax
 
	cmp	eax,[rectangular_shade_x]
	jl	loop_fill_rectangle_x
 
	mov	eax,[y]
	add	eax,[Dy_]
	mov	[y],eax
 
	cmp	eax,[rectangular_shade_y]
	jl	loop_fill_rectangle_y
 
	call	MovePictureToWorkScreen
	jmp	end_menu
;---------------------------------------------------------------------
no_cut:
; <<< Cleare all >>>
	cmp	[number_menu],6
	jne	no_cleare_all
 
	call	cleare_work_arrea
	call	MovePictureToWorkScreen
	jmp	end_menu
;---------------------------------------------------------------------
no_cleare_all:
; <<< To allocate all >>>
	cmp	[number_menu],7
	jne	end_menu
 
	mov	[crossing_old_x],0
	mov	[crossing_old_y],0
	mov	eax,[Picture_SizeX]
	mov	ebx,[Picture_SizeY]
	dec eax
	dec ebx
	mov	[rectangular_shade_x],eax
	mov	[rectangular_shade_y],ebx
	mov	[Current_instrument],30
	mov	[crossing],2
	;call MovePictureToWorkScreen
	jmp	end_menu
;---------------------------------------------------------------------
no_edit:
;|||||||||||||||||||||||||INSTRUMENTS||||||||||||||||||||||
	cmp	[number_panel],5
	jne	no_instruments
 
	instrument_set  1,10 ; pensil
	instrument_set  2,11 ; draw brush
	instrument_set  3,12 ; spray
	instrument_set  4,13 ; lastik
	instrument_set  5,14 ; flood fill
	instrument_set  6,15 ; pipetka
	instrument_set  7,16 ; draw line
	instrument_set  8,17 ; draw rectangle
	instrument_set  9,18 ; draw circle
	instrument_set 10,19 ; draw ellips
	instrument_set 11,20 ; draw hard contour
 
no_instruments:
;|||||||||||||||||||||||||FILTERS||||||||||||||||||||||||||
	cmp	[number_panel],4
	jne	no_filters
 
	instrument_set  1,23 ; reflection from left to right
	instrument_set  2,24 ; reflection from up to down
 
no_filters:
 
end_menu:
	and	[number_panel],0
	and	[number_menu],0
	jmp	still
;---------------------------------------------------------------------

Rev 6385	Rev 6741
1	macro instrument_set m_num, code	1	macro instrument_set m_num, code
2	{	2	{
3	local no_instrument	3	local no_instrument
4	cmp [number_menu],m_num	4	cmp [number_menu],m_num
5	jne no_instrument	5	jne no_instrument
6	mov [Current_instrument],code	6	mov [Current_instrument],code
7	call TakeButtonInstruments	7	call TakeButtonInstruments
8	jmp end_menu	8	jmp end_menu
9	no_instrument:	9	no_instrument:
10	}	10	}
11		11
12	;-----------------------------------------------------------	12	;-----------------------------------------------------------
13	;-----------instruments of menu-----------------------------	13	;-----------instruments of menu-----------------------------
14	;-----------------------------------------------------------	14	;-----------------------------------------------------------
15	align 4	15	align 4
16	TakeInstruments:	16	TakeInstruments:
17	;\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|FILE\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|	17	;\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|FILE\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|
18	cmp [number_panel],7	18	cmp [number_panel],7
19	jne no_file	19	jne no_file
20		20
21	; <<< New >>>	21	; <<< New >>>
22	cmp [number_menu],1	22	cmp [number_menu],1
23	jne no_new	23	jne no_new
24		24
25	call dialog2_draw	25	call dialog2_draw
26		26
27	mov edx,1000000000000000000000000000000b+1000	27	mov edx,1000000000000000000000000000000b+1000
28	mcall SF_DEFINE_BUTTON,<177,40>,<115,14>,	28	mcall SF_DEFINE_BUTTON,<177,40>,<115,14>,
29		29
30	mov edx,1000000000000000000000000000000b+1001	30	mov edx,1000000000000000000000000000000b+1001
31	mcall ,,<139,14>,	31	mcall ,,<139,14>,
32		32
33	mov edx,1000000000000000000000000000000b+1002	33	mov edx,1000000000000000000000000000000b+1002
34	mcall ,,<170,15>	34	mcall ,,<170,15>
35		35
36	no_activate_space:	36	no_activate_space:
37	mcall SF_SLEEP, 5 ;fix cpu use 100%	37	mcall SF_SLEEP, 5 ;fix cpu use 100%
38	mcall SF_WAIT_EVENT	38	mcall SF_WAIT_EVENT
39		39
40	cmp eax,1 ;redraw window	40	cmp eax,1 ;redraw window
41	jne @f	41	jne @f
42	call dialog2_draw	42	call dialog2_draw
43	jmp no_activate_space	43	jmp no_activate_space
44	@@:	44	@@:
45		45
46	cmp eax,3 ;press button	46	cmp eax,3 ;press button
47	jne no_activate_space	47	jne no_activate_space
48		48
49	mcall SF_GET_BUTTON	49	mcall SF_GET_BUTTON
50	shr eax,8	50	shr eax,8
51		51
52	cmp eax,1000	52	cmp eax,1000
53	jl no_activate_space	53	jl no_activate_space
54		54
55	cmp eax,1000	55	cmp eax,1000
56	jne no_picture_size_x	56	jne no_picture_size_x
57		57
58	mov eax,180	58	mov eax,180
59	mov ebx,119	59	mov ebx,119
60	mov ecx,5	60	mov ecx,5
61	call dialog_line	61	call dialog_line
62		62
63	mov eax,string_	63	mov eax,string_
64	mov ebx,13	64	mov ebx,13
65	call find_symvol	65	call find_symvol
66		66
67	dec eax	67	dec eax
68	mov [length_number],eax	68	mov [length_number],eax
69	mov eax,string_	69	mov eax,string_
70	call str_to_int	70	call str_to_int
71		71
72	mov [Picture_SizeX],eax	72	mov [Picture_SizeX],eax
73	jmp no_activate_space	73	jmp no_activate_space
74	;---------------------------------------------------------------------	74	;---------------------------------------------------------------------
75	no_picture_size_x:	75	no_picture_size_x:
76	cmp eax,1001	76	cmp eax,1001
77	jne no_picture_size_y	77	jne no_picture_size_y
78		78
79	mov eax,180	79	mov eax,180
80	mov ebx,119+24	80	mov ebx,119+24
81	mov ecx,5	81	mov ecx,5
82	call dialog_line	82	call dialog_line
83		83
84	mov eax,string_	84	mov eax,string_
85	mov ebx,13	85	mov ebx,13
86	call find_symvol	86	call find_symvol
87		87
88	dec eax	88	dec eax
89	mov [length_number],eax	89	mov [length_number],eax
90	mov eax,string_	90	mov eax,string_
91	call str_to_int	91	call str_to_int
92		92
93	mov [Picture_SizeY],eax	93	mov [Picture_SizeY],eax
94	jmp no_activate_space	94	jmp no_activate_space
95	;---------------------------------------------------------------------	95	;---------------------------------------------------------------------
96	no_picture_size_y:	96	no_picture_size_y:
97	cmp eax,1002	97	cmp eax,1002
98	jne no_activate_space	98	jne no_activate_space
99		99
100	exit_new:	100	exit_new:
101	mov edx,11100000000000000000000000000000b+1002	101	mov edx,11100000000000000000000000000000b+1002
102	mcall SF_DEFINE_BUTTON,<177,40>,<170,15>	102	mcall SF_DEFINE_BUTTON,<177,40>,<170,15>
103		103
104	mov edx,11100000000000000000000000000000b+1001	104	mov edx,11100000000000000000000000000000b+1001
105	mcall ,,<139,14>	105	mcall ,,<139,14>
106		106
107	mov edx,11100000000000000000000000000000b+1000	107	mov edx,11100000000000000000000000000000b+1000
108	mcall ,,<115,14>	108	mcall ,,<115,14>
109		109
110	;get memory for new picture	110	;get memory for new picture
111	call GetMemory	111	call GetMemory
112		112
113	and [save_flag],0	113	and [save_flag],0
114		114
115	call cleare_work_arrea	115	call cleare_work_arrea
116	call drawwin	116	call drawwin
117	jmp end_menu	117	jmp end_menu
118	;---------------------------------------------------------------------	118	;---------------------------------------------------------------------
119	no_new:	119	no_new:
120	; <<< Open >>>	120	; <<< Open >>>
121	cmp [number_menu],2	121	cmp [number_menu],2
122	jne no_open	122	jne no_open
123		123
124	;---------------------------------------------------------------------	124	;---------------------------------------------------------------------
125	mov [OpenDialog_data.type],0 ; open	125	mov [OpenDialog_data.type],0 ; open
126		126
127	push dword OpenDialog_data	127	push dword OpenDialog_data
128	call [OpenDialog_Start]	128	call [OpenDialog_Start]
129		129
130	cmp [OpenDialog_data.status],1	130	cmp [OpenDialog_data.status],1
131	jne end_menu	131	jne end_menu
132	;---------------------------------------------------------------------	132	;---------------------------------------------------------------------
133	mcall SF_SET_EVENTS_MASK,0x80000027 ;100111b	133	mcall SF_SET_EVENTS_MASK,0x80000027 ;100111b
134		134
135	call load_picture	135	call load_picture
136	call drawwin	136	call drawwin
137	jmp end_menu	137	jmp end_menu
138	;---------------------------------------------------------------------	138	;---------------------------------------------------------------------
139	no_open:	139	no_open:
140	; <<< Save >>>	140	; <<< Save >>>
141	cmp [number_menu],3	141	cmp [number_menu],3
142	jne no_save_	142	jne no_save_
143		143
144	mov al,[save_flag]	144	mov al,[save_flag]
145	test al,al	145	test al,al
146	jz end_menu	146	jz end_menu
147	jmp save_enter	147	jmp save_enter
148	;---------------------------------------------------------------------	148	;---------------------------------------------------------------------
149	no_save_:	149	no_save_:
150	; <<< Save as >>>	150	; <<< Save as >>>
151	cmp [number_menu],4	151	cmp [number_menu],4
152	jne no_save	152	jne no_save
153		153
154	; savedialog drawwin,save1,save2,file_path	154	; savedialog drawwin,save1,save2,file_path
155	;---------------------------------------------------------------------	155	;---------------------------------------------------------------------
156	; replace extension to '.bmp'	156	; replace extension to '.png'
157	push eax esi	157	push eax esi
158	mov esi,[OpenDialog_data.filename_area]	158	mov esi,[OpenDialog_data.filename_area]
159	xor eax,eax	159	xor eax,eax
160	cld	160	cld
161	@@:	161	@@:
162	lodsb	162	lodsb
163	test eax,eax	163	test eax,eax
164	jnz @r	164	jnz @r
165	sub esi,5	165	sub esi,5
166	cmp [esi],byte '.'	166	cmp [esi],byte '.'
167	jne @f	167	jne @f
168	mov [esi],dword '.bmp'	168	mov [esi],dword '.png'
169	@@:	169	@@:
170	pop esi eax	170	pop esi eax
171	;---------------------------------------------------------------------	171	;---------------------------------------------------------------------
172	mov [OpenDialog_data.type],1 ; save	172	mov [OpenDialog_data.type],1 ; save
173	stdcall [OpenDialog_Start],OpenDialog_data	173	stdcall [OpenDialog_Start],OpenDialog_data
174		174
175	cmp [OpenDialog_data.status],1	175	cmp [OpenDialog_data.status],1
176	jne end_menu	176	jne end_menu
177	;---------------------------------------------------------------------	177	;---------------------------------------------------------------------
178	save1:	178	save1:
179	save_enter:	179	save_enter:
180	mcall SF_SET_EVENTS_MASK,0x80000027 ;100111b	180	mcall SF_SET_EVENTS_MASK,0x80000027 ;100111b
-		181
-		182	xor al,al
-		183	mov edi,file_path
-		184	repne scasb
-		185	mov eax,[edi-5]
-		186	or eax,0x20202000 ;down register
-		187	cmp eax,'.png'
-		188	jne .end0
-		189	;create image struct
-		190	stdcall [img_create], [Picture_SizeX], [Picture_SizeY], Image.bpp24
-		191	test eax,eax
-		192	jz @f
-		193	;copy image
-		194	mov edi,[eax+Image.Data]
-		195	mov esi,[PointerToPicture]
-		196	mov ecx,[Picture_SizeX]
-		197	imul ecx,[Picture_SizeY]
-		198	imul ecx,3
-		199	rep movsb
-		200
-		201	;encode image
-		202	stdcall [img_encode], eax, LIBIMG_FORMAT_PNG, 0
-		203	test eax,eax
-		204	jz @f
-		205
-		206	;copy output image
-		207	mov edi,[PointerToEditBufer]
-		208	mov esi,eax
-		209	mov eax,ecx
-		210	rep movsb
-		211	@@:
-		212	mov ecx,eax
-		213	mov eax,file_path
-		214	mov ebx,[PointerToEditBufer]
-		215	jmp .end1
-		216	.end0:
181		217
182	call analizing_picture_to_palette	218	call analizing_picture_to_palette
183		219
184	;eax => number of colors in picture	220	;eax => number of colors in picture
185	mov ebx,[PointerToPicture]	221	mov ebx,[PointerToPicture]
186	mov ecx,[PointerToEditBufer]	222	mov ecx,[PointerToEditBufer]
187	mov edx,[PointerToPalette]	223	mov edx,[PointerToPalette]
188	mov esi,[Picture_SizeX]	224	mov esi,[Picture_SizeX]
189	mov edi,[Picture_SizeY]	225	mov edi,[Picture_SizeY]
190		226
191	call coding_bmp	227	call coding_bmp
192		228
193	mov eax,file_path	229	mov eax,file_path
194	mov ecx,ebx	230	mov ecx,ebx
195	mov ebx,[PointerToEditBufer]	231	mov ebx,[PointerToEditBufer]
-		232
196		233	.end1:
197	call save_file	234	call save_file
198		235
199	mov [save_flag],1	236	mov [save_flag],1
200	call drawwin	237	call drawwin
201	jmp end_menu	238	jmp end_menu
202	;---------------------------------------------------------------------	239	;---------------------------------------------------------------------
203	no_save:	240	no_save:
204	; <<< Exit >>>	241	; <<< Exit >>>
205	cmp [number_menu],5	242	cmp [number_menu],5
206	jne no_exit_program	243	jne no_exit_program
207		244
208	mcall SF_TERMINATE_PROCESS	245	mcall SF_TERMINATE_PROCESS
209	;---------------------------------------------------------------------	246	;---------------------------------------------------------------------
210	no_exit_program:	247	no_exit_program:
211	no_file:	248	no_file:
212	;\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|EDIT\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|	249	;\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|EDIT\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|
213	cmp [number_panel],6	250	cmp [number_panel],6
214	jne no_edit	251	jne no_edit
215		252
216	; <<< Undo >>>	253	; <<< Undo >>>
217	cmp [number_menu],1	254	cmp [number_menu],1
218	jne no_undo	255	jne no_undo
219		256
220	cmp [number_undo],2 ;2 - maximum undo count	257	cmp [number_undo],2 ;2 - maximum undo count
221	jge end_menu	258	jge end_menu
222		259
223	;rotate bufers -1	260	;rotate bufers -1
224	inc [number_undo]	261	inc [number_undo]
225	mov eax,[PointerToPicture]	262	mov eax,[PointerToPicture]
226	mov ebx,[PointerToCopyPicture]	263	mov ebx,[PointerToCopyPicture]
227	mov ecx,[PointerToCopyPicture2]	264	mov ecx,[PointerToCopyPicture2]
228	mov [PointerToPicture],ebx	265	mov [PointerToPicture],ebx
229	mov [PointerToCopyPicture],ecx	266	mov [PointerToCopyPicture],ecx
230	mov [PointerToCopyPicture2],eax	267	mov [PointerToCopyPicture2],eax
231		268
232	call MovePictureToWorkScreen	269	call MovePictureToWorkScreen
233	jmp end_menu	270	jmp end_menu
234	;---------------------------------------------------------------------	271	;---------------------------------------------------------------------
235	no_undo:	272	no_undo:
236	; <<< Redo >>>	273	; <<< Redo >>>
237	cmp [number_menu],2	274	cmp [number_menu],2
238	jne no_redo	275	jne no_redo
239		276
240	cmp [number_undo],0	277	cmp [number_undo],0
241	je end_menu	278	je end_menu
242		279
243	;rotate bufers +1	280	;rotate bufers +1
244	dec [number_undo]	281	dec [number_undo]
245	mov eax,[PointerToPicture]	282	mov eax,[PointerToPicture]
246	mov ebx,[PointerToCopyPicture]	283	mov ebx,[PointerToCopyPicture]
247	mov ecx,[PointerToCopyPicture2]	284	mov ecx,[PointerToCopyPicture2]
248	mov [PointerToPicture],ecx	285	mov [PointerToPicture],ecx
249	mov [PointerToCopyPicture],eax	286	mov [PointerToCopyPicture],eax
250	mov [PointerToCopyPicture2],ebx	287	mov [PointerToCopyPicture2],ebx
251		288
252	call MovePictureToWorkScreen	289	call MovePictureToWorkScreen
253	jmp end_menu	290	jmp end_menu
254	;---------------------------------------------------------------------	291	;---------------------------------------------------------------------
255	no_redo:	292	no_redo:
256	; <<< Copy >>>	293	; <<< Copy >>>
257	cmp [number_menu],3	294	cmp [number_menu],3
258	jne no_copy	295	jne no_copy
259		296
260	mov eax,[crossing_old_x]	297	mov eax,[crossing_old_x]
261	mov ebx,[crossing_old_y]	298	mov ebx,[crossing_old_y]
262		299
263	cmp eax,[rectangular_shade_x]	300	cmp eax,[rectangular_shade_x]
264	jl no_remove_x_copy	301	jl no_remove_x_copy
265		302
266	mov ecx,[rectangular_shade_x]	303	mov ecx,[rectangular_shade_x]
267	mov [crossing_old_x],ecx ; crossing_old_x <-----> rectangulare_shade_x	304	mov [crossing_old_x],ecx ; crossing_old_x <-----> rectangulare_shade_x
268	mov [rectangular_shade_x],eax	305	mov [rectangular_shade_x],eax
269		306
270	no_remove_x_copy:	307	no_remove_x_copy:
271	cmp ebx,[rectangular_shade_y]	308	cmp ebx,[rectangular_shade_y]
272	jl no_remove_y_copy	309	jl no_remove_y_copy
273		310
274	mov ecx,[rectangular_shade_y]	311	mov ecx,[rectangular_shade_y]
275	mov [crossing_old_y],ecx ; crossing_old_y <-----> rectangulare_shade_y	312	mov [crossing_old_y],ecx ; crossing_old_y <-----> rectangulare_shade_y
276	mov [rectangular_shade_y],ebx	313	mov [rectangular_shade_y],ebx
277		314
278	no_remove_y_copy:	315	no_remove_y_copy:
279	mov eax,[crossing_old_x]	316	mov eax,[crossing_old_x]
280	mov ebx,[crossing_old_y]	317	mov ebx,[crossing_old_y]
281	mov ecx,[rectangular_shade_x]	318	mov ecx,[rectangular_shade_x]
282	mov edx,[rectangular_shade_y]	319	mov edx,[rectangular_shade_y]
283	inc eax	320	inc eax
284	inc ebx	321	inc ebx
285	dec ecx	322	dec ecx
286	dec edx	323	dec edx
287		324
288	mov [x],eax	325	mov [x],eax
289	mov [y],ebx	326	mov [y],ebx
290	mov esi,eax	327	mov esi,eax
291	mov edi,ebx	328	mov edi,ebx
292	mov [Dx_],1	329	mov [Dx_],1
293	mov [Dy_],1	330	mov [Dy_],1
294		331
295	sub ecx,eax	332	sub ecx,eax
296	jnz no_signum_fill_r_x_copy	333	jnz no_signum_fill_r_x_copy
297		334
298	mov [Dx_],-1	335	mov [Dx_],-1
299		336
300	no_signum_fill_r_x_copy:	337	no_signum_fill_r_x_copy:
301	sub edx,ebx	338	sub edx,ebx
302	jnz no_signum_fill_r_y_copy	339	jnz no_signum_fill_r_y_copy
303		340
304	mov [Dy_],-1	341	mov [Dy_],-1
305		342
306	no_signum_fill_r_y_copy:	343	no_signum_fill_r_y_copy:
307	mov ebx,[rectangular_shade_y]	344	mov ebx,[rectangular_shade_y]
308	sub ebx,edi	345	sub ebx,edi
309		346
310	mov edx,[PointerToEditBufer]	347	mov edx,[PointerToEditBufer]
311	mov eax,[rectangular_shade_x]	348	mov eax,[rectangular_shade_x]
312	sub eax,[crossing_old_x]	349	sub eax,[crossing_old_x]
313	mov [edx],eax ;image.w	350	mov [edx],eax ;image.w
314	mov eax,[rectangular_shade_y]	351	mov eax,[rectangular_shade_y]
315	sub eax,[crossing_old_y]	352	sub eax,[crossing_old_y]
316	mov [edx+4],eax ;image.h	353	mov [edx+4],eax ;image.h
317	mov dword[edx+8],24 ;bit in pixel	354	mov dword[edx+8],24 ;bit in pixel
318	add edx,12 ;copy image parametrs	355	add edx,12 ;copy image parametrs
319	mov [y],edi	356	mov [y],edi
320		357
321	loop_fill_rectangle_y_copy:	358	loop_fill_rectangle_y_copy:
322	mov [x],esi	359	mov [x],esi
323		360
324	loop_fill_rectangle_x_copy:	361	loop_fill_rectangle_x_copy:
325	push esi edi	362	push esi edi
326	mov eax,[PointerToPicture]	363	mov eax,[PointerToPicture]
327	mov ebx,[Picture_SizeX]	364	mov ebx,[Picture_SizeX]
328	mov esi,[x]	365	mov esi,[x]
329	mov edi,[y]	366	mov edi,[y]
330	call GetColorOfPixel	367	call GetColorOfPixel
331	mov [edx],ax	368	mov [edx],ax
332	shr eax,16	369	shr eax,16
333	mov [edx+2],al	370	mov [edx+2],al
334	pop edi esi	371	pop edi esi
335		372
336	add edx,3	373	add edx,3
337	mov eax,[x]	374	mov eax,[x]
338	add eax,[Dx_]	375	add eax,[Dx_]
339	mov [x],eax	376	mov [x],eax
340		377
341	cmp eax,[rectangular_shade_x]	378	cmp eax,[rectangular_shade_x]
342	jl loop_fill_rectangle_x_copy	379	jl loop_fill_rectangle_x_copy
343		380
344	mov eax,[y]	381	mov eax,[y]
345	add eax,[Dy_]	382	add eax,[Dy_]
346	mov [y],eax	383	mov [y],eax
347		384
348	cmp eax,[rectangular_shade_y]	385	cmp eax,[rectangular_shade_y]
349	jl loop_fill_rectangle_y_copy	386	jl loop_fill_rectangle_y_copy
350		387
351	;...todo use system buffer...	388	;...todo use system buffer...
352	;mcall SF_CLIPBOARD,SSF_WRITE_CB,,[PointerToEditBufer]	389	;mcall SF_CLIPBOARD,SSF_WRITE_CB,,[PointerToEditBufer]
353		390
354	call MovePictureToWorkScreen	391	call MovePictureToWorkScreen
355	mov [DrawSprite_flag],1	392	mov [DrawSprite_flag],1
356	jmp end_menu	393	jmp end_menu
357	;---------------------------------------------------------------------	394	;---------------------------------------------------------------------
358	no_copy:	395	no_copy:
359	; <<< Paste >>>	396	; <<< Paste >>>
360	cmp [number_menu],4	397	cmp [number_menu],4
361	jne no_paste	398	jne no_paste
362		399
363	mov eax,[crossing_old_x]	400	mov eax,[crossing_old_x]
364	mov ebx,[crossing_old_y]	401	mov ebx,[crossing_old_y]
365		402
366	cmp eax,[rectangular_shade_x]	403	cmp eax,[rectangular_shade_x]
367	jl no_remove_x_paste	404	jl no_remove_x_paste
368		405
369	mov ecx,[rectangular_shade_x]	406	mov ecx,[rectangular_shade_x]
370	mov [crossing_old_x],ecx ; crossing_old_x <-----> rectangulare_shade_x	407	mov [crossing_old_x],ecx ; crossing_old_x <-----> rectangulare_shade_x
371	mov [rectangular_shade_x],eax	408	mov [rectangular_shade_x],eax
372		409
373	no_remove_x_paste:	410	no_remove_x_paste:
374	cmp ebx,[rectangular_shade_y]	411	cmp ebx,[rectangular_shade_y]
375	jl no_remove_y_paste	412	jl no_remove_y_paste
376		413
377	mov ecx,[rectangular_shade_y]	414	mov ecx,[rectangular_shade_y]
378	mov [crossing_old_y],ecx ; crossing_old_y <-----> rectangulare_shade_y	415	mov [crossing_old_y],ecx ; crossing_old_y <-----> rectangulare_shade_y
379	mov [rectangular_shade_y],ebx	416	mov [rectangular_shade_y],ebx
380		417
381	no_remove_y_paste:	418	no_remove_y_paste:
382	mov eax,[crossing_old_x]	419	mov eax,[crossing_old_x]
383	mov ebx,[crossing_old_y]	420	mov ebx,[crossing_old_y]
384	mov ecx,[rectangular_shade_x]	421	mov ecx,[rectangular_shade_x]
385	mov edx,[rectangular_shade_y]	422	mov edx,[rectangular_shade_y]
386	inc eax	423	inc eax
387	inc ebx	424	inc ebx
388	dec ecx	425	dec ecx
389	dec edx	426	dec edx
390		427
391	mov [x],eax	428	mov [x],eax
392	mov [y],ebx	429	mov [y],ebx
393	mov esi,eax	430	mov esi,eax
394	mov edi,ebx	431	mov edi,ebx
395	mov [Dx_],1	432	mov [Dx_],1
396	mov [Dy_],1	433	mov [Dy_],1
397		434
398	sub ecx,eax	435	sub ecx,eax
399	jnz no_signum_fill_r_x_paste	436	jnz no_signum_fill_r_x_paste
400		437
401	mov [Dx_],-1	438	mov [Dx_],-1
402		439
403	no_signum_fill_r_x_paste:	440	no_signum_fill_r_x_paste:
404	sub edx,ebx	441	sub edx,ebx
405	jnz no_signum_fill_r_y_paste	442	jnz no_signum_fill_r_y_paste
406		443
407	mov [Dy_],-1	444	mov [Dy_],-1
408		445
409	no_signum_fill_r_y_paste:	446	no_signum_fill_r_y_paste:
410	mov edx,[PointerToEditBufer]	447	mov edx,[PointerToEditBufer]
411	cmp dword[edx+8],24	448	cmp dword[edx+8],24
412	jne end_menu	449	jne end_menu
413	mov eax,[edx]	450	mov eax,[edx]
414	add eax,[crossing_old_x]	451	add eax,[crossing_old_x]
415	mov [paste_img_w],eax	452	mov [paste_img_w],eax
416	mov eax,[edx+4]	453	mov eax,[edx+4]
417	add eax,[crossing_old_y]	454	add eax,[crossing_old_y]
418	mov [paste_img_h],eax	455	mov [paste_img_h],eax
419	add edx,12 ;copy image parametrs	456	add edx,12 ;copy image parametrs
420	mov [y],edi	457	mov [y],edi
421		458
422	loop_fill_rectangle_y_paste:	459	loop_fill_rectangle_y_paste:
423	mov [x],esi	460	mov [x],esi
424		461
425	loop_fill_rectangle_x_paste:	462	loop_fill_rectangle_x_paste:
426	push esi edi	463	push esi edi
427	mov ecx,[edx]	464	mov ecx,[edx]
428	and ecx,0xffffff ;color	465	and ecx,0xffffff ;color
429	mov eax,[PointerToPicture]	466	mov eax,[PointerToPicture]
430	mov ebx,[Picture_SizeX]	467	mov ebx,[Picture_SizeX]
431	mov esi,[x]	468	mov esi,[x]
432	mov edi,[y]	469	mov edi,[y]
433	call PutPixel	470	call PutPixel
434	pop edi esi	471	pop edi esi
435		472
436	add edx,3	473	add edx,3
437		474
438	mov eax,[x]	475	mov eax,[x]
439	add eax,[Dx_]	476	add eax,[Dx_]
440	cmp eax,[paste_img_w]	477	cmp eax,[paste_img_w]
441	je no_paste_data_x	478	je no_paste_data_x
442	mov [x],eax	479	mov [x],eax
443	cmp eax,[rectangular_shade_x]	480	cmp eax,[rectangular_shade_x]
444	jl loop_fill_rectangle_x_paste	481	jl loop_fill_rectangle_x_paste
445	no_paste_data_x:	482	no_paste_data_x:
446		483
447	mov eax,[y]	484	mov eax,[y]
448	add eax,[Dy_]	485	add eax,[Dy_]
449	cmp eax,[paste_img_h]	486	cmp eax,[paste_img_h]
450	je no_paste_data_y	487	je no_paste_data_y
451	mov [y],eax	488	mov [y],eax
452	cmp eax,[rectangular_shade_y]	489	cmp eax,[rectangular_shade_y]
453	jl loop_fill_rectangle_y_paste	490	jl loop_fill_rectangle_y_paste
454	no_paste_data_y:	491	no_paste_data_y:
455		492
456	call MovePictureToWorkScreen	493	call MovePictureToWorkScreen
457	mov [Paste_flag],1	494	mov [Paste_flag],1
458	jmp end_menu	495	jmp end_menu
459	;---------------------------------------------------------------------	496	;---------------------------------------------------------------------
460	no_paste:	497	no_paste:
461	; <<< Cut >>>	498	; <<< Cut >>>
462	cmp [number_menu],5	499	cmp [number_menu],5
463	jne no_cut	500	jne no_cut

Subversion Repositories Kolibri OS

(root)/programs/media/animage/trunk/menu_instruments.inc @ 552 – Rev 6385 → 6741