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
	 mov eax,[Picture_SizeX]
	 mov ebx,[Picture_SizeY]
 
	 imul eax,ebx
	 lea eax,[eax+eax*2]
 
	 mov ebx,[ScreenPointer]
	 add ebx,(1200*1000*3)+50*(20*20*3)+500000
 
	 mov [PointerToPicture],ebx
	 mov [PointerToCopyPicture],ebx
	 mov [PointerToCopyPicture2],ebx
	 mov [PointerToEditBufer],ebx
	 mov [PointerToSpriteBufer],ebx
 
	 add [PointerToCopyPicture],eax
 
	 add [PointerToCopyPicture2],eax
	 add [PointerToCopyPicture2],eax
 
	 add [PointerToEditBufer],eax
	 add [PointerToEditBufer],eax
	 add [PointerToEditBufer],eax
 
	 add [PointerToSpriteBufer],eax
	 add [PointerToSpriteBufer],eax
	 add [PointerToSpriteBufer],eax
	 add [PointerToSpriteBufer],eax
 
	 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
	 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
	 ;----------------------------------------------------------
	 mov eax,[Picture_SizeX]
	 mov ebx,[Picture_SizeY]
 
	 imul eax,ebx
	 lea eax,[eax+eax*2]
 
	 mov ebx,[ScreenPointer]
	 add ebx,(1200*1000*3)+50*(20*20*3)+500000
 
	 mov [PointerToPicture],ebx
	 mov [PointerToCopyPicture],ebx
	 mov [PointerToCopyPicture2],ebx
	 mov [PointerToEditBufer],ebx
	 mov [PointerToSpriteBufer],ebx
 
	 add [PointerToCopyPicture],eax
 
	 add [PointerToCopyPicture2],eax
	 add [PointerToCopyPicture2],eax
 
	 add [PointerToEditBufer],eax
	 add [PointerToEditBufer],eax
	 add [PointerToEditBufer],eax
 
	 add [PointerToSpriteBufer],eax
	 add [PointerToSpriteBufer],eax
	 add [PointerToSpriteBufer],eax
	 add [PointerToSpriteBufer],eax
 
	 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
 
	 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 485	Rev 552
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]	175	mov eax,[Picture_SizeX]
176	mov ebx,[Picture_SizeY]	176	mov ebx,[Picture_SizeY]
177		177
178	imul eax,ebx	178	imul eax,ebx
179	lea eax,[eax+eax*2]	179	lea eax,[eax+eax*2]
180		180
181	mov ebx,[ScreenPointer]	181	mov ebx,[ScreenPointer]
182	add ebx,(120010003)+50(2020*3)+500000	182	add ebx,(120010003)+50(2020*3)+500000
183		183
184	mov [PointerToPicture],ebx	184	mov [PointerToPicture],ebx
185	mov [PointerToCopyPicture],ebx	185	mov [PointerToCopyPicture],ebx
186	mov [PointerToCopyPicture2],ebx	186	mov [PointerToCopyPicture2],ebx
187	mov [PointerToEditBufer],ebx	187	mov [PointerToEditBufer],ebx
188	mov [PointerToSpriteBufer],ebx	188	mov [PointerToSpriteBufer],ebx
189		189
190	add [PointerToCopyPicture],eax	190	add [PointerToCopyPicture],eax
191		191
192	add [PointerToCopyPicture2],eax	192	add [PointerToCopyPicture2],eax
193	add [PointerToCopyPicture2],eax	193	add [PointerToCopyPicture2],eax
194		194
195	add [PointerToEditBufer],eax	195	add [PointerToEditBufer],eax
196	add [PointerToEditBufer],eax	196	add [PointerToEditBufer],eax
197	add [PointerToEditBufer],eax	197	add [PointerToEditBufer],eax
198		198
199	add [PointerToSpriteBufer],eax	199	add [PointerToSpriteBufer],eax
200	add [PointerToSpriteBufer],eax	200	add [PointerToSpriteBufer],eax
201	add [PointerToSpriteBufer],eax	201	add [PointerToSpriteBufer],eax
202	add [PointerToSpriteBufer],eax	202	add [PointerToSpriteBufer],eax
203		203
204	call GetMemory	204	call GetMemory
205		205
206	and [save_flag],0	206	and [save_flag],0
207	and [number_panel],0	207	and [number_panel],0
208	and [number_menu],0	208	and [number_menu],0
209		209
210	call cleare_work_arrea	210	call cleare_work_arrea
211	call drawwin	211	call drawwin
212		212
213	jmp still	213	jmp still
214	no_new:	214	no_new:
215		215
216	;<<<<>>>>>>	216	;<<<<>>>>>>
217	cmp [number_menu],2	217	cmp [number_menu],2
218	jne no_open	218	jne no_open
219		219
220	opendialog drawwin,open_1,open_2,file_path	220	opendialog drawwin,open_1,open_2,file_path
221	open_1:	221	open_1:
222		222
223	mov eax,40	223	mov eax,40
224	mov ebx,100111b	224	mov ebx,100111b
225	mcall	225	mcall
226		226
227	mov eax,file_path	227	mov eax,file_path
228	mov ebx,[ScreenPointer]	228	mov ebx,[ScreenPointer]
229	add ebx,0x10000	229	add ebx,0x10000
230		230
231	call load_heading_of_file	231	call load_heading_of_file
232		232
233	mov esi,[ScreenPointer]	233	mov esi,[ScreenPointer]
234	add esi,0x10000	234	add esi,0x10000
235	;-------------is this BMP file ?----------------	235	;-------------is this BMP file ?----------------
236	xor eax,eax	236	xor eax,eax
237	mov ax,[esi]	237	mov ax,[esi]
238	mov [type],ax	238	mov [type],ax
239		239
240	cmp [type],word 'BM'	240	cmp [type],word 'BM'
241	jne no_bmp_file	241	jne no_bmp_file
242		242
243	xor eax,eax	243	xor eax,eax
244	xor ebx,ebx	244	xor ebx,ebx
245	mov eax,[esi+18]	245	mov eax,[esi+18]
246	mov ebx,[esi+22]	246	mov ebx,[esi+22]
247	mov [Picture_SizeX],eax	247	mov [Picture_SizeX],eax
248	mov [Picture_SizeY],ebx	248	mov [Picture_SizeY],ebx
249		249
250	jmp exit_type	250	jmp exit_type
251		251
252	no_bmp_file:	252	no_bmp_file:
253		253
254	;-------------is this GIF file ?----------------	254	;-------------is this GIF file ?----------------
255	xor eax,eax	255	xor eax,eax
256	mov ax,[esi]	256	mov ax,[esi]
257	mov [type],ax	257	mov [type],ax
258		258
259	cmp [type],'GI'	259	cmp [type],'GI'
260	jne no_gif_file	260	jne no_gif_file
261		261
262	add esi,6	262	add esi,6
263	xor eax,eax	263	xor eax,eax
264	xor ebx,ebx	264	xor ebx,ebx
265	mov ax,word[esi]	265	mov ax,word[esi]
266	mov bx,word[esi+2]	266	mov bx,word[esi+2]
267	mov [Picture_SizeX],eax	267	mov [Picture_SizeX],eax
268	mov [Picture_SizeY],ebx	268	mov [Picture_SizeY],ebx
269		269
270	jmp exit_type	270	jmp exit_type
271		271
272	no_gif_file:	272	no_gif_file:
273		273
274	jmp no_unpakcing_file	274	jmp no_unpakcing_file
275		275
276	exit_type:	276	exit_type:
277		277
278	;----------------------------------------------------------	278	;----------------------------------------------------------
279	;Get momory for unpacking picture and for picture's bufers	279	;Get momory for unpacking picture and for picture's bufers
280	;----------------------------------------------------------	280	;----------------------------------------------------------
281	mov eax,[Picture_SizeX]	281	mov eax,[Picture_SizeX]
282	mov ebx,[Picture_SizeY]	282	mov ebx,[Picture_SizeY]
283		283
284	imul eax,ebx	284	imul eax,ebx
285	lea eax,[eax+eax*2]	285	lea eax,[eax+eax*2]
286		286
287	mov ebx,[ScreenPointer]	287	mov ebx,[ScreenPointer]
288	add ebx,(120010003)+50(2020*3)+500000	288	add ebx,(120010003)+50(2020*3)+500000
289		289
290	mov [PointerToPicture],ebx	290	mov [PointerToPicture],ebx
291	mov [PointerToCopyPicture],ebx	291	mov [PointerToCopyPicture],ebx
292	mov [PointerToCopyPicture2],ebx	292	mov [PointerToCopyPicture2],ebx
293	mov [PointerToEditBufer],ebx	293	mov [PointerToEditBufer],ebx
294	mov [PointerToSpriteBufer],ebx	294	mov [PointerToSpriteBufer],ebx
295		295
296	add [PointerToCopyPicture],eax	296	add [PointerToCopyPicture],eax
297		297
298	add [PointerToCopyPicture2],eax	298	add [PointerToCopyPicture2],eax
299	add [PointerToCopyPicture2],eax	299	add [PointerToCopyPicture2],eax
300		300
301	add [PointerToEditBufer],eax	301	add [PointerToEditBufer],eax
302	add [PointerToEditBufer],eax	302	add [PointerToEditBufer],eax
303	add [PointerToEditBufer],eax	303	add [PointerToEditBufer],eax
304		304
305	add [PointerToSpriteBufer],eax	305	add [PointerToSpriteBufer],eax
306	add [PointerToSpriteBufer],eax	306	add [PointerToSpriteBufer],eax
307	add [PointerToSpriteBufer],eax	307	add [PointerToSpriteBufer],eax
308	add [PointerToSpriteBufer],eax	308	add [PointerToSpriteBufer],eax
309		309
310	call GetMemory	310	call GetMemory
311	;----------------------------------------------------------	311	;----------------------------------------------------------
312	;--------------------Load file in memory-------------------	312	;--------------------Load file in memory-------------------
313	;----------------------------------------------------------	313	;----------------------------------------------------------
314		314
315	mov eax,file_path	315	mov eax,file_path
316	mov ebx,[PointerToCopyPicture]	316	mov ebx,[PointerToCopyPicture]
317	add ebx,1000	317	add ebx,1000
318		318
319	call load_file	319	call load_file
320		320
321	;----------------------------------------------------------	321	;----------------------------------------------------------
322	;-------------------Unpacking picture----------------------	322	;-------------------Unpacking picture----------------------
323	;----------------------------------------------------------	323	;----------------------------------------------------------
324	mov esi,[PointerToCopyPicture]	324	mov esi,[PointerToCopyPicture]
325	add esi,1000	325	add esi,1000
326	mov edi,[PointerToPicture]	326	mov edi,[PointerToPicture]
327	mov eax,[ScreenPointer]	327	mov eax,[ScreenPointer]
328		328
329	cmp [type],'BM'	329	cmp [type],'BM'
330	jne no_unpakcing_bmp_file	330	jne no_unpakcing_bmp_file
331	;BMP DECODER	331	;BMP DECODER
332	call bmptoimg	332	call bmptoimg
333	mov [save_flag],1	333	mov [save_flag],1
334	no_unpakcing_bmp_file:	334	no_unpakcing_bmp_file:
335		335
336		336
337	cmp [type],'GI'	337	cmp [type],'GI'
338	jne no_unpakcing_file	338	jne no_unpakcing_file
339	;GIF DECODER	339	;GIF DECODER
340	sub edi,12	340	sub edi,8
341	call ReadGIF	341	call ReadGIF
342	mov [save_flag],1	342	mov [save_flag],1
343	no_unpakcing_file:	343	no_unpakcing_file:
344		344
345	call load_icons	345	call load_icons
346	call drawwin	346	call drawwin
347		347
348	open_2:	348	open_2:
349		349
350	mov [Scroll1CoordinatX],9	350	mov [Scroll1CoordinatX],9
351	mov [Scroll2CoordinatY],89	351	mov [Scroll2CoordinatY],89
352	and [number_panel],0	352	and [number_panel],0
353	and [number_menu],0	353	and [number_menu],0
354		354
355	jmp still	355	jmp still
356		356
357	no_open:	357	no_open:
358		358
359	;<<<<<<<<<<>>>>>>>>>>>	359	;<<<<<<<<<<>>>>>>>>>>>
360	cmp [number_menu],3	360	cmp [number_menu],3
361	jne no_save_	361	jne no_save_
362		362
363	mov al,[save_flag]	363	mov al,[save_flag]
364		364
365	test al,al	365	test al,al
366	jz no_save_file	366	jz no_save_file
367		367
368	jmp save_enter	368	jmp save_enter
369		369
370	no_save_file:	370	no_save_file:
371		371
372	and [number_panel],0	372	and [number_panel],0
373	and [number_menu],0	373	and [number_menu],0
374		374
375	jmp still	375	jmp still
376		376
377	no_save_:	377	no_save_:
378		378
379	;<<<<<<<<>>>>>>>>>>	379	;<<<<<<<<>>>>>>>>>>
380	cmp [number_menu],4	380	cmp [number_menu],4
381	jne no_save	381	jne no_save
382		382
383	savedialog drawwin,save1,save2,file_path	383	savedialog drawwin,save1,save2,file_path
384		384
385	save1:	385	save1:
386		386
387	save_enter:	387	save_enter:
388	mov eax,40	388	mov eax,40
389	mov ebx,100111b	389	mov ebx,100111b
390	mcall	390	mcall
391		391
392	call analizing_picture_to_palette	392	call analizing_picture_to_palette
393	;eax => number of colors in picture	393	;eax => number of colors in picture
394	mov ebx,[PointerToPicture]	394	mov ebx,[PointerToPicture]
395	mov ecx,[PointerToEditBufer]	395	mov ecx,[PointerToEditBufer]
396	mov edx,[PointerToPalette]	396	mov edx,[PointerToPalette]
397	mov esi,[Picture_SizeX]	397	mov esi,[Picture_SizeX]
398	mov edi,[Picture_SizeY]	398	mov edi,[Picture_SizeY]
399		399
400	call coding_bmp	400	call coding_bmp
401		401
402	mov eax,file_path	402	mov eax,file_path
403	mov ecx,ebx	403	mov ecx,ebx
404	mov ebx,[PointerToEditBufer]	404	mov ebx,[PointerToEditBufer]
405	push eax	405	push eax
406	push ebx	406	push ebx
407	push ecx	407	push ecx
408		408
409	call save_file	409	call save_file
410		410
411	mov [save_flag],1	411	mov [save_flag],1
412	and [number_panel],0	412	and [number_panel],0
413	and [number_menu],0	413	and [number_menu],0
414	call drawwin	414	call drawwin
415		415
416	jmp still	416	jmp still
417		417
418	save2:	418	save2:
419		419
420	and [number_panel],0	420	and [number_panel],0
421	and [number_menu],0	421	and [number_menu],0
422		422
423	jmp still	423	jmp still
424	no_save:	424	no_save:
425		425
426	;<<<<<>>>>>>	426	;<<<<<>>>>>>
427	cmp [number_menu],5	427	cmp [number_menu],5
428	jne no_exit_program	428	jne no_exit_program
429		429
430	mov eax,-1	430	mov eax,-1
431	mcall	431	mcall
432		432
433	no_exit_program:	433	no_exit_program:
434		434
435	no_file:	435	no_file:
436		436
437	;\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|EDIT\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|	437	;\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|EDIT\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|\|
438		438
439	;<<<<<<<<<>>>>>>>>>	439	;<<<<<<<<<>>>>>>>>>
440	cmp [number_panel],6	440	cmp [number_panel],6
441	jne no_edit	441	jne no_edit
442		442
443	cmp [number_menu],1	443	cmp [number_menu],1
444	jne no_undo	444	jne no_undo
445		445
446	cmp [number_undo],1	446	cmp [number_undo],1
447	jne no_one____	447	jne no_one____
448		448
449	mov esi,[PointerToCopyPicture]	449	mov esi,[PointerToCopyPicture]
450		450
451	no_one____:	451	no_one____:
452		452
453	cmp [number_undo],2	453	cmp [number_undo],2
454	jne no_two____	454	jne no_two____
455		455
456	mov esi,[PointerToCopyPicture2]	456	mov esi,[PointerToCopyPicture2]
457		457
458	no_two____:	458	no_two____:
459		459
460	mov edi,[PointerToPicture]	460	mov edi,[PointerToPicture]
461	mov ecx,[Picture_SizeX]	461	mov ecx,[Picture_SizeX]
462	imul ecx,[Picture_SizeY]	462	imul ecx,[Picture_SizeY]
463	lea ecx,[ecx+ecx*2]	463	lea ecx,[ecx+ecx*2]
464	add ecx,4	464	add ecx,4
465	shr ecx,2	465	shr ecx,2
466	cld	466	cld
467	rep movsd	467	rep movsd
468	call MovePictureToWorkScreen	468	call MovePictureToWorkScreen
469		469
470	dec [number_undo]	470	dec [number_undo]
471	jnz no_null_undo	471	jnz no_null_undo
472		472
473	mov [number_undo],1	473	mov [number_undo],1
474		474
475	no_null_undo:	475	no_null_undo:
476		476
477	and [number_panel],0	477	and [number_panel],0
478	and [number_menu],0	478	and [number_menu],0
479	jmp still	479	jmp still
480	no_undo:	480	no_undo:
481		481
482	;<<<<<<<<<>>>>>>>>>	482	;<<<<<<<<<>>>>>>>>>
483		483
484	cmp [number_menu],2	484	cmp [number_menu],2
485	jne no_copy	485	jne no_copy
486		486
487	cmp [instrument_used],1	487	cmp [instrument_used],1
488	jne no_copy	488	jne no_copy
489	cmp [Activate_instrument],0	489	cmp [Activate_instrument],0
490	jne no_copy	490	jne no_copy
491		491
492	mov eax,[OldX]	492	mov eax,[OldX]
493	mov ebx,[OldY]	493	mov ebx,[OldY]
494		494
495	cmp eax,[rectangular_shade_x]	495	cmp eax,[rectangular_shade_x]
496	jl no_remove_x_copy	496	jl no_remove_x_copy
497		497
498	mov ecx,[rectangular_shade_x]	498	mov ecx,[rectangular_shade_x]
499	mov [OldX],ecx ; OldX <-----> rectangulare_shade_x	499	mov [OldX],ecx ; OldX <-----> rectangulare_shade_x
500	mov [rectangular_shade_x],eax	500	mov [rectangular_shade_x],eax

Subversion Repositories Kolibri OS

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