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


;-----------------------------------------------------------
;-----------instruments of menu-----------------------------
;-----------------------------------------------------------
TakeInstruments:
 
	 ;|||||||||||||||||||FILE||||||||||||||||||||||
	 cmp [number_panel],7
	 jne no_file
 
	 ;<<<<>>>>>>
	 cmp [number_menu],1
	 jne no_new
 
	 mov eax,80
	 mov ebx,100
	 mov ecx,150
	 mov edx,90
	 mov  esi,1
	 call draw_volume_rectangle
 
	 mov eax,177
	 mov ebx,115
	 mov ecx,40
	 mov edx,14
	 mov  esi,4
	 call draw_volume_rectangle
 
	 mov eax,177
	 mov ebx,115+24
	 mov ecx,40
	 mov edx,14
	 mov  esi,4
	 call draw_volume_rectangle
 
	 mov eax,175
	 mov ebx,170
	 mov ecx,40
	 mov edx,15
	 mov  esi,1
	 call draw_volume_rectangle
 
	 mov eax,90
	 mov ebx,118
	 mov ecx,0xffffff
	 mov edx,new_text1
	 mov esi,14
	 call print_text
 
	 mov eax,90
	 mov ebx,118+24
	 mov ecx,0xffffff
	 mov edx,new_text2
	 mov esi,14
	 call print_text
 
	 mov eax,185
	 mov ebx,175
	 mov ecx,0xffffff
	 mov edx,ok_text
	 mov esi,2
	 call print_text
 
	 mov eax,8
	 mov ebx,177*65536+40
	 mov ecx,115*65536+14
	 mov edx,1000000000000000000000000000000b
	 add edx,1000
	 mcall
 
	 mov eax,8
	 mov ebx,177*65536+40
	 mov ecx,139*65536+14
	 mov edx,1000000000000000000000000000000b
	 add edx,1001
	 mcall
 
	 mov eax,8
	 mov ebx,175*65536+40
	 mov ecx,170*65536+15
	 mov edx,1000000000000000000000000000000b
	 add edx,1002
	 mcall
 
	 no_activate_space:
 
	 mov eax,10
	 mcall
 
	 cmp eax,1
	 je exit_new
 
	 cmp eax,3
	 jne no_activate_space
 
	 mov eax,17
	 mcall
	 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 value
 
	 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 value
 
	 mov [Picture_SizeY],eax
 
	 jmp no_activate_space
 
	 no_picture_size_y:
 
	 cmp eax,1002
	 jne no_activate_space
 
	 exit_new:
 
	 mov eax,8
	 mov ebx,175*65536+40
	 mov ecx,170*65536+15
	 mov edx,11100000000000000000000000000000b
	 add edx,1002
	 mcall
 
	 mov eax,8
	 mov ebx,177*65536+40
	 mov ecx,139*65536+14
	 mov edx,11100000000000000000000000000000b
	 add edx,1001
	 mcall
 
	 mov eax,8
	 mov ebx,177*65536+40
	 mov ecx,115*65536+14
	 mov edx,11100000000000000000000000000000b
	 add edx,1000
	 mcall
 
	 ;get memory for new picture
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
	 call GetMemory
 
	 and [save_flag],0
	 and [number_panel],0
	 and [number_menu],0
 
	 call cleare_work_arrea
	 call drawwin
 
	 jmp still
	 no_new:
 
	 ;<<<<>>>>>>
	cmp [number_menu],2
	 jne no_open
 
;	 opendialog drawwin,open_1,open_2,file_path
;---------------------------------------------------------------------
	mov	[OpenDialog_data.type],0 ; open
	
	push    dword OpenDialog_data
	call    [OpenDialog_Start]
	
	cmp	[OpenDialog_data.status],1
	jne	still
;---------------------------------------------------------------------
 
	 open_1:
 
	 mov eax,40
	 mov ebx,100111b
	 mcall
 
	 mov eax,file_path
	 mov ebx,[ScreenPointer]
	 add ebx,0x10000
 
	 call load_heading_of_file
 
	 mov esi,[ScreenPointer]
	 add esi,0x10000
	 ;-------------is this BMP file ?----------------
	 xor eax,eax
	 mov ax,[esi]
	 mov [type],ax
 
	 cmp [type],word 'BM'
	 jne no_bmp_file
 
	 xor eax,eax
	 xor ebx,ebx
	 mov eax,[esi+18]
	 mov ebx,[esi+22]
	 mov [Picture_SizeX],eax
	 mov [Picture_SizeY],ebx
 
	 jmp exit_type
 
	 no_bmp_file:
 
	 ;-------------is this GIF file ?----------------
	 xor eax,eax
	 mov ax,[esi]
	 mov [type],ax
 
	 cmp [type],'GI'
	 jne no_gif_file
 
	 add esi,6
	 xor eax,eax
	 xor ebx,ebx
	 mov ax,word[esi]
	 mov bx,word[esi+2]
	 mov [Picture_SizeX],eax
	 mov [Picture_SizeY],ebx
 
	 jmp exit_type
 
	 no_gif_file:
 
	 jmp no_unpakcing_file
 
	 exit_type:
 
	 ;----------------------------------------------------------
	 ;Get momory for unpacking picture and for picture's bufers
	 ;----------------------------------------------------------
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
	 call GetMemory
	 ;----------------------------------------------------------
	 ;--------------------Load file in memory-------------------
	 ;----------------------------------------------------------
 
	 mov eax,file_path
	 mov ebx,[PointerToCopyPicture]
	 add ebx,1000
 
	 call load_file
 
	 ;----------------------------------------------------------
	 ;-------------------Unpacking picture----------------------
	 ;----------------------------------------------------------
	 mov esi,[PointerToCopyPicture]
	 add esi,1000
	 mov edi,[PointerToPicture]
	 mov eax,[ScreenPointer]
 
	 cmp [type],'BM'
	 jne no_unpakcing_bmp_file
	    ;BMP DECODER
	    call bmptoimg
	    mov [save_flag],1
	 no_unpakcing_bmp_file:
 
 
	 cmp [type],'GI'
	 jne no_unpakcing_file
	   ;GIF DECODER
	   sub edi,8
	   call ReadGIF
	   mov [save_flag],1
	 no_unpakcing_file:
 
	 call load_icons
	 call drawwin
 
	 open_2:
 
	 mov [Scroll1CoordinatX],9
	 mov [Scroll2CoordinatY],89
	 and [number_panel],0
	 and [number_menu],0
 
	 jmp still
 
	 no_open:
 
	 ;<<<<<<<<<<>>>>>>>>>>>
	 cmp [number_menu],3
	 jne no_save_
 
	 mov al,[save_flag]
 
	 test al,al
	 jz no_save_file
 
	 jmp save_enter
 
	 no_save_file:
 
	 and [number_panel],0
	 and [number_menu],0
 
	 jmp still
 
	 no_save_:
 
	 ;<<<<<<<<>>>>>>>>>>
	 cmp [number_menu],4
	 jne no_save
 
;	 savedialog drawwin,save1,save2,file_path
;---------------------------------------------------------------------
	mov	[OpenDialog_data.type],1 ; save
	
	push    dword OpenDialog_data
	call    [OpenDialog_Start]
	
	cmp	[OpenDialog_data.status],1
	jne	still
;---------------------------------------------------------------------
 
	 save1:
 
	 save_enter:
	 mov eax,40
	 mov ebx,100111b
	 mcall
 
	 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]
	 push eax
	 push ebx
	 push ecx
 
	 call save_file
 
	 mov [save_flag],1
	 and [number_panel],0
	 and [number_menu],0
	 call drawwin
 
	 jmp still
 
	 save2:
 
	 and [number_panel],0
	 and [number_menu],0
 
	 jmp still
	 no_save:
 
	 ;<<<<<>>>>>>
	 cmp [number_menu],5
	 jne no_exit_program
 
	 mov eax,-1
	 mcall
 
	 no_exit_program:
 
	 no_file:
 
	 ;|||||||||||||||||||||||||||||EDIT|||||||||||||||||||||||||
 
	 ;<<<<<<<<<>>>>>>>>>
	 cmp [number_panel],6
	 jne no_edit
 
	 cmp [number_menu],1
	 jne no_undo
 
	 cmp [number_undo],1
	 jne no_one____
 
	 mov esi,[PointerToCopyPicture]
 
	 no_one____:
 
	 cmp [number_undo],2
	 jne no_two____
 
	 mov esi,[PointerToCopyPicture2]
 
	 no_two____:
 
	 mov edi,[PointerToPicture]
	 mov ecx,[Picture_SizeX]
	 imul ecx,[Picture_SizeY]
	 lea ecx,[ecx+ecx*2]
	 add ecx,4
	 shr ecx,2
	 cld
	 rep movsd
	 call MovePictureToWorkScreen
 
	 dec [number_undo]
	 jnz no_null_undo
 
	 mov [number_undo],1
 
	 no_null_undo:
 
	 and [number_panel],0
	 and [number_menu],0
	 jmp still
	 no_undo:
 
	 ;<<<<<<<<<>>>>>>>>>
 
	 cmp [number_menu],2
	 jne no_copy
 
	 cmp [instrument_used],1
	 jne no_copy
	 cmp [Activate_instrument],0
	 jne no_copy
 
	mov eax,[OldX]
	mov ebx,[OldY]
 
	cmp eax,[rectangular_shade_x]
	jl no_remove_x_copy
 
	mov ecx,[rectangular_shade_x]
	mov [OldX],ecx			  ; OldX <-----> 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 [OldY],ecx			  ; OldY <-----> rectangulare_shade_y
	mov [rectangular_shade_y],ebx
 
	no_remove_y_copy:
 
	 mov eax,[OldX]
	 mov ebx,[OldY]
	 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 [y],edi
	 loop_fill_rectangle_y_copy:
 
	 mov [x],esi
	 loop_fill_rectangle_x_copy:
 
	 push esi
	 push 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
	 pop 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
 
	 call MovePictureToWorkScreen
 
	 and [number_panel],0
	 and [number_menu],0
	 mov [DrawSprite_flag],1
 
	 jmp still
 
	 no_copy:
 
	 ;<<<<<<<<<>>>>>>>
	 cmp [number_menu],3
	 jne no_paste
 
	 cmp [instrument_used],1
	 jne no_paste
 
	 cmp [Activate_instrument],0
	 jne no_paste
 
	 mov eax,[OldX]
	 mov ebx,[OldY]
 
	 cmp eax,[rectangular_shade_x]
	 jl no_remove_x_paste
 
	 mov ecx,[rectangular_shade_x]
	 mov [OldX],ecx 		   ; OldX <-----> 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 [OldY],ecx 		   ; OldY <-----> rectangulare_shade_y
	 mov [rectangular_shade_y],ebx
 
	 no_remove_y_paste:
 
	 mov eax,[OldX]
	 mov ebx,[OldY]
	 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]
	 mov [y],edi
 
	 loop_fill_rectangle_y_paste:
 
	 mov [x],esi
	 loop_fill_rectangle_x_paste:
 
	 push esi
	 push 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
	 pop esi
 
	 add edx,3
 
	 mov eax,[x]
	 add eax,[Dx_]
	 mov [x],eax
	 cmp eax,[rectangular_shade_x]
	 jl loop_fill_rectangle_x_paste
 
	 mov eax,[y]
	 add eax,[Dy_]
	 mov [y],eax
	 cmp eax,[rectangular_shade_y]
 
	 jl loop_fill_rectangle_y_paste
 
	 call MovePictureToWorkScreen
	 and [number_panel],0
	 and [number_menu],0
	 mov [Paste_flag],1
 
	 jmp still
 
	 no_paste:
 
	 ;<<<<<<<<<>>>>>>>>>
	 cmp [number_menu],4
	 jne no_cut
 
	 cmp [instrument_used],1
	 jne no_cut
 
	 cmp [Activate_instrument],0
	 jne no_cut
 
	 mov eax,[OldX]
	 mov ebx,[OldY]
 
	 cmp eax,[rectangular_shade_x]
	 jl no_remove_x_cut
 
	 mov ecx,[rectangular_shade_x]
	 mov [OldX],ecx 		   ; OldX <-----> 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 [OldY],ecx 		   ; OldY <-----> rectangulare_shade_y
	 mov [rectangular_shade_y],ebx
 
	 no_remove_y_cut:
 
	 mov eax,[OldX]
	 mov ebx,[OldY]
	 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
	 push edi
 
	 mov eax,[PointerToPicture]
	 mov ebx,[Picture_SizeX]
	 mov ecx,dword 0xffffff
	 mov esi,[x]
	 mov edi,[y]
	 call PutPixel
 
	 pop edi
	 pop 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
 
	 and [number_panel],0
	 and [number_menu],0
 
	 jmp still
	 no_cut:
 
	 ;<<<<<>>>>>
	 cmp [number_menu],5
	 jne no_cleare_all
 
	 call cleare_work_arrea
 
	 call MovePictureToWorkScreen
 
	 and [number_panel],0
	 and [number_menu],0
 
	 jmp still
	 no_cleare_all:
	 ;<<<<<>>>>>
 
	 cmp [number_menu],6
	 jne no_to_allocate_all
 
	 mov [OldX],1
	 mov [OldY],1
	 mov eax,[Picture_SizeX]
	 mov ebx,[Picture_SizeY]
	 dec eax
	 dec ebx
	 mov [rectangular_shade_x],eax
	 mov [rectangular_shade_y],ebx
	 mov [instrument_used],1
	 mov [Activate_instrument],1
	 mov [Current_instrument],30
	 mov [crossing],0
	 and [number_panel],0
	 and [number_menu],0
	 ;call TakeButtonInstruments
	 ;call MovePictureToWorkScreen
	 jmp still
 
	 no_to_allocate_all:
 
	 no_edit:
 
 
	 jmp still
 
	 ret

Rev 552	Rev 1632
1	;-----------------------------------------------------------	1	;-----------------------------------------------------------
2	;-----------instruments of menu-----------------------------	2	;-----------instruments of menu-----------------------------
3	;-----------------------------------------------------------	3	;-----------------------------------------------------------
4	TakeInstruments:	4	TakeInstruments:
5		5
6	;\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|FILE\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|	6	;\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|FILE\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|
7	cmp [number_panel],7	7	cmp [number_panel],7
8	jne no_file	8	jne no_file
9		9
10	;<<<<>>>>>>	10	;<<<<>>>>>>
11	cmp [number_menu],1	11	cmp [number_menu],1
12	jne no_new	12	jne no_new
13		13
14	mov eax,80	14	mov eax,80
15	mov ebx,100	15	mov ebx,100
16	mov ecx,150	16	mov ecx,150
17	mov edx,90	17	mov edx,90
18	mov esi,1	18	mov esi,1
19	call draw_volume_rectangle	19	call draw_volume_rectangle
20		20
21	mov eax,177	21	mov eax,177
22	mov ebx,115	22	mov ebx,115
23	mov ecx,40	23	mov ecx,40
24	mov edx,14	24	mov edx,14
25	mov esi,4	25	mov esi,4
26	call draw_volume_rectangle	26	call draw_volume_rectangle
27		27
28	mov eax,177	28	mov eax,177
29	mov ebx,115+24	29	mov ebx,115+24
30	mov ecx,40	30	mov ecx,40
31	mov edx,14	31	mov edx,14
32	mov esi,4	32	mov esi,4
33	call draw_volume_rectangle	33	call draw_volume_rectangle
34		34
35	mov eax,175	35	mov eax,175
36	mov ebx,170	36	mov ebx,170
37	mov ecx,40	37	mov ecx,40
38	mov edx,15	38	mov edx,15
39	mov esi,1	39	mov esi,1
40	call draw_volume_rectangle	40	call draw_volume_rectangle
41		41
42	mov eax,90	42	mov eax,90
43	mov ebx,118	43	mov ebx,118
44	mov ecx,0xffffff	44	mov ecx,0xffffff
45	mov edx,new_text1	45	mov edx,new_text1
46	mov esi,14	46	mov esi,14
47	call print_text	47	call print_text
48		48
49	mov eax,90	49	mov eax,90
50	mov ebx,118+24	50	mov ebx,118+24
51	mov ecx,0xffffff	51	mov ecx,0xffffff
52	mov edx,new_text2	52	mov edx,new_text2
53	mov esi,14	53	mov esi,14
54	call print_text	54	call print_text
55		55
56	mov eax,185	56	mov eax,185
57	mov ebx,175	57	mov ebx,175
58	mov ecx,0xffffff	58	mov ecx,0xffffff
59	mov edx,ok_text	59	mov edx,ok_text
60	mov esi,2	60	mov esi,2
61	call print_text	61	call print_text
62		62
63	mov eax,8	63	mov eax,8
64	mov ebx,177*65536+40	64	mov ebx,177*65536+40
65	mov ecx,115*65536+14	65	mov ecx,115*65536+14
66	mov edx,1000000000000000000000000000000b	66	mov edx,1000000000000000000000000000000b
67	add edx,1000	67	add edx,1000
68	mcall	68	mcall
69		69
70	mov eax,8	70	mov eax,8
71	mov ebx,177*65536+40	71	mov ebx,177*65536+40
72	mov ecx,139*65536+14	72	mov ecx,139*65536+14
73	mov edx,1000000000000000000000000000000b	73	mov edx,1000000000000000000000000000000b
74	add edx,1001	74	add edx,1001
75	mcall	75	mcall
76		76
77	mov eax,8	77	mov eax,8
78	mov ebx,175*65536+40	78	mov ebx,175*65536+40
79	mov ecx,170*65536+15	79	mov ecx,170*65536+15
80	mov edx,1000000000000000000000000000000b	80	mov edx,1000000000000000000000000000000b
81	add edx,1002	81	add edx,1002
82	mcall	82	mcall
83		83
84	no_activate_space:	84	no_activate_space:
85		85
86	mov eax,10	86	mov eax,10
87	mcall	87	mcall
88		88
89	cmp eax,1	89	cmp eax,1
90	je exit_new	90	je exit_new
91		91
92	cmp eax,3	92	cmp eax,3
93	jne no_activate_space	93	jne no_activate_space
94		94
95	mov eax,17	95	mov eax,17
96	mcall	96	mcall
97	shr eax,8	97	shr eax,8
98		98
99	cmp eax,1000	99	cmp eax,1000
100	jl no_activate_space	100	jl no_activate_space
101		101
102	cmp eax,1000	102	cmp eax,1000
103	jne no_picture_size_x	103	jne no_picture_size_x
104		104
105	mov eax,180	105	mov eax,180
106	mov ebx,119	106	mov ebx,119
107	mov ecx,5	107	mov ecx,5
108	call dialog_line	108	call dialog_line
109		109
110	mov eax,string_	110	mov eax,string_
111	mov ebx,13	111	mov ebx,13
112	call find_symvol	112	call find_symvol
113		113
114	dec eax	114	dec eax
115	mov [length_number],eax	115	mov [length_number],eax
116	mov eax,string_	116	mov eax,string_
117	call value	117	call value
118		118
119	mov [Picture_SizeX],eax	119	mov [Picture_SizeX],eax
120		120
121	jmp no_activate_space	121	jmp no_activate_space
122		122
123	no_picture_size_x:	123	no_picture_size_x:
124		124
125	cmp eax,1001	125	cmp eax,1001
126	jne no_picture_size_y	126	jne no_picture_size_y
127		127
128	mov eax,180	128	mov eax,180
129	mov ebx,119+24	129	mov ebx,119+24
130	mov ecx,5	130	mov ecx,5
131	call dialog_line	131	call dialog_line
132		132
133	mov eax,string_	133	mov eax,string_
134	mov ebx,13	134	mov ebx,13
135	call find_symvol	135	call find_symvol
136		136
137	dec eax	137	dec eax
138	mov [length_number],eax	138	mov [length_number],eax
139	mov eax,string_	139	mov eax,string_
140	call value	140	call value
141		141
142	mov [Picture_SizeY],eax	142	mov [Picture_SizeY],eax
143		143
144	jmp no_activate_space	144	jmp no_activate_space
145		145
146	no_picture_size_y:	146	no_picture_size_y:
147		147
148	cmp eax,1002	148	cmp eax,1002
149	jne no_activate_space	149	jne no_activate_space
150		150
151	exit_new:	151	exit_new:
152		152
153	mov eax,8	153	mov eax,8
154	mov ebx,175*65536+40	154	mov ebx,175*65536+40
155	mov ecx,170*65536+15	155	mov ecx,170*65536+15
156	mov edx,11100000000000000000000000000000b	156	mov edx,11100000000000000000000000000000b
157	add edx,1002	157	add edx,1002
158	mcall	158	mcall
159		159
160	mov eax,8	160	mov eax,8
161	mov ebx,177*65536+40	161	mov ebx,177*65536+40
162	mov ecx,139*65536+14	162	mov ecx,139*65536+14
163	mov edx,11100000000000000000000000000000b	163	mov edx,11100000000000000000000000000000b
164	add edx,1001	164	add edx,1001
165	mcall	165	mcall
166		166
167	mov eax,8	167	mov eax,8
168	mov ebx,177*65536+40	168	mov ebx,177*65536+40
169	mov ecx,115*65536+14	169	mov ecx,115*65536+14
170	mov edx,11100000000000000000000000000000b	170	mov edx,11100000000000000000000000000000b
171	add edx,1000	171	add edx,1000
172	mcall	172	mcall
173		173
174	;get memory for new picture	174	;get memory for new picture
175	mov eax,[Picture_SizeX]	-
176	mov ebx,[Picture_SizeY]	-
177		-
178	imul eax,ebx	-
179	lea eax,[eax+eax*2]	-
180		-
181	mov ebx,[ScreenPointer]	-
182	add ebx,(120010003)+50(2020*3)+500000	-
183		-
184	mov [PointerToPicture],ebx	-
185	mov [PointerToCopyPicture],ebx	-
186	mov [PointerToCopyPicture2],ebx	-
187	mov [PointerToEditBufer],ebx	-
188	mov [PointerToSpriteBufer],ebx	-
189		-
190	add [PointerToCopyPicture],eax	-
191		-
192	add [PointerToCopyPicture2],eax	-
193	add [PointerToCopyPicture2],eax	-
194		-
195	add [PointerToEditBufer],eax	-
196	add [PointerToEditBufer],eax	-
197	add [PointerToEditBufer],eax	-
198		-
199	add [PointerToSpriteBufer],eax	-
200	add [PointerToSpriteBufer],eax	-
201	add [PointerToSpriteBufer],eax	-
202	add [PointerToSpriteBufer],eax	-
203		175
204	call GetMemory	176	call GetMemory
205		177
206	and [save_flag],0	178	and [save_flag],0
207	and [number_panel],0	179	and [number_panel],0
208	and [number_menu],0	180	and [number_menu],0
209		181
210	call cleare_work_arrea	182	call cleare_work_arrea
211	call drawwin	183	call drawwin
212		184
213	jmp still	185	jmp still
214	no_new:	186	no_new:
215		187
216	;<<<<>>>>>>	188	;<<<<>>>>>>
217	cmp [number_menu],2	189	cmp [number_menu],2
218	jne no_open	190	jne no_open
219		191
-		192	; opendialog drawwin,open_1,open_2,file_path
-		193	;---------------------------------------------------------------------
-		194	mov [OpenDialog_data.type],0 ; open
-		195
-		196	push dword OpenDialog_data
-		197	call [OpenDialog_Start]
-		198
-		199	cmp [OpenDialog_data.status],1
-		200	jne still
-		201	;---------------------------------------------------------------------
220	opendialog drawwin,open_1,open_2,file_path	202
221	open_1:	203	open_1:
222		204
223	mov eax,40	205	mov eax,40
224	mov ebx,100111b	206	mov ebx,100111b
225	mcall	207	mcall
226		208
227	mov eax,file_path	209	mov eax,file_path
228	mov ebx,[ScreenPointer]	210	mov ebx,[ScreenPointer]
229	add ebx,0x10000	211	add ebx,0x10000
230		212
231	call load_heading_of_file	213	call load_heading_of_file
232		214
233	mov esi,[ScreenPointer]	215	mov esi,[ScreenPointer]
234	add esi,0x10000	216	add esi,0x10000
235	;-------------is this BMP file ?----------------	217	;-------------is this BMP file ?----------------
236	xor eax,eax	218	xor eax,eax
237	mov ax,[esi]	219	mov ax,[esi]
238	mov [type],ax	220	mov [type],ax
239		221
240	cmp [type],word 'BM'	222	cmp [type],word 'BM'
241	jne no_bmp_file	223	jne no_bmp_file
242		224
243	xor eax,eax	225	xor eax,eax
244	xor ebx,ebx	226	xor ebx,ebx
245	mov eax,[esi+18]	227	mov eax,[esi+18]
246	mov ebx,[esi+22]	228	mov ebx,[esi+22]
247	mov [Picture_SizeX],eax	229	mov [Picture_SizeX],eax
248	mov [Picture_SizeY],ebx	230	mov [Picture_SizeY],ebx
249		231
250	jmp exit_type	232	jmp exit_type
251		233
252	no_bmp_file:	234	no_bmp_file:
253		235
254	;-------------is this GIF file ?----------------	236	;-------------is this GIF file ?----------------
255	xor eax,eax	237	xor eax,eax
256	mov ax,[esi]	238	mov ax,[esi]
257	mov [type],ax	239	mov [type],ax
258		240
259	cmp [type],'GI'	241	cmp [type],'GI'
260	jne no_gif_file	242	jne no_gif_file
261		243
262	add esi,6	244	add esi,6
263	xor eax,eax	245	xor eax,eax
264	xor ebx,ebx	246	xor ebx,ebx
265	mov ax,word[esi]	247	mov ax,word[esi]
266	mov bx,word[esi+2]	248	mov bx,word[esi+2]
267	mov [Picture_SizeX],eax	249	mov [Picture_SizeX],eax
268	mov [Picture_SizeY],ebx	250	mov [Picture_SizeY],ebx
269		251
270	jmp exit_type	252	jmp exit_type
271		253
272	no_gif_file:	254	no_gif_file:
273		255
274	jmp no_unpakcing_file	256	jmp no_unpakcing_file
275		257
276	exit_type:	258	exit_type:
277		259
278	;----------------------------------------------------------	260	;----------------------------------------------------------
279	;Get momory for unpacking picture and for picture's bufers	261	;Get momory for unpacking picture and for picture's bufers
280	;----------------------------------------------------------	262	;----------------------------------------------------------
281	mov eax,[Picture_SizeX]	-
282	mov ebx,[Picture_SizeY]	-
283		-
284	imul eax,ebx	-
285	lea eax,[eax+eax*2]	-
286		-
287	mov ebx,[ScreenPointer]	-
288	add ebx,(120010003)+50(2020*3)+500000	-
289		-
290	mov [PointerToPicture],ebx	-
291	mov [PointerToCopyPicture],ebx	-
292	mov [PointerToCopyPicture2],ebx	-
293	mov [PointerToEditBufer],ebx	-
294	mov [PointerToSpriteBufer],ebx	-
295		-
296	add [PointerToCopyPicture],eax	-
297		-
298	add [PointerToCopyPicture2],eax	-
299	add [PointerToCopyPicture2],eax	-
300		-
301	add [PointerToEditBufer],eax	-
302	add [PointerToEditBufer],eax	-
303	add [PointerToEditBufer],eax	-
304		-
305	add [PointerToSpriteBufer],eax	-
306	add [PointerToSpriteBufer],eax	-
307	add [PointerToSpriteBufer],eax	-
308	add [PointerToSpriteBufer],eax	-
309		-
310	call GetMemory	263	call GetMemory
311	;----------------------------------------------------------	264	;----------------------------------------------------------
312	;--------------------Load file in memory-------------------	265	;--------------------Load file in memory-------------------
313	;----------------------------------------------------------	266	;----------------------------------------------------------
314		267
315	mov eax,file_path	268	mov eax,file_path
316	mov ebx,[PointerToCopyPicture]	269	mov ebx,[PointerToCopyPicture]
317	add ebx,1000	270	add ebx,1000
318		271
319	call load_file	272	call load_file
320		273
321	;----------------------------------------------------------	274	;----------------------------------------------------------
322	;-------------------Unpacking picture----------------------	275	;-------------------Unpacking picture----------------------
323	;----------------------------------------------------------	276	;----------------------------------------------------------
324	mov esi,[PointerToCopyPicture]	277	mov esi,[PointerToCopyPicture]
325	add esi,1000	278	add esi,1000
326	mov edi,[PointerToPicture]	279	mov edi,[PointerToPicture]
327	mov eax,[ScreenPointer]	280	mov eax,[ScreenPointer]
328		281
329	cmp [type],'BM'	282	cmp [type],'BM'
330	jne no_unpakcing_bmp_file	283	jne no_unpakcing_bmp_file
331	;BMP DECODER	284	;BMP DECODER
332	call bmptoimg	285	call bmptoimg
333	mov [save_flag],1	286	mov [save_flag],1
334	no_unpakcing_bmp_file:	287	no_unpakcing_bmp_file:
335		288
336		289
337	cmp [type],'GI'	290	cmp [type],'GI'
338	jne no_unpakcing_file	291	jne no_unpakcing_file
339	;GIF DECODER	292	;GIF DECODER
340	sub edi,8	293	sub edi,8
341	call ReadGIF	294	call ReadGIF
342	mov [save_flag],1	295	mov [save_flag],1
343	no_unpakcing_file:	296	no_unpakcing_file:
344		297
345	call load_icons	298	call load_icons
346	call drawwin	299	call drawwin
347		300
348	open_2:	301	open_2:
349		302
350	mov [Scroll1CoordinatX],9	303	mov [Scroll1CoordinatX],9
351	mov [Scroll2CoordinatY],89	304	mov [Scroll2CoordinatY],89
352	and [number_panel],0	305	and [number_panel],0
353	and [number_menu],0	306	and [number_menu],0
354		307
355	jmp still	308	jmp still
356		309
357	no_open:	310	no_open:
358		311
359	;<<<<<<<<<<>>>>>>>>>>>	312	;<<<<<<<<<<>>>>>>>>>>>
360	cmp [number_menu],3	313	cmp [number_menu],3
361	jne no_save_	314	jne no_save_
362		315
363	mov al,[save_flag]	316	mov al,[save_flag]
364		317
365	test al,al	318	test al,al
366	jz no_save_file	319	jz no_save_file
367		320
368	jmp save_enter	321	jmp save_enter
369		322
370	no_save_file:	323	no_save_file:
371		324
372	and [number_panel],0	325	and [number_panel],0
373	and [number_menu],0	326	and [number_menu],0
374		327
375	jmp still	328	jmp still
376		329
377	no_save_:	330	no_save_:
378		331
379	;<<<<<<<<>>>>>>>>>>	332	;<<<<<<<<>>>>>>>>>>
380	cmp [number_menu],4	333	cmp [number_menu],4
381	jne no_save	334	jne no_save
382		335
-		336	; savedialog drawwin,save1,save2,file_path
-		337	;---------------------------------------------------------------------
-		338	mov [OpenDialog_data.type],1 ; save
-		339
-		340	push dword OpenDialog_data
-		341	call [OpenDialog_Start]
-		342
-		343	cmp [OpenDialog_data.status],1
-		344	jne still
383	savedialog drawwin,save1,save2,file_path	345	;---------------------------------------------------------------------
384		346
385	save1:	347	save1:
386		348
387	save_enter:	349	save_enter:
388	mov eax,40	350	mov eax,40
389	mov ebx,100111b	351	mov ebx,100111b
390	mcall	352	mcall
391		353
392	call analizing_picture_to_palette	354	call analizing_picture_to_palette
393	;eax => number of colors in picture	355	;eax => number of colors in picture
394	mov ebx,[PointerToPicture]	356	mov ebx,[PointerToPicture]
395	mov ecx,[PointerToEditBufer]	357	mov ecx,[PointerToEditBufer]
396	mov edx,[PointerToPalette]	358	mov edx,[PointerToPalette]
397	mov esi,[Picture_SizeX]	359	mov esi,[Picture_SizeX]
398	mov edi,[Picture_SizeY]	360	mov edi,[Picture_SizeY]
399		361
400	call coding_bmp	362	call coding_bmp
401		363
402	mov eax,file_path	364	mov eax,file_path
403	mov ecx,ebx	365	mov ecx,ebx
404	mov ebx,[PointerToEditBufer]	366	mov ebx,[PointerToEditBufer]
405	push eax	367	push eax
406	push ebx	368	push ebx
407	push ecx	369	push ecx
408		370
409	call save_file	371	call save_file
410		372
411	mov [save_flag],1	373	mov [save_flag],1
412	and [number_panel],0	374	and [number_panel],0
413	and [number_menu],0	375	and [number_menu],0
414	call drawwin	376	call drawwin
415		377
416	jmp still	378	jmp still
417		379
418	save2:	380	save2:
419		381
420	and [number_panel],0	382	and [number_panel],0
421	and [number_menu],0	383	and [number_menu],0
422		384
423	jmp still	385	jmp still
424	no_save:	386	no_save:
425		387
426	;<<<<<>>>>>>	388	;<<<<<>>>>>>
427	cmp [number_menu],5	389	cmp [number_menu],5
428	jne no_exit_program	390	jne no_exit_program
429		391
430	mov eax,-1	392	mov eax,-1
431	mcall	393	mcall
432		394
433	no_exit_program:	395	no_exit_program:
434		396
435	no_file:	397	no_file:
436		398
437	;\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|EDIT\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|	399	;\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|EDIT\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|
438		400
439	;<<<<<<<<<>>>>>>>>>	401	;<<<<<<<<<>>>>>>>>>
440	cmp [number_panel],6	402	cmp [number_panel],6
441	jne no_edit	403	jne no_edit
442		404
443	cmp [number_menu],1	405	cmp [number_menu],1
444	jne no_undo	406	jne no_undo
445		407
446	cmp [number_undo],1	408	cmp [number_undo],1
447	jne no_one____	409	jne no_one____
448		410
449	mov esi,[PointerToCopyPicture]	411	mov esi,[PointerToCopyPicture]
450		412
451	no_one____:	413	no_one____:
452		414
453	cmp [number_undo],2	415	cmp [number_undo],2
454	jne no_two____	416	jne no_two____
455		417
456	mov esi,[PointerToCopyPicture2]	418	mov esi,[PointerToCopyPicture2]
457		419
458	no_two____:	420	no_two____:
459		421
460	mov edi,[PointerToPicture]	422	mov edi,[PointerToPicture]
461	mov ecx,[Picture_SizeX]	423	mov ecx,[Picture_SizeX]
462	imul ecx,[Picture_SizeY]	424	imul ecx,[Picture_SizeY]
463	lea ecx,[ecx+ecx*2]	425	lea ecx,[ecx+ecx*2]
464	add ecx,4	426	add ecx,4
465	shr ecx,2	427	shr ecx,2
466	cld	428	cld
467	rep movsd	429	rep movsd
468	call MovePictureToWorkScreen	430	call MovePictureToWorkScreen
469		431
470	dec [number_undo]	432	dec [number_undo]
471	jnz no_null_undo	433	jnz no_null_undo
472		434
473	mov [number_undo],1	435	mov [number_undo],1
474		436
475	no_null_undo:	437	no_null_undo:
476		438
477	and [number_panel],0	439	and [number_panel],0
478	and [number_menu],0	440	and [number_menu],0
479	jmp still	441	jmp still
480	no_undo:	442	no_undo:
481		443

Subversion Repositories Kolibri OS

(root)/programs/media/animage/trunk/menu_instruments.inc – Rev 552 → 1632